pgloader →
3.6.3-1+b1 →
armhf → 2022-06-14 01:46:24
sbuild (Debian sbuild) 0.71.0 (24 Aug 2016) on bm-wb-04
+==============================================================================+
| pgloader 3.6.3-1+b1 (armhf) Tue, 14 Jun 2022 00:51:01 +0000 |
+==============================================================================+
Package: pgloader
Version: 3.6.3-1+b1
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-788177b2-a00b-4ba5-b333-517f1a8b6bc2' 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 [13.0 MB]
Get:3 http://172.17.4.1/private bookworm-staging/main armhf Packages [14.0 MB]
Fetched 27.0 MB in 28s (953 kB/s)
Reading package lists...
W: No sandbox user '_apt' on the system, can not drop privileges
W: http://172.17.4.1/private/dists/bookworm-staging/InRelease: Key is stored in legacy trusted.gpg keyring (/etc/apt/trusted.gpg), see the DEPRECATION section in apt-key(8) for details.
+------------------------------------------------------------------------------+
| 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 0s (8515 kB/s)
Download complete and in download only mode
I: NOTICE: Log filtering will replace 'build/pgloader-45da6K/pgloader-3.6.3' with '<<PKGBUILDDIR>>'
I: NOTICE: Log filtering will replace 'build/pgloader-45da6K' 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-UrWvLI/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-UrWvLI/gpg/pubring.kbx' created
gpg: /<<BUILDDIR>>/resolver-UrWvLI/gpg/trustdb.gpg: trustdb created
gpg: key 35506D9A48F77B2E: public key "Sbuild Signer (Sbuild Build Dependency Archive Key) <buildd-tools-devel@lists.alioth.debian.org>" imported
gpg: Total number processed: 1
gpg: imported: 1
gpg: key 35506D9A48F77B2E: "Sbuild Signer (Sbuild Build Dependency Archive Key) <buildd-tools-devel@lists.alioth.debian.org>" not changed
gpg: key 35506D9A48F77B2E: secret key imported
gpg: Total number processed: 1
gpg: unchanged: 1
gpg: secret keys read: 1
gpg: secret keys imported: 1
gpg: using "Sbuild Signer" as default secret key for signing
Ign:1 copy:/<<BUILDDIR>>/resolver-UrWvLI/apt_archive ./ InRelease
Get:2 copy:/<<BUILDDIR>>/resolver-UrWvLI/apt_archive ./ Release [957 B]
Get:3 copy:/<<BUILDDIR>>/resolver-UrWvLI/apt_archive ./ Release.gpg [370 B]
Get:4 copy:/<<BUILDDIR>>/resolver-UrWvLI/apt_archive ./ Sources [349 B]
Get:5 copy:/<<BUILDDIR>>/resolver-UrWvLI/apt_archive ./ Packages [430 B]
Fetched 2106 B in 1s (2513 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 72 not upgraded.
Need to get 848 B of archives.
After this operation, 0 B of additional disk space will be used.
Get:1 copy:/<<BUILDDIR>>/resolver-UrWvLI/apt_archive ./ sbuild-build-depends-core-dummy 0.invalid.0 [848 B]
debconf: delaying package configuration, since apt-utils is not installed
Fetched 848 B in 0s (22.3 kB/s)
Selecting previously unselected package sbuild-build-depends-core-dummy.
(Reading database ... 12621 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-UrWvLI/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-UrWvLI/apt_archive ./ InRelease
Get:2 copy:/<<BUILDDIR>>/resolver-UrWvLI/apt_archive ./ Release [963 B]
Get:3 copy:/<<BUILDDIR>>/resolver-UrWvLI/apt_archive ./ Release.gpg [370 B]
Get:4 copy:/<<BUILDDIR>>/resolver-UrWvLI/apt_archive ./ Sources [863 B]
Get:5 copy:/<<BUILDDIR>>/resolver-UrWvLI/apt_archive ./ Packages [939 B]
Fetched 3135 B in 1s (4103 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-global-vars 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-uax-15 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
libicu71 libjs-jquery libjs-sphinxdoc libjs-underscore
liblocale-gettext-perl libmagic-mgc libmagic1 libmpdec3 libpipeline1
libpython3-stdlib libpython3.10-minimal libpython3.10-stdlib libsigsegv2
libssl3 libsub-override-perl libsybdb5 libtool libuchardet0
libunicode-escape-perl libunicode-string-perl libxml2 m4 man-db media-types
openssl pkg-config po-debconf python-babel-localedata python3
python3-alabaster python3-babel python3-certifi python3-chardet
python3-charset-normalizer python3-distutils python3-docutils python3-idna
python3-imagesize python3-importlib-metadata python3-jinja2 python3-lib2to3
python3-markupsafe python3-minimal python3-more-itertools 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-zipp python3.10
python3.10-minimal sbcl sgml-base sphinx-common sphinx-rtd-theme-common
xml-core zlib1g 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-brotli python3.10-venv python3.10-doc binfmt-support sbcl-doc
sbcl-source slime sgml-base-doc
Recommended packages:
cl-fiveam libjs-mathjax 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-global-vars 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-uax-15 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
libicu71 libjs-jquery libjs-sphinxdoc libjs-underscore
liblocale-gettext-perl libmagic-mgc libmagic1 libmpdec3 libpipeline1
libpython3-stdlib libpython3.10-minimal libpython3.10-stdlib libsigsegv2
libssl3 libsub-override-perl libsybdb5 libtool libuchardet0
libunicode-escape-perl libunicode-string-perl libxml2 m4 man-db media-types
openssl pkg-config po-debconf python-babel-localedata python3
python3-alabaster python3-babel python3-certifi python3-chardet
python3-charset-normalizer python3-distutils python3-docutils python3-idna
python3-imagesize python3-importlib-metadata python3-jinja2 python3-lib2to3
python3-markupsafe python3-minimal python3-more-itertools 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-zipp python3.10
python3.10-minimal sbcl sbuild-build-depends-pgloader-dummy sgml-base
sphinx-common sphinx-rtd-theme-common xml-core zlib1g-dev
The following packages will be upgraded:
zlib1g
1 upgraded, 165 newly installed, 0 to remove and 71 not upgraded.
Need to get 66.7 MB of archives.
After this operation, 287 MB of additional disk space will be used.
Get:1 copy:/<<BUILDDIR>>/resolver-UrWvLI/apt_archive ./ sbuild-build-depends-pgloader-dummy 0.invalid.0 [1224 B]
Get:2 http://172.17.4.1/private bookworm-staging/main armhf liblocale-gettext-perl armhf 1.07-4+b2 [18.3 kB]
Get:3 http://172.17.4.1/private bookworm-staging/main armhf fonts-lato all 2.0-2.1 [2696 kB]
Get:4 http://172.17.4.1/private bookworm-staging/main armhf libsigsegv2 armhf 2.14-1 [36.6 kB]
Get:5 http://172.17.4.1/private bookworm-staging/main armhf gawk armhf 1:5.1.0-1 [533 kB]
Get:6 http://172.17.4.1/private bookworm-staging/main armhf libssl3 armhf 3.0.3-7 [1645 kB]
Get:7 http://172.17.4.1/private bookworm-staging/main armhf libpython3.10-minimal armhf 3.10.5-1+b1 [815 kB]
Get:8 http://172.17.4.1/private bookworm-staging/main armhf libexpat1 armhf 2.4.8-1 [84.1 kB]
Get:9 http://172.17.4.1/private bookworm-staging/main armhf zlib1g armhf 1:1.2.11.dfsg-4+b2 [84.5 kB]
Get:10 http://172.17.4.1/private bookworm-staging/main armhf python3.10-minimal armhf 3.10.5-1+b1 [1637 kB]
Get:11 http://172.17.4.1/private bookworm-staging/main armhf python3-minimal armhf 3.10.4-1+b1 [38.9 kB]
Get:12 http://172.17.4.1/private bookworm-staging/main armhf media-types all 8.0.0 [33.4 kB]
Get:13 http://172.17.4.1/private bookworm-staging/main armhf libmpdec3 armhf 2.5.1-2+rpi1 [73.5 kB]
Get:14 http://172.17.4.1/private bookworm-staging/main armhf libpython3.10-stdlib armhf 3.10.5-1+b1 [1626 kB]
Get:15 http://172.17.4.1/private bookworm-staging/main armhf python3.10 armhf 3.10.5-1+b1 [542 kB]
Get:16 http://172.17.4.1/private bookworm-staging/main armhf libpython3-stdlib armhf 3.10.4-1+b1 [21.9 kB]
Get:17 http://172.17.4.1/private bookworm-staging/main armhf python3 armhf 3.10.4-1+b1 [38.4 kB]
Get:18 http://172.17.4.1/private bookworm-staging/main armhf sgml-base all 1.30 [15.1 kB]
Get:19 http://172.17.4.1/private bookworm-staging/main armhf libuchardet0 armhf 0.0.7-1 [65.0 kB]
Get:20 http://172.17.4.1/private bookworm-staging/main armhf groff-base armhf 1.22.4-8 [793 kB]
Get:21 http://172.17.4.1/private bookworm-staging/main armhf bsdextrautils armhf 2.38-4 [137 kB]
Get:22 http://172.17.4.1/private bookworm-staging/main armhf libpipeline1 armhf 1.5.6-1 [33.7 kB]
Get:23 http://172.17.4.1/private bookworm-staging/main armhf man-db armhf 2.10.2-1 [1362 kB]
Get:24 http://172.17.4.1/private bookworm-staging/main armhf openssl armhf 3.0.3-7 [1370 kB]
Get:25 http://172.17.4.1/private bookworm-staging/main armhf ca-certificates all 20211016 [156 kB]
Get:26 http://172.17.4.1/private bookworm-staging/main armhf libmagic-mgc armhf 1:5.41-4 [295 kB]
Get:27 http://172.17.4.1/private bookworm-staging/main armhf libmagic1 armhf 1:5.41-4 [120 kB]
Get:28 http://172.17.4.1/private bookworm-staging/main armhf file armhf 1:5.41-4 [65.8 kB]
Get:29 http://172.17.4.1/private bookworm-staging/main armhf gettext-base armhf 0.21-6 [171 kB]
Get:30 http://172.17.4.1/private bookworm-staging/main armhf m4 armhf 1.4.18-5 [186 kB]
Get:31 http://172.17.4.1/private bookworm-staging/main armhf autoconf all 2.71-2 [343 kB]
Get:32 http://172.17.4.1/private bookworm-staging/main armhf autotools-dev all 20220109.1 [51.6 kB]
Get:33 http://172.17.4.1/private bookworm-staging/main armhf automake all 1:1.16.5-1.3 [823 kB]
Get:34 http://172.17.4.1/private bookworm-staging/main armhf autopoint all 0.21-6 [510 kB]
Get:35 http://172.17.4.1/private bookworm-staging/main armhf sbcl armhf 2:2.2.3-1 [8114 kB]
Get:36 http://172.17.4.1/private bookworm-staging/main armhf buildapp armhf 1.5.6-3 [7047 kB]
Get:37 http://172.17.4.1/private bookworm-staging/main armhf cl-alexandria all 20211025.gita67c3a6-1 [212 kB]
Get:38 http://172.17.4.1/private bookworm-staging/main armhf cl-esrap all 20211008.gitc99c33a-1 [54.0 kB]
Get:39 http://172.17.4.1/private bookworm-staging/main armhf cl-ppcre all 20220126.gitb4056c5-1 [113 kB]
Get:40 http://172.17.4.1/private bookworm-staging/main armhf cl-abnf all 20200229.gitba1fbb1-1 [11.4 kB]
Get:41 http://172.17.4.1/private bookworm-staging/main armhf cl-anaphora all 20210111.gitab5f07e-1 [7876 B]
Get:42 http://172.17.4.1/private bookworm-staging/main armhf cl-asdf all 2:3.3.5-1 [1282 kB]
Get:43 http://172.17.4.1/private bookworm-staging/main armhf cl-asdf-finalizers all 20170403-1.1 [9620 B]
Get:44 http://172.17.4.1/private bookworm-staging/main armhf cl-asdf-system-connections all 20170124-1.1 [5080 B]
Get:45 http://172.17.4.1/private bookworm-staging/main armhf cl-trivial-features all 20210228.gitf6e8dd7-2 [10.9 kB]
Get:46 http://172.17.4.1/private bookworm-staging/main armhf cl-trivial-gray-streams all 20210117.git2b3823e-1 [10.5 kB]
Get:47 http://172.17.4.1/private bookworm-staging/main armhf cl-babel all 20200719.gitf892d05-2 [125 kB]
Get:48 http://172.17.4.1/private bookworm-staging/main armhf cl-rt all 20090812.gita6a7503-1 [13.2 kB]
Get:49 http://172.17.4.1/private bookworm-staging/main armhf cl-kmrcl all 1.111-2 [46.7 kB]
Get:50 http://172.17.4.1/private bookworm-staging/main armhf cl-base64 all 3.4.0-1 [9936 B]
Get:51 http://172.17.4.1/private bookworm-staging/main armhf cl-bordeaux-threads all 0.8.8-5 [23.2 kB]
Get:52 http://172.17.4.1/private bookworm-staging/main armhf libglib2.0-0 armhf 2.72.2-2 [1231 kB]
Get:53 http://172.17.4.1/private bookworm-staging/main armhf pkg-config armhf 0.29.2-1 [61.5 kB]
Get:54 http://172.17.4.1/private bookworm-staging/main armhf libffi-dev armhf 3.4.2-4 [61.7 kB]
Get:55 http://172.17.4.1/private bookworm-staging/main armhf zlib1g-dev armhf 1:1.2.11.dfsg-4+b2 [183 kB]
Get:56 http://172.17.4.1/private bookworm-staging/main armhf cl-cffi all 1:0.24.1-2 [1682 kB]
Get:57 http://172.17.4.1/private bookworm-staging/main armhf cl-chipz all 20220213.git82a17d3-1 [37.4 kB]
Get:58 http://172.17.4.1/private bookworm-staging/main armhf cl-chunga all 20220222.git7836609-1 [19.6 kB]
Get:59 http://172.17.4.1/private bookworm-staging/main armhf cl-closer-mop all 2:20220227.giteabdf6a-1 [25.8 kB]
Get:60 http://172.17.4.1/private bookworm-staging/main armhf cl-closure-common all 20101107-1.1 [25.2 kB]
Get:61 http://172.17.4.1/private bookworm-staging/main armhf cl-command-line-arguments all 20151218-1.1 [9544 B]
Get:62 http://172.17.4.1/private bookworm-staging/main armhf cl-metatilities-base all 20170403-1.1 [51.9 kB]
Get:63 http://172.17.4.1/private bookworm-staging/main armhf cl-containers all 20170403-1.1 [114 kB]
Get:64 http://172.17.4.1/private bookworm-staging/main armhf cl-iterate all 20210519.gitb0f9a9c-1 [49.3 kB]
Get:65 http://172.17.4.1/private bookworm-staging/main armhf cl-flexi-streams all 20210728.git41af5dc-1 [176 kB]
Get:66 http://172.17.4.1/private bookworm-staging/main armhf cl-unicode all 20201101.git54bdf2c-1 [1316 kB]
Get:67 http://172.17.4.1/private bookworm-staging/main armhf cl-named-readtables all 20201221.gitc5689a4-1 [28.0 kB]
Get:68 http://172.17.4.1/private bookworm-staging/main armhf cl-interpol all 20201106.git70a1137-1 [32.8 kB]
Get:69 http://172.17.4.1/private bookworm-staging/main armhf cl-csv all 20200929.git68ecb5d-1 [27.7 kB]
Get:70 http://172.17.4.1/private bookworm-staging/main armhf cl-cxml all 20110619-2.1 [82.5 kB]
Get:71 http://172.17.4.1/private bookworm-staging/main armhf cl-db3 all 20200212-1 [8388 B]
Get:72 http://172.17.4.1/private bookworm-staging/main armhf cl-puri all 1:1.5.7.2-1 [19.1 kB]
Get:73 http://172.17.4.1/private bookworm-staging/main armhf cl-split-sequence all 1:2.0.1-1 [11.9 kB]
Get:74 http://172.17.4.1/private bookworm-staging/main armhf cl-usocket all 0.8.3-2 [74.9 kB]
Get:75 http://172.17.4.1/private bookworm-staging/main armhf cl-trivial-garbage all 20211229.gitb3af9c0-1 [9000 B]
Get:76 http://172.17.4.1/private bookworm-staging/main armhf cl-plus-ssl all 20220328.git8b91648-4 [57.3 kB]
Get:77 http://172.17.4.1/private bookworm-staging/main armhf cl-drakma all 2.0.8-1 [46.3 kB]
Get:78 http://172.17.4.1/private bookworm-staging/main armhf cl-dynamic-classes all 20130128-2.1 [6916 B]
Get:79 http://172.17.4.1/private bookworm-staging/main armhf cl-fad all 20220110.git3f4d32d-1 [24.4 kB]
Get:80 http://172.17.4.1/private bookworm-staging/main armhf cl-garbage-pools all 20130720-1.1 [3144 B]
Get:81 http://172.17.4.1/private bookworm-staging/main armhf cl-global-vars all 0~20141013.gitc749f32-2 [5156 B]
Get:82 http://172.17.4.1/private bookworm-staging/main armhf cl-ieee-floats all 20170830-1.1 [6828 B]
Get:83 http://172.17.4.1/private bookworm-staging/main armhf cl-ironclad all 0.57-1 [1169 kB]
Get:84 http://172.17.4.1/private bookworm-staging/main armhf cl-ixf all 20180228-1.1 [9852 B]
Get:85 http://172.17.4.1/private bookworm-staging/main armhf cl-local-time all 20180228-1.1 [26.7 kB]
Get:86 http://172.17.4.1/private bookworm-staging/main armhf cl-log all 1.0.1-1.1 [20.8 kB]
Get:87 http://172.17.4.1/private bookworm-staging/main armhf cl-lparallel all 20160825-1.1 [49.8 kB]
Get:88 http://172.17.4.1/private bookworm-staging/main armhf cl-metabang-bind all 20200101.git9ab6e64-1 [17.6 kB]
Get:89 http://172.17.4.1/private bookworm-staging/main armhf cl-markdown all 20101006-2.1 [37.4 kB]
Get:90 http://172.17.4.1/private bookworm-staging/main armhf cl-md5 all 1:20210622.git906593f-1 [14.8 kB]
Get:91 http://172.17.4.1/private bookworm-staging/main armhf freetds-common all 1.3.6-1.1 [33.6 kB]
Get:92 http://172.17.4.1/private bookworm-staging/main armhf libct4 armhf 1.3.6-1.1 [145 kB]
Get:93 http://172.17.4.1/private bookworm-staging/main armhf libsybdb5 armhf 1.3.6-1.1 [169 kB]
Get:94 http://172.17.4.1/private bookworm-staging/main armhf freetds-dev armhf 1.3.6-1.1 [242 kB]
Ign:94 http://172.17.4.1/private bookworm-staging/main armhf freetds-dev armhf 1.3.6-1.1
Get:95 http://172.17.4.1/private bookworm-staging/main armhf cl-mssql all 20180228-1.1 [8652 B]
Get:96 http://172.17.4.1/private bookworm-staging/main armhf cl-mustache all 0.12.1-9-g684f227-1.1 [9880 B]
Get:97 http://172.17.4.1/private bookworm-staging/main armhf cl-parse-number all 1.7-1.1 [7368 B]
Get:98 http://172.17.4.1/private bookworm-staging/main armhf cl-uax-15 all 0~20211021.git75c8a87-3 [387 kB]
Get:99 http://172.17.4.1/private bookworm-staging/main armhf cl-postgres all 20211113.git9d4332f-1 [64.1 kB]
Get:100 http://172.17.4.1/private bookworm-staging/main armhf cl-s-sql all 20211113.git9d4332f-1 [70.0 kB]
Get:101 http://172.17.4.1/private bookworm-staging/main armhf cl-postmodern all 20211113.git9d4332f-1 [362 kB]
Get:102 http://172.17.4.1/private bookworm-staging/main armhf cl-py-configparser all 20170830-1.1 [8612 B]
Get:103 http://172.17.4.1/private bookworm-staging/main armhf cl-qmynd all 20180131-1.1 [37.3 kB]
Get:104 http://172.17.4.1/private bookworm-staging/main armhf cl-quri all 20150804-1.1 [66.5 kB]
Get:105 http://172.17.4.1/private bookworm-staging/main armhf cl-simple-date all 20211113.git9d4332f-1 [19.4 kB]
Get:106 http://172.17.4.1/private bookworm-staging/main armhf cl-sqlite all 20130615-2.1 [14.7 kB]
Get:107 http://172.17.4.1/private bookworm-staging/main armhf cl-trivial-backtrace all 20200511.git6eb65bd-1 [10.1 kB]
Get:108 http://172.17.4.1/private bookworm-staging/main armhf cl-trivial-utf-8 all 20111001-1.1 [7760 B]
Get:109 http://172.17.4.1/private bookworm-staging/main armhf cl-utilities all 1.2.4-3.2 [22.2 kB]
Get:110 http://172.17.4.1/private bookworm-staging/main armhf cl-uuid all 20130813-1.1 [6876 B]
Get:111 http://172.17.4.1/private bookworm-staging/main armhf cl-yason all 0.7.6-1.1 [10.0 kB]
Get:112 http://172.17.4.1/private bookworm-staging/main armhf cl-zs3 all 1.3.1-1.1 [48.6 kB]
Get:113 http://172.17.4.1/private bookworm-staging/main armhf libdebhelper-perl all 13.7.1 [195 kB]
Get:114 http://172.17.4.1/private bookworm-staging/main armhf libtool all 2.4.7-4 [526 kB]
Get:115 http://172.17.4.1/private bookworm-staging/main armhf dh-autoreconf all 20 [17.1 kB]
Get:116 http://172.17.4.1/private bookworm-staging/main armhf libarchive-zip-perl all 1.68-1 [104 kB]
Get:117 http://172.17.4.1/private bookworm-staging/main armhf libsub-override-perl all 0.09-2 [10.2 kB]
Get:118 http://172.17.4.1/private bookworm-staging/main armhf libfile-stripnondeterminism-perl all 1.13.0-1 [26.6 kB]
Get:119 http://172.17.4.1/private bookworm-staging/main armhf dh-strip-nondeterminism all 1.13.0-1 [15.8 kB]
Get:120 http://172.17.4.1/private bookworm-staging/main armhf libelf1 armhf 0.187-1 [175 kB]
Get:121 http://172.17.4.1/private bookworm-staging/main armhf dwz armhf 0.14-1 [83.0 kB]
Get:122 http://172.17.4.1/private bookworm-staging/main armhf libicu71 armhf 71.1-3 [8855 kB]
Get:123 http://172.17.4.1/private bookworm-staging/main armhf libxml2 armhf 2.9.14+dfsg-1 [591 kB]
Get:124 http://172.17.4.1/private bookworm-staging/main armhf gettext armhf 0.21-6 [1214 kB]
Get:125 http://172.17.4.1/private bookworm-staging/main armhf intltool-debian all 0.35.0+20060710.5 [26.8 kB]
Get:126 http://172.17.4.1/private bookworm-staging/main armhf po-debconf all 1.0.21+nmu1 [248 kB]
Get:127 http://172.17.4.1/private bookworm-staging/main armhf debhelper all 13.7.1 [1071 kB]
Get:128 http://172.17.4.1/private bookworm-staging/main armhf xml-core all 0.18+nmu1 [23.8 kB]
Get:129 http://172.17.4.1/private bookworm-staging/main armhf docutils-common all 0.17.1+dfsg-2 [127 kB]
Get:130 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:131 http://172.17.4.1/private bookworm-staging/main armhf help2man armhf 1.49.2 [202 kB]
Get:132 http://172.17.4.1/private bookworm-staging/main armhf libjs-jquery all 3.6.0+dfsg+~3.5.13-1 [316 kB]
Get:133 http://172.17.4.1/private bookworm-staging/main armhf libjs-underscore all 1.13.3~dfsg+~1.11.4-1 [116 kB]
Get:134 http://172.17.4.1/private bookworm-staging/main armhf libjs-sphinxdoc all 4.5.0-3 [142 kB]
Get:135 http://172.17.4.1/private bookworm-staging/main armhf libunicode-string-perl armhf 2.10-1+b6 [98.7 kB]
Get:136 http://172.17.4.1/private bookworm-staging/main armhf libunicode-escape-perl all 0.0.2-4.1 [12.9 kB]
Get:137 http://172.17.4.1/private bookworm-staging/main armhf python-babel-localedata all 2.8.0+dfsg.1-7 [4997 kB]
Get:138 http://172.17.4.1/private bookworm-staging/main armhf python3-alabaster all 0.7.12-1 [20.8 kB]
Get:139 http://172.17.4.1/private bookworm-staging/main armhf python3-pkg-resources all 59.6.0-1.2 [196 kB]
Get:140 http://172.17.4.1/private bookworm-staging/main armhf python3-tz all 2022.1-1 [34.8 kB]
Get:141 http://172.17.4.1/private bookworm-staging/main armhf python3-babel all 2.8.0+dfsg.1-7 [100 kB]
Get:142 http://172.17.4.1/private bookworm-staging/main armhf python3-certifi all 2020.6.20-1 [151 kB]
Get:143 http://172.17.4.1/private bookworm-staging/main armhf python3-chardet all 4.0.0-2 [99.1 kB]
Get:144 http://172.17.4.1/private bookworm-staging/main armhf python3-charset-normalizer all 2.0.6-2 [30.6 kB]
Get:145 http://172.17.4.1/private bookworm-staging/main armhf python3-lib2to3 all 3.9.12-1 [79.9 kB]
Get:146 http://172.17.4.1/private bookworm-staging/main armhf python3-distutils all 3.9.12-1 [146 kB]
Get:147 http://172.17.4.1/private bookworm-staging/main armhf python3-roman all 3.3-1 [10.7 kB]
Get:148 http://172.17.4.1/private bookworm-staging/main armhf python3-docutils all 0.17.1+dfsg-2 [393 kB]
Get:149 http://172.17.4.1/private bookworm-staging/main armhf python3-idna all 3.3-1 [39.4 kB]
Get:150 http://172.17.4.1/private bookworm-staging/main armhf python3-imagesize all 1.3.0-1 [6360 B]
Get:151 http://172.17.4.1/private bookworm-staging/main armhf python3-more-itertools all 8.10.0-2 [53.0 kB]
Get:152 http://172.17.4.1/private bookworm-staging/main armhf python3-zipp all 1.0.0-4 [6160 B]
Get:153 http://172.17.4.1/private bookworm-staging/main armhf python3-importlib-metadata all 4.6.4-1 [22.5 kB]
Get:154 http://172.17.4.1/private bookworm-staging/main armhf python3-markupsafe armhf 2.0.1-2+b1 [13.5 kB]
Get:155 http://172.17.4.1/private bookworm-staging/main armhf python3-jinja2 all 3.0.3-1 [121 kB]
Get:156 http://172.17.4.1/private bookworm-staging/main armhf python3-pyparsing all 3.0.7-2 [140 kB]
Get:157 http://172.17.4.1/private bookworm-staging/main armhf python3-packaging all 21.3-1 [34.1 kB]
Get:158 http://172.17.4.1/private bookworm-staging/main armhf python3-pygments all 2.11.2+dfsg-2 [744 kB]
Get:159 http://172.17.4.1/private bookworm-staging/main armhf python3-six all 1.16.0-3 [17.5 kB]
Get:160 http://172.17.4.1/private bookworm-staging/main armhf python3-urllib3 all 1.26.9-1 [116 kB]
Get:161 http://172.17.4.1/private bookworm-staging/main armhf python3-requests all 2.27.1+dfsg-1 [71.9 kB]
Get:162 http://172.17.4.1/private bookworm-staging/main armhf python3-snowballstemmer all 2.2.0-1 [58.5 kB]
Get:163 http://172.17.4.1/private bookworm-staging/main armhf sphinx-common all 4.5.0-3 [638 kB]
Get:164 http://172.17.4.1/private bookworm-staging/main armhf python3-sphinx all 4.5.0-3 [540 kB]
Get:165 http://172.17.4.1/private bookworm-staging/main armhf sphinx-rtd-theme-common all 1.0.0+dfsg-1 [996 kB]
Get:166 http://172.17.4.1/private bookworm-staging/main armhf python3-sphinx-rtd-theme all 1.0.0+dfsg-1 [26.5 kB]
Get:94 http://172.17.4.1/private bookworm-staging/main armhf freetds-dev armhf 1.3.6-1.1 [242 kB]
debconf: delaying package configuration, since apt-utils is not installed
Fetched 66.5 MB in 6s (11.0 MB/s)
Selecting previously unselected package liblocale-gettext-perl.
(Reading database ... 12621 files and directories currently installed.)
Preparing to unpack .../liblocale-gettext-perl_1.07-4+b2_armhf.deb ...
Unpacking liblocale-gettext-perl (1.07-4+b2) ...
Selecting previously unselected package fonts-lato.
Preparing to unpack .../fonts-lato_2.0-2.1_all.deb ...
Unpacking fonts-lato (2.0-2.1) ...
Selecting previously unselected package libsigsegv2:armhf.
Preparing to unpack .../libsigsegv2_2.14-1_armhf.deb ...
Unpacking libsigsegv2:armhf (2.14-1) ...
Setting up libsigsegv2:armhf (2.14-1) ...
Selecting previously unselected package gawk.
(Reading database ... 12671 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 libssl3:armhf.
Preparing to unpack .../libssl3_3.0.3-7_armhf.deb ...
Unpacking libssl3:armhf (3.0.3-7) ...
Selecting previously unselected package libpython3.10-minimal:armhf.
Preparing to unpack .../libpython3.10-minimal_3.10.5-1+b1_armhf.deb ...
Unpacking libpython3.10-minimal:armhf (3.10.5-1+b1) ...
Selecting previously unselected package libexpat1:armhf.
Preparing to unpack .../libexpat1_2.4.8-1_armhf.deb ...
Unpacking libexpat1:armhf (2.4.8-1) ...
Preparing to unpack .../zlib1g_1%3a1.2.11.dfsg-4+b2_armhf.deb ...
Unpacking zlib1g:armhf (1:1.2.11.dfsg-4+b2) over (1:1.2.11.dfsg-4) ...
Setting up zlib1g:armhf (1:1.2.11.dfsg-4+b2) ...
Selecting previously unselected package python3.10-minimal.
(Reading database ... 13154 files and directories currently installed.)
Preparing to unpack .../python3.10-minimal_3.10.5-1+b1_armhf.deb ...
Unpacking python3.10-minimal (3.10.5-1+b1) ...
Setting up libssl3:armhf (3.0.3-7) ...
Setting up libpython3.10-minimal:armhf (3.10.5-1+b1) ...
Setting up libexpat1:armhf (2.4.8-1) ...
Setting up python3.10-minimal (3.10.5-1+b1) ...
Selecting previously unselected package python3-minimal.
(Reading database ... 13164 files and directories currently installed.)
Preparing to unpack .../0-python3-minimal_3.10.4-1+b1_armhf.deb ...
Unpacking python3-minimal (3.10.4-1+b1) ...
Selecting previously unselected package media-types.
Preparing to unpack .../1-media-types_8.0.0_all.deb ...
Unpacking media-types (8.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.10-stdlib:armhf.
Preparing to unpack .../3-libpython3.10-stdlib_3.10.5-1+b1_armhf.deb ...
Unpacking libpython3.10-stdlib:armhf (3.10.5-1+b1) ...
Selecting previously unselected package python3.10.
Preparing to unpack .../4-python3.10_3.10.5-1+b1_armhf.deb ...
Unpacking python3.10 (3.10.5-1+b1) ...
Selecting previously unselected package libpython3-stdlib:armhf.
Preparing to unpack .../5-libpython3-stdlib_3.10.4-1+b1_armhf.deb ...
Unpacking libpython3-stdlib:armhf (3.10.4-1+b1) ...
Setting up python3-minimal (3.10.4-1+b1) ...
Selecting previously unselected package python3.
(Reading database ... 13569 files and directories currently installed.)
Preparing to unpack .../000-python3_3.10.4-1+b1_armhf.deb ...
Unpacking python3 (3.10.4-1+b1) ...
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 libuchardet0:armhf.
Preparing to unpack .../002-libuchardet0_0.0.7-1_armhf.deb ...
Unpacking libuchardet0:armhf (0.0.7-1) ...
Selecting previously unselected package groff-base.
Preparing to unpack .../003-groff-base_1.22.4-8_armhf.deb ...
Unpacking groff-base (1.22.4-8) ...
Selecting previously unselected package bsdextrautils.
Preparing to unpack .../004-bsdextrautils_2.38-4_armhf.deb ...
Unpacking bsdextrautils (2.38-4) ...
Selecting previously unselected package libpipeline1:armhf.
Preparing to unpack .../005-libpipeline1_1.5.6-1_armhf.deb ...
Unpacking libpipeline1:armhf (1.5.6-1) ...
Selecting previously unselected package man-db.
Preparing to unpack .../006-man-db_2.10.2-1_armhf.deb ...
Unpacking man-db (2.10.2-1) ...
Selecting previously unselected package openssl.
Preparing to unpack .../007-openssl_3.0.3-7_armhf.deb ...
Unpacking openssl (3.0.3-7) ...
Selecting previously unselected package ca-certificates.
Preparing to unpack .../008-ca-certificates_20211016_all.deb ...
Unpacking ca-certificates (20211016) ...
Selecting previously unselected package libmagic-mgc.
Preparing to unpack .../009-libmagic-mgc_1%3a5.41-4_armhf.deb ...
Unpacking libmagic-mgc (1:5.41-4) ...
Selecting previously unselected package libmagic1:armhf.
Preparing to unpack .../010-libmagic1_1%3a5.41-4_armhf.deb ...
Unpacking libmagic1:armhf (1:5.41-4) ...
Selecting previously unselected package file.
Preparing to unpack .../011-file_1%3a5.41-4_armhf.deb ...
Unpacking file (1:5.41-4) ...
Selecting previously unselected package gettext-base.
Preparing to unpack .../012-gettext-base_0.21-6_armhf.deb ...
Unpacking gettext-base (0.21-6) ...
Selecting previously unselected package m4.
Preparing to unpack .../013-m4_1.4.18-5_armhf.deb ...
Unpacking m4 (1.4.18-5) ...
Selecting previously unselected package autoconf.
Preparing to unpack .../014-autoconf_2.71-2_all.deb ...
Unpacking autoconf (2.71-2) ...
Selecting previously unselected package autotools-dev.
Preparing to unpack .../015-autotools-dev_20220109.1_all.deb ...
Unpacking autotools-dev (20220109.1) ...
Selecting previously unselected package automake.
Preparing to unpack .../016-automake_1%3a1.16.5-1.3_all.deb ...
Unpacking automake (1:1.16.5-1.3) ...
Selecting previously unselected package autopoint.
Preparing to unpack .../017-autopoint_0.21-6_all.deb ...
Unpacking autopoint (0.21-6) ...
Selecting previously unselected package sbcl.
Preparing to unpack .../018-sbcl_2%3a2.2.3-1_armhf.deb ...
Unpacking sbcl (2:2.2.3-1) ...
Selecting previously unselected package buildapp.
Preparing to unpack .../019-buildapp_1.5.6-3_armhf.deb ...
Unpacking buildapp (1.5.6-3) ...
Selecting previously unselected package cl-alexandria.
Preparing to unpack .../020-cl-alexandria_20211025.gita67c3a6-1_all.deb ...
Unpacking cl-alexandria (20211025.gita67c3a6-1) ...
Selecting previously unselected package cl-esrap.
Preparing to unpack .../021-cl-esrap_20211008.gitc99c33a-1_all.deb ...
Unpacking cl-esrap (20211008.gitc99c33a-1) ...
Selecting previously unselected package cl-ppcre.
Preparing to unpack .../022-cl-ppcre_20220126.gitb4056c5-1_all.deb ...
Unpacking cl-ppcre (20220126.gitb4056c5-1) ...
Selecting previously unselected package cl-abnf.
Preparing to unpack .../023-cl-abnf_20200229.gitba1fbb1-1_all.deb ...
Unpacking cl-abnf (20200229.gitba1fbb1-1) ...
Selecting previously unselected package cl-anaphora.
Preparing to unpack .../024-cl-anaphora_20210111.gitab5f07e-1_all.deb ...
Unpacking cl-anaphora (20210111.gitab5f07e-1) ...
Selecting previously unselected package cl-asdf.
Preparing to unpack .../025-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 .../026-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 .../027-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 .../028-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 .../029-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 .../030-cl-babel_20200719.gitf892d05-2_all.deb ...
Unpacking cl-babel (20200719.gitf892d05-2) ...
Selecting previously unselected package cl-rt.
Preparing to unpack .../031-cl-rt_20090812.gita6a7503-1_all.deb ...
Unpacking cl-rt (20090812.gita6a7503-1) ...
Selecting previously unselected package cl-kmrcl.
Preparing to unpack .../032-cl-kmrcl_1.111-2_all.deb ...
Unpacking cl-kmrcl (1.111-2) ...
Selecting previously unselected package cl-base64.
Preparing to unpack .../033-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 .../034-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 .../035-libglib2.0-0_2.72.2-2_armhf.deb ...
Unpacking libglib2.0-0:armhf (2.72.2-2) ...
Selecting previously unselected package pkg-config.
Preparing to unpack .../036-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 .../037-libffi-dev_3.4.2-4_armhf.deb ...
Unpacking libffi-dev:armhf (3.4.2-4) ...
Selecting previously unselected package zlib1g-dev:armhf.
Preparing to unpack .../038-zlib1g-dev_1%3a1.2.11.dfsg-4+b2_armhf.deb ...
Unpacking zlib1g-dev:armhf (1:1.2.11.dfsg-4+b2) ...
Selecting previously unselected package cl-cffi.
Preparing to unpack .../039-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 .../040-cl-chipz_20220213.git82a17d3-1_all.deb ...
Unpacking cl-chipz (20220213.git82a17d3-1) ...
Selecting previously unselected package cl-chunga.
Preparing to unpack .../041-cl-chunga_20220222.git7836609-1_all.deb ...
Unpacking cl-chunga (20220222.git7836609-1) ...
Selecting previously unselected package cl-closer-mop.
Preparing to unpack .../042-cl-closer-mop_2%3a20220227.giteabdf6a-1_all.deb ...
Unpacking cl-closer-mop (2:20220227.giteabdf6a-1) ...
Selecting previously unselected package cl-closure-common.
Preparing to unpack .../043-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 .../044-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 .../045-cl-metatilities-base_20170403-1.1_all.deb ...
Unpacking cl-metatilities-base (20170403-1.1) ...
Selecting previously unselected package cl-containers.
Preparing to unpack .../046-cl-containers_20170403-1.1_all.deb ...
Unpacking cl-containers (20170403-1.1) ...
Selecting previously unselected package cl-iterate.
Preparing to unpack .../047-cl-iterate_20210519.gitb0f9a9c-1_all.deb ...
Unpacking cl-iterate (20210519.gitb0f9a9c-1) ...
Selecting previously unselected package cl-flexi-streams.
Preparing to unpack .../048-cl-flexi-streams_20210728.git41af5dc-1_all.deb ...
Unpacking cl-flexi-streams (20210728.git41af5dc-1) ...
Selecting previously unselected package cl-unicode.
Preparing to unpack .../049-cl-unicode_20201101.git54bdf2c-1_all.deb ...
Unpacking cl-unicode (20201101.git54bdf2c-1) ...
Selecting previously unselected package cl-named-readtables.
Preparing to unpack .../050-cl-named-readtables_20201221.gitc5689a4-1_all.deb ...
Unpacking cl-named-readtables (20201221.gitc5689a4-1) ...
Selecting previously unselected package cl-interpol.
Preparing to unpack .../051-cl-interpol_20201106.git70a1137-1_all.deb ...
Unpacking cl-interpol (20201106.git70a1137-1) ...
Selecting previously unselected package cl-csv.
Preparing to unpack .../052-cl-csv_20200929.git68ecb5d-1_all.deb ...
Unpacking cl-csv (20200929.git68ecb5d-1) ...
Selecting previously unselected package cl-cxml.
Preparing to unpack .../053-cl-cxml_20110619-2.1_all.deb ...
Unpacking cl-cxml (20110619-2.1) ...
Selecting previously unselected package cl-db3.
Preparing to unpack .../054-cl-db3_20200212-1_all.deb ...
Unpacking cl-db3 (20200212-1) ...
Selecting previously unselected package cl-puri.
Preparing to unpack .../055-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 .../056-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 .../057-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 .../058-cl-trivial-garbage_20211229.gitb3af9c0-1_all.deb ...
Unpacking cl-trivial-garbage (20211229.gitb3af9c0-1) ...
Selecting previously unselected package cl-plus-ssl.
Preparing to unpack .../059-cl-plus-ssl_20220328.git8b91648-4_all.deb ...
Unpacking cl-plus-ssl (20220328.git8b91648-4) ...
Selecting previously unselected package cl-drakma.
Preparing to unpack .../060-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 .../061-cl-dynamic-classes_20130128-2.1_all.deb ...
Unpacking cl-dynamic-classes (20130128-2.1) ...
Selecting previously unselected package cl-fad.
Preparing to unpack .../062-cl-fad_20220110.git3f4d32d-1_all.deb ...
Unpacking cl-fad (20220110.git3f4d32d-1) ...
Selecting previously unselected package cl-garbage-pools.
Preparing to unpack .../063-cl-garbage-pools_20130720-1.1_all.deb ...
Unpacking cl-garbage-pools (20130720-1.1) ...
Selecting previously unselected package cl-global-vars.
Preparing to unpack .../064-cl-global-vars_0~20141013.gitc749f32-2_all.deb ...
Unpacking cl-global-vars (0~20141013.gitc749f32-2) ...
Selecting previously unselected package cl-ieee-floats.
Preparing to unpack .../065-cl-ieee-floats_20170830-1.1_all.deb ...
Unpacking cl-ieee-floats (20170830-1.1) ...
Selecting previously unselected package cl-ironclad.
Preparing to unpack .../066-cl-ironclad_0.57-1_all.deb ...
Unpacking cl-ironclad (0.57-1) ...
Selecting previously unselected package cl-ixf.
Preparing to unpack .../067-cl-ixf_20180228-1.1_all.deb ...
Unpacking cl-ixf (20180228-1.1) ...
Selecting previously unselected package cl-local-time.
Preparing to unpack .../068-cl-local-time_20180228-1.1_all.deb ...
Unpacking cl-local-time (20180228-1.1) ...
Selecting previously unselected package cl-log.
Preparing to unpack .../069-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 .../070-cl-lparallel_20160825-1.1_all.deb ...
Unpacking cl-lparallel (20160825-1.1) ...
Selecting previously unselected package cl-metabang-bind.
Preparing to unpack .../071-cl-metabang-bind_20200101.git9ab6e64-1_all.deb ...
Unpacking cl-metabang-bind (20200101.git9ab6e64-1) ...
Selecting previously unselected package cl-markdown.
Preparing to unpack .../072-cl-markdown_20101006-2.1_all.deb ...
Unpacking cl-markdown (20101006-2.1) ...
Selecting previously unselected package cl-md5.
Preparing to unpack .../073-cl-md5_1%3a20210622.git906593f-1_all.deb ...
Unpacking cl-md5 (1:20210622.git906593f-1) ...
Selecting previously unselected package freetds-common.
Preparing to unpack .../074-freetds-common_1.3.6-1.1_all.deb ...
Unpacking freetds-common (1.3.6-1.1) ...
Selecting previously unselected package libct4:armhf.
Preparing to unpack .../075-libct4_1.3.6-1.1_armhf.deb ...
Unpacking libct4:armhf (1.3.6-1.1) ...
Selecting previously unselected package libsybdb5:armhf.
Preparing to unpack .../076-libsybdb5_1.3.6-1.1_armhf.deb ...
Unpacking libsybdb5:armhf (1.3.6-1.1) ...
Selecting previously unselected package freetds-dev.
Preparing to unpack .../077-freetds-dev_1.3.6-1.1_armhf.deb ...
Unpacking freetds-dev (1.3.6-1.1) ...
Selecting previously unselected package cl-mssql.
Preparing to unpack .../078-cl-mssql_20180228-1.1_all.deb ...
Unpacking cl-mssql (20180228-1.1) ...
Selecting previously unselected package cl-mustache.
Preparing to unpack .../079-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 .../080-cl-parse-number_1.7-1.1_all.deb ...
Unpacking cl-parse-number (1.7-1.1) ...
Selecting previously unselected package cl-uax-15.
Preparing to unpack .../081-cl-uax-15_0~20211021.git75c8a87-3_all.deb ...
Unpacking cl-uax-15 (0~20211021.git75c8a87-3) ...
Selecting previously unselected package cl-postgres.
Preparing to unpack .../082-cl-postgres_20211113.git9d4332f-1_all.deb ...
Unpacking cl-postgres (20211113.git9d4332f-1) ...
Selecting previously unselected package cl-s-sql.
Preparing to unpack .../083-cl-s-sql_20211113.git9d4332f-1_all.deb ...
Unpacking cl-s-sql (20211113.git9d4332f-1) ...
Selecting previously unselected package cl-postmodern.
Preparing to unpack .../084-cl-postmodern_20211113.git9d4332f-1_all.deb ...
Unpacking cl-postmodern (20211113.git9d4332f-1) ...
Selecting previously unselected package cl-py-configparser.
Preparing to unpack .../085-cl-py-configparser_20170830-1.1_all.deb ...
Unpacking cl-py-configparser (20170830-1.1) ...
Selecting previously unselected package cl-qmynd.
Preparing to unpack .../086-cl-qmynd_20180131-1.1_all.deb ...
Unpacking cl-qmynd (20180131-1.1) ...
Selecting previously unselected package cl-quri.
Preparing to unpack .../087-cl-quri_20150804-1.1_all.deb ...
Unpacking cl-quri (20150804-1.1) ...
Selecting previously unselected package cl-simple-date.
Preparing to unpack .../088-cl-simple-date_20211113.git9d4332f-1_all.deb ...
Unpacking cl-simple-date (20211113.git9d4332f-1) ...
Selecting previously unselected package cl-sqlite.
Preparing to unpack .../089-cl-sqlite_20130615-2.1_all.deb ...
Unpacking cl-sqlite (20130615-2.1) ...
Selecting previously unselected package cl-trivial-backtrace.
Preparing to unpack .../090-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 .../091-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 .../092-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 .../093-cl-uuid_20130813-1.1_all.deb ...
Unpacking cl-uuid (20130813-1.1) ...
Selecting previously unselected package cl-yason.
Preparing to unpack .../094-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 .../095-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 .../096-libdebhelper-perl_13.7.1_all.deb ...
Unpacking libdebhelper-perl (13.7.1) ...
Selecting previously unselected package libtool.
Preparing to unpack .../097-libtool_2.4.7-4_all.deb ...
Unpacking libtool (2.4.7-4) ...
Selecting previously unselected package dh-autoreconf.
Preparing to unpack .../098-dh-autoreconf_20_all.deb ...
Unpacking dh-autoreconf (20) ...
Selecting previously unselected package libarchive-zip-perl.
Preparing to unpack .../099-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 .../100-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 .../101-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 .../102-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 .../103-libelf1_0.187-1_armhf.deb ...
Unpacking libelf1:armhf (0.187-1) ...
Selecting previously unselected package dwz.
Preparing to unpack .../104-dwz_0.14-1_armhf.deb ...
Unpacking dwz (0.14-1) ...
Selecting previously unselected package libicu71:armhf.
Preparing to unpack .../105-libicu71_71.1-3_armhf.deb ...
Unpacking libicu71:armhf (71.1-3) ...
Selecting previously unselected package libxml2:armhf.
Preparing to unpack .../106-libxml2_2.9.14+dfsg-1_armhf.deb ...
Unpacking libxml2:armhf (2.9.14+dfsg-1) ...
Selecting previously unselected package gettext.
Preparing to unpack .../107-gettext_0.21-6_armhf.deb ...
Unpacking gettext (0.21-6) ...
Selecting previously unselected package intltool-debian.
Preparing to unpack .../108-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 .../109-po-debconf_1.0.21+nmu1_all.deb ...
Unpacking po-debconf (1.0.21+nmu1) ...
Selecting previously unselected package debhelper.
Preparing to unpack .../110-debhelper_13.7.1_all.deb ...
Unpacking debhelper (13.7.1) ...
Selecting previously unselected package xml-core.
Preparing to unpack .../111-xml-core_0.18+nmu1_all.deb ...
Unpacking xml-core (0.18+nmu1) ...
Selecting previously unselected package docutils-common.
Preparing to unpack .../112-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 .../113-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 .../114-help2man_1.49.2_armhf.deb ...
Unpacking help2man (1.49.2) ...
Selecting previously unselected package libjs-jquery.
Preparing to unpack .../115-libjs-jquery_3.6.0+dfsg+~3.5.13-1_all.deb ...
Unpacking libjs-jquery (3.6.0+dfsg+~3.5.13-1) ...
Selecting previously unselected package libjs-underscore.
Preparing to unpack .../116-libjs-underscore_1.13.3~dfsg+~1.11.4-1_all.deb ...
Unpacking libjs-underscore (1.13.3~dfsg+~1.11.4-1) ...
Selecting previously unselected package libjs-sphinxdoc.
Preparing to unpack .../117-libjs-sphinxdoc_4.5.0-3_all.deb ...
Unpacking libjs-sphinxdoc (4.5.0-3) ...
Selecting previously unselected package libunicode-string-perl.
Preparing to unpack .../118-libunicode-string-perl_2.10-1+b6_armhf.deb ...
Unpacking libunicode-string-perl (2.10-1+b6) ...
Selecting previously unselected package libunicode-escape-perl.
Preparing to unpack .../119-libunicode-escape-perl_0.0.2-4.1_all.deb ...
Unpacking libunicode-escape-perl (0.0.2-4.1) ...
Selecting previously unselected package python-babel-localedata.
Preparing to unpack .../120-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 .../121-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 .../122-python3-pkg-resources_59.6.0-1.2_all.deb ...
Unpacking python3-pkg-resources (59.6.0-1.2) ...
Selecting previously unselected package python3-tz.
Preparing to unpack .../123-python3-tz_2022.1-1_all.deb ...
Unpacking python3-tz (2022.1-1) ...
Selecting previously unselected package python3-babel.
Preparing to unpack .../124-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 .../125-python3-certifi_2020.6.20-1_all.deb ...
Unpacking python3-certifi (2020.6.20-1) ...
Selecting previously unselected package python3-chardet.
Preparing to unpack .../126-python3-chardet_4.0.0-2_all.deb ...
Unpacking python3-chardet (4.0.0-2) ...
Selecting previously unselected package python3-charset-normalizer.
Preparing to unpack .../127-python3-charset-normalizer_2.0.6-2_all.deb ...
Unpacking python3-charset-normalizer (2.0.6-2) ...
Selecting previously unselected package python3-lib2to3.
Preparing to unpack .../128-python3-lib2to3_3.9.12-1_all.deb ...
Unpacking python3-lib2to3 (3.9.12-1) ...
Selecting previously unselected package python3-distutils.
Preparing to unpack .../129-python3-distutils_3.9.12-1_all.deb ...
Unpacking python3-distutils (3.9.12-1) ...
Selecting previously unselected package python3-roman.
Preparing to unpack .../130-python3-roman_3.3-1_all.deb ...
Unpacking python3-roman (3.3-1) ...
Selecting previously unselected package python3-docutils.
Preparing to unpack .../131-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 .../132-python3-idna_3.3-1_all.deb ...
Unpacking python3-idna (3.3-1) ...
Selecting previously unselected package python3-imagesize.
Preparing to unpack .../133-python3-imagesize_1.3.0-1_all.deb ...
Unpacking python3-imagesize (1.3.0-1) ...
Selecting previously unselected package python3-more-itertools.
Preparing to unpack .../134-python3-more-itertools_8.10.0-2_all.deb ...
Unpacking python3-more-itertools (8.10.0-2) ...
Selecting previously unselected package python3-zipp.
Preparing to unpack .../135-python3-zipp_1.0.0-4_all.deb ...
Unpacking python3-zipp (1.0.0-4) ...
Selecting previously unselected package python3-importlib-metadata.
Preparing to unpack .../136-python3-importlib-metadata_4.6.4-1_all.deb ...
Unpacking python3-importlib-metadata (4.6.4-1) ...
Selecting previously unselected package python3-markupsafe.
Preparing to unpack .../137-python3-markupsafe_2.0.1-2+b1_armhf.deb ...
Unpacking python3-markupsafe (2.0.1-2+b1) ...
Selecting previously unselected package python3-jinja2.
Preparing to unpack .../138-python3-jinja2_3.0.3-1_all.deb ...
Unpacking python3-jinja2 (3.0.3-1) ...
Selecting previously unselected package python3-pyparsing.
Preparing to unpack .../139-python3-pyparsing_3.0.7-2_all.deb ...
Unpacking python3-pyparsing (3.0.7-2) ...
Selecting previously unselected package python3-packaging.
Preparing to unpack .../140-python3-packaging_21.3-1_all.deb ...
Unpacking python3-packaging (21.3-1) ...
Selecting previously unselected package python3-pygments.
Preparing to unpack .../141-python3-pygments_2.11.2+dfsg-2_all.deb ...
Unpacking python3-pygments (2.11.2+dfsg-2) ...
Selecting previously unselected package python3-six.
Preparing to unpack .../142-python3-six_1.16.0-3_all.deb ...
Unpacking python3-six (1.16.0-3) ...
Selecting previously unselected package python3-urllib3.
Preparing to unpack .../143-python3-urllib3_1.26.9-1_all.deb ...
Unpacking python3-urllib3 (1.26.9-1) ...
Selecting previously unselected package python3-requests.
Preparing to unpack .../144-python3-requests_2.27.1+dfsg-1_all.deb ...
Unpacking python3-requests (2.27.1+dfsg-1) ...
Selecting previously unselected package python3-snowballstemmer.
Preparing to unpack .../145-python3-snowballstemmer_2.2.0-1_all.deb ...
Unpacking python3-snowballstemmer (2.2.0-1) ...
Selecting previously unselected package sphinx-common.
Preparing to unpack .../146-sphinx-common_4.5.0-3_all.deb ...
Unpacking sphinx-common (4.5.0-3) ...
Selecting previously unselected package python3-sphinx.
Preparing to unpack .../147-python3-sphinx_4.5.0-3_all.deb ...
Unpacking python3-sphinx (4.5.0-3) ...
Selecting previously unselected package sphinx-rtd-theme-common.
Preparing to unpack .../148-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 .../149-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 .../150-sbuild-build-depends-pgloader-dummy_0.invalid.0_armhf.deb ...
Unpacking sbuild-build-depends-pgloader-dummy (0.invalid.0) ...
Setting up media-types (8.0.0) ...
Setting up libpipeline1:armhf (1.5.6-1) ...
Setting up libunicode-string-perl (2.10-1+b6) ...
Setting up libicu71:armhf (71.1-3) ...
Setting up cl-trivial-utf-8 (20111001-1.1) ...
Setting up libunicode-escape-perl (0.0.2-4.1) ...
Setting up fonts-lato (2.0-2.1) ...
Setting up cl-trivial-garbage (20211229.gitb3af9c0-1) ...
Setting up cl-garbage-pools (20130720-1.1) ...
Setting up bsdextrautils (2.38-4) ...
Setting up cl-closer-mop (2:20220227.giteabdf6a-1) ...
Setting up libmagic-mgc (1:5.41-4) ...
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.72.2-2) ...
No schema files found: doing nothing.
Setting up cl-parse-number (1.7-1.1) ...
Setting up libdebhelper-perl (13.7.1) ...
Setting up cl-log (1.0.1-1.1) ...
Setting up cl-puri (1:1.5.7.2-1) ...
Setting up cl-simple-date (20211113.git9d4332f-1) ...
Setting up cl-quri (20150804-1.1) ...
Setting up libmagic1:armhf (1:5.41-4) ...
Setting up gettext-base (0.21-6) ...
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-4) ...
Setting up libffi-dev:armhf (3.4.2-4) ...
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 cl-cxml (20110619-2.1) ...
Setting up cl-asdf-finalizers (20170403-1.1) ...
Setting up autotools-dev (20220109.1) ...
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-6) ...
Setting up pkg-config (0.29.2-1) ...
Setting up cl-global-vars (0~20141013.gitc749f32-2) ...
Setting up autoconf (2.71-2) ...
Setting up cl-chipz (20220213.git82a17d3-1) ...
Setting up sbcl (2:2.2.3-1) ...
Setting up zlib1g-dev:armhf (1:1.2.11.dfsg-4+b2) ...
Setting up cl-chunga (20220222.git7836609-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.3.6-1.1) ...
Setting up libjs-jquery (3.6.0+dfsg+~3.5.13-1) ...
Setting up cl-py-configparser (20170830-1.1) ...
Setting up cl-ppcre (20220126.gitb4056c5-1) ...
Setting up cl-anaphora (20210111.gitab5f07e-1) ...
Setting up openssl (3.0.3-7) ...
Setting up cl-ieee-floats (20170830-1.1) ...
Setting up libelf1:armhf (0.187-1) ...
Setting up libxml2:armhf (2.9.14+dfsg-1) ...
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 liblocale-gettext-perl (1.07-4+b2) ...
Setting up libjs-underscore (1.13.3~dfsg+~1.11.4-1) ...
Setting up buildapp (1.5.6-3) ...
Setting up automake (1:1.16.5-1.3) ...
update-alternatives: using /usr/bin/automake-1.16 to provide /usr/bin/automake (automake) in auto mode
Setting up libfile-stripnondeterminism-perl (1.13.0-1) ...
Setting up cl-containers (20170403-1.1) ...
Setting up gettext (0.21-6) ...
Setting up cl-flexi-streams (20210728.git41af5dc-1) ...
Setting up cl-uax-15 (0~20211021.git75c8a87-3) ...
Setting up libtool (2.4.7-4) ...
Setting up cl-ixf (20180228-1.1) ...
Setting up libsybdb5:armhf (1.3.6-1.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 help2man (1.49.2) ...
Setting up libpython3.10-stdlib:armhf (3.10.5-1+b1) ...
Setting up dh-autoreconf (20) ...
Setting up ca-certificates (20211016) ...
Updating certificates in /etc/ssl/certs...
127 added, 0 removed; done.
Setting up libct4:armhf (1.3.6-1.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.5.0-3) ...
Setting up cl-md5 (1:20210622.git906593f-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-8) ...
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 libpython3-stdlib:armhf (3.10.4-1+b1) ...
Setting up cl-base64 (3.4.0-1) ...
Setting up cl-ironclad (0.57-1) ...
Setting up python3.10 (3.10.5-1+b1) ...
Setting up cl-interpol (20201106.git70a1137-1) ...
Setting up freetds-dev (1.3.6-1.1) ...
Setting up cl-fad (20220110.git3f4d32d-1) ...
Setting up po-debconf (1.0.21+nmu1) ...
Setting up cl-csv (20200929.git68ecb5d-1) ...
Setting up python3 (3.10.4-1+b1) ...
Setting up man-db (2.10.2-1) ...
Not building database; man-db/auto-update is not 'true'.
Setting up python3-markupsafe (2.0.1-2+b1) ...
Setting up python3-tz (2022.1-1) ...
Setting up cl-mssql (20180228-1.1) ...
Setting up python3-six (1.16.0-3) ...
Setting up python3-roman (3.3-1) ...
Setting up cl-qmynd (20180131-1.1) ...
Setting up cl-plus-ssl (20220328.git8b91648-4) ...
Setting up python3-pyparsing (3.0.7-2) ...
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.5.0-3) ...
Setting up python3-idna (3.3-1) ...
Setting up cl-postgres (20211113.git9d4332f-1) ...
Setting up cl-drakma (2.0.8-1) ...
Setting up python3-urllib3 (1.26.9-1) ...
Setting up cl-uuid (20130813-1.1) ...
Setting up python3-lib2to3 (3.9.12-1) ...
Setting up python3-imagesize (1.3.0-1) ...
Setting up python3-pkg-resources (59.6.0-1.2) ...
Setting up python3-distutils (3.9.12-1) ...
Setting up python3-more-itertools (8.10.0-2) ...
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-charset-normalizer (2.0.6-2) ...
Setting up python3-alabaster (0.7.12-1) ...
Setting up debhelper (13.7.1) ...
Setting up cl-zs3 (1.3.1-1.1) ...
Setting up python3-zipp (1.0.0-4) ...
Setting up python3-jinja2 (3.0.3-1) ...
Setting up python3-pygments (2.11.2+dfsg-2) ...
Setting up python3-packaging (21.3-1) ...
Setting up python3-chardet (4.0.0-2) ...
Setting up cl-s-sql (20211113.git9d4332f-1) ...
Setting up python3-requests (2.27.1+dfsg-1) ...
Setting up cl-postmodern (20211113.git9d4332f-1) ...
Setting up python3-importlib-metadata (4.6.4-1) ...
Processing triggers for libc-bin (2.33-7+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.5.0-3) ...
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 (20211016) ...
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.9.0-0.bpo.4-armmp armhf (armv7l)
Toolchain package versions: binutils_2.38-3+rpi1 dpkg-dev_1.21.7+rpi1 g++-11_11.2.0-20+rpi1 gcc-11_11.2.0-20+rpi1 libc6-dev_2.33-7+rpi1 libstdc++-11-dev_11.2.0-20+rpi1 libstdc++6_12-20220319-1+rpi1 linux-libc-dev_5.16.18-1+rpi1
Package versions: adduser_3.121 apt_2.4.5 autoconf_2.71-2 automake_1:1.16.5-1.3 autopoint_0.21-6 autotools-dev_20220109.1 base-files_12.2+rpi1 base-passwd_3.5.52 bash_5.1-6 binutils_2.38-3+rpi1 binutils-arm-linux-gnueabihf_2.38-3+rpi1 binutils-common_2.38-3+rpi1 bsdextrautils_2.38-4 bsdutils_1:2.38-4 build-essential_12.9 buildapp_1.5.6-3 bzip2_1.0.8-5 ca-certificates_20211016 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_20220213.git82a17d3-1 cl-chunga_20220222.git7836609-1 cl-closer-mop_2:20220227.giteabdf6a-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_20220110.git3f4d32d-1 cl-flexi-streams_20210728.git41af5dc-1 cl-garbage-pools_20130720-1.1 cl-global-vars_0~20141013.gitc749f32-2 cl-ieee-floats_20170830-1.1 cl-interpol_20201106.git70a1137-1 cl-ironclad_0.57-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:20210622.git906593f-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_20220328.git8b91648-4 cl-postgres_20211113.git9d4332f-1 cl-postmodern_20211113.git9d4332f-1 cl-ppcre_20220126.gitb4056c5-1 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_20211113.git9d4332f-1 cl-simple-date_20211113.git9d4332f-1 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_20211229.gitb3af9c0-1 cl-trivial-gray-streams_20210117.git2b3823e-1 cl-trivial-utf-8_20111001-1.1 cl-uax-15_0~20211021.git75c8a87-3 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-20+rpi1 dash_0.5.11+git20210903+057cd650a4ed-8 debconf_1.5.79 debhelper_13.7.1 debianutils_5.7-0.1 dh-autoreconf_20 dh-strip-nondeterminism_1.13.0-1 diffutils_1:3.7-5 dirmngr_2.2.27-3+b1 docutils-common_0.17.1+dfsg-2 dpkg_1.21.7+rpi1 dpkg-dev_1.21.7+rpi1 dwz_0.14-1 e2fsprogs_1.46.5-2 fakeroot_1.28-1 file_1:5.41-4 findutils_4.9.0-2 fonts-font-awesome_5.0.10+really4.7.0~dfsg-4.1 fonts-lato_2.0-2.1 freetds-common_1.3.6-1.1 freetds-dev_1.3.6-1.1 g++_4:11.2.0-2+rpi1 g++-11_11.2.0-20+rpi1 gawk_1:5.1.0-1 gcc_4:11.2.0-2+rpi1 gcc-11_11.2.0-20+rpi1 gcc-11-base_11.2.0-20+rpi1 gcc-12-base_12-20220319-1+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-6 gettext-base_0.21-6 gnupg_2.2.27-3 gnupg-l10n_2.2.27-3 gnupg-utils_2.2.27-3+b1 gpg_2.2.27-3+b1 gpg-agent_2.2.27-3+b1 gpg-wks-client_2.2.27-3+b1 gpg-wks-server_2.2.27-3+b1 gpgconf_2.2.27-3+b1 gpgsm_2.2.27-3+b1 gpgv_2.2.27-3+b1 grep_3.7-1 groff-base_1.22.4-8 gzip_1.12-1 help2man_1.49.2 hostname_3.23 init-system-helpers_1.62 intltool-debian_0.35.0+20060710.5 libacl1_2.3.1-1 libapt-pkg6.0_2.4.5 libarchive-zip-perl_1.68-1 libasan6_11.2.0-20+rpi1 libassuan0_2.5.5-1 libatomic1_12-20220319-1+rpi1 libattr1_1:2.5.1-1 libaudit-common_1:3.0.7-1 libaudit1_1:3.0.7-1+b1 libbinutils_2.38-3+rpi1 libblkid1_2.38-4 libbz2-1.0_1.0.8-5 libc-bin_2.33-7+rpi1 libc-dev-bin_2.33-7+rpi1 libc6_2.33-7+rpi1 libc6-dev_2.33-7+rpi1 libcap-ng0_0.7.9-2.2+b2 libcap2_1:2.44-1 libcc1-0_12-20220319-1+rpi1 libcom-err2_1.46.5-2 libcrypt-dev_1:4.4.27-1.1 libcrypt1_1:4.4.27-1.1 libct4_1.3.6-1.1 libctf-nobfd0_2.38-3+rpi1 libctf0_2.38-3+rpi1 libdb5.3_5.3.28+dfsg1-0.8 libdebconfclient0_0.262 libdebhelper-perl_13.7.1 libdpkg-perl_1.21.7+rpi1 libelf1_0.187-1 libexpat1_2.4.8-1 libext2fs2_1.46.5-2 libfakeroot_1.28-1 libffi-dev_3.4.2-4 libffi8_3.4.2-4 libfile-stripnondeterminism-perl_1.13.0-1 libgcc-11-dev_11.2.0-20+rpi1 libgcc-s1_12-20220319-1+rpi1 libgcrypt20_1.10.1-2 libgdbm-compat4_1.23-1 libgdbm6_1.23-1 libglib2.0-0_2.72.2-2 libgmp10_2:6.2.1+dfsg-3 libgnutls30_3.7.4-2 libgomp1_12-20220319-1+rpi1 libgpg-error0_1.43-3 libgssapi-krb5-2_1.19.2-2+b2 libhogweed6_3.7.3-1 libicu71_71.1-3 libidn2-0_2.3.2-2 libisl23_0.24-2 libjs-jquery_3.6.0+dfsg+~3.5.13-1 libjs-sphinxdoc_4.5.0-3 libjs-underscore_1.13.3~dfsg+~1.11.4-1 libk5crypto3_1.19.2-2+b2 libkeyutils1_1.6.1-3+rpi1 libkrb5-3_1.19.2-2+b2 libkrb5support0_1.19.2-2+b2 libksba8_1.6.0-2 libldap-2.5-0_2.5.11+dfsg-1+rpi1 liblocale-gettext-perl_1.07-4+b2 liblz4-1_1.9.3-2 liblzma5_5.2.5-2.1 libmagic-mgc_1:5.41-4 libmagic1_1:5.41-4 libmount1_2.38-4 libmpc3_1.2.1-2 libmpdec3_2.5.1-2+rpi1 libmpfr6_4.1.0-3 libncursesw6_6.3-2 libnettle8_3.7.3-1 libnpth0_1.6-3 libnsl-dev_1.3.0-2 libnsl2_1.3.0-2 libp11-kit0_0.24.1-1 libpam-modules_1.4.0-11 libpam-modules-bin_1.4.0-11 libpam-runtime_1.4.0-11 libpam0g_1.4.0-11 libpcre2-8-0_10.39-4 libpcre3_2:8.39-14 libperl5.34_5.34.0-4 libpipeline1_1.5.6-1 libpython3-stdlib_3.10.4-1+b1 libpython3.10-minimal_3.10.5-1+b1 libpython3.10-stdlib_3.10.5-1+b1 libreadline8_8.1.2-1.2 libsasl2-2_2.1.28+dfsg-4 libsasl2-modules-db_2.1.28+dfsg-4 libseccomp2_2.5.3-2+rpi1+b1 libselinux1_3.3-1+b1 libsemanage-common_3.3-1 libsemanage2_3.3-1+b1 libsepol1_3.1-1 libsepol2_3.3-1 libsigsegv2_2.14-1 libsmartcols1_2.38-4 libsqlite3-0_3.38.2-1 libss2_1.46.5-2 libssl1.1_1.1.1n-1 libssl3_3.0.3-7 libstdc++-11-dev_11.2.0-20+rpi1 libstdc++6_12-20220319-1+rpi1 libsub-override-perl_0.09-2 libsybdb5_1.3.6-1.1 libsystemd0_250.4-1+rpi1 libtasn1-6_4.18.0-4 libtinfo6_6.3-2 libtirpc-common_1.3.2-2 libtirpc-dev_1.3.2-2 libtirpc3_1.3.2-2 libtool_2.4.7-4 libubsan1_12-20220319-1+rpi1 libuchardet0_0.0.7-1 libudev1_250.4-1+rpi1 libunicode-escape-perl_0.0.2-4.1 libunicode-string-perl_2.10-1+b6 libunistring2_1.0-1 libuuid1_2.38-4 libxml2_2.9.14+dfsg-1 libxxhash0_0.8.1-1 libzstd1_1.5.2+dfsg-1 linux-libc-dev_5.16.18-1+rpi1 login_1:4.11.1+dfsg1-2 logsave_1.46.5-2 lsb-base_11.1.0+rpi1 m4_1.4.18-5 make_4.3-4.1 man-db_2.10.2-1 mawk_1.3.4.20200120-3 media-types_8.0.0 mount_2.38-4 ncurses-base_6.3-2 ncurses-bin_6.3-2 netbase_6.3 openssl_3.0.3-7 passwd_1:4.11.1+dfsg1-2 patch_2.7.6-7 perl_5.34.0-4 perl-base_5.34.0-4 perl-modules-5.34_5.34.0-4 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.10.4-1+b1 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-2 python3-charset-normalizer_2.0.6-2 python3-distutils_3.9.12-1 python3-docutils_0.17.1+dfsg-2 python3-idna_3.3-1 python3-imagesize_1.3.0-1 python3-importlib-metadata_4.6.4-1 python3-jinja2_3.0.3-1 python3-lib2to3_3.9.12-1 python3-markupsafe_2.0.1-2+b1 python3-minimal_3.10.4-1+b1 python3-more-itertools_8.10.0-2 python3-packaging_21.3-1 python3-pkg-resources_59.6.0-1.2 python3-pygments_2.11.2+dfsg-2 python3-pyparsing_3.0.7-2 python3-requests_2.27.1+dfsg-1 python3-roman_3.3-1 python3-six_1.16.0-3 python3-snowballstemmer_2.2.0-1 python3-sphinx_4.5.0-3 python3-sphinx-rtd-theme_1.0.0+dfsg-1 python3-tz_2022.1-1 python3-urllib3_1.26.9-1 python3-zipp_1.0.0-4 python3.10_3.10.5-1+b1 python3.10-minimal_3.10.5-1+b1 raspbian-archive-keyring_20120528.2 readline-common_8.1.2-1.2 rpcsvc-proto_1.4.2-4 sbcl_2:2.2.3-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.5.0-3 sphinx-rtd-theme-common_1.0.0+dfsg-1 sysvinit-utils_3.03-1 tar_1.34+dfsg-1 tzdata_2022a-1 util-linux_2.37.3-1 xml-core_0.18+nmu1 xz-utils_5.2.5-2.1 zlib1g_1:1.2.11.dfsg-4+b2 zlib1g-dev_1:1.2.11.dfsg-4+b2
+------------------------------------------------------------------------------+
| Build |
+------------------------------------------------------------------------------+
Unpack source
-------------
gpgv: unknown type of key resource 'trustedkeys.kbx'
gpgv: keyblock resource '/tmp/dpkg-verify-sig.alZGON9j/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: cannot verify signature ./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 disc space
----------------
Sufficient free space for build
Hack binNMU version
-------------------
Created changelog entry for binNMU version 3.6.3-1+b1
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=109
SCHROOT_GROUP=buildd
SCHROOT_SESSION_ID=bookworm-staging-armhf-sbuild-788177b2-a00b-4ba5-b333-517f1a8b6bc2
SCHROOT_UID=104
SCHROOT_USER=buildd
SHELL=/bin/sh
TERM=linux
USER=buildd
dpkg-buildpackage
-----------------
dpkg-buildpackage: info: source package pgloader
dpkg-buildpackage: info: source version 3.6.3-1+b1
dpkg-buildpackage: info: source distribution bookworm-staging
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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-asdf/build/asdf-tmp7LQ0A0VI.fasl
; compilation finished in 0:01:04.361
;; 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 563 at level -1
compressed 4096 bytes into 839 at level -1
compressed 110702592 bytes into 27266577 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" {50D74759}>
;; 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) {571AB869}>
;; #<STANDARD-METHOD UIOP/RUN-PROGRAM:VOMIT-OUTPUT-STREAM (T T) {521D60A9}>
;; 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) {57308DC9}>
;; #<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) {577F2989}>
;; #<STANDARD-METHOD ASDF/COMPONENT:COMPONENT-EXTERNAL-FORMAT (COMPONENT) {57844A51}>
;; #<STANDARD-METHOD ASDF/COMPONENT:AROUND-COMPILE-HOOK (COMPONENT) {578AE891}>
;; #<STANDARD-METHOD ASDF/COMPONENT:VERSION-SATISFIES (STRING T) {5794FA79}>
;; SUB-COMPONENTS
;; #<PACKAGE "ASDF/OPERATION">
;; #<PACKAGE "ASDF/OPERATION">
;; NIL
;; #<STANDARD-METHOD COMMON-LISP:INITIALIZE-INSTANCE :AFTER (OPERATION) {57B0D651}>
;; #<STANDARD-METHOD ASDF/OPERATION:FIND-OPERATION (T STRING) {57B98B21}>
;; #<PACKAGE "ASDF/SYSTEM">
;; #<PACKAGE "ASDF/SYSTEM">
;; #<STANDARD-METHOD ASDF/SYSTEM:COMPONENT-ENTRY-POINT (COMPONENT) {57C22B39}>
;; RESET-SYSTEM-CLASS
;; COERCE-FILENAME
;; SYSTEM-LICENSE
;; #<STANDARD-METHOD ASDF/SYSTEM:COMPONENT-BUILD-PATHNAME (COMPONENT) {5825D8B9}>
;; #<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) {5292F971}>
;; #<STANDARD-CLASS ASDF/ACTION:NON-PROPAGATING-OPERATION>
;; #<STANDARD-METHOD ASDF/ACTION:SIDEWAY-OPERATION (OPERATION) {55E5F1D9}>
;; #<STANDARD-METHOD ASDF/ACTION:INPUT-FILES (SELFWARD-OPERATION COMPONENT) {563FE469}>
;; #<STANDARD-METHOD ASDF/ACTION:MARK-OPERATION-DONE (OPERATION COMPONENT) {5650D281}>
;; #<STANDARD-METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T) {569C63D1}>
;; #<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) {56D0F9C1}>
;; #<STANDARD-METHOD ASDF/ACTION:OUTPUT-FILES (COMPILE-OP SYSTEM) {570C8879}>
;; #<STANDARD-METHOD ASDF/ACTION:PERFORM (LOAD-OP STATIC-FILE) {573C4C31}>
;; #<STANDARD-METHOD ASDF/ACTION:PERFORM (PREPARE-SOURCE-OP COMPONENT) {574A2C91}>
;; #<STANDARD-METHOD ASDF/ACTION:PERFORM (LOAD-SOURCE-OP STATIC-FILE) {57629F81}>
;; #<STANDARD-METHOD ASDF/ACTION:OPERATION-DONE-P (TEST-OP SYSTEM) {57663EC1}>
;; #<PACKAGE "ASDF/FIND-COMPONENT">
;; #<PACKAGE "ASDF/FIND-COMPONENT">
;; #<STANDARD-METHOD COMMON-LISP:PRINT-OBJECT (MISSING-COMPONENT-OF-VERSION T) {57A21B71}>
;; #<STANDARD-METHOD ASDF/FIND-COMPONENT:RESOLVE-DEPENDENCY-COMBINATION (T
(EQL
:VERSION)
T) {57DF13C9}>
;; #<PACKAGE "ASDF/FORCING">
;; #<PACKAGE "ASDF/FORCING">
;; #<STANDARD-METHOD ASDF/SESSION:FORCING (CONS) {581C46F1}>
;; #<PACKAGE "ASDF/PLAN">
;; #<PACKAGE "ASDF/PLAN">
;; #<STANDARD-METHOD ASDF/PLAN:RECORD-DEPENDENCY (SEQUENTIAL-PLAN OPERATION
COMPONENT) {58306479}>
;; NIL
;; +STATUS-VOID+
;; #<STANDARD-METHOD (COMMON-LISP:SETF ASDF/PLAN:ACTION-STATUS) :AFTER (T
SEQUENTIAL-PLAN
OPERATION
COMPONENT) {521DC409}>
;; #<STANDARD-METHOD ASDF/PLAN:NEEDED-IN-IMAGE-P (OPERATION COMPONENT) {52202F99}>
;; #<STANDARD-METHOD ASDF/ACTION:COMPUTE-ACTION-STAMP (T OPERATION COMPONENT) {52511F99}>
;; ACTION-UP-TO-DATE-P
;; REQUIRED-COMPONENTS
;; #<STANDARD-METHOD ASDF/PLAN:MARK-AS-DONE (PLAN OPERATION COMPONENT) {55EA8FD1}>
;; #<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) {57554601}>
;; 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) {5257A159}>
;; #<STANDARD-METHOD ASDF/ACTION:PERFORM (OPERATION COMPILED-FILE) {52639551}>
;; #<STANDARD-METHOD ASDF/ACTION:OUTPUT-FILES (LIB-OP PREBUILT-SYSTEM) {5272AC39}>
;; #<STANDARD-METHOD ASDF/ACTION:COMPONENT-DEPENDS-ON (LOAD-BUNDLE-OP
PRECOMPILED-SYSTEM) {52AFE4A1}>
;; #<PACKAGE "ASDF/CONCATENATE-SOURCE">
;; #<PACKAGE "ASDF/CONCATENATE-SOURCE">
;; #<STANDARD-METHOD ASDF/ACTION:PERFORM (BASIC-LOAD-COMPILED-CONCATENATED-SOURCE-OP
SYSTEM) {55DE0151}>
;; #<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) {57CEFCB1}>
;; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/asdf-finalizers/pkgdcl-tmp74KGUNRZ.fasl
; compilation finished in 0:00:00.050
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/asdf-finalizers/finalizers-tmpCEL1YIM2.fasl
; compilation finished in 0:00:00.290
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/asdf-finalizers/asdf-support-tmpHAMQABTV.fasl
; compilation finished in 0:00:00.045
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/asdf-finalizers/initialization-tmpUPMG0IBO.fasl
; compilation finished in 0:00:00.005
;; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/asdf-system-connections/dev/asdf-system-connections-tmpAKM32D0F.fasl
; compilation finished in 0:00:00.160
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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/package-tmp8UG37QJ5.fasl
; compilation finished in 0:00:00.020
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/definitions-tmp65YV5VYW.fasl
; compilation finished in 0:00:00.105
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/binding-tmpGO4MNX7G.fasl
; compilation finished in 0:00:00.150
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/strings-tmp9NXH2K1.fasl
; compilation finished in 0:00:00.010
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/conditions-tmp6B86GLV2.fasl
; compilation finished in 0:00:00.175
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/symbols-tmpZWLLOVAH.fasl
; compilation finished in 0:00:00.135
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/macros-tmpS9M8BVBG.fasl
; compilation finished in 0:00:00.775
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/functions-tmp205IFRLS.fasl
; compilation finished in 0:00:00.465
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/lists-tmpBW6GBZVX.fasl
; compilation finished in 0:00:01.195
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/types-tmpMDMI656Q.fasl
; compilation finished in 0:00:00.815
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/io-tmpQN7VP0FI.fasl
; compilation finished in 0:00:00.770
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/hash-tables-tmpNOSTK6D0.fasl
; compilation finished in 0:00:00.400
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/control-flow-tmp9RA72042.fasl
; compilation finished in 0:00:00.475
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/arrays-tmpGXZUHQQV.fasl
; compilation finished in 0:00:00.075
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/sequences-tmp1SBDRUB4.fasl
; compilation finished in 0:00:01.350
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/numbers-tmpFJI67R2A.fasl
; compilation finished in 0:00:01.006
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-1/features-tmp2LAB0LT0.fasl
; compilation finished in 0:00:00.090
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-2/package-tmp5G8XXQL5.fasl
; compilation finished in 0:00:00.035
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-2/arrays-tmp70X8ZE5V.fasl
; compilation finished in 0:00:00.230
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-2/control-flow-tmpRJ7B84T0.fasl
; compilation finished in 0:00:00.055
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-2/sequences-tmpOMGCSPAB.fasl
; compilation finished in 0:00:00.020
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/alexandria/alexandria-2/lists-tmpLEWWGRGS.fasl
; compilation finished in 0:00:00.045
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/trivial-features/src/tf-sbcl-tmp2VH9CUXA.fasl
; compilation finished in 0:00:00.050
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/babel/src/packages-tmp21MKT5OO.fasl
; compilation finished in 0:00:00.020
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/babel/src/encodings-tmpMXTBQGWB.fasl
; compilation finished in 0:00:01.125
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-ascii-tmpPPC4Z10Q.fasl
; compilation finished in 0:00:00.060
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-ebcdic-tmpRD3N4073.fasl
; compilation finished in 0:00:00.140
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-ebcdic-int-tmpFHOV2EXD.fasl
; compilation finished in 0:00:00.065
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-iso-8859-tmp5P00NUE.fasl
; compilation finished in 0:00:00.990
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-unicode-tmp94JO3ZTC.fasl
; compilation finished in 0:00:02.225
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-cp437-tmp6OFDFVAR.fasl
; compilation finished in 0:00:00.070
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-cp1251-tmpRYWTYMDY.fasl
; compilation finished in 0:00:00.070
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-cp1252-tmpW78F18LW.fasl
; compilation finished in 0:00:00.065
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/babel/src/jpn-table-tmpWUHTUDVN.fasl
; compilation finished in 0:00:01.100
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-jpn-tmpCK73UFEK.fasl
; compilation finished in 0:00:00.465
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-gbk-tmpEBEIAP0J.fasl
; compilation finished in 0:00:00.170
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/babel/src/enc-koi8-tmpSE943D3D.fasl
; compilation finished in 0:00:00.255
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/babel/src/external-format-tmpN5RKE5P2.fasl
; compilation finished in 0:00:00.205
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/babel/src/strings-tmpNQZ6T1LT.fasl
; compilation finished in 0:00:26.525
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/babel/src/gbk-map-tmpWLS9DP2S.fasl
; compilation finished in 0:00:01.585
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/babel/src/sharp-backslash-tmp8VCF5G6M.fasl
; compilation finished in 0:00:00.110
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/cffi-sbcl-tmp8DMZV8XU.fasl
; compilation finished in 0:00:02.051
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/package-tmpEGA125WT.fasl
; compilation finished in 0:00:00.020
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/utils-tmpE9RDNCMC.fasl
; compilation finished in 0:00:00.150
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/libraries-tmpGTSGBQIR.fasl
; compilation finished in 0:00:01.160
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/early-types-tmpRCRZ6VP.fasl
; compilation finished in 0:00:02.320
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/types-tmpC6WXNUWP.fasl
; compilation finished in 0:00:03.795
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/enum-tmpB17HDEGA.fasl
; compilation finished in 0:00:01.035
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/strings-tmpE3AQVWGT.fasl
; compilation finished in 0:00:19.480
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/structures-tmpYKOEPICF.fasl
; compilation finished in 0:00:00.335
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/functions-tmpQK8YY837.fasl
; compilation finished in 0:00:01.775
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/foreign-vars-tmpJQI6KMRZ.fasl
; compilation finished in 0:00:00.180
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-cffi/src/features-tmpWUHK9UI0.fasl
; compilation finished in 0:00:00.100
;
; 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+ssl/src/config.lisp" (written 28 MAR 2022 12:23:33 AM):
; processing (IN-PACKAGE :CL-USER)
; processing (DEFPACKAGE :CL+SSL/CONFIG ...)
; processing (IN-PACKAGE :CL+SSL/CONFIG)
; processing (DEFVAR *LIBSSL-OVERRIDE* ...)
; processing (DEFVAR *LIBCRYPTO-OVERRIDE* ...)
; processing (DEFMACRO DEFINE-LIBSSL-PATH ...)
; processing (DEFMACRO DEFINE-LIBCRYPTO-PATH ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.2.3.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/config-tmpUUOI3UDB.fasl
; compilation finished in 0:00:00.055
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-trivial-gray-streams/package-tmpG1IOPEUW.fasl
; compilation finished in 0:00:00.030
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-trivial-gray-streams/streams-tmpM0NOM18K.fasl
; compilation finished in 0:00:00.395
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/packages-tmpVIL8T0YR.fasl
; compilation finished in 0:00:00.010
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/mapping-tmpBODYQO2B.fasl
; compilation finished in 0:00:00.085
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/ascii-tmpTLIPDLNH.fasl
; compilation finished in 0:00:00.010
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/koi8-r-tmpMOOD9PZK.fasl
; compilation finished in 0:00:00.010
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/mac-tmpJSQEHKQD.fasl
; compilation finished in 0:00:00.010
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/iso-8859-tmpX9RFG54G.fasl
; compilation finished in 0:00:00.060
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/enc-cn-tbl-tmpJZYZV5YE.fasl
; compilation finished in 0:00:03.346
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/code-pages-tmp7AGT8VJK.fasl
; compilation finished in 0:00:00.090
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/specials-tmpVX9R9U8P.fasl
; compilation finished in 0:00:00.150
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/util-tmpQCDFKETQ.fasl
; compilation finished in 0:00:00.440
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/conditions-tmpO1PDDUR.fasl
; compilation finished in 0:00:00.095
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/external-format-tmpIX4U16ZB.fasl
; compilation finished in 0:00:00.905
; 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 PROGN 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 PROGN 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 PROGN 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 PROGN 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 PROGN 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 PROGN 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 PROGN 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 PROGN 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 PROGN 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 fixnum arithmetic (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 fixnum arithmetic (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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/length-tmp93OFNPHA.fasl
; compilation finished in 0:00:02.190
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/encode-tmpOH5AKS8D.fasl
; compilation finished in 0:00:15.840
; 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 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 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 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)
; (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 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 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 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)
;
; 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: 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 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 {56045259}>.
;
; 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 {56045259}>.
;
; 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)
; --> LET OR LET IF COND IF THE
; ==>
; (RETURN-FROM FLEXI-STREAMS::CHAR-DECODER NIL)
;
; caught STYLE-WARNING:
; Result is a (VALUES &OPTIONAL NULL &REST T), not a (MOD 1114112).
; 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.
; (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: 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-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 {572B1B31}>.
;
; 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 {572B1B31}>.
;
; 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)
; --> LET OR LET IF COND IF THE
; ==>
; (RETURN-FROM FLEXI-STREAMS::CHAR-DECODER NIL)
;
; caught STYLE-WARNING:
; Result is a (VALUES &OPTIONAL NULL &REST T), not a (MOD 1114112).
; 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.
; (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).
; (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-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: 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: 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-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 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 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 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.
; (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-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.
; (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.
; (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.
; (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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/decode-tmpTNV77KDS.fasl
; compilation finished in 0:00:34.321
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 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 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/in-memory-tmp9AOKGDLT.fasl
; compilation finished in 0:00:01.065
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/stream-tmpXS9JOGMS.fasl
; compilation finished in 0:00:00.325
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/output-tmpERBDX74X.fasl
; compilation finished in 0:00:00.250
; 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)
; (>= POSITION FLEXI-STREAMS::BOUND)
;
; 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)
; (>= POSITION FLEXI-STREAMS::BOUND)
;
; 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 PROGN 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/input-tmpTQIEF2IQ.fasl
; compilation finished in 0:00:00.530
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/io-tmpPAAFO6LP.fasl
; compilation finished in 0:00:00.270
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-flexi-streams/strings-tmp4PCSVQUR.fasl
; compilation finished in 0:00:00.180
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/bordeaux-threads/src/pkgdcl-tmpCUMSDKM4.fasl
; compilation finished in 0:00:00.005
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/bordeaux-threads/src/bordeaux-threads-tmpVBY1FQ3S.fasl
; compilation finished in 0:00:00.305
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/bordeaux-threads/src/impl-null-tmpS8NUOPMQ.fasl
; compilation finished in 0:00:00.005
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/bordeaux-threads/src/default-implementations-tmpPYED056U.fasl
; compilation finished in 0:00:01.065
; compiling file "/usr/share/common-lisp/source/trivial-garbage/trivial-garbage.lisp" (written 29 DEC 2021 06:00:51 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/trivial-garbage/trivial-garbage-tmpUOCPY155.fasl
; compilation finished in 0:00:00.175
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-split-sequence/package-tmpP4BCARWB.fasl
; compilation finished in 0:00:00.005
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-split-sequence/vector-tmpOUEHOD9C.fasl
; compilation finished in 0:00:01.075
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-split-sequence/list-tmp5ZHGID8G.fasl
; compilation finished in 0:00:01.590
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-split-sequence/extended-sequence-tmp9D2N5DM.fasl
; compilation finished in 0:00:00.965
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-split-sequence/api-tmpKDSLP2NX.fasl
; compilation finished in 0:00:05.125
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-split-sequence/documentation-tmp4QLHV6NG.fasl
; compilation finished in 0:00:00.015
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/usocket/package-tmpMFQG7214.fasl
; compilation finished in 0:00:00.015
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/usocket/usocket-tmpEL1UBVEC.fasl
; compilation finished in 0:00:01.790
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/usocket/condition-tmpO7N5WXBL.fasl
; compilation finished in 0:00:00.370
; 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) (*)) UNSIGNED-BYTE
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) (UNSIGNED-BYTE 16) &REST T).
; It allows an unknown number of values, consider using
; (VALUES (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) UNSIGNED-BYTE
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) (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.2.3.debian-linux-arm/usr/share/common-lisp/source/usocket/backend/sbcl-tmp7GPJW3WR.fasl
; compilation finished in 0:00:01.145
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/usocket/option-tmpESZVJLGB.fasl
; compilation finished in 0:00:00.625
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/package.lisp" (written 28 MAR 2022 12:23:33 AM):
; processing (IN-PACKAGE :CL-USER)
; processing (DEFPACKAGE :CL+SSL ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.2.3.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/package-tmp861VENRV.fasl
; compilation finished in 0:00:00.015
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/reload.lisp" (written 18 MAY 2022 11:37:23 PM):
; processing (IN-PACKAGE :CL+SSL)
; processing (DEFUN DETECT-MACOS-CUSTOM-OPENSSL-INSTALLATIONS ...)
; processing (DEFUN DETECT-CUSTOM-OPENSSL-INSTALLATIONS-IF-MACOS ...)
; processing (DETECT-CUSTOM-OPENSSL-INSTALLATIONS-IF-MACOS)
; processing (UNLESS CL+SSL/CONFIG::*LIBCRYPTO-OVERRIDE* ...)
; processing (UNLESS CL+SSL/CONFIG::*LIBSSL-OVERRIDE* ...)
; processing (UNLESS (MEMBER :CL+SSL-FOREIGN-LIBS-ALREADY-LOADED ...) ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.2.3.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/reload-tmp7MX18LSW.fasl
; compilation finished in 0:00:00.060
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/conditions.lisp" (written 28 MAR 2022 12:23:33 AM):
; 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
; 'CL+SSL::SSL-ERROR
;
; note: can't open-code test of unknown type SSL-ERROR
; (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 #:G2 '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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/conditions-tmp4CP5SEFX.fasl
; compilation finished in 0:00:00.510
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/ffi.lisp" (written 18 MAY 2022 11:37:23 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-IS-OPAQUE* ...)
; processing (DEFVAR *LISP-BIO-TYPE*)
; 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 (DEFCONSTANT +SSL-CTRL-SET-MIN-PROTO-VERSION+ ...)
; processing (DEFCONSTANT +SSL-CTRL-SET-MAX-PROTO-VERSION+ ...)
; processing (DEFCONSTANT +SSL3-VERSION+ ...)
; processing (DEFCONSTANT +TLS1-VERSION+ ...)
; processing (DEFCONSTANT +TLS1-1-VERSION+ ...)
; processing (DEFCONSTANT +TLS1-2-VERSION+ ...)
; processing (DEFCONSTANT +TLS1-3-VERSION+ ...)
; processing (DEFCONSTANT +DTLS1-VERSION+ ...)
; processing (DEFCONSTANT +DTLS1-2-VERSION+ ...)
; 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
; CL+SSL/CONFIG::LIBCRYPTO)))
;
; 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 CL+SSL/CONFIG::LIBCRYPTO)))
;
; 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/CONFIG::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/CONFIG::LIBSSL)))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; 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")
; ("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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION ("SSL_shutdown" SSL-SHUTDOWN)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_shutdown" CL+SSL::SSL-SHUTDOWN)
; :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-SHUTDOWN
; (CL+SSL::SSL)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-SHUTDOWN
; (LET ((#:G0 CL+SSL::SSL))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_shutdown" (:POINTER #:G0 :INT)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBSSL))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION ("SSL_free" SSL-FREE) ...)
; processing (DEFINE-SSL-FUNCTION ("SSL_CTX_free" SSL-CTX-FREE) ...)
; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:SINCE "1.0")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:SINCE "1.0")
; ("SSL_set_alpn_protos" CL+SSL::SSL-SET-ALPN-PROTOS)
; :INT
; (CL+SSL::SSL :POINTER)
; (CL+SSL::TEXT :STRING)
; (CL+SSL::LEN :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-SET-ALPN-PROTOS
; (CL+SSL::SSL CL+SSL::TEXT CL+SSL::LEN)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-SET-ALPN-PROTOS
; (LET ((#:G0 CL+SSL::SSL))
; (MULTIPLE-VALUE-BIND (#:G1 #:PARAM3)
; (CFFI:TRANSLATE-TO-FOREIGN CL+SSL::TEXT #)
; (UNWIND-PROTECT # #)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "1.0") ...)
; 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 CL+SSL/CONFIG::LIBCRYPTO)))))
;
; 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
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("BIO_free" BIO-FREE) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("BIO_free" BIO-FREE)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("BIO_free" CL+SSL::BIO-FREE)
; :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-FREE
; (METHOD)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-FREE
; (LET ((#:G0 METHOD))
; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_free" (:POINTER #:G0 :POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; 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")
; ("BIO_get_new_index" CL+SSL::BIO-NEW-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::BIO-NEW-INDEX
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-NEW-INDEX
; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_get_new_index" (:INT) :CONVENTION
; :CDECL :LIBRARY CL+SSL/CONFIG::LIBCRYPTO)))
;
; 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")
; ("BIO_meth_new" CL+SSL::BIO-METH-NEW)
; :POINTER
; (TYPE :INT)
; (CL+SSL::NAME :STRING))
; --> 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-METH-NEW
; (TYPE CL+SSL::NAME)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-METH-NEW
; (LET ((#:G0 TYPE))
; (MULTIPLE-VALUE-BIND (#:G1 #:PARAM2)
; (CFFI:TRANSLATE-TO-FOREIGN CL+SSL::NAME #)
; (UNWIND-PROTECT # #)))))
;
; 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")
; ("BIO_meth_set_puts" CL+SSL::BIO-SET-PUTS)
; :INT
; (CL+SSL::METH :POINTER)
; (CL+SSL::PUTS :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::BIO-SET-PUTS
; (CL+SSL::METH CL+SSL::PUTS)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-SET-PUTS
; (LET ((#:G0 CL+SSL::METH))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_meth_set_puts" # :CONVENTION :CDECL
; :LIBRARY CL+SSL/CONFIG::LIBCRYPTO)))))
;
; 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")
; ("BIO_meth_set_write" CL+SSL::BIO-SET-WRITE)
; :INT
; (CL+SSL::METH :POINTER)
; (CL+SSL::PUTS :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::BIO-SET-WRITE
; (CL+SSL::METH CL+SSL::PUTS)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-SET-WRITE
; (LET ((#:G0 CL+SSL::METH))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_meth_set_write" # :CONVENTION
; :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO)))))
;
; 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")
; ("BIO_meth_set_read" CL+SSL::BIO-SET-READ)
; :INT
; (CL+SSL::METH :POINTER)
; (READ :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::BIO-SET-READ
; (CL+SSL::METH READ)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-SET-READ
; (LET ((#:G0 CL+SSL::METH))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_meth_set_read" # :CONVENTION :CDECL
; :LIBRARY CL+SSL/CONFIG::LIBCRYPTO)))))
;
; 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")
; ("BIO_meth_set_gets" CL+SSL::BIO-SET-GETS)
; :INT
; (CL+SSL::METH :POINTER)
; (READ :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::BIO-SET-GETS
; (CL+SSL::METH READ)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-SET-GETS
; (LET ((#:G0 CL+SSL::METH))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_meth_set_gets" # :CONVENTION :CDECL
; :LIBRARY CL+SSL/CONFIG::LIBCRYPTO)))))
;
; 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")
; ("BIO_meth_set_create" CL+SSL::BIO-SET-CREATE)
; :INT
; (CL+SSL::METH :POINTER)
; (READ :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::BIO-SET-CREATE
; (CL+SSL::METH READ)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-SET-CREATE
; (LET ((#:G0 CL+SSL::METH))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_meth_set_create" # :CONVENTION
; :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO)))))
;
; 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")
; ("BIO_meth_set_destroy" CL+SSL::BIO-SET-DESTROY)
; :INT
; (CL+SSL::METH :POINTER)
; (READ :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::BIO-SET-DESTROY
; (CL+SSL::METH READ)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-SET-DESTROY
; (LET ((#:G0 CL+SSL::METH))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_meth_set_destroy" # :CONVENTION
; :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO)))))
;
; 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")
; ("BIO_meth_set_ctrl" CL+SSL::BIO-SET-CTRL)
; :INT
; (CL+SSL::METH :POINTER)
; (READ :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::BIO-SET-CTRL
; (CL+SSL::METH READ)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-SET-CTRL
; (LET ((#:G0 CL+SSL::METH))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_meth_set_ctrl" # :CONVENTION :CDECL
; :LIBRARY CL+SSL/CONFIG::LIBCRYPTO)))))
;
; 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")
; ("BIO_set_init" CL+SSL::BIO-SET-INIT)
; :INT
; (CL+SSL::METH :POINTER)
; (CL+SSL::VALUE :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::BIO-SET-INIT
; (CL+SSL::METH CL+SSL::VALUE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-SET-INIT
; (LET ((#:G0 CL+SSL::METH))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_set_init" # :CONVENTION :CDECL
; :LIBRARY CL+SSL/CONFIG::LIBCRYPTO)))))
;
; 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")
; ("BIO_set_flags" CL+SSL::BIO-SET-FLAGS)
; :INT
; (CL+SSL::METH :POINTER)
; (CL+SSL::VALUE :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::BIO-SET-FLAGS
; (CL+SSL::METH CL+SSL::VALUE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-SET-FLAGS
; (LET ((#:G0 CL+SSL::METH))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_set_flags" # :CONVENTION :CDECL
; :LIBRARY CL+SSL/CONFIG::LIBCRYPTO)))))
;
; 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")
; ("BIO_clear_flags" CL+SSL::BIO-CLEAR-FLAGS)
; :INT
; (CL+SSL::METH :POINTER)
; (CL+SSL::VALUE :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::BIO-CLEAR-FLAGS
; (CL+SSL::METH CL+SSL::VALUE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-CLEAR-FLAGS
; (LET ((#:G0 CL+SSL::METH))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_clear_flags" # :CONVENTION :CDECL
; :LIBRARY CL+SSL/CONFIG::LIBCRYPTO)))))
;
; note: doing signed word to integer 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 CL+SSL/CONFIG::LIBCRYPTO)))
;
; 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
; CL+SSL/CONFIG::LIBCRYPTO)
; #<CFFI::FOREIGN-STRING-TYPE :UTF-8>)
;
; note: doing SAP to pointer coercion (cost 20)
; processing (DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "3.0.0") ...)
; processing (DEFCONSTANT +ERR_LIB_NONE+ ...)
; processing (DEFCONSTANT +ERR_R_FATAL+ ...)
; processing (DEFCONSTANT +ERR_R_INTERNAL_ERROR+ ...)
; processing (DEFINE-CRYPTO-FUNCTION ("ERR_add_error_data" ERR-ADD-ERROR-DATA) ...)
; processing (DEFINE-CRYPTO-FUNCTION ("ERR_print_errors" ERR-PRINT-ERRORS) ...)
; 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/CONFIG::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/CONFIG::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 (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 (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 (DEFUN SSL-CTX-SET-MIN-PROTO-VERSION ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFUN SSL-CTX-SET-MIN-PROTO-VERSION
; (CL+SSL::SSL-CTX-CTRL CL+SSL::CTX CL+SSL::+SSL-CTRL-SET-MIN-PROTO-VERSION+
; CL+SSL::VERSION (CFFI-SYS:NULL-POINTER))
;
; note: doing SAP to pointer coercion (cost 20)
; processing (DEFUN SSL-CTX-SET-MAX-PROTO-VERSION ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFUN SSL-CTX-SET-MAX-PROTO-VERSION
; (CL+SSL::SSL-CTX-CTRL CL+SSL::CTX CL+SSL::+SSL-CTRL-SET-MAX-PROTO-VERSION+
; CL+SSL::VERSION (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/CONFIG::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_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 CL+SSL/CONFIG::LIBCRYPTO)))
;
; 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 CL+SSL/CONFIG::LIBCRYPTO)))))
;
; 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/CONFIG::LIBSSL))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION-EX (:VANISHED "3.0.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "3.0.0")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:VANISHED "3.0.0")
; ("SSL_get_peer_certificate" CL+SSL::SSL-GET-PEER-CERTIFICATE)
; :POINTER
; (CL+SSL::SSL CL+SSL::SSL-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-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/CONFIG::LIBSSL))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-SSL-FUNCTION-EX (:SINCE "3.0.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-SSL-FUNCTION-EX (:SINCE "3.0.0")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:SINCE "3.0.0")
; ("SSL_get1_peer_certificate" CL+SSL::SSL-GET1-PEER-CERTIFICATE)
; :POINTER
; (CL+SSL::SSL CL+SSL::SSL-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-GET1-PEER-CERTIFICATE
; (CL+SSL::SSL)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-GET1-PEER-CERTIFICATE
; (LET ((#:G0 CL+SSL::SSL))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_get1_peer_certificate"
; (:POINTER #:G0 :POINTER) :CONVENTION
; :CDECL :LIBRARY CL+SSL/CONFIG::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
; CL+SSL/CONFIG::LIBCRYPTO)))))
;
; 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
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; 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
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; 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
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; 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")
; ("X509_get0_notBefore" CL+SSL::X509-GET0-NOT-BEFORE)
; :POINTER
; (CL+SSL::X509 :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::X509-GET0-NOT-BEFORE
; (CL+SSL::X509)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::X509-GET0-NOT-BEFORE
; (LET ((#:G0 CL+SSL::X509))
; (CFFI-SYS:%FOREIGN-FUNCALL "X509_get0_notBefore"
; (:POINTER #:G0 :POINTER) :CONVENTION
; :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; 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")
; ("X509_get0_notAfter" CL+SSL::X509-GET0-NOT-AFTER)
; :POINTER
; (CL+SSL::X509 :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::X509-GET0-NOT-AFTER
; (CL+SSL::X509)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::X509-GET0-NOT-AFTER
; (LET ((#:G0 CL+SSL::X509))
; (CFFI-SYS:%FOREIGN-FUNCALL "X509_get0_notAfter"
; (:POINTER #:G0 :POINTER) :CONVENTION
; :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; 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 CL+SSL/CONFIG::LIBCRYPTO))))
;
; 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 (DEFINE-CRYPTO-FUNCTION ("X509_digest" X509-DIGEST) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("X509_digest" X509-DIGEST)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("X509_digest" CL+SSL::X509-DIGEST)
; :INT
; (CL+SSL::CERT :POINTER)
; (TYPE :POINTER)
; (CL+SSL::BUF :POINTER)
; (CL+SSL::*LEN :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-DIGEST
; (CL+SSL::CERT TYPE CL+SSL::BUF CL+SSL::*LEN)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::X509-DIGEST
; (LET ((#:G0 CL+SSL::CERT))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("PEM_write_bio_X509" PEM-WRITE-X509) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("PEM_write_bio_X509" PEM-WRITE-X509)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("PEM_write_bio_X509" CL+SSL::PEM-WRITE-X509)
; :INT
; (CL+SSL::BIO :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::PEM-WRITE-X509
; (CL+SSL::BIO CL+SSL::X509)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::PEM-WRITE-X509
; (LET ((#:G0 CL+SSL::BIO))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "PEM_write_bio_X509" # :CONVENTION
; :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO)))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("PEM_read_bio_X509" PEM-READ-X509) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("PEM_read_bio_X509" PEM-READ-X509)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("PEM_read_bio_X509" CL+SSL::PEM-READ-X509)
; :POINTER
; (CL+SSL::BIO :POINTER)
; (CL+SSL::X509 :INT)
; (CL+SSL::CALLBACK :INT)
; (CL+SSL::PASSPHRASE :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::PEM-READ-X509
; (CL+SSL::BIO CL+SSL::X509 CL+SSL::CALLBACK CL+SSL::PASSPHRASE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::PEM-READ-X509
; (LET ((#:G0 CL+SSL::BIO))
; (LET (#)
; (LET #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("EVP_get_digestbyname" EVP-GET-DIGEST-BY-NAME) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in:
; DEFINE-CRYPTO-FUNCTION ("EVP_get_digestbyname" EVP-GET-DIGEST-BY-NAME)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("EVP_get_digestbyname" CL+SSL::EVP-GET-DIGEST-BY-NAME)
; :POINTER
; (CL+SSL::NAME :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::EVP-GET-DIGEST-BY-NAME
; (CL+SSL::NAME)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::EVP-GET-DIGEST-BY-NAME
; (MULTIPLE-VALUE-BIND (#:G0 #:PARAM1)
; (CFFI:TRANSLATE-TO-FOREIGN CL+SSL::NAME
; #<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-CRYPTO-FUNCTION-EX (:VANISHED "3.0.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "3.0.0")
; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX
; (:VANISHED "3.0.0")
; ("EVP_MD_size" CL+SSL::EVP-MD-SIZE)
; :INT
; (CL+SSL::EVP :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::EVP-MD-SIZE
; (CL+SSL::EVP)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::EVP-MD-SIZE
; (LET ((#:G0 CL+SSL::EVP))
; (CFFI-SYS:%FOREIGN-FUNCALL "EVP_MD_size" (:POINTER #:G0 :INT)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION-EX (:SINCE "3.0.0") ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION-EX (:SINCE "3.0.0")
; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX
; (:SINCE "3.0.0")
; ("EVP_MD_get_size" CL+SSL::EVP-MD-GET-SIZE)
; :INT
; (CL+SSL::EVP :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::EVP-MD-GET-SIZE
; (CL+SSL::EVP)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::EVP-MD-GET-SIZE
; (LET ((#:G0 CL+SSL::EVP))
; (CFFI-SYS:%FOREIGN-FUNCALL "EVP_MD_get_size" (:POINTER #:G0 :INT)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing signed word to integer 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
; CL+SSL/CONFIG::LIBCRYPTO)))))
;
; 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
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; 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 CL+SSL/CONFIG::LIBCRYPTO)))))
;
; 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
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; 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
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; 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
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; 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
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (CFFI:DEFCSTRUCT ASN1_STRING_ST ...)
; processing (DEFINE-CRYPTO-FUNCTION ("ASN1_TIME_check" ASN1-TIME-CHECK) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("ASN1_TIME_check" ASN1-TIME-CHECK)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("ASN1_TIME_check" CL+SSL::ASN1-TIME-CHECK)
; :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-TIME-CHECK
; (CL+SSL::ASN1-STRING)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::ASN1-TIME-CHECK
; (LET ((#:G0 CL+SSL::ASN1-STRING))
; (CFFI-SYS:%FOREIGN-FUNCALL "ASN1_TIME_check" (:POINTER #:G0 :INT)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; processing (DEFINE-CRYPTO-FUNCTION ("ASN1_UTCTIME_check" ASN1-UTCTIME-CHECK) ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFINE-CRYPTO-FUNCTION ("ASN1_UTCTIME_check" ASN1-UTCTIME-CHECK)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("ASN1_UTCTIME_check" CL+SSL::ASN1-UTCTIME-CHECK)
; :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-UTCTIME-CHECK
; (CL+SSL::ASN1-STRING)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::ASN1-UTCTIME-CHECK
; (LET ((#:G0 CL+SSL::ASN1-STRING))
; (CFFI-SYS:%FOREIGN-FUNCALL "ASN1_UTCTIME_check" (:POINTER #:G0 :INT)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing signed word to integer coercion (cost 20) to "<return value>"
; 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/CONFIG::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/CONFIG::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/CONFIG::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/CONFIG::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 SECONDS-UNTIL-DEADLINE ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/ffi.lisp
; in: DEFUN SECONDS-UNTIL-DEADLINE
; (- 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 T, 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 T, 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 OUTPUT-WAIT ...)
; processing (DEFUN INPUT-WAIT ...)
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/ffi-tmpZ7L7FP0S.fasl
; compilation finished in 0:00:03.971
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/ffi-buffer-all.lisp" (written 28 MAR 2022 12:23:33 AM):
; processing (IN-PACKAGE :CL+SSL)
; processing (DECLAIM (INLINE MAKE-BUFFER ...))
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.2.3.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/ffi-buffer-all-tmpGCPRU2E.fasl
; compilation finished in 0:00:00.005
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/ffi-buffer.lisp" (written 28 MAR 2022 12:23:33 AM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/ffi-buffer-tmpTYRYY2X9.fasl
; compilation finished in 0:00:00.140
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/streams.lisp" (written 28 MAR 2022 12:23:33 AM):
; processing (EVAL-WHEN (:COMPILE-TOPLEVEL) ...)
; processing (IN-PACKAGE :CL+SSL)
; processing (DEFVAR *DEFAULT-CIPHER-LIST* ...)
; processing (DEFPARAMETER *DEFAULT-BUFFER-SIZE* ...)
; processing (DEFCLASS SSL-STREAM ...)
; processing (DEFMETHOD INITIALIZE-INSTANCE ...)
; 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::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::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::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 (DEFVAR *DEFAULT-UNWRAP-STREAM-P* ...)
; 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
; (FUNCALL
; (IF (CL+SSL::OPENSSL-IS-AT-LEAST 3 0 0)
; 'CL+SSL::SSL-GET1-PEER-CERTIFICATE
; 'CL+SSL::SSL-GET-PEER-CERTIFICATE)
; CL+SSL::HANDLE)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (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-ALPN-PROTO-STRING ...)
; processing (DEFUN MAKE-SSL-CLIENT-STREAM ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp
; in: DEFUN MAKE-SSL-CLIENT-STREAM
; (1- CL+SSL::LEN)
;
; 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+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.
; (1- CL+SSL::LEN)
;
; 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.
; (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)))
; (IF CL+SSL::ALPN-PROTOCOLS
; (CFFI:WITH-FOREIGN-STRING ((STRING CL+SSL::LEN)
; (CL+SSL::MAKE-ALPN-PROTO-STRING
; CL+SSL::ALPN-PROTOCOLS))
; (CL+SSL::SSL-SET-ALPN-PROTOS CL+SSL::HANDLE STRING (1- CL+SSL::LEN))))
; (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 (DEFUN GET-SELECTED-ALPN-PROTOCOL ...)
; file: /usr/share/common-lisp/source/cl+ssl/src/streams.lisp
; in: DEFUN GET-SELECTED-ALPN-PROTOCOL
; (CL+SSL::SSL-GET0-ALPN-SELECTED (CL+SSL::SSL-STREAM-HANDLE CL+SSL::SSL)
; CL+SSL::PTR CL+SSL::LEN)
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; (CFFI:FOREIGN-STRING-TO-LISP (CFFI:MEM-REF CL+SSL::PTR :POINTER) :COUNT
; (CFFI:MEM-REF CL+SSL::LEN :INT))
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing signed word to integer coercion (cost 20)
; processing (DEFGENERIC STREAM-FD ...)
; processing (DEFMETHOD STREAM-FD ...)
; processing (DEFMETHOD STREAM-FD ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.2.3.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/streams-tmpOMAPSGL7.fasl
; compilation finished in 0:00:02.000
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/bio.lisp" (written 28 MAR 2022 12:23:33 AM):
; processing (IN-PACKAGE CL+SSL)
; processing (DEFCONSTANT +BIO_TYPE_SOURCE_SINK+ ...)
; processing (DEFCONSTANT +BIO_TYPE_DESCRIPTOR+ ...)
; processing (DEFCONSTANT +BIO-TYPE-SOCKET+ ...)
; processing (DEFCONSTANT +BIO_FLAGS_READ+ ...)
; processing (DEFCONSTANT +BIO_FLAGS_WRITE+ ...)
; processing (DEFCONSTANT +BIO_FLAGS_IO_SPECIAL+ ...)
; processing (DEFCONSTANT +BIO_FLAGS_RWS+ ...)
; processing (DEFCONSTANT +BIO_FLAGS_SHOULD_RETRY+ ...)
; processing (DEFCONSTANT +BIO_CTRL_FLUSH+ ...)
; processing (CFFI:DEFCSTRUCT BIO-METHOD ...)
; processing (CFFI:DEFCSTRUCT BIO ...)
; processing (DEFUN LISP-BIO-TYPE ...)
; processing (DEFUN MAKE-BIO-LISP-METHOD-SLOTS ...)
; processing (DEFUN MAKE-BIO-LISP-METHOD-OPAQUE ...)
; processing (DEFUN MAKE-BIO-LISP-METHOD ...)
; processing (DEFUN BIO-NEW-LISP ...)
; processing (DEFUN CLEAR-RETRY-FLAGS-SLOTS ...)
; processing (DEFUN CLEAR-RETRY-FLAGS-OPAQUE ...)
; processing (DEFUN CLEAR-RETRY-FLAGS ...)
; processing (DEFUN SET-RETRY-READ-OPAQUE ...)
; processing (DEFUN SET-RETRY-READ-SLOTS ...)
; processing (DEFUN SET-RETRY-READ ...)
; processing (DEFPARAMETER *FILE-NAME* ...)
; processing (DEFUN PUT-TO-OPENSSL-ERROR-QUEUE ...)
; processing (CFFI:DEFCALLBACK LISP-WRITE ...)
; processing (CFFI:DEFCALLBACK LISP-READ ...)
; processing (CFFI:DEFCALLBACK LISP-GETS ...)
; processing (CFFI:DEFCALLBACK LISP-PUTS ...)
; processing (CFFI:DEFCALLBACK LISP-CTRL ...)
; processing (CFFI:DEFCALLBACK LISP-CREATE-SLOTS ...)
; processing (CFFI:DEFCALLBACK LISP-CREATE-OPAQUE ...)
; processing (CFFI:DEFCALLBACK LISP-DESTROY-SLOTS ...)
; processing (CFFI:DEFCALLBACK LISP-DESTROY-OPAQUE ...)
; processing (DEFMACRO WITH-BIO-OUTPUT-TO-STRING ...)
; processing (DEFMACRO WITH-BIO-INPUT-FROM-STRING ...)
; processing (DEFUN ERR-PRINT-ERRORS-TO-STRING ...)
; processing (SETF *BIO-LISP-METHOD* ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.2.3.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/bio-tmpB76HJA0J.fasl
; compilation finished in 0:00:01.085
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/x509.lisp" (written 18 MAY 2022 11:37:23 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 DECODE-ASN1-TIME ...)
; 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 ...)
; processing (DEFUN CERTIFICATE-NOT-AFTER-TIME ...)
; processing (DEFUN CERTIFICATE-NOT-BEFORE-TIME ...)
; processing (DEFUN CERTIFICATE-FINGERPRINT ...)
; processing (DEFUN X509-CERT-FROM-PEM ...)
; processing (DEFUN CERTIFICATE-PEM ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.2.3.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/x509-tmp7QTM681J.fasl
; compilation finished in 0:00:00.800
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/random.lisp" (written 28 MAR 2022 12:23:33 AM):
; processing (IN-PACKAGE :CL+SSL)
; processing (DEFUN RANDOM-BYTES ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.2.3.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/random-tmpLGH8FB0W.fasl
; compilation finished in 0:00:00.110
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/context.lisp" (written 28 MAR 2022 12:23:33 AM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/context-tmpDGQGGEC4.fasl
; compilation finished in 0:00:00.300
; compiling file "/usr/share/common-lisp/source/cl+ssl/src/verify-hostname.lisp" (written 28 MAR 2022 12:23:33 AM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl+ssl/src/verify-hostname-tmp6X5OKNPG.fasl
; compilation finished in 0:00:00.210
; 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 1991 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.2.3.debian-linux-arm/usr/share/common-lisp/source/iterate/package-tmpABKNHGCI.fasl
; compilation finished in 0:00:00.050
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/iterate/iterate-tmpDGT3OQUT.fasl
; compilation finished in 0:00:11.215
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/garbage-pools/garbage-pools-tmpNF26V1SW.fasl
; compilation finished in 0:00:00.185
; 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), for:
; the second argument of LIST
; 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), for:
; the second argument of LIST
; (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), for:
; the second argument of LIST
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/parse-number/parse-number-tmp2SBNA8NV.fasl
; compilation finished in 0:00:01.030
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/mssql/src/packages-tmpGXTLRZRR.fasl
; compilation finished in 0:00:00.005
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/mssql/src/mssql-tmp2OV9B8J5.fasl
; compilation finished in 0:00:00.455
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/mssql/src/connection-tmpDWRCTFSG.fasl
; compilation finished in 0:00:00.525
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/mssql/src/query-tmpUJ89U641.fasl
; compilation finished in 0:00:00.615
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.2.3.debian-linux-arm/usr/share/common-lisp/source/mssql/src/execute-tmpJAPE3FUS.fasl
; compilation finished in 0:00:00.125
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/mssql/src/remote-tmp1V7T6W0W.fasl
; compilation finished in 0:00:00.160
;
; 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 :SPLIT-SEQUENCE :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/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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-log/pkg-tmp952LXWTD.fasl
; compilation finished in 0:00:00.010
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/cl-log/cl-log-tmpLVFWNUU9.fasl
; compilation finished in 0:00:01.885
; compiling file "/usr/share/common-lisp/source/md5/md5.lisp" (written 22 JUN 2021 07:57:26 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 ...)
; file: /usr/share/common-lisp/source/md5/md5.lisp
; in: DEFUN FILL-BLOCK-UB8
; (SB-KERNEL:%BYTE-BLT MD5::BUFFER MD5::OFFSET BLOCK 0 64)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SB-ALIEN-INTERNALS:ALIEN-VALUE, not a (SB-ALIEN:ALIEN
; (* T)).
;
; note: unable to optimize because: can't tell function type at compile time
;
; note: doing SAP to pointer coercion (cost 20), for:
; the second argument of SET-SLOT
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; processing (DEFUN FILL-BLOCK-CHAR ...)
; file: /usr/share/common-lisp/source/md5/md5.lisp
; in: DEFUN FILL-BLOCK-CHAR
; (DEFUN MD5:FILL-BLOCK-CHAR (BLOCK MD5::BUFFER MD5::OFFSET)
; "DEPRECATED: Convert a complete 64 character input string segment
; starting from `offset' into the given 16 word MD5 block."
; (DECLARE (TYPE (INTEGER 0 536870847) MD5::OFFSET)
; (TYPE MD5::MD5-BLOCK BLOCK)
; (TYPE SIMPLE-STRING MD5::BUFFER)
; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 0) (DEBUG 0))))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA MD5:FILL-BLOCK-CHAR
; (BLOCK MD5::BUFFER MD5::OFFSET)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; "DEPRECATED: Convert a complete 64 character input string segment
; starting from `offset' into the given 16 word MD5 block."
; (DECLARE (TYPE (INTEGER 0 536870847) MD5::OFFSET)
; (TYPE MD5::MD5-BLOCK BLOCK)
; (TYPE SIMPLE-STRING MD5::BUFFER)
; (OPTIMIZE (SPEED 3) (SAFETY 0) (SPACE 0) (DEBUG 0)))
; (BLOCK MD5:FILL-BLOCK-CHAR))
;
; caught STYLE-WARNING:
; The variable BLOCK is defined but never used.
;
; caught STYLE-WARNING:
; The variable BUFFER is defined but never used.
;
; caught STYLE-WARNING:
; The variable OFFSET is defined but never used.
; processing (DEFUN FILL-BLOCK ...)
; file: /usr/share/common-lisp/source/md5/md5.lisp
; in: DEFUN FILL-BLOCK
; (MD5:FILL-BLOCK-CHAR BLOCK MD5::BUFFER MD5::OFFSET)
;
; caught STYLE-WARNING:
; The variable BLOCK is defined but never used.
;
; caught STYLE-WARNING:
; The variable BUFFER is defined but never used.
;
; caught STYLE-WARNING:
; The variable OFFSET is defined but never used.
; (MD5:FILL-BLOCK-UB8 BLOCK MD5::BUFFER MD5::OFFSET)
; --> BLOCK SB-KERNEL:%BYTE-BLT
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SB-ALIEN-INTERNALS:ALIEN-VALUE, not a (SB-ALIEN:ALIEN
; (* T)).
;
; note: unable to optimize because: can't tell function type at compile time
;
; note: doing SAP to pointer coercion (cost 20), for:
; the second argument of SET-SLOT
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; 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
; (MD5::AMOUNT 0 :TYPE (INTEGER 0 *))
; --> SB-INT:NAMED-LAMBDA FUNCTION BLOCK LET SB-KERNEL:THE* MULTIPLE-VALUE-BIND
; --> LET PROGN 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.
; (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-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:FILL-BLOCK-CHAR BLOCK SEQUENCE MD5::OFFSET)
;
; caught STYLE-WARNING:
; The variable BLOCK is defined but never used.
;
; caught STYLE-WARNING:
; The variable BUFFER is defined but never used.
;
; caught STYLE-WARNING:
; The variable OFFSET is defined but never used.
; (MD5:FILL-BLOCK-UB8 BLOCK MD5::BUFFER 0)
; --> BLOCK SB-KERNEL:%BYTE-BLT
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SB-ALIEN-INTERNALS:ALIEN-VALUE, not a (SB-ALIEN:ALIEN
; (* T)).
;
; note: unable to optimize because: can't tell function type at compile time
; (MD5:FILL-BLOCK-UB8 BLOCK SEQUENCE MD5::OFFSET)
; --> BLOCK SB-KERNEL:%BYTE-BLT
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SB-ALIEN-INTERNALS:ALIEN-VALUE, not a (SB-ALIEN:ALIEN
; (* T)).
;
; note: unable to optimize because: can't tell function type at compile time
; (+ (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.
; (MD5:FILL-BLOCK-UB8 BLOCK SEQUENCE MD5::OFFSET)
; --> BLOCK SB-KERNEL:%BYTE-BLT
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20), for:
; the second argument of SET-SLOT
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; (MD5:FILL-BLOCK-UB8 BLOCK MD5::BUFFER 0)
; --> BLOCK SB-KERNEL:%BYTE-BLT
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20), for:
; the second argument of SET-SLOT
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; processing (DEFUN FINALIZE-MD5-STATE ...)
; file: /usr/share/common-lisp/source/md5/md5.lisp
; in: DEFUN FINALIZE-MD5-STATE
; (MD5:FILL-BLOCK-UB8 BLOCK MD5::BUFFER 0)
; --> BLOCK SB-KERNEL:%BYTE-BLT
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SB-ALIEN-INTERNALS:ALIEN-VALUE, not a (SB-ALIEN:ALIEN
; (* T)).
;
; note: unable to optimize because: can't tell function type at compile time
; (* 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.
; (MD5:FILL-BLOCK-UB8 BLOCK MD5::BUFFER 0)
; --> BLOCK SB-KERNEL:%BYTE-BLT
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20), for:
; the second argument of SET-SLOT
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; 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)))
;
; note: doing signed word to integer coercion (cost 20)
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/md5/md5-tmpDKBKLORG.fasl
; compilation finished in 0:00:03.380
WARNING:
Lisp compilation had style-warnings while
compiling #<CL-SOURCE-FILE "md5" "md5">
; compiling file "/usr/share/common-lisp/source/ironclad/src/package.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/package-tmpMO2T7PGC.fasl
; compilation finished in 0:00:00.095
; compiling file "/usr/share/common-lisp/source/ironclad/src/conditions.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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 ...)
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/conditions-tmp5EVOKXWI.fasl
; compilation finished in 0:00:00.615
; compiling file "/usr/share/common-lisp/source/ironclad/src/generic.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/generic-tmp7EN5VFOC.fasl
; compilation finished in 0:00:00.100
WARNING: redefining IRONCLAD:BLOCK-LENGTH in DEFGENERIC
; compiling file "/usr/share/common-lisp/source/ironclad/src/macro-utils.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/macro-utils-tmpWA664A3J.fasl
; compilation finished in 0:00:00.185
; compiling file "/usr/share/common-lisp/source/ironclad/src/util.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/util-tmp3CS3QORN.fasl
; compilation finished in 0:00:00.380
; compiling file "/usr/share/common-lisp/source/ironclad/src/opt/sbcl/fndb.lisp" (written 18 FEB 2022 01:39:10 PM):
; processing (IN-PACKAGE :SB-C)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/opt/sbcl/fndb-tmpD6CVA6PG.fasl
; compilation finished in 0:00:00.010
; compiling file "/usr/share/common-lisp/source/ironclad/src/opt/sbcl/x86oid-vm.lisp" (written 18 FEB 2022 01:39:10 PM):
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/opt/sbcl/x86oid-vm-tmpJTJ7UKVB.fasl
; compilation finished in 0:00:00.040
; compiling file "/usr/share/common-lisp/source/ironclad/src/opt/sbcl/cpu-features.lisp" (written 18 FEB 2022 01:39:10 PM):
; processing (IN-PACKAGE :CRYPTO)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/opt/sbcl/cpu-features-tmpI3M10D0B.fasl
; compilation finished in 0:00:00.070
; compiling file "/usr/share/common-lisp/source/ironclad/src/common.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/common-tmpMQ8L07M8.fasl
; compilation finished in 0:00:01.540
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 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/cipher-tmp9HFLKKLP.fasl
; compilation finished in 0:00:01.075
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/padding.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/padding-tmpEHVBI5QP.fasl
; compilation finished in 0:00:00.380
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/make-cipher.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/make-cipher-tmp7ACGYN6Z.fasl
; compilation finished in 0:00:00.580
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/modes.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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 PROGN
; --> 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 PROGN
; --> 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 PROGN
; --> 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 PROGN
; --> 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 PROGN
; --> 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/modes-tmpROQG4ZG5.fasl
; compilation finished in 0:00:08.631
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 18 FEB 2022 01:39:10 PM):
; 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 UPDATE-DIGEST-FROM-VECTOR))
; processing (DEFUN UPDATE-DIGEST-FROM-VECTOR ...)
; 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 (DECLAIM (NOTINLINE MAKE-DIGEST))
; 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 ...)
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/digests/digest-tmpL8QH2EDP.fasl
; compilation finished in 0:00:01.565
; compiling file "/usr/share/common-lisp/source/ironclad/src/macs/mac.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/macs/mac-tmpGMP33JVN.fasl
; compilation finished in 0:00:00.145
; compiling file "/usr/share/common-lisp/source/ironclad/src/prng/prng.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/prng/prng-tmpYZLZO5XO.fasl
; compilation finished in 0:00:01.035
; compiling file "/usr/share/common-lisp/source/ironclad/src/prng/os-prng.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/prng/os-prng-tmpHJEGXRNO.fasl
; compilation finished in 0:00:00.095
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 18 FEB 2022 01:39:10 PM):
; 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.
; (- 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).
; (- 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).
; (- 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).
; (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).
; (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).
; (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).
; (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).
; (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.
; (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.
; (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.
; (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).
; (- (* 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.
; (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.
; (- (* 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).
; (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).
; (- (* 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).
; (- (* 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.
; (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).
; (- (* 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.
; (- (* 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
; (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).
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; (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 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.
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/math-tmpLNAWKPET.fasl
; compilation finished in 0:00:01.985
; compiling file "/usr/share/common-lisp/source/ironclad/src/octet-stream.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/octet-stream-tmpJAVYBOA5.fasl
; compilation finished in 0:00:02.890
; compiling file "/usr/share/common-lisp/source/ironclad/src/aead/aead.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/aead/aead-tmp4JWQGV5Z.fasl
; compilation finished in 0:00:00.150
; compiling file "/usr/share/common-lisp/source/ironclad/src/kdf/kdf.lisp" (written 18 FEB 2022 01:39:10 PM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFUN LIST-ALL-KDFS ...)
; processing (DEFUN MAKE-KDF ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/kdf/kdf-tmpPQD2HT0O.fasl
; compilation finished in 0:00:00.140
; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/public-key.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/public-key/public-key-tmpH1FK4I19.fasl
; compilation finished in 0:00:00.380
; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/pkcs1.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/public-key/pkcs1-tmpOGMGFZE8.fasl
; compilation finished in 0:00:00.560
; compiling file "/usr/share/common-lisp/source/ironclad/src/public-key/elliptic-curve.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/public-key/elliptic-curve-tmpP2P3SY1J.fasl
; compilation finished in 0:00:00.010
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/aes.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/aes-tmpH6YIZTI1.fasl
; compilation finished in 0:00:03.725
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/arcfour.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/arcfour-tmpSJEPG7AU.fasl
; compilation finished in 0:00:00.265
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/aria.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/aria-tmpSNZATJRM.fasl
; compilation finished in 0:00:08.615
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/blowfish.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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: 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/blowfish-tmpK93FRK93.fasl
; compilation finished in 0:00:05.670
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/camellia.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/camellia-tmpUIQ1NDZ1.fasl
; compilation finished in 0:00:02.826
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/cast5.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/cast5-tmp7V5GAYEU.fasl
; compilation finished in 0:00:04.615
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/chacha.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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 ...)
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/chacha-tmpB7TVS35O.fasl
; compilation finished in 0:00:04.990
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/xchacha.lisp" (written 18 FEB 2022 01:39:10 PM):
; processing (IN-PACKAGE :CRYPTO)
; processing (DEFCLASS XCHACHA ...)
; processing (DEFCLASS XCHACHA/12 ...)
; processing (DEFCLASS XCHACHA/8 ...)
; processing (DEFMETHOD SHARED-INITIALIZE ...)
; processing (DEFCIPHER XCHACHA ...)
; processing (DEFCIPHER XCHACHA/12 ...)
; processing (DEFCIPHER XCHACHA/8 ...)
; wrote /<<PKGBUILDDIR>>/debian/home/.cache/common-lisp/sbcl-2.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/xchacha-tmpJOMD2L5F.fasl
; compilation finished in 0:00:00.405
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/des.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/des-tmpDH22VGZN.fasl
; compilation finished in 0:00:01.675
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/idea.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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.2.3.debian-linux-arm/usr/share/common-lisp/source/ironclad/src/ciphers/idea-tmpXDMVI6M.fasl
; compilation finished in 0:00:00.845
; compiling file "/usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp" (written 18 FEB 2022 01:39:10 PM):
; 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 64) &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 64) &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 64) &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 64) &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
; 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 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
; (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 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
; (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 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
; (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 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
; (UNSIGNED-BYTE
; 32)
; &REST 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 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
; (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 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
; (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 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
; (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 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
; (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 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
; (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 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
; (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: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-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 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
; (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: 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 64) &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 64) &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 64) &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 64) &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 64) &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 64) &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 64) &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 64) &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::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 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
; (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
; (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
; (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 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
; (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
; (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
; (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 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
; (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
; (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
; (UNSIGNED-BYTE
; 32)
; &REST 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 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
; (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
; (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
; (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 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
; (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
; (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
; (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 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
; (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
; (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
; (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 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
; (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
; (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
; (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 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
; (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
; (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
; (UNSIGNED-BYTE
; 32)
; &REST T).
; (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.
; (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.
; 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)
; --> 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 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
; (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
; (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
; (UNSIGNED-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: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-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 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
; (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
; (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
; (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::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 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 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: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-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 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
; (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
; (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
; (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: 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 64) &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 64) &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 64) &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 64) &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 64) &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 64) &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 64) &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 64) &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 64) &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 64) &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 64) &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 64) &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 64) &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 64) &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 64) &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 64) &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 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
; (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
; (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
; (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
; (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
; (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
; (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
; (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 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
; (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
; (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
; (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
; (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
; (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
; (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
; (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 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
; (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
; (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
; (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
; (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
; (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
; (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
; (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 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
; (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
; (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
; (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
; (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
; (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
; (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
; (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 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 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 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: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 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::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 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
; (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
; (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
; (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
; (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
; (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
; (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
; (UNSIGNED-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: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::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)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 40), not a FIXNUM.
; unable to do inline (unsigned-byte 32) arithmetic (cost 2) because:
; The first argument is a (UNSIGNED-BYTE 40), not a (UNSIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2=(&OPTIONAL)), not a (VALUES
; FIXNUM
; &REST
; T).
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; The result is a (VALUES (UNSIGNED-BYTE 32) . #2#), not a (VALUES
; (SIGNED-BYTE
; 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The result is a (VALUES INTEGER . #1#), not a (VALUES (UNSIGNED-BYTE 32)
; &REST T).
; etc.
;
; note: forced to do full call
; unable to do #1=inline ASH (cost 1) because:
; The first argument is a (UNSIGNED-BYTE 64), not a FIXNUM.
; unable to do #1# (cost 3) because:
; The first argument is a (UNSIGNED-BYTE 64), not a (SIGNED-BYTE 32).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER . #1=(&OPTIONAL)), not a (VALUES FIXNUM
; &REST T).
; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32).
; The 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)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 32))
; (AREF IRONCLAD::T1 4)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 40))
; (AREF IRONCLAD::T1 5)
; ...)
; --> 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)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 32))
; (AREF IRONCLAD::T1 4)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 40))
; (AREF IRONCLAD::T1 5)
; ...)
; --> 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)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 32))
; (AREF IRONCLAD::T1 4)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 40))
; (AREF IRONCLAD::T1 5)
; ...)
; --> 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)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 32))
; (AREF IRONCLAD::T1 4)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 40))
; (AREF IRONCLAD::T1 5)
; ...)
; --> 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 4)
;
; 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)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 32))
; (AREF IRONCLAD::T1 4)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 40))
; (AREF IRONCLAD::T1 5)
; ...)
; --> 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 5)
;
; 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)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 32))
; (AREF IRONCLAD::T1 4)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 40))
; (AREF IRONCLAD::T1 5)
; ...)
; --> 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 6)
;
; 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)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 32))
; (AREF IRONCLAD::T1 4)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 40))
; (AREF IRONCLAD::T1 5)
; ...)
; --> 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 7)
;
; 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)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 32))
; (AREF IRONCLAD::T1 4)
; (IRONCLAD:UB64REF/LE IRONCLAD::CIPHERTEXT
; (+ IRONCLAD::CIPHERTEXT-START 40))
; (AREF IRONCLAD::T1 5)
; ...)
; --> 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)
; (IRONCLAD:UB64REF/LE IRONCLAD::PLAINTEXT (+ IRONCLAD::PLAINTEXT-START 32))
; --> 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 40))
; --> 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 48))
; --> 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 56))
; --> 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 KALYNA512 ...)
; file: /usr/share/common-lisp/source/ironclad/src/ciphers/kalyna.lisp
; in: DEFINE-BLOCK-DECRYPTOR KALYNA512
; (IRONCLAD::KALYNA-SUB-KEY 8 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 144)
; --> 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::CIPHERTEXT (+ IRONCLAD::CIPHERTEXT-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::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 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::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 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::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::KALYNA-IGL512 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 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
; (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
; (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
; (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
; (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
; (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
; (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
; (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:UB64REF/LE IRONCLAD::CIPHERTEXT (+ IRONCLAD::CIPHERTEXT-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::KALYNA-SUB-KEY 8 IRONCLAD::T2 IRONCLAD::T1
; IRONCLAD::DECRYPTION-ROUND-KEYS 144)
; --> 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.
;
; 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-IMC512 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)
; &