>>> nyxt: Building community/nyxt 3.12.0-r0 (using abuild 3.15.0_rc3-r2) started Sat, 10 May 2025 20:02:59 +0000
>>> nyxt: Validating /home/buildozer/aports/community/nyxt/APKBUILD...
>>> nyxt: Analyzing dependencies...
>>> nyxt: Installing for build: build-base gobject-introspection libffi libcrypto3 libssl3 mesa-gles so:libfixposix.so.4 so:libwebkit2gtk-4.1.so.0 libffi-dev libfixposix-dev sbcl webkit2gtk-4.1-dev
(1/303) Installing libffi (3.4.8-r0)
(2/303) Installing libintl (0.24-r0)
(3/303) Installing libeconf (0.6.3-r0)
(4/303) Installing libblkid (2.41-r7)
(5/303) Installing libmount (2.41-r7)
(6/303) Installing glib (2.84.1-r0)
(7/303) Installing gobject-introspection (1.84.0-r0)
(8/303) Installing xz-libs (5.8.1-r0)
(9/303) Installing libxml2 (2.13.8-r0)
(10/303) Installing llvm20-libs (20.1.4-r0)
(11/303) Installing spirv-tools (1.4.313.0-r0)
(12/303) Installing libxau (1.0.12-r0)
(13/303) Installing libmd (1.1.0-r0)
(14/303) Installing libbsd (0.12.2-r0)
(15/303) Installing libxdmcp (1.1.5-r1)
(16/303) Installing libxcb (1.17.0-r0)
(17/303) Installing libx11 (1.8.11-r0)
(18/303) Installing hwdata-pci (0.395-r0)
(19/303) Installing libpciaccess (0.18.1-r0)
(20/303) Installing libdrm (2.4.124-r0)
(21/303) Installing libelf (0.193-r0)
(22/303) Installing wayland-libs-server (1.23.1-r3)
(23/303) Installing libxshmfence (1.3.3-r0)
(24/303) Installing mesa (25.0.5-r0)
(25/303) Installing mesa-gles (25.0.5-r0)
(26/303) Installing libfixposix (0.5.1-r0)
(27/303) Installing bubblewrap (0.11.0-r0)
(28/303) Installing dbus-libs (1.16.2-r1)
(29/303) Installing dbus (1.16.2-r1)
Executing dbus-1.16.2-r1.pre-install
Executing dbus-1.16.2-r1.post-install
(30/303) Installing dbus-daemon-launch-helper (1.16.2-r1)
(31/303) Installing xdg-dbus-proxy (0.1.6-r0)
(32/303) Installing libxext (1.3.6-r2)
(33/303) Installing libxrender (0.9.12-r0)
(34/303) Installing libbz2 (1.0.8-r6)
(35/303) Installing libpng (1.6.47-r0)
(36/303) Installing freetype (2.13.3-r0)
(37/303) Installing fontconfig (2.15.0-r3)
(38/303) Installing pixman (0.46.0-r0)
(39/303) Installing cairo (1.18.2-r1)
(40/303) Installing libgpg-error (1.55-r0)
(41/303) Installing libgcrypt (1.10.3-r1)
(42/303) Installing hicolor-icon-theme (0.18-r0)
(43/303) Installing shared-mime-info (2.4-r5)
(44/303) Installing libjpeg-turbo (3.1.0-r0)
(45/303) Installing libsharpyuv (1.5.0-r0)
(46/303) Installing libwebp (1.5.0-r0)
(47/303) Installing tiff (4.7.0-r0)
(48/303) Installing gdk-pixbuf (2.42.12-r1)
(49/303) Installing gtk-update-icon-cache (3.24.49-r1)
(50/303) Installing libxcomposite (0.4.6-r5)
(51/303) Installing libxfixes (6.0.1-r4)
(52/303) Installing libxcursor (1.2.3-r0)
(53/303) Installing libxdamage (1.1.6-r5)
(54/303) Installing libxi (1.8.2-r0)
(55/303) Installing libxinerama (1.1.5-r4)
(56/303) Installing libxrandr (1.5.4-r1)
(57/303) Installing libatk-1.0 (2.56.2-r0)
(58/303) Installing at-spi2-core-libs (2.56.2-r0)
(59/303) Installing libxtst (1.2.5-r0)
(60/303) Installing at-spi2-core (2.56.2-r0)
(61/303) Installing libatk-bridge-2.0 (2.56.2-r0)
(62/303) Installing cairo-gobject (1.18.2-r1)
(63/303) Installing avahi-libs (0.8-r20)
(64/303) Installing nettle (3.10.1-r0)
(65/303) Installing libtasn1 (4.20.0-r0)
(66/303) Installing p11-kit (0.25.5-r2)
(67/303) Installing gnutls (3.8.8-r0)
(68/303) Installing cups-libs (2.4.11-r0)
(69/303) Installing libepoxy (1.5.10-r1)
(70/303) Installing fribidi (1.0.16-r0)
(71/303) Installing graphite2 (1.3.14-r6)
(72/303) Installing harfbuzz (10.2.0-r1)
(73/303) Installing libxft (2.3.8-r3)
(74/303) Installing pango (1.56.3-r0)
(75/303) Installing wayland-libs-client (1.23.1-r3)
(76/303) Installing wayland-libs-cursor (1.23.1-r3)
(77/303) Installing wayland-libs-egl (1.23.1-r3)
(78/303) Installing xkeyboard-config (2.43-r0)
(79/303) Installing libxkbcommon (1.8.1-r2)
(80/303) Installing gtk+3.0 (3.24.49-r1)
(81/303) Installing gcr-base (3.41.2-r1)
(82/303) Installing gcr (3.41.2-r1)
(83/303) Installing libcap-ng (0.8.5-r0)
(84/303) Installing gnome-keyring (48.0-r0)
(85/303) Installing linux-pam (1.7.0-r3)
(86/303) Installing gnome-keyring-pam (48.0-r0)
(87/303) Installing aom-libs (3.12.1-r0)
(88/303) Installing libdav1d (1.5.1-r0)
(89/303) Installing libyuv (0.0.1887.20251502-r1)
(90/303) Installing libavif (1.2.1-r1)
(91/303) Installing enchant2-libs (2.8.2-r1)
(92/303) Installing alsa-lib (1.2.14-r0)
(93/303) Installing flite (2.2-r5)
(94/303) Installing mesa-gbm (25.0.5-r0)
(95/303) Installing mesa-egl (25.0.5-r0)
(96/303) Installing libxxf86vm (1.1.6-r0)
(97/303) Installing mesa-gl (25.0.5-r0)
(98/303) Installing libxv (1.0.13-r0)
(99/303) Installing cdparanoia-libs (10.2-r14)
(100/303) Installing graphene (1.10.8-r5)
(101/303) Installing gstreamer (1.24.12-r0)
(102/303) Installing gstreamer-ptp-helper (1.24.12-r0)
(103/303) Installing libogg (1.3.5-r5)
(104/303) Installing opus (1.5.2-r1)
(105/303) Installing orc (0.4.40-r1)
(106/303) Installing libtheora (1.1.1-r18)
(107/303) Installing libvorbis (1.3.7-r2)
(108/303) Installing gst-plugins-base (1.24.12-r0)
(109/303) Installing openexr-libiex (3.3.2-r0)
(110/303) Installing imath (3.1.12-r0)
(111/303) Installing openexr-libilmthread (3.3.2-r0)
(112/303) Installing libdeflate (1.23-r0)
(113/303) Installing openexr-libopenexrcore (3.3.2-r0)
(114/303) Installing openexr-libopenexr (3.3.2-r0)
(115/303) Installing soundtouch (2.3.3-r0)
(116/303) Installing libunibreak (6.1-r0)
(117/303) Installing libass (0.17.3-r0)
(118/303) Installing libraw1394 (2.1.2-r5)
(119/303) Installing libusb (1.0.28-r0)
(120/303) Installing libdc1394 (2.2.7-r0)
(121/303) Installing libde265 (1.0.15-r1)
(122/303) Installing tslib (1.23-r0)
(123/303) Installing directfb (1.7.7-r8)
(124/303) Installing faac (1.30-r5)
(125/303) Installing fdk-aac (2.0.2-r4)
(126/303) Installing libfreeaptx (0.2.2-r0)
(127/303) Installing gsm (1.0.22-r3)
(128/303) Installing eudev-libs (3.2.14-r5)
(129/303) Installing libgudev (238-r0)
(130/303) Installing lcms2 (2.16-r0)
(131/303) Installing libldac (2.0.2.3-r1)
(132/303) Installing libmodplug (0.8.9.0-r3)
(133/303) Installing ca-certificates (20241121-r2)
(134/303) Installing neon (0.33.0-r0)
(135/303) Installing libnice (0.1.22-r0)
(136/303) Installing openal-soft-libs (1.24.2-r0)
(137/303) Installing openh264 (2.6.0-r0)
(138/303) Installing openjpeg (2.5.3-r0)
(139/303) Installing librsvg (2.60.0-r0)
(140/303) Installing librtmp (2.4_git20190330-r5)
(141/303) Installing sbc (2.0-r2)
(142/303) Installing libflac (1.4.3-r1)
(143/303) Installing lame-libs (3.100-r5)
(144/303) Installing mpg123-libs (1.32.10-r0)
(145/303) Installing libsndfile (1.2.2-r2)
(146/303) Installing spandsp (0.0.6-r5)
(147/303) Installing libsrt (1.5.3-r1)
(148/303) Installing libsrtp (2.6.0-r0)
(149/303) Installing libva (2.22.0-r1)
(150/303) Installing vo-aacenc (0.1.3-r3)
(151/303) Installing vo-amrwbenc (0.1.3-r3)
(152/303) Installing libwebpmux (1.5.0-r0)
(153/303) Installing libzbar (0.23.93-r1)
(154/303) Installing gst-plugins-bad (1.24.12-r3)
(155/303) Installing icu-data-en (76.1-r0)
Executing icu-data-en-76.1-r0.post-install
*
* If you need ICU with non-English locales and legacy charset support, install
* package icu-data-full.
*
(156/303) Installing icu-libs (76.1-r0)
(157/303) Installing harfbuzz-icu (10.2.0-r1)
(158/303) Installing hyphen (2.8.8-r3)
(159/303) Installing giflib (5.2.2-r1)
(160/303) Installing libhwy (1.0.7-r1)
(161/303) Installing libjxl (0.10.3-r2)
(162/303) Installing libevdev (1.13.3-r0)
(163/303) Installing hidapi (0.14.0-r0)
(164/303) Installing libmanette (0.2.12-r0)
(165/303) Installing libseccomp (2.6.0-r0)
(166/303) Installing libsecret (0.21.7-r0)
(167/303) Installing gsettings-desktop-schemas (48.0-r0)
(168/303) Installing duktape-libs (2.7.0-r2)
(169/303) Installing libproxy (0.5.9-r0)
(170/303) Installing glib-networking (2.80.1-r1)
(171/303) Installing sqlite-libs (3.49.2-r0)
(172/303) Installing libsoup3 (3.6.5-r0)
(173/303) Installing libwebpdemux (1.5.0-r0)
(174/303) Installing libwoff2common (1.0.2-r4)
(175/303) Installing libwoff2enc (1.0.2-r4)
(176/303) Installing libxslt (1.1.43-r3)
(177/303) Installing webkit2gtk-4.1 (2.48.1-r1)
(178/303) Installing linux-headers (6.14.2-r0)
(179/303) Installing libffi-dev (3.4.8-r0)
(180/303) Installing libfixposix-dev (0.5.1-r0)
(181/303) Installing sbcl (2.5.4-r0)
(182/303) Installing bzip2-dev (1.0.8-r6)
(183/303) Installing libxml2-utils (2.13.8-r0)
(184/303) Installing docbook-xml (4.5-r10)
Executing docbook-xml-4.5-r10.post-install
(185/303) Installing docbook-xsl-ns (1.79.2-r11)
Executing docbook-xsl-ns-1.79.2-r11.post-install
(186/303) Installing docbook-xsl-nons (1.79.2-r11)
Executing docbook-xsl-nons-1.79.2-r11.post-install
(187/303) Installing docbook-xsl (1.79.2-r11)
(188/303) Installing xz (5.8.1-r0)
(189/303) Installing gettext-asprintf (0.24-r0)
(190/303) Installing gettext-libs (0.24-r0)
(191/303) Installing gettext-envsubst (0.24-r0)
(192/303) Installing gettext (0.24-r0)
(193/303) Installing gettext-dev (0.24-r0)
(194/303) Installing gdbm (1.24-r0)
(195/303) Installing mpdecimal (4.0.0-r0)
(196/303) Installing libpanelw (6.5_p20250503-r0)
(197/303) Installing python3 (3.12.10-r0)
(198/303) Installing python3-pycache-pyc0 (3.12.10-r0)
(199/303) Installing pyc (3.12.10-r0)
(200/303) Installing python3-pyc (3.12.10-r0)
(201/303) Installing py3-parsing (3.2.3-r0)
(202/303) Installing py3-parsing-pyc (3.2.3-r0)
(203/303) Installing py3-packaging (25.0-r0)
(204/303) Installing py3-packaging-pyc (25.0-r0)
(205/303) Installing bsd-compat-headers (0.7.2-r6)
(206/303) Installing libformw (6.5_p20250503-r0)
(207/303) Installing libmenuw (6.5_p20250503-r0)
(208/303) Installing libncurses++ (6.5_p20250503-r0)
(209/303) Installing ncurses-dev (6.5_p20250503-r0)
(210/303) Installing libedit-dev (20250104.3.1-r0)
(211/303) Installing zlib-dev (1.3.1-r2)
(212/303) Installing libpcre2-16 (10.43-r1)
(213/303) Installing libpcre2-32 (10.43-r1)
(214/303) Installing pcre2-dev (10.43-r1)
(215/303) Installing libuuid (2.41-r7)
(216/303) Installing libfdisk (2.41-r7)
(217/303) Installing liblastlog2 (2.41-r7)
(218/303) Installing libsmartcols (2.41-r7)
(219/303) Installing sqlite (3.49.2-r0)
(220/303) Installing sqlite-dev (3.49.2-r0)
(221/303) Installing util-linux-dev (2.41-r7)
(222/303) Installing glib-dev (2.84.1-r0)
(223/303) Installing libturbojpeg (3.1.0-r0)
(224/303) Installing libjpeg-turbo-dev (3.1.0-r0)
(225/303) Installing libpng-dev (1.6.47-r0)
(226/303) Installing libtiffxx (4.7.0-r0)
(227/303) Installing libwebpdecoder (1.5.0-r0)
(228/303) Installing libwebp-dev (1.5.0-r0)
(229/303) Installing zstd (1.5.7-r0)
(230/303) Installing zstd-dev (1.5.7-r0)
(231/303) Installing tiff-dev (4.7.0-r0)
(232/303) Installing gdk-pixbuf-dev (2.42.12-r1)
(233/303) Installing xorgproto (2024.1-r0)
(234/303) Installing libxau-dev (1.0.12-r0)
(235/303) Installing xcb-proto (1.17.0-r0)
(236/303) Installing xcb-proto-pyc (1.17.0-r0)
(237/303) Installing libxdmcp-dev (1.1.5-r1)
(238/303) Installing libxcb-dev (1.17.0-r0)
(239/303) Installing xtrans (1.5.2-r0)
(240/303) Installing libx11-dev (1.8.11-r0)
(241/303) Installing libpciaccess-dev (0.18.1-r0)
(242/303) Installing libdrm-dev (2.4.124-r0)
(243/303) Installing libxext-dev (1.3.6-r2)
(244/303) Installing libxfixes-dev (6.0.1-r4)
(245/303) Installing libxdamage-dev (1.1.6-r5)
(246/303) Installing libxshmfence-dev (1.3.3-r0)
(247/303) Installing clang20-headers (20.1.4-r0)
(248/303) Installing libclc (20.1.4-r0)
(249/303) Installing spirv-llvm-translator-libs (20.1.2-r0)
(250/303) Installing clang20-libs (20.1.4-r0)
(251/303) Installing mesa-rusticl (25.0.5-r0)
(252/303) Installing mesa-xatracker (25.0.5-r0)
(253/303) Installing libxxf86vm-dev (1.1.6-r0)
(254/303) Installing mesa-dev (25.0.5-r0)
(255/303) Installing libepoxy-dev (1.5.10-r1)
(256/303) Installing libxi-dev (1.8.2-r0)
(257/303) Installing libxinerama-dev (1.1.5-r4)
(258/303) Installing libxkbcommon-x11 (1.8.1-r2)
(259/303) Installing xz-dev (5.8.1-r0)
(260/303) Installing libxml2-dev (2.13.8-r0)
(261/303) Installing libxkbcommon-dev (1.8.1-r2)
(262/303) Installing wayland-protocols (1.44-r0)
(263/303) Installing dbus-dev (1.16.2-r1)
(264/303) Installing libxtst-dev (1.2.5-r0)
(265/303) Installing at-spi2-core-dev (2.56.2-r0)
(266/303) Installing cairo-tools (1.18.2-r1)
(267/303) Installing expat (2.7.1-r0)
(268/303) Installing expat-dev (2.7.1-r0)
(269/303) Installing brotli (1.1.0-r2)
(270/303) Installing brotli-dev (1.1.0-r2)
(271/303) Installing freetype-dev (2.13.3-r0)
(272/303) Installing fontconfig-dev (2.15.0-r3)
(273/303) Installing libxrender-dev (0.9.12-r0)
(274/303) Installing pixman-dev (0.46.0-r0)
(275/303) Installing util-macros (1.20.1-r0)
(276/303) Installing xcb-util (0.4.1-r3)
(277/303) Installing xcb-util-dev (0.4.1-r3)
(278/303) Installing cairo-dev (1.18.2-r1)
(279/303) Installing fribidi-dev (1.0.16-r0)
(280/303) Installing pango-tools (1.56.3-r0)
(281/303) Installing harfbuzz-cairo (10.2.0-r1)
(282/303) Installing harfbuzz-gobject (10.2.0-r1)
(283/303) Installing harfbuzz-subset (10.2.0-r1)
(284/303) Installing graphite2-dev (1.3.14-r6)
(285/303) Installing icu (76.1-r0)
(286/303) Installing icu-dev (76.1-r0)
(287/303) Installing harfbuzz-dev (10.2.0-r1)
(288/303) Installing libxft-dev (2.3.8-r3)
(289/303) Installing pango-dev (1.56.3-r0)
(290/303) Installing wayland-dev (1.23.1-r3)
(291/303) Installing libxcomposite-dev (0.4.6-r5)
(292/303) Installing libxcursor-dev (1.2.3-r0)
(293/303) Installing libxrandr-dev (1.5.4-r1)
(294/303) Installing gtk+3.0-dev (3.24.49-r1)
(295/303) Installing nghttp2-dev (1.65.0-r0)
(296/303) Installing libpsl-utils (0.21.5-r3)
(297/303) Installing libidn2-dev (2.3.7-r0)
(298/303) Installing libpsl-dev (0.21.5-r3)
(299/303) Installing libsoup3-dev (3.6.5-r0)
(300/303) Installing webkit2gtk-4.1-dev (2.48.1-r1)
(301/303) Installing .makedepends-nyxt (20250510.200309)
(302/303) Installing gnome-keyring-openrc (48.0-r0)
(303/303) Installing dbus-openrc (1.16.2-r1)
Executing busybox-1.37.0-r17.trigger
Executing glib-2.84.1-r0.trigger
Executing dbus-1.16.2-r1.trigger
Executing shared-mime-info-2.4-r5.trigger
Executing gdk-pixbuf-2.42.12-r1.trigger
Executing gtk-update-icon-cache-3.24.49-r1.trigger
Executing gtk+3.0-3.24.49-r1.trigger
Executing ca-certificates-20241121-r2.trigger
OK: 1314 MiB in 407 packages
>>> nyxt: Cleaning up srcdir
>>> nyxt: Cleaning up pkgdir
>>> nyxt: Cleaning up tmpdir
>>> nyxt: Fetching https://distfiles.alpinelinux.org/distfiles/v3.22/nyxt-3.12.0.tar.xz
Connecting to distfiles.alpinelinux.org (172.105.82.32:443)
wget: server returned error: HTTP/1.1 404 Not Found
>>> nyxt: Fetching nyxt-3.12.0.tar.xz::https://github.com/atlas-engineer/nyxt/releases/download/3.12.0/nyxt-3.12.0-source-with-submodules.tar.xz
Connecting to github.com (140.82.121.3:443)
Connecting to objects.githubusercontent.com (185.199.111.133:443)
saving to '/var/cache/distfiles/v3.22/nyxt-3.12.0.tar.xz.part'
nyxt-3.12.0.tar.xz.p 31% |********* | 5486k 0:00:02 ETA
nyxt-3.12.0.tar.xz.p 59% |******************* | 10.3M 0:00:01 ETA
nyxt-3.12.0.tar.xz.p 67% |********************* | 11.7M 0:00:01 ETA
nyxt-3.12.0.tar.xz.p 72% |*********************** | 12.5M 0:00:01 ETA
nyxt-3.12.0.tar.xz.p 77% |************************ | 13.3M 0:00:01 ETA
nyxt-3.12.0.tar.xz.p 82% |************************** | 14.2M 0:00:01 ETA
nyxt-3.12.0.tar.xz.p 85% |*************************** | 14.7M 0:00:01 ETA
nyxt-3.12.0.tar.xz.p 88% |**************************** | 15.2M 0:00:01 ETA
nyxt-3.12.0.tar.xz.p 90% |***************************** | 15.7M 0:00:00 ETA
nyxt-3.12.0.tar.xz.p 93% |***************************** | 16.1M 0:00:00 ETA
nyxt-3.12.0.tar.xz.p 95% |****************************** | 16.5M 0:00:00 ETA
nyxt-3.12.0.tar.xz.p 97% |******************************* | 16.8M 0:00:00 ETA
nyxt-3.12.0.tar.xz.p 100% |********************************| 17.2M 0:00:00 ETA
'/var/cache/distfiles/v3.22/nyxt-3.12.0.tar.xz.part' saved
>>> nyxt: Fetching https://distfiles.alpinelinux.org/distfiles/v3.22/nyxt-3.12.0.tar.xz
>>> nyxt: Checking sha512sums...
nyxt-3.12.0.tar.xz: OK
001-libfixposix.patch: OK
>>> nyxt: Unpacking /var/cache/distfiles/v3.22/nyxt-3.12.0.tar.xz...
>>> nyxt: 001-libfixposix.patch
patching file _build/iolib/src/syscalls/ffi-functions-unix.lisp
sbcl --dynamic-space-size 3072 --no-userinit --non-interactive --eval '(require "asdf")' --eval '(when (string= "true" "true") (setf asdf:*default-source-registries* (list (quote asdf/source-registry:environment-source-registry))) (asdf:clear-configuration) (asdf:load-asd "/home/buildozer/aports/community/nyxt/src//libraries/nasdf/nasdf.asd") (asdf:load-asd "/home/buildozer/aports/community/nyxt/src//nyxt.asd") (asdf:load-system :nyxt/submodules))' --eval '(asdf:load-asd "/home/buildozer/aports/community/nyxt/src//libraries/nasdf/nasdf.asd")' --eval '(asdf:load-asd "/home/buildozer/aports/community/nyxt/src//nyxt.asd")' --eval '(asdf:load-system :nyxt/gi-gtk-application)' \
--eval '(asdf:make :nyxt/gi-gtk-application)' \
--eval '(uiop:quit)' || (printf "\n%s\n%s\n" "Compilation failed, see the above stacktrace." && exit 1)
This is SBCL 2.5.4, an implementation of ANSI Common Lisp.
More information about SBCL is available at .
SBCL is free software, provided as is, with absolutely no warranty.
It is mostly in the public domain; some portions are provided under
BSD-style licenses. See the CREDITS and COPYING files in the
distribution for more information.
; compiling file "/home/buildozer/aports/community/nyxt/src/libraries/nasdf/package.lisp" (written 20 OCT 2024 03:54:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/libraries/nasdf/package-tmpGHU3ALSV.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/libraries/nasdf/log.lisp" (written 20 OCT 2024 03:54:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/libraries/nasdf/log-tmpAAURSO1.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/libraries/nasdf/nasdf.lisp" (written 20 OCT 2024 03:54:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/libraries/nasdf/nasdf-tmp5GEXGEG5.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/libraries/nasdf/install.lisp" (written 20 OCT 2024 03:54:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/libraries/nasdf/install-tmpAR3FSGEY.fasl
; compilation finished in 0:00:00.133
; compiling file "/home/buildozer/aports/community/nyxt/src/libraries/nasdf/submodules.lisp" (written 20 OCT 2024 03:54:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/libraries/nasdf/submodules-tmpJAIDFZTC.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/libraries/nasdf/systems.lisp" (written 20 OCT 2024 03:54:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/libraries/nasdf/systems-tmp8V3J6PE9.fasl
; compilation finished in 0:00:00.043
; compiling file "/home/buildozer/aports/community/nyxt/src/libraries/nasdf/tests.lisp" (written 20 OCT 2024 03:54:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/libraries/nasdf/tests-tmp9V47YWQF.fasl
; compilation finished in 0:00:00.043
; compiling file "/home/buildozer/aports/community/nyxt/src/libraries/nasdf/compilation-tests.lisp" (written 20 OCT 2024 03:54:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/libraries/nasdf/compilation-tests-tmp9BN22RMA.fasl
; compilation finished in 0:00:00.036
; running ("git" "-C" "/home/buildozer/aports/community/nyxt/src/" "submodule"
"update" "--init" "--force" "--jobs" "4")
fatal: not a git repository (or any of the parent directories): .git
; CL_SOURCE_REGISTRY: "/home/buildozer/aports/community/nyxt/src/_build//:/home/buildozer/aports/community/nyxt/src/:"
WARNING: System definition file #P"/home/buildozer/aports/community/nyxt/src/_build/trivial-garbage/trivial-garbage.asd" contains definition for system "trivial-garbage-tests". Please only define "trivial-garbage" and secondary systems with a name starting with "trivial-garbage/" (e.g. "trivial-garbage/test") in that file.
WARNING: System definition file #P"/home/buildozer/aports/community/nyxt/src/_build/calispel/calispel.asd" contains definition for system "calispel-test". Please only define "calispel" and secondary systems with a name starting with "calispel/" (e.g. "calispel/test") in that file.
WARNING: System definition file #P"/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/cl-ppcre.asd" contains definition for system "cl-ppcre-test". Please only define "cl-ppcre" and secondary systems with a name starting with "cl-ppcre/" (e.g. "cl-ppcre/test") in that file.
WARNING: System definition file #P"/home/buildozer/aports/community/nyxt/src/_build/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.
WARNING: System definition file #P"/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/cl-ppcre-unicode.asd" contains definition for system "cl-ppcre-unicode-test". Please only define "cl-ppcre-unicode" and secondary systems with a name starting with "cl-ppcre-unicode/" (e.g. "cl-ppcre-unicode/test") in that file.
WARNING: System definition file #P"/home/buildozer/aports/community/nyxt/src/_build/s-xml/s-xml.asd" contains definition for system "s-xml.test". Please only define "s-xml" and secondary systems with a name starting with "s-xml/" (e.g. "s-xml/test") in that file.
WARNING: System definition file #P"/home/buildozer/aports/community/nyxt/src/_build/s-xml/s-xml.asd" contains definition for system "s-xml.examples". Please only define "s-xml" and secondary systems with a name starting with "s-xml/" (e.g. "s-xml/test") in that file.
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/trivial-features/src/tf-sbcl.lisp" (written 20 OCT 2024 03:57:51 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/trivial-features/src/tf-sbcl-tmp1CXFJSK9.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/package.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/package-tmpX4BRKI0R.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/definitions.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/definitions-tmpQ371UGST.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/binding.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/binding-tmp2OWI3Q7U.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/strings.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/strings-tmp9KKTJMYV.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/conditions.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/conditions-tmpJU0JWO19.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/symbols.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/symbols-tmpZX2WN8N4.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/macros.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/macros-tmpOU81XRV0.fasl
; compilation finished in 0:00:00.073
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/functions.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/functions-tmpY2ML9CFA.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/lists.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/lists-tmpX2JYJDQE.fasl
; compilation finished in 0:00:00.073
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/types.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/types-tmpOPCILR65.fasl
; compilation finished in 0:00:00.056
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/io.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/io-tmpRV9F8A9A.fasl
; compilation finished in 0:00:00.116
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/hash-tables.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/hash-tables-tmpK2ZAJT4I.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/control-flow.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/control-flow-tmpUX5S4ADN.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/arrays.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/arrays-tmp10401X32.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/sequences.lisp" (written 20 OCT 2024 03:56:16 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/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.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/sequences-tmpZ7CBRM0G.fasl
; compilation finished in 0:00:00.116
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/numbers.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/numbers-tmp9OZEQ0G2.fasl
; compilation finished in 0:00:00.093
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/features.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-1/features-tmpB2JTL1W9.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-2/package.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-2/package-tmpP3BI68WQ.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-2/arrays.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-2/arrays-tmpQDARA81Z.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-2/control-flow.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-2/control-flow-tmpYEMMM7SE.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-2/sequences.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-2/sequences-tmp73HU0RPK.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-2/lists.lisp" (written 20 OCT 2024 03:56:16 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/alexandria/alexandria-2/lists-tmpIO5N7K88.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/babel/src/packages.lisp" (written 20 OCT 2024 03:56:19 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/babel/src/packages-tmpCM21U60Z.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/babel/src/encodings.lisp" (written 20 OCT 2024 03:56:19 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/babel/src/encodings-tmp9DT7SEFG.fasl
; compilation finished in 0:00:00.070
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-ascii.lisp" (written 20 OCT 2024 03:56:19 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-ascii-tmp8065ESJT.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-ebcdic.lisp" (written 20 OCT 2024 03:56:19 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-ebcdic-tmp7S8Z6FGF.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-ebcdic-int.lisp" (written 20 OCT 2024 03:56:19 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-ebcdic-int-tmpSIT3QPKP.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-iso-8859.lisp" (written 20 OCT 2024 03:56:19 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-iso-8859-tmpE0PA0714.fasl
; compilation finished in 0:00:00.063
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-unicode.lisp" (written 20 OCT 2024 03:56:19 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-unicode-tmpJRWHHVG0.fasl
; compilation finished in 0:00:00.120
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-cp437.lisp" (written 20 OCT 2024 03:56:19 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-cp437-tmp4WZVROCX.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-cp1251.lisp" (written 20 OCT 2024 03:56:19 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-cp1251-tmpA0I3UKX8.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-cp1252.lisp" (written 20 OCT 2024 03:56:19 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-cp1252-tmp267Y2N80.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/babel/src/jpn-table.lisp" (written 20 OCT 2024 03:56:19 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/babel/src/jpn-table-tmpOUPE5FSJ.fasl
; compilation finished in 0:00:00.056
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-jpn.lisp" (written 20 OCT 2024 03:56:19 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-jpn-tmpIGHCU6ZA.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-gbk.lisp" (written 20 OCT 2024 03:56:19 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-gbk-tmpBO0TUGLK.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-koi8.lisp" (written 20 OCT 2024 03:56:19 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-koi8-tmpIIXPIQNW.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/babel/src/external-format.lisp" (written 20 OCT 2024 03:56:19 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/babel/src/external-format-tmpOHM494YR.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/babel/src/strings.lisp" (written 20 OCT 2024 03:56:19 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/babel/src/strings-tmpOVFB07XF.fasl
; compilation finished in 0:00:01.463
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/babel/src/gbk-map.lisp" (written 20 OCT 2024 03:56:19 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/babel/src/gbk-map-tmpG6VFGMYP.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/babel/src/sharp-backslash.lisp" (written 20 OCT 2024 03:56:19 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/babel/src/sharp-backslash-tmp4QIPRMOF.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cffi/src/package.lisp" (written 20 OCT 2024 03:56:21 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cffi/src/package-tmpGW0QV22K.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cffi/src/sys-utils.lisp" (written 20 OCT 2024 03:56:21 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cffi/src/sys-utils-tmp2K9J0HSR.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cffi/src/cffi-sbcl.lisp" (written 20 OCT 2024 03:56:21 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cffi/src/cffi-sbcl-tmpP44I4E0Y.fasl
; compilation finished in 0:00:00.276
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cffi/src/utils.lisp" (written 20 OCT 2024 03:56:21 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cffi/src/utils-tmp63LQ7EX6.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cffi/src/libraries.lisp" (written 20 OCT 2024 03:56:21 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cffi/src/libraries-tmp86F1A8FB.fasl
; compilation finished in 0:00:00.083
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cffi/src/early-types.lisp" (written 20 OCT 2024 03:56:21 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cffi/src/early-types-tmpH7D4HL98.fasl
; compilation finished in 0:00:00.136
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cffi/src/types.lisp" (written 20 OCT 2024 03:56:21 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cffi/src/types-tmpCDM7YXYI.fasl
; compilation finished in 0:00:00.446
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cffi/src/enum.lisp" (written 20 OCT 2024 03:56:21 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cffi/src/enum-tmpLM57P5P.fasl
; compilation finished in 0:00:00.066
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cffi/src/strings.lisp" (written 20 OCT 2024 03:56:21 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cffi/src/strings-tmpZE69DN33.fasl
; compilation finished in 0:00:00.986
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cffi/src/structures.lisp" (written 20 OCT 2024 03:56:21 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cffi/src/structures-tmpG8099TO3.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cffi/src/functions.lisp" (written 20 OCT 2024 03:56:21 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cffi/src/functions-tmpTASQCYAW.fasl
; compilation finished in 0:00:00.090
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cffi/src/foreign-vars.lisp" (written 20 OCT 2024 03:56:21 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cffi/src/foreign-vars-tmp35U57IV6.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cffi/src/features.lisp" (written 20 OCT 2024 03:56:21 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cffi/src/features-tmpTZOONXRW.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cffi/toolchain/package.lisp" (written 20 OCT 2024 03:56:21 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cffi/toolchain/package-tmpWN0UKDSV.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cffi/toolchain/c-toolchain.lisp" (written 20 OCT 2024 03:56:21 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cffi/toolchain/c-toolchain.lisp
; in: DEFUN DEFAULT-TOOLCHAIN-PARAMETERS
; (OR (UIOP/OS:GETENVP "CC") "cc" "gcc")
; --> IF LET IF
; ==>
; "gcc"
;
; note: deleting unreachable code
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cffi/toolchain/c-toolchain-tmpBF3HHBTQ.fasl
; compilation finished in 0:00:00.053
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cffi/toolchain/static-link.lisp" (written 20 OCT 2024 03:56:21 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cffi/toolchain/static-link-tmpGYUNPZCY.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cffi/grovel/package.lisp" (written 20 OCT 2024 03:56:21 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cffi/grovel/package-tmpD68Q8WCA.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cffi/grovel/grovel.lisp" (written 20 OCT 2024 03:56:21 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cffi/grovel/grovel-tmp7MK9KM9C.fasl
; compilation finished in 0:00:00.346
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cffi/grovel/asdf.lisp" (written 20 OCT 2024 03:56:21 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cffi/grovel/asdf-tmpJJ71X849.fasl
; compilation finished in 0:00:00.040
; file: /home/buildozer/aports/community/nyxt/src/_build/babel/src/enc-ebcdic.lisp
; in: DEFUN BABEL-ENCODINGS::EBCDIC-FI-ENCODER
; (BABEL-ENCODINGS::HANDLE-ERROR)
;
; caught STYLE-WARNING:
; undefined function: BABEL-ENCODINGS::HANDLE-ERROR
;
; compilation unit finished
; Undefined function:
; BABEL-ENCODINGS::HANDLE-ERROR
; caught 1 STYLE-WARNING condition
; printed 2 notes
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/asdf.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/asdf-tmp1VUK6SR2.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/conf/pkgdcl.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/conf/pkgdcl-tmpR2FIHSUG.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/conf/requires.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/conf/requires-tmp8PYELRKX.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/new-cl/conduits.lisp" (written 20 OCT 2024 03:57:06 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/iolib/src/new-cl/conduits.lisp
; in: DEFUN CLONE-PACKAGES-TO-PACKAGE
; (FIRST IOLIB/INTERNAL/CONDUITS::E)
;
; note: deleting unreachable code
;
; note: deleting unreachable code
; (PUSH IOLIB/INTERNAL/CONDUITS::E IOLIB/INTERNAL/CONDUITS::ALIASES)
;
; note: deleting unreachable code
; (SETF (IOLIB/INTERNAL/CONDUITS::HP-ALIAS-MAP IOLIB/INTERNAL/CONDUITS::TO)
; (NREVERSE IOLIB/INTERNAL/CONDUITS::ALIASES))
;
; note: deleting unreachable code
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/new-cl/conduits-tmpEHTOKYT0.fasl
; compilation finished in 0:00:00.089
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/new-cl/pkgdcl.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/new-cl/pkgdcl-tmpS6U1VHI9.fasl
; compilation finished in 0:00:00.006
WARNING: IOLIB/COMMON-LISP also exports the following symbols:
(QUOTE DEFINE-SETF-EXPANDER SORT DELETE-DUPLICATES SETF NSUBLIS COERCE AREF NUMERATOR COND NRECONC MAKE-INSTANCE DECLARATION EVAL-WHEN COPY-SEQ OPEN-STREAM-P BOOLE MACHINE-TYPE SYMBOL-PLIST LOOP SET-DIFFERENCE STRING< DESTRUCTURING-BIND LABELS PPRINT-TAB NSTRING-CAPITALIZE LOGTEST FUNCTION-KEYWORDS CHAR-GREATERP CLOSE GO DYNAMIC-EXTENT DEFMACRO SHORT-FLOAT FLOATING-POINT-OVERFLOW CONCATENATED-STREAM-STREAMS PHASE INVOKE-RESTART-INTERACTIVELY PARSE-ERROR RESTART-BIND INPUT-STREAM-P DIGIT-CHAR /= TYPEP DO* ARRAY-DISPLACEMENT MIN FMAKUNBOUND LONG-FLOAT-EPSILON ABORT LEAST-NEGATIVE-NORMALIZED-LONG-FLOAT READ-CHAR-NO-HANG *DEBUG-IO* PPRINT-EXIT-IF-LIST-EXHAUSTED RATIONALP SPECIAL-OPERATOR-P UPPER-CASE-P INVOKE-RESTART REMOVE NSUBST-IF LOGNOR SHADOWING-IMPORT CADAR MAKE-SYNONYM-STREAM GETF COMPLEX REVERSE REMOVE-DUPLICATES FIND UNEXPORT NTHCDR END-OF-FILE CAR SINGLE-FLOAT-EPSILON LET FROUND SHARED-INITIALIZE HANDLER-CASE ED BOOLE-ORC2 STRING>= GRAPHIC-CHAR-P EXP SPEED RETURN ARRAY-RANK CHAR MULTIPLE-VALUE-SETQ UNREAD-CHAR VECTOR-PUSH-EXTEND INTEGER-DECODE-FLOAT LOGIOR STRING-STREAM SLOT-BOUNDP &KEY EQUAL KEYWORDP MAKE-CONCATENATED-STREAM SYNONYM-STREAM NO-APPLICABLE-METHOD STRING-RIGHT-TRIM LOGANDC2 FLOAT-DIGITS SECOND ASINH SET-DISPATCH-MACRO-CHARACTER *BREAK-ON-SIGNALS* PRINT-NOT-READABLE LIST* SET-PPRINT-DISPATCH STANDARD-METHOD *** STRING-NOT-GREATERP UPGRADED-COMPLEX-PART-TYPE *COMPILE-FILE-TRUENAME* MOST-POSITIVE-LONG-FLOAT ARRAY-DIMENSION REMOVE-METHOD ROUND MAPLIST MACROLET NBUTLAST CONSP MAKE-DISPATCH-MACRO-CHARACTER LOAD-LOGICAL-PATHNAME-TRANSLATIONS CADDAR UNTRACE LEAST-POSITIVE-LONG-FLOAT SIMPLE-ERROR PARSE-INTEGER FUNCALL NULL BIT-NOT COMPUTE-RESTARTS &ENVIRONMENT THROW REALPART *PRINT-BASE* CIS CLASS-NAME MAKE-RANDOM-STATE *DEBUGGER-HOOK* HANDLER-BIND BIT-VECTOR CONSTANTP READTABLEP WITH-CONDITION-RESTARTS COUNT-IF STRING-NOT-EQUAL *ERROR-OUTPUT* PROGN EIGHTH COMPILE-FILE TYPE-ERROR-DATUM BIT-AND DEFMETHOD SIXTH CLRHASH STRING-EQUAL CONSTANTLY ACONS NO-NEXT-METHOD MOST-POSITIVE-SINGLE-FLOAT *LOAD-VERBOSE* DIGIT-CHAR-P ALPHA-CHAR-P LEAST-POSITIVE-NORMALIZED-DOUBLE-FLOAT READTABLE MAKE-PATHNAME *PRINT-GENSYM* STRING> VECTOR SIMPLE-ARRAY FUNCTION-LAMBDA-EXPRESSION > SLEEP SIGNAL DEFUN CADADR REQUIRE ASSOC DEFPARAMETER SIMPLE-STRING CDADR CODE-CHAR *PACKAGE* CELL-ERROR ELT LOGORC1 FILE-POSITION TRANSLATE-PATHNAME CDAAR COUNT-IF-NOT ARRAY-RANK-LIMIT ROTATEF SIMPLE-WARNING INTEGER-LENGTH RANDOM WITH-SLOTS ARRAY-HAS-FILL-POINTER-P DEPOSIT-FIELD REVAPPEND POSITION-IF-NOT SUBSTITUTE-IF PUSHNEW GET-INTERNAL-REAL-TIME RASSOC SYMBOL-VALUE FLOATING-POINT-UNDERFLOW PLUSP NUMBERP NUMBER PROG1 READ-PRESERVING-WHITESPACE *PRINT-LENGTH* EVENP *COMPILE-FILE-PATHNAME* UPDATE-INSTANCE-FOR-DIFFERENT-CLASS FCEILING FILE-STRING-LENGTH DEFGENERIC CAADDR ARRAY-TOTAL-SIZE MAKE-TWO-WAY-STREAM SOME WITH-INPUT-FROM-STRING AND STREAM-EXTERNAL-FORMAT FILE-NAMESTRING BOOLE-EQV CHAR-UPCASE ASIN READ *STANDARD-OUTPUT* TYPE-ERROR-EXPECTED-TYPE ADJUST-ARRAY CASE LOGXOR RESTART-NAME CDDR STRING-UPCASE LCM PATHNAME-DEVICE CONTINUE LONG-FLOAT PAIRLIS EXPORT // ECHO-STREAM-OUTPUT-STREAM BIT-NAND MAP *READ-EVAL* METHOD-COMBINATION DEFSETF REMF PRINT STREAM-ERROR PATHNAME-DIRECTORY CHARACTERP BIT-XOR STRUCTURE-CLASS MERGE GET-INTERNAL-RUN-TIME INITIALIZE-INSTANCE DEFINE-COMPILER-MACRO COMPILER-MACRO COPY-READTABLE DEFCLASS < *READ-DEFAULT-FLOAT-FORMAT* ASSOC-IF-NOT SLOT-VALUE STRING-CAPITALIZE LEAST-NEGATIVE-LONG-FLOAT REAL PROCLAIM SIMPLE-CONDITION-FORMAT-ARGUMENTS SHIFTF GET-SETF-EXPANSION *PRINT-ARRAY* STRING<= BIT CDR ETYPECASE RETURN-FROM FIND-PACKAGE BOOLE-CLR NCONC COMPILED-FUNCTION MACHINE-VERSION *PRINT-LINES* CHANGE-CLASS DECODE-UNIVERSAL-TIME CHAR-CODE-LIMIT IGNORE FIXNUM DOLIST CDDDR TAGBODY RASSOC-IF-NOT MISMATCH NOTINLINE SHADOW CONS CADAAR SUBLIS CHAR-INT ACOS DEFINE-CONDITION TRACE LEAST-POSITIVE-NORMALIZED-SINGLE-FLOAT SIMPLE-VECTOR LIST MOST-NEGATIVE-LONG-FLOAT EQL MAKE-HASH-TABLE ECASE SLOT-EXISTS-P GENSYM MOST-NEGATIVE-SINGLE-FLOAT - COMPILE FLOATING-POINT-INEXACT HOST-NAMESTRING ASSOC-IF ARITHMETIC-ERROR-OPERATION &OPTIONAL PATHNAMEP PATHNAME-TYPE PRIN1-TO-STRING LEAST-NEGATIVE-DOUBLE-FLOAT SEQUENCE STREAM-ERROR-STREAM PPRINT-LOGICAL-BLOCK ECHO-STREAM BOOLE-C1 = STRING-TRIM BOOLE-ORC1 IN-PACKAGE / EVAL LOAD-TIME-VALUE DELETE-PACKAGE CHAR> COPY-TREE *PRINT-ESCAPE* GENTEMP BIGNUM FIRST DECODE-FLOAT BOOLE-2 LDB FILE-LENGTH MEMBER-IF-NOT BUILT-IN-CLASS NSUBSTITUTE-IF DOCUMENTATION DOTIMES *PRINT-PPRINT-DISPATCH* SYMBOL-FUNCTION NSET-EXCLUSIVE-OR LOGANDC1 LET* NSUBSTITUTE-IF-NOT BROADCAST-STREAM FLOAT-RADIX CONJUGATE COPY-SYMBOL STANDARD-OBJECT FINISH-OUTPUT ALLOCATE-INSTANCE GET-OUTPUT-STREAM-STRING READ-BYTE *READ-SUPPRESS* MOST-NEGATIVE-FIXNUM MEMBER-IF FTRUNCATE PACKAGE-NAME MAPCAR REMHASH *TERMINAL-IO* LEAST-NEGATIVE-SHORT-FLOAT DELETE SAFETY MAKE-ECHO-STREAM FIND-CLASS BOOLE-XOR CALL-METHOD SUBST-IF KEYWORD DEBUG SIMPLE-BIT-VECTOR-P TAILP TREE-EQUAL IDENTITY WRITE CHAR/= TENTH *LOAD-TRUENAME* UNBOUND-SLOT-INSTANCE ENCODE-UNIVERSAL-TIME POP SYMBOL BOOLE-SET FRESH-LINE VECTORP MAPHASH MACHINE-INSTANCE MASK-FIELD CLEAR-INPUT MACROEXPAND-1 DPB CDDDAR CDAR CHAR< CATCH ROW-MAJOR-AREF DISASSEMBLE FTYPE SYMBOL-PACKAGE SHORT-SITE-NAME BOTH-CASE-P SEARCH PATHNAME MEMBER NSTRING-UPCASE FDEFINITION FOURTH RATIONAL CALL-ARGUMENTS-LIMIT SPACE REMPROP SIGNUM SINH MERGE-PATHNAMES CELL-ERROR-NAME ATOM GET-DISPATCH-MACRO-CHARACTER LISTP ** CHARACTER LISTEN ADD-METHOD STRING-LEFT-TRIM CADR INSPECT TYPECASE CAADR Y-OR-N-P ARRAY-DIMENSIONS COUNT PPRINT-FILL GENERIC-FUNCTION WITH-COMPILATION-UNIT GETHASH EXPT SUBSETP FUNCTION CADDR MAKE-PACKAGE LIST-ALL-PACKAGES LEAST-NEGATIVE-NORMALIZED-SINGLE-FLOAT CDDDDR SUBTYPEP PROGV INTERNAL-TIME-UNITS-PER-SECOND ODDP *COMPILE-VERBOSE* + WITH-OPEN-STREAM TRUNCATE STRING-NOT-LESSP NSET-DIFFERENCE PUSH MAX *PRINT-MISER-WIDTH* FLOAT-PRECISION MAPL NSTRING-DOWNCASE DEFPACKAGE TANH READ-FROM-STRING HASH-TABLE-SIZE LEAST-NEGATIVE-SINGLE-FLOAT DIRECTORY DECF SIMPLE-CONDITION MAPCAN WHEN LISP-IMPLEMENTATION-VERSION CLASS CHAR-NOT-LESSP INTERSECTION PROBE-FILE T ASH APPLY MAKE-STRING SIMPLE-BASE-STRING BOOLE-AND POSITION-IF NINTH MOST-POSITIVE-FIXNUM PARSE-NAMESTRING APROPOS-LIST SHORT-FLOAT-EPSILON COMPUTE-APPLICABLE-METHODS BOOLE-NOR GCD READ-LINE FILL BOOLE-ANDC2 MULTIPLE-VALUES-LIMIT RESTART CDDAR STRINGP MUFFLE-WARNING CEILING BOOLE-IOR READTABLE-CASE LISP-IMPLEMENTATION-TYPE MAKE-METHOD HASH-TABLE-TEST BIT-ORC2 LAMBDA-LIST-KEYWORDS LAMBDA PATHNAME-HOST 1- CAAAR DRIBBLE *QUERY-IO* NOT STRUCTURE FIND-ALL-SYMBOLS SUBST FIND-IF-NOT SUBST-IF-NOT YES-OR-NO-P METHOD-COMBINATION-ERROR STORAGE-CONDITION *READTABLE* CHAR-LESSP UNBOUND-SLOT /// *PRINT-RADIX* DOUBLE-FLOAT-NEGATIVE-EPSILON STANDARD-CHAR REM LOCALLY DOUBLE-FLOAT-EPSILON WRITE-CHAR STANDARD IF OTHERWISE PPRINT-POP TWO-WAY-STREAM PPRINT-INDENT STREAM-ELEMENT-TYPE REALP CCASE COPY-PPRINT-DISPATCH CADDDR SCHAR ARITHMETIC-ERROR-OPERANDS BIT-EQV NTH DO-EXTERNAL-SYMBOLS >= READ-DELIMITED-LIST PPRINT-NEWLINE SET ARRAY-TOTAL-SIZE-LIMIT MAP-INTO BLOCK NEXT-METHOD-P STREAMP CTYPECASE CHAR= SIGNED-BYTE RATIO *READ-BASE* FIND-RESTART POSITION ARRAY-ROW-MAJOR-INDEX ARRAYP DOUBLE-FLOAT LEAST-POSITIVE-SINGLE-FLOAT BOOLE-C2 SOFTWARE-VERSION CHAR-NAME ASSERT OPTIMIZE SLOT-MAKUNBOUND LAST COMPLEXP CONCATENATE * REMOVE-IF-NOT LOGEQV MULTIPLE-VALUE-PROG1 PACKAGE-SHADOWING-SYMBOLS SEVENTH BOOLE-1 APPEND NSUBST-IF-NOT CHAR<= STRUCTURE-OBJECT CLEAR-OUTPUT BASE-CHAR STRING-LESSP REINITIALIZE-INSTANCE SYMBOL-NAME SPECIAL SIMPLE-CONDITION-FORMAT-CONTROL CHAR-CODE ENSURE-GENERIC-FUNCTION BIT-ANDC1 VARIABLE FLOAT SCALE-FLOAT MACRO-FUNCTION UNUSE-PACKAGE DELETE-IF TYPE-OF TWO-WAY-STREAM-OUTPUT-STREAM PRINT-NOT-READABLE-OBJECT READ-CHAR CHAR>= ECHO-STREAM-INPUT-STREAM CONDITION ABS READ-SEQUENCE MAKE-STRING-OUTPUT-STREAM FIND-METHOD CERROR DEFINE-MODIFY-MACRO LONG-FLOAT-NEGATIVE-EPSILON LENGTH GET-UNIVERSAL-TIME PRINT-UNREADABLE-OBJECT ARRAY-ELEMENT-TYPE CDAADR CAADAR GET-DECODED-TIME RENAME-PACKAGE FLET TERPRI WRITE-STRING ENDP STANDARD-CLASS VALUES-LIST FFLOOR CLASS-OF +++ STRING-DOWNCASE LDB-TEST &ALLOW-OTHER-KEYS BIT-NOR LOG TYPE MULTIPLE-VALUE-CALL LAMBDA-PARAMETERS-LIMIT RPLACD IGNORE-ERRORS PPRINT-TABULAR DEFTYPE MACROEXPAND CHECK-TYPE LOGNOT PPRINT USER-HOMEDIR-PATHNAME FILE-WRITE-DATE BYTE-POSITION ENSURE-DIRECTORIES-EXIST BREAK WILD-PATHNAME-P MULTIPLE-VALUE-LIST SETQ FORCE-OUTPUT BUTLAST OPEN FLOAT-SIGN CONTROL-ERROR FUNCTIONP GET-PROPERTIES ACOSH LONG-SITE-NAME WITH-STANDARD-IO-SYNTAX FLOATING-POINT-INVALID-OPERATION PROVIDE INTERN RENAME-FILE LOGBITP DEFINE-METHOD-COMBINATION BYTE STYLE-WARNING &REST SET-SYNTAX-FROM-CHAR TIME EXTENDED-CHAR TAN REMOVE-IF NAMESTRING *PRINT-PRETTY* NUNION INVOKE-DEBUGGER IMAGPART MOST-NEGATIVE-DOUBLE-FLOAT WRITE-BYTE *PRINT-RIGHT-MARGIN* ++ *PRINT-LEVEL* RANDOM-STATE-P DENOMINATOR HASH-TABLE-REHASH-SIZE ARITHMETIC-ERROR FILL-POINTER NREVERSE &BODY MOST-NEGATIVE-SHORT-FLOAT DEFVAR CDAAAR CHAR-NOT-GREATERP PATHNAME-NAME SXHASH SIMPLE-VECTOR-P LIST-LENGTH EVERY FIND-SYMBOL FILE-STREAM BIT-ANDC2 CONCATENATED-STREAM BOOLE-ANDC1 CDDADR SOFTWARE-TYPE WARN TRANSLATE-LOGICAL-PATHNAME GET MAKE-BROADCAST-STREAM DO-SYMBOLS *LOAD-PATHNAME* SVREF EQUALP SINGLE-FLOAT-NEGATIVE-EPSILON *PRINT-READABLY* COMPILED-FUNCTION-P MAKE-STRING-INPUT-STREAM METHOD-QUALIFIERS COMPILE-FILE-PATHNAME &AUX WARNING FLOATP MAPCON OUTPUT-STREAM-P LOOP-FINISH ATANH STEP DO STRING/= TRUENAME DIVISION-BY-ZERO MAKE-INSTANCES-OBSOLETE ERROR MINUSP BIT-ORC1 INLINE MOST-POSITIVE-DOUBLE-FLOAT MAKE-SYMBOL BOUNDP WRITE-TO-STRING DECLAIM STORE-VALUE THIRD PRINC-TO-STRING PPRINT-LINEAR NSUBSTITUTE USE-VALUE FILE-ERROR-PATHNAME FIND-IF UNWIND-PROTECT SET-MACRO-CHARACTER REDUCE CDADDR SUBSEQ CAAAAR MOST-POSITIVE-SHORT-FLOAT PACKAGE &WHOLE RANDOM-STATE SIMPLE-STRING-P COMPILER-MACRO-FUNCTION SQRT SYNONYM-STREAM-SYMBOL ATAN PACKAGE-USE-LIST *LOAD-PRINT* SIMPLE-BIT-VECTOR PACKAGE-NICKNAMES CHAR-NOT-EQUAL NAME-CHAR SIMPLE-TYPE-ERROR WITH-HASH-TABLE-ITERATOR IGNORABLE DESCRIBE-OBJECT PRIN1 STRING-GREATERP LEAST-POSITIVE-SHORT-FLOAT BOOLE-NAND CDDAAR CHAR-DOWNCASE COMPLEMENT OR PROG *PRINT-CIRCLE* WITH-OUTPUT-TO-STRING INTERACTIVE-STREAM-P PSETQ SATISFIES LEAST-POSITIVE-DOUBLE-FLOAT PSETF REPLACE PACKAGE-ERROR NOTEVERY SIN ADJUSTABLE-ARRAY-P RESTART-CASE WITH-SIMPLE-RESTART WITH-ACCESSORS SLOT-MISSING STREAM PROGRAM-ERROR THE *TRACE-OUTPUT* SYMBOL-MACROLET SET-EXCLUSIVE-OR PACKAGEP ISQRT *PRINT-CASE* CAAR BROADCAST-STREAM-STREAMS TWO-WAY-STREAM-INPUT-STREAM PROG* CDADAR MAPC ROOM ENOUGH-NAMESTRING DIRECTORY-NAMESTRING SLOT-UNBOUND FORMATTER CHAR-EQUAL WITH-OPEN-FILE COS LEAST-NEGATIVE-NORMALIZED-DOUBLE-FLOAT INTEGERP UNSIGNED-BYTE COSH LOGICAL-PATHNAME HASH-TABLE-COUNT ARRAY LOGAND NSUBST NTH-VALUE SYMBOLP MOD *RANDOM-STATE* VECTOR-PUSH PRINT-OBJECT SHORT-FLOAT-NEGATIVE-EPSILON DEFSTRUCT DECLARE MAKE-ARRAY WITH-PACKAGE-ITERATOR VALUES DESCRIBE MAKE-LIST PATHNAME-VERSION SINGLE-FLOAT DELETE-FILE BASE-STRING LOWER-CASE-P COPY-LIST UNBOUND-VARIABLE ADJOIN SUBSTITUTE-IF-NOT TYPE-ERROR CALL-NEXT-METHOD LEAST-POSITIVE-NORMALIZED-SHORT-FLOAT *COMPILE-PRINT* MAKE-LOAD-FORM VECTOR-POP ARRAY-DIMENSION-LIMIT ARRAY-IN-BOUNDS-P COPY-STRUCTURE READER-ERROR HASH-TABLE-P MAKE-LOAD-FORM-SAVING-SLOTS STANDARD-CHAR-P LOGCOUNT FBOUNDP *DEFAULT-PATHNAME-DEFAULTS* STRING= SERIOUS-CONDITION <= GET-MACRO-CHARACTER LEAST-NEGATIVE-NORMALIZED-SHORT-FLOAT *GENSYM-COUNTER* RASSOC-IF MULTIPLE-VALUE-BIND INVALID-METHOD-ERROR ZEROP *MODULES* PI SUBSTITUTE FILE-ERROR *STANDARD-INPUT* LOGICAL-PATHNAME-TRANSLATIONS BIT-VECTOR-P DO-ALL-SYMBOLS *FEATURES* USE-PACKAGE STABLE-SORT STRING INTEGER LOGNAND UNLESS COMPILATION-SPEED UNINTERN FLOOR INCF CAAADR UPGRADED-ARRAY-ELEMENT-TYPE APROPOS NOTANY PEEK-CHAR MAKE-SEQUENCE UPDATE-INSTANCE-FOR-REDEFINED-CLASS DEFINE-SYMBOL-MACRO FILE-AUTHOR SBIT LOGORC2 METHOD EQ RATIONALIZE BIT-IOR LEAST-POSITIVE-NORMALIZED-LONG-FLOAT PRINC HASH-TABLE-REHASH-THRESHOLD COPY-ALIST ALPHANUMERICP FORMAT LOAD MAKE-CONDITION PPRINT-DISPATCH BYTE-SIZE PATHNAME-MATCH-P UNDEFINED-FUNCTION PACKAGE-USED-BY-LIST WRITE-LINE PROG2 IMPORT PACKAGE-ERROR-PACKAGE DELETE-IF-NOT RPLACA WRITE-SEQUENCE LDIFF *MACROEXPAND-HOOK* UNION 1+ STANDARD-GENERIC-FUNCTION NINTERSECTION FIFTH HASH-TABLE REST NIL MAKUNBOUND)
See also:
The ANSI Standard, Macro COMMON-LISP:DEFPACKAGE
The SBCL Manual, Variable SB-EXT:*ON-PACKAGE-VARIANCE*
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/new-cl/gray-streams.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/new-cl/gray-streams-tmpVTFK6ZJW.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/new-cl/definitions.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/new-cl/definitions-tmp75WVSJEW.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/new-cl/types.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/new-cl/types-tmpBU5UM3S4.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/split-sequence/package.lisp" (written 20 OCT 2024 03:57:44 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/split-sequence/package-tmpOBHVA3CD.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/split-sequence/vector.lisp" (written 20 OCT 2024 03:57:44 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/split-sequence/vector-tmpJ6ELVFLF.fasl
; compilation finished in 0:00:00.073
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/split-sequence/list.lisp" (written 20 OCT 2024 03:57:44 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/split-sequence/list-tmpULDB0RG.fasl
; compilation finished in 0:00:00.130
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/split-sequence/extended-sequence.lisp" (written 20 OCT 2024 03:57:44 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/split-sequence/extended-sequence-tmpUTZ0UUTE.fasl
; compilation finished in 0:00:00.193
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/split-sequence/api.lisp" (written 20 OCT 2024 03:57:44 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/split-sequence/api-tmpOOSRA8PZ.fasl
; compilation finished in 0:00:00.433
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/split-sequence/documentation.lisp" (written 20 OCT 2024 03:57:44 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/split-sequence/documentation-tmpDMIL0RVK.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/pkgdcl.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/pkgdcl-tmp8MR9IMIO.fasl
; compilation finished in 0:00:00.006
WARNING: IOLIB/BASE also exports the following symbols:
(MOST-NEGATIVE-SINGLE-FLOAT LOAD-LOGICAL-PATHNAME-TRANSLATIONS ALEXANDRIA:POSITIVE-INTEGER SPLIT-SEQUENCE:SPLIT-SEQUENCE-IF-NOT FCEILING ALEXANDRIA:NON-POSITIVE-DOUBLE-FLOAT RANDOM-STATE HANDLER-CASE RESTART-NAME LOAD-TIME-VALUE CHAR= / MOST-POSITIVE-DOUBLE-FLOAT 1- MOST-POSITIVE-FIXNUM BOTH-CASE-P TYPECASE DEFCLASS ALEXANDRIA:MAP-PERMUTATIONS NOTEVERY ALEXANDRIA:MAP-IOTA MAKE-PACKAGE LDIFF CONSTANTLY POSITION INVOKE-RESTART-INTERACTIVELY BIT-AND DECODE-FLOAT SLOT-BOUNDP CHAR-INT SIMPLE-CONDITION-FORMAT-CONTROL SYMBOL-FUNCTION CHAR-EQUAL PEEK-CHAR LOGNOT FUNDAMENTAL-BINARY-OUTPUT-STREAM ALEXANDRIA:MAPPEND ATAN <= PAIRLIS STRING< &REST ALEXANDRIA:DELETEF PPRINT-TABULAR NAMESTRING CONJUGATE CDDAAR DIGIT-CHAR NUMBER SPACE BOOLE-NAND PATHNAME-VERSION LCM COPY-TREE READ-BYTE ALEXANDRIA:POSITIVE-RATIONAL ALEXANDRIA:POSITIVE-REAL UNION SPECIAL ALEXANDRIA:NTH-VALUE-OR REQUIRE INTEGERP ALEXANDRIA:COERCEF DELETE-DUPLICATES MAPHASH MAKE-HASH-TABLE PRINC LOOP 1+ LOGIOR ARRAY-IN-BOUNDS-P CADAAR ALEXANDRIA:POSITIVE-LONG-FLOAT SHADOW Y-OR-N-P TYPE-ERROR-DATUM LEAST-NEGATIVE-NORMALIZED-LONG-FLOAT PACKAGE-USE-LIST FIXNUM MAKUNBOUND LOGAND *PRINT-ARRAY* INTEGER-DECODE-FLOAT SET FLOOR NSUBSTITUTE OUTPUT-STREAM-P COMPILE DEFINE-METHOD-COMBINATION READ-CHAR ALEXANDRIA:SET-EQUAL FDEFINITION ALEXANDRIA:MAXF LEAST-POSITIVE-NORMALIZED-DOUBLE-FLOAT DELETE STRING/= ALEXANDRIA:EXTREMUM ALEXANDRIA:POSITIVE-FIXNUM-P GET-MACRO-CHARACTER ERROR ROTATEF OPEN-STREAM-P DECLARATION COPY-PPRINT-DISPATCH EQUAL REALPART SINH MOST-NEGATIVE-LONG-FLOAT +++ HASH-TABLE-TEST INPUT-STREAM-P ASIN COPY-SYMBOL USE-PACKAGE SYNONYM-STREAM-SYMBOL ALEXANDRIA:MAPHASH-VALUES ALEXANDRIA:MAPHASH-KEYS CASE CCASE READ-DELIMITED-LIST *DEFAULT-PATHNAME-DEFAULTS* *PRINT-MISER-WIDTH* PPRINT RASSOC-IF ALEXANDRIA:NON-POSITIVE-SHORT-FLOAT-P SUBSEQ STREAM-READ-LINE NO-NEXT-METHOD ED ALEXANDRIA:NON-POSITIVE-FLOAT-P NOTANY STANDARD-CLASS ALEXANDRIA:CIRCULAR-TREE-P NSET-EXCLUSIVE-OR ARRAY-RANK-LIMIT CHECK-TYPE CDDDAR WITH-INPUT-FROM-STRING STREAM-TERPRI ARRAY-TOTAL-SIZE SIMPLE-CONDITION-FORMAT-ARGUMENTS SEARCH NSUBSTITUTE-IF WRITE-TO-STRING ALEXANDRIA:CIRCULAR-LIST PPRINT-NEWLINE ASINH WITH-SIMPLE-RESTART STREAM-WRITE-CHAR FILL NREVERSE PACKAGE-USED-BY-LIST EVENP MAKE-SEQUENCE LEAST-NEGATIVE-NORMALIZED-DOUBLE-FLOAT CADDAR RATIONALIZE SIMPLE-BIT-VECTOR MAPLIST ECASE FUNCTION-LAMBDA-EXPRESSION ALEXANDRIA:STANDARD-DEVIATION LEAST-NEGATIVE-DOUBLE-FLOAT BASE-STRING ALEXANDRIA:PROPER-SEQUENCE STRING>= PATHNAME-DIRECTORY READ-LINE ALEXANDRIA:SIMPLE-READER-ERROR STREAM-UNREAD-CHAR FIND-IF-NOT ARRAYP CDAADR SPECIAL-OPERATOR-P *ERROR-OUTPUT* CLOSE ALEXANDRIA:SIMPLE-STYLE-WARNING STORE-VALUE *PRINT-CIRCLE* FTRUNCATE ALEXANDRIA:STARTS-WITH-SUBSEQ PROCLAIM CDAR ALEXANDRIA:NEGATIVE-RATIONAL-P ASSOC STRUCTURE SORT PACKAGE-ERROR-PACKAGE REDUCE SPLIT-SEQUENCE:SPLIT-SEQUENCE ALEXANDRIA:ENSURE-CONS BOOLE-C1 BIT-VECTOR SECOND BOOLE-ORC2 ADJOIN FIRST &ENVIRONMENT DESCRIBE IMAGPART NSUBLIS *GENSYM-COUNTER* SLOT-UNBOUND PATHNAME-TYPE RESTART CDAAAR STRING-UPCASE METHOD-COMBINATION-ERROR CLRHASH RESTART-BIND FUNDAMENTAL-CHARACTER-OUTPUT-STREAM ALEXANDRIA:DELETE-FROM-PLIST RPLACD GETHASH ISQRT SUBLIS SUBST COUNT DECF SLOT-MISSING FUNDAMENTAL-STREAM WITH-ACCESSORS CHAR-UPCASE STRING-DOWNCASE ALEXANDRIA:POSITIVE-FLOAT-P ASSOC-IF-NOT BOOLE ALEXANDRIA:MAP-PRODUCT TIME TRUENAME CAAAR ALEXANDRIA:WITH-UNIQUE-NAMES SINGLE-FLOAT-EPSILON FUNDAMENTAL-CHARACTER-STREAM COMPLEX STREAM-FINISH-OUTPUT NAME-CHAR REST ALEXANDRIA:NON-NEGATIVE-RATIONAL ALEXANDRIA:MINF ATANH NSUBST-IF PRINT-NOT-READABLE-OBJECT BYTE-SIZE DIRECTORY FORMAT CONTROL-ERROR LET* INTERN ALEXANDRIA:MAP-DERANGEMENTS FUNDAMENTAL-OUTPUT-STREAM LOGICAL-PATHNAME ARRAY-HAS-FILL-POINTER-P CERROR INITIALIZE-INSTANCE LDB-TEST IGNORE STYLE-WARNING ALEXANDRIA:DEFINE-CONSTANT CHAR-DOWNCASE ENSURE-GENERIC-FUNCTION *PRINT-LENGTH* STRING<= MAKE-METHOD LONG-FLOAT-NEGATIVE-EPSILON SIMPLE-VECTOR ALEXANDRIA:SIMPLE-PARSE-ERROR *READ-DEFAULT-FLOAT-FORMAT* ALEXANDRIA:NON-NEGATIVE-FIXNUM DISASSEMBLE TYPEP FLET VECTOR PATHNAMEP CAAR MERGE COSH ALEXANDRIA:EMPTYP UNUSE-PACKAGE INTEGER SLOT-EXISTS-P DELETE-IF-NOT FORMATTER ALEXANDRIA:NEGATIVE-RATIONAL *MACROEXPAND-HOOK* ALEXANDRIA:PLIST-ALIST FLOATING-POINT-INVALID-OPERATION LEAST-POSITIVE-SINGLE-FLOAT ECHO-STREAM PRINT-UNREADABLE-OBJECT CADDDR RESTART-CASE *LOAD-VERBOSE* CHANGE-CLASS FIND-CLASS IDENTITY MAP-INTO CLASS-NAME PRINT-NOT-READABLE REMOVE COMPILED-FUNCTION STREAM *COMPILE-FILE-PATHNAME* ALEXANDRIA:NON-POSITIVE-REAL COMPUTE-RESTARTS SOME DEFINE-SYMBOL-MACRO SCALE-FLOAT TAILP SIXTH BOOLE-CLR SUBSTITUTE MOST-NEGATIVE-DOUBLE-FLOAT *PRINT-RADIX* ADJUST-ARRAY LDB TERPRI FIFTH WITH-OPEN-FILE STABLE-SORT METHOD-COMBINATION WARNING LOGXOR COUNT-IF-NOT ALEXANDRIA:SYMBOLICATE REM THE CHAR RANDOM-STATE-P VECTORP ALEXANDRIA:ALIST-HASH-TABLE PPRINT-EXIT-IF-LIST-EXHAUSTED SET-DISPATCH-MACRO-CHARACTER ALEXANDRIA:WRITE-BYTE-VECTOR-INTO-FILE STRING-RIGHT-TRIM CLEAR-INPUT DEFPACKAGE ALEXANDRIA:COPY-STREAM CHAR-LESSP COMPILER-MACRO-FUNCTION ALEXANDRIA:SETP ALEXANDRIA:LASTCAR MULTIPLE-VALUE-CALL LOAD ALEXANDRIA:STRING-DESIGNATOR > INTERNAL-TIME-UNITS-PER-SECOND NINTH BIT-ANDC1 ALEXANDRIA:REMOVEF STEP ALEXANDRIA:POSITIVE-FLOAT AREF APPLY ALEXANDRIA:NON-NEGATIVE-REAL-P PPRINT-TAB LAMBDA-PARAMETERS-LIMIT NINTERSECTION LOGCOUNT PACKAGEP NSUBSTITUTE-IF-NOT ALEXANDRIA:UNIONF USE-VALUE ALEXANDRIA:MEAN RASSOC ROUND BROADCAST-STREAM-STREAMS ATOM COMPILER-MACRO SEQUENCE DIVISION-BY-ZERO CALL-ARGUMENTS-LIMIT LOGORC2 SIGNED-BYTE ALEXANDRIA:NON-NEGATIVE-SINGLE-FLOAT ALEXANDRIA:ENSURE-CAR INTERSECTION ALEXANDRIA:ARRAY-INDEX SET-EXCLUSIVE-OR DPB MAPCON STRUCTURE-OBJECT NUNION UNLESS VECTOR-POP MAPCAN APROPOS ALEXANDRIA:NEGATIVE-SHORT-FLOAT-P MAX CEILING FUNCTIONP NULL STREAM-ADVANCE-TO-COLUMN FUNCALL PROG STREAM-WRITE-SEQUENCE MAKE-STRING ASSERT SLOT-MAKUNBOUND WRITE-CHAR SYNONYM-STREAM COERCE ALEXANDRIA:ENSURE-FUNCTIONF TANH STREAM-ERROR-STREAM EXTENDED-CHAR DEFCONSTANT READ FILL-POINTER HASH-TABLE-P SUBSTITUTE-IF-NOT ALEXANDRIA:WITH-OUTPUT-TO-FILE MULTIPLE-VALUE-BIND HASH-TABLE-COUNT PROGN DRIBBLE ALEXANDRIA:BINOMIAL-COEFFICIENT ALEXANDRIA:NON-POSITIVE-FIXNUM-P BIT-IOR ALEXANDRIA:COPY-ARRAY DEFGENERIC CIS ALEXANDRIA:DELETE-FROM-PLISTF POP COUNT-IF CDADDR ALEXANDRIA:NON-NEGATIVE-SHORT-FLOAT-P TAGBODY ALEXANDRIA:READ-STREAM-CONTENT-INTO-BYTE-VECTOR ALEXANDRIA:SEQUENCE-OF-LENGTH-P CAAAAR NUMBERP CODE-CHAR MAKE-LIST EVAL REAL >= ALEXANDRIA:POSITIVE-SHORT-FLOAT ALEXANDRIA:NON-POSITIVE-LONG-FLOAT-P CLASS *READ-BASE* FILE-NAMESTRING TRIVIAL-GRAY-STREAM-MIXIN BIT-ORC2 TAN FROUND ALEXANDRIA:REQUIRED-ARGUMENT CDDDR INCF BOOLE-ANDC1 FIND GET-INTERNAL-RUN-TIME FLOATING-POINT-INEXACT SOFTWARE-VERSION ALEXANDRIA:NON-NEGATIVE-FLOAT COS LEAST-POSITIVE-SHORT-FLOAT PRINC-TO-STRING MAKE-BROADCAST-STREAM SIN FUNCTION BIT-NOT LOGBITP PATHNAME-DEVICE CONDITION CALL-NEXT-METHOD ALEXANDRIA:NEGATIVE-LONG-FLOAT-P LEAST-NEGATIVE-SHORT-FLOAT STREAM-ELEMENT-TYPE ALEXANDRIA:POSITIVE-REAL-P ALEXANDRIA:HASH-TABLE-KEYS VECTOR-PUSH-EXTEND ALEXANDRIA:NON-NEGATIVE-LONG-FLOAT-P &BODY PACKAGE-NAME PROVIDE ECHO-STREAM-INPUT-STREAM LIST* ALEXANDRIA:GAUSSIAN-RANDOM STREAM-READ-SEQUENCE DO* ARITHMETIC-ERROR &KEY ALEXANDRIA:NEGATIVE-LONG-FLOAT PACKAGE-ERROR STORAGE-CONDITION ALEXANDRIA:NON-NEGATIVE-SINGLE-FLOAT-P ALEXANDRIA:APPENDF DO-ALL-SYMBOLS ROW-MAJOR-AREF ENOUGH-NAMESTRING LAMBDA-LIST-KEYWORDS ALEXANDRIA:MAP-COMBINATIONS WITH-CONDITION-RESTARTS SIMPLE-TYPE-ERROR &OPTIONAL *MODULES* TYPE PACKAGE-SHADOWING-SYMBOLS SYMBOL-NAME INTEGER-LENGTH ALEXANDRIA:DESTRUCTURING-CASE REMPROP ENDP ALEXANDRIA:NON-POSITIVE-DOUBLE-FLOAT-P SYMBOL-VALUE SHARED-INITIALIZE ALEXANDRIA:SIMPLE-PROGRAM-ERROR ALEXANDRIA:SUBFACTORIAL ++ PPRINT-POP PUSHNEW SHIFTF LOGNOR SET-SYNTAX-FROM-CHAR *PRINT-PPRINT-DISPATCH* ALEXANDRIA:NEGATIVE-DOUBLE-FLOAT STRING> FLOAT-DIGITS FILE-ERROR-PATHNAME SIMPLE-VECTOR-P WRITE-SEQUENCE SLEEP BOOLE-SET *LOAD-PATHNAME* PACKAGE ALEXANDRIA:OF-TYPE SETQ RASSOC-IF-NOT *COMPILE-FILE-TRUENAME* UPPER-CASE-P ALEXANDRIA:RANDOM-ELT ARRAY-DIMENSION-LIMIT WHEN ALEXANDRIA:READ-FILE-INTO-STRING REMOVE-DUPLICATES ZEROP SIMPLE-ARRAY IGNORABLE FUNDAMENTAL-CHARACTER-INPUT-STREAM GENTEMP // ACOS ALEXANDRIA:NEGATIVE-INTEGER-P SIMPLE-BASE-STRING SPLIT-SEQUENCE:SPLIT-SEQUENCE-IF CHAR>= ALEXANDRIA:NEGATIVE-INTEGER CAADDR CLASS-OF DO REMOVE-IF-NOT DO-EXTERNAL-SYMBOLS ALEXANDRIA:HASH-TABLE-VALUES SVREF ALEXANDRIA:VARIANCE COMPILE-FILE-PATHNAME FLOATP ALEXANDRIA:POSITIVE-SHORT-FLOAT-P SERIOUS-CONDITION BOOLE-NOR PATHNAME-MATCH-P FILE-AUTHOR DOUBLE-FLOAT-NEGATIVE-EPSILON MACROEXPAND REMHASH ALEXANDRIA:NON-NEGATIVE-FIXNUM-P CDADAR FILE-ERROR CADADR *** FLOAT-PRECISION BIT-ANDC2 ALEXANDRIA:MAKE-CIRCULAR-LIST MOST-POSITIVE-LONG-FLOAT ALEXANDRIA:UNWIND-PROTECT-CASE ALEXANDRIA:POSITIVE-DOUBLE-FLOAT-P FLOAT CHAR-NAME ALEXANDRIA:NON-POSITIVE-SINGLE-FLOAT-P TRUNCATE LIST-LENGTH SUBST-IF-NOT CLEAR-OUTPUT STREAM-CLEAR-INPUT DYNAMIC-EXTENT NO-APPLICABLE-METHOD UNBOUND-SLOT MAPCAR INSPECT ECHO-STREAM-OUTPUT-STREAM CONS OPTIMIZE STREAM-EXTERNAL-FORMAT COMPLEMENT *PRINT-RIGHT-MARGIN* ARRAY-RANK PRIN1-TO-STRING FILE-STREAM MAKE-LOAD-FORM-SAVING-SLOTS CHAR<= DELETE-IF LOWER-CASE-P DENOMINATOR SUBSETP ALEXANDRIA:DOPLIST RANDOM REPLACE ALEXANDRIA:NON-NEGATIVE-REAL SET-DIFFERENCE PUSH ALEXANDRIA:WHEN-LET MAKE-INSTANCES-OBSOLETE SIGNUM DEFINE-MODIFY-MACRO COMPILATION-SPEED STANDARD-CHAR MAKE-INSTANCE STRING-LEFT-TRIM SYMBOL-MACROLET ALEXANDRIA:CONJOIN WITH-OPEN-STREAM MAKE-STRING-INPUT-STREAM SIMPLE-ERROR VALUES SIGNAL ALEXANDRIA:READ-FILE-INTO-BYTE-VECTOR CAADR TRANSLATE-LOGICAL-PATHNAME *LOAD-TRUENAME* PSETQ NSUBST-IF-NOT OR ALEXANDRIA:NON-POSITIVE-RATIONAL-P NEXT-METHOD-P IN-PACKAGE GET PPRINT-LINEAR LEAST-POSITIVE-NORMALIZED-SINGLE-FLOAT COMPUTE-APPLICABLE-METHODS BROADCAST-STREAM UNSIGNED-BYTE ALPHA-CHAR-P *STANDARD-OUTPUT* WRITE EQL UNDEFINED-FUNCTION LISTEN READ-CHAR-NO-HANG BOOLE-ANDC2 REALP COPY-SEQ READTABLE SYMBOL-PACKAGE MAKE-CONCATENATED-STREAM PRINT ALEXANDRIA:WRITE-STRING-INTO-FILE SIMPLE-BIT-VECTOR-P CONCATENATED-STREAM-STREAMS *COMPILE-PRINT* COPY-STRUCTURE NOT ALEXANDRIA:PARSE-BODY CHAR-CODE-LIMIT ** MOST-NEGATIVE-FIXNUM LOGEQV ALEXANDRIA:REMOVE-FROM-PLISTF READER-ERROR ALEXANDRIA:WHICHEVER LEAST-POSITIVE-NORMALIZED-SHORT-FLOAT STREAM-WRITE-STRING APROPOS-LIST BOOLE-C2 ALEXANDRIA:NEGATIVE-FLOAT ALEXANDRIA:PROPER-LIST UNEXPORT DECLAIM LEAST-NEGATIVE-SINGLE-FLOAT CDDR NBUTLAST LENGTH SLOT-VALUE ALEXANDRIA:NON-POSITIVE-FIXNUM DEFTYPE LISP-IMPLEMENTATION-VERSION WITH-OUTPUT-TO-STRING LAMBDA YES-OR-NO-P CHAR< GET-DECODED-TIME SYMBOL-PLIST METHOD FILE-WRITE-DATE ALEXANDRIA:CLAMP ALEXANDRIA:NEGATIVE-FIXNUM-P PROGRAM-ERROR *PRINT-READABLY* *PRINT-BASE* PATHNAME-NAME ALEXANDRIA:SWITCH CHAR/= ALEXANDRIA:MEDIAN LET PSETF BOOLE-2 ALEXANDRIA:NUNIONF FUNCTION-KEYWORDS ALEXANDRIA:REMOVE-FROM-PLIST END-OF-FILE ALEXANDRIA:ROTATE DEFSETF MEMBER EQUALP ALEXANDRIA:MAKE-GENSYM-LIST ALEXANDRIA:WITH-GENSYMS NUMERATOR SUBTYPEP ALEXANDRIA:REVERSEF ALEXANDRIA:ARRAY-LENGTH EVAL-WHEN CDDAR SETF ALEXANDRIA:FORMAT-SYMBOL VARIABLE TYPE-OF LISP-IMPLEMENTATION-TYPE ALEXANDRIA:FLATTEN CDR CHAR> PPRINT-LOGICAL-BLOCK SOFTWARE-TYPE GET-DISPATCH-MACRO-CHARACTER *READTABLE* MAKE-ARRAY EIGHTH ALEXANDRIA:ENSURE-LIST STREAM-READ-CHAR-NO-HANG EXPT CADR CDADR FIND-ALL-SYMBOLS SIMPLE-WARNING ARITHMETIC-ERROR-OPERATION BIT-NAND WRITE-BYTE *PRINT-LEVEL* ALEXANDRIA:NON-POSITIVE-REAL-P STREAM-WRITE-BYTE AND CHAR-GREATERP ALEXANDRIA:CURRY ALEXANDRIA:IOTA PPRINT-FILL BASE-CHAR *TRACE-OUTPUT* ALEXANDRIA:WITH-INPUT-FROM-FILE STRING-TRIM ABORT *RANDOM-STATE* ALEXANDRIA:NON-POSITIVE-LONG-FLOAT ALEXANDRIA:HASH-TABLE-ALIST UPDATE-INSTANCE-FOR-DIFFERENT-CLASS STREAM-LINE-COLUMN ALEXANDRIA:NREVERSEF NRECONC KEYWORDP DOUBLE-FLOAT *DEBUG-IO* ACONS SIMPLE-CONDITION FUNDAMENTAL-BINARY-INPUT-STREAM SBIT MACROLET SATISFIES ALEXANDRIA:NON-POSITIVE-INTEGER-P FMAKUNBOUND ALEXANDRIA:CIRCULAR-LIST-P RETURN-FROM ABS COPY-LIST COMPILE-FILE MEMBER-IF-NOT - RPLACA ALEXANDRIA:COUNT-PERMUTATIONS TRACE DESCRIBE-OBJECT STREAM-FORCE-OUTPUT ALEXANDRIA:PLIST-HASH-TABLE ALEXANDRIA:LERP ARITHMETIC-ERROR-OPERANDS MACHINE-INSTANCE ETYPECASE ALEXANDRIA:MAKE-KEYWORD STANDARD-OBJECT SPEED SUBST-IF MISMATCH LIST-ALL-PACKAGES LOG BIGNUM NSET-DIFFERENCE ALEXANDRIA:NON-NEGATIVE-SHORT-FLOAT ALEXANDRIA:LAST-ELT DECODE-UNIVERSAL-TIME BIT-NOR READ-PRESERVING-WHITESPACE GET-PROPERTIES UNBOUND-SLOT-INSTANCE STANDARD-GENERIC-FUNCTION *BREAK-ON-SIGNALS* WRITE-LINE GET-UNIVERSAL-TIME DEFINE-SETF-EXPANDER SYMBOL VALUES-LIST CAR BLOCK METHOD-QUALIFIERS STRINGP ALEXANDRIA:ALIST-PLIST PPRINT-DISPATCH GO LONG-FLOAT-EPSILON SINGLE-FLOAT MAKE-STRING-OUTPUT-STREAM FLOAT-RADIX ARRAY-DISPLACEMENT ALEXANDRIA:COPY-FILE USER-HOMEDIR-PATHNAME ALLOCATE-INSTANCE PROG* NTH-VALUE CHAR-NOT-GREATERP INVOKE-DEBUGGER ALEXANDRIA:NON-NEGATIVE-LONG-FLOAT ALEXANDRIA:NEGATIVE-SINGLE-FLOAT NSTRING-DOWNCASE BOOLE-EQV DIRECTORY-NAMESTRING STRING-NOT-EQUAL VECTOR-PUSH ALEXANDRIA:READ-STREAM-CONTENT-INTO-STRING NSTRING-UPCASE LONG-SITE-NAME CAADAR BUILT-IN-CLASS MAPC BIT-ORC1 RATIONAL GET-SETF-EXPANSION KEYWORD ALEXANDRIA:ONCE-ONLY ALEXANDRIA:ENSURE-GETHASH ALEXANDRIA:IGNORE-SOME-CONDITIONS ALEXANDRIA:PROPER-LIST-LENGTH CDDDDR SET-PPRINT-DISPATCH = ALEXANDRIA:RCURRY NSUBST PROG1 SUBSTITUTE-IF ALEXANDRIA:POSITIVE-LONG-FLOAT-P CONCATENATE PARSE-ERROR SHORT-SITE-NAME PI ALEXANDRIA:PROPER-LIST-P MAKE-SYMBOL MINUSP DOUBLE-FLOAT-EPSILON ALEXANDRIA:NAMED-LAMBDA REVAPPEND DELETE-FILE TWO-WAY-STREAM-OUTPUT-STREAM MEMBER-IF LOGNAND PROG2 READ-SEQUENCE CDDADR INTERACTIVE-STREAM-P STRING-LESSP ENSURE-DIRECTORIES-EXIST DECLARE LOGORC1 PPRINT-INDENT RENAME-PACKAGE ALPHANUMERICP CONSP ASSOC-IF DO-SYMBOLS DOTIMES APPEND ALEXANDRIA:DESTRUCTURING-ECASE FILE-STRING-LENGTH GCD MULTIPLE-VALUE-PROG1 ARRAY-TOTAL-SIZE-LIMIT UNTRACE MAKE-RANDOM-STATE ALEXANDRIA:NEGATIVE-FLOAT-P ALEXANDRIA:POSITIVE-INTEGER-P ALEXANDRIA:FIRST-ELT CADAR CAAADR COND CELL-ERROR ALEXANDRIA:NON-NEGATIVE-INTEGER-P STRING-STREAM ALEXANDRIA:POSITIVE-DOUBLE-FLOAT ALEXANDRIA:POSITIVE-FIXNUM ALEXANDRIA:WHEN-LET* MAKE-PATHNAME NTHCDR STRUCTURE-CLASS ARRAY SXHASH SHORT-FLOAT EQ /// *QUERY-IO* LOGANDC2 IF CALL-METHOD RENAME-FILE STRING *DEBUGGER-HOOK* DEBUG ALEXANDRIA:NON-NEGATIVE-INTEGER MOD BOOLE-1 READTABLE-CASE BIT-XOR NSTRING-CAPITALIZE STANDARD-METHOD STREAM-LISTEN FILE-LENGTH FIND-METHOD *TERMINAL-IO* MACHINE-VERSION *PACKAGE* DOCUMENTATION ALEXANDRIA:ASSOC-VALUE BOOLEAN LISTP ALEXANDRIA:NON-POSITIVE-INTEGER UPGRADED-COMPLEX-PART-TYPE + BYTE TYPE-ERROR-EXPECTED-TYPE ALEXANDRIA:ENDS-WITH-SUBSEQ STREAM-FILE-POSITION MULTIPLE-VALUE-LIST COPY-READTABLE DEFVAR MACROEXPAND-1 PRINT-OBJECT DEFSTRUCT UPDATE-INSTANCE-FOR-REDEFINED-CLASS LEAST-POSITIVE-NORMALIZED-LONG-FLOAT DEPOSIT-FIELD ALEXANDRIA:XOR &AUX STREAM-FRESH-LINE ALEXANDRIA:MULTIPLE-VALUE-COMPOSE BOOLE-ORC1 TRANSLATE-PATHNAME CATCH SHORT-FLOAT-NEGATIVE-EPSILON MAPL LABELS BOOLE-AND STANDARD-CHAR-P MUFFLE-WARNING READ-FROM-STRING *STANDARD-INPUT* NTH CADDR ALEXANDRIA:ENSURE-FUNCTION PHASE THROW STANDARD CONTINUE ALEXANDRIA:POSITIVE-RATIONAL-P ADJUSTABLE-ARRAY-P ALEXANDRIA:NON-POSITIVE-RATIONAL BYTE-POSITION RATIONALP MULTIPLE-VALUE-SETQ &ALLOW-OTHER-KEYS PRIN1 FILE-POSITION *PRINT-CASE* WITH-STANDARD-IO-SYNTAX IGNORE-ERRORS ALEXANDRIA:PARSE-ORDINARY-LAMBDA-LIST TWO-WAY-STREAM CHAR-CODE FUNDAMENTAL-INPUT-STREAM CDAAR ALEXANDRIA:ENDS-WITH WILD-PATHNAME-P *READ-EVAL* NCONC ADD-METHOD HASH-TABLE ALEXANDRIA:POSITIVE-SINGLE-FLOAT-P FRESH-LINE LOCALLY BIT-VECTOR-P HANDLER-BIND ENCODE-UNIVERSAL-TIME ALEXANDRIA:NON-POSITIVE-SHORT-FLOAT OTHERWISE HASH-TABLE-REHASH-THRESHOLD RATIO ACOSH *PRINT-LINES* MIN QUOTE MAKE-DISPATCH-MACRO-CHARACTER ALEXANDRIA:COPY-SEQUENCE ELT FBOUNDP REMF MAP DESTRUCTURING-BIND REMOVE-IF MACHINE-TYPE STRING-GREATERP ARRAY-ROW-MAJOR-INDEX OPEN ALEXANDRIA:NON-NEGATIVE-RATIONAL-P FIND-SYMBOL LEAST-NEGATIVE-NORMALIZED-SHORT-FLOAT ALEXANDRIA:TYPE= ALEXANDRIA:NEGATIVE-DOUBLE-FLOAT-P ALEXANDRIA:NEGATIVE-REAL-P TWO-WAY-STREAM-INPUT-STREAM *COMPILE-VERBOSE* FUNDAMENTAL-BINARY-STREAM LOGICAL-PATHNAME-TRANSLATIONS ALEXANDRIA:IF-LET ALEXANDRIA:CSWITCH WITH-HASH-TABLE-ITERATOR READTABLEP MERGE-PATHNAMES BOOLE-IOR MAKE-LOAD-FORM TREE-EQUAL DEFINE-CONDITION CONCATENATED-STREAM CHAR-NOT-EQUAL PARSE-INTEGER STREAMP SQRT ALEXANDRIA:NCONCF HOST-NAMESTRING UPGRADED-ARRAY-ELEMENT-TYPE /= FINISH-OUTPUT STREAM-START-LINE-P GENSYM SHORT-FLOAT-EPSILON SINGLE-FLOAT-NEGATIVE-EPSILON TENTH * ASH PLUSP TYPE-ERROR FLOAT-SIGN BIT-EQV FIND-IF ALEXANDRIA:LENGTH= DIGIT-CHAR-P STRING-CAPITALIZE UNBOUND-VARIABLE STRING-EQUAL PATHNAME *LOAD-PRINT* ALEXANDRIA:MAKE-GENSYM ALEXANDRIA:DESTRUCTURING-CCASE < EXPORT *PRINT-PRETTY* DELETE-PACKAGE LIST DOLIST CHAR-NOT-LESSP POSITION-IF-NOT &WHOLE FTYPE MAKE-SYNONYM-STREAM MULTIPLE-VALUES-LIMIT CELL-ERROR-NAME ALEXANDRIA:NEGATIVE-SINGLE-FLOAT-P ALEXANDRIA:NEGATIVE-SHORT-FLOAT REINITIALIZE-INSTANCE MAKE-CONDITION GET-OUTPUT-STREAM-STRING MOST-NEGATIVE-SHORT-FLOAT FLOATING-POINT-OVERFLOW CHARACTER MAKE-TWO-WAY-STREAM REMOVE-METHOD BOOLE-XOR GETF LEAST-NEGATIVE-LONG-FLOAT LEAST-POSITIVE-DOUBLE-FLOAT STREAM-ERROR PROBE-FILE CTYPECASE MOST-POSITIVE-SINGLE-FLOAT WARN SEVENTH FIND-PACKAGE UNINTERN SHADOWING-IMPORT ALEXANDRIA:POSITIVE-SINGLE-FLOAT ALEXANDRIA:MULTIPLE-VALUE-PROG2 WITH-SLOTS T BOUNDP RETURN LONG-FLOAT COPY-ALIST LAST ALEXANDRIA:NON-NEGATIVE-FLOAT-P UNREAD-CHAR ALEXANDRIA:ENSURE-SYMBOL PARSE-NAMESTRING ALEXANDRIA:DISJOIN SYMBOLP THIRD CHARACTERP ALEXANDRIA:FEATUREP ODDP STRING= ARRAY-DIMENSION ALEXANDRIA:COMPOSE ARRAY-DIMENSIONS BIT LOOP-FINISH MAKE-ECHO-STREAM ALEXANDRIA:NON-POSITIVE-FLOAT LEAST-POSITIVE-LONG-FLOAT PROGV LOGANDC1 ALEXANDRIA:NON-NEGATIVE-DOUBLE-FLOAT FLOATING-POINT-UNDERFLOW BUTLAST MASK-FIELD WRITE-STRING ALEXANDRIA:RASSOC-VALUE ALEXANDRIA:HASH-TABLE-PLIST COMPILED-FUNCTION-P REVERSE ARRAY-ELEMENT-TYPE WITH-PACKAGE-ITERATOR PATHNAME-HOST FIND-RESTART ALEXANDRIA:NEGATIVE-FIXNUM ALEXANDRIA:SHUFFLE STREAM-READ-BYTE POSITION-IF STREAM-CLEAR-OUTPUT COMPLEXP FOURTH GENERIC-FUNCTION BREAK *PRINT-ESCAPE* NOTINLINE *FEATURES* STRING-NOT-LESSP SET-MACRO-CHARACTER GRAPHIC-CHAR-P PACKAGE-NICKNAMES *PRINT-GENSYM* STRING-NOT-GREATERP SIMPLE-STRING-P DEFPARAMETER HASH-TABLE-REHASH-SIZE SCHAR INVALID-METHOD-ERROR WITH-COMPILATION-UNIT ROOM GET-INTERNAL-REAL-TIME MOST-POSITIVE-SHORT-FLOAT EVERY ALEXANDRIA:NON-POSITIVE-SINGLE-FLOAT LEAST-NEGATIVE-NORMALIZED-SINGLE-FLOAT FFLOOR FORCE-OUTPUT INVOKE-RESTART ALEXANDRIA:NON-NEGATIVE-DOUBLE-FLOAT-P EXP IMPORT STREAM-READ-CHAR UNWIND-PROTECT ALEXANDRIA:FACTORIAL SAFETY ALEXANDRIA:ESWITCH SIMPLE-STRING ALEXANDRIA:NEGATIVE-REAL LOGTEST *READ-SUPPRESS* MACRO-FUNCTION ALEXANDRIA:COPY-HASH-TABLE HASH-TABLE-SIZE ALEXANDRIA:STARTS-WITH INLINE STREAM-PEEK-CHAR NIL)
See also:
The ANSI Standard, Macro COMMON-LISP:DEFPACKAGE
The SBCL Manual, Variable SB-EXT:*ON-PACKAGE-VARIANCE*
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/return-star.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/return-star-tmpJQDKAVAY.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/types.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/types-tmp3I8CEEQY.fasl
; compilation finished in 0:00:00.083
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/debug.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/debug-tmpA3RHFLWZ.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/conditions.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/conditions-tmpYZIB7VXO.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/defalias.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/defalias-tmpR8PK79V8.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/deffoldable.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/deffoldable-tmpN1ZVB1HZ.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/defobsolete.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/defobsolete-tmpZGRRPISB.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/reader.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/reader-tmpFNKDE5XP.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/sequence.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/sequence-tmpRJTU435C.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/matching.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/matching-tmpI9WG87JK.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/time.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/time-tmpYDE6I9E6.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/dynamic-buffer.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/base/dynamic-buffer-tmp319UV2V8.fasl
; compilation finished in 0:00:00.076
;
; compilation unit finished
; printed 4 notes
WARNING: System definition file #P"/home/buildozer/aports/community/nyxt/src/_build/montezuma/montezuma.asd" contains definition for system "montezuma-tests". Please only define "montezuma" and secondary systems with a name starting with "montezuma/" (e.g. "montezuma/test") in that file.
WARNING: The CL-Containers system would enjoy having asdf-system-connections around. See
http://www.cliki.net/asdf-system-connections for details and download
instructions.
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/bordeaux-threads/src/pkgdcl.lisp" (written 20 OCT 2024 03:56:20 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/bordeaux-threads/src/pkgdcl-tmpLYQINFYS.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/bordeaux-threads/src/bordeaux-threads.lisp" (written 20 OCT 2024 03:56:20 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/bordeaux-threads/src/bordeaux-threads-tmpGA31XWNO.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/bordeaux-threads/src/impl-sbcl.lisp" (written 20 OCT 2024 03:56:20 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/bordeaux-threads/src/impl-sbcl-tmp5HT23M6C.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/bordeaux-threads/src/default-implementations.lisp" (written 20 OCT 2024 03:56:20 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/bordeaux-threads/src/default-implementations-tmpA60KLDKY.fasl
; compilation finished in 0:00:00.060
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iterate/package.lisp" (written 20 OCT 2024 03:57:10 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iterate/package-tmpD801X3GJ.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iterate/iterate.lisp" (written 20 OCT 2024 03:57:10 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iterate/iterate-tmpGOW1GC70.fasl
; compilation finished in 0:00:01.140
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/trivial-garbage/trivial-garbage.lisp" (written 20 OCT 2024 03:57:53 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/trivial-garbage/trivial-garbage-tmpPQ1X28TL.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/package.lisp" (written 20 OCT 2024 03:56:32 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/package-tmpE92ECU7O.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/init.lisp" (written 20 OCT 2024 03:56:32 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/init-tmp8S0II570.fasl
; compilation finished in 0:00:00.066
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/typelib.lisp" (written 20 OCT 2024 03:56:32 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/typelib-tmpJE88A12F.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/types.lisp" (written 20 OCT 2024 03:56:32 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/types.lisp
; in: DEFUN ARGUMENT->LISP-VALUE
; 'GIR::V-ULONG
;
; note: deleting unreachable code
; 'GIR::V-LONG
;
; note: deleting unreachable code
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/types-tmpA5FNLPLT.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/baseinfo.lisp" (written 20 OCT 2024 03:56:32 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/baseinfo-tmpHKCV9TP8.fasl
; compilation finished in 0:00:00.056
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/repository.lisp" (written 20 OCT 2024 03:56:32 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/repository-tmpZ18MA7XE.fasl
; compilation finished in 0:00:00.443
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/ffi.lisp" (written 20 OCT 2024 03:56:32 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/ffi-tmp6LQJ9T0C.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/function.lisp" (written 20 OCT 2024 03:56:32 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/function-tmpTX7OA81T.fasl
; compilation finished in 0:00:00.276
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/field.lisp" (written 20 OCT 2024 03:56:32 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/field-tmpWOTC3PB7.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/object.lisp" (written 20 OCT 2024 03:56:32 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/object-tmpHQE95SAC.fasl
; compilation finished in 0:00:00.083
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/gvalue.lisp" (written 20 OCT 2024 03:56:32 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/gvalue-tmpO87FP9NR.fasl
; compilation finished in 0:00:00.196
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/trampoline.lisp" (written 20 OCT 2024 03:56:32 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/trampoline.lisp
; in: CFFI:DEFCALLBACK DESTROY-TRAMPOLINE
; (GIR:DESTROY-TRAMPOLINE GIR::PTR)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/trampoline-tmpP6A3E92I.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/signal.lisp" (written 20 OCT 2024 03:56:32 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/signal.lisp
; in: CFFI:DEFCALLBACK MARSHAL
; (APPLY GIR::LISP-FUNC GIR::LISP-PARAMS)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; LISP-FUNC is not known to be a function
; (GIR:TRAMPOLINE-GET-FUNCTION GIR::CLOSURE)
;
; note: doing SAP to pointer coercion (cost 20)
; (GIR::GVALUE-GET GIR::GVALUE)
;
; note: doing SAP to pointer coercion (cost 20)
; (GIR::GVALUE-SET RETURN GIR::RES)
;
; note: doing SAP to pointer coercion (cost 20)
; in: CFFI:DEFCALLBACK FREE-CLOSURE
; (GIR:DESTROY-TRAMPOLINE GIR::CLOSURE)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/signal-tmpUSHT8RIL.fasl
; compilation finished in 0:00:00.066
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/properties.lisp" (written 20 OCT 2024 03:56:32 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/properties-tmp7YCPD44Y.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/enum.lisp" (written 20 OCT 2024 03:56:32 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/enum-tmpQXR7SNXD.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/struct.lisp" (written 20 OCT 2024 03:56:32 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/struct-tmp6FLI1OC3.fasl
; compilation finished in 0:00:00.050
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/utilities.lisp" (written 20 OCT 2024 03:56:32 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gobject-introspection/src/utilities-tmpWBK8JTS9.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.package.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.package-tmpUVEUD2ZN.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.init.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.init-tmpOWNJOEU.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.stable-pointer.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.stable-pointer.lisp
; in: DEFCALLBACK STABLE-POINTER-DESTROY-NOTIFY-CB
; (GLIB::FREE-STABLE-POINTER GLIB::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.stable-pointer-tmpVT5BMTA5.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.version.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.version-tmpN3CFVWZF.fasl
; compilation finished in 0:00:00.043
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.quark.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.quark-tmpNK27C0R1.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.misc.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.misc-tmp3BPE71HR.fasl
; compilation finished in 0:00:00.170
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.error.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.error-tmp758YUXMV.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.convert.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.convert-tmpGMQXK1HK.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.main-loop.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.main-loop.lisp
; in: DEFCALLBACK CALL-TIMEOUT-FROM-MAIN-LOOP-CB
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GLIB::DATA))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (GLIB:GET-STABLE-POINTER-VALUE GLIB::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.main-loop-tmp49Q238TW.fasl
; compilation finished in 0:00:00.163
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.utils.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.utils-tmpMXPMJ5KG.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.option-group.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.option-group.lisp
; in: DEFCALLBACK G-TRANSLATE-FUNC-CB
; (FUNCALL GLIB::FN GLIB::STR)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FN is not known to be a function
; (CFFI:DEFCALLBACK GLIB::G-TRANSLATE-FUNC-CB
; (:STRING :FREE-FROM-FOREIGN NIL)
; ((GLIB::STR :STRING) (GLIB::DATA :POINTER))
; (LET ((GLIB::FN (GLIB:GET-STABLE-POINTER-VALUE GLIB::DATA)))
; (RESTART-CASE (FUNCALL GLIB::FN GLIB::STR)
; (GLIB::RETURN-FROM-G-TRANSLATE-FUNC-CB NIL NIL))))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GLIB::STR #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GLIB::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.option-group-tmpB69313KI.fasl
; compilation finished in 0:00:00.083
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.key-value.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.key-value-tmp9ZT99EEA.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.random.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.random-tmpW045U8V2.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/closer-mop/closer-mop-packages.lisp" (written 20 OCT 2024 03:56:44 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/closer-mop/closer-mop-packages-tmp6XOIRI3N.fasl
; compilation finished in 0:00:00.086
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/closer-mop/closer-mop-shared.lisp" (written 20 OCT 2024 03:56:44 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/closer-mop/closer-mop-shared.lisp
; in: DEFUN GET-EMF
; (SUBSEQ CLOSER-MOP::ARGS 0 CLOSER-MOP::NOF-REQUIRED-ARGS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
; in: DEFUN ONLY-STANDARD-METHODS
; (TYPEP CLOSER-MOP::GF SB-MOP:SPECIALIZER)
;
; note: unable to optimize because: can't open-code test of non-constant type
; (EQL (SB-MOP:EQL-SPECIALIZER-OBJECT SB-MOP:SPECIALIZER) CLOSER-MOP::GF)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; in: DEFUN METHODS-ALL-THE-SAME-SPECIALIZERS
; (EQL (SB-MOP:EQL-SPECIALIZER-OBJECT CLOSER-MOP::SPEC1)
; (SB-MOP:EQL-SPECIALIZER-OBJECT CLOSER-MOP::SPEC2))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; in: DEFUN COMPUTE-DISCRIMINATOR
; (FUNCALL CLOSER-MOP::COMPUTE-NATIVE-DISCRIMINATOR)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; COMPUTE-NATIVE-DISCRIMINATOR is not known to be a function
; (TYPEP CLOSER-MOP::ARG CLOSER-MOP::SPEC)
;
; note: unable to optimize because: can't open-code test of non-constant type
; (EQL CLOSER-MOP::ARG (SB-MOP:EQL-SPECIALIZER-OBJECT CLOSER-MOP::SPEC))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; (FUNCALL CLOSER-MOP::COMPUTE-NATIVE-DISCRIMINATOR)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; COMPUTE-NATIVE-DISCRIMINATOR is not known to be a function
; (EQL CLOSER-MOP::ARG (SB-MOP:EQL-SPECIALIZER-OBJECT CLOSER-MOP::SPEC))
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/closer-mop/closer-mop-shared-tmp9ZHTLHSG.fasl
; compilation finished in 0:00:00.090
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/closer-mop/closer-sbcl.lisp" (written 20 OCT 2024 03:56:44 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/closer-mop/closer-sbcl-tmpRW73Q691.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.package.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.package-tmp4TM0ME1F.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.init.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.init-tmpU2IL9N4.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.object-function.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.object-function-tmpOPW41KDL.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.glib-defcallback.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.glib-defcallback-tmpIPVWLON2.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.generating.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.generating-tmpO0LCOIDS.fasl
; compilation finished in 0:00:00.106
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.type-info.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.type-info-tmpP264WQ6O.fasl
; compilation finished in 0:00:00.173
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.g-value.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.g-value-tmpESC43OCR.fasl
; compilation finished in 0:00:00.080
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.enumeration.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.enumeration-tmpWCAM54ZJ.fasl
; compilation finished in 0:00:00.043
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.boxed-lisp.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.boxed-lisp.lisp
; in: DEFMETHOD PARSE-G-VALUE-FOR-TYPE
; (CLOSER-MOP:DEFMETHOD GOBJECT::PARSE-G-VALUE-FOR-TYPE
; (GOBJECT::GVALUE-PTR (GOBJECT::TYPE-NUMERIC (EQL (GOBJECT:GTYPE "GBoxed"))))
; (DECLARE (IGNORE GOBJECT::PARSE-KIND))
; (IF (GOBJECT::G-TYPE= (GOBJECT:G-VALUE-TYPE GOBJECT::GVALUE-PTR)
; (GOBJECT::G-TYPE-STRV))
; (CFFI:CONVERT-FROM-FOREIGN
; (GOBJECT::G-VALUE-GET-BOXED GOBJECT::GVALUE-PTR)
; '(GLIB:G-STRV :FREE-FROM-FOREIGN NIL))
; (LET ((GOBJECT::BOXED-TYPE #))
; (GOBJECT::BOXED-PARSE-G-VALUE GOBJECT::GVALUE-PTR
; GOBJECT::BOXED-TYPE))))
; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION
; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS
; ==>
; (LET* ((SB-PCL::.ARGS-TAIL. NIL) (SB-PCL::.DUMMY0.))
; (DECLARE (IGNORABLE SB-PCL::.ARGS-TAIL. SB-PCL::.DUMMY0.))
; (DECLARE (IGNORE GOBJECT::PARSE-KIND))
; (LOCALLY
; (DECLARE (DISABLE-PACKAGE-LOCKS SB-PCL::%PARAMETER-BINDING-MODIFIED))
; (SYMBOL-MACROLET ((SB-PCL::%PARAMETER-BINDING-MODIFIED #))
; (DECLARE (ENABLE-PACKAGE-LOCKS SB-PCL::%PARAMETER-BINDING-MODIFIED))
; (BLOCK GOBJECT::PARSE-G-VALUE-FOR-TYPE
; (IF #
; #
; #)))))
;
; caught STYLE-WARNING:
; IGNORE declaration for an unknown variable: PARSE-KIND
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.boxed-lisp-tmpVTMW561L.fasl
; compilation finished in 0:00:00.293
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.boxed.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.boxed-tmpUNNGT9CF.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.variant-type.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.variant-type-tmp4L3W83SU.fasl
; compilation finished in 0:00:00.080
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.variant.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/glib/glib.variant-tmpGE7QNNEE.fasl
; compilation finished in 0:00:00.066
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.param-spec.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.param-spec-tmp9B0UZGT4.fasl
; compilation finished in 0:00:00.073
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.param.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.param-tmpAJ5U325P.fasl
; compilation finished in 0:00:00.240
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.gobject-class.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.gobject-class-tmpAOF1CYAS.fasl
; compilation finished in 0:00:00.063
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.base.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.base.lisp
; in: DEFCALLBACK GOBJECT-WEAK-REF-FINALIZED
; (GOBJECT::LOG-FOR :GC "~A is weak-ref-finalized with ~A refs~%"
; GOBJECT::POINTER (GOBJECT::REF-COUNT GOBJECT::POINTER))
; --> WHEN IF FORMAT
; ==>
; 1
;
; 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.
; (GOBJECT::LOG-FOR :GC
; "GObject at ~A was weak-ref-finalized while still holding ~
; lisp-side strong reference to it"
; GOBJECT::POINTER)
; --> WHEN IF FORMAT
; ==>
; 1
;
; 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.
; (CFFI:DEFCALLBACK GOBJECT::GOBJECT-WEAK-REF-FINALIZED
; :VOID
; ((GOBJECT::DATA :POINTER) (GOBJECT::POINTER :POINTER))
; (DECLARE (IGNORE GOBJECT::DATA))
; (GOBJECT::LOG-FOR :GC "~A is weak-ref-finalized with ~A refs~%"
; GOBJECT::POINTER (GOBJECT::REF-COUNT GOBJECT::POINTER))
; (BORDEAUX-THREADS:WITH-RECURSIVE-LOCK-HELD (GOBJECT::*FOREIGN-GOBJECTS-LOCK*)
; (REMHASH (CFFI-SYS:POINTER-ADDRESS GOBJECT::POINTER)
; GOBJECT::*FOREIGN-GOBJECTS-WEAK*)
; (WHEN
; (GETHASH (CFFI-SYS:POINTER-ADDRESS GOBJECT::POINTER)
; GOBJECT::*FOREIGN-GOBJECTS-STRONG*)
; (WARN
; "GObject at ~A was weak-ref-finalized while still holding lisp-side ~
; strong reference to it"
; GOBJECT::POINTER)
; (GOBJECT::LOG-FOR :GC
; "GObject at ~A was weak-ref-finalized while still holding ~
; lisp-side strong reference to it"
; GOBJECT::POINTER))
; (REMHASH (CFFI-SYS:POINTER-ADDRESS GOBJECT::POINTER)
; GOBJECT::*FOREIGN-GOBJECTS-STRONG*)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET DEREF
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20), for:
; the first result of SAP-REF-SAP-C
; (REMHASH (CFFI-SYS:POINTER-ADDRESS GOBJECT::POINTER)
; GOBJECT::*FOREIGN-GOBJECTS-WEAK*)
;
; note: doing unsigned word to integer coercion (cost 20)
; (GETHASH (CFFI-SYS:POINTER-ADDRESS GOBJECT::POINTER)
; GOBJECT::*FOREIGN-GOBJECTS-STRONG*)
;
; note: doing unsigned word to integer coercion (cost 20)
; (REMHASH (CFFI-SYS:POINTER-ADDRESS GOBJECT::POINTER)
; GOBJECT::*FOREIGN-GOBJECTS-STRONG*)
;
; note: doing unsigned word to integer coercion (cost 20)
; in: DEFCALLBACK G-TOGGLE-NOTIFY
; (GOBJECT::LOG-FOR :GC "~A is now ~A with ~A refs~%" GOBJECT::OBJECT
; (IF GOBJECT::IS-LAST-REF
; "weak pointer"
; "strong pointer")
; (GOBJECT::REF-COUNT GOBJECT::OBJECT))
; --> WHEN IF FORMAT
; ==>
; 1
;
; 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.
; (GOBJECT::LOG-FOR :GC "obj: ~A~%"
; (OR
; (GETHASH (CFFI-SYS:POINTER-ADDRESS GOBJECT::OBJECT)
; GOBJECT::*FOREIGN-GOBJECTS-STRONG*)
; (GETHASH (CFFI-SYS:POINTER-ADDRESS GOBJECT::OBJECT)
; GOBJECT::*FOREIGN-GOBJECTS-WEAK*)))
; --> WHEN IF FORMAT
; ==>
; 1
;
; 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.
; (GOBJECT::LOG-FOR :GC "GObject at ~A has no lisp-side (strong) reference"
; GOBJECT::OBJECT)
; --> WHEN IF FORMAT
; ==>
; 1
;
; 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.
; (GOBJECT::LOG-FOR :GC "GObject at ~A has no lisp-side (weak) reference"
; GOBJECT::OBJECT)
; --> WHEN IF FORMAT
; ==>
; 1
;
; 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.
; (CFFI:DEFCALLBACK GOBJECT::G-TOGGLE-NOTIFY
; :VOID
; ((GOBJECT::DATA :POINTER) (GOBJECT::OBJECT :POINTER)
; (GOBJECT::IS-LAST-REF :BOOLEAN))
; (DECLARE (IGNORE GOBJECT::DATA))
; (GOBJECT::LOG-FOR :GC "~A is now ~A with ~A refs~%" GOBJECT::OBJECT
; (IF GOBJECT::IS-LAST-REF
; "weak pointer"
; "strong pointer")
; (GOBJECT::REF-COUNT GOBJECT::OBJECT))
; (BORDEAUX-THREADS:WITH-RECURSIVE-LOCK-HELD (GOBJECT::*FOREIGN-GOBJECTS-LOCK*)
; (GOBJECT::LOG-FOR :GC "obj: ~A~%"
; (OR (GETHASH # GOBJECT::*FOREIGN-GOBJECTS-STRONG*)
; (GETHASH # GOBJECT::*FOREIGN-GOBJECTS-WEAK*)))
; (IF GOBJECT::IS-LAST-REF
; (LET* (# #)
; (IF GOBJECT::OBJ
; #
; #))
; (LET* (# #)
; (UNLESS GOBJECT::OBJ # #)
; (REMHASH GOBJECT::OBJ-ADR GOBJECT::*FOREIGN-GOBJECTS-WEAK*)
; (SETF #)))))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET DEREF
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20), for:
; the first result of SAP-REF-SAP-C
; (CFFI-SYS:POINTER-ADDRESS GOBJECT::OBJECT)
; --> BLOCK
; ==>
; (SB-SYS:SAP-INT CFFI-SYS::PTR)
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of SAP-INT
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the first result of SAP-INT
; (GETHASH (CFFI-SYS:POINTER-ADDRESS GOBJECT::OBJECT)
; GOBJECT::*FOREIGN-GOBJECTS-STRONG*)
;
; note: doing unsigned word to integer coercion (cost 20)
; (GETHASH (CFFI-SYS:POINTER-ADDRESS GOBJECT::OBJECT)
; GOBJECT::*FOREIGN-GOBJECTS-WEAK*)
;
; note: doing unsigned word to integer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.base-tmpIXCQTSHA.fasl
; compilation finished in 0:00:00.220
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.closures.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.closures-tmp5E6VIEMS.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.signals.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.signals.lisp
; in: DEFCALLBACK LISP-CLOSURE-MARSHAL
; (CFFI:DEFCALLBACK GOBJECT::LISP-CLOSURE-MARSHAL
; :VOID
; ((GOBJECT::CLOSURE (:POINTER (:STRUCT GOBJECT::LISP-CLOSURE)))
; (GOBJECT::RETURN-VALUE (:POINTER (:STRUCT GOBJECT:G-VALUE)))
; (GOBJECT::COUNT-OF-ARGS :UINT)
; (GOBJECT::ARGS (:POINTER (:STRUCT GOBJECT:G-VALUE)))
; (GOBJECT::INVOCATION-HINT :POINTER) (GOBJECT::MARSHAL-DATA :POINTER))
; (DECLARE (IGNORE GOBJECT::INVOCATION-HINT GOBJECT::MARSHAL-DATA))
; (LET* ((GOBJECT::ARGS
; (GOBJECT::PARSE-CLOSURE-ARGUMENTS GOBJECT::COUNT-OF-ARGS
; GOBJECT::ARGS))
; (GOBJECT::FUNCTION-ID
; (CFFI:FOREIGN-SLOT-VALUE GOBJECT::CLOSURE '# :FUNCTION-ID))
; (GOBJECT::ADDR (CFFI-SYS:POINTER-ADDRESS #))
; (GOBJECT::OBJECT (OR # #))
; (GOBJECT::RETURN-TYPE (AND # #))
; (GOBJECT::FN
; (GOBJECT::RETRIEVE-HANDLER-FROM-OBJECT GOBJECT::OBJECT
; GOBJECT::FUNCTION-ID))
; (GOBJECT::FN-RESULT
; (GOBJECT::CALL-WITH-RESTARTS GOBJECT::FN GOBJECT::ARGS)))
; (WHEN GOBJECT::RETURN-TYPE
; (GOBJECT:SET-G-VALUE GOBJECT::RETURN-VALUE GOBJECT::FN-RESULT
; GOBJECT::RETURN-TYPE :G-VALUE-INIT NIL))))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY
; ==>
; (LET ((GOBJECT::CLOSURE GOBJECT::CLOSURE)
; (GOBJECT::RETURN-VALUE GOBJECT::RETURN-VALUE)
; (GOBJECT::COUNT-OF-ARGS GOBJECT::COUNT-OF-ARGS)
; (GOBJECT::ARGS GOBJECT::ARGS)
; (GOBJECT::INVOCATION-HINT GOBJECT::INVOCATION-HINT)
; (GOBJECT::MARSHAL-DATA GOBJECT::MARSHAL-DATA))
; (DECLARE (IGNORE GOBJECT::INVOCATION-HINT GOBJECT::MARSHAL-DATA))
; (BLOCK GOBJECT::LISP-CLOSURE-MARSHAL
; (LET* ((GOBJECT::ARGS #)
; (GOBJECT::FUNCTION-ID #)
; (GOBJECT::ADDR #)
; (GOBJECT::OBJECT #)
; (GOBJECT::RETURN-TYPE #)
; (GOBJECT::FN #)
; (GOBJECT::FN-RESULT #))
; (WHEN GOBJECT::RETURN-TYPE
; (GOBJECT:SET-G-VALUE GOBJECT::RETURN-VALUE GOBJECT::FN-RESULT
; GOBJECT::RETURN-TYPE :G-VALUE-INIT NIL)))))
;
; note: doing SAP to pointer coercion (cost 20) to RETURN-VALUE
; (GOBJECT::PARSE-CLOSURE-ARGUMENTS GOBJECT::COUNT-OF-ARGS GOBJECT::ARGS)
;
; note: doing SAP to pointer coercion (cost 20)
; (LET* ((GOBJECT::ARGS
; (GOBJECT::PARSE-CLOSURE-ARGUMENTS GOBJECT::COUNT-OF-ARGS
; GOBJECT::ARGS))
; (GOBJECT::FUNCTION-ID
; (CFFI:FOREIGN-SLOT-VALUE GOBJECT::CLOSURE
; '(:STRUCT GOBJECT::LISP-CLOSURE)
; :FUNCTION-ID))
; (GOBJECT::ADDR
; (CFFI-SYS:POINTER-ADDRESS
; (CFFI:FOREIGN-SLOT-VALUE GOBJECT::CLOSURE '# :OBJECT)))
; (GOBJECT::OBJECT
; (OR (GETHASH GOBJECT::ADDR GOBJECT::*FOREIGN-GOBJECTS-STRONG*)
; (GETHASH GOBJECT::ADDR GOBJECT::*FOREIGN-GOBJECTS-WEAK*)))
; (GOBJECT::RETURN-TYPE
; (AND (NOT #) (GOBJECT:G-VALUE-TYPE GOBJECT::RETURN-VALUE)))
; (GOBJECT::FN
; (GOBJECT::RETRIEVE-HANDLER-FROM-OBJECT GOBJECT::OBJECT
; GOBJECT::FUNCTION-ID))
; (GOBJECT::FN-RESULT
; (GOBJECT::CALL-WITH-RESTARTS GOBJECT::FN GOBJECT::ARGS)))
; (WHEN GOBJECT::RETURN-TYPE
; (GOBJECT:SET-G-VALUE GOBJECT::RETURN-VALUE GOBJECT::FN-RESULT
; GOBJECT::RETURN-TYPE :G-VALUE-INIT NIL)))
;
; note: doing unsigned word to integer coercion (cost 20) to ADDR
; in: DEFCALLBACK LISP-CLOSURE-FINALIZE
; (GOBJECT::FINALIZE-LISP-CLOSURE GOBJECT::CLOSURE)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.signals-tmpI0PODGVV.fasl
; compilation finished in 0:00:00.143
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.utils.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.utils-tmp1Z95I17K.fasl
; compilation finished in 0:00:00.123
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.foreign-gobject-subclassing.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.foreign-gobject-subclassing.lisp
; in: DEFCALLBACK C-INSTANCE-INIT
; (GOBJECT::INSTANCE-INIT GOBJECT::INSTANCE CLASS)
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK C-CLASS-INIT
; (GOBJECT::CLASS-INIT CLASS GOBJECT::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK C-INTERFACE-INIT
; (GOBJECT::INTERFACE-INIT GOBJECT::IFACE GOBJECT::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK C-OBJECT-PROPERTY-GET
; (GOBJECT::OBJECT-PROPERTY-GET GOBJECT::OBJECT GOBJECT::PROPERTY-ID
; GOBJECT::VALUE GOBJECT::PSPEC)
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK C-OBJECT-PROPERTY-SET
; (GOBJECT::OBJECT-PROPERTY-SET GOBJECT::OBJECT GOBJECT::PROPERTY-ID
; GOBJECT::VALUE GOBJECT::PSPEC)
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gobject/gobject.foreign-gobject-subclassing-tmpCFVK1AC1.fasl
; compilation finished in 0:00:00.233
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.package.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.package-tmpHHRR8E8N.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.init.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.init-tmpWWJ02E3I.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.file.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.file-tmpONTOHUJ2.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.tls-connection.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.tls-connection-tmpQT9APWMH.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.content-type.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.content-type-tmp6LYQXY0L.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.app-info.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.app-info-tmpNKVDR0J1.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.icon.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.icon-tmp6F83SDCV.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.themed-icon.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.themed-icon-tmpEJNPPMJY.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.emblemed-icon.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.emblemed-icon-tmp31RWPSX2.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.emblem.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.emblem-tmp1HKLMSTH.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.action.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.action-tmpEWG5XJ53.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.action-group.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.action-group-tmpXHL60MUV.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.action-map.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.action-map-tmpB7NPDQCW.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.simple-action.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.simple-action-tmpGZ70QILE.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.simple-action-group.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.simple-action-group-tmpKYD38Q95.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.application.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.application-tmpV4YQ0HKA.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.menu-model.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.menu-model-tmpJXWE1HN2.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.menu.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.menu-tmpMNC5LX5B.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.list-model.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.list-model-tmp4RNSVVC1.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.list-store.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.list-store.lisp
; in: DEFCALLBACK G-COMPARE-DATA-FUNC-CALLBACK
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GIO::DATA) GIO::A GIO::B)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GIO::G-COMPARE-DATA-FUNC-CALLBACK
; :INT
; ((GIO::A GOBJECT:G-OBJECT) (GIO::B GOBJECT:G-OBJECT) (GIO::DATA :POINTER))
; (RESTART-CASE (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GIO::DATA) GIO::A
; GIO::B)
; (RETURN NIL -1)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GIO::A
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GIO::B
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GIO::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gio/gio.list-store-tmpN626KU7B.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.package.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.package-tmpOO0K1B0C.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.init.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.init-tmpVFL7JAFK.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.version.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.version-tmpU45RTF.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.structure.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.structure-tmpZTS6G7ND.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.load.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.load-tmp5TNBATEG.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.save.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.save-tmpJL6JXW7Z.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.memory.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.memory-tmp5PQ00DH7.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.scaling.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.scaling-tmp5R1KP4O2.fasl
; compilation finished in 0:00:00.043
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.utilities.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.utilities-tmpXQDKKJYI.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.animation.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.animation-tmpGJ3P31TF.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.loader.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.loader-tmpT2P2LFJI.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.interface.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk-pixbuf/gdk-pixbuf.interface-tmpKOV75BS9.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.package.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.package-tmpP07HWIXP.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.init.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.init-tmpURW0SA3C.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.version.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.version-tmp627QKRZN.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.matrix.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.matrix-tmpK8OFNZFV.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.status.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.status-tmpRMCY5COB.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.types.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.types-tmp9TN1FOJ6.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.regions.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.regions-tmpEID7NJG3.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.device.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.device-tmp8CJLVG9R.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.surface.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.surface-tmpZCJK45JG.fasl
; compilation finished in 0:00:00.076
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.image-surface.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.image-surface-tmpQC4TENAZ.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.png-surface.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.png-surface-tmp4HJFFDY3.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.pattern.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.pattern-tmp78H81ZL.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.context.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.context-tmp86K6JU7V.fasl
; compilation finished in 0:00:00.070
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.transformations.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.transformations-tmp2L6X9BVQ.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.paths.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.paths-tmpES5DCUFN.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.font-face.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.font-face-tmpDVKOEP6R.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.font-options.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.font-options-tmp4TWTKS75.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.scaled-font.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.scaled-font-tmpXSOQ2I78.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.text.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/cairo/cairo.text-tmpUA03GLW1.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.package.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.package-tmpO0OW34V4.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.init.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.init-tmpU8KQLETJ.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.version.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.version-tmpLBWGBOTB.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.attributes.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.attributes-tmpRX2XGI9U.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.tab-array.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.tab-array-tmpT2A3PQL9.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.fonts.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.fonts-tmpOVHYA3BO.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.layout.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.layout-tmpLT3TYWCE.fasl
; compilation finished in 0:00:00.043
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.script.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.script-tmp3YF2HENI.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.bidirectional.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.bidirectional-tmp9EEV8FN4.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.renderer.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.renderer-tmpDK25NJJO.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.context.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.context-tmpNMZ5RT9R.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.cairo-render.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.cairo-render-tmp8K51P1O1.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.glyph.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/pango/pango.glyph-tmpXAVJ8WEV.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.package.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.package-tmpOZHFIU2N.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.init.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.init-tmpJD9SCIW3.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.rectangle.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.rectangle-tmpICVK4HSI.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.threads.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.threads.lisp
; in: DEFCALLBACK SOURCE-FUNC-CB
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GDK::DATA))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (GLIB:GET-STABLE-POINTER-VALUE GDK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.threads-tmpA5CK3QHN.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.properties.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.properties-tmp5KE6HXAY.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.event-structures.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.event-structures-tmp5UBS1APN.fasl
; compilation finished in 0:00:00.580
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.cursor.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.cursor-tmpSI9E4AQB.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.device.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.device-tmpID7X8UGC.fasl
; compilation finished in 0:00:00.226
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.device-pad.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.device-pad-tmpFYN8G5D1.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.device-manager.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.device-manager-tmpG1VNK6NW.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.screen.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.screen-tmpV4YWE7CS.fasl
; compilation finished in 0:00:00.076
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.visual.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.visual-tmpC487WU3K.fasl
; compilation finished in 0:00:00.076
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.color.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.color-tmpKMQH3GP.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.rgba.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.rgba-tmp8N0WO2QA.fasl
; compilation finished in 0:00:00.050
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.display.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.display-tmpZ9QI367A.fasl
; compilation finished in 0:00:00.123
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.display-manager.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.display-manager-tmpRD10QMAI.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.monitor.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.monitor-tmp2L2R3A8M.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.pixbuf.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.pixbuf-tmp1CJ2OZ96.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.seat.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.seat.lisp
; in: DEFCALLBACK GDK-SEAT-GRAB-PREPARE-FUNC-CB
; (FUNCALL GDK::FN GDK::SEAT GDK::WINDOW)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FN is not known to be a function
; (CFFI:DEFCALLBACK GDK::GDK-SEAT-GRAB-PREPARE-FUNC-CB
; :VOID
; ((GDK::SEAT (GOBJECT:G-OBJECT GDK::GDK-SEAT))
; (GDK::WINDOW (GOBJECT:G-OBJECT GDK::GDK-WINDOW))
; (GDK::USER-DATA :POINTER))
; (LET ((GDK::FN (GLIB:GET-STABLE-POINTER-VALUE GDK::USER-DATA)))
; (FUNCALL GDK::FN GDK::SEAT GDK::WINDOW)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GDK::SEAT
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GDK::WINDOW
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GDK::USER-DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.seat-tmpDKS9KGUG.fasl
; compilation finished in 0:00:00.050
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.window.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.window.lisp
; in: DEFCALLBACK GDK-WINDOW-INVALIDATE-MAYBE-RECURSE-CB
; (FUNCALL GDK::FN GDK::WINDOW)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FN is not known to be a function
; (CFFI:DEFCALLBACK GDK::GDK-WINDOW-INVALIDATE-MAYBE-RECURSE-CB
; :BOOLEAN
; ((GDK::WINDOW (GOBJECT:G-OBJECT GDK::GDK-WINDOW))
; (GDK::USER-DATA :POINTER))
; (LET ((GDK::FN (GLIB:GET-STABLE-POINTER-VALUE GDK::USER-DATA)))
; (FUNCALL GDK::FN GDK::WINDOW)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GDK::WINDOW
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GDK::USER-DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.window-tmp3E37X9HX.fasl
; compilation finished in 0:00:00.623
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.frame-timings.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.frame-timings-tmpXPWOLC8S.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.frame-clock.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.frame-clock-tmpUSWNVC8E.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.gl-context.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.gl-context-tmp68FKQK8H.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.events.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.events.lisp
; in: DEFCALLBACK GDK-EVENT-FUNC-CALLBACK
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GDK::USER-DATA) GDK::EVENT)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GDK::GDK-EVENT-FUNC-CALLBACK
; :VOID
; ((GDK::EVENT (GOBJECT:G-BOXED-FOREIGN GDK:GDK-EVENT))
; (GDK::USER-DATA :POINTER))
; (RESTART-CASE (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GDK::USER-DATA)
; GDK::EVENT)
; (GDK::RETURN-FROM-CALLBACK NIL NIL)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GDK::EVENT
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GDK::USER-DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.events-tmpMU3D23G2.fasl
; compilation finished in 0:00:00.069
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.general.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.general-tmpP7RRFRW4.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.key-values.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.key-values-tmp11AFZINB.fasl
; compilation finished in 0:00:00.096
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.selections.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.selections-tmpN84Z1F4D.fasl
; compilation finished in 0:00:00.073
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.drag-and-drop.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.drag-and-drop-tmpHX0IAQ8A.fasl
; compilation finished in 0:00:00.056
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.app.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.app-tmp8MQVZGT.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.pango.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.pango-tmp88LUAVGW.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.cairo.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.cairo-tmpM5RP096T.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.x11window.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gdk/gdk.x11window-tmpRHTB3TH1.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.package.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.package-tmp4YJPLPB8.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.child-properties.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.child-properties-tmp6202QBVV.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.version.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.version-tmp8COQHEZO.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.enumerations.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.enumerations-tmpQYBBS7QC.fasl
; compilation finished in 0:00:00.140
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.main-loop.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.main-loop-tmpAMQ7AMSJ.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.accel-group.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.accel-group-tmpQSC8Z7I4.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.accel-map.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.accel-map-tmpNGMCS43U.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.selections.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.selections-tmp5EM0MAXI.fasl
; compilation finished in 0:00:00.163
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.drag-and-drop.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.drag-and-drop-tmpPO1KM2UM.fasl
; compilation finished in 0:00:00.116
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.stock-item.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.stock-item-tmp9MJ8K0GA.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.clipboard.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.clipboard.lisp
; in: DEFCALLBACK GTK-CLIPBOARD-TEXT-RECEIVED-FUNC-CB
; (FUNCALL GTK::FN GTK::CLIPBOARD GTK::TEXT)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FN is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-CLIPBOARD-TEXT-RECEIVED-FUNC-CB
; :VOID
; ((GTK::CLIPBOARD (GOBJECT:G-OBJECT GTK::GTK-CLIPBOARD))
; (GTK::TEXT :STRING) (GTK::DATA :POINTER))
; (LET ((GTK::FN (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)))
; (RESTART-CASE (FUNCALL GTK::FN GTK::CLIPBOARD GTK::TEXT)
; (GTK::RETURN-FROM-GTK-CLIPBOARD-TEXT-RECEIVED-FUNC-CB NIL NIL))))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::CLIPBOARD
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TEXT #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK GTK-CLIPBOARD-IMAGE-RECEIVED-FUNC-CB
; (FUNCALL GTK::FN GTK::CLIPBOARD GTK::PIXBUF)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FN is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-CLIPBOARD-IMAGE-RECEIVED-FUNC-CB
; :VOID
; ((GTK::CLIPBOARD (GOBJECT:G-OBJECT GTK::GTK-CLIPBOARD))
; (GTK::PIXBUF (GOBJECT:G-OBJECT GDK-PIXBUF:GDK-PIXBUF))
; (GTK::DATA :POINTER))
; (LET ((GTK::FN (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)))
; (RESTART-CASE (FUNCALL GTK::FN GTK::CLIPBOARD GTK::PIXBUF)
; (GTK::RETURN-FROM-GTK-CLIPBOARD-IMAGE-RECEIVED-FUNC-CB NIL NIL))))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::CLIPBOARD
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::PIXBUF
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK GTK-CLIPBOARD-GET-FUNC-CB
; (FUNCALL GTK::FN GTK::CLIPBOARD GTK::SELECTION-DATA GTK::INFO)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-CLIPBOARD-GET-FUNC-CB
; :VOID
; ((GTK::CLIPBOARD (GOBJECT:G-OBJECT GTK::GTK-CLIPBOARD))
; (GTK::SELECTION-DATA (GOBJECT:G-BOXED-FOREIGN GTK:GTK-SELECTION-DATA))
; (GTK::INFO :UINT) (GTK::DATA :POINTER))
; (LET ((GTK::FN (CAR #)))
; (RESTART-CASE (FUNCALL GTK::FN GTK::CLIPBOARD GTK::SELECTION-DATA
; GTK::INFO)
; (GTK::RETURN-FROM-GTK-CLIPBOARD-GET-FUNC-CB NIL NIL))))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::CLIPBOARD
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::SELECTION-DATA
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK GTK-CLIPBOARD-CLEAR-FUNC-CB
; (FUNCALL GTK::FN GTK::CLIPBOARD)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-CLIPBOARD-CLEAR-FUNC-CB
; :VOID
; ((GTK::CLIPBOARD (GOBJECT:G-OBJECT GTK::GTK-CLIPBOARD))
; (GTK::DATA :POINTER))
; (LET ((GTK::FN (CDR #)))
; (GLIB::FREE-STABLE-POINTER GTK::DATA)
; (RESTART-CASE (FUNCALL GTK::FN GTK::CLIPBOARD)
; (GTK::RETURN-FROM-GTK-CLIPBOARD-CLEAR-FUNC-CB NIL NIL))))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::CLIPBOARD
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY
; ==>
; (LET ((GTK::CLIPBOARD
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::CLIPBOARD
; #))
; (GTK::DATA GTK::DATA))
; (BLOCK GTK::GTK-CLIPBOARD-CLEAR-FUNC-CB
; (LET ((GTK::FN #))
; (GLIB::FREE-STABLE-POINTER GTK::DATA)
; (RESTART-CASE (FUNCALL GTK::FN GTK::CLIPBOARD)
; (GTK::RETURN-FROM-GTK-CLIPBOARD-CLEAR-FUNC-CB NIL NIL)))))
;
; note: doing SAP to pointer coercion (cost 20) to DATA
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.clipboard-tmpDNAAZUQ1.fasl
; compilation finished in 0:00:00.049
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.settings.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.settings-tmpSFHGUSI2.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.bindings.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.bindings-tmpJEMJHCAQ.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.mount-operation.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.mount-operation-tmpJV5SBQ61.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.buildable.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.buildable-tmpFHSB04A0.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.builder.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.builder.lisp
; in: DEFCALLBACK BUILDER-CONNECT-FUNC-CALLBACK
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::BUILDER GTK::OBJECT
; GTK::SIGNAL-NAME GTK::HANDLER-NAME GTK::CONNECT-OBJECT GTK::FLAGS)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::BUILDER-CONNECT-FUNC-CALLBACK
; :VOID
; ((GTK::BUILDER (GOBJECT:G-OBJECT GTK::GTK-BUILDER))
; (GTK::OBJECT GOBJECT:G-OBJECT)
; (GTK::SIGNAL-NAME (:STRING :FREE-FROM-FOREIGN NIL))
; (GTK::HANDLER-NAME (:STRING :FREE-FROM-FOREIGN NIL))
; (GTK::CONNECT-OBJECT GOBJECT:G-OBJECT) (GTK::FLAGS GTK::CONNECT-FLAGS)
; (GTK::DATA :POINTER))
; (RESTART-CASE (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
; GTK::BUILDER GTK::OBJECT GTK::SIGNAL-NAME
; GTK::HANDLER-NAME GTK::CONNECT-OBJECT GTK::FLAGS)
; (RETURN NIL NIL)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::BUILDER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::OBJECT
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::SIGNAL-NAME
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::HANDLER-NAME
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::CONNECT-OBJECT
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.builder-tmpQQZWJZI3.fasl
; compilation finished in 0:00:00.053
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/atk.implementor-iface.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/atk.implementor-iface-tmpPHMA69WA.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.orientable.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.orientable-tmpXFTEJBZU.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.activatable.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.activatable-tmpXHDS9JD.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.scrollable.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.scrollable-tmp7DVUZNNP.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.actionable.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.actionable-tmpSLELCKLF.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.stock-images.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.stock-images-tmpRFCZGW36.fasl
; compilation finished in 0:00:00.060
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.widget-path.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.widget-path-tmpQPTRRFAI.fasl
; compilation finished in 0:00:00.090
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.style-context.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.style-context-tmpVZ9V8GEH.fasl
; compilation finished in 0:00:00.070
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.style-provider.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.style-provider-tmpI0YDSDVA.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.style-properties.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.style-properties-tmpKLR0OPN5.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.theming-engine.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.theming-engine-tmpQNILNMER.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.css-provider.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.css-provider-tmpMAMO3XGR.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.icon-theme.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.icon-theme-tmp4CBIDXQU.fasl
; compilation finished in 0:00:00.050
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.style.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.style-tmp4M6Z7O9T.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.numerable-icon.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.numerable-icon-tmp3RKO0O0S.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.widget.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.widget-tmpJNADND61.fasl
; compilation finished in 0:00:00.413
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.misc.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.misc-tmpKEV7GFR4.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.container.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.container.lisp
; in: DEFCALLBACK GTK-CONTAINER-FOREACH-CB
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::WIDGET)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-CONTAINER-FOREACH-CB
; :VOID
; ((GTK::WIDGET (GOBJECT:G-OBJECT GTK:GTK-WIDGET)) (GTK::DATA :POINTER))
; (RESTART-CASE (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
; GTK::WIDGET)
; (RETURN NIL NIL)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::WIDGET
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.container-tmp13EJYBWB.fasl
; compilation finished in 0:00:00.080
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.bin.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.bin-tmp93YER753.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.range.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.range-tmpB50UYUD7.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.menu-shell.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.menu-shell-tmpXO9X6PIG.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.im-context.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.im-context-tmpBULZPU0U.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.box.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.box-tmp7R9QD7N9.fasl
; compilation finished in 0:00:00.070
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.table.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.table-tmpGP8R3FTA.fasl
; compilation finished in 0:00:00.043
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.grid.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.grid-tmp121QKS9N.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.layout.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.layout-tmp2JF031K4.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.fixed.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.fixed-tmpX1DK061H.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.notebook.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.notebook-tmp4FJCN3GX.fasl
; compilation finished in 0:00:00.086
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.paned.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.paned-tmpWO4JLIQB.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.expander.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.expander-tmpHBCFHPPX.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.alignment.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.alignment-tmp8ZEXUD27.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.button-box.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.button-box-tmp95B25LCL.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.header-bar.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.header-bar-tmpAMNCEZSG.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.overlay.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.overlay-tmpVQGQLFW2.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.action-bar.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.action-bar-tmpXATIMY4E.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.flow-box.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.flow-box.lisp
; in: DEFCALLBACK GTK-FLOW-BOX-FILTER-FUNC-CALLBACK
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::CHILD)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-FLOW-BOX-FILTER-FUNC-CALLBACK
; :BOOLEAN
; ((GTK::CHILD (GOBJECT:G-OBJECT GTK::GTK-FLOW-BOX-CHILD))
; (GTK::DATA :POINTER))
; (RESTART-CASE (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::CHILD)
; (RETURN NIL NIL)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::CHILD
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK GTK-FLOW-BOX-SORT-FUNC-CALLBACK
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::CHILD1 GTK::CHILD2)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-FLOW-BOX-SORT-FUNC-CALLBACK
; :INT
; ((GTK::CHILD1 (GOBJECT:G-OBJECT GTK::GTK-FLOW-BOX-CHILD))
; (GTK::CHILD2 (GOBJECT:G-OBJECT GTK::GTK-FLOW-BOX-CHILD))
; (GTK::DATA :POINTER))
; (RESTART-CASE (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
; GTK::CHILD1 GTK::CHILD2)
; (RETURN NIL -1)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::CHILD1
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::CHILD2
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK GTK-FLOW-BOX-CREATE-WIDGET-FUNC-CALLBACK
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::ITEM)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-FLOW-BOX-CREATE-WIDGET-FUNC-CALLBACK
; (GOBJECT:G-OBJECT GTK:GTK-WIDGET)
; ((GTK::ITEM GOBJECT:G-OBJECT) (GTK::DATA :POINTER))
; (RESTART-CASE (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::ITEM)
; (RETURN NIL NIL)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::ITEM
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.flow-box-tmp3LJ5VTJR.fasl
; compilation finished in 0:00:00.060
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.list-box.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.list-box.lisp
; in: DEFCALLBACK GTK-LIST-BOX-FOREACH-FUNC-CALLBACK
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::BOX GTK::ROW)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-LIST-BOX-FOREACH-FUNC-CALLBACK
; :BOOLEAN
; ((GTK::BOX (GOBJECT:G-OBJECT GTK::GTK-LIST-BOX))
; (GTK::ROW (GOBJECT:G-OBJECT GTK::GTK-LIST-BOX-ROW)) (GTK::DATA :POINTER))
; (RESTART-CASE (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::BOX
; GTK::ROW)
; (RETURN NIL NIL)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::BOX
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::ROW
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK GTK-LIST-BOX-FILTER-FUNC-CALLBACK
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::ROW)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-LIST-BOX-FILTER-FUNC-CALLBACK
; :BOOLEAN
; ((GTK::ROW (GOBJECT:G-OBJECT GTK::GTK-LIST-BOX-ROW)) (GTK::DATA :POINTER))
; (RESTART-CASE (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::ROW)
; (RETURN NIL NIL)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::ROW
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK GTK-LIST-BOX-UPDATE-HEADER-FUNC-CALLBACK
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::ROW GTK::BEFORE)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-LIST-BOX-UPDATE-HEADER-FUNC-CALLBACK
; :VOID
; ((GTK::ROW (GOBJECT:G-OBJECT GTK::GTK-LIST-BOX-ROW))
; (GTK::BEFORE (GOBJECT:G-OBJECT GTK::GTK-LIST-BOX-ROW))
; (GTK::DATA :POINTER))
; (RESTART-CASE (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::ROW
; GTK::BEFORE)
; (RETURN NIL NIL)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::ROW
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::BEFORE
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK GTK-LIST-BOX-SORT-FUNC-CALLBACK
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::ROW1 GTK::ROW2)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-LIST-BOX-SORT-FUNC-CALLBACK
; :INT
; ((GTK::ROW1 (GOBJECT:G-OBJECT GTK::GTK-LIST-BOX-ROW))
; (GTK::ROW2 (GOBJECT:G-OBJECT GTK::GTK-LIST-BOX-ROW))
; (GTK::DATA :POINTER))
; (RESTART-CASE (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::ROW1
; GTK::ROW2)
; (RETURN NIL -1)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::ROW1
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::ROW2
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK GTK-LIST-BOX-CREATE-WIDGET-FUNC-CALLBACK
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::ITEM)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-LIST-BOX-CREATE-WIDGET-FUNC-CALLBACK
; (GOBJECT:G-OBJECT GTK:GTK-WIDGET)
; ((GTK::ITEM GOBJECT:G-OBJECT) (GTK::DATA :POINTER))
; (RESTART-CASE (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::ITEM)
; (RETURN NIL NIL)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::ITEM
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.list-box-tmp8VUWAF03.fasl
; compilation finished in 0:00:00.090
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.revealer.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.revealer-tmpJUI0JWVS.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.stack.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.stack-tmpHNA3KE33.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.separator.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.separator-tmp9QACGPOH.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.frame.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.frame-tmpST69PK2Q.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.aspect-frame.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.aspect-frame-tmpYAKMHP3C.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.scrollbar.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.scrollbar-tmpT250CJEH.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.scrolled-window.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.scrolled-window-tmpZ5LLIZWU.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.window.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.window-tmpK87BOA56.fasl
; compilation finished in 0:00:00.156
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.dialog.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.dialog-tmpRL4WWIL2.fasl
; compilation finished in 0:00:00.059
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.invisible.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.invisible-tmp9PRKYPOC.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.message-dialog.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.message-dialog-tmp747V57QS.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.window-group.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.window-group-tmpK7KF0QEZ.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.about-dialog.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.about-dialog-tmp7L3QASG.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.assistant.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.assistant.lisp
; in: DEFINE-CB-METHODS GTK-ASSISTANT-PAGE-FUNC
; (GOBJECT:DEFINE-CB-METHODS GTK::GTK-ASSISTANT-PAGE-FUNC :INT
; ((GTK::CURRENT-PAGE :INT)))
; --> CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP
; --> SB-ALIEN::ALIEN-LAMBDA SB-ALIEN::%ALIEN-CALLBACK-ALIEN
; --> SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION LET LET SETF LET* THE LOCALLY LET
; --> BLOCK LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; --> CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP
; --> SB-ALIEN::ALIEN-LAMBDA SB-ALIEN::%ALIEN-CALLBACK-ALIEN
; --> SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION LET LET SETF LET* THE LOCALLY LET
; --> BLOCK LET* CFFI:CONVERT-FROM-FOREIGN
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN
; (CFFI:FOREIGN-SLOT-VALUE #:DATA3 '(:STRUCT GOBJECT::OBJECT-FUNC-REF)
; :OBJECT)
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP
; --> SB-ALIEN::ALIEN-LAMBDA SB-ALIEN::%ALIEN-CALLBACK-ALIEN
; --> SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION LET LET LOCALLY LET BLOCK LET*
; --> CFFI:CONVERT-FROM-FOREIGN
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN
; (CFFI:FOREIGN-SLOT-VALUE #:DATA3 '(:STRUCT GOBJECT::OBJECT-FUNC-REF)
; :OBJECT)
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.assistant-tmpSU9OHSB9.fasl
; compilation finished in 0:00:00.076
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.offscreen-window.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.offscreen-window-tmpTEZ5J20P.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.label.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.label-tmp7EQWE70T.fasl
; compilation finished in 0:00:00.050
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.accel-label.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.accel-label-tmp83ON8YFR.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.image.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.image-tmpEOOWYRL6.fasl
; compilation finished in 0:00:00.063
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.progress-bar.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.progress-bar-tmpFDZ5SF8C.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.statusbar.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.statusbar-tmp6MGXO15Y.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.level-bar.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.level-bar-tmpSWPNJISY.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.info-bar.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.info-bar-tmpUXH28IAQ.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.status-icon.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.status-icon-tmpRZXAYVZS.fasl
; compilation finished in 0:00:00.050
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.spinner.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.spinner-tmpFVBAZC5N.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.button.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.button-tmpEN1U5236.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.toggle-button.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.toggle-button-tmpWKFFHE0Z.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.check-button.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.check-button-tmpHCGNQVX4.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.radio-button.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.radio-button-tmpNZ1LR6KM.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.link-button.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.link-button-tmpPQVFZD5C.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.scale-button.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.scale-button-tmpE8JTPSGT.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.volume-button.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.volume-button-tmpXLGMUBFO.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.switch.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.switch-tmp85XVAH0V.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.menu-button.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.menu-button-tmpE4QSJJPV.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.lock-button.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.lock-button-tmpW9VXJCU5.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.text-tag.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.text-tag-tmpIF3QWIV6.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.text-iter.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.text-iter.lisp
; in: DEFCALLBACK GTK-TEXT-CHAR-PREDICATE
; (FUNCALL FUNCTION CHAR)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FUNCTION is not known to be a function
; (GLIB:GET-STABLE-POINTER-VALUE GTK::USER-DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.text-iter-tmp9BHJXQOA.fasl
; compilation finished in 0:00:00.290
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.text-mark.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.text-mark-tmp8MZGKR5X.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.text-buffer.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.text-buffer.lisp
; in: DEFCALLBACK GTK-TEXT-BUFFER-DESERIALIZE-CB
; (FUNCALL GTK::FN GTK::REGISTER-BUFFER GTK::CONTENT-BUFFER ITERATE:ITER
; GTK::BYTES GTK::CREATE-TAGS)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FN is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-TEXT-BUFFER-DESERIALIZE-CB
; :BOOLEAN
; ((GTK::REGISTER-BUFFER (GOBJECT:G-OBJECT GTK::GTK-TEXT-BUFFER))
; (GTK::CONTENT-BUFFER (GOBJECT:G-OBJECT GTK::GTK-TEXT-BUFFER))
; (ITERATE:ITER
; (GOBJECT:G-BOXED-FOREIGN GTK:GTK-TEXT-ITER))
; (GTK::DATA :POINTER) (LENGTH GLIB:G-SIZE) (GTK::CREATE-TAGS :BOOLEAN)
; (GTK::USER-DATA :POINTER) (ERROR :POINTER))
; (GLIB:WITH-CATCHING-TO-G-ERROR (ERROR)
; (LET ((GTK::FN #))
; (RESTART-CASE (LET #
; #)
; (GTK::RETURN-FROM-GTK-TEXT-BUFFER-DESERIALIZE-CB NIL #)))))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::REGISTER-BUFFER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::CONTENT-BUFFER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::USER-DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:WITH-CATCHING-TO-G-ERROR (ERROR)
; (LET ((GTK::FN (GLIB:GET-STABLE-POINTER-VALUE GTK::USER-DATA)))
; (RESTART-CASE (LET (#)
; (PROGN # T))
; (GTK::RETURN-FROM-GTK-TEXT-BUFFER-DESERIALIZE-CB NIL
; (ERROR 'GTK::G-ERROR-CONDITION :DOMAIN "cl-gtk2" :CODE 0 :MESSAGE
; "'return-from-gtk-text-buffer-deserialize-cb' restart was called")))))
; --> SB-INT:DX-FLET FLET #:FUN3 BLOCK PROGN
; ==>
; (GLIB::%G-SET-ERROR-LITERAL ERROR (GLIB::G-ERROR-CONDITION-DOMAIN GLIB::E)
; (GLIB::G-ERROR-CONDITION-CODE GLIB::E)
; (GLIB::G-ERROR-CONDITION-MESSAGE GLIB::E))
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK GTK-TEXT-BUFFER-SERIALIZE-CB
; (FUNCALL GTK::FN GTK::REGISTER-BUFFER GTK::CONTENT-BUFFER GTK::START-ITER
; GTK::END-ITER)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FN is not known to be a function
; (LENGTH GTK::BYTES)
;
; 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.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (ITERATE:ITER
; (ITERATE:FOR GTK::I GTK::FROM 0 GTK::BELOW (LENGTH GTK::BYTES))
; (SETF (CFFI:MEM-AREF GTK::BYTES-PTR :UINT8 GTK::I)
; (AREF GTK::BYTES GTK::I)))
; --> BLOCK BLOCK TAGBODY PROGN LET* AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; (CFFI:DEFCALLBACK GTK::GTK-TEXT-BUFFER-SERIALIZE-CB
; :POINTER
; ((GTK::REGISTER-BUFFER (GOBJECT:G-OBJECT GTK::GTK-TEXT-BUFFER))
; (GTK::CONTENT-BUFFER (GOBJECT:G-OBJECT GTK::GTK-TEXT-BUFFER))
; (GTK::START-ITER (GOBJECT:G-BOXED-FOREIGN GTK:GTK-TEXT-ITER))
; (GTK::END-ITER (GOBJECT:G-BOXED-FOREIGN GTK:GTK-TEXT-ITER))
; (LENGTH (:POINTER GLIB:G-SIZE)) (GTK::USER-DATA :POINTER))
; (LET ((GTK::FN (GLIB:GET-STABLE-POINTER-VALUE GTK::USER-DATA)))
; (RESTART-CASE (LET* (# #)
; (SETF #)
; (ITERATE:ITER
; #
; #)
; GTK::BYTES-PTR)
; (GTK::RETURN-FROM-GTK-TEXT-BUFFER-SERIALIZE-CB NIL NIL))))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::REGISTER-BUFFER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::CONTENT-BUFFER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::START-ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::END-ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::USER-DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.text-buffer-tmp54PLG5WT.fasl
; compilation finished in 0:00:00.333
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.text-tag-table.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.text-tag-table.lisp
; in: DEFCALLBACK GTK-TEXT-TAG-TABLE-FOREACH-FUNCTION
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::TAG)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-TEXT-TAG-TABLE-FOREACH-FUNCTION
; :VOID
; ((GTK::TAG (GOBJECT:G-OBJECT GTK:GTK-TEXT-TAG)) (GTK::DATA :POINTER))
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::TAG))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TAG
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.text-tag-table-tmpGJ7DBMK8.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.text-view.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.text-view-tmp7O4V59Z5.fasl
; compilation finished in 0:00:00.136
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-model.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-model.lisp
; in: DEFINE-VTABLE ("GtkTreeModel" GTK-TREE-MODEL)
; (GOBJECT:DEFINE-VTABLE ("GtkTreeModel" GTK::GTK-TREE-MODEL)
; (:SKIP GTK::G-IFACE (:STRUCT GOBJECT:G-TYPE-INTERFACE))
; (:SKIP GTK::TREE-MODEL-ROW-CHANGED :POINTER)
; (:SKIP GTK::TREE-MODEL-ROW-INSERTED :POINTER)
; (:SKIP GTK::TREE-MODEL-ROW-HAS-CHILD-TOGGLED :POINTER)
; (:SKIP GTK::TREE-MODEL-ROW-DELETED :POINTER)
; (:SKIP GTK::TREE-MODEL-ROWS-REORDERED :POINTER)
; (GTK::GET-FLAGS
; (GTK::GTK-TREE-MODEL-FLAGS (GTK::TREE-MODEL GOBJECT:G-OBJECT)))
; (GTK::GET-N-COLUMNS (:INT (GTK::TREE-MODEL GOBJECT:G-OBJECT)))
; (GTK::GET-COLUMN-TYPE
; (GOBJECT:G-TYPE (GTK::TREE-MODEL GOBJECT:G-OBJECT) (GTK::INDEX :INT)))
; (GTK::GET-ITER
; (:BOOLEAN (GTK::TREE-MODEL GOBJECT:G-OBJECT)
; (ITERATE:ITER
; (GOBJECT:G-BOXED-FOREIGN GTK::GTK-TREE-ITER))
; (GTK::PATH (GOBJECT:G-BOXED-FOREIGN GTK::GTK-TREE-PATH))))
; ...)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::PATH
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK
; --> LET TAGBODY RESTART-BIND LET PROGN RETURN-FROM
; --> GTK::GTK-TREE-MODEL-GET-ITER-IMPL PROGN
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-106" :IN GTK::GTK-TREE-MODEL-GET-ITER-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-103" :IN GTK::GTK-TREE-MODEL-GET-ITER-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> LOCALLY
; ==>
; (#:CLEANUP-FUN-103)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK LOCALLY
; ==>
; (#:CLEANUP-FUN-106)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK
; --> LET TAGBODY RETURN-FROM FUNCALL
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* LOCALLY LET CFFI:TRANSLATE-TO-FOREIGN BLOCK LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* LOCALLY LET CFFI:TRANSLATE-TO-FOREIGN BLOCK LET
; --> UNWIND-PROTECT FLET BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN
; --> RESTART-CASE BLOCK LET TAGBODY RESTART-BIND LET PROGN RETURN-FROM
; --> GTK::GTK-TREE-MODEL-GET-PATH-IMPL PROGN
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-131" :IN GTK::GTK-TREE-MODEL-GET-PATH-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* LOCALLY LET CFFI:TRANSLATE-TO-FOREIGN BLOCK LET
; --> UNWIND-PROTECT FLET BLOCK LOCALLY
; ==>
; (#:CLEANUP-FUN-131)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* LOCALLY LET CFFI:TRANSLATE-TO-FOREIGN BLOCK LET
; --> UNWIND-PROTECT FLET BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN
; --> RESTART-CASE BLOCK LET TAGBODY RETURN-FROM FUNCALL
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET BLOCK LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GOBJECT:SET-G-VALUE GTK::VALUE GTK::V TYPE)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-157" :IN GTK::GTK-TREE-MODEL-GET-VALUE-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; (GOBJECT:DEFINE-VTABLE ("GtkTreeModel" GTK::GTK-TREE-MODEL)
; (:SKIP GTK::G-IFACE (:STRUCT GOBJECT:G-TYPE-INTERFACE))
; (:SKIP GTK::TREE-MODEL-ROW-CHANGED :POINTER)
; (:SKIP GTK::TREE-MODEL-ROW-INSERTED :POINTER)
; (:SKIP GTK::TREE-MODEL-ROW-HAS-CHILD-TOGGLED :POINTER)
; (:SKIP GTK::TREE-MODEL-ROW-DELETED :POINTER)
; (:SKIP GTK::TREE-MODEL-ROWS-REORDERED :POINTER)
; (GTK::GET-FLAGS
; (GTK::GTK-TREE-MODEL-FLAGS (GTK::TREE-MODEL GOBJECT:G-OBJECT)))
; (GTK::GET-N-COLUMNS (:INT (GTK::TREE-MODEL GOBJECT:G-OBJECT)))
; (GTK::GET-COLUMN-TYPE
; (GOBJECT:G-TYPE (GTK::TREE-MODEL GOBJECT:G-OBJECT) (GTK::INDEX :INT)))
; (GTK::GET-ITER
; (:BOOLEAN (GTK::TREE-MODEL GOBJECT:G-OBJECT)
; (ITERATE:ITER
; (GOBJECT:G-BOXED-FOREIGN GTK::GTK-TREE-ITER))
; (GTK::PATH (GOBJECT:G-BOXED-FOREIGN GTK::GTK-TREE-PATH))))
; ...)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET BLOCK LET UNWIND-PROTECT FLET BLOCK LOCALLY
; ==>
; (#:CLEANUP-FUN-157)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET BLOCK LET UNWIND-PROTECT FLET BLOCK BLOCK
; --> SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK LET TAGBODY
; --> RETURN-FROM FUNCALL
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK LET
; --> TAGBODY RESTART-BIND LET PROGN RETURN-FROM
; --> GTK::GTK-TREE-MODEL-ITER-NEXT-IMPL PROGN
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-183" :IN GTK::GTK-TREE-MODEL-ITER-NEXT-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> LOCALLY
; ==>
; (#:CLEANUP-FUN-183)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK LET
; --> TAGBODY RETURN-FROM FUNCALL
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK LET
; --> TAGBODY RESTART-BIND LET PROGN RETURN-FROM
; --> GTK::GTK-TREE-MODEL-ITER-PREVIOUS-IMPL PROGN
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-208" :IN GTK::GTK-TREE-MODEL-ITER-PREVIOUS-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> LOCALLY
; ==>
; (#:CLEANUP-FUN-208)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK LET
; --> TAGBODY RETURN-FROM FUNCALL
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::PARENT
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK
; --> LET TAGBODY RESTART-BIND LET PROGN RETURN-FROM
; --> GTK::GTK-TREE-MODEL-ITER-CHILDREN-IMPL PROGN
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-237" :IN GTK::GTK-TREE-MODEL-ITER-CHILDREN-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-234" :IN GTK::GTK-TREE-MODEL-ITER-CHILDREN-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> LOCALLY
; ==>
; (#:CLEANUP-FUN-234)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK LOCALLY
; ==>
; (#:CLEANUP-FUN-237)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK
; --> LET TAGBODY RETURN-FROM FUNCALL
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK LET
; --> TAGBODY RESTART-BIND LET PROGN RETURN-FROM
; --> GTK::GTK-TREE-MODEL-ITER-HAS-CHILD-IMPL PROGN
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-262" :IN GTK::GTK-TREE-MODEL-ITER-HAS-CHILD-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> LOCALLY
; ==>
; (#:CLEANUP-FUN-262)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK LET
; --> TAGBODY RETURN-FROM FUNCALL
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET BLOCK LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK LET
; --> TAGBODY RESTART-BIND LET PROGN RETURN-FROM
; --> GTK::GTK-TREE-MODEL-ITER-N-CHILDREN-IMPL PROGN
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-287" :IN GTK::GTK-TREE-MODEL-ITER-N-CHILDREN-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> LOCALLY
; ==>
; (#:CLEANUP-FUN-287)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK LET
; --> TAGBODY RETURN-FROM FUNCALL
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::PARENT
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK
; --> LET TAGBODY RESTART-BIND LET PROGN RETURN-FROM
; --> GTK::GTK-TREE-MODEL-ITER-NTH-CHILD-IMPL PROGN
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-318" :IN GTK::GTK-TREE-MODEL-ITER-NTH-CHILD-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-315" :IN GTK::GTK-TREE-MODEL-ITER-NTH-CHILD-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> LOCALLY
; ==>
; (#:CLEANUP-FUN-315)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK LOCALLY
; ==>
; (#:CLEANUP-FUN-318)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK
; --> LET TAGBODY RETURN-FROM FUNCALL
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::CHILD
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK
; --> LET TAGBODY RESTART-BIND LET PROGN RETURN-FROM
; --> GTK::GTK-TREE-MODEL-ITER-PARENT-IMPL PROGN
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-347" :IN GTK::GTK-TREE-MODEL-ITER-PARENT-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-344" :IN GTK::GTK-TREE-MODEL-ITER-PARENT-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> LOCALLY
; ==>
; (#:CLEANUP-FUN-344)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK LOCALLY
; ==>
; (#:CLEANUP-FUN-347)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK
; --> LET TAGBODY RETURN-FROM FUNCALL
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET BLOCK LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET BLOCK LET UNWIND-PROTECT FLET BLOCK BLOCK
; --> SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK LET TAGBODY
; --> RESTART-BIND LET PROGN RETURN-FROM GTK::GTK-TREE-MODEL-REF-NODE-IMPL
; --> PROGN
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-371" :IN GTK::GTK-TREE-MODEL-REF-NODE-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET BLOCK LET UNWIND-PROTECT FLET BLOCK LOCALLY
; ==>
; (#:CLEANUP-FUN-371)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET BLOCK LET UNWIND-PROTECT FLET BLOCK BLOCK
; --> SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK LET TAGBODY
; --> RETURN-FROM FUNCALL
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET BLOCK LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET BLOCK LET UNWIND-PROTECT FLET BLOCK BLOCK
; --> SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK LET TAGBODY
; --> RESTART-BIND LET PROGN RETURN-FROM GTK::GTK-TREE-MODEL-UNREF-NODE-IMPL
; --> PROGN
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-394" :IN GTK::GTK-TREE-MODEL-UNREF-NODE-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET BLOCK LET UNWIND-PROTECT FLET BLOCK LOCALLY
; ==>
; (#:CLEANUP-FUN-394)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET BLOCK LET UNWIND-PROTECT FLET BLOCK BLOCK
; --> SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK LET TAGBODY
; --> RETURN-FROM FUNCALL
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK GTK-TREE-MODEL-FOREACH-CB
; (FUNCALL GTK::FN GTK::MODEL GTK::PATH ITERATE:ITER)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FN is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-TREE-MODEL-FOREACH-CB
; :BOOLEAN
; ((GTK::MODEL GOBJECT:G-OBJECT)
; (GTK::PATH (GOBJECT:G-BOXED-FOREIGN GTK::GTK-TREE-PATH))
; (ITERATE:ITER
; (GOBJECT:G-BOXED-FOREIGN GTK::GTK-TREE-ITER))
; (GTK::DATA :POINTER))
; (LET ((GTK::FN (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)))
; (RESTART-CASE (FUNCALL GTK::FN GTK::MODEL GTK::PATH ITERATE:ITER)
; (GTK::STOP-TREE-MODEL-ITERATION NIL T)
; (GTK::SKIP-TREE-MODEL-CURRENT NIL NIL))))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::PATH
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-model-tmpY90L99EZ.fasl
; compilation finished in 0:00:00.276
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-layout.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-layout.lisp
; in: DEFCALLBACK GTK-CELL-LAYOUT-CELL-DATA-FUNC-CALLBACK
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::CELL-LAYOUT GTK::CELL
; GTK::TREE-MODEL ITERATE:ITER)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-CELL-LAYOUT-CELL-DATA-FUNC-CALLBACK
; :VOID
; ((GTK::CELL-LAYOUT GOBJECT:G-OBJECT) (GTK::CELL GOBJECT:G-OBJECT)
; (GTK::TREE-MODEL GOBJECT:G-OBJECT)
; (ITERATE:ITER
; (GOBJECT:G-BOXED-FOREIGN GTK:GTK-TREE-ITER))
; (GTK::DATA :POINTER))
; (RESTART-CASE (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
; GTK::CELL-LAYOUT GTK::CELL GTK::TREE-MODEL
; ITERATE:ITER)
; (RETURN NIL NIL)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::CELL-LAYOUT
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::CELL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-layout-tmpXZJKL4Z8.fasl
; compilation finished in 0:00:00.100
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-sortable.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-sortable.lisp
; in: DEFINE-VTABLE ("GtkTreeSortable" GTK-TREE-SORTABLE)
; (GOBJECT:DEFINE-VTABLE ("GtkTreeSortable" GTK::GTK-TREE-SORTABLE)
; (:SKIP GTK::G-IFACE (:STRUCT GOBJECT:G-TYPE-INTERFACE))
; (:SKIP GTK::SORT-COLUMNS-CHANGED :POINTER)
; (GTK::GET-SORT-COLUMN-ID
; (:BOOLEAN (GTK::SORTABLE (GOBJECT:G-OBJECT GTK::GTK-TREE-SORTABLE))
; (GTK::SORT-COLUMN-ID (:POINTER :INT))
; (GTK::ORDER (:POINTER GTK:GTK-SORT-TYPE)))
; :IMPL-CALL
; ((GTK::SORTABLE)
; (MULTIPLE-VALUE-BIND (GTK::SORTED-P GTK::R-SORT-COLUMN-ID GTK::R-ORDER)
; (GTK::GTK-TREE-SORTABLE-GET-SORT-COLUMN-ID-IMPL GTK::SORTABLE)
; (UNLESS # #)
; (UNLESS # #)
; GTK::SORTED-P)))
; (GTK::SET-SORT-COLUMN-ID
; (:VOID (GTK::SORTABLE (GOBJECT:G-OBJECT GTK::GTK-TREE-SORTABLE))
; (GTK::SORT-COLUMN-ID :INT) (GTK::ORDER GTK:GTK-SORT-TYPE)))
; (GTK::SET-SORT-FUNC
; (:VOID (GTK::SORTABLE (GOBJECT:G-OBJECT GTK::GTK-TREE-SORTABLE))
; (GTK::SORT-COLUMN-ID :INT) (GTK::FUNC :POINTER) (GTK::DATA :POINTER)
; (GTK::DESTROY-NOTIFY :POINTER)))
; (GTK::SET-DEFAULT-SORT-FUNC
; (:VOID (GTK::SORTABLE (GOBJECT:G-OBJECT GTK::GTK-TREE-SORTABLE))
; (GTK::FUNC :POINTER) (GTK::DATA :POINTER) (GTK::DESTROY-NOTIFY :POINTER)))
; (GTK::HAS-DEFAULT-SORT-FUNC
; (:BOOLEAN (GTK::SORTABLE (GOBJECT:G-OBJECT GTK::GTK-TREE-SORTABLE)))))
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::SORTABLE
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::SORTABLE
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::SORTABLE
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET BLOCK RESTART-CASE BLOCK LET TAGBODY RESTART-BIND LET
; --> PROGN RETURN-FROM
; ==>
; (GTK::GTK-TREE-SORTABLE-SET-SORT-FUNC-IMPL GTK::SORTABLE GTK::SORT-COLUMN-ID
; GTK::FUNC GTK::DATA
; GTK::DESTROY-NOTIFY)
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::SORTABLE
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET BLOCK RESTART-CASE BLOCK LET TAGBODY RESTART-BIND LET
; --> PROGN RETURN-FROM
; ==>
; (GTK::GTK-TREE-SORTABLE-SET-DEFAULT-SORT-FUNC-IMPL GTK::SORTABLE GTK::FUNC
; GTK::DATA
; GTK::DESTROY-NOTIFY)
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::SORTABLE
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-sortable-tmpHXNPA9C2.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-view-drag-and-drop.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-view-drag-and-drop.lisp
; in: DEFINE-VTABLE ("GtkTreeDragSource" GTK-TREE-DRAG-SOURCE)
; (GOBJECT:DEFINE-VTABLE ("GtkTreeDragSource" GTK::GTK-TREE-DRAG-SOURCE)
; (:SKIP GTK::G-IFACE (:STRUCT GOBJECT:G-TYPE-INTERFACE))
; (GTK::ROW-DRAGGABLE
; (:BOOLEAN (GTK::TREE-DRAG-SOURCE GOBJECT:G-OBJECT)
; (GTK::PATH (GOBJECT:G-BOXED-FOREIGN GTK:GTK-TREE-PATH))))
; (GTK:DRAG-DATA-GET
; (:BOOLEAN (GTK::TREE-DRAG-SOURCE GOBJECT:G-OBJECT)
; (GTK::PATH (GOBJECT:G-BOXED-FOREIGN GTK:GTK-TREE-PATH))
; (GTK::SELECTION-DATA (GOBJECT:G-BOXED-FOREIGN GTK:GTK-SELECTION-DATA))))
; (GTK:DRAG-DATA-DELETE
; (:BOOLEAN (GTK::TREE-DRAG-SOURCE GOBJECT:G-OBJECT)
; (GTK::PATH (GOBJECT:G-BOXED-FOREIGN GTK:GTK-TREE-PATH)))))
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-DRAG-SOURCE
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::PATH
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK LET
; --> TAGBODY RESTART-BIND LET PROGN RETURN-FROM
; --> GTK::GTK-TREE-DRAG-SOURCE-ROW-DRAGGABLE-IMPL PROGN
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-8" :IN GTK::GTK-TREE-DRAG-SOURCE-ROW-DRAGGABLE-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> LOCALLY
; ==>
; (#:CLEANUP-FUN-8)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK LET
; --> TAGBODY RETURN-FROM FUNCALL
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-DRAG-SOURCE
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::PATH
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::SELECTION-DATA
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK
; --> LET TAGBODY RESTART-BIND LET PROGN RETURN-FROM
; --> GTK::GTK-TREE-DRAG-SOURCE-DRAG-DATA-GET-IMPL PROGN
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-37" :IN GTK::GTK-TREE-DRAG-SOURCE-DRAG-DATA-GET-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-34" :IN GTK::GTK-TREE-DRAG-SOURCE-DRAG-DATA-GET-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> LOCALLY
; ==>
; (#:CLEANUP-FUN-34)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK LOCALLY
; ==>
; (#:CLEANUP-FUN-37)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK
; --> LET TAGBODY RETURN-FROM FUNCALL
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-DRAG-SOURCE
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::PATH
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK LET
; --> TAGBODY RESTART-BIND LET PROGN RETURN-FROM
; --> GTK::GTK-TREE-DRAG-SOURCE-DRAG-DATA-DELETE-IMPL PROGN
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-62" :IN GTK::GTK-TREE-DRAG-SOURCE-DRAG-DATA-DELETE-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> LOCALLY
; ==>
; (#:CLEANUP-FUN-62)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK LET
; --> TAGBODY RETURN-FROM FUNCALL
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFINE-VTABLE ("GtkTreeDragDest" GTK-TREE-DRAG-DEST)
; (GOBJECT:DEFINE-VTABLE ("GtkTreeDragDest" GTK::GTK-TREE-DRAG-DEST)
; (:SKIP GTK::G-IFACE (:STRUCT GOBJECT:G-TYPE-INTERFACE))
; (GTK:DRAG-DATA-RECEIVED
; (:BOOLEAN (GTK::TREE-DRAG-DEST GOBJECT:G-OBJECT)
; (GTK::PATH (GOBJECT:G-BOXED-FOREIGN GTK:GTK-TREE-PATH))
; (GTK::SELECTION-DATA (GOBJECT:G-BOXED-FOREIGN GTK:GTK-SELECTION-DATA))))
; (GTK::ROW-DROP-POSSIBLE
; (:BOOLEAN (GTK::TREE-DRAG-DEST GOBJECT:G-OBJECT)
; (GTK::PATH (GOBJECT:G-BOXED-FOREIGN GTK:GTK-TREE-PATH))
; (GTK::SELECTION-DATA (GOBJECT:G-BOXED-FOREIGN GTK:GTK-SELECTION-DATA)))))
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-DRAG-DEST
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::PATH
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::SELECTION-DATA
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK
; --> LET TAGBODY RESTART-BIND LET PROGN RETURN-FROM
; --> GTK::GTK-TREE-DRAG-DEST-DRAG-DATA-RECEIVED-IMPL PROGN
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-12" :IN GTK::GTK-TREE-DRAG-DEST-DRAG-DATA-RECEIVED-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-9" :IN GTK::GTK-TREE-DRAG-DEST-DRAG-DATA-RECEIVED-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> LOCALLY
; ==>
; (#:CLEANUP-FUN-9)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK LOCALLY
; ==>
; (#:CLEANUP-FUN-12)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK
; --> LET TAGBODY RETURN-FROM FUNCALL
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-DRAG-DEST
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::PATH
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::SELECTION-DATA
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK
; --> LET TAGBODY RESTART-BIND LET PROGN RETURN-FROM
; --> GTK::GTK-TREE-DRAG-DEST-ROW-DROP-POSSIBLE-IMPL PROGN
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-41" :IN GTK::GTK-TREE-DRAG-DEST-ROW-DROP-POSSIBLE-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (SB-C::%FUNCALL
; #'(FLET "CLEANUP-FUN-38" :IN GTK::GTK-TREE-DRAG-DEST-ROW-DROP-POSSIBLE-CALLBACK))
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> LOCALLY
; ==>
; (#:CLEANUP-FUN-38)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK LOCALLY
; ==>
; (#:CLEANUP-FUN-41)
;
; note: doing SAP to pointer coercion (cost 20)
; --> GOBJECT::GLIB-DEFCALLBACK CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK
; --> SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET IF BLOCK LET UNWIND-PROTECT FLET BLOCK
; --> BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET UNWIND-PROTECT FLET
; --> BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN RESTART-CASE BLOCK
; --> LET TAGBODY RETURN-FROM FUNCALL
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-view-drag-and-drop-tmp6W89DJAF.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-model-sort.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-model-sort-tmp7RAVZUSP.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-model-filter.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-model-filter.lisp
; in: DEFCALLBACK GTK-TREE-MODEL-FILTER-VISIBLE-FUNC-CALLBACK
; (FUNCALL GTK::FN GTK::TREE-MODEL ITERATE:ITER)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FN is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-TREE-MODEL-FILTER-VISIBLE-FUNC-CALLBACK
; :BOOLEAN
; ((GTK::TREE-MODEL GOBJECT:G-OBJECT)
; (ITERATE:ITER
; (GOBJECT:G-BOXED-FOREIGN GTK:GTK-TREE-ITER))
; (GTK::DATA :POINTER))
; (LET ((GTK::FN (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)))
; (RESTART-CASE (FUNCALL GTK::FN GTK::TREE-MODEL ITERATE:ITER)
; (GTK::RETURN-TRUE NIL T)
; (GTK::RETURN-FALSE NIL NIL))))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-model-filter-tmpKR50OG05.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-view.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-view.lisp
; in: DEFCALLBACK GTK-TREE-VIEW-COLUMN-DROP-FUNC-CB
; (FUNCALL GTK::FN GTK::TREE-VIEW GTK::COLUMN GTK::PREV-COLUMN GTK::NEXT-COLUMN)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FN is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-TREE-VIEW-COLUMN-DROP-FUNC-CB
; :BOOLEAN
; ((GTK::TREE-VIEW GOBJECT:G-OBJECT) (GTK::COLUMN GOBJECT:G-OBJECT)
; (GTK::PREV-COLUMN GOBJECT:G-OBJECT) (GTK::NEXT-COLUMN GOBJECT:G-OBJECT)
; (GTK::DATA :POINTER))
; (LET ((GTK::FN (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)))
; (FUNCALL GTK::FN GTK::TREE-VIEW GTK::COLUMN GTK::PREV-COLUMN
; GTK::NEXT-COLUMN)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-VIEW
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::COLUMN
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::PREV-COLUMN
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::NEXT-COLUMN
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK GTK-TREE-VIEW-MAPPING-FUNC-CB
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::TREE-VIEW GTK::PATH)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-TREE-VIEW-MAPPING-FUNC-CB
; :VOID
; ((GTK::TREE-VIEW GOBJECT:G-OBJECT)
; (GTK::PATH (GOBJECT:G-BOXED-FOREIGN GTK:GTK-TREE-PATH))
; (GTK::DATA :POINTER))
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::TREE-VIEW
; GTK::PATH))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-VIEW
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::PATH
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK GTK-TREE-VIEW-SEARCH-EQUAL-FUNC-CB
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::MODEL GTK::COLUMN
; GTK::KEY ITERATE:ITER)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-TREE-VIEW-SEARCH-EQUAL-FUNC-CB
; :BOOLEAN
; ((GTK::MODEL GOBJECT:G-OBJECT) (GTK::COLUMN :INT)
; (GTK::KEY (:STRING :FREE-FROM-FOREIGN NIL))
; (ITERATE:ITER
; (GOBJECT:G-BOXED-FOREIGN GTK:GTK-TREE-ITER))
; (GTK::DATA :POINTER))
; (RESTART-CASE (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::MODEL
; GTK::COLUMN GTK::KEY ITERATE:ITER)
; (GTK::RETURN-TRUE NIL T)
; (GTK::RETURN-FALSE NIL T)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::KEY #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK GTK-TREE-VIEW-SEARCH-POSITION-FUNC
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::TREE-VIEW
; GTK::SEARCH-DIALOG)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-TREE-VIEW-SEARCH-POSITION-FUNC
; :VOID
; ((GTK::TREE-VIEW GOBJECT:G-OBJECT) (GTK::SEARCH-DIALOG GOBJECT:G-OBJECT)
; (GTK::DATA :POINTER))
; (RESTART-CASE (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
; GTK::TREE-VIEW GTK::SEARCH-DIALOG)
; (RETURN NIL NIL)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-VIEW
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::SEARCH-DIALOG
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK GTK-TREE-VIEW-ROW-SEPARATOR-FUNC-CALLBACK
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::TREE-MODEL
; ITERATE:ITER)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-TREE-VIEW-ROW-SEPARATOR-FUNC-CALLBACK
; :BOOLEAN
; ((GTK::TREE-MODEL GOBJECT:G-OBJECT)
; (ITERATE:ITER
; (GOBJECT:G-BOXED-FOREIGN GTK:GTK-TREE-ITER))
; (GTK::DATA :POINTER))
; (RESTART-CASE (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
; GTK::TREE-MODEL ITERATE:ITER)
; (GTK::RETURN-TRUE NIL T)
; (GTK::RETURN-FALSE NIL NIL)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-view-tmpTLRJZ1UR.fasl
; compilation finished in 0:00:00.240
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-view-column.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-view-column.lisp
; in: DEFCALLBACK GTK-TREE-CELL-DATA-FUNC-CB
; (FUNCALL GTK::FN GTK::TREE-COLUMN GTK::CELL GTK::TREE-MODEL ITERATE:ITER)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FN is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-TREE-CELL-DATA-FUNC-CB
; :VOID
; ((GTK::TREE-COLUMN (GOBJECT:G-OBJECT GTK::GTK-TREE-VIEW-COLUMN))
; (GTK::CELL (GOBJECT:G-OBJECT GTK::GTK-CELL-RENDERER))
; (GTK::TREE-MODEL (GOBJECT:G-OBJECT GTK:GTK-TREE-MODEL))
; (ITERATE:ITER
; (GOBJECT:G-BOXED-FOREIGN GTK:GTK-TREE-ITER))
; (GTK::DATA :POINTER))
; (LET ((GTK::FN (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)))
; (RESTART-CASE (FUNCALL GTK::FN GTK::TREE-COLUMN GTK::CELL GTK::TREE-MODEL
; ITERATE:ITER)
; (GTK::RETURN-FROM-GTK-TREE-CELL-DATA-FUNC-CB NIL NIL))))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-COLUMN
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::CELL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::TREE-MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-view-column-tmpTJFR94DB.fasl
; compilation finished in 0:00:00.096
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-store.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-store-tmp12QLR4GC.fasl
; compilation finished in 0:00:00.216
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-selection.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-selection.lisp
; in: DEFCALLBACK GTK-TREE-SELECTION-SELECT-FUNCTION-CB
; (FUNCALL GTK::FN GTK::SELECTION GTK::MODEL GTK::PATH
; GTK::PATH-CURRENTLY-SELECTED)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FN is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-TREE-SELECTION-SELECT-FUNCTION-CB
; :BOOLEAN
; ((GTK::SELECTION GOBJECT:G-OBJECT) (GTK::MODEL GOBJECT:G-OBJECT)
; (GTK::PATH (GOBJECT:G-BOXED-FOREIGN GTK:GTK-TREE-PATH))
; (GTK::PATH-CURRENTLY-SELECTED :BOOLEAN) (GTK::DATA :POINTER))
; (LET ((GTK::FN (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)))
; (RESTART-CASE (FUNCALL GTK::FN GTK::SELECTION GTK::MODEL GTK::PATH
; GTK::PATH-CURRENTLY-SELECTED)
; (GTK::RETURN-TRUE NIL T)
; (GTK::RETURN-FALSE NIL NIL))))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::SELECTION
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::PATH
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK GTK-TREE-SELECTION-FOREACH-CB
; (FUNCALL GTK::FN GTK::MODEL GTK::PATH ITERATE:ITER)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FN is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-TREE-SELECTION-FOREACH-CB
; :VOID
; ((GTK::MODEL GOBJECT:G-OBJECT)
; (GTK::PATH (GOBJECT:G-BOXED-FOREIGN GTK:GTK-TREE-PATH))
; (ITERATE:ITER
; (GOBJECT:G-BOXED-FOREIGN GTK:GTK-TREE-ITER))
; (GTK::DATA :POINTER))
; (LET ((GTK::FN (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)))
; (FUNCALL GTK::FN GTK::MODEL GTK::PATH ITERATE:ITER)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::MODEL
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::PATH
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tree-selection-tmpHNON3GN3.fasl
; compilation finished in 0:00:00.076
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-editable.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-editable-tmpUL4IFWT3.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-renderer.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-renderer-tmpOKX06099.fasl
; compilation finished in 0:00:00.053
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-renderer-text.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-renderer-text-tmp3PQWDVVX.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-renderer-pixbuf.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-renderer-pixbuf-tmpFJAR440P.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-renderer-progress.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-renderer-progress-tmpM2X5AGVD.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-renderer-accel.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-renderer-accel-tmpV9XLLI3F.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-renderer-combo.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-renderer-combo-tmpCNL9LF4O.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-renderer-spin.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-renderer-spin-tmpA2MZF3D.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-renderer-toggle.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-renderer-toggle-tmp820USYC0.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-renderer-spinner.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-renderer-spinner-tmpAP7D2UW2.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-area.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-area-tmpU93Z06A.fasl
; compilation finished in 0:00:00.053
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-area-box.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-area-box-tmpL3K5PO5H.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-area-context.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-area-context-tmpPP843P2R.fasl
; compilation finished in 0:00:00.043
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-view.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.cell-view-tmpBK2QBAFY.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.icon-view.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.icon-view.lisp
; in: DEFCALLBACK GTK-ICON-VIEW-FOREACH-FUNC-CALLBACK
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::ICON-VIEW GTK::PATH)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-ICON-VIEW-FOREACH-FUNC-CALLBACK
; :VOID
; ((GTK::ICON-VIEW GOBJECT:G-OBJECT)
; (GTK::PATH (GOBJECT:G-BOXED-FOREIGN GTK:GTK-TREE-PATH))
; (GTK::DATA :POINTER))
; (RESTART-CASE (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
; GTK::ICON-VIEW GTK::PATH)
; (RETURN NIL NIL)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::ICON-VIEW
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::PATH
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.icon-view-tmpAHPKJ6EW.fasl
; compilation finished in 0:00:00.196
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.list-store.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.list-store-tmpJJIXGGXK.fasl
; compilation finished in 0:00:00.110
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.array-list-store.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.array-list-store-tmpMYEEYI7L.fasl
; compilation finished in 0:00:00.156
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.editable.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.editable-tmp2OZ1RF2X.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.entry.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.entry-tmpMABYFPD4.fasl
; compilation finished in 0:00:00.120
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.entry-buffer.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.entry-buffer-tmpO0782EL2.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.entry-completion.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.entry-completion.lisp
; in: DEFINE-CB-METHODS GTK-ENTRY-COMPLETION-MATCH-FUNC
; (GOBJECT:DEFINE-CB-METHODS GTK::GTK-ENTRY-COMPLETION-MATCH-FUNC :BOOLEAN
; ((GTK::COMPLETION
; (GOBJECT:G-OBJECT GTK:GTK-ENTRY-COMPLETION))
; (GTK::KEY :STRING)
; (ITERATE:ITER
; (GOBJECT:G-BOXED-FOREIGN GTK:GTK-TREE-ITER))))
; --> CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP
; --> SB-ALIEN::ALIEN-LAMBDA SB-ALIEN::%ALIEN-CALLBACK-ALIEN
; --> SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION LET LET SETF LET* THE LOCALLY LET
; --> IF BLOCK LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; --> CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP
; --> SB-ALIEN::ALIEN-LAMBDA SB-ALIEN::%ALIEN-CALLBACK-ALIEN
; --> SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::COMPLETION
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::KEY #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ITERATE:ITER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP
; --> SB-ALIEN::ALIEN-LAMBDA SB-ALIEN::%ALIEN-CALLBACK-ALIEN
; --> SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION LET LET SETF LET* THE LOCALLY LET
; --> IF BLOCK LET* CFFI:CONVERT-FROM-FOREIGN
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN
; (CFFI:FOREIGN-SLOT-VALUE #:DATA3 '(:STRUCT GOBJECT::OBJECT-FUNC-REF)
; :OBJECT)
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; --> CFFI:DEFCALLBACK PROGN CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP
; --> SB-ALIEN::ALIEN-LAMBDA SB-ALIEN::%ALIEN-CALLBACK-ALIEN
; --> SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION LET LET LOCALLY LET BLOCK LET*
; --> CFFI:CONVERT-FROM-FOREIGN
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN
; (CFFI:FOREIGN-SLOT-VALUE #:DATA3 '(:STRUCT GOBJECT::OBJECT-FUNC-REF)
; :OBJECT)
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.entry-completion-tmpFXGDO0E3.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.scale.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.scale-tmpLCE8PO0U.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.spin-button.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.spin-button-tmpS48VDGU2.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.search-entry.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.search-entry-tmp5LF2452A.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.search-bar.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.search-bar-tmpTSFGDAZ7.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.menu-item.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.menu-item-tmpGJFUKHN2.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.menu.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.menu.lisp
; in: DEFCALLBACK GTK-MENU-POSITION-FUNC-CB
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::MENU)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-MENU-POSITION-FUNC-CB
; :VOID
; ((GTK::MENU GOBJECT:G-OBJECT) (GTK::X :POINTER) (GTK::Y :POINTER)
; (GTK::PUSH-IN :POINTER) (GTK::DATA :POINTER))
; (RESTART-CASE (MULTIPLE-VALUE-BIND (GTK::RX GTK::RY GTK::RPUSH-IN)
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
; GTK::MENU)
; (SETF # GTK::RX
; # GTK::RY
; # GTK::RPUSH-IN))
; (GTK::RETURN-ZERO NIL
; (SETF # 0
; # 0
; # NIL))))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::MENU
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.menu-tmpRLWVC93J.fasl
; compilation finished in 0:00:00.090
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.menu-bar.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.menu-bar-tmpLJXQSCJY.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.check-menu-item.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.check-menu-item-tmp4OLR0J6X.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.radio-menu-item.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.radio-menu-item-tmp6XXQRAHN.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.image-menu-item.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.image-menu-item-tmpGO08YVIW.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.separator-menu-item.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.separator-menu-item-tmpW4V46RST.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tearoff-menu-item.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tearoff-menu-item-tmp3OJ639ET.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.combo-box.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.combo-box-tmpB4L1425D.fasl
; compilation finished in 0:00:00.049
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.combo-box-text.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.combo-box-text-tmpFG7U3LX.fasl
; compilation finished in 0:00:00.050
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tool-shell.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tool-shell-tmpRB2S59DB.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tool-item.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tool-item-tmpU1JZ7FXZ.fasl
; compilation finished in 0:00:00.053
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tool-item-group.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tool-item-group-tmp2DUJ9I.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.toolbar.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.toolbar-tmpU602JQSD.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tool-palette.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tool-palette-tmp5O3OCPXW.fasl
; compilation finished in 0:00:00.043
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.separator-tool-item.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.separator-tool-item-tmpOLTFAEPG.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tool-button.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tool-button-tmpUZ4MPL4A.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.toggle-tool-button.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.toggle-tool-button-tmpBQS2IZ67.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.radio-tool-button.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.radio-tool-button-tmpDEX1AB43.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.menu-tool-button.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.menu-tool-button-tmpXEL4GRQG.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.popover.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.popover-tmpBLHHY8QV.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.color-chooser.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.color-chooser-tmpGMYRLBUL.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.color-button.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.color-button-tmpLT3BCQID.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.color-chooser-widget.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.color-chooser-widget-tmp7AGUJ6PJ.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.color-chooser-dialog.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.color-chooser-dialog-tmpADFMBTPY.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.color-selection.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.color-selection.lisp
; in: DEFUN GTK-COLOR-SELECTION-PALETTE-FROM-STRING
; (ITERATE:ITER
; (ITERATE:WITH GTK::COLORS-AR = (CFFI:MEM-REF GTK::COLORS :POINTER))
; (ITERATE:FOR GTK::I GTK::FROM 0 GTK::BELOW
; (CFFI:MEM-REF GTK::N-COLORS :INT))
; (ITERATE:FOR GTK::COLOR-PTR =
; (CFFI-SYS:INC-POINTER GTK::COLORS-AR
; (* GTK::I
; (CFFI:FOREIGN-TYPE-SIZE
; 'GDK::GDK-COLOR-CSTRUCT))))
; (ITERATE:FOR GTK::COLOR =
; (CFFI:CONVERT-FROM-FOREIGN GTK::COLOR-PTR
; '(GOBJECT:G-BOXED-FOREIGN GDK:GDK-COLOR)))
; (ITERATE:COLLECT GTK::COLOR)
; (ITERATE:FINALLY (GLIB:G-FREE GTK::COLORS-AR)))
; --> BLOCK BLOCK TAGBODY PROGN SETQ THE CFFI-SYS:INC-POINTER *
; ==>
; (CFFI:FOREIGN-TYPE-SIZE 'GDK::GDK-COLOR-CSTRUCT)
;
; caught STYLE-WARNING:
; bare references to struct types are deprecated. Please use (:POINTER
; (:STRUCT
; GDK::GDK-COLOR-CSTRUCT)) or (:STRUCT
; GDK::GDK-COLOR-CSTRUCT) instead.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.color-selection-tmpJ65DAF15.fasl
; compilation finished in 0:00:00.040
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.color-selection-dialog.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.color-selection-dialog-tmpIXT65XFP.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.hsv.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.hsv-tmpAJ0SGYIK.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.file-chooser.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.file-chooser-tmpJ2HJZECB.fasl
; compilation finished in 0:00:00.100
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.file-chooser-widget.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.file-chooser-widget-tmpXY4FGAPA.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.file-chooser-button.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.file-chooser-button-tmp1MDGH4SW.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.file-chooser-dialog.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.file-chooser-dialog-tmpV8WTFLZM.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.file-filter.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.file-filter-tmpX2YW1LTJ.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.font-chooser.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.font-chooser.lisp
; in: DEFCALLBACK GTK-FONT-FILTER-FUNC-CB
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::FAMILY GTK::FACE)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-FONT-FILTER-FUNC-CB
; :BOOLEAN
; ((GTK::FAMILY (GOBJECT:G-OBJECT PANGO:PANGO-FONT-FAMILY))
; (GTK::FACE (GOBJECT:G-OBJECT PANGO:PANGO-FONT-FACE))
; (GTK::DATA :POINTER))
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::FAMILY GTK::FACE))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::FAMILY
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::FACE
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.font-chooser-tmpLB88W1T5.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.font-button.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.font-button-tmp3F80YMF6.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.font-chooser-widget.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.font-chooser-widget-tmpJJORT7HU.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.font-chooser-dialog.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.font-chooser-dialog-tmp5DBB8JTB.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.font-selection.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.font-selection-tmpZSBL0HHQ.fasl
; compilation finished in 0:00:00.053
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.font-selection-dialog.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.font-selection-dialog-tmpV1RXKPB.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.places-sidebar.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.places-sidebar-tmp3SZ0XWQD.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.adjustment.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.adjustment-tmp9YHAVVS9.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.arrow.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.arrow-tmp92WUBED1.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.calendar.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.calendar.lisp
; in: DEFCALLBACK GTK-CALENDAR-DETAIL-FUNC-CB
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::CALENDAR GTK::YEAR
; GTK::MONTH GTK::DAY)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-CALENDAR-DETAIL-FUNC-CB
; (GLIB:G-STRING :FREE-TO-FOREIGN NIL :FREE-FROM-FOREIGN NIL)
; ((GTK::CALENDAR (GOBJECT:G-OBJECT GTK::GTK-CALENDAR)) (GTK::YEAR :UINT)
; (GTK::MONTH :UINT) (GTK::DAY :UINT) (GTK::DATA :POINTER))
; (RESTART-CASE (OR
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
; GTK::CALENDAR GTK::YEAR GTK::MONTH GTK::DAY)
; (CFFI-SYS:NULL-POINTER))
; (GTK::RETURN-NULL NIL (CFFI-SYS:NULL-POINTER))))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::CALENDAR
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; (CFFI-SYS:NULL-POINTER)
; --> BLOCK
; ==>
; (SB-SYS:INT-SAP 0)
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.calendar-tmpAHBBVXUF.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.drawing-area.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.drawing-area-tmpFIDDIIG7.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.event-box.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.event-box-tmpB1G5I0B3.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.handle-box.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.handle-box-tmp6W3P1H2J.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.im-context-simple.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.im-context-simple-tmpGOHEOA1Y.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.im-multicontext.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.im-multicontext-tmpT2G5POAL.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.size-group.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.size-group-tmpT5NQ1VS1.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tooltip.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.tooltip-tmpZVTPRQAR.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.viewport.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.viewport-tmpTWZBZGN3.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.gl-area.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.gl-area-tmpVLA2P6BV.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.plug.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.plug-tmpC1S9JRL9.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.socket.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.socket-tmpYZ5WO3E4.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.recent-manager.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.recent-manager-tmpHJA5IVPZ.fasl
; compilation finished in 0:00:00.096
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.recent-chooser.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.recent-chooser.lisp
; in: DEFCALLBACK GTK-RECENT-SORT-FUNC-CB
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::A GTK::B)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-RECENT-SORT-FUNC-CB
; :INT
; ((GTK::A (GOBJECT:G-BOXED-FOREIGN GTK:GTK-RECENT-INFO))
; (GTK::B (GOBJECT:G-BOXED-FOREIGN GTK:GTK-RECENT-INFO))
; (GTK::DATA :POINTER))
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::A GTK::B))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::A
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::B
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.recent-chooser-tmp3WS4A21E.fasl
; compilation finished in 0:00:00.066
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.recent-chooser-dialog.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.recent-chooser-dialog-tmpPQ4U054N.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.recent-chooser-menu.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.recent-chooser-menu-tmpC8SA9SZN.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.recent-chooser-widget.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.recent-chooser-widget-tmpWC0QU1SK.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.recent-filter.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.recent-filter.lisp
; in: DEFCALLBACK GTK-RECENT-FILTER-FUNC-CB
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::FILTER-INFO)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::FILTER-INFO)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.recent-filter-tmpQQZMKNNN.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.ui-manager.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.ui-manager-tmpIDPPBBFN.fasl
; compilation finished in 0:00:00.146
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.action.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.action-tmp9FP9ZO2K.fasl
; compilation finished in 0:00:00.090
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.action-group.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.action-group.lisp
; in: DEFCALLBACK GTK-TRANSLATE-FUNC-CB
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::PATH)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-TRANSLATE-FUNC-CB
; (:STRING :FREE-TO-FOREIGN NIL :FREE-FROM-FOREIGN NIL)
; ((GTK::PATH (:STRING :FREE-FROM-FOREIGN NIL)) (GTK::DATA :POINTER))
; (RESTART-CASE (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::PATH)
; (GTK::RETURN-UNTRANSLATED NIL GTK::PATH)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::PATH #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.action-group-tmpTHQO2IGY.fasl
; compilation finished in 0:00:00.050
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.toggle-action.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.toggle-action-tmpXGCY36O9.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.radio-action.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.radio-action-tmpAZECCWRG.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.recent-action.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.recent-action-tmpG300S9SF.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.app-chooser.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.app-chooser-tmp809IFK9M.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.app-chooser-button.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.app-chooser-button-tmpSB12JM8J.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.app-chooser-dialog.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.app-chooser-dialog-tmpBPQSLJ17.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.app-chooser-widget.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.app-chooser-widget-tmpTAX50JN7.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.print-operation.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.print-operation.lisp
; in: DEFCALLBACK GTK-PAGE-SETUP-DONE-FUNC-CB
; (FUNCALL GTK::FN GTK::PAGE-SETUP)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FN is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-PAGE-SETUP-DONE-FUNC-CB
; :VOID
; ((GTK::PAGE-SETUP (GOBJECT:G-OBJECT GTK::GTK-PAGE-SETUP))
; (GTK::DATA :POINTER))
; (LET ((GTK::FN (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)))
; (FUNCALL GTK::FN GTK::PAGE-SETUP)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::PAGE-SETUP
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.print-operation-tmpLPRKFQ4F.fasl
; compilation finished in 0:00:00.073
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.print-context.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.print-context-tmp8VQNX3K0.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.paper-size.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.paper-size-tmpD0G9A1XR.fasl
; compilation finished in 0:00:00.066
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.print-settings.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.print-settings-tmp94C6TZKL.fasl
; compilation finished in 0:00:00.163
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.page-setup.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.page-setup-tmpVSFQJ80K.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.print-unix-dialog.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.print-unix-dialog-tmpPLK5HVAF.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.page-setup-unix-dialog.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.page-setup-unix-dialog-tmp5FHTGX61.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.printer.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.printer.lisp
; in: DEFCALLBACK GTK-PRINTER-FUNC-CB
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::PRINTER)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-PRINTER-FUNC-CB
; :BOOLEAN
; ((GTK::PRINTER (GOBJECT:G-OBJECT GTK::GTK-PRINTER)) (GTK::DATA :POINTER))
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::PRINTER))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::PRINTER
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.printer-tmpKUF556D3.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.print-job.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.print-job.lisp
; in: DEFCALLBACK GTK-PRINT-JOB-COMPLETE-FUNC-CB
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::PRINT-JOB ERROR)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CFFI:DEFCALLBACK GTK::GTK-PRINT-JOB-COMPLETE-FUNC-CB
; :VOID
; ((GTK::PRINT-JOB (GOBJECT:G-OBJECT GTK::GTK-PRINT-JOB))
; (GTK::DATA :POINTER) (ERROR :POINTER))
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::PRINT-JOB ERROR))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN GTK::PRINT-JOB
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA) GTK::PRINT-JOB ERROR)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.print-job-tmpS8HGASGU.fasl
; compilation finished in 0:00:00.080
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.application.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.application-tmpLXEY4I7N.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.application-window.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.application-window-tmp1PA6XKV0.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.resource-files.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.resource-files-tmpEW48DPG8.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.init.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.init.lisp
; in: DEFCALLBACK CALL-FROM-MAIN-LOOP-CALLBACK
; (FUNCALL (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (GLIB:GET-STABLE-POINTER-VALUE GTK::DATA)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cffi-gtk/gtk/gtk.init-tmp4ULRYCDK.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.package.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.package-tmpV4ITDAY7.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/util.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/util-tmpTU3G94ZX.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/translate.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/translate-tmp135V1U5P.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/macros.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/macros-tmpCWE62HDI.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/callback.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/callback-tmpS0IX89E9.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/gerror.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/gerror-tmpYZNO705I.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/libsoup.message-headers.lisp" (written 20 OCT 2024 03:56:41 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/libsoup.message-headers.lisp
; in: DEFCALLBACK COLLECT-HEADER-NAMES
; (CFFI:DEFCALLBACK CL-WEBKIT2::COLLECT-HEADER-NAMES
; :VOID
; ((CL-WEBKIT2::NAME :STRING) (CL-WEBKIT2::VALUE :STRING)
; (CL-WEBKIT2::USER-DATA :POINTER))
; (DECLARE (IGNORE CL-WEBKIT2::USER-DATA))
; (PUSHNEW (CONS CL-WEBKIT2::NAME CL-WEBKIT2::VALUE)
; CL-WEBKIT2::*HEADER-NAMES* :TEST #'STRING-EQUAL :KEY #'FIRST))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN CL-WEBKIT2::NAME
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN CL-WEBKIT2::VALUE
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/libsoup.message-headers-tmpZCDMKLMV.fasl
; compilation finished in 0:00:00.056
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.init.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.init-tmp8PPPCD7W.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.error.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.error-tmp9XWMC5IU.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.authentication-request.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.authentication-request-tmpHZ96ZBZW.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.back-forward-list-item.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.back-forward-list-item-tmpBGQALD1G.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.back-forward-list.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.back-forward-list-tmp2DOYW25X.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.cookie-manager.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.cookie-manager-tmp9030DGPL.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.context-menu-item.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.context-menu-item-tmpU3EEB71F.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.context-menu.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.context-menu-tmpY35TOM58.fasl
; compilation finished in 0:00:00.060
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.download.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.download-tmp2N9C8E1O.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.favicon-database.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.favicon-database-tmpK6PVYHW5.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.color-chooser-request.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.color-chooser-request-tmpQ4PVTQY4.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.file-chooser-request.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.file-chooser-request-tmpQ5W1BFSI.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.find-controller.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.find-controller-tmpKFZB7CG6.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.form-submission-request.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.form-submission-request-tmpEBQXHK8C.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.hit-test-result.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.hit-test-result-tmpWFVO1741.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.permission-request.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.permission-request-tmpEGBHF4JG.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.plugin.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.plugin-tmpDMKZ90UH.fasl
; compilation finished in 0:00:00.009
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.print-operation.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.print-operation-tmpI4CB9XP0.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.script-world.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.script-world-tmpB6CZFPOR.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.frame.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.frame-tmpR0HRL6AF.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkitdom.dom-object.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkitdom.dom-object-tmpJW9LMMDM.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/jscore.js-value-ref.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/jscore.js-value-ref-tmp5AU4YXDC.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/jscore.jsc-exception.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/jscore.jsc-exception-tmpGYUJ95L8.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/jscore.jsc-context.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/jscore.jsc-context-tmpSX2NSBN5.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/jscore.jsc-class.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/jscore.jsc-class-tmpGSOGECKD.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/jscore.jsc-value.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/jscore.jsc-value-tmpFADXA8WA.fasl
; compilation finished in 0:00:00.100
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.security-manager.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.security-manager-tmpN3NRP2FJ.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.settings.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.settings-tmpWFHX3XN3.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.uri-request.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.uri-request-tmp47S258KN.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.uri-response.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.uri-response-tmpE4V4F8OD.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.policy-decision.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.policy-decision-tmpLCU5UNL8.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.navigation-policy-decision.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.navigation-policy-decision-tmpYY5JG2YX.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.response-policy-decision.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.response-policy-decision-tmpK2OIRK3I.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.navigation-action.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.navigation-action-tmpLMNSRE4F.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.user-content.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.user-content-tmpFH2B6ZC1.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.user-content-filter-store.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.user-content-filter-store-tmp9ESR3THZ.fasl
; compilation finished in 0:00:00.056
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.user-content-manager.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.user-content-manager-tmpEP9DKHA4.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.network-proxy-settings.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.network-proxy-settings-tmp6GNWGQ69.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.web-context.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.web-context-tmpTOEVPV91.fasl
; compilation finished in 0:00:00.080
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.web-page.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.web-page-tmpJKXRXFYA.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.web-resource.lisp" (written 20 OCT 2024 03:56:41 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.web-resource.lisp
; in: DEFCALLBACK RESOURCE-DATA-RECEIVED
; (FUNCALL (CL-WEBKIT2::CALLBACK-ERROR-FUNCTION CFFI:CALLBACK) CL-WEBKIT2::C)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (DELETE CFFI:CALLBACK CL-WEBKIT2::CALLBACKS)
;
; note: unable to
; convert to EQ test
; due to type uncertainty:
; The second argument is a SEQUENCE, not a LIST.
; (FIND (CFFI-SYS:POINTER-ADDRESS CL-WEBKIT2::USER-DATA) CL-WEBKIT2::CALLBACKS
; :KEY #'CL-WEBKIT2::CALLBACK-ID)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; (DELETE CFFI:CALLBACK CL-WEBKIT2::CALLBACKS)
;
; note: unable to
; convert to EQ test
; due to type uncertainty:
; The second argument is a SEQUENCE, not a LIST.
; (FUNCALL (CL-WEBKIT2::CALLBACK-FUNCTION CFFI:CALLBACK)
; (CFFI:FOREIGN-ARRAY-TO-LISP CL-WEBKIT2::RESULT
; `(:ARRAY :INT
; ,(CFFI:MEM-REF LENGTH :INT))))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (FIND (CFFI-SYS:POINTER-ADDRESS CL-WEBKIT2::USER-DATA) CL-WEBKIT2::CALLBACKS
; :KEY #'CL-WEBKIT2::CALLBACK-ID)
;
; note: doing unsigned word to integer coercion (cost 20)
; (CL-WEBKIT2::WEBKIT-WEB-RESOURCE-GET-DATA-FINISH CL-WEBKIT2::SOURCE-OBJECT
; CL-WEBKIT2::RESULT LENGTH)
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.web-resource-tmpKW802XDA.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.website-data-manager.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.website-data-manager-tmpO26O9DBY.fasl
; compilation finished in 0:00:00.060
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.web-inspector.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.web-inspector-tmpYLEULPBM.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.web-view.lisp" (written 20 OCT 2024 03:56:41 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.web-view.lisp
; in: DEFCALLBACK JAVASCRIPT-EVALUATION-COMPLETE
; (FUNCALL (CL-WEBKIT2::CALLBACK-ERROR-FUNCTION CFFI:CALLBACK) CL-WEBKIT2::C)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (DELETE CFFI:CALLBACK CL-WEBKIT2::CALLBACKS)
;
; note: unable to
; convert to EQ test
; due to type uncertainty:
; The second argument is a SEQUENCE, not a LIST.
; (FIND (CFFI-SYS:POINTER-ADDRESS CL-WEBKIT2::USER-DATA) CL-WEBKIT2::CALLBACKS
; :KEY #'CL-WEBKIT2::CALLBACK-ID)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; (DELETE CFFI:CALLBACK CL-WEBKIT2::CALLBACKS)
;
; note: unable to
; convert to EQ test
; due to type uncertainty:
; The second argument is a SEQUENCE, not a LIST.
; (FUNCALL (CL-WEBKIT2::CALLBACK-FUNCTION CFFI:CALLBACK)
; (CL-WEBKIT2::JSC-VALUE-TO-LISP CL-WEBKIT2::VALUE) CL-WEBKIT2::VALUE)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (FIND (CFFI-SYS:POINTER-ADDRESS CL-WEBKIT2::USER-DATA) CL-WEBKIT2::CALLBACKS
; :KEY #'CL-WEBKIT2::CALLBACK-ID)
;
; note: doing unsigned word to integer coercion (cost 20)
; (CL-WEBKIT2::WEBKIT-WEB-VIEW-RUN-JAVASCRIPT-FINISH
; (CL-WEBKIT2::CALLBACK-WEB-VIEW CFFI:CALLBACK) CL-WEBKIT2::RESULT)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK CAN-EXECUTE-COMMAND-CHECKED
; (FUNCALL (CL-WEBKIT2::CALLBACK-ERROR-FUNCTION CFFI:CALLBACK) CL-WEBKIT2::C)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (DELETE CFFI:CALLBACK CL-WEBKIT2::CALLBACKS)
;
; note: unable to
; convert to EQ test
; due to type uncertainty:
; The second argument is a SEQUENCE, not a LIST.
; (FIND (CFFI-SYS:POINTER-ADDRESS CL-WEBKIT2::USER-DATA) CL-WEBKIT2::CALLBACKS
; :KEY #'CL-WEBKIT2::CALLBACK-ID)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; (DELETE CFFI:CALLBACK CL-WEBKIT2::CALLBACKS)
;
; note: unable to
; convert to EQ test
; due to type uncertainty:
; The second argument is a SEQUENCE, not a LIST.
; (FUNCALL (CL-WEBKIT2::CALLBACK-FUNCTION CFFI:CALLBACK) CL-WEBKIT2::REPLY)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (FIND (CFFI-SYS:POINTER-ADDRESS CL-WEBKIT2::USER-DATA) CL-WEBKIT2::CALLBACKS
; :KEY #'CL-WEBKIT2::CALLBACK-ID)
;
; note: doing unsigned word to integer coercion (cost 20)
; (CL-WEBKIT2::WEBKIT-WEB-VIEW-CAN-EXECUTE-EDITING-COMMAND-FINISH
; CL-WEBKIT2::SOURCE-OBJECT CL-WEBKIT2::RESULT)
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCALLBACK MESSAGE-REPLIED-TO
; (FUNCALL (CL-WEBKIT2::CALLBACK-ERROR-FUNCTION CFFI:CALLBACK) CL-WEBKIT2::C)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (DELETE CFFI:CALLBACK CL-WEBKIT2::CALLBACKS)
;
; note: unable to
; convert to EQ test
; due to type uncertainty:
; The second argument is a SEQUENCE, not a LIST.
; (FIND (CFFI-SYS:POINTER-ADDRESS CL-WEBKIT2::USER-DATA) CL-WEBKIT2::CALLBACKS
; :KEY #'CL-WEBKIT2::CALLBACK-ID)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; (DELETE CFFI:CALLBACK CL-WEBKIT2::CALLBACKS)
;
; note: unable to
; convert to EQ test
; due to type uncertainty:
; The second argument is a SEQUENCE, not a LIST.
; (FUNCALL (CL-WEBKIT2::CALLBACK-FUNCTION CFFI:CALLBACK) CL-WEBKIT2::REPLY)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (FIND (CFFI-SYS:POINTER-ADDRESS CL-WEBKIT2::USER-DATA) CL-WEBKIT2::CALLBACKS
; :KEY #'CL-WEBKIT2::CALLBACK-ID)
;
; note: doing unsigned word to integer coercion (cost 20)
; (CL-WEBKIT2::WEBKIT-WEB-VIEW-SEND-MESSAGE-TO-PAGE-FINISH
; CL-WEBKIT2::SOURCE-OBJECT CL-WEBKIT2::RESULT)
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.web-view-tmpF9PT7DQ2.fasl
; compilation finished in 0:00:00.190
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.g-input-stream.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.g-input-stream-tmpZVXJSSK9.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.uri-scheme-response.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.uri-scheme-response-tmpHE83XZ7O.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.uri-scheme-request.lisp" (written 20 OCT 2024 03:56:41 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.uri-scheme-request.lisp
; in: DEFCALLBACK URI-SCHEME-PROCESSED
; (FUNCALL (CL-WEBKIT2::CALLBACK-ERROR-FUNCTION CFFI:CALLBACK) CL-WEBKIT2::C)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (FIND (CFFI-SYS:POINTER-ADDRESS CL-WEBKIT2::USER-DATA) CL-WEBKIT2::CALLBACKS
; :KEY #'CL-WEBKIT2::CALLBACK-ID)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; (FUNCALL (CL-WEBKIT2::CALLBACK-FUNCTION CFFI:CALLBACK) CL-WEBKIT2::REQUEST)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (LENGTH CL-WEBKIT2::BODY)
;
; 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.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (CFFI:DEFCALLBACK CL-WEBKIT2::URI-SCHEME-PROCESSED
; :VOID
; ((CL-WEBKIT2::REQUEST
; (GOBJECT:G-OBJECT CL-WEBKIT2::WEBKIT-URI-SCHEME-REQUEST))
; (CL-WEBKIT2::USER-DATA :POINTER))
; (GOBJECT:G-OBJECT-REF (GOBJECT:POINTER CL-WEBKIT2::REQUEST))
; (BORDEAUX-THREADS:MAKE-THREAD
; (LAMBDA ()
; (LET (#)
; (WHEN # #)))))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN CL-WEBKIT2::REQUEST
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; (LAMBDA ()
; (LET ((CFFI:CALLBACK
; (FIND # CL-WEBKIT2::CALLBACKS :KEY #'CL-WEBKIT2::CALLBACK-ID)))
; (WHEN (CL-WEBKIT2::CALLBACK-FUNCTION CFFI:CALLBACK)
; (DESTRUCTURING-BIND
; (CL-WEBKIT2::DATA
; &OPTIONAL # # CL-WEBKIT2::HEADERS-ALIST CL-WEBKIT2::STATUS-REASON)
; (MULTIPLE-VALUE-LIST #)
; (HANDLER-CASE # #)))))
;
; note: doing SAP to pointer coercion (cost 20), for:
; the second argument of CLOSURE-INIT
; (FIND (CFFI-SYS:POINTER-ADDRESS CL-WEBKIT2::USER-DATA) CL-WEBKIT2::CALLBACKS
; :KEY #'CL-WEBKIT2::CALLBACK-ID)
;
; note: doing unsigned word to integer coercion (cost 20)
; (CFFI-SYS:NULL-POINTER)
; --> BLOCK
; ==>
; (SB-SYS:INT-SAP 0)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.uri-scheme-request-tmpU3H21CW4.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.window-properties.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.window-properties-tmp6L9FXRGE.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.uri-utilities.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.uri-utilities-tmp4SNFF0M5.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.user-message.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.user-message-tmpCM27R9AJ.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.web-extension.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.web-extension-tmp46E7TEHY.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/jsc-utils.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/jsc-utils-tmpMW4DE87N.fasl
; compilation finished in 0:00:00.123
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.notification.lisp" (written 20 OCT 2024 03:56:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-webkit/webkit2/webkit2.notification-tmp2JNAKTBR.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/package.lisp" (written 20 OCT 2024 03:56:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/package-tmpMR8VKH1U.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/types.lisp" (written 20 OCT 2024 03:56:34 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/types.lisp
; in: DEFUN DESIGNATED-FUNCTION
; (ERROR "~S designates a ~S, not a function." JPL-UTIL::EXTENDED-DESIGNATOR
; (TYPE-OF JPL-UTIL::DEFINITION))
;
; note: deleting unreachable code
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/types-tmp4HP247ND.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/gensyms.lisp" (written 20 OCT 2024 03:56:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/gensyms-tmpCBPA3J2K.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/accumulators.lisp" (written 20 OCT 2024 03:56:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/accumulators-tmpUKEKWS3E.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/iterators.lisp" (written 20 OCT 2024 03:56:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/iterators-tmpP1N1L2FE.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/jpl-util.lisp" (written 20 OCT 2024 03:56:34 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/jpl-util.lisp
; in: DEFINE-COMPILER-MACRO COMPOSE
; (DEFINE-COMPILER-MACRO JPL-UTIL:COMPOSE
; (&REST JPL-UTIL::FUNCTION-EXPRS)
; (FLET ((JPL-UTIL::FUNCTION-CALL-EXPR
; (JPL-UTIL::FUNC-EXPR JPL-UTIL::ARGS-EXPR)
; #<(SIMPLE-ARRAY CHARACTER
; (223)) Given an expression of a function designator, and an
; expression of multiple values to be used as multiple arguments to that
; function, returns an expression of a call to the designated function
; with th... {100827D08F}>
; `(MULTIPLE-VALUE-CALL ,JPL-UTIL::FUNC-EXPR ,JPL-UTIL::ARGS-EXPR)))
; (JPL-UTIL:WITH-GENSYMS (JPL-UTIL::ARGS%)
; `(LAMBDA (&REST ,JPL-UTIL::ARGS%)
; ,(REDUCE #'JPL-UTIL::FUNCTION-CALL-EXPR JPL-UTIL::FUNCTION-EXPRS
; :INITIAL-VALUE `# :FROM-END T)))))
; --> EVAL-WHEN
; ==>
; (SB-C::%DEFINE-COMPILER-MACRO 'JPL-UTIL:COMPOSE
; (SB-INT:NAMED-LAMBDA (COMPILER-MACRO
; JPL-UTIL:COMPOSE)
; (#:EXPR #:ENV)
; (DECLARE
; (SB-C::LAMBDA-LIST
; (&REST JPL-UTIL::FUNCTION-EXPRS)))
; (DECLARE (IGNORE #:ENV))
; (SB-INT:NAMED-DS-BIND (:MACRO
; JPL-UTIL:COMPOSE
; . DEFINE-COMPILER-MACRO)
; (&REST JPL-UTIL::FUNCTION-EXPRS)
; (SB-C::COMPILER-MACRO-ARGS #:EXPR)
; (DECLARE
; (SB-C::CONSTANT-VALUE
; JPL-UTIL::FUNCTION-EXPRS)
; (SB-C::NO-COMPILER-MACRO JPL-UTIL:COMPOSE))
; (BLOCK JPL-UTIL:COMPOSE
; (FLET #
; #)))))
;
; caught STYLE-WARNING:
; 1 call to JPL-UTIL:COMPOSE was compiled before a compiler-macro was defined for
; it. A declaration of NOTINLINE at the call site will eliminate this warning, as
; will defining the compiler-macro before its first potential use.
; in: DEFUN INTEGER-DIGITS
; (DEFUN JPL-UTIL:INTEGER-DIGITS (JPL-UTIL::INT &OPTIONAL (JPL-UTIL::RADIX 10))
; "Expresses the given non-negative integer as a fresh list of digits
; in the given radix. The list of digits is ordered most-significant
; first. When INT is 0, a list with just 0 is returned."
; (DECLARE (TYPE (INTEGER 0) JPL-UTIL::INT)
; (TYPE (INTEGER 2) JPL-UTIL::RADIX)
; (OPTIMIZE SPEED))
; (LET ((JPL-UTIL::DIGITS 'NIL))
; (COND ((ZEROP JPL-UTIL::INT) (PUSH 0 JPL-UTIL::DIGITS))
; (T
; (LOOP JPL-UTIL::WITH JPL-UTIL::N = JPL-UTIL::INT
; JPL-UTIL::UNTIL #
; JPL-UTIL::DOING #)))
; JPL-UTIL::DIGITS))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION COND IF
; --> PROGN SB-KERNEL:THE* #:G5 MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP
; ==>
; 1
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION COND IF THE
; --> SB-C::%FUNCALL MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP
; ==>
; 1
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; in: DEFUN INTEGER-DIGIT-COUNT
; (DEFUN JPL-UTIL:INTEGER-DIGIT-COUNT
; (JPL-UTIL::N &OPTIONAL (JPL-UTIL::RADIX 10))
; "Returns the number of digits required to represent the given
; non-negative integer in RADIX.
;
; (integer-digit-count N RADIX) == (length (integer-digits N RADIX))"
; (DECLARE (TYPE (INTEGER 0) JPL-UTIL::N)
; (TYPE (INTEGER 2) JPL-UTIL::RADIX)
; (OPTIMIZE SPEED))
; (LABELS ((JPL-UTIL::TRY-ESTIMATE (JPL-UTIL::DIGITS)
; (LET* #
; #))
; (JPL-UTIL::TRY-ESTIMATE/DESCENDING (JPL-UTIL::DIGITS JPL-UTIL::LB)
; (IF #
; #
; JPL-UTIL::DIGITS))
; (JPL-UTIL::TRY-NEXT-LOWER (JPL-UTIL::DIGITS JPL-UTIL::LB)
; (JPL-UTIL::TRY-ESTIMATE/DESCENDING # #))
; (JPL-UTIL::TRY-ESTIMATE/ASCENDING (JPL-UTIL::DIGITS JPL-UTIL::UB)
; (IF #
; #
; JPL-UTIL::DIGITS))
; (JPL-UTIL::TRY-NEXT-HIGHER (JPL-UTIL::DIGITS JPL-UTIL::UB)
; (JPL-UTIL::TRY-ESTIMATE/ASCENDING # #)))
; (IF (ZEROP JPL-UTIL::N)
; 1
; (JPL-UTIL::TRY-ESTIMATE
; (IF #
; 1
; #)))))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION COND IF
; --> PROGN SB-KERNEL:THE* #:G1 MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP
; ==>
; 1
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION COND IF THE
; --> SB-C::%FUNCALL MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP
; ==>
; 1
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (1+ (FLOOR (LOG JPL-UTIL::N JPL-UTIL::RADIX)))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (MOD 4611685743549480961)
; (INTEGER 4611686018427387904)), not a FIXNUM.
; The result is a (VALUES
; (OR (INTEGER 1 4611685743549480961)
; (INTEGER 4611686018427387905))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (OR (MOD 4611685743549480961)
; (INTEGER 4611686018427387904)), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES
; (OR (INTEGER 1 4611685743549480961)
; (INTEGER 4611686018427387905))
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (1- JPL-UTIL::DIGITS)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (INTEGER 1 4611685743549480961)
; (INTEGER 4611686018427387905)), not a FIXNUM.
; The result is a (VALUES
; (OR (MOD 4611685743549480961)
; (INTEGER 4611686018427387904))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (OR (INTEGER 1 4611685743549480961)
; (INTEGER 4611686018427387905)), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES
; (OR (MOD 4611685743549480961)
; (INTEGER 4611686018427387904))
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (* JPL-UTIL::RADIX JPL-UTIL::LB)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER 2), not a FIXNUM.
; The second argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES (INTEGER 2) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a (INTEGER 2), not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER 1), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES (INTEGER 2) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (< JPL-UTIL::N JPL-UTIL::LB)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The second argument is a (INTEGER 1), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER 1), not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER 1), not a (UNSIGNED-BYTE 64).
; etc.
; (>= JPL-UTIL::N JPL-UTIL::UB)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The second argument is a (INTEGER 2), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER 1), not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER 2), not a (UNSIGNED-BYTE 64).
; etc.
; (1+ JPL-UTIL::DIGITS)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (* JPL-UTIL::UB JPL-UTIL::RADIX)
;
; 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 2), not a FIXNUM.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER 2), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (1- JPL-UTIL::DIGITS)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (< JPL-UTIL::N JPL-UTIL::LB)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The second argument is a UNSIGNED-BYTE, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER 1), not a (UNSIGNED-BYTE 64).
; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; etc.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/jpl-util-tmpJZ1AFCDQ.fasl
; compilation finished in 0:00:00.576
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/vector-delete.lisp" (written 20 OCT 2024 03:56:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/vector-delete-tmpE2RDUEQF.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/subtypecase.lisp" (written 20 OCT 2024 03:56:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/subtypecase-tmpB4PWHQTJ.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/alists-and-plists.lisp" (written 20 OCT 2024 03:56:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/alists-and-plists-tmpX1YMGP2L.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/option-clause.lisp" (written 20 OCT 2024 03:56:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/option-clause-tmp10W3LB9F.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/defclass-star.lisp" (written 20 OCT 2024 03:56:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/defclass-star-tmpK2B1ODJ1.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/order.lisp" (written 20 OCT 2024 03:56:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-jpl-util/order-tmp5C6SBQY7.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/jpl-queues/package.lisp" (written 20 OCT 2024 03:57:11 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/jpl-queues/package-tmpQJDP3B3H.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/jpl-queues/interface.lisp" (written 20 OCT 2024 03:57:11 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/jpl-queues/interface-tmpT6PBJ345.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/jpl-queues/bounded-fifo.lisp" (written 20 OCT 2024 03:57:11 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/jpl-queues/bounded-fifo-tmpP7KOSV72.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/jpl-queues/lossy-bounded-fifo.lisp" (written 20 OCT 2024 03:57:11 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/jpl-queues/lossy-bounded-fifo-tmpFERHD10F.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/jpl-queues/unbounded-fifo.lisp" (written 20 OCT 2024 03:57:11 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/jpl-queues/unbounded-fifo-tmpTVXHO5TD.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/jpl-queues/unbounded-random.lisp" (written 20 OCT 2024 03:57:11 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/jpl-queues/unbounded-random-tmp6XR5LAPW.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/jpl-queues/synchronized.lisp" (written 20 OCT 2024 03:57:11 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/jpl-queues/synchronized-tmpGEPT0T15.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/calispel/package.lisp" (written 20 OCT 2024 03:56:20 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/calispel/package-tmpMKX5S6TB.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/calispel/null-queue.lisp" (written 20 OCT 2024 03:56:20 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/calispel/null-queue-tmpT1R329DD.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/calispel/core.lisp" (written 20 OCT 2024 03:56:20 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/calispel/core-tmpYV9QWBE7.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/calispel/basic.lisp" (written 20 OCT 2024 03:56:20 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/calispel/basic-tmpY7Z87FVE.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/calispel/alt.lisp" (written 20 OCT 2024 03:56:20 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/calispel/alt-tmpZD0W6AUM.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-base64/package.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-base64/package-tmpRVZ12GJ7.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-base64/encode.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-base64/encode.lisp
; in: DEFUN ROUND-NEXT-MULTIPLE
; (MOD CL-BASE64::X CL-BASE64::N)
;
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (+ CL-BASE64::X (THE FIXNUM (- CL-BASE64::N CL-BASE64::REMAINDER)))
;
; 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 result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEF-*-TO-BASE64-* :STRING
; (CL-BASE64::DEF-*-TO-BASE64-* :STRING :STRING)
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF
; --> CL-BASE64::OUTPUT-GROUP THE + THE ASH CHAR-CODE THE CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF IF
; --> CL-BASE64::OUTPUT-GROUP THE ASH CHAR-CODE THE CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET LET* LABELS DO BLOCK LET TAGBODY TAGBODY CL-BASE64::OUTPUT-GROUP THE
; --> +
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (CL-BASE64::DEF-*-TO-BASE64-* :STRING :STREAM)
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF
; --> CL-BASE64::OUTPUT-GROUP THE + THE ASH CHAR-CODE THE CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF IF
; --> CL-BASE64::OUTPUT-GROUP THE ASH CHAR-CODE THE CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET LET* LABELS DO BLOCK LET TAGBODY TAGBODY CL-BASE64::OUTPUT-GROUP THE
; --> +
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; in: DEF-*-TO-BASE64-* :USB8-ARRAY
; (CL-BASE64::DEF-*-TO-BASE64-* :USB8-ARRAY :STRING)
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF
; --> CL-BASE64::OUTPUT-GROUP THE + THE ASH THE 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
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF IF
; --> CL-BASE64::OUTPUT-GROUP THE ASH THE AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET LET* LABELS DO BLOCK LET TAGBODY TAGBODY CL-BASE64::OUTPUT-GROUP THE
; --> +
; ==>
; 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
; optimize
; 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.
; (CL-BASE64::DEF-*-TO-BASE64-* :USB8-ARRAY :STREAM)
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF
; --> CL-BASE64::OUTPUT-GROUP THE + THE ASH THE 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
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF IF
; --> CL-BASE64::OUTPUT-GROUP THE ASH THE AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> LET LET* LABELS DO BLOCK LET TAGBODY TAGBODY CL-BASE64::OUTPUT-GROUP THE
; --> +
; ==>
; 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
; optimize
; 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.
; in: DEFUN INTEGER-TO-BASE64-STRING
; (MOD CL-BASE64::PADDED-BITS 24)
;
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; convert division by 2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (ZEROP CL-BASE64::REMAINDER-PADDING)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0 (24))), not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0 (24))), not a DOUBLE-FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
; (/ CL-BASE64::PADDING-BITS 6)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0 24)), not a INTEGER.
; The result is a (VALUES (OR FLOAT (RATIONAL 0 4)) &OPTIONAL), not a (VALUES
; INTEGER
; &REST T).
;
; note: unable to
; convert x/2^k to shift
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0 24)), not a INTEGER.
; (/ (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS) 6)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES INTEGER &REST T).
;
; note: unable to
; convert x/2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (/ CL-BASE64::PADDING-BITS 3)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (RATIONAL 0 24), not a INTEGER.
; The result is a (VALUES (RATIONAL 0 8) &OPTIONAL), not a (VALUES INTEGER
; &REST T).
;
; note: unable to
; convert x/2^k to shift
; due to type uncertainty:
; The first argument is a (RATIONAL 0 24), not a INTEGER.
; (INTEGER-LENGTH CL-BASE64::INPUT)
;
; note: forced to do full call
; unable to do inline (unsigned-byte 64) integer-length (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; unable to do inline (signed-byte 64) integer-length (cost 5) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 64).
; (- 24 CL-BASE64::REMAINDER-PADDING)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a (OR FLOAT (RATIONAL 0 (24))), not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (0) 24)) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The second argument is a (OR FLOAT (RATIONAL 0 (24))), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES (OR FLOAT (RATIONAL (0) 24)) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS)
;
; 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 (RATIONAL 0 24), not a FIXNUM.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 64).
; The second argument is a (RATIONAL 0 24), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (* CL-BASE64::COLUMNS (TRUNCATE CL-BASE64::PADDED-LENGTH CL-BASE64::COLUMNS))
;
; note: forced to do */SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The result is a (VALUES
; (INTEGER -21267647932558653961849226946058125312
; 21267647932558653957237540927630737409)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -21267647932558653961849226946058125312
; 21267647932558653957237540927630737409)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (- CL-BASE64::PADDED-LENGTH
; (* CL-BASE64::COLUMNS
; (TRUNCATE CL-BASE64::PADDED-LENGTH CL-BASE64::COLUMNS)))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a (INTEGER -21267647932558653961849226946058125312
; 21267647932558653957237540927630737409), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -21267647932558653961849226946058125313
; 21267647932558653966460912964485513215)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -21267647932558653961849226946058125312
; 21267647932558653957237540927630737409), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES
; (INTEGER -21267647932558653961849226946058125313
; 21267647932558653966460912964485513215)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (ASH CL-BASE64::INPUT (/ CL-BASE64::PADDING-BITS 3))
;
; note: forced to do full call
; unable to do inline ASH (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a (RATIONAL 0 8), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline ASH (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a (RATIONAL 0 8), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFUN INTEGER-TO-BASE64-STREAM
; (MOD CL-BASE64::PADDED-BITS 24)
;
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; convert division by 2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (ZEROP CL-BASE64::REMAINDER-PADDING)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0 (24))), not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0 (24))), not a DOUBLE-FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
; (/ CL-BASE64::PADDING-BITS 6)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0 24)), not a INTEGER.
; The result is a (VALUES (OR FLOAT (RATIONAL 0 4)) &OPTIONAL), not a (VALUES
; INTEGER
; &REST T).
;
; note: unable to
; convert x/2^k to shift
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0 24)), not a INTEGER.
; (/ (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS) 6)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES INTEGER &REST T).
;
; note: unable to
; convert x/2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (/ CL-BASE64::PADDING-BITS 3)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (RATIONAL 0 24), not a INTEGER.
; The result is a (VALUES (RATIONAL 0 8) &OPTIONAL), not a (VALUES INTEGER
; &REST T).
;
; note: unable to
; convert x/2^k to shift
; due to type uncertainty:
; The first argument is a (RATIONAL 0 24), not a INTEGER.
; (INTEGER-LENGTH CL-BASE64::INPUT)
;
; note: forced to do full call
; unable to do inline (unsigned-byte 64) integer-length (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; unable to do inline (signed-byte 64) integer-length (cost 5) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 64).
; (- 24 CL-BASE64::REMAINDER-PADDING)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a (OR FLOAT (RATIONAL 0 (24))), not a FIXNUM.
; The result is a (VALUES (OR FLOAT (RATIONAL (0) 24)) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The second argument is a (OR FLOAT (RATIONAL 0 (24))), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES (OR FLOAT (RATIONAL (0) 24)) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS)
;
; 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 (OR FLOAT (RATIONAL 0 24)), not a FIXNUM.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a (OR FLOAT (RATIONAL 0 24)), not a SINGLE-FLOAT.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; (- CL-BASE64::STRLEN CL-BASE64::PADDING-CHARS)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a (OR FLOAT (RATIONAL 0 4)), not a FIXNUM.
; The result is a (VALUES
; (OR FLOAT
; (RATIONAL -4611686018427387908 4611686018427387903))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The second argument is a (OR FLOAT (RATIONAL 0 4)), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES
; (OR FLOAT
; (RATIONAL -4611686018427387908 4611686018427387903))
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (1- CL-BASE64::NONPAD-CHARS)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR FLOAT
; (RATIONAL -4611686018427387908
; 4611686018427387903)), not a FIXNUM.
; The result is a (VALUES
; (OR FLOAT
; (RATIONAL -4611686018427387909 4611686018427387902))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (OR FLOAT
; (RATIONAL -4611686018427387908
; 4611686018427387903)), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES
; (OR FLOAT
; (RATIONAL -4611686018427387909 4611686018427387902))
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (ASH CL-BASE64::INPUT (/ CL-BASE64::PADDING-BITS 3))
;
; note: forced to do full call
; unable to do inline ASH (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a (RATIONAL 0 8), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline ASH (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a (RATIONAL 0 8), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-base64/encode-tmp4T72OGWB.fasl
; compilation finished in 0:00:00.126
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-base64/decode.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-base64/decode.lisp
; in: DEFINE-BASE64-DECODER :STRING
; (CL-BASE64::DEFINE-BASE64-DECODER :STRING :INTEGER)
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL ETYPECASE
; --> COND IF IF CL-BASE64::LET/TYPED LET LOOP BLOCK TAGBODY PROGN COND IF IF
; --> IF IF THE PROGN WHEN IF PROGN LET SETQ THE LOGIOR
; ==>
; (ASH CL-BASE64::RESULT 8)
;
; 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 (OR (INTEGER 0 0) (INTEGER 256)) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; unable to do inline ASH (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (OR (INTEGER 0 0) (INTEGER 256)) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; etc.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL ETYPECASE
; --> COND IF IF CL-BASE64::LET/TYPED LET LOOP BLOCK TAGBODY PROGN COND IF IF
; --> IF IF THE PROGN WHEN IF PROGN LET SETQ THE
; ==>
; (LOGIOR (ASH CL-BASE64::RESULT 8) BYTE)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (INTEGER 0 0) (INTEGER 256)), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a (OR (INTEGER 0 0) (INTEGER 256)), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL ETYPECASE
; --> COND IF IF IF CL-BASE64::LET/TYPED LET LOOP BLOCK TAGBODY PROGN COND IF
; --> IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE LOGIOR
; ==>
; (ASH CL-BASE64::RESULT 8)
;
; 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 (OR (INTEGER 0 0) (INTEGER 256)) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; unable to do inline ASH (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (OR (INTEGER 0 0) (INTEGER 256)) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; etc.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL ETYPECASE
; --> COND IF IF IF CL-BASE64::LET/TYPED LET LOOP BLOCK TAGBODY PROGN COND IF
; --> IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE
; ==>
; (LOGIOR (ASH CL-BASE64::RESULT 8) BYTE)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (INTEGER 0 0) (INTEGER 256)), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a (OR (INTEGER 0 0) (INTEGER 256)), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL ETYPECASE
; --> COND IF CL-BASE64::LET/TYPED LET LOOP BLOCK TAGBODY PROGN COND IF IF IF
; --> IF THE PROGN WHEN IF PROGN LET SETQ THE LOGIOR
; ==>
; (ASH CL-BASE64::RESULT 8)
;
; 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 (OR (INTEGER 0 0) (INTEGER 256)) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; unable to do inline ASH (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (OR (INTEGER 0 0) (INTEGER 256)) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; etc.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL ETYPECASE
; --> COND IF CL-BASE64::LET/TYPED LET LOOP BLOCK TAGBODY PROGN COND IF IF IF
; --> IF THE PROGN WHEN IF PROGN LET SETQ THE
; ==>
; (LOGIOR (ASH CL-BASE64::RESULT 8) BYTE)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (INTEGER 0 0) (INTEGER 256)), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a (OR (INTEGER 0 0) (INTEGER 256)), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; in: DEFINE-BASE64-DECODER :STREAM
; (CL-BASE64::DEFINE-BASE64-DECODER :STREAM :INTEGER)
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> CL-BASE64::LET/TYPED LET FLET CL-BASE64::LET/TYPED LET LOOP BLOCK TAGBODY
; --> PROGN COND IF IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE LOGIOR
; ==>
; (ASH CL-BASE64::RESULT 8)
;
; 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 (OR (INTEGER 0 0) (INTEGER 256)) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; unable to do inline ASH (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (OR (INTEGER 0 0) (INTEGER 256)) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; etc.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> CL-BASE64::LET/TYPED LET FLET CL-BASE64::LET/TYPED LET LOOP BLOCK TAGBODY
; --> PROGN COND IF IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE
; ==>
; (LOGIOR (ASH CL-BASE64::RESULT 8) BYTE)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (INTEGER 0 0) (INTEGER 256)), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a (OR (INTEGER 0 0) (INTEGER 256)), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-base64/decode-tmp30O6M23N.fasl
; compilation finished in 0:00:00.496
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/packages.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/packages-tmp523JK0GJ.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/specials.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/specials-tmp2T656F3Z.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/util.lisp" (written 20 OCT 2024 03:56:36 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/util.lisp
; in: DEFUN STRING-LIST-TO-SIMPLE-STRING
; (REPLACE CL-PPCRE::RESULT-STRING STRING :START1 CL-PPCRE::CURR-POS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a STRING, not a (OR NULL (SIMPLE-ARRAY * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a STRING, not a (OR SIMPLE-BASE-STRING NULL).
; in: DEFUN COMPLEMENT*
; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/util-tmpU8E6U186.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/errors.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/errors-tmpUVEMO1OX.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/charset.lisp" (written 20 OCT 2024 03:56:36 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/charset.lisp
; in: DEFUN MIX
; (+ CL-PPCRE::CODE CL-PPCRE::HASH)
;
; 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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
; in: DEFUN COMPUTE-INDEX
; (LENGTH VECTOR)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (MOD CL-PPCRE::HASH (1- (LENGTH VECTOR)))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (1+ (MOD CL-PPCRE::HASH (1- (LENGTH VECTOR))))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR FLOAT
; (RATIONAL (-35184372088830) (35184372088830))), not a FIXNUM.
; The result is a (VALUES
; (OR FLOAT (RATIONAL (-35184372088829) (35184372088831)))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (OR FLOAT
; (RATIONAL (-35184372088830) (35184372088830))), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES
; (OR FLOAT (RATIONAL (-35184372088829) (35184372088831)))
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; in: DEFUN %ADD-TO-CHARSET/EXPAND
; (>= CL-PPCRE::NEW-SIZE 371370)
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (* 2 CL-PPCRE::NEW-SIZE)
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR (INTEGER * -2) (INTEGER 0 0) (INTEGER 2))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline ASH (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR (INTEGER * -2) (INTEGER 0 0) (INTEGER 2))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
; in: DEFUN MAP-CHARSET
; (DECF CL-PPCRE::N)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER * 4611686018427387903), not a FIXNUM.
; The result is a (VALUES (INTEGER * 4611686018427387902) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER * 4611686018427387903), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES (INTEGER * 4611686018427387902) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; in: DEFUN CREATE-CHARSET-FROM-TEST-FUNCTION
; (LOOP CL-PPCRE::WITH CL-PPCRE::CHARSET = (CL-PPCRE::MAKE-CHARSET)
; CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM CL-PPCRE::START CL-PPCRE::BELOW
; CL-PPCRE::END
; CL-PPCRE::FOR ...)
; --> LET LET LET TAGBODY WHEN IF
; ==>
; (>= CL-PPCRE::CODE #:LIM0)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; (LOOP CL-PPCRE::WITH CL-PPCRE::CHARSET = (CL-PPCRE::MAKE-CHARSET)
; CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM CL-PPCRE::START CL-PPCRE::BELOW
; CL-PPCRE::END
; CL-PPCRE::FOR ...)
; --> LET LET LET TAGBODY WHEN IF
; ==>
; (>= CL-PPCRE::CODE #:LIM0)
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, 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 REAL, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/charset-tmpPDN0DF20.fasl
; compilation finished in 0:00:00.050
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/charmap.lisp" (written 20 OCT 2024 03:56:36 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/charmap.lisp
; in: DEFUN MAKE-CHARMAP
; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; in: DEFUN CREATE-CHARMAP-FROM-TEST-FUNCTION
; (LOOP CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM CL-PPCRE::START CL-PPCRE::BELOW
; CL-PPCRE::END
; CL-PPCRE::FOR CHAR = (CODE-CHAR CL-PPCRE::CODE)
; CL-PPCRE::UNTIL ...)
; --> LET LET TAGBODY WHEN IF
; ==>
; (>= CL-PPCRE::CODE #:LIM0)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
; (LOOP CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM (1-
; CL-PPCRE::END) CL-PPCRE::DOWNTO CL-PPCRE::START
; CL-PPCRE::FOR CHAR = (CODE-CHAR CL-PPCRE::CODE)
; CL-PPCRE::UNTIL ...)
; --> LET LET TAGBODY WHEN IF
; ==>
; (< CL-PPCRE::CODE #:LIM31)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; (LOOP CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM CL-PPCRE::START CL-PPCRE::BELOW
; CL-PPCRE::END
; CL-PPCRE::FOR CHAR = (CODE-CHAR CL-PPCRE::CODE)
; CL-PPCRE::UNTIL ...)
; --> LET LET TAGBODY WHEN IF
; ==>
; (>= CL-PPCRE::CODE #:LIM0)
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, 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 REAL, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; (1- CL-PPCRE::END)
;
; 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 result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (LOOP CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM (1-
; CL-PPCRE::END) CL-PPCRE::DOWNTO CL-PPCRE::START
; CL-PPCRE::FOR CHAR = (CODE-CHAR CL-PPCRE::CODE)
; CL-PPCRE::UNTIL ...)
; --> LET LET TAGBODY WHEN IF
; ==>
; (< CL-PPCRE::CODE #:LIM31)
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
; etc.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/charmap-tmp1SCDPCYF.fasl
; compilation finished in 0:00:00.053
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/chartest.lisp" (written 20 OCT 2024 03:56:36 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/chartest.lisp
; in: DEFUN CREATE-HASH-TABLE-FROM-TEST-FUNCTION
; (LOOP CL-PPCRE::WITH HASH-TABLE = (MAKE-HASH-TABLE)
; CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM CL-PPCRE::START CL-PPCRE::BELOW
; CL-PPCRE::END
; CL-PPCRE::FOR ...)
; --> LET LET LET TAGBODY WHEN IF
; ==>
; (>= CL-PPCRE::CODE #:LIM0)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; (LOOP CL-PPCRE::WITH HASH-TABLE = (MAKE-HASH-TABLE)
; CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM CL-PPCRE::START CL-PPCRE::BELOW
; CL-PPCRE::END
; CL-PPCRE::FOR ...)
; --> LET LET LET TAGBODY WHEN IF
; ==>
; (>= CL-PPCRE::CODE #:LIM0)
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, 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 REAL, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; in: DEFUN CREATE-OPTIMIZED-TEST-FUNCTION
; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2)
;
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; note: unable to
; convert division by 2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (- CL-PPCRE::END CL-PPCRE::START)
;
; note: forced to do 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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
; (<= (CL-PPCRE::CHARSET-COUNT CL-PPCRE::CHARSET)
; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2))
;
; note: forced to do >-FIXNUM-INTEGER (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The second argument is a INTEGER, not a FIXNUM.
; (- CL-PPCRE::END CL-PPCRE::START)
;
; note: forced to do 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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
; (<= (HASH-TABLE-COUNT HASH-TABLE)
; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2))
;
; note: forced to do >-FIXNUM-INTEGER (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The second argument is a INTEGER, not a FIXNUM.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/chartest-tmp31LDQ8IW.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/lexer.lisp" (written 20 OCT 2024 03:56:36 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/lexer.lisp
; in: DEFUN NEXT-CHAR
; (CL-PPCRE::SIGNAL-SYNTAX-ERROR* CL-PPCRE::ERROR-POS
; "Comment group not closed.")
;
; note: doing signed word to integer coercion (cost 20)
; in: DEFUN GET-NUMBER
; (IF (< CL-PPCRE::END-POS CL-PPCRE::LEXER-LEN)
; CL-PPCRE::END-POS
; CL-PPCRE::LEXER-LEN)
;
; note: doing signed word to integer coercion (cost 20)
; in: DEFUN MAKE-CHAR-FROM-CODE
; (CL-PPCRE::SIGNAL-SYNTAX-ERROR* CL-PPCRE::ERROR-POS
; "No character for hex-code ~X." NUMBER)
;
; note: deleting unreachable code
; in: DEFUN UNESCAPE-CHAR
; (CHAR-UPCASE CL-PPCRE::NEXT-CHAR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/lexer-tmpXQHFS7J0.fasl
; compilation finished in 0:00:00.226
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/parser.lisp" (written 20 OCT 2024 03:56:36 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/parser.lisp
; in: DEFUN GROUP
; (CL-PPCRE::SIGNAL-SYNTAX-ERROR* (+ CL-PPCRE::OPEN-PAREN-POS 2)
; "Opening paren has no matching closing paren.")
;
; note: doing signed word to integer coercion (cost 20)
; in: DEFUN SEQ
; (VECTOR-PUSH-EXTEND CL-PPCRE::QUANT (CAR CL-PPCRE::LAST-CDR))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/parser-tmpZU3XIPN7.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/regex-class.lisp" (written 20 OCT 2024 03:56:36 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/regex-class.lisp
; in: DEFMETHOD INITIALIZE-INSTANCE :AFTER (STR)
; (COERCE CL-PPCRE::STR-SLOT 'SIMPLE-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
; SIMPLE-BASE-STRING
; NULL).
; (LENGTH (CL-PPCRE::STR CL-PPCRE::STR))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/regex-class-tmpOLPZFU22.fasl
; compilation finished in 0:00:00.080
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/regex-class-util.lisp" (written 20 OCT 2024 03:56:36 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/regex-class-util.lisp
; in: DEFMETHOD CASE-MODE (STR T)
; (ZEROP (CL-PPCRE::LEN CL-PPCRE::STR))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; in: DEFMETHOD EVERYTHINGP (SEQ)
; (LENGTH CL-PPCRE::CLEANED-ELEMENTS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (SIMPLE-ARRAY * (*))
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
; in: DEFMETHOD EVERYTHINGP (ALTERNATION)
; (LENGTH CL-PPCRE::CHOICES)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; in: DEFMETHOD EVERYTHINGP (REPETITION)
; (= 1 CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (REAL 1 1) (COMPLEX (INTEGER 1 1))
; (COMPLEX (SINGLE-FLOAT 1.0 1.0))
; (COMPLEX
; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (REAL 1 1) (COMPLEX (INTEGER 1 1))
; (COMPLEX (SINGLE-FLOAT 1.0 1.0))
; (COMPLEX
; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (REAL 1 1) (COMPLEX (INTEGER 1 1))
; (COMPLEX (SINGLE-FLOAT 1.0 1.0))
; (COMPLEX
; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a (COMPLEX
; SINGLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (REAL 1 1) (COMPLEX (INTEGER 1 1))
; (COMPLEX (SINGLE-FLOAT 1.0 1.0))
; (COMPLEX
; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a (COMPLEX
; DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
;
; 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 (OR (REAL 1 1) (COMPLEX (INTEGER 1 1))
; (COMPLEX (SINGLE-FLOAT 1.0 1.0))
; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0))), not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a (OR (REAL 1 1) (COMPLEX (INTEGER 1 1))
; (COMPLEX (SINGLE-FLOAT 1.0 1.0))
; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0))), not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
; in: DEFMETHOD REGEX-LENGTH (SEQ)
; (LOOP CL-PPCRE::FOR CL-PPCRE::SUB-REGEX CL-PPCRE::IN (CL-PPCRE::ELEMENTS
; CL-PPCRE::SEQ)
; CL-PPCRE::FOR CL-PPCRE::LEN = (CL-PPCRE::REGEX-LENGTH
; CL-PPCRE::SUB-REGEX)
; IF (NOT CL-PPCRE::LEN)
; DO ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:SUM6 CL-PPCRE::LEN)
;
; 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 (NOT NULL), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a (NOT NULL), not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; in: DEFMETHOD REGEX-LENGTH (ALTERNATION)
; (/= CL-PPCRE::LEN CL-PPCRE::OLD-LEN)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-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 DOUBLE-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 (COMPLEX SINGLE-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 (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
;
; 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 (NOT NULL), not a SINGLE-FLOAT.
; The second argument is a (NOT NULL), not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a (NOT NULL), not a DOUBLE-FLOAT.
; The second argument is a (NOT NULL), not a DOUBLE-FLOAT.
; in: DEFMETHOD REGEX-LENGTH (BRANCH)
; (EQL CL-PPCRE::THEN-LENGTH
; (CL-PPCRE::REGEX-LENGTH (CL-PPCRE::ELSE-REGEX CL-PPCRE::BRANCH)))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (NOT NULL), not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (NOT NULL), not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; in: DEFMETHOD REGEX-LENGTH (REPETITION)
; (EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
;
; 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 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; (* CL-PPCRE::MINIMUM CL-PPCRE::LEN)
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFMETHOD REGEX-MIN-LENGTH (SEQ)
; (LOOP CL-PPCRE::FOR CL-PPCRE::SUB-REGEX CL-PPCRE::IN (CL-PPCRE::ELEMENTS
; CL-PPCRE::SEQ)
; CL-PPCRE::FOR CL-PPCRE::LEN = (CL-PPCRE::REGEX-MIN-LENGTH
; CL-PPCRE::SUB-REGEX)
; CL-PPCRE::SUM CL-PPCRE::LEN)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:SUM6 CL-PPCRE::LEN)
;
; 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 &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; in: DEFMETHOD REGEX-MIN-LENGTH (ALTERNATION)
; (LOOP CL-PPCRE::FOR CL-PPCRE::SUB-REGEX CL-PPCRE::IN (CL-PPCRE::CHOICES
; CL-PPCRE::ALTERNATION)
; CL-PPCRE::FOR CL-PPCRE::LEN = (CL-PPCRE::REGEX-MIN-LENGTH
; CL-PPCRE::SUB-REGEX)
; CL-PPCRE::MINIMIZE CL-PPCRE::LEN)
; --> LET LET SB-LOOP::WITH-MINIMAX-VALUE LET TAGBODY
; --> SB-LOOP::LOOP-ACCUMULATE-MINIMAX-VALUE PROGN WHEN IF OR LET IF
; ==>
; (< #:MINMAXTMP10 #:MINMAX9)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
; etc.
; in: DEFMETHOD REGEX-MIN-LENGTH (BRANCH)
; (MIN (CL-PPCRE::REGEX-MIN-LENGTH (CL-PPCRE::THEN-REGEX CL-PPCRE::BRANCH))
; (CL-PPCRE::REGEX-MIN-LENGTH (CL-PPCRE::ELSE-REGEX CL-PPCRE::BRANCH)))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; 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.
; in: DEFMETHOD REGEX-MIN-LENGTH (REPETITION)
; (* (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION)
; (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION))
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFMETHOD COMPUTE-OFFSETS (ALTERNATION T)
; (/= CL-PPCRE::CURR-OFFSET CL-PPCRE::OLD-OFFSET)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-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 DOUBLE-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 (COMPLEX SINGLE-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 (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
;
; 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 (NOT NULL), not a SINGLE-FLOAT.
; The second argument is a (NOT NULL), not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a (NOT NULL), not a DOUBLE-FLOAT.
; The second argument is a (NOT NULL), not a DOUBLE-FLOAT.
; in: DEFMETHOD COMPUTE-OFFSETS (BRANCH T)
; (EQL CL-PPCRE::THEN-OFFSET
; (CL-PPCRE::COMPUTE-OFFSETS (CL-PPCRE::ELSE-REGEX CL-PPCRE::BRANCH)
; CL-PPCRE::START-POS))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (NOT NULL), not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (NOT NULL), not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; in: DEFMETHOD COMPUTE-OFFSETS (REPETITION T)
; (* CL-PPCRE::MINIMUM CL-PPCRE::LEN)
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (+ CL-PPCRE::START-POS (* CL-PPCRE::MINIMUM CL-PPCRE::LEN))
;
; 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 NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; in: DEFMETHOD COMPUTE-OFFSETS (CHAR-CLASS T)
; (1+ CL-PPCRE::START-POS)
;
; note: 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFMETHOD COMPUTE-OFFSETS (EVERYTHING T)
; (1+ CL-PPCRE::START-POS)
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFMETHOD COMPUTE-OFFSETS (STR T)
; (+ CL-PPCRE::START-POS (CL-PPCRE::LEN CL-PPCRE::STR))
;
; 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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
; in: DEFMETHOD COMPUTE-OFFSETS (FILTER T)
; (+ CL-PPCRE::START-POS CL-PPCRE::LEN)
;
; 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 (NOT NULL), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a (NOT NULL), not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/regex-class-util-tmpE8NZG6A8.fasl
; compilation finished in 0:00:00.103
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/convert.lisp" (written 20 OCT 2024 03:56:36 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/convert.lisp
; in: DEFUN CONVERT-CHAR-CLASS-TO-TEST-FUNCTION
; (FUNCALL CL-PPCRE::TEST-FUNCTION (CHAR-DOWNCASE CHAR))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; (CHAR-DOWNCASE CHAR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; (FUNCALL CL-PPCRE::TEST-FUNCTION (CHAR-UPCASE CHAR))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; (CHAR-UPCASE CHAR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; (FUNCALL CL-PPCRE::TEST-FUNCTION (CHAR-DOWNCASE CHAR))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; (CHAR-DOWNCASE CHAR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; (FUNCALL CL-PPCRE::TEST-FUNCTION (CHAR-UPCASE CHAR))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; (CHAR-UPCASE CHAR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; (CHAR-DOWNCASE CHAR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; (CHAR-UPCASE CHAR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; (FUNCALL CL-PPCRE::TEST-FUNCTION CL-PPCRE::CHAR-DOWN)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; (FUNCALL CL-PPCRE::TEST-FUNCTION CL-PPCRE::CHAR-UP)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; (CHAR-DOWNCASE CHAR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; (CHAR-UPCASE CHAR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; (FUNCALL CL-PPCRE::TEST-FUNCTION CL-PPCRE::CHAR-DOWN)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; (FUNCALL CL-PPCRE::TEST-FUNCTION CL-PPCRE::CHAR-UP)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; in: DEFUN MAYBE-SPLIT-REPETITION
; (- CL-PPCRE::MAXIMUM CL-PPCRE::MINIMUM)
;
; note: doing signed word to integer coercion (cost 20)
; in: DEFUN MAYBE-ACCUMULATE
; (SETF (SUBSEQ (SLOT-VALUE CL-PPCRE::STARTS-WITH 'CL-PPCRE::STR)
; (- (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH)
; (CL-PPCRE::LEN CL-PPCRE::STR)))
; (CL-PPCRE::STR CL-PPCRE::STR)
; (CL-PPCRE::SKIP CL-PPCRE::STR) T)
; --> SETF LET*
; ==>
; (REPLACE #:SEQUENCE #:NEW2 :START1 #:START :END1 NIL)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (OR NULL (SIMPLE-ARRAY * (*))).
; The second argument is a SEQUENCE, not a (OR NULL (SIMPLE-ARRAY * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (OR SIMPLE-BASE-STRING NULL).
; The second argument is a SEQUENCE, not a (OR NULL
; (SIMPLE-ARRAY CHARACTER (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (OR NULL
; (SIMPLE-ARRAY CHARACTER (*))).
; The second argument is a SEQUENCE, not a (OR SIMPLE-BASE-STRING NULL).
; (MAKE-ARRAY (CL-PPCRE::LEN CL-PPCRE::STR) :INITIAL-CONTENTS
; (CL-PPCRE::STR CL-PPCRE::STR) :ELEMENT-TYPE 'CHARACTER
; :FILL-POINTER T :ADJUSTABLE T)
;
; 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 second argument is a SEQUENCE, not a (OR NULL (SIMPLE-ARRAY * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR SIMPLE-BASE-STRING NULL).
; (SETF (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH)
; (+ (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH)
; (CL-PPCRE::LEN CL-PPCRE::STR)))
; --> FUNCALL
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20)
; (SETF (SUBSEQ (SLOT-VALUE CL-PPCRE::STARTS-WITH 'CL-PPCRE::STR)
; (- (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH)
; (CL-PPCRE::LEN CL-PPCRE::STR)))
; (CL-PPCRE::STR CL-PPCRE::STR)
; (CL-PPCRE::SKIP CL-PPCRE::STR) T)
; --> SETF LET*
; ==>
; (REPLACE #:SEQUENCE #:NEW2 :START1 #:START :END1 NIL)
;
; note: doing signed word to integer coercion (cost 20)
; in: DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ((EQL :BRANCH) T)
; (LENGTH (CL-PPCRE::CHOICES CL-PPCRE::ALTERNATIONS))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; in: DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ((EQL :GREEDY-REPETITION) T)
; (ZEROP LENGTH)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; in: DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ((EQL :NAMED-REGISTER) T)
; (COPY-SEQ (SECOND CL-PPCRE::PARSE-TREE))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
; in: DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ((EQL :BACK-REFERENCE) T)
; (STRING= CL-PPCRE::NAME CL-PPCRE::BACKREF-NAME)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL
; CHARACTER), not a SIMPLE-BASE-STRING.
; The second argument is a (OR STRING (AND SYMBOL (NOT NULL))
; CHARACTER), not a SIMPLE-BASE-STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; The second argument is a (OR STRING (AND SYMBOL (NOT NULL))
; CHARACTER), not a (SIMPLE-ARRAY CHARACTER (*)).
; (COPY-SEQ CL-PPCRE::BACKREF-NAME)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
; (- CL-PPCRE::REG-NUM CL-PPCRE::REG-INDEX)
;
; note: forced to do 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, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (1- CL-PPCRE::BACKREF-NUMBER)
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (LOOP CL-PPCRE::FOR CL-PPCRE::NAME CL-PPCRE::IN CL-PPCRE::REG-NAMES
; CL-PPCRE::FOR CL-PPCRE::REG-INDEX CL-PPCRE::FROM 0
; WHEN (STRING= CL-PPCRE::NAME CL-PPCRE::BACKREF-NAME)
; CL-PPCRE::COLLECT ...)
; --> LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY
; --> SB-LOOP::LOOP-DESETQ SETQ THE 1+
; ==>
; 1
;
; note: forced to do 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 1) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFUN CONVERT
; (COERCE (SLOT-VALUE CL-PPCRE::STARTS-WITH 'CL-PPCRE::STR) 'SIMPLE-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
; SIMPLE-BASE-STRING
; NULL).
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/convert-tmpKRRUKJSC.fasl
; compilation finished in 0:00:00.163
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/optimize.lisp" (written 20 OCT 2024 03:56:36 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/optimize.lisp
; in: DEFMETHOD GATHER-STRINGS (SEQ)
; (MAKE-ARRAY CL-PPCRE::COLLECTOR-LENGTH :INITIAL-CONTENTS CL-PPCRE::COLLECTOR
; :ELEMENT-TYPE 'CHARACTER :FILL-POINTER T :ADJUSTABLE T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a VECTOR, not a (OR NULL (SIMPLE-ARRAY * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a VECTOR, not a (OR SIMPLE-BASE-STRING NULL).
; (INCF CL-PPCRE::COLLECTOR-LENGTH (CL-PPCRE::LEN CL-PPCRE::ELEMENT))
; --> THE
; ==>
; (+ (CL-PPCRE::LEN CL-PPCRE::ELEMENT) CL-PPCRE::COLLECTOR-LENGTH)
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFMETHOD START-ANCHORED-P (REPETITION)
; (PLUSP (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, 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.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; in: DEFMETHOD START-ANCHORED-P (REGEX)
; (ZEROP (CL-PPCRE::LEN CL-PPCRE::REGEX))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; in: DEFMETHOD END-STRING-AUX (SEQ)
; (ZEROP (CL-PPCRE::LEN CL-PPCRE::ELEMENT-END))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (MAKE-ARRAY CL-PPCRE::CONCATENATED-LENGTH :INITIAL-CONTENTS
; (REVERSE (CL-PPCRE::STR CL-PPCRE::CONCATENATED-START))
; :ELEMENT-TYPE 'CHARACTER :FILL-POINTER T :ADJUSTABLE T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR NULL (SIMPLE-ARRAY * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR SIMPLE-BASE-STRING NULL).
; (CHAR CL-PPCRE::STR CL-PPCRE::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; in: DEFMETHOD COMPUTE-MIN-REST (ALTERNATION T)
; (LOOP CL-PPCRE::FOR CL-PPCRE::CHOICE CL-PPCRE::IN (CL-PPCRE::CHOICES
; CL-PPCRE::ALTERNATION)
; CL-PPCRE::MINIMIZE (CL-PPCRE::COMPUTE-MIN-REST CL-PPCRE::CHOICE
; CL-PPCRE::CURRENT-MIN-REST))
; --> LET SB-LOOP::WITH-MINIMAX-VALUE LET TAGBODY
; --> SB-LOOP::LOOP-ACCUMULATE-MINIMAX-VALUE PROGN WHEN IF OR LET IF
; ==>
; (< #:MINMAXTMP11 #:MINMAX10)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
; etc.
; in: DEFMETHOD COMPUTE-MIN-REST (BRANCH T)
; (MIN
; (CL-PPCRE::COMPUTE-MIN-REST (CL-PPCRE::THEN-REGEX CL-PPCRE::BRANCH)
; CL-PPCRE::CURRENT-MIN-REST)
; (CL-PPCRE::COMPUTE-MIN-REST (CL-PPCRE::ELSE-REGEX CL-PPCRE::BRANCH)
; CL-PPCRE::CURRENT-MIN-REST))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; 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.
; in: DEFMETHOD COMPUTE-MIN-REST (STR T)
; (+ CL-PPCRE::CURRENT-MIN-REST (CL-PPCRE::LEN CL-PPCRE::STR))
;
; 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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
; in: DEFMETHOD COMPUTE-MIN-REST (FILTER T)
; (+ CL-PPCRE::CURRENT-MIN-REST (OR (CL-PPCRE::LEN CL-PPCRE::FILTER) 0))
;
; 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 (NOT NULL), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a (NOT NULL), not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; in: DEFMETHOD COMPUTE-MIN-REST (REPETITION T)
; (* (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION)
; (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION))
;
; note: 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (+ CL-PPCRE::CURRENT-MIN-REST
; (* (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION)
; (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION)))
;
; 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 NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; in: DEFMETHOD COMPUTE-MIN-REST (LOOKBEHIND T)
; (+ CL-PPCRE::CURRENT-MIN-REST (CL-PPCRE::LEN CL-PPCRE::LOOKBEHIND))
;
; note: 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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
; in: DEFMETHOD COMPUTE-MIN-REST (REGEX T)
; (1+ CL-PPCRE::CURRENT-MIN-REST)
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/optimize-tmpU2ISN61U.fasl
; compilation finished in 0:00:00.076
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/closures.lisp" (written 20 OCT 2024 03:56:36 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/closures.lisp
; in: DEFUN *STRING*-EQUAL
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX)
; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; in: DEFMETHOD CREATE-MATCHER-AUX (LOOKBEHIND T)
; (FUNCALL CL-PPCRE::TEST-MATCHER (- CL-PPCRE::START-POS CL-PPCRE::LEN))
;
; note: doing signed word to integer coercion (cost 20)
;
; note: doing signed word to integer coercion (cost 20)
; in: DEFMETHOD CREATE-MATCHER-AUX (CHAR-CLASS T)
; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::CHAR-CLASS
; (SCHAR CL-PPCRE::*STRING*
; CL-PPCRE::START-POS))
; (LAMBDA (CL-PPCRE::START-POS)
; (DECLARE (FIXNUM CL-PPCRE::START-POS))
; (AND (< CL-PPCRE::START-POS CL-PPCRE::*END-POS*)
; (CL-PPCRE::CHAR-CLASS-TEST)
; (FUNCALL CL-PPCRE::NEXT-FN (1+ CL-PPCRE::START-POS)))))
; --> LET LAMBDA FUNCTION AND IF IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; in: DEFMETHOD CREATE-MATCHER-AUX (STR T)
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::START-POS
; CL-PPCRE::NEXT-POS 0 CL-PPCRE::LEN)
; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF
; ==>
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX)
; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::START-POS) CL-PPCRE::CHR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; (LENGTH CL-PPCRE::END-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR CONS VECTOR
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::END-STRING CL-PPCRE::START-POS
; CL-PPCRE::TEST-END-POS 0 CL-PPCRE::END-STRING-LEN)
; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF
; ==>
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX)
; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; (FUNCALL CL-PPCRE::NEXT-FN (+ CL-PPCRE::START-POS CL-PPCRE::LEN))
;
; note: doing signed word to integer coercion (cost 20)
;
; note: doing signed word to integer coercion (cost 20)
;
; note: doing signed word to integer coercion (cost 20)
; in: DEFMETHOD CREATE-MATCHER-AUX (BACK-REFERENCE T)
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::*STRING* CL-PPCRE::START-POS
; CL-PPCRE::NEXT-POS CL-PPCRE::REG-START CL-PPCRE::REG-END)
; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF
; ==>
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX)
; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; in: DEFMETHOD CREATE-MATCHER-AUX (FILTER T)
; (FUNCALL CL-PPCRE::FN CL-PPCRE::START-POS)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FN is not known to be a function
; (FUNCALL CL-PPCRE::NEXT-FN CL-PPCRE::NEXT-POS)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; NEXT-FN is not known to be a function
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/closures-tmpJVKJGHUO.fasl
; compilation finished in 0:00:00.093
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/repetition-closures.lisp" (written 20 OCT 2024 03:56:36 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/repetition-closures.lisp
; in: DEFMETHOD CREATE-GREEDY-CONSTANT-LENGTH-MATCHER (REPETITION T)
; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX
; (SCHAR CL-PPCRE::*STRING*
; CL-PPCRE::CURR-POS))
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST)))
; --> LET CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET BLOCK
; --> TAGBODY WHEN IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0
; CL-PPCRE::LEN)
; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF
; ==>
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX)
; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (FUNCALL CL-PPCRE::INNER-MATCHER CL-PPCRE::CURR-POS))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a (UNSIGNED-BYTE
; 64).
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a (UNSIGNED-BYTE 64).
; etc.
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR/= #\Newline (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX
; (SCHAR CL-PPCRE::*STRING*
; CL-PPCRE::CURR-POS))
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST)))
; --> LET CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*= CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 CL-PPCRE::LEN))
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR= CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a (UNSIGNED-BYTE
; 64).
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a (UNSIGNED-BYTE 64).
; etc.
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a (UNSIGNED-BYTE
; 64).
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a (UNSIGNED-BYTE 64).
; etc.
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR= CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0
; CL-PPCRE::LEN))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a (UNSIGNED-BYTE
; 64).
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a (UNSIGNED-BYTE 64).
; etc.
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*= CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 CL-PPCRE::LEN))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a (UNSIGNED-BYTE
; 64).
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a (UNSIGNED-BYTE 64).
; etc.
; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX
; (SCHAR CL-PPCRE::*STRING*
; CL-PPCRE::CURR-POS))
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST)))
; --> LET CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a (UNSIGNED-BYTE
; 64).
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a (UNSIGNED-BYTE 64).
; etc.
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR/= #\Newline (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a (UNSIGNED-BYTE
; 64).
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a (UNSIGNED-BYTE 64).
; etc.
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (FUNCALL CL-PPCRE::INNER-MATCHER CL-PPCRE::CURR-POS))
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR/= #\Newline (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX
; (SCHAR CL-PPCRE::*STRING*
; CL-PPCRE::CURR-POS))
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST)))
; --> LET CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*= CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 CL-PPCRE::LEN))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0
; CL-PPCRE::LEN))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR= CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
; in: DEFMETHOD CREATE-GREEDY-NO-ZERO-MATCHER (REPETITION T)
; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0)
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> + AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> SB-IMPL::XSUBTRACT AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; in: DEFMETHOD CREATE-GREEDY-MATCHER (REPETITION T)
; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0
; (SVREF CL-PPCRE::*LAST-POS-STORES* CL-PPCRE::ZERO-LENGTH-NUM) NIL)
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> + AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> SB-IMPL::XSUBTRACT AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; in: DEFMETHOD CREATE-NON-GREEDY-CONSTANT-LENGTH-MATCHER (REPETITION T)
; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX
; (SCHAR CL-PPCRE::*STRING*
; CL-PPCRE::CURR-POS))
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST)))
; --> LET CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET
; --> LOOP BLOCK LET LET TAGBODY UNLESS IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0
; CL-PPCRE::LEN)
; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF
; ==>
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX)
; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*= CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 CL-PPCRE::LEN))
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a (UNSIGNED-BYTE
; 64).
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a (UNSIGNED-BYTE 64).
; etc.
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0
; CL-PPCRE::LEN))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a (UNSIGNED-BYTE
; 64).
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a (UNSIGNED-BYTE 64).
; etc.
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR= CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a (UNSIGNED-BYTE
; 64).
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a (UNSIGNED-BYTE 64).
; etc.
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a (UNSIGNED-BYTE
; 64).
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a (UNSIGNED-BYTE 64).
; etc.
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0
; CL-PPCRE::LEN))
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX
; (SCHAR CL-PPCRE::*STRING*
; CL-PPCRE::CURR-POS))
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST)))
; --> LET CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET
; --> MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a (UNSIGNED-BYTE
; 64).
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a (UNSIGNED-BYTE 64).
; etc.
; --> LET CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET
; --> 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE T)
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a (UNSIGNED-BYTE
; 64).
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a (UNSIGNED-BYTE 64).
; etc.
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR/= #\Newline (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a (UNSIGNED-BYTE
; 64).
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a (UNSIGNED-BYTE 64).
; etc.
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (FUNCALL CL-PPCRE::INNER-MATCHER CL-PPCRE::CURR-POS))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a (UNSIGNED-BYTE
; 64).
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a (UNSIGNED-BYTE 64).
; etc.
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR/= #\Newline (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE T)
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX
; (SCHAR CL-PPCRE::*STRING*
; CL-PPCRE::CURR-POS))
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST)))
; --> LET CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET
; --> MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*= CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 CL-PPCRE::LEN))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0
; CL-PPCRE::LEN))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR= CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
; in: DEFMETHOD CREATE-NON-GREEDY-NO-ZERO-MATCHER (REPETITION T)
; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0)
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> + AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> SB-IMPL::XSUBTRACT AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; in: DEFMETHOD CREATE-NON-GREEDY-MATCHER (REPETITION T)
; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0
; (SVREF CL-PPCRE::*LAST-POS-STORES* CL-PPCRE::ZERO-LENGTH-NUM) NIL)
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> + AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> SB-IMPL::XSUBTRACT AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; in:
; DEFMETHOD CREATE-CONSTANT-REPETITION-CONSTANT-LENGTH-MATCHER (REPETITION T)
; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX
; (SCHAR CL-PPCRE::*STRING*
; CL-PPCRE::CURR-POS))
; (CL-PPCRE::CONSTANT-REPETITION-CONSTANT-LENGTH-CLOSURE
; (AND (CL-PPCRE::CHAR-CLASS-TEST) (1+ CL-PPCRE::CURR-POS))))
; --> LET CL-PPCRE::CONSTANT-REPETITION-CONSTANT-LENGTH-CLOSURE LAMBDA FUNCTION
; --> LET AND IF IF LOOP BLOCK LET TAGBODY UNLESS IF AND IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS CL-PPCRE::NEXT-POS
; 0 CL-PPCRE::LEN)
; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF
; ==>
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX)
; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; in: DEFMETHOD CREATE-CONSTANT-REPETITION-MATCHER (REPETITION T)
; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0)
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> + AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> SB-IMPL::XSUBTRACT AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0
; (AREF CL-PPCRE::*LAST-POS-STORES* CL-PPCRE::ZERO-LENGTH-NUM) NIL)
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; (ZEROP (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> + AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> SB-IMPL::XSUBTRACT AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY.
; in: DEFMETHOD CREATE-MATCHER-AUX (REPETITION T)
; (ZEROP CL-PPCRE::MAXIMUM)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (= CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM 1)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-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 DOUBLE-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 (COMPLEX SINGLE-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 (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; (PLUSP CL-PPCRE::MIN-LEN)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (PLUSP CL-PPCRE::LEN)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (PLUSP CL-PPCRE::MIN-LEN)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (= CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM 1)
;
; 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.
; (EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM)
;
; 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 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
;
; 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 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; (PLUSP CL-PPCRE::MIN-LEN)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; (PLUSP CL-PPCRE::LEN)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; (PLUSP CL-PPCRE::MIN-LEN)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/repetition-closures-tmpRFLT88I5.fasl
; compilation finished in 0:00:00.286
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/scanner.lisp" (written 20 OCT 2024 03:56:36 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/scanner.lisp
; in: DEFUN CREATE-BMH-MATCHER
; (CL-PPCRE::BMH-MATCHER-AUX :CASE-INSENSITIVE-P T)
; --> FUNCTION IF LOOP BLOCK LET TAGBODY LOOP BLOCK LET LET TAGBODY UNLESS IF
; --> AND IF
; ==>
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::I)
; (SCHAR CL-PPCRE::PATTERN CL-PPCRE::J))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; (LENGTH CL-PPCRE::PATTERN)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (CHAR-UPCASE (SCHAR CL-PPCRE::PATTERN CL-PPCRE::K))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; (CHAR-DOWNCASE (SCHAR CL-PPCRE::PATTERN CL-PPCRE::K))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; (SEARCH CL-PPCRE::PATTERN CL-PPCRE::*STRING* :START2 CL-PPCRE::START-POS
; :END2 CL-PPCRE::*END-POS* :TEST CL-PPCRE::TEST)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN CREATE-CHAR-SEARCHER
; (CL-PPCRE::CHAR-SEARCHER-AUX :CASE-INSENSITIVE-P T)
; --> FUNCTION AND IF LOOP BLOCK LET LET TAGBODY WHEN IF SETQ THE AND IF
; ==>
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::I) CL-PPCRE::CHR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; in: DEFUN CREATE-SCANNER-AUX
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST))
; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*))
; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS))
; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #)
; (RETURN-FROM CL-PPCRE:SCAN NIL))
; CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF
; --> NOT
; ==>
; 1
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF
; --> NOT
; ==>
; 1
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST))
; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF
; --> NOT
; ==>
; 1
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST))
; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*))
; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS))
; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #)
; (RETURN-FROM CL-PPCRE:SCAN NIL))
; CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF
; --> NOT
; ==>
; 1
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST))
; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*))
; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS))
; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #)
; (RETURN-FROM CL-PPCRE:SCAN NIL))
; CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF
; --> NOT
; ==>
; 1
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET)
; (FUNCTION CL-PPCRE::END-STRING-TEST))
; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; (LOCALLY
; (DECLARE #)
; (WHEN # #)
; (LET #
; #)))))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF
; --> NOT
; ==>
; 1
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET CL-PPCRE::STARTS-WITH-LEN)
; (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST))
; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; (LOCALLY
; (DECLARE #)
; (WHEN # #)
; (LET #
; #)))))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF
; --> NOT
; ==>
; 1
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF
; --> NOT
; ==>
; 1
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF <
; ==>
; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
;
; note: 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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: forced to do 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 64) comparison (cost 6) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; etc.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; note: forced to do 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST))
; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*))
; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS))
; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #)
; (RETURN-FROM CL-PPCRE:SCAN NIL))
; CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF <
; ==>
; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
;
; note: forced to do 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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: forced to do 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 64) comparison (cost 6) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; etc.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; note: forced to do 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF <
; ==>
; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
;
; note: forced to do 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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: forced to do 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 64) comparison (cost 6) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; etc.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; note: forced to do 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST))
; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF <
; ==>
; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
;
; note: forced to do 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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: forced to do 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 64) comparison (cost 6) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; etc.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; note: forced to do 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST))
; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*))
; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS))
; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #)
; (RETURN-FROM CL-PPCRE:SCAN NIL))
; CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF <
; ==>
; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
;
; note: forced to do 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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: forced to do 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 64) comparison (cost 6) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; etc.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; note: forced to do 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST))
; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*))
; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS))
; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #)
; (RETURN-FROM CL-PPCRE:SCAN NIL))
; CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF <
; ==>
; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
;
; note: forced to do 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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: forced to do 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 64) comparison (cost 6) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; etc.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; note: forced to do 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET)
; (FUNCTION CL-PPCRE::END-STRING-TEST))
; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; (LOCALLY
; (DECLARE #)
; (WHEN # #)
; (LET #
; #)))))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF <
; ==>
; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
;
; note: forced to do 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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: forced to do 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 64) comparison (cost 6) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; etc.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; note: forced to do 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET CL-PPCRE::STARTS-WITH-LEN)
; (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST))
; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; (LOCALLY
; (DECLARE #)
; (WHEN # #)
; (LET #
; #)))))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF <
; ==>
; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
;
; note: forced to do 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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: forced to do 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 64) comparison (cost 6) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; etc.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; note: forced to do 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (FUNCALL CL-PPCRE::END-STRING-TEST CL-PPCRE::TRY-POS)
;
; note: doing signed word to integer coercion (cost 20) from TRY-POS
;
; note: doing signed word to integer coercion (cost 20) from TRY-POS
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/scanner-tmp9OPB60VM.fasl
; compilation finished in 0:00:00.516
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/api.lisp" (written 20 OCT 2024 03:56:36 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/api.lisp
; in: DEFMETHOD CREATE-SCANNER (STRING)
; (COPY-SEQ CL-PPCRE::QUOTED-REGEX-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
; in: DEFMETHOD CREATE-SCANNER (T)
; (PLUSP (CL-PPCRE::LEN CL-PPCRE::END-STRING))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (= 1 (CL-PPCRE::LEN CL-PPCRE::END-STRING))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (PLUSP (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (= 1 (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (PLUSP (CL-PPCRE::LEN CL-PPCRE::END-STRING))
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; (PLUSP (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH))
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; in: DEFMETHOD SCAN (STRING T)
; (LENGTH CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (FUNCALL (CL-PPCRE:CREATE-SCANNER CL-PPCRE::REGEX-STRING)
; (CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING CL-PPCRE::TARGET-STRING)
; CL-PPCRE::START CL-PPCRE::END)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
; SIMPLE-BASE-STRING
; NULL).
; in: DEFMETHOD SCAN #'T
; (LENGTH CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
; SIMPLE-BASE-STRING
; NULL).
; in: DEFMETHOD SCAN (T T)
; (LENGTH CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (FUNCALL (CL-PPCRE:CREATE-SCANNER CL-PPCRE::PARSE-TREE)
; (CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING CL-PPCRE::TARGET-STRING)
; CL-PPCRE::START CL-PPCRE::END)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
; SIMPLE-BASE-STRING
; NULL).
; in: DEFUN SCAN-TO-STRINGS
; (LENGTH CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (MAP 'VECTOR
; (LAMBDA (CL-PPCRE::REG-START CL-PPCRE::REG-END)
; (IF CL-PPCRE::REG-START
; (FUNCALL CL-PPCRE::SUBSTR-FN CL-PPCRE::TARGET-STRING
; CL-PPCRE::REG-START CL-PPCRE::REG-END)
; NIL))
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; --> LET PROGN UNLESS IF TYPEP
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a (NOT SB-KERNEL:EXTENDED-SEQUENCE).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a (NOT SB-KERNEL:EXTENDED-SEQUENCE).
; (FUNCALL CL-PPCRE::SUBSTR-FN CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START
; CL-PPCRE::MATCH-END)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a (NOT SB-KERNEL:EXTENDED-SEQUENCE).
; in: DEFMACRO DO-SCANS
; (DEFMACRO CL-PPCRE:DO-SCANS
; (
; (CL-PPCRE::MATCH-START
; CL-PPCRE::MATCH-END
; CL-PPCRE::REG-STARTS
; CL-PPCRE::REG-ENDS
; CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING
; &OPTIONAL
; CL-PPCRE::RESULT-FORM
; &KEY
; CL-PPCRE::START
; CL-PPCRE::END)
; &BODY CL-PPCRE::BODY &ENVIRONMENT CL-PPCRE::ENV)
; #<(SIMPLE-ARRAY CHARACTER
; (495)) Iterates over TARGET-STRING and tries to match REGEX as often as
; possible evaluating BODY with MATCH-START, MATCH-END, REG-STARTS, and
; REG-ENDS bound to the four return values of each match in turn. ... {1007A1F6AF}>
; (CL-PPCRE::WITH-REBINDING (CL-PPCRE::TARGET-STRING)
; (CL-PPCRE::WITH-UNIQUE-NAMES (CL-PPCRE::%START CL-PPCRE::%END
; CL-PPCRE::%REGEX CL-PPCRE::SCANNER)
; (DECLARE (IGNORABLE CL-PPCRE::%REGEX CL-PPCRE::SCANNER))
; `(BLOCK NIL
; (LET* #
; #
; #)))))
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: (MATCH-START MATCH-END
; REG-STARTS REG-ENDS REGEX
; TARGET-STRING &OPTIONAL
; RESULT-FORM &KEY START END)
; in: DEFMACRO DO-MATCHES
; (DEFMACRO CL-PPCRE:DO-MATCHES
; (
; (CL-PPCRE::MATCH-START
; CL-PPCRE::MATCH-END
; CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING
; &OPTIONAL
; CL-PPCRE::RESULT-FORM
; &KEY
; CL-PPCRE::START
; CL-PPCRE::END)
; &BODY CL-PPCRE::BODY)
; #<(SIMPLE-ARRAY CHARACTER
; (477)) Iterates over TARGET-STRING and tries to match REGEX as often as
; possible evaluating BODY with MATCH-START and MATCH-END bound to the
; start/end positions of each match in turn. After the last match,
; ... {1007F3552F}>
; (CL-PPCRE::WITH-UNIQUE-NAMES (CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS)
; `(CL-PPCRE:DO-SCANS (,CL-PPCRE::MATCH-START ,CL-PPCRE::MATCH-END
; ,CL-PPCRE::REG-STARTS ,CL-PPCRE::REG-ENDS
; ,CL-PPCRE::REGEX ,CL-PPCRE::TARGET-STRING
; ,CL-PPCRE::RESULT-FORM :START ,CL-PPCRE::START :END
; ,CL-PPCRE::END)
; ,@CL-PPCRE::BODY)))
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: (MATCH-START MATCH-END REGEX
; TARGET-STRING &OPTIONAL
; RESULT-FORM &KEY START END)
; in: DEFMACRO DO-MATCHES-AS-STRINGS
; (DEFMACRO CL-PPCRE:DO-MATCHES-AS-STRINGS
; (
; (CL-PPCRE::MATCH-VAR
; CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING
; &OPTIONAL
; CL-PPCRE::RESULT-FORM
; &KEY
; CL-PPCRE::START
; CL-PPCRE::END
; CL-PPCRE::SHAREDP)
; &BODY CL-PPCRE::BODY)
; #<(SIMPLE-ARRAY CHARACTER
; (569)) Iterates over TARGET-STRING and tries to match REGEX as often as
; possible evaluating BODY with MATCH-VAR bound to the substring of
; TARGET-STRING corresponding to each match in turn. After the last
; ma... {100809000F}>
; (CL-PPCRE::WITH-REBINDING (CL-PPCRE::TARGET-STRING)
; (CL-PPCRE::WITH-UNIQUE-NAMES (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END
; CL-PPCRE::SUBSTR-FN)
; `(LET (#)
; (CL-PPCRE:DO-MATCHES #
; #)))))
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: (MATCH-VAR REGEX
; TARGET-STRING &OPTIONAL
; RESULT-FORM &KEY START END
; SHAREDP)
; in: DEFMACRO DO-REGISTER-GROUPS
; (DEFMACRO CL-PPCRE:DO-REGISTER-GROUPS
; (CL-PPCRE::VAR-LIST
; (CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING
; &OPTIONAL
; CL-PPCRE::RESULT-FORM
; &KEY
; CL-PPCRE::START
; CL-PPCRE::END
; CL-PPCRE::SHAREDP)
; &BODY CL-PPCRE::BODY)
; #<(SIMPLE-ARRAY CHARACTER
; (820)) Iterates over TARGET-STRING and tries to match REGEX as often as
; possible evaluating BODY with the variables in VAR-LIST bound to the
; corresponding register groups for each match in turn, i.e. each
; va... {10082512BF}>
; (CL-PPCRE::WITH-REBINDING (CL-PPCRE::TARGET-STRING)
; (CL-PPCRE::WITH-UNIQUE-NAMES (CL-PPCRE::SUBSTR-FN CL-PPCRE::MATCH-START
; CL-PPCRE::MATCH-END CL-PPCRE::REG-STARTS
; CL-PPCRE::REG-ENDS CL-PPCRE::START-INDEX)
; `(LET (#)
; (CL-PPCRE:DO-SCANS #
; #)))))
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: (REGEX TARGET-STRING
; &OPTIONAL RESULT-FORM
; &KEY START END SHAREDP)
; in: DEFUN ALL-MATCHES
; (LENGTH CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (CL-PPCRE:DO-MATCHES (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END
; CL-PPCRE::REGEX CL-PPCRE::TARGET-STRING
; (NREVERSE CL-PPCRE::RESULT-LIST) :START CL-PPCRE::START
; :END CL-PPCRE::END)
; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::RESULT-LIST)
; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::RESULT-LIST))
; --> LET BLOCK LET* OR LET IF
; ==>
; (LENGTH #:TARGET-STRING3)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; --> LET BLOCK LET* SETQ THE CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND
; --> IF THE COERCE
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
; SIMPLE-BASE-STRING
; NULL).
; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF
; ==>
; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-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 DOUBLE-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 (COMPLEX SINGLE-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 (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
;
; 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 (NOT NULL), 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 (NOT NULL), not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFUN ALL-MATCHES-AS-STRINGS
; (LENGTH CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (CL-PPCRE:DO-MATCHES-AS-STRINGS (CL-PPCRE::MATCH CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING
; (NREVERSE CL-PPCRE::RESULT-LIST) :START
; CL-PPCRE::START :END CL-PPCRE::END :SHAREDP
; CL-PPCRE::SHAREDP)
; (PUSH CL-PPCRE::MATCH CL-PPCRE::RESULT-LIST))
; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* OR LET IF
; ==>
; (LENGTH #:TARGET-STRING7)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* SETQ THE
; --> CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND IF THE COERCE
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
; SIMPLE-BASE-STRING
; NULL).
; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* LOOP BLOCK
; --> TAGBODY PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE
; --> IF
; ==>
; (= #:MATCH-START2 #:MATCH-END3)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-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 DOUBLE-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 (COMPLEX SINGLE-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 (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
;
; 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 (NOT NULL), 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 (NOT NULL), not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* LOOP BLOCK
; --> TAGBODY PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE
; --> IF 1+
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFUN SPLIT
; (LENGTH CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (CL-PPCRE:DO-SCANS (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING NIL :START CL-PPCRE::START :END
; CL-PPCRE::END)
; (UNLESS
; (AND (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
; (= CL-PPCRE::MATCH-START (CAR CL-PPCRE::POS-LIST)))
; (WHEN
; (AND CL-PPCRE::LIMIT (PLUSP CL-PPCRE::LIMIT) (>= # CL-PPCRE::LIMIT))
; (RETURN))
; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST)
; (WHEN CL-PPCRE::WITH-REGISTERS-P
; (LOOP CL-PPCRE::FOR CL-PPCRE::REG-START CL-PPCRE::ACROSS CL-PPCRE::REG-STARTS
; CL-PPCRE::FOR CL-PPCRE::REG-END CL-PPCRE::ACROSS CL-PPCRE::REG-ENDS
; IF CL-PPCRE::REG-START
; DO ...))
; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST)))
; --> BLOCK LET* OR LET IF
; ==>
; (LENGTH #:TARGET-STRING1)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; --> BLOCK LET* SETQ THE CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND IF
; --> THE COERCE
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
; SIMPLE-BASE-STRING
; NULL).
; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-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 DOUBLE-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 (COMPLEX SINGLE-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 (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to open code because: The operands might not be the same type.
; (= CL-PPCRE::MATCH-START (CAR CL-PPCRE::POS-LIST))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-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 DOUBLE-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 (COMPLEX SINGLE-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 (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to open code because: The operands might not be the same type.
; (PLUSP CL-PPCRE::LIMIT)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
; (LOOP CL-PPCRE::FOR CL-PPCRE::REG-START CL-PPCRE::ACROSS CL-PPCRE::REG-STARTS
; CL-PPCRE::FOR CL-PPCRE::REG-END CL-PPCRE::ACROSS CL-PPCRE::REG-ENDS
; IF CL-PPCRE::REG-START
; DO ...)
; --> LET MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET LET
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET TAGBODY
; --> SB-LOOP::LOOP-DESETQ SETQ THE AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; (CL-PPCRE:DO-SCANS (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING NIL :START CL-PPCRE::START :END
; CL-PPCRE::END)
; (UNLESS
; (AND (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
; (= CL-PPCRE::MATCH-START (CAR CL-PPCRE::POS-LIST)))
; (WHEN
; (AND CL-PPCRE::LIMIT (PLUSP CL-PPCRE::LIMIT) (>= # CL-PPCRE::LIMIT))
; (RETURN))
; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST)
; (WHEN CL-PPCRE::WITH-REGISTERS-P
; (LOOP CL-PPCRE::FOR CL-PPCRE::REG-START CL-PPCRE::ACROSS CL-PPCRE::REG-STARTS
; CL-PPCRE::FOR CL-PPCRE::REG-END CL-PPCRE::ACROSS CL-PPCRE::REG-ENDS
; IF CL-PPCRE::REG-START
; DO ...))
; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST)))
; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF
; ==>
; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-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 DOUBLE-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 (COMPLEX SINGLE-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 (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to open code because: The operands might not be the same type.
; (> CL-PPCRE::THIS-END CL-PPCRE::THIS-START)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a (NOT NULL), 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 (NOT NULL), not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; (= CL-PPCRE::MATCH-START (CAR CL-PPCRE::POS-LIST))
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a NUMBER, 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 NUMBER, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; (PLUSP CL-PPCRE::LIMIT)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 64).
; etc.
; (INCF CL-PPCRE::COUNTER)
; --> THE
; ==>
; (+ 1 CL-PPCRE::COUNTER)
;
; 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 1) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (CL-PPCRE:DO-SCANS (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING NIL :START CL-PPCRE::START :END
; CL-PPCRE::END)
; (UNLESS
; (AND (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
; (= CL-PPCRE::MATCH-START (CAR CL-PPCRE::POS-LIST)))
; (WHEN
; (AND CL-PPCRE::LIMIT (PLUSP CL-PPCRE::LIMIT) (>= # CL-PPCRE::LIMIT))
; (RETURN))
; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST)
; (WHEN CL-PPCRE::WITH-REGISTERS-P
; (LOOP CL-PPCRE::FOR CL-PPCRE::REG-START CL-PPCRE::ACROSS CL-PPCRE::REG-STARTS
; CL-PPCRE::FOR CL-PPCRE::REG-END CL-PPCRE::ACROSS CL-PPCRE::REG-ENDS
; IF CL-PPCRE::REG-START
; DO ...))
; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST)))
; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF
; ==>
; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (> CL-PPCRE::THIS-END CL-PPCRE::THIS-START)
;
; 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 (NOT NULL), 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 (NOT NULL), not a DOUBLE-FLOAT.
; etc.
; in: DEFUN STRING-CASE-MODIFIER
; (CHAR CL-PPCRE::STR (1- CL-PPCRE::FROM))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (CHAR CL-PPCRE::STR CL-PPCRE::FROM)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (CHAR CL-PPCRE::STR CL-PPCRE::TO)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (CHAR CL-PPCRE::STR (1- CL-PPCRE::TO))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (CHAR CL-PPCRE::STR CL-PPCRE::INDEX)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; in: DEFMETHOD BUILD-REPLACEMENT-TEMPLATE (STRING)
; (POSITION-IF #'CL-PPCRE::DIGIT-CHAR-P CL-PPCRE::REPLACEMENT-STRING :START
; CL-PPCRE::MATCH-START :END CL-PPCRE::MATCH-END)
;
; note: unable to
; expand inline
; because:
; upgraded array element type not known at compile time
; (CHAR CL-PPCRE::REPLACEMENT-STRING (1+ CL-PPCRE::MATCH-START))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (< CL-PPCRE::FROM CL-PPCRE::MATCH-START)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The second argument is a (NOT NULL), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The second argument is a (NOT NULL), not a (UNSIGNED-BYTE 64).
; etc.
; (1-
; (PARSE-INTEGER CL-PPCRE::REPLACEMENT-STRING :START CL-PPCRE::PARSE-START
; :JUNK-ALLOWED T))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR NULL INTEGER), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (OR NULL INTEGER), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (< CL-PPCRE::TOKEN 0)
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; in: DEFUN BUILD-REPLACEMENT
; (ARRAY-DIMENSION CL-PPCRE::REG-STARTS 0)
;
; note: unable to
; optimize
; because:
; The array dimensions are unknown; must call ARRAY-DIMENSION at runtime.
; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START
; CL-PPCRE::MATCH-END)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a ARRAY, not a SIMPLE-ARRAY.
; (MAP 'LIST
; (LAMBDA (CL-PPCRE::REG-START CL-PPCRE::REG-END)
; (AND CL-PPCRE::REG-START
; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START
; CL-PPCRE::REG-END)))
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS)
;
; note: unable to open code because: can't determine sequence argument type
; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START
; CL-PPCRE::MATCH-END)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a ARRAY, not a SIMPLE-ARRAY.
; (APPLY CL-PPCRE::TOKEN
; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START
; CL-PPCRE::MATCH-END)
; (MAP 'LIST
; (LAMBDA (CL-PPCRE::REG-START CL-PPCRE::REG-END)
; (AND CL-PPCRE::REG-START
; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING
; CL-PPCRE::REG-START
; CL-PPCRE::REG-END)))
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TOKEN is not known to be a function
; (MAP 'LIST
; (LAMBDA (CL-PPCRE::REG-START CL-PPCRE::REG-END)
; (AND CL-PPCRE::REG-START
; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START
; CL-PPCRE::REG-END)))
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS)
;
; note: unable to open code because: can't determine sequence argument type
; (FUNCALL CL-PPCRE::TOKEN CL-PPCRE::TARGET-STRING CL-PPCRE::START
; CL-PPCRE::END CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TOKEN is not known to be a function
; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START
; CL-PPCRE::REG-END)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a ARRAY, not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a ARRAY, not a SIMPLE-ARRAY.
; (MAP 'LIST
; (LAMBDA (CL-PPCRE::REG-START CL-PPCRE::REG-END)
; (AND CL-PPCRE::REG-START
; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START
; CL-PPCRE::REG-END)))
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS)
; --> LET PROGN UNLESS IF TYPEP
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a (NOT SB-KERNEL:EXTENDED-SEQUENCE).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a (NOT SB-KERNEL:EXTENDED-SEQUENCE).
; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START
; CL-PPCRE::REG-END)
;
; 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 (NOT NULL), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a (NOT NULL), not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
;
; 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 (NOT NULL), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a (NOT NULL), not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; (>= CL-PPCRE::TOKEN CL-PPCRE::REG-BOUND)
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (1+ CL-PPCRE::TOKEN)
;
; note: forced to do 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 1) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START
; CL-PPCRE::MATCH-END)
;
; 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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
;
; 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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
; in: DEFUN REGEX-REPLACE
; (LENGTH CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (SUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::START CL-PPCRE::END)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
; in: DEFUN REGEX-REPLACE-ALL
; (LENGTH CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (CL-PPCRE:DO-SCANS (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING NIL :START CL-PPCRE::START :END
; CL-PPCRE::END)
; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST)
; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST)
; (PUSH CL-PPCRE::REG-STARTS CL-PPCRE::REG-LIST)
; (PUSH CL-PPCRE::REG-ENDS CL-PPCRE::REG-LIST))
; --> BLOCK LET* OR LET IF
; ==>
; (LENGTH #:TARGET-STRING1)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; --> BLOCK LET* SETQ THE CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND IF
; --> THE COERCE
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
; SIMPLE-BASE-STRING
; NULL).
; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF
; ==>
; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-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 DOUBLE-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 (COMPLEX SINGLE-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 (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to open code because: The operands might not be the same type.
; (SUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::START CL-PPCRE::END)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
; (CL-PPCRE:DO-SCANS (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING NIL :START CL-PPCRE::START :END
; CL-PPCRE::END)
; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST)
; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST)
; (PUSH CL-PPCRE::REG-STARTS CL-PPCRE::REG-LIST)
; (PUSH CL-PPCRE::REG-ENDS CL-PPCRE::REG-LIST))
; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF
; ==>
; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a (NOT NULL), 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 (NOT NULL), not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFUN REGEX-APROPOS-LIST
; (DEFUN CL-PPCRE:REGEX-APROPOS-LIST
; (CL-PPCRE::REGEX
; &OPTIONAL CL-PPCRE::PACKAGES
; &KEY (CL-PPCRE::CASE-INSENSITIVE T))
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; #<(SIMPLE-ARRAY CHARACTER
; (221)) Similar to the standard function APROPOS-LIST but returns a list of
; all symbols which match the regular expression REGEX. If
; CASE-INSENSITIVE is true and REGEX isn't already a scanner, a
; case-insensi... {100A77519F}>
; (LET ((CL-PPCRE::COLLECTOR 'NIL))
; (CL-PPCRE::REGEX-APROPOS-AUX (CL-PPCRE::REGEX CL-PPCRE::PACKAGES
; CL-PPCRE::CASE-INSENSITIVE
; CL-PPCRE::COLLECTOR)
; (PUSH SYMBOL CL-PPCRE::COLLECTOR))))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL-PPCRE:REGEX-APROPOS-LIST
; (CL-PPCRE::REGEX &OPTIONAL CL-PPCRE::PACKAGES &KEY
; (CL-PPCRE::CASE-INSENSITIVE T))
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; #<(SIMPLE-ARRAY CHARACTER
; (221)) Similar to the standard function APROPOS-LIST but returns a list of
; all symbols which match the regular expression REGEX. If
; CASE-INSENSITIVE is true and REGEX isn't already a scanner, a
; case-insensi... {100A77519F}>
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (BLOCK CL-PPCRE:REGEX-APROPOS-LIST
; (LET ((CL-PPCRE::COLLECTOR 'NIL))
; (CL-PPCRE::REGEX-APROPOS-AUX (CL-PPCRE::REGEX CL-PPCRE::PACKAGES
; CL-PPCRE::CASE-INSENSITIVE
; CL-PPCRE::COLLECTOR)
; (PUSH SYMBOL CL-PPCRE::COLLECTOR)))))
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: (REGEX &OPTIONAL PACKAGES
; &KEY
; (CASE-INSENSITIVE T))
; in: DEFUN REGEX-APROPOS
; (DEFUN CL-PPCRE:REGEX-APROPOS
; (CL-PPCRE::REGEX
; &OPTIONAL CL-PPCRE::PACKAGES
; &KEY (CL-PPCRE::CASE-INSENSITIVE T))
; #<(SIMPLE-ARRAY CHARACTER
; (216)) Similar to the standard function APROPOS but returns a list of all
; symbols which match the regular expression REGEX. If CASE-INSENSITIVE
; is true and REGEX isn't already a scanner, a case-insensitive ... {100ACE0FBF}>
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (CL-PPCRE::REGEX-APROPOS-AUX (CL-PPCRE::REGEX CL-PPCRE::PACKAGES
; CL-PPCRE::CASE-INSENSITIVE)
; (CL-PPCRE::PRINT-SYMBOL-INFO SYMBOL))
; (VALUES))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL-PPCRE:REGEX-APROPOS
; (CL-PPCRE::REGEX &OPTIONAL CL-PPCRE::PACKAGES &KEY
; (CL-PPCRE::CASE-INSENSITIVE T))
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; #<(SIMPLE-ARRAY CHARACTER
; (216)) Similar to the standard function APROPOS but returns a list of all
; symbols which match the regular expression REGEX. If CASE-INSENSITIVE
; is true and REGEX isn't already a scanner, a case-insensitive ... {100ACE0FBF}>
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (BLOCK CL-PPCRE:REGEX-APROPOS
; (CL-PPCRE::REGEX-APROPOS-AUX (CL-PPCRE::REGEX CL-PPCRE::PACKAGES
; CL-PPCRE::CASE-INSENSITIVE)
; (CL-PPCRE::PRINT-SYMBOL-INFO SYMBOL))
; (VALUES)))
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: (REGEX &OPTIONAL PACKAGES
; &KEY
; (CASE-INSENSITIVE T))
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/api-tmpSVDN4TBO.fasl
; compilation finished in 0:00:00.296
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/parse-number/parse-number.lisp" (written 20 OCT 2024 03:57:32 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/parse-number/parse-number.lisp
; in: DEFUN PARSE-INTEGER-AND-PLACES
; (CHAR STRING ORG.MAPCAR.PARSE-NUMBER::POS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (CONS INTEGER ORG.MAPCAR.PARSE-NUMBER::RELEVANT-DIGITS)
;
; note: doing signed word to integer coercion (cost 20), for:
; the second argument of LIST
; in: DEFUN PARSE-INTEGERS
; (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
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (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
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (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: 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
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/parse-number/parse-number-tmpF5QPE831.fasl
; compilation finished in 0:00:00.123
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-colors2/package.lisp" (written 20 OCT 2024 03:56:27 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-colors2/package-tmpLAAFHLHW.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-colors2/colors.lisp" (written 20 OCT 2024 03:56:27 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-colors2/colors.lisp
; in: DEFINE-COMPILER-MACRO AS-RGB
; (DEFINE-COMPILER-MACRO CL-COLORS2:AS-RGB
; (&WHOLE CL-COLORS2::FORM CL-COLORS2::COLOR &KEY CL-COLORS2::COLORS-LIST
; CL-COLORS2::ERRORP)
; (DECLARE (NOTINLINE CL-COLORS2:AS-RGB))
; (IF (AND (CONSTANTP CL-COLORS2::COLOR) (NOT CL-COLORS2::COLORS-LIST))
; (LET ((CL-COLORS2::RESULTS #))
; (OR CL-COLORS2::RESULTS CL-COLORS2::FORM))
; CL-COLORS2::FORM))
; --> EVAL-WHEN
; ==>
; (SB-C::%DEFINE-COMPILER-MACRO 'CL-COLORS2:AS-RGB
; (SB-INT:NAMED-LAMBDA (COMPILER-MACRO
; CL-COLORS2:AS-RGB)
; (#:EXPR #:ENV &AUX
; (CL-COLORS2::FORM #:EXPR))
; (DECLARE
; (SB-C::LAMBDA-LIST
; (CL-COLORS2::COLOR &KEY
; CL-COLORS2::COLORS-LIST
; CL-COLORS2::ERRORP)))
; (DECLARE (IGNORE #:ENV))
; (SB-INT:NAMED-DS-BIND (:MACRO
; CL-COLORS2:AS-RGB
; . DEFINE-COMPILER-MACRO)
; (CL-COLORS2::COLOR &KEY
; CL-COLORS2::COLORS-LIST
; CL-COLORS2::ERRORP)
; (SB-C::COMPILER-MACRO-ARGS #:EXPR)
; (DECLARE
; (SB-C::CONSTANT-VALUE CL-COLORS2::COLOR
; CL-COLORS2::COLORS-LIST
; CL-COLORS2::ERRORP)
; (SB-C::NO-COMPILER-MACRO
; CL-COLORS2:AS-RGB))
; (DECLARE (NOTINLINE CL-COLORS2:AS-RGB))
; (BLOCK CL-COLORS2:AS-RGB
; (IF #
; #
; CL-COLORS2::FORM)))))
;
; caught STYLE-WARNING:
; 2 calls to CL-COLORS2:AS-RGB were compiled before a compiler-macro was defined
; for it. A declaration of NOTINLINE at the call sites will eliminate this
; warning, as will defining the compiler-macro before its first potential use.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-colors2/colors-tmpBYA9SD1Y.fasl
; compilation finished in 0:00:00.396
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-colors2/colornames-x11.lisp" (written 20 OCT 2024 03:56:27 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-colors2/colornames-x11-tmpFLAO1CYQ.fasl
; compilation finished in 0:00:00.260
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-colors2/colornames-svg.lisp" (written 20 OCT 2024 03:56:27 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-colors2/colornames-svg-tmpSKUEHB49.fasl
; compilation finished in 0:00:00.060
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-colors2/colornames-gdk.lisp" (written 20 OCT 2024 03:56:27 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-colors2/colornames-gdk-tmpDHXMA9ET.fasl
; compilation finished in 0:00:00.103
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-colors2/hexcolors.lisp" (written 20 OCT 2024 03:56:27 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-colors2/hexcolors-tmpXPODQDBQ.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-colors2/print.lisp" (written 20 OCT 2024 03:56:27 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-colors2/print-tmpON3EBOWQ.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/usocket/package.lisp" (written 20 OCT 2024 03:57:59 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/usocket/package-tmp5DE7FWXL.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/usocket/usocket.lisp" (written 20 OCT 2024 03:57:59 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/usocket/usocket-tmpNR0FXTOU.fasl
; compilation finished in 0:00:00.193
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/usocket/condition.lisp" (written 20 OCT 2024 03:57:59 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/usocket/condition-tmpIS216RW.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/usocket/backend/sbcl.lisp" (written 20 OCT 2024 03:57:59 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/usocket/backend/sbcl-tmp11752V0C.fasl
; compilation finished in 0:00:00.103
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/usocket/option.lisp" (written 20 OCT 2024 03:57:59 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/usocket/option-tmpONM4L97G.fasl
; compilation finished in 0:00:00.043
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/trivial-gray-streams/package.lisp" (written 20 OCT 2024 03:57:54 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/trivial-gray-streams/package-tmpR4BLTE1D.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/trivial-gray-streams/streams.lisp" (written 20 OCT 2024 03:57:54 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/trivial-gray-streams/streams-tmpONQ4LJWF.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/packages.lisp" (written 20 OCT 2024 03:56:58 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/packages-tmpFPHBYJPO.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/mapping.lisp" (written 20 OCT 2024 03:56:58 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/mapping-tmpXKL3NHA4.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/ascii.lisp" (written 20 OCT 2024 03:56:58 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/ascii-tmp3KKXCXYY.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/koi8-r.lisp" (written 20 OCT 2024 03:56:58 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/koi8-r-tmpVACGDARV.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/iso-8859.lisp" (written 20 OCT 2024 03:56:58 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/iso-8859-tmpYII9B406.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/enc-cn-tbl.lisp" (written 20 OCT 2024 03:56:58 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/enc-cn-tbl-tmpA2CNLB7.fasl
; compilation finished in 0:00:00.100
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/code-pages.lisp" (written 20 OCT 2024 03:56:58 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/code-pages-tmpG5J7KPU1.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/specials.lisp" (written 20 OCT 2024 03:56:58 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/specials-tmp981UY8DC.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/util.lisp" (written 20 OCT 2024 03:56:58 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/flexi-streams/util.lisp
; in: DEFUN MAKE-OCTET-BUFFER
; (MAKE-ARRAY FLEXI-STREAMS::SIZE :ELEMENT-TYPE 'FLEXI-STREAMS:OCTET)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; in: DEFUN GET-MULTIBYTE-MAPPER
; (AREF FLEXI-STREAMS::TABLE FLEXI-STREAMS::M 0)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
; (AREF FLEXI-STREAMS::TABLE FLEXI-STREAMS::M 1)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/util-tmpZ1XIHDCA.fasl
; compilation finished in 0:00:00.076
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/conditions.lisp" (written 20 OCT 2024 03:56:58 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/conditions-tmpSXW96VDS.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/external-format.lisp" (written 20 OCT 2024 03:56:58 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/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 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/external-format-tmpJOZ4RWJ2.fasl
; compilation finished in 0:00:00.143
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/length.lisp" (written 20 OCT 2024 03:56:58 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/flexi-streams/length.lisp
; in: DEFMETHOD ENCODING-FACTOR (FLEXI-CRLF-MIXIN)
; (* 1.02d0 (CALL-NEXT-METHOD))
;
; 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 &OPTIONAL).
; 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)
; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS :AROUND (T LIST T T)
; (COERCE LIST 'VECTOR)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a LIST, not a (OR NULL (SIMPLE-ARRAY * (*))).
; 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 ""
; 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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-STRING.
;
; note: unable to open code because: The operands might not be the same type.
; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-UTF-8-FORMAT T T T)
; (AREF SEQUENCE FLEXI-STREAMS::I)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-8-FORMAT T T T)
; (AREF SEQUENCE FLEXI-STREAMS::I)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; 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)
; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-UTF-16-LE-FORMAT T T T)
; (AREF SEQUENCE (1+ FLEXI-STREAMS::I))
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-UTF-16-BE-FORMAT T T T)
; (AREF SEQUENCE FLEXI-STREAMS::I)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; in:
; DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-16-LE-FORMAT T T T)
; (AREF SEQUENCE (1+ FLEXI-STREAMS::I))
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; (AREF SEQUENCE FLEXI-STREAMS::I)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; in:
; DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-16-BE-FORMAT T T T)
; (AREF SEQUENCE FLEXI-STREAMS::I)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; (AREF SEQUENCE (1+ FLEXI-STREAMS::I))
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-GBK-FORMAT T T T)
; (AREF SEQUENCE FLEXI-STREAMS::I)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-GBK-FORMAT T T T)
; (AREF SEQUENCE FLEXI-STREAMS::I)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; 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)
; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-UTF-32-FORMAT T T T)
; (CEILING (- FLEXI-STREAMS::END FLEXI-STREAMS::START) 4)
;
; note: forced to do +/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -9223372036854775804 9223372036854775810)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES
; (INTEGER -9223372036854775804 9223372036854775810)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; in:
; DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-32-LE-FORMAT T T T)
; (AREF SEQUENCE FLEXI-STREAMS::J)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; (= FLEXI-STREAMS:OCTET (AREF SEQUENCE FLEXI-STREAMS::J))
;
; note: unable to open code because: The operands might not be the same type.
; (CEILING (- FLEXI-STREAMS::END FLEXI-STREAMS::START) 4)
;
; note: forced to do +/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -9223372036854775804 9223372036854775810)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES
; (INTEGER -9223372036854775804 9223372036854775810)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (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 2) because:
; The first argument is a (INTEGER * 2305843009213693952), not a FIXNUM.
; The result is a (VALUES (INTEGER * 2305843009213693951) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER * 2305843009213693952), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES (INTEGER * 2305843009213693951) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; in:
; DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-32-BE-FORMAT T T T)
; (AREF SEQUENCE FLEXI-STREAMS::J)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; (= FLEXI-STREAMS:OCTET (AREF SEQUENCE FLEXI-STREAMS::J))
;
; note: unable to open code because: The operands might not be the same type.
; (CEILING (- FLEXI-STREAMS::END FLEXI-STREAMS::START) 4)
;
; note: forced to do +/SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -9223372036854775804 9223372036854775810)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES
; (INTEGER -9223372036854775804 9223372036854775810)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (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 2) because:
; The first argument is a (INTEGER * 2305843009213693952), not a FIXNUM.
; The result is a (VALUES (INTEGER * 2305843009213693951) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER * 2305843009213693952), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES (INTEGER * 2305843009213693951) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS :AROUND (T LIST T T)
; (COERCE LIST 'FLEXI-STREAMS::STRING*)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a LIST, not a (OR NULL (SIMPLE-ARRAY * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a LIST, not a (OR SIMPLE-BASE-STRING NULL).
; 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 ""
; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-GBK-FORMAT T T T)
; (CHAR STRING FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-CRLF-GBK-FORMAT T T T)
; (CHAR STRING FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-UTF-8-FORMAT T T T)
; (CHAR STRING FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-CRLF-UTF-8-FORMAT T T T)
; (CHAR STRING FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-UTF-16-FORMAT T T T)
; (CHAR STRING FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; in:
; DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-CRLF-UTF-16-LE-FORMAT T T T)
; (CHAR STRING FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; in:
; DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-CRLF-UTF-16-BE-FORMAT T T T)
; (CHAR STRING FLEXI-STREAMS::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-UTF-32-FORMAT T T T)
; (* 4 (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
;
; note: forced to do */SIGNED=>INTEGER (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (OR (INTEGER -36893488147419103228 -4) (INTEGER 0 0)
; (INTEGER 4 36893488147419103228))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES
; (OR (INTEGER -36893488147419103228 -4) (INTEGER 0 0)
; (INTEGER 4 36893488147419103228))
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; 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: 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; 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: 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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/length-tmpBECHKCQ0.fasl
; compilation finished in 0:00:00.133
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/encode.lisp" (written 20 OCT 2024 03:56:58 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/flexi-streams/encode.lisp
; in: DEFMETHOD STRING-TO-OCTETS* :AROUND (T LIST T T)
; (COERCE LIST 'FLEXI-STREAMS::STRING*)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a LIST, not a (OR NULL (SIMPLE-ARRAY * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a LIST, not a (OR SIMPLE-BASE-STRING NULL).
; in:
; DEFINE-CHAR-ENCODERS (FLEXI-LATIN-1-FORMAT FLEXI-CR-LATIN-1-FORMAT
; FLEXI-CRLF-LATIN-1-FORMAT)
; (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 LET MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (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
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (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
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), not a SIMPLE-ARRAY.
; (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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), not a SIMPLE-ARRAY.
; (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
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; due to type uncertainty:
; The first argument is a STRING, 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 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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 COND IF 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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF 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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET CHAR-CODE LET
; --> FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF 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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 COND IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
; --> FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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)
; in:
; DEFINE-CHAR-ENCODERS (FLEXI-ASCII-FORMAT FLEXI-CR-ASCII-FORMAT
; FLEXI-CRLF-ASCII-FORMAT)
; (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 LET MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (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
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (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
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), not a SIMPLE-ARRAY.
; (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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), not a SIMPLE-ARRAY.
; (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
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; due to type uncertainty:
; The first argument is a STRING, 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 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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 COND IF 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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF 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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET CHAR-CODE LET
; --> FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF 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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 COND IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
; --> FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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)
; in:
; DEFINE-CHAR-ENCODERS (FLEXI-8-BIT-FORMAT FLEXI-CR-8-BIT-FORMAT
; FLEXI-CRLF-8-BIT-FORMAT)
; (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 LET MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (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
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (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
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), not a SIMPLE-ARRAY.
; (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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), not a SIMPLE-ARRAY.
; (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
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; due to type uncertainty:
; The first argument is a STRING, 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 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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 COND IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY WITH-ACCESSORS LET
; --> SYMBOL-MACROLET LET GETHASH
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF 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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY WITH-ACCESSORS LET
; --> SYMBOL-MACROLET LET GETHASH
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF 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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 COND IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
; --> FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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)
; in:
; DEFINE-CHAR-ENCODERS (FLEXI-UTF-8-FORMAT FLEXI-CR-UTF-8-FORMAT
; FLEXI-CRLF-UTF-8-FORMAT)
; (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 LET MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; --> AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), not a SIMPLE-ARRAY.
; (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
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 COND IF 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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET CHAR-CODE LET
; --> FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 COND IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
; --> FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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)
; in:
; DEFINE-CHAR-ENCODERS (FLEXI-UTF-16-LE-FORMAT FLEXI-CR-UTF-16-LE-FORMAT
; FLEXI-CRLF-UTF-16-LE-FORMAT)
; (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 LET MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; --> AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), not a SIMPLE-ARRAY.
; (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
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 COND IF 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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF 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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 COND IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
; --> FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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)
; in:
; DEFINE-CHAR-ENCODERS (FLEXI-UTF-16-BE-FORMAT FLEXI-CR-UTF-16-BE-FORMAT
; FLEXI-CRLF-UTF-16-BE-FORMAT)
; (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 LET MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; --> AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), not a SIMPLE-ARRAY.
; (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
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 COND IF 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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF 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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 COND IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
; --> FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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)
; in:
; DEFINE-CHAR-ENCODERS (FLEXI-GBK-FORMAT FLEXI-CR-GBK-FORMAT
; FLEXI-CRLF-GBK-FORMAT)
; (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 MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (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
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (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
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), not a SIMPLE-ARRAY.
; (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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), not a SIMPLE-ARRAY.
; (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
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; due to type uncertainty:
; The first argument is a STRING, 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 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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 COND IF 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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF 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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET CHAR-CODE LET
; --> FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF 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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 COND IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
; --> FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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)
; in:
; DEFINE-CHAR-ENCODERS (FLEXI-UTF-32-LE-FORMAT FLEXI-CR-UTF-32-LE-FORMAT
; FLEXI-CRLF-UTF-32-LE-FORMAT)
; (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 LET MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; --> AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), not a SIMPLE-ARRAY.
; (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
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 COND IF 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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET CHAR-CODE LET
; --> FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 COND IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
; --> FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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)
; in:
; DEFINE-CHAR-ENCODERS (FLEXI-UTF-32-BE-FORMAT FLEXI-CR-UTF-32-BE-FORMAT
; FLEXI-CRLF-UTF-32-BE-FORMAT)
; (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 LET MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
; --> CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; --> AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), not a SIMPLE-ARRAY.
; (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
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 COND IF 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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET CHAR-CODE LET
; --> FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-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
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 COND IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
; --> FLEXI-STREAMS::CHAR-GETTER CHAR
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, 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*
; --> MACROLET LABELS MACROLET ETYPECASE COND IF IF FLEXI-STREAMS::ITERATE LOOP
; --> BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
; --> FLEXI-STREAMS::CHAR-GETTER AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR), 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*
; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
; ==>
; 1
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a LIST.
;
; note: unable to
; expand inline
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a (OR NULL VECTOR).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST VECTOR), not a BIT-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* 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 -9223372036854775807
; 9223372036854775807), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -9223372036854775807
; 9223372036854775807), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/encode-tmpOYQY6WIA.fasl
; compilation finished in 0:00:01.210
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/decode.lisp" (written 20 OCT 2024 03:56:58 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/flexi-streams/decode.lisp
; in: DEFMETHOD OCTETS-TO-STRING* :AROUND (T LIST T T)
; (COERCE LIST 'VECTOR)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a LIST, not a (OR NULL (SIMPLE-ARRAY * (*))).
; 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
; --> IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF IF 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF IF IF 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 COND IF 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF IF 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF IF IF 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 COND IF IF IF 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF IF 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF 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.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; 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
; --> IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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
; optimize
; 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.
; (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 COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP BLOCK
; --> TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET WHEN
; --> IF AND IF OR LET IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF IF IF FLEXI-STREAMS::ITERATE FLET LOOP
; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
; --> WHEN IF AND IF OR LET IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF FLEXI-STREAMS::ITERATE FLET LOOP BLOCK
; --> TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET WHEN
; --> IF AND IF OR LET IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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
; optimize
; 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.
; (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 COND IF IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF IF IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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
; optimize
; 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.
; (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 COND IF IF IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; 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
; --> IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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
; optimize
; 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.
; (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 COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP BLOCK
; --> TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET WHEN
; --> IF AND IF OR LET IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF IF IF FLEXI-STREAMS::ITERATE FLET LOOP
; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
; --> WHEN IF AND IF OR LET IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF FLEXI-STREAMS::ITERATE FLET LOOP BLOCK
; --> TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET WHEN
; --> IF AND IF OR LET IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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
; optimize
; 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.
; (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 COND IF IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF IF IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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
; optimize
; 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.
; (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 COND IF IF IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; 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
; --> IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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
; optimize
; 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
; optimize
; 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
; optimize
; 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 COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP BLOCK
; --> TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET WHEN
; --> IF AND IF OR LET IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF IF IF FLEXI-STREAMS::ITERATE FLET LOOP
; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
; --> WHEN IF AND IF OR LET IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF FLEXI-STREAMS::ITERATE FLET LOOP BLOCK
; --> TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET WHEN
; --> IF AND IF OR LET IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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
; optimize
; 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
; optimize
; 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
; optimize
; 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 COND IF IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF IF IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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
; optimize
; 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
; optimize
; 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
; optimize
; 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 COND IF IF IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; 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-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
; optimize
; 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
; optimize
; 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
; optimize
; 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
; optimize
; 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
; optimize
; 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
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; --> 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
; optimize
; 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
; optimize
; 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
; optimize
; 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
; optimize
; 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
; optimize
; 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
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; --> 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
; optimize
; 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
; optimize
; 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
; optimize
; 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
; optimize
; 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
; optimize
; 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
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; 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-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
; optimize
; 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
; optimize
; 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
; optimize
; 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
; optimize
; 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
; optimize
; 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
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; --> 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
; optimize
; 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
; optimize
; 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
; optimize
; 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
; optimize
; 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
; optimize
; 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
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; --> 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
; optimize
; 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
; optimize
; 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
; optimize
; 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
; optimize
; 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
; optimize
; 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
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; 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
; --> IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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.
; (FLEXI-STREAMS::NEXT-BYTE 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.
; (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.
; (FLEXI-STREAMS::NEXT-BYTE 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.
; (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.
; (FLEXI-STREAMS::NEXT-BYTE 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.
; (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 COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP BLOCK
; --> TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET WHEN
; --> IF AND IF OR LET IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF IF IF FLEXI-STREAMS::ITERATE FLET LOOP
; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
; --> WHEN IF AND IF OR LET IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF FLEXI-STREAMS::ITERATE FLET LOOP BLOCK
; --> TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET WHEN
; --> IF AND IF OR LET IF
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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.
; (FLEXI-STREAMS::NEXT-BYTE 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.
; (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.
; (FLEXI-STREAMS::NEXT-BYTE 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.
; (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.
; (FLEXI-STREAMS::NEXT-BYTE 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.
; (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 COND IF IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF IF IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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.
; (FLEXI-STREAMS::NEXT-BYTE 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.
; (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.
; (FLEXI-STREAMS::NEXT-BYTE 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.
; (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.
; (FLEXI-STREAMS::NEXT-BYTE 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.
; (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 COND IF IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF IF IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
; --> FLET MACROLET ETYPECASE COND IF 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
; ==>
; (> #:CHAR-CODE0 1114111)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; (FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 LET* LOOP BLOCK LET TAGBODY SETF
; --> SB-KERNEL:%SCHARSET
; ==>
; 1
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; 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
; ==>
; (+ #:SUM21 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; 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
; optimize
; 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.
; (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
; ==>
; (+ #:SUM146 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; ==>
; (+ #:SUM163 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; ==>
; (+ #:SUM126 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 ...)
;
; 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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; 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
; optimize
; 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.
; (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
; ==>
; (+ #:SUM459 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; ==>
; (+ #:SUM476 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; ==>
; (+ #:SUM439 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 ...)
;
; 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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; 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
; optimize
; 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.
; (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
; ==>
; (+ #:SUM787 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; ==>
; (+ #:SUM750 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; ==>
; (+ #:SUM770 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 ...)
;
; 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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; 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 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; 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
; ==>
; (+ #:SUM21 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; 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
; optimize
; 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.
; (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
; ==>
; (+ #:SUM146 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; ==>
; (+ #:SUM163 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; ==>
; (+ #:SUM126 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 ...)
;
; 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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; 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
; optimize
; 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.
; (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
; ==>
; (+ #:SUM459 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; ==>
; (+ #:SUM476 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; ==>
; (+ #:SUM439 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 ...)
;
; 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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; 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
; optimize
; 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.
; (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
; ==>
; (+ #:SUM770 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; ==>
; (+ #:SUM787 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; ==>
; (+ #:SUM750 (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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; (FLEXI-STREAMS::READ-NEXT-BYTE)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, 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 ...)
;
; 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
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; 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 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/decode-tmp50O9T7IY.fasl
; compilation finished in 0:00:02.973
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/in-memory.lisp" (written 20 OCT 2024 03:56:58 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/flexi-streams/in-memory.lisp
; in: DEFMETHOD PEEK-BYTE (VECTOR-INPUT-STREAM)
; (= BYTE FLEXI-STREAMS::PEEK-TYPE)
;
; note: unable to open code because: The operands might not be the same type.
; (PLUSP BYTE)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; (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 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFMETHOD PEEK-BYTE (LIST-INPUT-STREAM)
; (= BYTE FLEXI-STREAMS::PEEK-TYPE)
;
; note: unable to open code because: The operands might not be the same type.
; (PLUSP BYTE)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; 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
; 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.
; in: DEFMETHOD STREAM-READ-BYTE (VECTOR-INPUT-STREAM)
; (AREF VECTOR FLEXI-STREAMS::CURRENT-INDEX)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; in: DEFMETHOD STREAM-READ-SEQUENCE (VECTOR-INPUT-STREAM T T T)
; (AREF VECTOR FLEXI-STREAMS::VECTOR-INDEX)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; (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.
; in: DEFMETHOD STREAM-WRITE-BYTE (VECTOR-OUTPUT-STREAM T)
; (VECTOR-PUSH-EXTEND (FLEXI-STREAMS::TRANSFORM-OCTET STREAM BYTE) VECTOR)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; 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.
; (VECTOR-PUSH-EXTEND
; (FLEXI-STREAMS::TRANSFORM-OCTET STREAM (ELT SEQUENCE FLEXI-STREAMS::INDEX))
; VECTOR)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; in: DEFMETHOD (SETF STREAM-FILE-POSITION) (T VECTOR-INPUT-STREAM)
; (<= 0 FLEXI-STREAMS::POSITION-SPEC FLEXI-STREAMS::END)
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; 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.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/in-memory-tmpGZL21UBE.fasl
; compilation finished in 0:00:00.100
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/stream.lisp" (written 20 OCT 2024 03:56:58 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/stream-tmpAKRW6QK6.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/output.lisp" (written 20 OCT 2024 03:56:58 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/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 #:G913)))
;
; note: 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 &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; 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 /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/output-tmp8J071LEX.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/input.lisp" (written 20 OCT 2024 03:56:58 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/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 64) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a (OR NULL INTEGER), not a (UNSIGNED-BYTE 64).
; etc.
; (INCF POSITION)
; ==>
; (+ 1 (THE INTEGER (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G1214)))
;
; note: 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 &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; 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 64) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a (OR NULL INTEGER), not a (UNSIGNED-BYTE 64).
; etc.
; in: DEFUN UNREAD-CHAR%
; (DECF POSITION FLEXI-STREAMS::COUNTER)
; --> 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 T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFMETHOD STREAM-READ-CHAR (FLEXI-INPUT-STREAM)
; (OR (CODE-CHAR CHAR-CODE) CHAR-CODE)
; --> IF
; ==>
; CHAR-CODE
;
; note: deleting unreachable code
; in: DEFMETHOD STREAM-READ-SEQUENCE (FLEXI-INPUT-STREAM T T T)
; (MIN FLEXI-STREAMS::END
; (+ FLEXI-STREAMS::START (- FLEXI-STREAMS::BOUND POSITION)))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 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 (OR LIST
; (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; * (*))).
; The second argument is a SEQUENCE, not a (OR NULL (SIMPLE-ARRAY * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
; SIMPLE-BASE-STRING
; NULL).
; The second argument is a SEQUENCE, not a (OR NULL
; (SIMPLE-ARRAY CHARACTER (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; CHARACTER
; (*))).
; The second argument is a SEQUENCE, not a (OR SIMPLE-BASE-STRING NULL).
; (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 (OR LIST
; (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER))
; VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST.
; (- 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 &OPTIONAL).
; 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
; &OPTIONAL).
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -4611686018427387904 4611686018427387902), not a (UNSIGNED-BYTE
; 64).
; The second argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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 first argument is a NUMBER, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -4611686018427387903
; 4611686018427387903), not a (UNSIGNED-BYTE 64).
; etc.
; (INCF POSITION (- FLEXI-STREAMS::INDEX FLEXI-STREAMS::START))
; ==>
; (+ (- FLEXI-STREAMS::INDEX FLEXI-STREAMS::START)
; (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G2852))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -4611686018427387902 4611721202799476735), not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -4611686018427387902 4611721202799476735), not a (UNSIGNED-BYTE
; 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: doing signed word to integer coercion (cost 20)
; in: DEFMETHOD STREAM-UNREAD-CHAR (FLEXI-INPUT-STREAM T)
; (= (CHAR-CODE CHAR) FLEXI-STREAMS::LAST-CHAR-CODE)
;
; note: unable to open code because: The operands might not be the same type.
; in: DEFMETHOD UNREAD-BYTE (T FLEXI-INPUT-STREAM)
; (= BYTE FLEXI-STREAMS::LAST-OCTET)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-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 DOUBLE-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 (COMPLEX SINGLE-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 (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
;
; 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 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFMETHOD PEEK-BYTE (FLEXI-INPUT-STREAM)
; (= FLEXI-STREAMS:OCTET FLEXI-STREAMS::PEEK-TYPE)
;
; note: unable to open code because: The operands might not be the same type.
; (PLUSP FLEXI-STREAMS:OCTET)
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/input-tmp9EISPCFY.fasl
; compilation finished in 0:00:00.053
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/io.lisp" (written 20 OCT 2024 03:56:58 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/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.
; in: DEFMETHOD WRITE-BYTE* :AFTER (T FLEXI-IO-STREAM)
; (INCF POSITION)
; ==>
; (+ 1 (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G79))
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/io-tmpRZ31FVZM.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/strings.lisp" (written 20 OCT 2024 03:56:58 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/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.
; in: DEFUN OCTETS-TO-STRING
; (LENGTH SEQUENCE)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN OCTET-LENGTH
; (LENGTH STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN CHAR-LENGTH
; (LENGTH SEQUENCE)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/flexi-streams/strings-tmpT7RFXS2O.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/puri/src.lisp" (written 20 OCT 2024 03:57:36 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/puri/src.lisp
; in: DEFMETHOD POSITION-CHAR (T STRING T T)
; (CHAR STRING PURI::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; in: DEFUN PARSE-URI
; (PLUSP PURI::PORT)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
; (STRING= "" PURI::PATH)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (STRING= "/" PURI::PATH)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (PLUSP PURI::PORT)
;
; 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 64) comparison (cost 6) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; etc.
; in: DEFUN PARSE-URI-STRING
; (LENGTH STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (CHAR STRING PURI::START)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (SUBSEQ STRING PURI::SINDEX PURI::START)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
; in: DEFUN ESCAPE-P
; (LENGTH STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (CHAR STRING PURI::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; in: DEFUN PARSE-PATH
; (STRING= "" (CAR PURI::XPATH-LIST))
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (STRING= "" (CAR PURI::PL))
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; in: DEFUN DECODE-ESCAPED-ENCODING
; (LENGTH STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (COPY-SEQ STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
; (CHAR STRING PURI::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (CHAR STRING (INCF PURI::I))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; in: DEFUN RENDER-URI
; (CONCATENATE 'STRING
; (WHEN PURI::SCHEME
; (PURI::ENCODE-ESCAPED-ENCODING
; (STRING-DOWNCASE (SYMBOL-NAME PURI::SCHEME))
; PURI::*RESERVED-CHARACTERS* PURI::ESCAPE))
; (WHEN PURI::SCHEME ":")
; (WHEN (OR PURI::HOST (EQ :FILE PURI::SCHEME)) "//")
; (WHEN PURI::IS-IP6 "[")
; (WHEN PURI::HOST
; (PURI::ENCODE-ESCAPED-ENCODING PURI::HOST
; PURI::*RESERVED-AUTHORITY-CHARACTERS* PURI::ESCAPE))
; (WHEN PURI::IS-IP6 "]") (WHEN PURI::PORT ":")
; (WHEN PURI::PORT (FORMAT NIL "~D" PURI::PORT))
; (PURI::ENCODE-ESCAPED-ENCODING (OR PURI::PATH "/") NIL
; PURI::ESCAPE)
; (WHEN PURI::QUERY "?") ...)
; --> LET PROGN UNLESS IF TYPEP
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a (NOT SB-KERNEL:EXTENDED-SEQUENCE).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a (NOT SB-KERNEL:EXTENDED-SEQUENCE).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a (NOT SB-KERNEL:EXTENDED-SEQUENCE).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a (NOT SB-KERNEL:EXTENDED-SEQUENCE).
; (FORMAT STREAM "~a" (PURI::URI-STRING PURI:URI))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING (MEMBER T) STREAM), not a STREAM.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING (MEMBER T) STREAM), not a (MEMBER T).
; (CONCATENATE 'STRING
; (WHEN PURI::SCHEME
; (PURI::ENCODE-ESCAPED-ENCODING
; (STRING-DOWNCASE (SYMBOL-NAME PURI::SCHEME))
; PURI::*RESERVED-CHARACTERS* PURI::ESCAPE))
; (WHEN PURI::SCHEME ":")
; (WHEN (OR PURI::HOST (EQ :FILE PURI::SCHEME)) "//")
; (WHEN PURI::IS-IP6 "[")
; (WHEN PURI::HOST
; (PURI::ENCODE-ESCAPED-ENCODING PURI::HOST
; PURI::*RESERVED-AUTHORITY-CHARACTERS* PURI::ESCAPE))
; (WHEN PURI::IS-IP6 "]") (WHEN PURI::PORT ":")
; (WHEN PURI::PORT (FORMAT NIL "~D" PURI::PORT))
; (PURI::ENCODE-ESCAPED-ENCODING (OR PURI::PATH "/") NIL
; PURI::ESCAPE)
; (WHEN PURI::QUERY "?") ...)
; --> LET PROGN UNLESS IF TYPEP
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a (NOT SB-KERNEL:EXTENDED-SEQUENCE).
; in: DEFUN RENDER-URN
; (FORMAT STREAM "~a" (PURI::URI-STRING PURI:URN))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING (MEMBER T) STREAM), not a STREAM.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING (MEMBER T) STREAM), not a (MEMBER T).
; (CONCATENATE 'STRING "urn:" PURI::NID ":" PURI::NSS)
; --> LET PROGN UNLESS IF TYPEP
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a (NOT SB-KERNEL:EXTENDED-SEQUENCE).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a (NOT SB-KERNEL:EXTENDED-SEQUENCE).
; in: DEFUN ENCODE-ESCAPED-ENCODING
; (LENGTH STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (CHAR STRING PURI::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (ELT PURI::*ESCAPED-ENCODING* PURI::Q)
;
; 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.
; (ELT PURI::*ESCAPED-ENCODING* PURI::R)
;
; 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.
; in: DEFMETHOD MERGE-URIS (URI URI)
; (STRING= PURI::A
; (PURI::IF* (ATOM PURI::B) PURI::THEN PURI::B PURI::ELSE
; (CAR PURI::B)))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL
; CHARACTER), not a SIMPLE-BASE-STRING.
; The second argument is a (OR STRING SYMBOL
; CHARACTER), not a SIMPLE-BASE-STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (STRING= "." (CAR LAST))
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (STRING= "." (CAAR LAST))
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (STRING= ".."
; (LET ((PURI::L (CAR #)))
; (PURI::IF* (ATOM PURI::L) PURI::THEN PURI::L PURI::ELSE
; (CAR PURI::L))))
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (POSITION ".." PURI::NPL :TEST
; #'(LAMBDA (PURI::A PURI::B)
; (STRING= PURI::A
; (PURI::IF* (ATOM PURI::B) PURI::THEN PURI::B
; PURI::ELSE (CAR PURI::B)))))
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; (STRING= PURI::A PURI::B)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL
; CHARACTER), not a SIMPLE-BASE-STRING.
; The second argument is a (OR STRING SYMBOL
; CHARACTER), not a SIMPLE-BASE-STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; in: DEFMETHOD URI= (URI URI)
; (EQL (OR (PURI:URI-PORT PURI::URI1) PURI::DEFAULT-PORT)
; (OR (PURI:URI-PORT PURI::URI2) PURI::DEFAULT-PORT))
;
; 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.
; (STRING= (PURI:URI-PATH PURI::URI1) (PURI:URI-PATH PURI::URI2))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL
; CHARACTER), not a SIMPLE-BASE-STRING.
; The second argument is a (OR STRING SYMBOL
; CHARACTER), not a SIMPLE-BASE-STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (STRING= (PURI:URI-QUERY PURI::URI1) (PURI:URI-QUERY PURI::URI2))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL
; CHARACTER), not a SIMPLE-BASE-STRING.
; The second argument is a (OR STRING SYMBOL
; CHARACTER), not a SIMPLE-BASE-STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (STRING= (PURI:URI-FRAGMENT PURI::URI1) (PURI:URI-FRAGMENT PURI::URI2))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL
; CHARACTER), not a SIMPLE-BASE-STRING.
; The second argument is a (OR STRING SYMBOL
; CHARACTER), not a SIMPLE-BASE-STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (EQL (OR (PURI:URI-PORT PURI::URI1) PURI::DEFAULT-PORT)
; (OR (PURI:URI-PORT PURI::URI2) PURI::DEFAULT-PORT))
;
; 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 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; in: DEFUN URN-NSS-EQUAL
; (LENGTH PURI::NSS1)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR CONS VECTOR
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
; (LENGTH PURI::NSS2)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR CONS VECTOR
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
; (CHAR PURI::NSS1 PURI::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (CHAR PURI::NSS2 PURI::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; (CHAR-NOT-EQUAL PURI::C1 PURI::C2)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/puri/src-tmpALSWN3ZO.fasl
; compilation finished in 0:00:00.506
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chunga/packages.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chunga/packages-tmp8525G5XJ.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chunga/specials.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chunga/specials-tmpNBWMKLPF.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chunga/util.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chunga/util-tmpZ7NED271.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chunga/known-words.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chunga/known-words-tmpVAWG08RM.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chunga/conditions.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chunga/conditions-tmp29JNO94I.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chunga/read.lisp" (written 20 OCT 2024 03:56:24 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/chunga/read.lisp
; in: DEFUN TRIM-WHITESPACE
; (CHAR STRING CHUNGA::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a SIMPLE-ARRAY.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chunga/read-tmp9HJS3WPK.fasl
; compilation finished in 0:00:00.043
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chunga/streams.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chunga/streams-tmp6OWTJDXT.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chunga/input.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chunga/input-tmpERQILLDF.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chunga/output.lisp" (written 20 OCT 2024 03:56:24 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chunga/output-tmpYZQK9040.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chipz/package.lisp" (written 20 OCT 2024 03:56:23 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chipz/package-tmpMV6W92GO.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chipz/constants.lisp" (written 20 OCT 2024 03:56:23 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chipz/constants-tmp886ACX8P.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chipz/types-and-tables.lisp" (written 20 OCT 2024 03:56:23 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chipz/types-and-tables-tmp34OPD42E.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chipz/crc32.lisp" (written 20 OCT 2024 03:56:23 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chipz/crc32-tmpG6RL7DFQ.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chipz/adler32.lisp" (written 20 OCT 2024 03:56:23 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chipz/adler32-tmp523HMA4J.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chipz/conditions.lisp" (written 20 OCT 2024 03:56:23 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chipz/conditions-tmp7QUN41F9.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chipz/dstate.lisp" (written 20 OCT 2024 03:56:23 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chipz/dstate-tmp6435NPRK.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chipz/inflate-state.lisp" (written 20 OCT 2024 03:56:23 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chipz/inflate-state-tmpHHG39W7F.fasl
; compilation finished in 0:00:00.053
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chipz/gzip.lisp" (written 20 OCT 2024 03:56:23 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chipz/gzip-tmpIV07R04M.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chipz/zlib.lisp" (written 20 OCT 2024 03:56:23 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chipz/zlib-tmp2ANY66A8.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chipz/inflate.lisp" (written 20 OCT 2024 03:56:23 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/chipz/inflate.lisp
; in: DEFUN %INFLATE-STATE-MACHINE
; (* (CHIPZ::CMF CHIPZ::HEADER) 256)
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
; (MOD (+ (* (CHIPZ::CMF CHIPZ::HEADER) 256) CHIPZ::FLAGS-BYTE) 31)
;
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; convert division by 2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (ZEROP (MOD (+ (* (CHIPZ::CMF CHIPZ::HEADER) 256) CHIPZ::FLAGS-BYTE) 31))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0 (31))), not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR FLOAT (RATIONAL 0 (31))), not a DOUBLE-FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
; (= CHIPZ::STORED (CHIPZ::PRODUCE-CRC32 CHIPZ::CRC32))
;
; note: unable to open code because: The operands might not be the same type.
; (COERCE (FUNCALL CHIPZ::SLOT CHIPZ::HEADER) '(VECTOR (UNSIGNED-BYTE 8)))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT (VECTOR (UNSIGNED-BYTE 8))) 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 (VECTOR (UNSIGNED-BYTE 8))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT (VECTOR (UNSIGNED-BYTE 8))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST.
; (FUNCALL (CHIPZ::INFLATE-STATE-STATE CHIPZ::STATE) CHIPZ::STATE)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (ZEROP (CHIPZ::INFLATE-STATE-LENGTH CHIPZ::STATE))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; 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.
; (ZEROP CHIPZ::N-COPIED-BYTES)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (FLOAT * 4.611686e18)
; (RATIONAL *
; 4611686018427387903)), not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (FLOAT * 4.611686e18)
; (RATIONAL *
; 4611686018427387903)), not a DOUBLE-FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
; (<= CHIPZ::DISTANCE (- CHIPZ::INDEX CHIPZ::START))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
; (MINUSP CHIPZ::COPY-INDEX)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (RATIONAL * (9223372036854808573))
; (SINGLE-FLOAT * 9.223372e18)
; (DOUBLE-FLOAT *
; 9.223372036854809d18)), not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (RATIONAL * (9223372036854808573))
; (SINGLE-FLOAT * 9.223372e18)
; (DOUBLE-FLOAT *
; 9.223372036854809d18)), not a DOUBLE-FLOAT.
; (MIN CHIPZ::N-BYTES-TO-COPY (- CHIPZ::WINDOW-INDEX CHIPZ::COPY-INDEX))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0)
; (SINGLE-FLOAT -9.223372e18 32767.0)
; (RATIONAL (-9223372036854808573)
; 32767)), not a SINGLE-FLOAT.
; The second argument is a (OR (FLOAT * 4.611686e18)
; (RATIONAL *
; 4611686018427387903)), not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0)
; (SINGLE-FLOAT -9.223372e18 32767.0)
; (RATIONAL (-9223372036854808573)
; 32767)), not a DOUBLE-FLOAT.
; The second argument is a (OR (FLOAT * 4.611686e18)
; (RATIONAL *
; 4611686018427387903)), not a RATIONAL.
; (MIN CHIPZ::N-BYTES-TO-COPY
; (- (LENGTH (CHIPZ::INFLATE-STATE-WINDOW CHIPZ::STATE))
; CHIPZ::COPY-INDEX))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (FLOAT 0.0) (RATIONAL (0))), not a SINGLE-FLOAT.
; The second argument is a (OR (FLOAT * 4.611686e18)
; (RATIONAL *
; 4611686018427387903)), not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (FLOAT 0.0) (RATIONAL (0))), not a DOUBLE-FLOAT.
; The second argument is a (OR (FLOAT * 4.611686e18)
; (RATIONAL *
; 4611686018427387903)), not a RATIONAL.
; (ZEROP (CHIPZ::INFLATE-STATE-LENGTH CHIPZ::STATE))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; 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.
; (ZEROP CHIPZ::BITS)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; 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.
; (< (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE)
; (CHIPZ::INFLATE-STATE-N-CODES CHIPZ::STATE))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
; (< (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE)
; CHIPZ::+MAX-N-CODE-LENGTHS+)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
; (= CHIPZ::STORED (CHIPZ::PRODUCE-ADLER32 CHIPZ::ADLER32))
;
; note: unable to open code because: The operands might not be the same type.
; (< (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE) CHIPZ::N-VALUES)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
; (ASSERT (= CHIPZ::N-VALUES (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE)))
; --> LET WHEN IF
; ==>
; (= #:TEMP45 #:TEMP46)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-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 REAL, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to open code because: The operands might not be the same type.
; (< (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE) CHIPZ::N-VALUES)
;
; 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.
; (INCF (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE))
; ==>
; (+ 1 (CHIPZ::INFLATE-STATE-N-VALUES-READ #:STATE42))
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (1- (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE))
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (INCF (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE) CHIPZ::LEN)
; ==>
; (+ CHIPZ::LEN (CHIPZ::INFLATE-STATE-N-VALUES-READ #:STATE44))
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (ASSERT (= CHIPZ::N-VALUES (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE)))
; --> LET WHEN IF
; ==>
; (= #:TEMP45 #:TEMP46)
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, 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 REAL, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; (LOGBITP CHIPZ::+GZIP-FLAG-CRC+ (CHIPZ::FLAGS CHIPZ::HEADER))
;
; note: forced to do LOGAND-WORD-MASK (cost 10)
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 64).
; (LOGBITP CHIPZ::+GZIP-FLAG-EXTRA+ CHIPZ::FLAGS)
;
; note: forced to do LOGAND-WORD-MASK (cost 10)
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 64).
; (* (CHIPZ::CMF CHIPZ::HEADER) 256)
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (+ (* (CHIPZ::CMF CHIPZ::HEADER) 256) CHIPZ::FLAGS-BYTE)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (LOGBITP CHIPZ::+ZLIB-FLAG-FDICT+ CHIPZ::FLAGS-BYTE)
;
; note: forced to do LOGAND-WORD-MASK (cost 10)
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 64).
; (< (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE)
; (CHIPZ::INFLATE-STATE-N-CODES CHIPZ::STATE))
;
; 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.
; (< (CHIPZ::INFLATE-STATE-N-VALUES-READ CHIPZ::STATE)
; CHIPZ::+MAX-N-CODE-LENGTHS+)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; (+ (CHIPZ::DISTANCE-BASE (CHIPZ::INFLATE-STATE-DISTANCE CHIPZ::STATE))
; CHIPZ::DISTANCE-EXTRA)
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (MIN LENGTH (- CHIPZ::END CHIPZ::INDEX))
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The second argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER -4611686018427387903 4611686018427387903), not a (UNSIGNED-BYTE
; 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; (- CHIPZ::INDEX CHIPZ::DISTANCE)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a (OR (FLOAT * 4.611686e18)
; (RATIONAL * 4611686018427387903)), not a FIXNUM.
; The result is a (VALUES
; (OR (FLOAT -4.611686e18)
; (RATIONAL -4611686018427387903))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The second argument is a (OR (FLOAT * 4.611686e18)
; (RATIONAL * 4611686018427387903)), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES
; (OR (FLOAT -4.611686e18)
; (RATIONAL -4611686018427387903))
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (- CHIPZ::WINDOW-INDEX CHIPZ::DISTANCE)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a (OR (FLOAT (-4.611686e18))
; (RATIONAL (-4611686018427387903))), not a FIXNUM.
; The result is a (VALUES
; (OR (DOUBLE-FLOAT * 4.611686018427421d18)
; (SINGLE-FLOAT * 4.611686e18)
; (RATIONAL * (4611686018427420670)))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The second argument is a (OR (FLOAT (-4.611686e18))
; (RATIONAL (-4611686018427387903))), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES
; (OR (DOUBLE-FLOAT * 4.611686018427421d18)
; (SINGLE-FLOAT * 4.611686e18)
; (RATIONAL * (4611686018427420670)))
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (+ (- CHIPZ::WINDOW-INDEX CHIPZ::DISTANCE) (- CHIPZ::INDEX CHIPZ::START))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (DOUBLE-FLOAT * 4.611686018427421d18)
; (SINGLE-FLOAT * 4.611686e18)
; (RATIONAL * (4611686018427420670))), not a FIXNUM.
; The result is a (VALUES
; (OR (RATIONAL * (9223372036854808573))
; (SINGLE-FLOAT * 9.223372e18)
; (DOUBLE-FLOAT * 9.223372036854809d18))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (OR (DOUBLE-FLOAT * 4.611686018427421d18)
; (SINGLE-FLOAT * 4.611686e18)
; (RATIONAL * (4611686018427420670))), not a (UNSIGNED-BYTE
; 64).
; The second argument is a (INTEGER -4611686018427387903
; 4611686018427387903), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (OR (RATIONAL * (9223372036854808573))
; (SINGLE-FLOAT * 9.223372e18)
; (DOUBLE-FLOAT * 9.223372036854809d18))
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (MINUSP CHIPZ::COPY-INDEX)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (OR (RATIONAL * (9223372036854808573))
; (SINGLE-FLOAT * 9.223372e18)
; (DOUBLE-FLOAT * 9.223372036854809d18)), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (OR (RATIONAL * (9223372036854808573))
; (SINGLE-FLOAT * 9.223372e18)
; (DOUBLE-FLOAT * 9.223372036854809d18)), not a (UNSIGNED-BYTE
; 64).
; etc.
; (- CHIPZ::WINDOW-INDEX CHIPZ::COPY-INDEX)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a (OR (RATIONAL 0 (9223372036854808573))
; (SINGLE-FLOAT 0.0 9.223372e18)
; (DOUBLE-FLOAT 0.0d0 9.223372036854809d18)), not a FIXNUM.
; The result is a (VALUES
; (OR (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0)
; (SINGLE-FLOAT -9.223372e18 32767.0)
; (RATIONAL (-9223372036854808573) 32767))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The second argument is a (OR (RATIONAL 0 (9223372036854808573))
; (SINGLE-FLOAT 0.0 9.223372e18)
; (DOUBLE-FLOAT 0.0d0 9.223372036854809d18)), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES
; (OR (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0)
; (SINGLE-FLOAT -9.223372e18 32767.0)
; (RATIONAL (-9223372036854808573) 32767))
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; (MIN CHIPZ::N-BYTES-TO-COPY (- CHIPZ::WINDOW-INDEX CHIPZ::COPY-INDEX))
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a (OR
; (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0)
; (SINGLE-FLOAT -9.223372e18 32767.0)
; (RATIONAL (-9223372036854808573) 32767)), not a SINGLE-FLOAT.
; The second argument is a (OR (FLOAT * 4.611686e18)
; (RATIONAL * 4611686018427387903)), not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a (OR
; (DOUBLE-FLOAT -9.223372036854809d18 32767.0d0)
; (SINGLE-FLOAT -9.223372e18 32767.0)
; (RATIONAL (-9223372036854808573) 32767)), not a DOUBLE-FLOAT.
; The second argument is a (OR (FLOAT * 4.611686e18)
; (RATIONAL * 4611686018427387903)), not a DOUBLE-FLOAT.
; etc.
; (+ CHIPZ::COPY-INDEX (LENGTH (CHIPZ::INFLATE-STATE-WINDOW CHIPZ::STATE)))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (REAL * (0)), not a FIXNUM.
; The result is a (VALUES (OR (FLOAT * 32768.0) (RATIONAL * (32768)))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (signed-byte 64) arithmetic (cost 5) because:
; The first argument is a (REAL * (0)), not a (SIGNED-BYTE 64).
; The result is a (VALUES (OR (FLOAT * 32768.0) (RATIONAL * (32768)))
; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64)
; &OPTIONAL).
; (- (LENGTH (CHIPZ::INFLATE-STATE-WINDOW CHIPZ::STATE)) CHIPZ::COPY-INDEX)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a (OR (FLOAT * 32768.0) (RATIONAL * (32768))), not a FIXNUM.
; The result is a (VALUES (OR (FLOAT 0.0) (RATIONAL (0))) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The second argument is a (OR (FLOAT * 32768.0) (RATIONAL * (32768))), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES (OR (FLOAT 0.0) (RATIONAL (0))) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; (MIN CHIPZ::N-BYTES-TO-COPY
; (- (LENGTH (CHIPZ::INFLATE-STATE-WINDOW CHIPZ::STATE))
; CHIPZ::COPY-INDEX))
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a (OR (FLOAT 0.0) (RATIONAL (0))), not a SINGLE-FLOAT.
; The second argument is a (OR (FLOAT * 4.611686e18)
; (RATIONAL * 4611686018427387903)), not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a (OR (FLOAT 0.0) (RATIONAL (0))), not a DOUBLE-FLOAT.
; The second argument is a (OR (FLOAT * 4.611686e18)
; (RATIONAL * 4611686018427387903)), not a DOUBLE-FLOAT.
; etc.
; (DECF (CHIPZ::INFLATE-STATE-LENGTH CHIPZ::STATE) CHIPZ::N-BYTES-TO-COPY)
; --> 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 T, not a FIXNUM.
; The second argument is a (OR (FLOAT * 4.611686e18)
; (RATIONAL * (4611686018427387904))), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a (OR (FLOAT * 4.611686e18)
; (RATIONAL * (4611686018427387904))), not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; (+ CHIPZ::COPY-INDEX CHIPZ::N-BYTES-TO-COPY)
;
; 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 result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -4611686018427387903
; 4611686018427387903), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (MIN (CHIPZ::INFLATE-STATE-LENGTH CHIPZ::STATE)
; (- (CHIPZ::INFLATE-STATE-INPUT-END CHIPZ::STATE)
; (CHIPZ::INFLATE-STATE-INPUT-INDEX CHIPZ::STATE))
; (- (CHIPZ::INFLATE-STATE-OUTPUT-END CHIPZ::STATE)
; (CHIPZ::INFLATE-STATE-OUTPUT-INDEX CHIPZ::STATE)))
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The second argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (INTEGER -4611686018427387903 4611686018427387903), not a (UNSIGNED-BYTE
; 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; (DECF (CHIPZ::INFLATE-STATE-LENGTH CHIPZ::STATE) CHIPZ::N-COPIED-BYTES)
; --> 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 T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -4611686018427387903 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chipz/inflate-tmpX4XJNZSN.fasl
; compilation finished in 0:00:00.110
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chipz/bzip2.lisp" (written 20 OCT 2024 03:56:23 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/chipz/bzip2.lisp
; in: DEFUN %BZIP2-STATE-MACHINE
; (MINUSP (CHIPZ::BZIP2-STATE-ORIGINAL-POINTER CHIPZ::STATE))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
; (>= (CHIPZ::BZIP2-STATE-ORIGINAL-POINTER CHIPZ::STATE)
; (CHIPZ::BZIP2-STATE-NBLOCK CHIPZ::STATE))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
; (= (CHIPZ::BZIP2-STATE-N-BLOCKS-USED CHIPZ::STATE)
; (1+ (CHIPZ::BZIP2-STATE-NBLOCK CHIPZ::STATE)))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (< (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE))
; (CHIPZ::BZIP2-STATE-ALPHA-SIZE CHIPZ::STATE))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
; (< (CHIPZ::BZIP2-STATE-J CHIPZ::STATE)
; (CHIPZ::BZIP2-STATE-N-GROUPS CHIPZ::STATE))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
; (< (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE))
; (CHIPZ::BZIP2-STATE-N-SELECTORS CHIPZ::STATE))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
; (>= (INCF (CHIPZ::BZIP2-STATE-J CHIPZ::STATE))
; (CHIPZ::BZIP2-STATE-N-GROUPS CHIPZ::STATE))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
; (< (CHIPZ::BZIP2-STATE-I CHIPZ::STATE) 16)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
; (* (CHIPZ::BZIP2-STATE-I CHIPZ::STATE) 16)
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
; (MINUSP (CHIPZ::BZIP2-STATE-ORIGINAL-POINTER CHIPZ::STATE))
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; (INCF (CHIPZ::BZIP2-STATE-N-BLOCKS-USED CHIPZ::STATE))
; ==>
; (+ 1 (CHIPZ::BZIP2-STATE-N-BLOCKS-USED #:STATE335))
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (INCF (CHIPZ::BZIP2-STATE-CURRENT-BLOCK-NUMBER CHIPZ::STATE))
; ==>
; (+ 1 (CHIPZ::BZIP2-STATE-CURRENT-BLOCK-NUMBER #:STATE37))
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (< (CHIPZ::BZIP2-STATE-I CHIPZ::STATE) 16)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; (LOGBITP (CHIPZ::BZIP2-STATE-I CHIPZ::STATE) CHIPZ::IN-USE-16)
; --> LET PROGN UNLESS IF TYPEP
; ==>
; 1
;
; note: forced to do <-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
;
; 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.
; The result is a (VALUES (INTEGER * 0) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (signed-byte 64) arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64).
; The result is a (VALUES (INTEGER * 0) &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline ASH (cost 2) because:
; The second argument is a (INTEGER * 0), not a (UNSIGNED-BYTE 64).
; unable to do inline ASH (cost 3) because:
; The second argument is a (INTEGER * 0), not a (UNSIGNED-BYTE 64).
; etc.
; (* (CHIPZ::BZIP2-STATE-I CHIPZ::STATE) 16)
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (+ (* (CHIPZ::BZIP2-STATE-I CHIPZ::STATE) 16) CHIPZ::I)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE))
; ==>
; (+ 1 (CHIPZ::BZIP2-STATE-I #:STATE67))
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (INCF (CHIPZ::BZIP2-STATE-J CHIPZ::STATE))
; ==>
; (+ 1 (CHIPZ::BZIP2-STATE-J #:STATE90))
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (>= (INCF (CHIPZ::BZIP2-STATE-J CHIPZ::STATE))
; (CHIPZ::BZIP2-STATE-N-GROUPS CHIPZ::STATE))
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a NUMBER, 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 NUMBER, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE))
; ==>
; (+ 1 (CHIPZ::BZIP2-STATE-I #:STATE95))
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (< (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE))
; (CHIPZ::BZIP2-STATE-N-SELECTORS CHIPZ::STATE))
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a NUMBER, 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 NUMBER, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; etc.
; (DOTIMES (CHIPZ::I CHIPZ::N-GROUPS)
; (SETF (AREF CHIPZ::POS CHIPZ::I) CHIPZ::I))
; --> BLOCK LET TAGBODY UNLESS IF >=
; ==>
; 1
;
; note: forced to do <-FIXNUM-INTEGER (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The second argument is a INTEGER, not a FIXNUM.
; (DOTIMES (CHIPZ::I CHIPZ::N-SELECTORS)
; (LET* ((CHIPZ::V (AREF CHIPZ::SELECTOR-MTF CHIPZ::I))
; (CHIPZ::TMP (AREF CHIPZ::POS CHIPZ::V)))
; (LOOP CHIPZ::UNTIL (ZEROP CHIPZ::V)
; DO (SETF # #) (DECF CHIPZ::V))
; (SETF (AREF CHIPZ::POS 0) CHIPZ::TMP)
; (SETF (AREF CHIPZ::SELECTOR-TABLE CHIPZ::I) CHIPZ::TMP)))
; --> BLOCK LET TAGBODY UNLESS IF >=
; ==>
; 1
;
; note: forced to do <-FIXNUM-INTEGER (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The second argument is a INTEGER, not a FIXNUM.
; (< (CHIPZ::BZIP2-STATE-J CHIPZ::STATE)
; (CHIPZ::BZIP2-STATE-N-GROUPS CHIPZ::STATE))
;
; 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.
; (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE))
; ==>
; (+ 1 (CHIPZ::BZIP2-STATE-I #:STATE137))
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (< (INCF (CHIPZ::BZIP2-STATE-I CHIPZ::STATE))
; (CHIPZ::BZIP2-STATE-ALPHA-SIZE CHIPZ::STATE))
;
; 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 64) comparison (cost 6) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; etc.
; (INCF (CHIPZ::BZIP2-STATE-J CHIPZ::STATE))
; ==>
; (+ 1 (CHIPZ::BZIP2-STATE-J #:STATE139))
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (MAX CHIPZ::MAXLEN CHIPZ::XY)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The second argument is a (REAL 0), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The second argument is a (REAL 0), not a (UNSIGNED-BYTE 64).
; etc.
; (MIN CHIPZ::MINLEN CHIPZ::XY)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The second argument is a (REAL * 255), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The second argument is a (REAL * 255), not a (UNSIGNED-BYTE 64).
; etc.
; (ERROR 'CHIPZ:INVALID-BZIP2-DATA)
;
; note: deleting unreachable code
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chipz/bzip2-tmp349SZV56.fasl
; compilation finished in 0:00:00.520
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chipz/decompress.lisp" (written 20 OCT 2024 03:56:23 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chipz/decompress-tmpIFTUZKCX.fasl
; compilation finished in 0:00:00.073
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/chipz/stream.lisp" (written 20 OCT 2024 03:56:23 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/chipz/stream.lisp
; in: DEFINE-STREAM-READ-SEQUENCE DECOMPRESSING-STREAM
; (CALL-NEXT-METHOD)
;
; note: deleting unreachable code
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/chipz/stream-tmpJ3BP3DY8.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/config.lisp" (written 20 OCT 2024 03:56:35 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/config-tmp9NC1M3HR.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/package.lisp" (written 20 OCT 2024 03:56:35 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/package-tmpCQV7SEDP.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/reload.lisp" (written 20 OCT 2024 03:56:35 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/reload-tmpOD15IJQ.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/ffi.lisp" (written 20 OCT 2024 03:56:35 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-plus-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.
; 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 ""
; 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 ""
; in: DEFUN ENCODE-OPENSSL-VERSION-IMPL
; (POSITION CL+SSL::PATCH CL+SSL::+OPENSSL-VERSION-PATCH-CHARACTERS+)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; (POSITION CL+SSL::STATUS CL+SSL::+OPENSSL-VERSION-STATUS-STRINGS+ :TEST
; #'STRING=)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; (LOGIOR (ASH CL+SSL::MAJOR 28) (ASH CL+SSL::MINOR 20) (ASH CL+SSL::FIX 12)
; (ASH CL+SSL::PATCH-INT 4) CL+SSL::STATUS-INT)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a (OR NULL INTEGER), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The second argument is a (OR NULL INTEGER), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFUN ENCODE-OPENSSL-VERSION
; (>= CL+SSL::MAJOR 3)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
; 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-OR-FIX))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a (NOT NULL), 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 (NOT NULL), not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; 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-OR-FIX))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a (NOT NULL), 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 (NOT NULL), not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; etc.
; 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 SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; in: 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 #:G1 :POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBSSL)
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; 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 ""
; (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 ""
; (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 ""
; (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 ""
; (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 ""
; (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 ""
; 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 ""
; 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 ""
; 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 ""
; 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 ""
; (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 ""
; (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 ""
; (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 ""
; (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 ""
; (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 ""
; 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 ""
; 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 ((#:G1 METHOD))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_CTX_new" (:POINTER #:G1 :POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBSSL))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; 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 ((#:G1 CL+SSL::CTX))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_new" (:POINTER #:G1 :POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBSSL))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; 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 ((#:G1 CL+SSL::BIO))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to ""
; 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 ((#:G1 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 ""
; 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 ((#:G1 METHOD))
; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_new" (:POINTER #:G1 :POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; 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 ((#:G1 METHOD))
; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_free" (:POINTER #:G1 :POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; 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 ""
; 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 ""
; 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 #:G1 :POINTER #:G2 :POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO)
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; 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 ((#:G1 CL+SSL::CTX))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to ""
; 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 ((#:G1 CL+SSL::SSL))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to ""
; 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)
; 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)
; 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)
; 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 (#:G1 #:PARAM2)
; (CFFI:TRANSLATE-TO-FOREIGN CL+SSL::FILE
; #)
; (UNWIND-PROTECT (PROGN #)
; (CFFI:FREE-TRANSLATED-OBJECT #:G1 # #:PARAM2)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; 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 ((#:G1 CL+SSL::SSL))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_get_verify_result"
; (:POINTER #:G1 :LONG) :CONVENTION :CDECL
; :LIBRARY CL+SSL/CONFIG::LIBSSL))))
;
; note: doing signed word to integer coercion (cost 20) to ""
; 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 ""
; 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 ""
; 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 ((#:G1 CL+SSL::X509-NAME))
; (LET (#)
; (LET #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; 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 ((#:G1 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 ""
; 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 ((#:G1 CL+SSL::NAME-ENTRY))
; (CFFI-SYS:%FOREIGN-FUNCALL "X509_NAME_ENTRY_get_data"
; (:POINTER #:G1 :POINTER) :CONVENTION
; :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; 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 ((#:G1 CL+SSL::X509))
; (CFFI-SYS:%FOREIGN-FUNCALL "X509_get_issuer_name"
; (:POINTER #:G1 :POINTER) :CONVENTION
; :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; 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 ((#:G1 CL+SSL::X509))
; (CFFI-SYS:%FOREIGN-FUNCALL "X509_get_subject_name"
; (:POINTER #:G1 :POINTER) :CONVENTION
; :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; 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 ""
; (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 ""
; 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 ((#:G1 CL+SSL::CERT))
; (LET (#)
; (LET #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; 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 ((#:G1 CL+SSL::*PX))
; (LET (#)
; (LET #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; 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 ((#:G1 CL+SSL::BIO))
; (LET (#)
; (LET #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; 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 (#:G1 #:PARAM2)
; (CFFI:TRANSLATE-TO-FOREIGN CL+SSL::NAME
; #)
; (UNWIND-PROTECT (PROGN #)
; (CFFI:FREE-TRANSLATED-OBJECT #:G1 # #:PARAM2)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; 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 ""
; 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 ""
; 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 efficiently:
; (VALUES SB-SYS:SYSTEM-AREA-POINTER &REST T).
; It allows an unknown number of values, consider using
; (VALUES SB-SYS:SYSTEM-AREA-POINTER &OPTIONAL).
; 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 efficiently:
; (VALUES FIXNUM &REST T).
; It allows an unknown number of values, consider using
; (VALUES FIXNUM &OPTIONAL).
; 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 ((#:G1 CL+SSL::ASN1-STRING))
; (CFFI-SYS:%FOREIGN-FUNCALL "ASN1_STRING_data"
; (:POINTER #:G1 :POINTER) :CONVENTION
; :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; 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 ((#:G1 CL+SSL::NUM))
; (LET (#)
; (LET #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; 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 ""
; 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)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/ffi-tmpGB8XX1TU.fasl
; compilation finished in 0:00:00.323
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/bio.lisp" (written 20 OCT 2024 03:56:35 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/bio.lisp
; in: CFFI:DEFCALLBACK LISP-WRITE
; (CL+SSL::CLEAR-RETRY-FLAGS CL+SSL::BIO)
;
; note: doing SAP to pointer coercion (cost 20)
; in: CFFI:DEFCALLBACK LISP-READ
; (CFFI:DEFCALLBACK CL+SSL::LISP-READ
; :INT
; ((CL+SSL::BIO :POINTER) (CL+SSL::BUF :POINTER) (CL+SSL::N :INT))
; (HANDLER-CASE
; (LET ((CL+SSL::I 0))
; (HANDLER-CASE (PROGN # # #) (END-OF-FILE NIL #))
; (IF (= 0 CL+SSL::I)
; -1
; CL+SSL::I))
; (SERIOUS-CONDITION (CL+SSL::C) (CL+SSL::CLEAR-RETRY-FLAGS CL+SSL::BIO)
; (CL+SSL::PUT-TO-OPENSSL-ERROR-QUEUE CL+SSL::C) -1)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY
; ==>
; (LET ((CL+SSL::BIO CL+SSL::BIO)
; (CL+SSL::BUF CL+SSL::BUF)
; (CL+SSL::N CL+SSL::N))
; (BLOCK CL+SSL::LISP-READ
; (HANDLER-CASE
; (LET (#)
; (HANDLER-CASE # #)
; (IF #
; -1
; CL+SSL::I))
; (SERIOUS-CONDITION (CL+SSL::C) (CL+SSL::CLEAR-RETRY-FLAGS CL+SSL::BIO)
; (CL+SSL::PUT-TO-OPENSSL-ERROR-QUEUE CL+SSL::C) -1))))
;
; note: doing SAP to pointer coercion (cost 20) to BIO
; in: CFFI:DEFCALLBACK LISP-GETS
; (CFFI:DEFCALLBACK CL+SSL::LISP-GETS
; :INT
; ((CL+SSL::BIO :POINTER) (CL+SSL::BUF :POINTER) (CL+SSL::N :INT))
; (HANDLER-CASE
; (LET ((CL+SSL::I 0) (CL+SSL::MAX-CHARS #))
; (CL+SSL::CLEAR-RETRY-FLAGS CL+SSL::BIO)
; (HANDLER-CASE
; (LOOP CL+SSL::WITH CHAR
; AND CL+SSL::EXIT = NIL
; CL+SSL::WHILE #
; DO # # ...)
; (END-OF-FILE NIL #))
; (SETF # 0)
; CL+SSL::I)
; (SERIOUS-CONDITION (CL+SSL::C) (CL+SSL::CLEAR-RETRY-FLAGS CL+SSL::BIO)
; (CL+SSL::PUT-TO-OPENSSL-ERROR-QUEUE CL+SSL::C) -1)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY
; ==>
; (LET ((CL+SSL::BIO CL+SSL::BIO)
; (CL+SSL::BUF CL+SSL::BUF)
; (CL+SSL::N CL+SSL::N))
; (BLOCK CL+SSL::LISP-GETS
; (HANDLER-CASE
; (LET (# #)
; (CL+SSL::CLEAR-RETRY-FLAGS CL+SSL::BIO)
; (HANDLER-CASE # #)
; (SETF #)
; CL+SSL::I)
; (SERIOUS-CONDITION (CL+SSL::C) (CL+SSL::CLEAR-RETRY-FLAGS CL+SSL::BIO)
; (CL+SSL::PUT-TO-OPENSSL-ERROR-QUEUE CL+SSL::C) -1))))
;
; note: doing SAP to pointer coercion (cost 20) to BIO
; in: CFFI:DEFCALLBACK LISP-PUTS
; (CFFI:DEFCALLBACK CL+SSL::LISP-PUTS
; :INT
; ((CL+SSL::BIO :POINTER) (CL+SSL::BUF :STRING))
; (HANDLER-CASE
; (PROGN
; (WRITE-LINE CL+SSL::BUF
; (FLEXI-STREAMS:MAKE-FLEXI-STREAM CL+SSL::*BIO-SOCKET*
; :EXTERNAL-FORMAT :ASCII))
; (1+ (LENGTH CL+SSL::BUF)))
; (SERIOUS-CONDITION (CL+SSL::C) (CL+SSL::CLEAR-RETRY-FLAGS CL+SSL::BIO)
; (CL+SSL::PUT-TO-OPENSSL-ERROR-QUEUE CL+SSL::C) -1)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN CL+SSL::BUF #)
;
; note: doing SAP to pointer coercion (cost 20)
; (CL+SSL::CLEAR-RETRY-FLAGS CL+SSL::BIO)
;
; note: doing SAP to pointer coercion (cost 20)
; in: CFFI:DEFCALLBACK LISP-CTRL
; (ZEROP (CL+SSL::COMPAT-BIO-TEST-FLAGS CL+SSL::BIO CL+SSL::+BIO_FLAGS_IN_EOF+))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; 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::COMPAT-BIO-TEST-FLAGS CL+SSL::BIO CL+SSL::+BIO_FLAGS_IN_EOF+)
;
; note: doing SAP to pointer coercion (cost 20)
; in: CFFI:DEFCALLBACK LISP-CREATE-OPAQUE
; (CFFI:DEFCALLBACK CL+SSL::LISP-CREATE-OPAQUE
; :INT
; ((CL+SSL::BIO :POINTER))
; (HANDLER-CASE
; (PROGN
; (CL+SSL::BIO-SET-INIT CL+SSL::BIO 1)
; (CL+SSL::CLEAR-RETRY-FLAGS CL+SSL::BIO)
; 1)
; (SERIOUS-CONDITION (CL+SSL::C)
; (CL+SSL::PUT-TO-OPENSSL-ERROR-QUEUE CL+SSL::C) 0)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY
; ==>
; (LET ((CL+SSL::BIO CL+SSL::BIO))
; (BLOCK CL+SSL::LISP-CREATE-OPAQUE
; (HANDLER-CASE
; (PROGN
; (CL+SSL::BIO-SET-INIT CL+SSL::BIO 1)
; (CL+SSL::CLEAR-RETRY-FLAGS CL+SSL::BIO)
; 1)
; (SERIOUS-CONDITION (CL+SSL::C)
; (CL+SSL::PUT-TO-OPENSSL-ERROR-QUEUE CL+SSL::C) 0))))
;
; note: doing SAP to pointer coercion (cost 20) to BIO
; in: CFFI:DEFCALLBACK LISP-DESTROY-OPAQUE
; (CFFI:DEFCALLBACK CL+SSL::LISP-DESTROY-OPAQUE
; :INT
; ((CL+SSL::BIO :POINTER))
; (HANDLER-CASE
; (COND ((CFFI-SYS:NULL-POINTER-P CL+SSL::BIO) 0)
; (T (CL+SSL::BIO-SET-INIT CL+SSL::BIO 0)
; (CL+SSL::CLEAR-RETRY-FLAGS CL+SSL::BIO) 1))
; (SERIOUS-CONDITION (CL+SSL::C)
; (CL+SSL::PUT-TO-OPENSSL-ERROR-QUEUE CL+SSL::C) 0)))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET SETF LET* THE LOCALLY
; ==>
; (LET ((CL+SSL::BIO CL+SSL::BIO))
; (BLOCK CL+SSL::LISP-DESTROY-OPAQUE
; (HANDLER-CASE (COND (# 0) (T # # 1))
; (SERIOUS-CONDITION (CL+SSL::C)
; (CL+SSL::PUT-TO-OPENSSL-ERROR-QUEUE CL+SSL::C) 0))))
;
; note: doing SAP to pointer coercion (cost 20) to BIO
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/bio-tmpMU5GUFP8.fasl
; compilation finished in 0:00:00.073
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/conditions.lisp" (written 20 OCT 2024 03:56:35 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/conditions-tmpBP201KII.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/ssl-funcall.lisp" (written 20 OCT 2024 03:56:35 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/ssl-funcall.lisp
; in: DEFUN SECONDS-UNTIL-DEADLINE
; (/ (- CL+SSL::DEADLINE (GET-INTERNAL-REAL-TIME))
; INTERNAL-TIME-UNITS-PER-SECOND)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES INTEGER &REST T).
;
; 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 result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFUN ENSURE-SSL-FUNCALL
; (APPLY CL+SSL::FUNC CL+SSL::HANDLE CL+SSL::OTHER-ARGS)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FUNC is not known to be a function
; (FUNCALL CL+SSL::SUCCESS-TEST CL+SSL::RET)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; SUCCESS-TEST is not known to be a function
; in: DEFUN NONBLOCKING-SSL-FUNCALL
; (APPLY CL+SSL::FUNC CL+SSL::HANDLE CL+SSL::OTHER-ARGS)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FUNC is not known to be a function
; (FUNCALL CL+SSL::SUCCESS-TEST CL+SSL::RET)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; SUCCESS-TEST is not known to be a function
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/ssl-funcall-tmp6LJFJXCQ.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/init.lisp" (written 20 OCT 2024 03:56:35 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/init.lisp
; in: CFFI:DEFCALLBACK TMP-RSA-CALLBACK
; (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)
; 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 (OR NULL
; (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 LIST.
;
; 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 (OR NULL
; (SIMPLE-ARRAY
; CHARACTER
; (*))).
; 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)
; 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.
; in: CFFI:DEFCALLBACK THREADID-CALLBACK
; (INCF CL+SSL::*THREAD-COUNTER*)
; --> THE
; ==>
; (+ 1 CL+SSL::*THREAD-COUNTER*)
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFUN INITIALIZE
; (LOOP CL+SSL::REPEAT (CL+SSL::CRYPTO-NUM-LOCKS)
; CL+SSL::COLLECT (BORDEAUX-THREADS:MAKE-LOCK))
; --> 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 62).
;
; 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
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (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
; (LOOP CL+SSL::REPEAT (CL+SSL::CRYPTO-NUM-LOCKS)
; CL+SSL::COLLECT (BORDEAUX-THREADS:MAKE-LOCK))
; --> LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY IF <=
; ==>
; 1
;
; note: forced to do >-INTEGER-FIXNUM (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD 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 inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER 1), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/init-tmpCXNAFKK5.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/ffi-buffer-all.lisp" (written 20 OCT 2024 03:56:35 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/ffi-buffer-all-tmpAG4HDK79.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/ffi-buffer.lisp" (written 20 OCT 2024 03:56:35 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/ffi-buffer-tmpTX55LUC3.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/streams.lisp" (written 20 OCT 2024 03:56:35 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/streams.lisp
; in: DEFMETHOD INITIALIZE-INSTANCE :AFTER (SSL-STREAM)
; (CL+SSL::MAKE-BUFFER CL+SSL::OUTPUT-BUFFER-SIZE)
; --> BLOCK CFFI-SYS:MAKE-SHAREABLE-BYTE-VECTOR BLOCK MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; (CL+SSL::MAKE-BUFFER CL+SSL::INPUT-BUFFER-SIZE)
; --> BLOCK CFFI-SYS:MAKE-SHAREABLE-BYTE-VECTOR BLOCK MAKE-ARRAY
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (UNSIGNED-BYTE 45)), not a INTEGER.
; 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.
; in: DEFMETHOD CLOSE (SSL-STREAM)
; (COMPLEMENT #'MINUSP)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
; (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
; (COMPLEMENT #'MINUSP)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; in: DEFMETHOD STREAM-LISTEN (SSL-STREAM)
; (> CL+SSL::N 0)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
; (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.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
; (CL+SSL::NONBLOCKING-SSL-FUNCALL STREAM #'PLUSP #'CL+SSL::SSL-READ
; CL+SSL::HANDLE CL+SSL::PTR 1)
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET WHEN IF FUNCALL
; ==>
; 1
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 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.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; (> CL+SSL::N 0)
;
; 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 64) comparison (cost 6) because:
; The first argument is a REAL, not a (UNSIGNED-BYTE 64).
; etc.
; (CL+SSL::NONBLOCKING-SSL-FUNCALL STREAM #'PLUSP #'CL+SSL::SSL-READ
; CL+SSL::HANDLE CL+SSL::PTR 1)
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET LET APPLY
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; 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.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
; (CL+SSL::ENSURE-SSL-FUNCALL STREAM #'PLUSP #'CL+SSL::SSL-READ CL+SSL::HANDLE
; CL+SSL::PTR 1)
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET WHEN IF FUNCALL
; ==>
; 1
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 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.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET LET APPLY
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFMETHOD STREAM-READ-SEQUENCE (SSL-STREAM T T T)
; (PLUSP LENGTH)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (RATIONAL * 35184372088831)
; (SINGLE-FLOAT * 3.5184372e13)
; (DOUBLE-FLOAT *
; 3.5184372088831d13)), not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (RATIONAL * 35184372088831)
; (SINGLE-FLOAT * 3.5184372e13)
; (DOUBLE-FLOAT *
; 3.5184372088831d13)), not a DOUBLE-FLOAT.
; (< CL+SSL::START CL+SSL::END)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-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::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 (OR NULL (SIMPLE-ARRAY * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (OR SIMPLE-BASE-STRING NULL).
; 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 31) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*))
; (SIMPLE-ARRAY FIXNUM (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*))
; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*))
; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT)
; (*))), not a (OR NULL
; (SIMPLE-ARRAY CHARACTER (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (OR NULL
; (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 31) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*))
; (SIMPLE-ARRAY FIXNUM (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*))
; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*))
; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT)
; (*))), not a (OR SIMPLE-BASE-STRING NULL).
; (CL+SSL::ENSURE-SSL-FUNCALL STREAM #'PLUSP #'CL+SSL::SSL-READ CL+SSL::HANDLE
; CL+SSL::PTR LENGTH)
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET WHEN IF FUNCALL
; ==>
; 1
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
; (< 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 REAL, not a FIXNUM.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; 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 second argument is a REAL, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The second argument is a REAL, not a (UNSIGNED-BYTE 64).
; etc.
; (PLUSP LENGTH)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (OR (RATIONAL * 35184372088831)
; (SINGLE-FLOAT * 3.5184372e13)
; (DOUBLE-FLOAT * 3.5184372088831d13)), not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (OR (RATIONAL * 35184372088831)
; (SINGLE-FLOAT * 3.5184372e13)
; (DOUBLE-FLOAT * 3.5184372088831d13)), not a (UNSIGNED-BYTE
; 64).
; etc.
; (CL+SSL::ENSURE-SSL-FUNCALL STREAM #'PLUSP #'CL+SSL::SSL-READ CL+SSL::HANDLE
; CL+SSL::PTR LENGTH)
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET WHEN IF FUNCALL
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; 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 REAL, not a FIXNUM.
; The second argument is a (REAL (0)), not a FIXNUM.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a (REAL (0)), not a SINGLE-FLOAT.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; (INCF CL+SSL::START CL+SSL::READ-BYTES)
; --> THE
; ==>
; (+ CL+SSL::READ-BYTES CL+SSL::START)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (RATIONAL (0)), not a FIXNUM.
; The result is a (VALUES (RATIONAL (0)) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (RATIONAL (0)), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES (RATIONAL (0)) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; (CL+SSL::ENSURE-SSL-FUNCALL STREAM #'PLUSP #'CL+SSL::SSL-READ CL+SSL::HANDLE
; CL+SSL::PTR LENGTH)
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET LET APPLY
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFMETHOD STREAM-WRITE-BYTE (SSL-STREAM 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.
; (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.
; (INCF (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM))
; ==>
; (+ 1 (CL+SSL::SSL-STREAM-OUTPUT-POINTER #:STREAM7))
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFMETHOD STREAM-WRITE-SEQUENCE (SSL-STREAM T T T)
; (>
; (+ (- 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 SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (> (- 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 SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (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)
; --> 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 (OR NULL (SIMPLE-ARRAY * (*))).
; The second argument is a SEQUENCE, not a (OR NULL (SIMPLE-ARRAY * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (OR SIMPLE-BASE-STRING NULL).
; The second argument is a SEQUENCE, not a (OR NULL
; (SIMPLE-ARRAY CHARACTER (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (OR NULL
; (SIMPLE-ARRAY CHARACTER (*))).
; The second argument is a SEQUENCE, not a (OR SIMPLE-BASE-STRING NULL).
; (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.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; --> BLOCK
; ==>
; (LENGTH CL+SSL::BUF)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (CL+SSL::B/S-REPLACE CL+SSL::BUF CL+SSL::SEQ :START2 CL+SSL::START)
; --> BLOCK
; ==>
; (REPLACE CL+SSL::BUF CL+SSL::SEQ :START1 CL+SSL::START1 :END1 CL+SSL::END1
; :START2 CL+SSL::START2 :END2 CL+SSL::END2)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (OR NULL (SIMPLE-ARRAY * (*))).
; The second argument is a SEQUENCE, not a (OR NULL (SIMPLE-ARRAY * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (OR SIMPLE-BASE-STRING NULL).
; The second argument is a SEQUENCE, not a (OR NULL
; (SIMPLE-ARRAY CHARACTER (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (OR NULL
; (SIMPLE-ARRAY CHARACTER (*))).
; The second argument is a SEQUENCE, not a (OR SIMPLE-BASE-STRING NULL).
; (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 &OPTIONAL).
; 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
; &OPTIONAL).
; 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 &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; 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 64) comparison (cost 6) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; 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 &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; (> (- CL+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 64) comparison (cost 6) because:
; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; 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 #:STREAM45))
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; 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 SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (CL+SSL::ENSURE-SSL-FUNCALL STREAM #'PLUSP #'CL+SSL::SSL-WRITE CL+SSL::HANDLE
; CL+SSL::PTR CL+SSL::FILL-PTR)
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET WHEN IF FUNCALL
; ==>
; 1
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
; (PLUSP CL+SSL::FILL-PTR)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; (CL+SSL::ENSURE-SSL-FUNCALL STREAM #'PLUSP #'CL+SSL::SSL-WRITE CL+SSL::HANDLE
; CL+SSL::PTR CL+SSL::FILL-PTR)
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET WHEN IF FUNCALL
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET LET APPLY
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFUN X509-CERTIFICATE-NAMES
; (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
; 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)
; in: DEFUN MAKE-SSL-CLIENT-STREAM
; (ZEROP (CL+SSL::SSL-SET-CIPHER-LIST CL+SSL::HANDLE CL+SSL::CIPHER-LIST))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; 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 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; 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 SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; in: DEFUN GET-SELECTED-ALPN-PROTOCOL
; (CL+SSL::SSL-GET0-ALPN-SELECTED
; (CL+SSL::SSL-STREAM-HANDLE CL+SSL::SSL-STREAM) 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)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/streams-tmpOFPBS7B8.fasl
; compilation finished in 0:00:00.133
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/x509.lisp" (written 20 OCT 2024 03:56:35 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/x509-tmpN94P6QHO.fasl
; compilation finished in 0:00:00.053
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/random.lisp" (written 20 OCT 2024 03:56:35 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/random-tmp7PI54QD2.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/context.lisp" (written 20 OCT 2024 03:56:35 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/context-tmp2KPVYDA8.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/verify-hostname.lisp" (written 20 OCT 2024 03:56:35 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-plus-ssl/src/verify-hostname-tmp96FLK53O.fasl
; compilation finished in 0:00:00.130
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/drakma/packages.lisp" (written 20 OCT 2024 03:56:50 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/drakma/packages-tmpVXGJXF6B.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/drakma/specials.lisp" (written 20 OCT 2024 03:56:50 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/drakma/specials-tmp6TIYUV96.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/drakma/conditions.lisp" (written 20 OCT 2024 03:56:50 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/drakma/conditions-tmpSE0QLD5B.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/drakma/util.lisp" (written 20 OCT 2024 03:56:50 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/drakma/util.lisp
; in: DEFUN USER-AGENT-STRING
; (OR (LISP-IMPLEMENTATION-TYPE) "Common Lisp")
; --> IF
; ==>
; "Common Lisp"
;
; note: deleting unreachable code
; (OR (LISP-IMPLEMENTATION-VERSION) "")
; --> IF
; ==>
; ""
;
; note: deleting unreachable code
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/drakma/util-tmp65JBUOWY.fasl
; compilation finished in 0:00:00.093
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/drakma/read.lisp" (written 20 OCT 2024 03:56:50 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/drakma/read-tmpE8RY5GCJ.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/drakma/cookies.lisp" (written 20 OCT 2024 03:56:50 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/drakma/cookies-tmpK6B9YU0C.fasl
; compilation finished in 0:00:00.063
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/drakma/encoding.lisp" (written 20 OCT 2024 03:56:50 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/drakma/encoding-tmp6RAYVCZW.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/drakma/request.lisp" (written 20 OCT 2024 03:56:50 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/drakma/request-tmpA61ZVGEL.fasl
; compilation finished in 0:00:00.193
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/package.lisp" (written 20 OCT 2024 03:56:40 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/package-tmp4RW61Z3D.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/split-sequence.lisp" (written 20 OCT 2024 03:56:40 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/split-sequence-tmpLUSCH4I7.fasl
; compilation finished in 0:00:00.066
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/with-unique-names.lisp" (written 20 OCT 2024 03:56:40 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/with-unique-names-tmp7IXFX52H.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/once-only.lisp" (written 20 OCT 2024 03:56:40 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/once-only-tmp2R82LQR0.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/extremum.lisp" (written 20 OCT 2024 03:56:40 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-utilities/extremum.lisp
; in: DEFUN COMPARATOR
; (FUNCALL CL-UTILITIES::TEST (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::A)
; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::B))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST is not known to be a function
; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::A)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; KEY is not known to be a function
; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::B)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; KEY is not known to be a function
; in: DEFUN EXTREMUM
; (DEFUN CL-UTILITIES:EXTREMUM
; (SEQUENCE CL-UTILITIES::PREDICATE
; &KEY (CL-UTILITIES::KEY #'IDENTITY) (CL-UTILITIES::START 0)
; CL-UTILITIES::END)
; #<(SIMPLE-ARRAY CHARACTER
; (225)) Returns the element of SEQUENCE that would appear first if the
; sequence were ordered according to SORT using PREDICATE and KEY using
; an unstable sorting algorithm. See http://www.cliki.net/EXTREMUM fo... {100BA9452F}>
; (CL-UTILITIES::WITH-CHECK-LENGTH (SEQUENCE CL-UTILITIES::START
; CL-UTILITIES::END)
; (REDUCE
; (CL-UTILITIES::COMPARATOR CL-UTILITIES::PREDICATE CL-UTILITIES::KEY)
; SEQUENCE :START CL-UTILITIES::START :END CL-UTILITIES::END)))
; ==>
; (SB-IMPL::%DEFUN 'CL-UTILITIES:EXTREMUM
; (SB-INT:NAMED-LAMBDA CL-UTILITIES:EXTREMUM
; (SEQUENCE CL-UTILITIES::PREDICATE &KEY
; (CL-UTILITIES::KEY #'IDENTITY) (CL-UTILITIES::START 0)
; CL-UTILITIES::END)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; #<(SIMPLE-ARRAY CHARACTER
; (225)) Returns the element of SEQUENCE that would appear first if the
; sequence were ordered according to SORT using PREDICATE and KEY using
; an unstable sorting algorithm. See http://www.cliki.net/EXTREMUM fo... {100BA9452F}>
; (BLOCK CL-UTILITIES:EXTREMUM
; (CL-UTILITIES::WITH-CHECK-LENGTH (SEQUENCE
; CL-UTILITIES::START
; CL-UTILITIES::END)
; (REDUCE # SEQUENCE :START CL-UTILITIES::START :END
; CL-UTILITIES::END)))))
;
; caught STYLE-WARNING:
; Call to CL-UTILITIES::ZERO-LENGTH-P 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.
; in: DEFUN EXTREMUM-FASTKEY
; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::X)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; KEY is not known to be a function
; (FUNCALL CL-UTILITIES::PREDICATE CL-UTILITIES::X-KEY
; CL-UTILITIES::SMALLEST-KEY)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; PREDICATE is not known to be a function
; (CL-UTILITIES::WITH-CHECK-LENGTH (SEQUENCE CL-UTILITIES::START
; CL-UTILITIES::END)
; (LET* ((CL-UTILITIES::SMALLEST (ELT SEQUENCE 0))
; (CL-UTILITIES::SMALLEST-KEY
; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::SMALLEST))
; (CL-UTILITIES::CURRENT-INDEX 0)
; (CL-UTILITIES::REAL-END (OR CL-UTILITIES::END #)))
; (DECLARE
; (TYPE (INTEGER 0) CL-UTILITIES::CURRENT-INDEX CL-UTILITIES::REAL-END
; CL-UTILITIES::START)
; (FIXNUM CL-UTILITIES::CURRENT-INDEX CL-UTILITIES::REAL-END
; CL-UTILITIES::START))
; (MAP NIL
; #'(LAMBDA (CL-UTILITIES::X)
; (WHEN # #)
; (INCF CL-UTILITIES::CURRENT-INDEX))
; SEQUENCE)
; CL-UTILITIES::SMALLEST))
; --> IF OR LET IF >= OR LET IF
; ==>
; (LENGTH #:SEQUENCE1)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; --> IF OR LET IF
; ==>
; (>= #:START2 (OR #:END3 (LENGTH #:SEQUENCE1)))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
; (ELT SEQUENCE 0)
;
; 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.
; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::SMALLEST)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; KEY is not known to be a function
; (CL-UTILITIES::WITH-CHECK-LENGTH (SEQUENCE CL-UTILITIES::START
; CL-UTILITIES::END)
; (LET* ((CL-UTILITIES::SMALLEST (ELT SEQUENCE 0))
; (CL-UTILITIES::SMALLEST-KEY
; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::SMALLEST))
; (CL-UTILITIES::CURRENT-INDEX 0)
; (CL-UTILITIES::REAL-END (OR CL-UTILITIES::END #)))
; (DECLARE
; (TYPE (INTEGER 0) CL-UTILITIES::CURRENT-INDEX CL-UTILITIES::REAL-END
; CL-UTILITIES::START)
; (FIXNUM CL-UTILITIES::CURRENT-INDEX CL-UTILITIES::REAL-END
; CL-UTILITIES::START))
; (MAP NIL
; #'(LAMBDA (CL-UTILITIES::X)
; (WHEN # #)
; (INCF CL-UTILITIES::CURRENT-INDEX))
; SEQUENCE)
; CL-UTILITIES::SMALLEST))
; --> IF OR LET IF
; ==>
; (>= #:START2 (OR #:END3 (LENGTH #:SEQUENCE1)))
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/extremum-tmpN3B5JWXT.fasl
; compilation finished in 0:00:00.063
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/read-delimited.lisp" (written 20 OCT 2024 03:56:40 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/read-delimited-tmp5K3D12M0.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/expt-mod.lisp" (written 20 OCT 2024 03:56:40 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-utilities/expt-mod.lisp
; in: DEFUN EXPT-MOD
; (EXPT CL-UTILITIES::N CL-UTILITIES::EXPONENT)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES DOUBLE-FLOAT &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a INTEGER.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a INTEGER.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES DOUBLE-FLOAT &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR RATIONAL (COMPLEX RATIONAL)).
; The second argument is a NUMBER, not a INTEGER.
; (MOD (EXPT CL-UTILITIES::N CL-UTILITIES::EXPONENT) CL-UTILITIES::MODULUS)
;
; 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
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; The second argument is a REAL, not a INTEGER.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/expt-mod-tmpYZS9ORGN.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/compose.lisp" (written 20 OCT 2024 03:56:40 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/compose-tmpKA4LL4BN.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/collecting.lisp" (written 20 OCT 2024 03:56:40 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/collecting-tmpKRR1J698.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/rotate-byte.lisp" (written 20 OCT 2024 03:56:40 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/rotate-byte-tmp570ISN87.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/copy-array.lisp" (written 20 OCT 2024 03:56:40 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-utilities/copy-array-tmpIPPJG5IK.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/quri/src/port.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/quri/src/port-tmpCY2HPI62.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/quri/src/uri.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/quri/src/uri-tmpL4PLYSMQ.fasl
; compilation finished in 0:00:00.073
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/quri/src/error.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/quri/src/error-tmp90WIGG8R.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/quri/src/util.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/quri/src/util-tmpPHN42PM1.fasl
; compilation finished in 0:00:00.080
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/quri/src/encode.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/quri/src/encode-tmpFXGWJOII.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/quri/src/decode.lisp" (written 20 OCT 2024 03:57:37 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/quri/src/decode.lisp
; in: DEFUN URL-DECODE
; (QURI.UTIL:GOTO QURI.DECODE::PARSING)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; (QURI.UTIL:WITH-ARRAY-PARSING (CHAR QURI.DECODE::P QURI.DECODE::DATA
; QURI.DECODE::START QURI.DECODE::END
; (AND (NOT (STRINGP QURI.DECODE::DATA))
; #'CODE-CHAR))
; (QURI.DECODE::PARSING
; (COND ((CHAR= CHAR #\%) (QURI.UTIL:GONEXT))
; ((CHAR= CHAR #\+) (QURI.DECODE::WRITE-TO-BUFFER 32)
; (QURI.UTIL:REDO))
; (T (QURI.DECODE::WRITE-TO-BUFFER #) (QURI.UTIL:REDO))))
; (QURI.DECODE::PARSING-ENCODED-PART
; (SETQ QURI.DECODE::PARSING-ENCODED-PART CHAR) (QURI.UTIL:GONEXT))
; (QURI.DECODE::PARSING-ENCODED-PART-SECOND
; (HANDLER-BIND ((QURI.ERROR:URL-DECODING-ERROR #))
; (QURI.DECODE::WRITE-TO-BUFFER (+ # #)))
; (SETQ QURI.DECODE::PARSING-ENCODED-PART NIL)
; (QURI.UTIL:GOTO QURI.DECODE::PARSING))
; (:EOF
; (WHEN QURI.DECODE::PARSING-ENCODED-PART
; (ERROR 'QURI.ERROR:URL-DECODING-ERROR))))
; --> QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY LOCALLY SETQ THE IF
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; --> QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY LOCALLY SETQ THE IF
; --> AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; (QURI.UTIL:GONEXT)
; --> LOCALLY SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; --> LOCALLY SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; --> LOCALLY SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; --> LOCALLY SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; (QURI.UTIL:GOTO QURI.DECODE::PARSING)
; --> SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; --> SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; (QURI.UTIL:REDO)
; --> LOCALLY SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; --> LOCALLY SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; --> LOCALLY SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; --> LOCALLY SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; (QURI.UTIL:GOTO QURI.DECODE::PARSING)
;
; note: 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 &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; 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.
; The second argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; etc.
; (- QURI.DECODE::END QURI.DECODE::START)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (QURI.UTIL:WITH-ARRAY-PARSING (CHAR QURI.DECODE::P QURI.DECODE::DATA
; QURI.DECODE::START QURI.DECODE::END
; (AND (NOT (STRINGP QURI.DECODE::DATA))
; #'CODE-CHAR))
; (QURI.DECODE::PARSING
; (COND ((CHAR= CHAR #\%) (QURI.UTIL:GONEXT))
; ((CHAR= CHAR #\+) (QURI.DECODE::WRITE-TO-BUFFER 32)
; (QURI.UTIL:REDO))
; (T (QURI.DECODE::WRITE-TO-BUFFER #) (QURI.UTIL:REDO))))
; (QURI.DECODE::PARSING-ENCODED-PART
; (SETQ QURI.DECODE::PARSING-ENCODED-PART CHAR) (QURI.UTIL:GONEXT))
; (QURI.DECODE::PARSING-ENCODED-PART-SECOND
; (HANDLER-BIND ((QURI.ERROR:URL-DECODING-ERROR #))
; (QURI.DECODE::WRITE-TO-BUFFER (+ # #)))
; (SETQ QURI.DECODE::PARSING-ENCODED-PART NIL)
; (QURI.UTIL:GOTO QURI.DECODE::PARSING))
; (:EOF
; (WHEN QURI.DECODE::PARSING-ENCODED-PART
; (ERROR 'QURI.ERROR:URL-DECODING-ERROR))))
; --> QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY WHEN IF =
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; etc.
; (QURI.UTIL:REDO)
; --> LOCALLY INCF SETQ THE
; ==>
; (+ 1 QURI.DECODE::P)
;
; note: 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 &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; --> LOCALLY WHEN IF =
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; etc.
; --> LOCALLY INCF SETQ THE
; ==>
; (+ 1 QURI.DECODE::P)
;
; note: 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 &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; --> LOCALLY WHEN IF =
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; etc.
; (QURI.UTIL:GONEXT)
; --> LOCALLY INCF SETQ THE
; ==>
; (+ 1 QURI.DECODE::P)
;
; note: 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 &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; --> LOCALLY WHEN IF =
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; etc.
; --> LOCALLY INCF SETQ THE
; ==>
; (+ 1 QURI.DECODE::P)
;
; note: 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 &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; --> LOCALLY WHEN IF =
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; etc.
; (INCF QURI.DECODE::I)
; --> THE
; ==>
; (+ 1 QURI.DECODE::I)
;
; 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 1) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (QURI.UTIL:GOTO QURI.DECODE::PARSING)
; --> INCF SETQ THE
; ==>
; (+ 1 QURI.DECODE::P)
;
; note: 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 &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; --> WHEN IF =
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; etc.
; in: DEFUN URL-DECODE-PARAMS
; (QURI.UTIL:WITH-ARRAY-PARSING (CHAR QURI.DECODE::P QURI.DECODE::DATA
; QURI.DECODE::START QURI.DECODE::END
; (AND (NOT (STRINGP QURI.DECODE::DATA))
; #'CODE-CHAR))
; (QURI.DECODE::START (SETQ QURI.DECODE::START-MARK QURI.DECODE::P)
; (IF QURI.DECODE::LENIENT
; (COND (# # #) (# #))
; (WHEN (OR # #) (ERROR 'QURI.ERROR:URI-MALFORMED-URLENCODED-STRING)))
; (QURI.UTIL:GONEXT))
; (QURI.DECODE::PARSING-FIELD
; (COND ((CHAR= CHAR #\=) (SETQ #) (QURI.UTIL:GONEXT))
; ((CHAR= CHAR QURI.DECODE::DELIMITER)
; (QURI.DECODE::COLLECT-FIELD QURI.DECODE::P)
; (QURI.UTIL:GOTO QURI.DECODE::START)))
; (QURI.UTIL:REDO))
; (QURI.DECODE::PARSING-VALUE
; (COND ((CHAR= CHAR #\=) (UNLESS QURI.DECODE::LENIENT #))
; ((CHAR= CHAR QURI.DECODE::DELIMITER)
; (QURI.DECODE::COLLECT-PAIR QURI.DECODE::P)
; (QURI.UTIL:GOTO QURI.DECODE::START)))
; (QURI.UTIL:REDO))
; (:EOF
; (COND (QURI.DECODE::=-MARK (QURI.DECODE::COLLECT-PAIR QURI.DECODE::P))
; (QURI.DECODE::START-MARK
; (QURI.DECODE::COLLECT-FIELD QURI.DECODE::P)))))
; --> QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY LOCALLY SETQ THE IF
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; --> QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY LOCALLY SETQ THE IF
; --> AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; (QURI.UTIL:GOTO QURI.DECODE::PARSING-VALUE)
; --> SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; --> SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; (QURI.UTIL:REDO)
; --> LOCALLY SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; --> LOCALLY SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; (QURI.UTIL:GONEXT)
; --> LOCALLY SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; --> LOCALLY SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; --> LOCALLY SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; --> LOCALLY SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; (QURI.UTIL:GOTO QURI.DECODE::START)
; --> SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; --> SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; (QURI.UTIL:REDO)
; --> LOCALLY SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; --> LOCALLY SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; (QURI.UTIL:GOTO QURI.DECODE::START)
; --> SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; --> SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; (QURI.UTIL:REDO)
; --> LOCALLY SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; --> LOCALLY SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
; (QURI.UTIL:WITH-ARRAY-PARSING (CHAR QURI.DECODE::P QURI.DECODE::DATA
; QURI.DECODE::START QURI.DECODE::END
; (AND (NOT (STRINGP QURI.DECODE::DATA))
; #'CODE-CHAR))
; (QURI.DECODE::START (SETQ QURI.DECODE::START-MARK QURI.DECODE::P)
; (IF QURI.DECODE::LENIENT
; (COND (# # #) (# #))
; (WHEN (OR # #) (ERROR 'QURI.ERROR:URI-MALFORMED-URLENCODED-STRING)))
; (QURI.UTIL:GONEXT))
; (QURI.DECODE::PARSING-FIELD
; (COND ((CHAR= CHAR #\=) (SETQ #) (QURI.UTIL:GONEXT))
; ((CHAR= CHAR QURI.DECODE::DELIMITER)
; (QURI.DECODE::COLLECT-FIELD QURI.DECODE::P)
; (QURI.UTIL:GOTO QURI.DECODE::START)))
; (QURI.UTIL:REDO))
; (QURI.DECODE::PARSING-VALUE
; (COND ((CHAR= CHAR #\=) (UNLESS QURI.DECODE::LENIENT #))
; ((CHAR= CHAR QURI.DECODE::DELIMITER)
; (QURI.DECODE::COLLECT-PAIR QURI.DECODE::P)
; (QURI.UTIL:GOTO QURI.DECODE::START)))
; (QURI.UTIL:REDO))
; (:EOF
; (COND (QURI.DECODE::=-MARK (QURI.DECODE::COLLECT-PAIR QURI.DECODE::P))
; (QURI.DECODE::START-MARK
; (QURI.DECODE::COLLECT-FIELD QURI.DECODE::P)))))
; --> QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY WHEN IF =
; ==>
; 1
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; etc.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/quri/src/decode-tmp61U154E8.fasl
; compilation finished in 0:00:00.066
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/quri/src/uri/ftp.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/quri/src/uri/ftp-tmpJL840EJB.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/quri/src/uri/http.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/quri/src/uri/http-tmpP6WT67MY.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/quri/src/uri/ldap.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/quri/src/uri/ldap-tmpHKLMC92Z.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/quri/src/uri/file.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/quri/src/uri/file-tmpI2PYUEMW.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/quri/src/etld.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/quri/src/etld-tmpOKTALX52.fasl
; compilation finished in 0:00:02.660
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/quri/src/domain.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/quri/src/domain-tmpGJIHCBMO.fasl
; compilation finished in 0:00:00.053
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/quri/src/parser.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/quri/src/parser-tmp59XTDCD6.fasl
; compilation finished in 0:00:00.343
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/quri/src/quri.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/quri/src/quri-tmp1Z52HZRL.fasl
; compilation finished in 0:00:00.053
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gopher/cl-gopher-package.lisp" (written 20 OCT 2024 03:56:33 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gopher/cl-gopher-package-tmp24DFEJ91.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gopher/cl-gopher.lisp" (written 20 OCT 2024 03:56:33 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gopher/cl-gopher-tmpIGJ98JSU.fasl
; compilation finished in 0:00:00.166
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-gopher/client.lisp" (written 20 OCT 2024 03:56:33 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-gopher/client-tmpP7GRL47U.fasl
; compilation finished in 0:00:00.043
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-difflib/package.lisp" (written 20 OCT 2024 03:56:30 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-difflib/package-tmp6WQCTWZY.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-difflib/difflib.lisp" (written 20 OCT 2024 03:56:30 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-difflib/difflib-tmp1RW346KS.fasl
; compilation finished in 0:00:00.146
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-html-diff/html-diff.lisp" (written 20 OCT 2024 03:56:33 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-html-diff/html-diff-tmpDHMOASYF.fasl
; compilation finished in 0:00:00.060
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-json/src/package.lisp" (written 20 OCT 2024 03:56:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-json/src/package-tmpLV9XXT6H.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-json/src/common.lisp" (written 20 OCT 2024 03:56:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-json/src/common-tmp49ODV8UF.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-json/src/objects.lisp" (written 20 OCT 2024 03:56:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-json/src/objects-tmpCGWUF3C1.fasl
; compilation finished in 0:00:00.110
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-json/src/camel-case.lisp" (written 20 OCT 2024 03:56:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-json/src/camel-case-tmpWYLQBKV1.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-json/src/decoder.lisp" (written 20 OCT 2024 03:56:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-json/src/decoder-tmpQZJT0GSW.fasl
; compilation finished in 0:00:00.146
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-json/src/encoder.lisp" (written 20 OCT 2024 03:56:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-json/src/encoder-tmp80IHNYG7.fasl
; compilation finished in 0:00:00.083
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-json/src/utils.lisp" (written 20 OCT 2024 03:56:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-json/src/utils-tmp4W6239QB.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-json/src/json-rpc.lisp" (written 20 OCT 2024 03:56:34 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-json/src/json-rpc-tmpPLIY2OU6.fasl
; compilation finished in 0:00:00.073
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/packages.lisp" (written 20 OCT 2024 03:56:40 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/packages-tmpDQVK0IID.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/specials.lisp" (written 20 OCT 2024 03:56:40 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/specials-tmp4IEM0NNS.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/util.lisp" (written 20 OCT 2024 03:56:40 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/util-tmpIBGLG2RO.fasl
; compilation finished in 0:00:00.053
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/build/util.lisp" (written 20 OCT 2024 03:56:40 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-unicode/build/util.lisp
; in: DEFVAR *THIS-FILE*
; (OR
; #P"/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/build/util.lisp"
; *LOAD-PATHNAME*)
; --> IF
; ==>
; *LOAD-PATHNAME*
;
; note: deleting unreachable code
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/build/util-tmpEGCLAL00.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/build/char-info.lisp" (written 20 OCT 2024 03:56:40 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/build/char-info-tmpSZHJVKDY.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/build/read.lisp" (written 20 OCT 2024 03:56:40 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/build/read-tmpUAHIESL5.fasl
; compilation finished in 0:00:00.066
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/build/dump.lisp" (written 20 OCT 2024 03:56:40 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/build/dump-tmpW9B68D3X.fasl
; compilation finished in 0:00:00.070
;;; Parsing Unicode file UnicodeData.txt
;;; Parsing Unicode file Scripts.txt
;;; Parsing Unicode file Blocks.txt
;;; Parsing Unicode file WordBreakProperty.txt
;;; Parsing Unicode file PropList.txt
;;; Parsing Unicode file DerivedAge.txt
;;; Parsing Unicode file BidiMirroring.txt
;;; Parsing Unicode file Jamo.txt
;;; Parsing Unicode file PropertyAliases.txt
;;; Building hash tables
;;; Writing source file methods.lisp
;;; Writing source file hash-tables.lisp
;;; Writing source file lists.lisp
;;; Writing source file derived-properties
;;; Parsing Unicode file DerivedCoreProperties.txt
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/conditions.lisp" (written 20 OCT 2024 03:56:40 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/conditions-tmpIEKBGFG3.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/lists.lisp" (written 10 MAY 2025 08:04:20 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/lists-tmpK26E5ZH.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/hash-tables.lisp" (written 10 MAY 2025 08:04:20 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/hash-tables-tmpVCL2WD00.fasl
; compilation finished in 0:00:00.896
;;; Computing Hangul syllable names
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/api.lisp" (written 20 OCT 2024 03:56:40 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-unicode/api.lisp
; in: DEFUN LIST-ALL-CHARACTERS
; (IF CL-UNICODE::WANT-CODE-POINT-P
; CL-UNICODE:+CODE-POINT-LIMIT+
; CHAR-CODE-LIMIT)
;
; note: deleting unreachable code
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/api-tmpZQ9PPEAP.fasl
; compilation finished in 0:00:00.090
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/methods.lisp" (written 10 MAY 2025 08:04:20 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/methods-tmpNRJPZMRB.fasl
; compilation finished in 0:00:00.153
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/test-functions.lisp" (written 20 OCT 2024 03:56:40 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/test-functions-tmpPP68IXIC.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/derived.lisp" (written 20 OCT 2024 03:56:40 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/derived-tmpR43VJ9D9.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/alias.lisp" (written 20 OCT 2024 03:56:40 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-unicode/alias-tmpRFKXLIA4.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/cl-ppcre-unicode/packages.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/cl-ppcre-unicode/packages-tmpULFHDN08.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/cl-ppcre-unicode/resolver.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-ppcre/cl-ppcre-unicode/resolver-tmpOPRDPHFK.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/moptilities/dev/moptilities.lisp" (written 20 OCT 2024 03:57:19 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/moptilities/dev/moptilities.lisp
; in: DEFUN CARE-WHEN-FINALIZED
; (FINALIZE METABANG.MOPTILITIES::OBJECT 'METABANG.MOPTILITIES:WHEN-FINALIZED)
;
; caught STYLE-WARNING:
; The function WHEN-FINALIZED is called by SB-EXT:FINALIZE with zero arguments, but wants exactly one.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/moptilities/dev/moptilities-tmp8WFA6KMU.fasl
; compilation finished in 0:00:00.106
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/s-xml/src/package.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/s-xml/src/package-tmpZIM0NZGF.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/s-xml/src/xml.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/s-xml/src/xml-tmp3R1UUX74.fasl
; compilation finished in 0:00:00.110
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/s-xml/src/dom.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/s-xml/src/dom-tmpJE96SV6A.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/s-xml/src/lxml-dom.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/s-xml/src/lxml-dom-tmpM126WEAV.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/s-xml/src/sxml-dom.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/s-xml/src/sxml-dom-tmpS2HNWOVW.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/s-xml/src/xml-struct-dom.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/s-xml/src/xml-struct-dom-tmpR3PRZE8Z.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/usocket/server.lisp" (written 20 OCT 2024 03:57:59 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/usocket/server.lisp
; in: DEFUN SOCKET-SERVER
; (DEFUN USOCKET:SOCKET-SERVER
; (USOCKET::HOST USOCKET::PORT FUNCTION
; &OPTIONAL USOCKET::ARGUMENTS
; &KEY USOCKET::IN-NEW-THREAD (USOCKET::PROTOCOL :STREAM)
; (USOCKET::TIMEOUT 1)
; (USOCKET::MAX-BUFFER-SIZE USOCKET:+MAX-DATAGRAM-PACKET-SIZE+)
; USOCKET::ELEMENT-TYPE (USOCKET::REUSE-ADDRESS T) ...)
; (LET* ((USOCKET::REAL-HOST (OR USOCKET::HOST USOCKET:*WILDCARD-HOST*))
; (USOCKET:SOCKET (ECASE USOCKET::PROTOCOL # #)))
; (LABELS ((USOCKET::REAL-CALL #
; #))
; (IF USOCKET::IN-NEW-THREAD
; (VALUES # USOCKET:SOCKET)
; (PROGN # #)))))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA USOCKET:SOCKET-SERVER
; (USOCKET::HOST USOCKET::PORT FUNCTION &OPTIONAL USOCKET::ARGUMENTS &KEY
; USOCKET::IN-NEW-THREAD (USOCKET::PROTOCOL :STREAM)
; (USOCKET::TIMEOUT 1)
; (USOCKET::MAX-BUFFER-SIZE USOCKET:+MAX-DATAGRAM-PACKET-SIZE+)
; USOCKET::ELEMENT-TYPE (USOCKET::REUSE-ADDRESS T) ...)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK USOCKET:SOCKET-SERVER
; (LET* ((USOCKET::REAL-HOST #) (USOCKET:SOCKET #))
; (LABELS (#)
; (IF USOCKET::IN-NEW-THREAD
; #
; #)))))
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: (HOST PORT FUNCTION &OPTIONAL
; ARGUMENTS &KEY IN-NEW-THREAD
; (PROTOCOL STREAM)
; (TIMEOUT 1)
; (MAX-BUFFER-SIZE
; +MAX-DATAGRAM-PACKET-SIZE+)
; ELEMENT-TYPE
; (REUSE-ADDRESS T)
; MULTI-THREADING NAME)
; in: DEFUN UDP-EVENT-LOOP
; (DEFUN USOCKET::UDP-EVENT-LOOP
; (USOCKET:SOCKET FUNCTION
; &OPTIONAL USOCKET::ARGUMENTS
; &KEY USOCKET::TIMEOUT USOCKET::MAX-BUFFER-SIZE)
; (LET ((USOCKET::BUFFER
; (MAKE-ARRAY USOCKET::MAX-BUFFER-SIZE :ELEMENT-TYPE '#
; :INITIAL-ELEMENT 0))
; (USOCKET::SOCKETS (LIST USOCKET:SOCKET)))
; (UNWIND-PROTECT (LOOP DO (MULTIPLE-VALUE-BIND # # # #))
; (USOCKET:SOCKET-CLOSE USOCKET:SOCKET)
; (VALUES))))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA USOCKET::UDP-EVENT-LOOP
; (USOCKET:SOCKET FUNCTION &OPTIONAL USOCKET::ARGUMENTS &KEY
; USOCKET::TIMEOUT USOCKET::MAX-BUFFER-SIZE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK USOCKET::UDP-EVENT-LOOP
; (LET ((USOCKET::BUFFER #) (USOCKET::SOCKETS #))
; (UNWIND-PROTECT (LOOP DO #)
; (USOCKET:SOCKET-CLOSE USOCKET:SOCKET)
; (VALUES)))))
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: (SOCKET FUNCTION &OPTIONAL
; ARGUMENTS &KEY
; TIMEOUT
; MAX-BUFFER-SIZE)
; in: DEFUN TCP-EVENT-LOOP
; (DEFUN USOCKET::TCP-EVENT-LOOP
; (USOCKET:SOCKET FUNCTION
; &OPTIONAL USOCKET::ARGUMENTS
; &KEY USOCKET::ELEMENT-TYPE USOCKET::MULTI-THREADING)
; (LET ((USOCKET::REAL-FUNCTION #'(LAMBDA # #)))
; (UNWIND-PROTECT (LOOP DO (BLOCK CONTINUE #))
; (USOCKET:SOCKET-CLOSE USOCKET:SOCKET)
; (VALUES))))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA USOCKET::TCP-EVENT-LOOP
; (USOCKET:SOCKET FUNCTION &OPTIONAL USOCKET::ARGUMENTS &KEY
; USOCKET::ELEMENT-TYPE USOCKET::MULTI-THREADING)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK USOCKET::TCP-EVENT-LOOP
; (LET ((USOCKET::REAL-FUNCTION #'#))
; (UNWIND-PROTECT (LOOP DO #)
; (USOCKET:SOCKET-CLOSE USOCKET:SOCKET)
; (VALUES)))))
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: (SOCKET FUNCTION &OPTIONAL
; ARGUMENTS &KEY
; ELEMENT-TYPE
; MULTI-THREADING)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/usocket/server-tmpBE4ZJXFG.fasl
; compilation finished in 0:00:00.030
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/s-sysdeps/src/package.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/s-sysdeps/src/package-tmpICLLCELY.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/s-sysdeps/src/sysdeps.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/s-sysdeps/src/sysdeps-tmpGJJYZTZA.fasl
; compilation finished in 0:00:00.090
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-prevalence/src/package.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-prevalence/src/package-tmpO5YPH4GB.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-prevalence/src/serialization/serialization.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-prevalence/src/serialization/serialization-tmpCVBSS8KL.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-prevalence/src/serialization/xml.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-prevalence/src/serialization/xml-tmpWOI7FLUF.fasl
; compilation finished in 0:00:00.100
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-prevalence/src/serialization/sexp.lisp" (written 20 OCT 2024 03:56:36 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-prevalence/src/serialization/sexp.lisp
; in: DEFGENERIC SERIALIZE-SEXP-INTERNAL
; (CLOSER-MOP:DEFGENERIC S-SERIALIZATION::SERIALIZE-SEXP-INTERNAL
; (S-SERIALIZATION::OBJECT STREAM S-SERIALIZATION::SERIALIZATION-STATE)
; (:DOCUMENTATION
; "Write a serialized version of object to stream using s-expressions"))
; ==>
; (EVAL-WHEN (:COMPILE-TOPLEVEL)
; (DEFGENERIC S-SERIALIZATION::SERIALIZE-SEXP-INTERNAL
; (S-SERIALIZATION::OBJECT STREAM S-SERIALIZATION::SERIALIZATION-STATE)
; (:DOCUMENTATION
; "Write a serialized version of object to stream using s-expressions")))
;
; caught STYLE-WARNING:
; redefining S-SERIALIZATION::SERIALIZE-SEXP-INTERNAL in DEFGENERIC
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-prevalence/src/serialization/sexp-tmpYSK53869.fasl
; compilation finished in 0:00:00.076
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-prevalence/src/prevalence.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-prevalence/src/prevalence-tmpUIKNFBUS.fasl
; compilation finished in 0:00:00.103
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-prevalence/src/managed-prevalence.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-prevalence/src/managed-prevalence-tmpEEFFEPQ0.fasl
; compilation finished in 0:00:00.066
WARNING: redefining CL-PREVALENCE:GET-ID in DEFGENERIC
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-prevalence/src/master-slave.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-prevalence/src/master-slave-tmpXUIGXRCX.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-prevalence/src/blob.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-prevalence/src/blob-tmp5WEDM9IY.fasl
; compilation finished in 0:00:00.030
WARNING: redefining CL-PREVALENCE:GET-NAME in DEFGENERIC
WARNING: redefining (COMMON-LISP:SETF CL-PREVALENCE:GET-NAME) in DEFGENERIC
WARNING: redefining CL-PREVALENCE:GET-SIZE in DEFGENERIC
WARNING: redefining CL-PREVALENCE:GET-MIME-TYPE in DEFGENERIC
WARNING: redefining (COMMON-LISP:SETF CL-PREVALENCE:GET-MIME-TYPE) in DEFGENERIC
WARNING: redefining CL-PREVALENCE:GET-KEYWORDS in DEFGENERIC
WARNING: redefining (COMMON-LISP:SETF CL-PREVALENCE:GET-KEYWORDS) in DEFGENERIC
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/salza2/package.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/salza2/package-tmpG3DC7RC6.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/salza2/reset.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/salza2/reset-tmp7RSTX2RJ.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/salza2/specials.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/salza2/specials-tmpMYAZIBWI.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/salza2/types.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/salza2/types-tmp93L20JIY.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/salza2/checksum.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/salza2/checksum-tmpTC0DH7S0.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/salza2/adler32.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/salza2/adler32-tmpC2C32579.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/salza2/crc32.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/salza2/crc32-tmpK1GRILVK.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/salza2/chains.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/salza2/chains-tmpDO67TKN4.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/salza2/bitstream.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/salza2/bitstream-tmpABZ5EEBJ.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/salza2/matches.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/salza2/matches-tmp2E3UPG8J.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/salza2/compress.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/salza2/compress-tmpJ9Q6NV59.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/salza2/huffman.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/salza2/huffman-tmpAD6DHN5B.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/salza2/closures.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/salza2/closures-tmpEV76XDJ7.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/salza2/utilities.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/salza2/utilities-tmp6NE9XUCB.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/salza2/compressor.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/salza2/compressor-tmpHG4AAN1T.fasl
; compilation finished in 0:00:00.070
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/salza2/zlib.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/salza2/zlib-tmp6TLO0BDD.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/salza2/gzip.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/salza2/gzip-tmpDAM8R5KO.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/salza2/user.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/salza2/user-tmp4TY0DSV3.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/salza2/stream.lisp" (written 20 OCT 2024 03:57:37 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/salza2/stream-tmp1EP92JDZ.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/zpng/package.lisp" (written 20 OCT 2024 03:57:59 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/zpng/package-tmpN31RJKRX.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/zpng/specials.lisp" (written 20 OCT 2024 03:57:59 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/zpng/specials-tmpVUDMB0W.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/zpng/utils.lisp" (written 20 OCT 2024 03:57:59 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/zpng/utils-tmpX006N2E0.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/zpng/chunk.lisp" (written 20 OCT 2024 03:57:59 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/zpng/chunk-tmp2P9ZYT3W.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/zpng/conditions.lisp" (written 20 OCT 2024 03:57:59 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/zpng/conditions-tmpIRDHF4NY.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/zpng/png.lisp" (written 20 OCT 2024 03:57:59 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/zpng/png-tmpZQGFPZZG.fasl
; compilation finished in 0:00:00.096
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/packages.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/packages-tmpD8ZAKKTH.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/utils/util.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/utils/util-tmpXFX3XZA7.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/rs-ecc/galois.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/rs-ecc/galois-tmpC7LYFQGW.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/rs-ecc/bch-ecc.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/rs-ecc/bch-ecc-tmpOP8PI1I.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/rs-ecc/rs-ecc.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/rs-ecc/rs-ecc-tmp5WHUATJM.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/qrencode/modes.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/qrencode/modes-tmpYMPY11OZ.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/qrencode/qrspec.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/qrencode/qrspec-tmpI40JKAEZ.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/qrencode/input.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/qrencode/input-tmpCKVV7OOP.fasl
; compilation finished in 0:00:00.070
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/qrencode/bstream.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/qrencode/bstream-tmpXM4X27TT.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/qrencode/codeword.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/qrencode/codeword-tmpS3BJFVDU.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/qrencode/matrix.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/qrencode/matrix-tmpY7P0ERFD.fasl
; compilation finished in 0:00:00.050
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/qrencode/mask.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/qrencode/mask-tmp9VCTZ4SY.fasl
; compilation finished in 0:00:00.043
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/qrencode/encode.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/qrencode/encode-tmpN5GQHUKR.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/image/png.lisp" (written 20 OCT 2024 03:56:36 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-qrencode/image/png-tmpOYM2VSHB.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-tld/package.lisp" (written 20 OCT 2024 03:56:39 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-tld/package-tmpRE46TLRG.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-tld/cl-tld.lisp" (written 20 OCT 2024 03:56:39 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-tld/cl-tld-tmp6CGZHV5D.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-tld/test.lisp" (written 20 OCT 2024 03:56:39 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-tld/test-tmp2AYMYUTU.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/dissect/package.lisp" (written 20 OCT 2024 03:56:48 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/dissect/package-tmpUSI527R.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/dissect/toolkit.lisp" (written 20 OCT 2024 03:56:48 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/dissect/toolkit-tmpHX59HQXM.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/dissect/interface.lisp" (written 20 OCT 2024 03:56:48 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/dissect/interface.lisp
; in: DEFUN RESTARTS
; (DEFUN DISSECT:RESTARTS (&OPTIONAL CONDITION))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA DISSECT:RESTARTS
; (&OPTIONAL CONDITION)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK DISSECT:RESTARTS))
;
; caught STYLE-WARNING:
; The variable CONDITION is defined but never used.
; in: DECLAIM (INLINE CAPTURE-ENVIRONMENT)
; (DECLAIM (INLINE DISSECT:CAPTURE-ENVIRONMENT))
; ==>
; (SB-C::%PROCLAIM '(INLINE DISSECT:CAPTURE-ENVIRONMENT) (SB-C:SOURCE-LOCATION))
;
; caught STYLE-WARNING:
; Proclaiming DISSECT:CAPTURE-ENVIRONMENT to be INLINE, but 1 call to it was
; previously compiled. A declaration of NOTINLINE at the call site will eliminate
; this warning, as will proclaiming and defining the function before its first
; potential use.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/dissect/interface-tmpL3F4361.fasl
; compilation finished in 0:00:00.046
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/dissect/backend/sbcl.lisp" (written 20 OCT 2024 03:56:48 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/dissect/backend/sbcl-tmpCAD6Q7RY.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/dissect/documentation.lisp" (written 20 OCT 2024 03:56:48 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/dissect/documentation-tmpG2IW63VD.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/proc-parse/src/proc-parse.lisp" (written 20 OCT 2024 03:57:35 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/proc-parse/src/proc-parse-tmpL5C81NPH.fasl
; compilation finished in 0:00:00.143
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/xsubseq/src/xsubseq.lisp" (written 20 OCT 2024 03:57:59 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/xsubseq/src/xsubseq-tmpUSWSVFQ8.fasl
; compilation finished in 0:00:00.120
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/smart-buffer/src/smart-buffer.lisp" (written 20 OCT 2024 03:57:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/smart-buffer/src/smart-buffer-tmpSWSOKXO5.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/fast-http/src/http.lisp" (written 20 OCT 2024 03:56:56 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/fast-http/src/http-tmp7RN5HHAD.fasl
; compilation finished in 0:00:00.070
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/fast-http/src/error.lisp" (written 20 OCT 2024 03:56:56 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/fast-http/src/error-tmp1KNNC72G.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/fast-http/src/byte-vector.lisp" (written 20 OCT 2024 03:56:56 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/fast-http/src/byte-vector-tmpDJLL20WM.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/fast-http/src/util.lisp" (written 20 OCT 2024 03:56:56 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/fast-http/src/util.lisp
; in: DEFUN NUMBER-STRING-P
; (RETURN-FROM FAST-HTTP.UTIL:NUMBER-STRING-P NIL)
;
; note: deleting unreachable code
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/fast-http/src/util-tmpVH74E143.fasl
; compilation finished in 0:00:00.056
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/fast-http/src/parser.lisp" (written 20 OCT 2024 03:56:56 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/fast-http/src/parser.lisp
; in: DEFUN-SPEEDY PARSE-HEADER-VALUE
; (PROC-PARSE:WITH-OCTETS-PARSING (FAST-HTTP.PARSER::DATA :START
; FAST-HTTP.PARSER::START :END
; FAST-HTTP.PARSER::END)
; (PROC-PARSE:SKIP* (NOT #\Return))
; (PROC-PARSE:ADVANCE)
; (PROC-PARSE:SKIP #\Newline)
; (WHEN FAST-HTTP.PARSER::FIELD-START
; (FAST-HTTP.PARSER::CALLBACK-DATA :HEADER-FIELD FAST-HTTP.HTTP:HTTP
; FAST-HTTP.PARSER:CALLBACKS
; FAST-HTTP.PARSER::DATA
; FAST-HTTP.PARSER::FIELD-START
; FAST-HTTP.PARSER::FIELD-END))
; (FAST-HTTP.PARSER::CALLBACK-DATA :HEADER-VALUE FAST-HTTP.HTTP:HTTP
; FAST-HTTP.PARSER:CALLBACKS
; FAST-HTTP.PARSER::DATA
; FAST-HTTP.PARSER::START
; (- (PROC-PARSE:POS) 2))
; (PROC-PARSE:POS))
; --> LET OR LET IF
; ==>
; (LENGTH #:DATA5)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN-SPEEDY PARSE-HEADER-VALUE-CONTENT-LENGTH
; (* 10 FAST-HTTP.PARSER::CONTENT-LENGTH)
;
; note: 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 (OR (INTEGER * -10) (INTEGER 0 0) (INTEGER 10))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES (OR (INTEGER * -10) (INTEGER 0 0) (INTEGER 10))
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (+ (* 10 FAST-HTTP.PARSER::CONTENT-LENGTH)
; (FAST-HTTP.BYTE-VECTOR:DIGIT-BYTE-CHAR-TO-INTEGER (PROC-PARSE:CURRENT)))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (INTEGER * -10) (INTEGER 0 0) (INTEGER 10)), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (OR (INTEGER * -10) (INTEGER 0 0) (INTEGER 10)), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFUN-SPEEDY PARSE-HEADER-LINE
; (<= FAST-HTTP.PARSER::END FAST-HTTP.PARSER::START)
;
; 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 INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; etc.
; in: DEFUN-SPEEDY READ-BODY-DATA
; (- FAST-HTTP.PARSER::END FAST-HTTP.PARSER::START)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (<= (FAST-HTTP.HTTP:HTTP-CONTENT-LENGTH FAST-HTTP.HTTP:HTTP)
; FAST-HTTP.PARSER::READABLE-COUNT)
;
; 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 INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; etc.
; (+ FAST-HTTP.PARSER::START
; (FAST-HTTP.HTTP:HTTP-CONTENT-LENGTH FAST-HTTP.HTTP:HTTP))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (DECF (FAST-HTTP.HTTP:HTTP-CONTENT-LENGTH FAST-HTTP.HTTP:HTTP)
; FAST-HTTP.PARSER::READABLE-COUNT)
; --> 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 &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFUN-SPEEDY PARSE-CHUNKED-BODY
; (= FAST-HTTP.PARSER::START FAST-HTTP.PARSER::END)
;
; 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 INTEGER, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; etc.
; (* 16 (FAST-HTTP.HTTP:HTTP-CONTENT-LENGTH FAST-HTTP.HTTP:HTTP))
;
; note: forced to do full call
; unable to do inline ASH (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR (INTEGER * -16) (INTEGER 0 0) (INTEGER 16))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline ASH (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR (INTEGER * -16) (INTEGER 0 0) (INTEGER 16))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
; (+ (* 16 (FAST-HTTP.HTTP:HTTP-CONTENT-LENGTH FAST-HTTP.HTTP:HTTP))
; FAST-HTTP.PARSER::UNHEX-VAL)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (INTEGER * -16) (INTEGER 0 0) (INTEGER 16)), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (OR (INTEGER * -16) (INTEGER 0 0) (INTEGER 16)), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/fast-http/src/parser-tmpCEJA5HFB.fasl
; compilation finished in 0:00:06.356
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/fast-http/src/multipart-parser.lisp" (written 20 OCT 2024 03:56:56 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/fast-http/src/multipart-parser-tmp6GEAK2GT.fasl
; compilation finished in 0:00:00.100
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/fast-http/src/fast-http.lisp" (written 20 OCT 2024 03:56:56 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/fast-http/src/fast-http.lisp
; in: DEFUN-CAREFUL MAKE-PARSER
; (STRING= FAST-HTTP::PARSING-HEADER-FIELD "set-cookie")
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR NULL
; (SIMPLE-ARRAY CHARACTER
; (*))), not a (SIMPLE-ARRAY CHARACTER (*)).
; (CONCATENATE 'STRING (THE SIMPLE-STRING FAST-HTTP::PREVIOUS-VALUE) ", "
; FAST-HTTP::HEADER-VALUE)
; --> LET PROGN UNLESS IF TYPEP
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a T, not a (NOT SB-KERNEL:EXTENDED-SEQUENCE).
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/fast-http/src/fast-http-tmp1WEO8P7C.fasl
; compilation finished in 0:00:00.086
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/static-vectors/src/pkgdcl.lisp" (written 20 OCT 2024 03:57:45 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/static-vectors/src/pkgdcl-tmp8QS36HP2.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/static-vectors/src/constantp.lisp" (written 20 OCT 2024 03:57:45 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/static-vectors/src/constantp-tmpV83UE4D2.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/static-vectors/src/impl-sbcl.lisp" (written 20 OCT 2024 03:57:45 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/static-vectors/src/impl-sbcl-tmpUECJMKRU.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/static-vectors/src/constructor.lisp" (written 20 OCT 2024 03:57:45 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/static-vectors/src/constructor-tmpBIKN0GEV.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/static-vectors/src/cffi-type-translator.lisp" (written 20 OCT 2024 03:57:45 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/static-vectors/src/cffi-type-translator-tmpN9OLPRYR.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/fast-io/src/package.lisp" (written 20 OCT 2024 03:56:56 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/fast-io/src/package-tmp7J8EIAY6.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/fast-io/src/types.lisp" (written 20 OCT 2024 03:56:56 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/fast-io/src/types-tmpNHY1ORP1.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/fast-io/src/io.lisp" (written 20 OCT 2024 03:56:56 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/fast-io/src/io-tmpGLFY77HZ.fasl
; compilation finished in 0:00:00.466
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/fast-io/src/gray.lisp" (written 20 OCT 2024 03:56:56 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/fast-io/src/gray-tmpZJMS8UWP.fasl
; compilation finished in 0:00:00.053
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/local-time/src/package.lisp" (written 20 OCT 2024 03:57:14 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/local-time/src/package-tmp8RMUI7L9.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/local-time/src/local-time.lisp" (written 20 OCT 2024 03:57:14 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/local-time/src/local-time.lisp
; in: DEFPARAMETER *DEFAULT-TIMEZONE-REPOSITORY-PATH*
; (OR
; #P"/home/buildozer/aports/community/nyxt/src/_build/local-time/src/local-time.lisp"
; *LOAD-TRUENAME*)
; --> IF
; ==>
; *LOAD-TRUENAME*
;
; note: deleting unreachable code
; in: DEFUN TIMESTAMP-MINIMIZE-PART
; (IF LOCAL-TIME::TIMEZONE
; NIL
; LOCAL-TIME::OFFSET)
;
; note: deleting unreachable code
; in: DEFUN TIMESTAMP-MAXIMIZE-PART
; (IF LOCAL-TIME::TIMEZONE
; NIL
; LOCAL-TIME::OFFSET)
;
; note: deleting unreachable code
; in: %DEFCOMPARATOR TIMESTAMP<=
; (LOCAL-TIME::%DEFCOMPARATOR LOCAL-TIME:TIMESTAMP<=
; (NOT
; (NULL
; (MEMBER
; (LOCAL-TIME::%TIMESTAMP-COMPARE LOCAL-TIME::TIME-A LOCAL-TIME::TIME-B)
; '(< =)))))
; --> DEFINE-COMPILER-MACRO PROGN EVAL-WHEN
; ==>
; (SB-C::%DEFINE-COMPILER-MACRO 'LOCAL-TIME:TIMESTAMP<=
; (SB-INT:NAMED-LAMBDA (COMPILER-MACRO
; LOCAL-TIME:TIMESTAMP<=)
; (#:EXPR #:ENV)
; (DECLARE
; (SB-C::LAMBDA-LIST
; (&REST LOCAL-TIME::TIMES)))
; (DECLARE (IGNORE #:ENV))
; (SB-INT:NAMED-DS-BIND (:MACRO
; LOCAL-TIME:TIMESTAMP<=
; . DEFINE-COMPILER-MACRO)
; (&REST LOCAL-TIME::TIMES)
; (SB-C::COMPILER-MACRO-ARGS #:EXPR)
; (DECLARE
; (SB-C::CONSTANT-VALUE LOCAL-TIME::TIMES)
; (SB-C::NO-COMPILER-MACRO
; LOCAL-TIME:TIMESTAMP<=))
; (BLOCK LOCAL-TIME:TIMESTAMP<=
; (LET #
; `#)))))
;
; caught STYLE-WARNING:
; 1 call to LOCAL-TIME:TIMESTAMP<= was compiled before a compiler-macro was
; defined for it. A declaration of NOTINLINE at the call site will eliminate this
; warning, as will defining the compiler-macro before its first potential use.
; in: DEFUN %SPLIT-TIMESTRING
; (= (- (CDAR LOCAL-TIME::PARTS) (CAAR LOCAL-TIME::PARTS)) 4)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; 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.
; (= (- (CDAR LOCAL-TIME::PARTS) (CAAR LOCAL-TIME::PARTS)) 2)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; 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.
; (- (CDAR LOCAL-TIME::PARTS) (CAAR LOCAL-TIME::PARTS))
;
; 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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
; (+ (CAAR LOCAL-TIME::PARTS) 2)
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (+ (CAAR LOCAL-TIME::PARTS) 4)
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (- (CDAR LOCAL-TIME::PARTS) (CAAR LOCAL-TIME::PARTS))
;
; 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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
; (+ (CAAR LOCAL-TIME::PARTS) 2)
;
; 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 &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFUN %CONSTRUCT-TIMESTRING
; (AREF LOCAL-TIME:+MONTH-NAMES+ LOCAL-TIME::MONTH)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; (AREF LOCAL-TIME:+SHORT-MONTH-NAMES+ LOCAL-TIME::MONTH)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; (AREF LOCAL-TIME:+DAY-NAMES+ LOCAL-TIME::WEEKDAY)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; (AREF LOCAL-TIME:+SHORT-DAY-NAMES+ LOCAL-TIME::WEEKDAY)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; (AREF LOCAL-TIME::+MINIMAL-DAY-NAMES+ LOCAL-TIME::WEEKDAY)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; (MINUSP LOCAL-TIME::VAL)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
; (ABS LOCAL-TIME::VAL)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (REAL * (0)), not a RATIONAL.
; (MINUSP LOCAL-TIME::VAL)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; (ABS LOCAL-TIME::VAL)
;
; note: forced to do full call
; unable to do inline float arithmetic (cost 1) because:
; The first argument is a (REAL * (0)), not a SINGLE-FLOAT.
; The result is a (VALUES (REAL (0)) &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; unable to do inline float arithmetic (cost 1) because:
; The first argument is a (REAL * (0)), not a DOUBLE-FLOAT.
; The result is a (VALUES (REAL (0)) &OPTIONAL), not a (VALUES DOUBLE-FLOAT
; &OPTIONAL).
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/local-time/src/local-time-tmpWRPFNKSS.fasl
; compilation finished in 0:00:00.923
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-cookie/src/cl-cookie.lisp" (written 20 OCT 2024 03:56:29 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-cookie/src/cl-cookie-tmpDMRVPJ4B.fasl
; compilation finished in 0:00:02.506
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/trivial-mimes/mime-types.lisp" (written 20 OCT 2024 03:57:56 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/trivial-mimes/mime-types-tmp2VDU9LRH.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/dexador/src/encoding.lisp" (written 20 OCT 2024 03:56:48 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/dexador/src/encoding-tmpLRLV5H3Y.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/dexador/src/connection-cache.lisp" (written 20 OCT 2024 03:56:48 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/dexador/src/connection-cache-tmpV35RW8JI.fasl
; compilation finished in 0:00:00.103
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/dexador/src/decoding-stream.lisp" (written 20 OCT 2024 03:56:48 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/dexador/src/decoding-stream-tmpT00M9MI3.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/dexador/src/keep-alive-stream.lisp" (written 20 OCT 2024 03:56:48 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/dexador/src/keep-alive-stream.lisp
; in: DEFMETHOD STREAM-READ-SEQUENCE (KEEP-ALIVE-STREAM T T T)
; (MIN (- DEXADOR.KEEP-ALIVE-STREAM::END DEXADOR.KEEP-ALIVE-STREAM::START)
; (DEXADOR.KEEP-ALIVE-STREAM::KEEP-ALIVE-STREAM-END STREAM))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
; (<= (DEXADOR.KEEP-ALIVE-STREAM::KEEP-ALIVE-STREAM-END STREAM) 0)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first 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 DOUBLE-FLOAT.
; (- DEXADOR.KEEP-ALIVE-STREAM::END DEXADOR.KEEP-ALIVE-STREAM::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 &OPTIONAL).
; 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
; &OPTIONAL).
; etc.
; (MIN (- DEXADOR.KEEP-ALIVE-STREAM::END DEXADOR.KEEP-ALIVE-STREAM::START)
; (DEXADOR.KEEP-ALIVE-STREAM::KEEP-ALIVE-STREAM-END STREAM))
;
; 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 NUMBER, 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 NUMBER, not a DOUBLE-FLOAT.
; etc.
; (+ DEXADOR.KEEP-ALIVE-STREAM::START DEXADOR.KEEP-ALIVE-STREAM::TO-READ)
;
; 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 &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; (DECF (DEXADOR.KEEP-ALIVE-STREAM::KEEP-ALIVE-STREAM-END STREAM)
; (- DEXADOR.KEEP-ALIVE-STREAM::N DEXADOR.KEEP-ALIVE-STREAM::START))
; --> 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 T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -35184372088831 35184372088831), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/dexador/src/keep-alive-stream-tmp7CJ2FZWD.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/dexador/src/util.lisp" (written 20 OCT 2024 03:56:48 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/dexador/src/util.lisp
; in: DEFUN-SPEEDY %ASCII-STRING-TO-OCTETS
; (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.
; (AREF STRING DEXADOR.UTIL::I)
;
; note: unable to
; avoid runtime dispatch on array element type
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-STRING.
; in: DEFPARAMETER *DEFAULT-USER-AGENT*
; (OR (LISP-IMPLEMENTATION-TYPE) "Common Lisp")
; --> IF
; ==>
; "Common Lisp"
;
; note: deleting unreachable code
; (OR (LISP-IMPLEMENTATION-VERSION) "")
; --> IF
; ==>
; ""
;
; note: deleting unreachable code
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/dexador/src/util-tmpTPL3ZK3D.fasl
; compilation finished in 0:00:00.050
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/dexador/src/body.lisp" (written 20 OCT 2024 03:56:48 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/dexador/src/body-tmp8LOSL08L.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/dexador/src/error.lisp" (written 20 OCT 2024 03:56:48 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/dexador/src/error-tmpSO5QX98F.fasl
; compilation finished in 0:00:00.089
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/dexador/src/backend/usocket.lisp" (written 20 OCT 2024 03:56:48 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/dexador/src/backend/usocket.lisp
; in: DEFUN-SPEEDY MULTIPART-CONTENT-LENGTH
; (+ 2 DEXADOR.BACKEND.USOCKET::BOUNDARY-LENGTH 2
; (LENGTH
; (THE SIMPLE-STRING
; (DEXADOR.BACKEND.USOCKET::CONTENT-DISPOSITION
; DEXADOR.BACKEND.USOCKET::KEY DEXADOR.BACKEND.USOCKET::VAL)))
; (IF (PATHNAMEP DEXADOR.BACKEND.USOCKET::VAL)
; (+ 14 (LENGTH (THE SIMPLE-STRING #)) 2)
; 0)
; 2
; (TYPECASE DEXADOR.BACKEND.USOCKET::VAL
; (PATHNAME
; (WITH-OPEN-FILE
; (DEXADOR.BACKEND.USOCKET::IN DEXADOR.BACKEND.USOCKET::VAL)
; (FILE-LENGTH DEXADOR.BACKEND.USOCKET::IN)))
; (STRING (LENGTH (THE DEXADOR.UTIL:OCTETS #)))
; (SYMBOL (LENGTH (THE DEXADOR.UTIL:OCTETS #)))
; (OTHERWISE (LENGTH (PRINC-TO-STRING DEXADOR.BACKEND.USOCKET::VAL))))
; 2)
;
; 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 (INTEGER 8) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES (INTEGER 8) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (LOOP DEXADOR.BACKEND.USOCKET::FOR (DEXADOR.BACKEND.USOCKET::KEY
; . DEXADOR.BACKEND.USOCKET::VAL) DEXADOR.BACKEND.USOCKET::IN DEXADOR.BACKEND.USOCKET::CONTENT
; DEXADOR.BACKEND.USOCKET::SUM (+ 2
; DEXADOR.BACKEND.USOCKET::BOUNDARY-LENGTH
; 2
; (LENGTH
; (THE SIMPLE-STRING
; (DEXADOR.BACKEND.USOCKET::CONTENT-DISPOSITION
; DEXADOR.BACKEND.USOCKET::KEY
; DEXADOR.BACKEND.USOCKET::VAL)))
; (IF (PATHNAMEP
; DEXADOR.BACKEND.USOCKET::VAL)
; (+ 14 (LENGTH #) 2)
; 0)
; 2
; (TYPECASE DEXADOR.BACKEND.USOCKET::VAL
; (PATHNAME (WITH-OPEN-FILE # #))
; (STRING (LENGTH #))
; (SYMBOL (LENGTH #))
; (OTHERWISE (LENGTH #)))
; 2))
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (INTEGER 0 0) (INTEGER 8)), not a FIXNUM.
; The second argument is a (INTEGER 8), not a FIXNUM.
; The result is a (VALUES (INTEGER 8) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (OR (INTEGER 0 0) (INTEGER 8)), not a (UNSIGNED-BYTE
; 64).
; The second argument is a (INTEGER 8), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES (INTEGER 8) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (+
; (LOOP DEXADOR.BACKEND.USOCKET::FOR (DEXADOR.BACKEND.USOCKET::KEY
; . DEXADOR.BACKEND.USOCKET::VAL) DEXADOR.BACKEND.USOCKET::IN DEXADOR.BACKEND.USOCKET::CONTENT
; DEXADOR.BACKEND.USOCKET::SUM (+ 2
; DEXADOR.BACKEND.USOCKET::BOUNDARY-LENGTH
; 2 (LENGTH (THE SIMPLE-STRING #))
; (IF (PATHNAMEP
; DEXADOR.BACKEND.USOCKET::VAL)
; (+ 14 # 2)
; 0)
; 2
; (TYPECASE DEXADOR.BACKEND.USOCKET::VAL
; (PATHNAME #)
; (STRING #)
; (SYMBOL #)
; (OTHERWISE #))
; 2))
; 2 DEXADOR.BACKEND.USOCKET::BOUNDARY-LENGTH 2 2)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (INTEGER 0 0) (INTEGER 8)), not a FIXNUM.
; The result is a (VALUES (OR (INTEGER 6 6) (INTEGER 14)) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (OR (INTEGER 0 0) (INTEGER 8)), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES (OR (INTEGER 6 6) (INTEGER 14)) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (INTEGER 6 6) (INTEGER 14)), not a FIXNUM.
; The result is a (VALUES (INTEGER 6) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a (OR (INTEGER 6 6) (INTEGER 14)), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES (INTEGER 6) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFUN-CAREFUL REQUEST
; (STRING= DEXADOR.BACKEND.USOCKET::SCHEME "http")
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a (SIMPLE-ARRAY CHARACTER (*)).
; (STRING= DEXADOR.BACKEND.USOCKET::SCHEME "https")
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a (SIMPLE-ARRAY CHARACTER (*)).
; (= (THE REAL DEXADOR.BACKEND.USOCKET::VERSION) 1.0)
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code RATIONAL to FLOAT comparison
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; (FIND :CONTENT-TYPE DEXADOR.BACKEND.USOCKET::HEADERS :KEY #'CAR :TEST
; #'STRING-EQUAL)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; (STRING= DEXADOR.BACKEND.USOCKET::CONTENT-TYPE "multipart/form-data")
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (STRING= DEXADOR.BACKEND.USOCKET::CONTENT-TYPE
; "application/x-www-form-urlencoded")
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (= (THE REAL DEXADOR.BACKEND.USOCKET::VERSION) 1.0)
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code RATIONAL to FLOAT comparison
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; (= (THE REAL DEXADOR.BACKEND.USOCKET::VERSION) 1.1)
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code RATIONAL to FLOAT comparison
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; (STRING= DEXADOR.BACKEND.USOCKET::SCHEME "http")
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (STRING= (QURI.URI:URI-SCHEME DEXADOR.BACKEND.USOCKET::LOCATION-URI)
; (QURI.URI:URI-SCHEME DEXADOR.BACKEND.USOCKET::URI))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL
; CHARACTER), not a SIMPLE-BASE-STRING.
; The second argument is a (OR STRING SYMBOL
; CHARACTER), not a SIMPLE-BASE-STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (STRING= (QURI.URI:URI-HOST DEXADOR.BACKEND.USOCKET::LOCATION-URI)
; (QURI.URI:URI-HOST DEXADOR.BACKEND.USOCKET::URI))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL
; CHARACTER), not a SIMPLE-BASE-STRING.
; The second argument is a (OR STRING SYMBOL
; CHARACTER), not a SIMPLE-BASE-STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (EQL (QURI.URI:URI-PORT DEXADOR.BACKEND.USOCKET::LOCATION-URI)
; (QURI.URI:URI-PORT DEXADOR.BACKEND.USOCKET::URI))
;
; 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.
; (EQL
; (DEXADOR.BACKEND.USOCKET::USOCKET-WRAPPED-STREAM-STREAM
; DEXADOR.BACKEND.USOCKET::ORIGINAL-USER-SUPPLIED-STREAM)
; STREAM)
;
; 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.
; (EQL DEXADOR.BACKEND.USOCKET::ORIGINAL-USER-SUPPLIED-STREAM STREAM)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT USOCKET-WRAPPED-STREAM)
; (NOT NULL)), not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (AND (NOT USOCKET-WRAPPED-STREAM)
; (NOT NULL)), not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; (STRING= DEXADOR.BACKEND.USOCKET::SCHEME "socks5")
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a (SIMPLE-ARRAY CHARACTER (*)).
; (STRING= DEXADOR.BACKEND.USOCKET::SCHEME "https")
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a (SIMPLE-ARRAY CHARACTER (*)).
; (= (THE REAL DEXADOR.BACKEND.USOCKET::VERSION) 1.0)
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; (= (THE REAL DEXADOR.BACKEND.USOCKET::VERSION) 1.1)
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; (DOTIMES (DEXADOR.BACKEND.USOCKET::I DEXADOR.BACKEND.USOCKET::CONTENT-LENGTH)
; (LOOP DEXADOR.BACKEND.USOCKET::UNTIL (READ-BYTE
; DEXADOR.BACKEND.USOCKET::BODY NIL
; NIL)))
; --> 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 64) comparison (cost 6) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; etc.
; --> BLOCK LET TAGBODY PSETQ PROGN SETQ THE 1+
; ==>
; 1
;
; 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 1) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (EQL (QURI.URI:URI-PORT DEXADOR.BACKEND.USOCKET::LOCATION-URI)
; (QURI.URI:URI-PORT DEXADOR.BACKEND.USOCKET::URI))
;
; 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 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; (EQL
; (DEXADOR.BACKEND.USOCKET::USOCKET-WRAPPED-STREAM-STREAM
; DEXADOR.BACKEND.USOCKET::ORIGINAL-USER-SUPPLIED-STREAM)
; STREAM)
;
; 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 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; (EQL DEXADOR.BACKEND.USOCKET::ORIGINAL-USER-SUPPLIED-STREAM STREAM)
;
; note: forced to do full call
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (AND (NOT USOCKET-WRAPPED-STREAM) (NOT NULL)), not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a (AND (NOT USOCKET-WRAPPED-STREAM) (NOT NULL)), not a (UNSIGNED-BYTE
; 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/dexador/src/backend/usocket-tmpK3U30K2D.fasl
; compilation finished in 0:00:00.256
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/dexador/src/dexador.lisp" (written 20 OCT 2024 03:56:48 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/dexador/src/dexador-tmpS7SAFHYW.fasl
; compilation finished in 0:00:00.086
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-enchant/enchant.lisp" (written 20 OCT 2024 03:56:31 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/cl-enchant/enchant.lisp
; in: CFFI:DEFCALLBACK BROKER-DESCRIBE-FN
; (CFFI:DEFCALLBACK ENCHANT::BROKER-DESCRIBE-FN
; :VOID
; ((ENCHANT::NAME :STRING) (ENCHANT::DESC :STRING) (ENCHANT::FILE :STRING))
; (PUSH (LIST ENCHANT::NAME ENCHANT::DESC ENCHANT::FILE)
; ENCHANT::*CALLBACK-DATA*))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ENCHANT::NAME
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ENCHANT::DESC
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ENCHANT::FILE
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; in: CFFI:DEFCALLBACK DICT-DESCRIBE-FN
; (CFFI:DEFCALLBACK ENCHANT::DICT-DESCRIBE-FN
; :VOID
; ((ENCHANT::LANG :STRING) (ENCHANT::NAME :STRING) (ENCHANT::DESC :STRING)
; (ENCHANT::FILE :STRING))
; (PUSH (LIST ENCHANT::LANG ENCHANT::NAME ENCHANT::DESC ENCHANT::FILE)
; ENCHANT::*CALLBACK-DATA*))
; --> CFFI-SYS:%DEFCALLBACK SETF LET* LET* ALIEN-SAP SB-ALIEN::ALIEN-LAMBDA
; --> SB-ALIEN::%ALIEN-CALLBACK-ALIEN SB-ALIEN::ALIEN-LAMBDA2 LAMBDA FUNCTION
; --> LET LET LOCALLY LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ENCHANT::LANG
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ENCHANT::NAME
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ENCHANT::DESC
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN ENCHANT::FILE
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-enchant/enchant-tmpH0L3YQ4I.fasl
; compilation finished in 0:00:00.110
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-custom-hash-table/package.lisp" (written 20 OCT 2024 03:56:30 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-custom-hash-table/package-tmpQ0KFB7RE.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/cl-custom-hash-table/custom-hash-table.lisp" (written 20 OCT 2024 03:56:30 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/cl-custom-hash-table/custom-hash-table-tmpMX2KGORB.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/nclasses/source/package.lisp" (written 20 OCT 2024 03:57:20 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/nclasses/source/package-tmpGX7XANK9.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/nclasses/source/duplicates.lisp" (written 20 OCT 2024 03:57:20 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/nclasses/source/duplicates-tmpOSW501LG.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/nclasses/source/defclass-star.lisp" (written 20 OCT 2024 03:57:20 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/nclasses/source/defclass-star.lisp
; in: DEFUN SLOT-NAME-PACKAGE
; (CASE NCLASSES::*ACCESSOR-NAME-PACKAGE*
; (:SLOT-NAME (SYMBOL-PACKAGE NCLASSES::NAME))
; (:DEFAULT *PACKAGE*)
; (T *PACKAGE*))
; --> COND IF IF THE
; ==>
; *PACKAGE*
;
; note: deleting unreachable code
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/nclasses/source/defclass-star-tmp6NW8AU5W.fasl
; compilation finished in 0:00:00.103
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/trivial-package-local-nicknames/trivial-package-local-nicknames.lisp" (written 20 OCT 2024 03:57:57 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/trivial-package-local-nicknames/trivial-package-local-nicknames-tmpNCTFFFEY.fasl
; compilation finished in 0:00:00.060
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/history-tree/package.lisp" (written 20 OCT 2024 03:57:01 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/history-tree/package-tmp23SSZ451.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/history-tree/history-tree.lisp" (written 20 OCT 2024 03:57:01 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/history-tree/history-tree-tmp1VV63JBA.fasl
; compilation finished in 0:00:00.216
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/idna/package.lisp" (written 20 OCT 2024 03:57:04 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/idna/package-tmpOH84MHBK.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/idna/encode.lisp" (written 20 OCT 2024 03:57:04 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/idna/encode-tmp6447RAHO.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/idna/decode.lisp" (written 20 OCT 2024 03:57:04 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/idna/decode.lisp
; in: DEFUN PUNYCODE-DECODE
; (SETF (AREF IDNA::CASE-FLAGS IDNA::OUTPUT-LENGTH) (< (- CHAR-CODE 65) 26))
;
; note: deleting unreachable code
; (SETF IDNA::CASE-FLAGS
; (NCONC (SUBSEQ IDNA::CASE-FLAGS 0 IDNA::I) (LIST (< # 26))
; (SUBSEQ IDNA::CASE-FLAGS IDNA::I)))
;
; note: deleting unreachable code
; (LOOP IDNA::WITH IDNA::LEN = IDNA::OUTPUT-LENGTH
; IDNA::FOR IDNA::I IDNA::FROM 0 IDNA::BELOW IDNA::LEN
; DO ...)
;
; note: deleting unreachable code
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/idna/decode-tmpZH9EMI5U.fasl
; compilation finished in 0:00:00.073
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/pkgdcl.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/pkgdcl-tmp66ZYEZK6.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/unix-syscall-path-strings.lisp" (written 20 OCT 2024 03:57:06 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/unix-syscall-path-strings.lisp
; in: DEFUN SSTRING-TO-CSTRING
; (LENGTH IOLIB/SYSCALLS::SSTRING)
;
; note: unable to optimize due to type uncertainty: The first argument is a SEQUENCE, not a VECTOR.
; (CHAR IOLIB/SYSCALLS::SSTRING IOLIB/SYSCALLS::I)
;
; note: unable to optimize due to type uncertainty: The first argument is a STRING, not a SIMPLE-ARRAY.
; (CHAR IOLIB/SYSCALLS::SSTRING (INCF IOLIB/SYSCALLS::I))
;
; note: unable to optimize due to type uncertainty: The first argument is a STRING, not a SIMPLE-ARRAY.
; in: DEFUN COUNT-SSTRING-OCTETS
; (LENGTH IOLIB/SYSCALLS::SSTRING)
;
; note: unable to optimize due to type uncertainty: The first argument is a SEQUENCE, not a VECTOR.
; (CHAR IOLIB/SYSCALLS::SSTRING IOLIB/SYSCALLS::I)
;
; note: unable to optimize due to type uncertainty: The first argument is a STRING, not a SIMPLE-ARRAY.
; (LOOP :WITH IOLIB/SYSCALLS::LEN := (LENGTH IOLIB/SYSCALLS::SSTRING)
; :WITH IOLIB/SYSCALLS::END-OFFSET := (1- IOLIB/SYSCALLS::LEN)
; :FOR IOLIB/SYSCALLS::I :BELOW ...)
; --> LET LET LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:SUM2
; (COND
; ((ZEROP IOLIB/SYSCALLS::CODE)
; (WHEN (< IOLIB/SYSCALLS::I IOLIB/SYSCALLS::END-OFFSET)
; (INCF IOLIB/SYSCALLS::I))
; 1)
; ((< IOLIB/SYSCALLS::CODE 128) 1) ((< IOLIB/SYSCALLS::CODE 2048) 2)
; ((< IOLIB/SYSCALLS::CODE 65536) 3) ((< IOLIB/SYSCALLS::CODE 1114112) 4)))
;
; 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 1) &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 5) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL).
; etc.
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/unix-syscall-path-strings-tmpZUNRT40W.fasl
; compilation finished in 0:00:00.080
; pkg-config libfixposix --cflags
-D_XOPEN_SOURCE=700 -D_GNU_SOURCE=1
; cc -o /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/ffi-types-unix__grovel-tmpQVO2POWH.o -c -Os -fstack-clash-protection -Wformat -Werror=format-security -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -std=gnu99 -fno-pie -D_XOPEN_SOURCE=700 -D_GNU_SOURCE=1 -fPIC -I/home/buildozer/aports/community/nyxt/src/_build/cffi/ /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/ffi-types-unix__grovel.c
In file included from /usr/include/lfp/signal.h:33,
from /usr/include/lfp.h:48,
from /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/ffi-types-unix__grovel.c:6:
/usr/include/sys/signal.h:1:2: warning: #warning redirecting incorrect #include to [-Wcpp]
1 | #warning redirecting incorrect #include to
| ^~~~~~~
In file included from /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/ffi-types-unix__grovel.c:7:
/usr/include/sys/poll.h:1:2: warning: #warning redirecting incorrect #include to [-Wcpp]
1 | #warning redirecting incorrect #include to
| ^~~~~~~
In file included from /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/ffi-types-unix__grovel.c:15:
/home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/ffi-types-unix__grovel.c: In function 'main':
/home/buildozer/aports/community/nyxt/src/_build/cffi/grovel/common.h:19:54: warning: comparison between pointer and integer
19 | #define _64_BIT_VALUE_FITS_SIGNED_P(value) ( (value) <= 0x7FFFFFFFFFFFFFFFLL )
| ^~
/home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/ffi-types-unix__grovel.c:6036:6: note: in expansion of macro '_64_BIT_VALUE_FITS_SIGNED_P'
6036 | if(_64_BIT_VALUE_FITS_SIGNED_P(SIG_IGN))
| ^~~~~~~~~~~~~~~~~~~~~~~~~~~
/home/buildozer/aports/community/nyxt/src/_build/cffi/grovel/common.h:19:54: warning: comparison between pointer and integer
19 | #define _64_BIT_VALUE_FITS_SIGNED_P(value) ( (value) <= 0x7FFFFFFFFFFFFFFFLL )
| ^~
/home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/ffi-types-unix__grovel.c:6050:6: note: in expansion of macro '_64_BIT_VALUE_FITS_SIGNED_P'
6050 | if(_64_BIT_VALUE_FITS_SIGNED_P(SIG_DFL))
| ^~~~~~~~~~~~~~~~~~~~~~~~~~~
/home/buildozer/aports/community/nyxt/src/_build/cffi/grovel/common.h:19:54: warning: comparison between pointer and integer
19 | #define _64_BIT_VALUE_FITS_SIGNED_P(value) ( (value) <= 0x7FFFFFFFFFFFFFFFLL )
| ^~
/home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/ffi-types-unix__grovel.c:6291:6: note: in expansion of macro '_64_BIT_VALUE_FITS_SIGNED_P'
6291 | if(_64_BIT_VALUE_FITS_SIGNED_P(MAP_FAILED))
| ^~~~~~~~~~~~~~~~~~~~~~~~~~~
/home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/ffi-types-unix__grovel.c:18:7: warning: unused variable 'autotype_tmp' [-Wunused-variable]
18 | int autotype_tmp;
| ^~~~~~~~~~~~
; cc -o /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/ffi-types-unix__grovel-tmpXDLMMPAG -g -Wl,--export-dynamic -no-pie /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/ffi-types-unix__grovel.o
; /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/ffi-types-unix__grovel /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/ffi-types-unix__grovel.grovel-tmp.lisp
; compiling file "/home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/ffi-types-unix.processed-grovel-file" (written 10 MAY 2025 08:04:41 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/ffi-types-unix-tmpOA0LDZ1R.fasl
; compilation finished in 0:00:00.103
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/conditions.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/conditions-tmpT7LX7L0V.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/os-conditions-unix.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/os-conditions-unix-tmpLZIBU9E4.fasl
; compilation finished in 0:00:00.226
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/designators.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/designators-tmpITJ5MSZ0.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/early.lisp" (written 20 OCT 2024 03:57:06 PM):
; wrote /home/buildozer/.cache/common-lisp/sbcl-2.5.4-linux-arm64/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/early-tmp7VYMS369.fasl
; compilation finished in 0:00:00.150
; compiling file "/home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/ffi-functions-unix.lisp" (written 10 MAY 2025 08:03:29 PM):
; file: /home/buildozer/aports/community/nyxt/src/_build/iolib/src/syscalls/ffi-functions-unix.lisp
; in: DEFENTRYPOINT STRERROR
; (CFFI:WITH-FOREIGN-POINTER-AS-STRING ((IOLIB/SYSCALLS::BUF
; IOLIB/SYSCALLS::BUFSIZ)
; 1024)
; (IOLIB/SYSCALLS::%STRERROR IOLIB/SYSCALLS:ERRNO IOLIB/SYSCALLS::BUF
; IOLIB/SYSCALLS::BUFSIZ))
; --> WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET LET LET SB-C::RESTORING-NSP
; --> LET SYMBOL-MACROLET LET PROGN VALUES
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFMETHOD PRINT-OBJECT
; (FORMAT IOLIB/SYSCALLS::S "~A" IOLIB/SYSCALLS::MESSAGE)
;
; note: unable to optimize due to type uncertainty: The first argument is a (OR STRING COMMON-LISP:BOOLEAN STREAM), not a STREAM.
;
; note: unable to optimize due to type uncertainty: The first argument is a (OR STRING COMMON-LISP:BOOLEAN STREAM), not a (MEMBER T).
;
; note: unable to optimize due to type uncertainty: The first argument is a (OR STRING COMMON-LISP:BOOLEAN STREAM), not a NULL.
; (FORMAT IOLIB/SYSCALLS::S "Syscall ~S signalled error ~A(~S) ~S"
; IOLIB/SYSCALLS::SYSCALL IOLIB/SYSCALLS::IDENTIFIER
; (OR IOLIB/SYSCALLS::CODE "[No code]")
; (OR (IOLIB/SYSCALLS:STRERROR IOLIB/SYSCALLS::CODE)
; "[Can't get error string.]"))
;
; note: unable to optimize due to type uncertainty: The first argument is a (OR STRING COMMON-LISP:BOOLEAN STREAM), not a STREAM.
;
; note: unable to optimize due to type uncertainty: The first argument is a (OR STRING COMMON-LISP:BOOLEAN STREAM), not a (MEMBER T).
;
; note: unable to optimize due to type uncertainty: The first argument is a (OR STRING COMMON-LISP:BOOLEAN STREAM), not a NULL.
; (FORMAT IOLIB/SYSCALLS::S " FD=~A" IOLIB/SYSCALLS::HANDLE)
;
; note: unable to optimize due to type uncertainty: The first argument is a (OR STRING COMMON-LISP:BOOLEAN STREAM), not a STREAM.
;
; note: unable to optimize due to type uncertainty: The first argument is a (OR STRING COMMON-LISP:BOOLEAN STREAM), not a (MEMBER T).
;
; note: unable to optimize due to type uncertainty: The first argument is a (OR STRING COMMON-LISP:BOOLEAN STREAM), not a NULL.
; (FORMAT IOLIB/SYSCALLS::S " FD2=~A" IOLIB/SYSCALLS::HANDLE2)
;
; note: unable to optimize due to type uncertainty: The first argument is a (OR STRING COMMON-LISP:BOOLEAN STREAM), not a STREAM.
;
; note: unable to optimize due to type uncertainty: The first argument is a (OR STRING COMMON-LISP:BOOLEAN STREAM), not a (MEMBER T).
;
; note: unable to optimize due to type uncertainty: The first argument is a (OR STRING COMMON-LISP:BOOLEAN STREAM), not a NULL.
; (IOLIB/SYSCALLS:STRERROR IOLIB/SYSCALLS::CODE)
; --> BLOCK MACROLET LET CFFI:WITH-FOREIGN-POINTER-AS-STRING
; --> CFFI-SYS:WITH-FOREIGN-POINTER WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET
; --> LET LET SB-C::RESTORING-NSP LET SYMBOL-MACROLET LET PROGN VALUES
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCFUN (MEMSET "memset")
; (CFFI:DEFCFUN (IOLIB/SYSCALLS:MEMSET "memset")
; :POINTER
; "Fill the first COUNT bytes of BUFFER with the constant VALUE."
; (IOLIB/SYSCALLS::BUFFER :POINTER)
; (IOLIB/SYSCALLS::VALUE :INT)
; (COUNT IOLIB/SYSCALLS:SIZE-T))
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:MEMSET
; (IOLIB/SYSCALLS::BUFFER IOLIB/SYSCALLS::VALUE COUNT)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; "Fill the first COUNT bytes of BUFFER with the constant VALUE."
; (BLOCK IOLIB/SYSCALLS:MEMSET
; (LET ((#:G0 IOLIB/SYSCALLS::BUFFER))
; (LET (#)
; (LET #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFCFUN (MEMCPY "memcpy")
; (CFFI:DEFCFUN (IOLIB/SYSCALLS:MEMCPY "memcpy")
; :POINTER
; "Copy COUNT octets from SRC to DEST.
; The two memory areas must not overlap."
; (IOLIB/SYSCALLS::DEST :POINTER)
; (IOLIB/SYSCALLS::SRC :POINTER)
; (COUNT IOLIB/SYSCALLS:SIZE-T))
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:MEMCPY
; (IOLIB/SYSCALLS::DEST IOLIB/SYSCALLS::SRC COUNT)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; "Copy COUNT octets from SRC to DEST.
; The two memory areas must not overlap."
; (BLOCK IOLIB/SYSCALLS:MEMCPY
; (LET ((#:G0 IOLIB/SYSCALLS::DEST))
; (LET (#)
; (LET #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFCFUN (MEMMOVE "memmove")
; (CFFI:DEFCFUN (IOLIB/SYSCALLS:MEMMOVE "memmove")
; :POINTER
; "Copy COUNT octets from SRC to DEST.
; The two memory areas may overlap."
; (IOLIB/SYSCALLS::DEST :POINTER)
; (IOLIB/SYSCALLS::SRC :POINTER)
; (COUNT IOLIB/SYSCALLS:SIZE-T))
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:MEMMOVE
; (IOLIB/SYSCALLS::DEST IOLIB/SYSCALLS::SRC COUNT)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; "Copy COUNT octets from SRC to DEST.
; The two memory areas may overlap."
; (BLOCK IOLIB/SYSCALLS:MEMMOVE
; (LET ((#:G0 IOLIB/SYSCALLS::DEST))
; (LET (#)
; (LET #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFSYSCALL (LSEEK "lfp_lseek")
; (IOLIB/SYSCALLS:DEFSYSCALL (IOLIB/SYSCALLS:LSEEK "lfp_lseek")
; (IOLIB/SYSCALLS:OFF-T :HANDLE IOLIB/SYSCALLS:FD)
; "Reposition the offset of the open file associated with the file descriptor FD
; to the argument OFFSET according to the directive WHENCE."
; (IOLIB/SYSCALLS:FD :INT)
; (IOLIB/SYSCALLS::OFFSET IOLIB/SYSCALLS:OFF-T)
; (IOLIB/SYSCALLS::WHENCE :INT))
; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:LSEEK
; (IOLIB/SYSCALLS:FD IOLIB/SYSCALLS::OFFSET IOLIB/SYSCALLS::WHENCE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; "Reposition the offset of the open file associated with the file descriptor FD
; to the argument OFFSET according to the directive WHENCE."
; (BLOCK IOLIB/SYSCALLS:LSEEK
; (LET ((#:G0 IOLIB/SYSCALLS:FD))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to ""
; in: DEFSYSCALL (%READLINK "readlink")
; (IOLIB/SYSCALLS:DEFSYSCALL (IOLIB/SYSCALLS::%READLINK "readlink")
; IOLIB/SYSCALLS:SSIZE-T
; (IOLIB/SYSCALLS::PATH IOLIB/SYSCALLS::SSTRING)
; (IOLIB/SYSCALLS::BUF :POINTER)
; (IOLIB/SYSCALLS::BUFSIZE IOLIB/SYSCALLS:SIZE-T))
; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS::%READLINK
; (IOLIB/SYSCALLS::PATH IOLIB/SYSCALLS::BUF IOLIB/SYSCALLS::BUFSIZE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK IOLIB/SYSCALLS::%READLINK
; (MULTIPLE-VALUE-BIND (#:G0 #:PARAM6)
; (CFFI:TRANSLATE-TO-FOREIGN IOLIB/SYSCALLS::PATH
; #)
; (UNWIND-PROTECT (PROGN #)
; (CFFI:FREE-TRANSLATED-OBJECT #:G0 # #:PARAM6)))))
;
; note: doing signed word to integer coercion (cost 20) to ""
; in: DEFENTRYPOINT READLINK
; (IOLIB/SYSCALLS:CSTRING-TO-SSTRING IOLIB/SYSCALLS::BUF COUNT)
;
; note: doing signed word to integer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFSYSCALL (%REALPATH "realpath")
; (IOLIB/SYSCALLS:DEFSYSCALL (IOLIB/SYSCALLS::%REALPATH "realpath")
; IOLIB/SYSCALLS::SSTRING
; (IOLIB/SYSCALLS::PATH IOLIB/SYSCALLS::SSTRING)
; (IOLIB/SYSCALLS::RESOLVED-PATH :POINTER))
; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA FUNCTION BLOCK MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION UNWIND-PROTECT FLET BLOCK BLOCK
; --> SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET LET*
; --> CFFI:CONVERT-FROM-FOREIGN
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN
; (CFFI-SYS:%FOREIGN-FUNCALL "realpath" (:POINTER #:G0 :POINTER #:G1 :POINTER)
; :CONVENTION :CDECL :LIBRARY :DEFAULT)
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFENTRYPOINT REALPATH
; (IOLIB/SYSCALLS::%REALPATH IOLIB/SYSCALLS::PATH IOLIB/SYSCALLS::BUF)
; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION UNWIND-PROTECT
; --> FLET BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET LET*
; --> CFFI:CONVERT-FROM-FOREIGN
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN
; (CFFI-SYS:%FOREIGN-FUNCALL "realpath" (:POINTER #:G0 :POINTER #:G1 :POINTER)
; :CONVENTION :CDECL :LIBRARY :DEFAULT)
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFSYSCALL (READ "read")
; (IOLIB/SYSCALLS:DEFSYSCALL (IOLIB/SYSCALLS:READ "read")
; (IOLIB/SYSCALLS:SSIZE-T :RESTART T :HANDLE IOLIB/SYSCALLS:FD)
; "Read at most COUNT bytes from FD into the foreign area BUF."
; (IOLIB/SYSCALLS:FD :INT)
; (IOLIB/SYSCALLS::BUF :POINTER)
; (COUNT IOLIB/SYSCALLS:SIZE-T))
; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:READ
; (IOLIB/SYSCALLS:FD IOLIB/SYSCALLS::BUF COUNT)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; "Read at most COUNT bytes from FD into the foreign area BUF."
; (BLOCK IOLIB/SYSCALLS:READ
; (LET ((#:G0 IOLIB/SYSCALLS:FD))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to ""
; in: DEFSYSCALL (WRITE "write")
; (IOLIB/SYSCALLS:DEFSYSCALL (IOLIB/SYSCALLS:WRITE "write")
; (IOLIB/SYSCALLS:SSIZE-T :RESTART T :HANDLE IOLIB/SYSCALLS:FD)
; "Write at most COUNT bytes to FD from the foreign area BUF."
; (IOLIB/SYSCALLS:FD :INT)
; (IOLIB/SYSCALLS::BUF :POINTER)
; (COUNT IOLIB/SYSCALLS:SIZE-T))
; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:WRITE
; (IOLIB/SYSCALLS:FD IOLIB/SYSCALLS::BUF COUNT)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; "Write at most COUNT bytes to FD from the foreign area BUF."
; (BLOCK IOLIB/SYSCALLS:WRITE
; (LET ((#:G0 IOLIB/SYSCALLS:FD))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to ""
; in: DEFSYSCALL (READV "readv")
; (IOLIB/SYSCALLS:DEFSYSCALL (IOLIB/SYSCALLS:READV "readv")
; (IOLIB/SYSCALLS:SSIZE-T :RESTART T :HANDLE IOLIB/SYSCALLS:FD)
; "Read from FD into the first IOVCNT buffers of the IOV array."
; (IOLIB/SYSCALLS:FD :INT)
; (IOLIB/SYSCALLS::IOV :POINTER)
; (IOLIB/SYSCALLS::IOVCNT :INT))
; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:READV
; (IOLIB/SYSCALLS:FD IOLIB/SYSCALLS::IOV IOLIB/SYSCALLS::IOVCNT)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; "Read from FD into the first IOVCNT buffers of the IOV array."
; (BLOCK IOLIB/SYSCALLS:READV
; (LET ((#:G0 IOLIB/SYSCALLS:FD))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to ""
; in: DEFSYSCALL (WRITEV "writev")
; (IOLIB/SYSCALLS:DEFSYSCALL (IOLIB/SYSCALLS:WRITEV "writev")
; (IOLIB/SYSCALLS:SSIZE-T :RESTART T :HANDLE IOLIB/SYSCALLS:FD)
; "Writes to FD the first IOVCNT buffers of the IOV array."
; (IOLIB/SYSCALLS:FD :INT)
; (IOLIB/SYSCALLS::IOV :POINTER)
; (IOLIB/SYSCALLS::IOVCNT :INT))
; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:WRITEV
; (IOLIB/SYSCALLS:FD IOLIB/SYSCALLS::IOV IOLIB/SYSCALLS::IOVCNT)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; "Writes to FD the first IOVCNT buffers of the IOV array."
; (BLOCK IOLIB/SYSCALLS:WRITEV
; (LET ((#:G0 IOLIB/SYSCALLS:FD))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to ""
; in: DEFSYSCALL (PREAD "lfp_pread")
; (IOLIB/SYSCALLS:DEFSYSCALL (IOLIB/SYSCALLS:PREAD "lfp_pread")
; (IOLIB/SYSCALLS:SSIZE-T :RESTART T :HANDLE IOLIB/SYSCALLS:FD)
; "Read at most COUNT bytes from FD at offset OFFSET into the foreign area BUF."
; (IOLIB/SYSCALLS:FD :INT)
; (IOLIB/SYSCALLS::BUF :POINTER)
; (COUNT IOLIB/SYSCALLS:SIZE-T)
; (IOLIB/SYSCALLS::OFFSET IOLIB/SYSCALLS:OFF-T))
; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:PREAD
; (IOLIB/SYSCALLS:FD IOLIB/SYSCALLS::BUF COUNT IOLIB/SYSCALLS::OFFSET)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; "Read at most COUNT bytes from FD at offset OFFSET into the foreign area BUF."
; (BLOCK IOLIB/SYSCALLS:PREAD
; (LET ((#:G0 IOLIB/SYSCALLS:FD))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to ""
; in: DEFSYSCALL (PWRITE "lfp_pwrite")
; (IOLIB/SYSCALLS:DEFSYSCALL (IOLIB/SYSCALLS:PWRITE "lfp_pwrite")
; (IOLIB/SYSCALLS:SSIZE-T :RESTART T :HANDLE IOLIB/SYSCALLS:FD)
; "Write at most COUNT bytes to FD at offset OFFSET from the foreign area BUF."
; (IOLIB/SYSCALLS:FD :INT)
; (IOLIB/SYSCALLS::BUF :POINTER)
; (COUNT IOLIB/SYSCALLS:SIZE-T)
; (IOLIB/SYSCALLS::OFFSET IOLIB/SYSCALLS:OFF-T))
; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:PWRITE
; (IOLIB/SYSCALLS:FD IOLIB/SYSCALLS::BUF COUNT IOLIB/SYSCALLS::OFFSET)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; "Write at most COUNT bytes to FD at offset OFFSET from the foreign area BUF."
; (BLOCK IOLIB/SYSCALLS:PWRITE
; (LET ((#:G0 IOLIB/SYSCALLS:FD))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to ""
; in: DEFSYSCALL (SENDFILE "lfp_sendfile")
; (IOLIB/SYSCALLS:DEFSYSCALL (IOLIB/SYSCALLS::SENDFILE "lfp_sendfile")
; (IOLIB/SYSCALLS:SSIZE-T :RESTART T :HANDLE IOLIB/SYSCALLS::INFD :HANDLE2
; IOLIB/SYSCALLS::OUTFD)
; (IOLIB/SYSCALLS::INFD :INT)
; (IOLIB/SYSCALLS::OUTFD :INT)
; (IOLIB/SYSCALLS::OFFSET IOLIB/SYSCALLS:OFF-T)
; (IOLIB/SYSCALLS::NBYTES IOLIB/SYSCALLS:SIZE-T))
; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS::SENDFILE
; (IOLIB/SYSCALLS::INFD IOLIB/SYSCALLS::OUTFD IOLIB/SYSCALLS::OFFSET
; IOLIB/SYSCALLS::NBYTES)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK IOLIB/SYSCALLS::SENDFILE
; (LET ((#:G0 IOLIB/SYSCALLS::INFD))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to ""
; in: DEFINE-C-STRUCT-WRAPPER STAT
; (CFFI:DEFINE-C-STRUCT-WRAPPER IOLIB/SYSCALLS:STAT NIL)
; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS LABELS LET SB-PCL::BIND-ARGS
; --> LET* LOCALLY SYMBOL-MACROLET SB-PCL::PV-BINDING SB-PCL::PV-BINDING1
; --> SB-PCL::PV-ENV LOCALLY LET BLOCK LET SYMBOL-MACROLET
; --> SB-PCL::OPTIMIZED-SET-SLOT-VALUE LET SB-PCL::INSTANCE-WRITE
; --> SB-PCL::ACCESSOR-SET-SLOT-VALUE FUNCALL
; ==>
; 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 signed word to integer coercion (cost 20)
;
; note: doing signed word to integer coercion (cost 20)
;
; note: doing signed word to integer coercion (cost 20)
;
; note: doing signed word to integer coercion (cost 20)
;
; note: doing signed word to integer coercion (cost 20)
; in: DEFENTRYPOINT FUNCALL-STAT
; (FUNCALL IOLIB/SYSCALLS::FN IOLIB/SYSCALLS::ARG IOLIB/SYSCALLS::BUF)
;
; note: unable to optimize away possible call to FDEFINITION at runtime because: FN is not known to be a function
; (CFFI:WITH-FOREIGN-OBJECT (IOLIB/SYSCALLS::BUF '(:STRUCT IOLIB/SYSCALLS:STAT))
; (FUNCALL IOLIB/SYSCALLS::FN IOLIB/SYSCALLS::ARG IOLIB/SYSCALLS::BUF)
; (MAKE-INSTANCE 'IOLIB/SYSCALLS:STAT :POINTER IOLIB/SYSCALLS::BUF))
; --> WITH-ALIEN 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
; in: DEFENTRYPOINT STAT
; (IOLIB/SYSCALLS::FUNCALL-STAT #'IOLIB/SYSCALLS::%STAT IOLIB/SYSCALLS::PATH)
; --> BLOCK MACROLET CFFI:WITH-FOREIGN-OBJECT CFFI-SYS:WITH-FOREIGN-POINTER
; --> WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET LET LET SB-C::RESTORING-NSP
; --> LET SYMBOL-MACROLET LET MAKE-INSTANCE
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFENTRYPOINT FSTAT
; (IOLIB/SYSCALLS::FUNCALL-STAT #'IOLIB/SYSCALLS::%FSTAT IOLIB/SYSCALLS:FD)
; --> BLOCK MACROLET CFFI:WITH-FOREIGN-OBJECT CFFI-SYS:WITH-FOREIGN-POINTER
; --> WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET LET LET SB-C::RESTORING-NSP
; --> LET SYMBOL-MACROLET LET MAKE-INSTANCE
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFENTRYPOINT LSTAT
; (IOLIB/SYSCALLS::FUNCALL-STAT #'IOLIB/SYSCALLS::%LSTAT IOLIB/SYSCALLS::PATH)
; --> BLOCK MACROLET CFFI:WITH-FOREIGN-OBJECT CFFI-SYS:WITH-FOREIGN-POINTER
; --> WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET LET LET SB-C::RESTORING-NSP
; --> LET SYMBOL-MACROLET LET MAKE-INSTANCE
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFENTRYPOINT MKSTEMP
; (CONCATENATE 'STRING IOLIB/SYSCALLS::TEMPLATE "XXXXXX")
; --> LET PROGN UNLESS IF TYPEP
; ==>
; 1
;
; note: unable to optimize due to type uncertainty: The first argument is a T, not a (NOT SB-KERNEL:EXTENDED-SEQUENCE).
; in: DEFENTRYPOINT MKOSTEMP
; (CONCATENATE 'STRING IOLIB/SYSCALLS::TEMPLATE "XXXXXX")
; --> LET PROGN UNLESS IF TYPEP
; ==>
; 1
;
; note: unable to optimize due to type uncertainty: The first argument is a T, not a (NOT SB-KERNEL:EXTENDED-SEQUENCE).
; in: DEFSYSCALL (%GETCWD "getcwd")
; (IOLIB/SYSCALLS:DEFSYSCALL (IOLIB/SYSCALLS::%GETCWD "getcwd")
; :POINTER
; (IOLIB/SYSCALLS::BUF :POINTER)
; (IOLIB/SYSCALLS:SIZE IOLIB/SYSCALLS:SIZE-T))
; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS::%GETCWD
; (IOLIB/SYSCALLS::BUF IOLIB/SYSCALLS:SIZE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK IOLIB/SYSCALLS::%GETCWD
; (LET ((#:G0 IOLIB/SYSCALLS::BUF))
; (LET (#)
; (LET* #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFENTRYPOINT GETCWD
; (IOLIB/SYSCALLS:WITH-CSTRING-TO-SSTRING (IOLIB/SYSCALLS::BUF
; IOLIB/SYSCALLS:+CSTRING-PATH-MAX+
; IOLIB/SYSCALLS::BUFSIZE)
; (IOLIB/SYSCALLS::%GETCWD IOLIB/SYSCALLS::BUF IOLIB/SYSCALLS::BUFSIZE))
; --> WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET LET LET SB-C::RESTORING-NSP
; --> LET SYMBOL-MACROLET LET PROGN
; ==>
; (IOLIB/SYSCALLS:CSTRING-TO-SSTRING IOLIB/SYSCALLS::BUF
; IOLIB/SYSCALLS::BUFSIZE)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFSYSCALL (%MKDTEMP "mkdtemp")
; (IOLIB/SYSCALLS:DEFSYSCALL (IOLIB/SYSCALLS::%MKDTEMP "mkdtemp")
; IOLIB/SYSCALLS::SSTRING
; (IOLIB/SYSCALLS::TEMPLATE IOLIB/SYSCALLS::SSTRING))
; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA FUNCTION BLOCK MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION UNWIND-PROTECT FLET BLOCK BLOCK
; --> SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET* CFFI:CONVERT-FROM-FOREIGN
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN
; (CFFI-SYS:%FOREIGN-FUNCALL "mkdtemp" (:POINTER #:G0 :POINTER) :CONVENTION
; :CDECL :LIBRARY :DEFAULT)
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFENTRYPOINT MKDTEMP
; (CONCATENATE 'STRING IOLIB/SYSCALLS::TEMPLATE "XXXXXX")
; --> LET PROGN UNLESS IF TYPEP
; ==>
; 1
;
; note: unable to optimize due to type uncertainty: The first argument is a T, not a (NOT SB-KERNEL:EXTENDED-SEQUENCE).
; (IOLIB/SYSCALLS::%MKDTEMP IOLIB/SYSCALLS::TEMPLATE)
; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION UNWIND-PROTECT
; --> FLET BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN LET*
; --> CFFI:CONVERT-FROM-FOREIGN
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN
; (CFFI-SYS:%FOREIGN-FUNCALL "mkdtemp" (:POINTER #:G0 :POINTER) :CONVENTION
; :CDECL :LIBRARY :DEFAULT)
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFSYSCALL (FD-CLOEXEC-P "lfp_is_fd_cloexec")
; (IOLIB/SYSCALLS:DEFSYSCALL (IOLIB/SYSCALLS:FD-CLOEXEC-P "lfp_is_fd_cloexec")
; IOLIB/SYSCALLS:BOOL-DESIGNATOR
; (IOLIB/SYSCALLS:FD :INT))
; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA FUNCTION BLOCK LET LET* IF MINUSP
; ==>
; 1
;
; note: unable to open-code FLOAT to RATIONAL comparison due to type uncertainty: The first 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 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.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; in: DEFSYSCALL (FD-NONBLOCK-P "lfp_is_fd_nonblock")
; (IOLIB/SYSCALLS:DEFSYSCALL (IOLIB/SYSCALLS:FD-NONBLOCK-P "lfp_is_fd_nonblock")
; IOLIB/SYSCALLS:BOOL-DESIGNATOR
; (IOLIB/SYSCALLS:FD :INT))
; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA FUNCTION BLOCK LET LET* IF MINUSP
; ==>
; 1
;
; note: unable to open-code FLOAT to RATIONAL comparison due to type uncertainty: The first 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 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.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; in: DEFSYSCALL (FD-OPEN-P "lfp_is_fd_open")
; (IOLIB/SYSCALLS:DEFSYSCALL (IOLIB/SYSCALLS:FD-OPEN-P "lfp_is_fd_open")
; IOLIB/SYSCALLS:BOOL-DESIGNATOR
; (IOLIB/SYSCALLS:FD :INT))
; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA FUNCTION BLOCK LET LET* IF MINUSP
; ==>
; 1
;
; note: unable to open-code FLOAT to RATIONAL comparison due to type uncertainty: The first 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 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.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; in: DEFSYSCALL (FD-TTY-P "isatty")
; (IOLIB/SYSCALLS:DEFSYSCALL (IOLIB/SYSCALLS:FD-TTY-P "isatty")
; IOLIB/SYSCALLS:BOOL-DESIGNATOR
; (IOLIB/SYSCALLS:FD :INT))
; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA FUNCTION BLOCK LET LET* IF MINUSP
; ==>
; 1
;
; note: unable to open-code FLOAT to RATIONAL comparison due to type uncertainty: The first 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 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.
; unable to do inline (unsigned-byte 64) comparison (cost 6) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; etc.
; in: DEFENTRYPOINT PTSNAME
; (CFFI:FOREIGN-STRING-TO-LISP IOLIB/SYSCALLS::BUF)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFCFUN (CMSG.FIRSTHDR "lfp_cmsg_firsthdr")
; (CFFI:DEFCFUN (IOLIB/SYSCALLS:CMSG.FIRSTHDR "lfp_cmsg_firsthdr")
; :POINTER
; (IOLIB/SYSCALLS::MSGH :POINTER))
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:CMSG.FIRSTHDR
; (IOLIB/SYSCALLS::MSGH)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK IOLIB/SYSCALLS:CMSG.FIRSTHDR
; (LET ((#:G0 IOLIB/SYSCALLS::MSGH))
; (CFFI-SYS:%FOREIGN-FUNCALL "lfp_cmsg_firsthdr"
; (:POINTER #:G0 :POINTER) :CONVENTION
; :CDECL :LIBRARY :DEFAULT))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFCFUN (CMSG.NXTHDR "lfp_cmsg_nxthdr")
; (CFFI:DEFCFUN (IOLIB/SYSCALLS:CMSG.NXTHDR "lfp_cmsg_nxthdr")
; :POINTER
; (IOLIB/SYSCALLS::MSGH :POINTER)
; (IOLIB/SYSCALLS::CMSG :POINTER))
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:CMSG.NXTHDR
; (IOLIB/SYSCALLS::MSGH IOLIB/SYSCALLS::CMSG)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK IOLIB/SYSCALLS:CMSG.NXTHDR
; (LET ((#:G0 IOLIB/SYSCALLS::MSGH))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "lfp_cmsg_nxthdr" # :CONVENTION :CDECL
; :LIBRARY :DEFAULT)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFCFUN (CMSG.SPACE "lfp_cmsg_space")
; (CFFI:DEFCFUN (IOLIB/SYSCALLS:CMSG.SPACE "lfp_cmsg_space")
; IOLIB/SYSCALLS:SIZE-T
; (LENGTH IOLIB/SYSCALLS:SIZE-T))
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:CMSG.SPACE
; (LENGTH)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK IOLIB/SYSCALLS:CMSG.SPACE
; (LET ((#:G0 LENGTH))
; (CFFI-SYS:%FOREIGN-FUNCALL "lfp_cmsg_space"
; (:UNSIGNED-LONG #:G0 :UNSIGNED-LONG)
; :CONVENTION :CDECL :LIBRARY :DEFAULT))))
;
; note: doing unsigned word to integer coercion (cost 20) to ""
; in: DEFCFUN (CMSG.LEN "lfp_cmsg_len")
; (CFFI:DEFCFUN (IOLIB/SYSCALLS:CMSG.LEN "lfp_cmsg_len")
; IOLIB/SYSCALLS:SIZE-T
; (LENGTH IOLIB/SYSCALLS:SIZE-T))
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:CMSG.LEN
; (LENGTH)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK IOLIB/SYSCALLS:CMSG.LEN
; (LET ((#:G0 LENGTH))
; (CFFI-SYS:%FOREIGN-FUNCALL "lfp_cmsg_len"
; (:UNSIGNED-LONG #:G0 :UNSIGNED-LONG)
; :CONVENTION :CDECL :LIBRARY :DEFAULT))))
;
; note: doing unsigned word to integer coercion (cost 20) to ""
; in: DEFCFUN (CMSG.DATA "lfp_cmsg_data")
; (CFFI:DEFCFUN (IOLIB/SYSCALLS:CMSG.DATA "lfp_cmsg_data")
; :POINTER
; (IOLIB/SYSCALLS::CMSG :POINTER))
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:CMSG.DATA
; (IOLIB/SYSCALLS::CMSG)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK IOLIB/SYSCALLS:CMSG.DATA
; (LET ((#:G0 IOLIB/SYSCALLS::CMSG))
; (CFFI-SYS:%FOREIGN-FUNCALL "lfp_cmsg_data" (:POINTER #:G0 :POINTER)
; :CONVENTION :CDECL :LIBRARY :DEFAULT))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFSYSCALL (OPENDIR "opendir")
; (IOLIB/SYSCALLS:DEFSYSCALL (IOLIB/SYSCALLS:OPENDIR "opendir")
; :POINTER
; "Open directory PATH for listing of its contents."
; (IOLIB/SYSCALLS::PATH IOLIB/SYSCALLS::SSTRING))
; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:OPENDIR
; (IOLIB/SYSCALLS::PATH)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; "Open directory PATH for listing of its contents."
; (BLOCK IOLIB/SYSCALLS:OPENDIR
; (MULTIPLE-VALUE-BIND (#:G0 #:PARAM4)
; (CFFI:TRANSLATE-TO-FOREIGN IOLIB/SYSCALLS::PATH
; #)
; (UNWIND-PROTECT (PROGN #)
; (CFFI:FREE-TRANSLATED-OBJECT #:G0 # #:PARAM4)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFENTRYPOINT READDIR
; (IOLIB/SYSCALLS:CSTRING-TO-SSTRING IOLIB/SYSCALLS:NAME)
;
; note: doing SAP to pointer coercion (cost 20)
; (VALUES (IOLIB/SYSCALLS:CSTRING-TO-SSTRING IOLIB/SYSCALLS:NAME) TYPE
; IOLIB/SYSCALLS:FILENO)
;
; note: doing unsigned word to integer coercion (cost 20), for:
; the third argument of PUSH-VALUES
; in: DEFSYSCALL (TELLDIR "telldir")
; (IOLIB/SYSCALLS:DEFSYSCALL (IOLIB/SYSCALLS:TELLDIR "telldir")
; IOLIB/SYSCALLS:OFF-T
; "Return the current location in directory DIR."
; (IOLIB/SYSCALLS::DIRP :POINTER))
; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:TELLDIR
; (IOLIB/SYSCALLS::DIRP)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; "Return the current location in directory DIR."
; (BLOCK IOLIB/SYSCALLS:TELLDIR
; (LET ((#:G0 IOLIB/SYSCALLS::DIRP))
; (LET* (# #)
; (IF #
; #
; #:RETVAL1)))))
;
; note: doing signed word to integer coercion (cost 20) to ""
; in: DEFSYSCALL (MMAP "lfp_mmap")
; (IOLIB/SYSCALLS:DEFSYSCALL (IOLIB/SYSCALLS:MMAP "lfp_mmap")
; (:POINTER :HANDLE IOLIB/SYSCALLS:FD)
; #<(SIMPLE-ARRAY CHARACTER
; (284)) Map file referenced by FD at offset OFFSET into address space of the
; calling process at address ADDR and length LENGTH.
; PROT describes the desired memory protection of the mapping.
; FLAGS determines wh... {10126FD09F}>
; (IOLIB/SYSCALLS::ADDR :POINTER)
; (LENGTH IOLIB/SYSCALLS:SIZE-T)
; (IOLIB/SYSCALLS::PROT :INT)
; (IOLIB/SYSCALLS::FLAGS :INT)
; (IOLIB/SYSCALLS:FD :INT)
; (IOLIB/SYSCALLS::OFFSET IOLIB/SYSCALLS:OFF-T))
; --> CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:MMAP
; (IOLIB/SYSCALLS::ADDR LENGTH IOLIB/SYSCALLS::PROT IOLIB/SYSCALLS::FLAGS
; IOLIB/SYSCALLS:FD IOLIB/SYSCALLS::OFFSET)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; #<(SIMPLE-ARRAY CHARACTER
; (284)) Map file referenced by FD at offset OFFSET into address space of the
; calling process at address ADDR and length LENGTH.
; PROT describes the desired memory protection of the mapping.
; FLAGS determines wh... {10126FD09F}>
; (BLOCK IOLIB/SYSCALLS:MMAP
; (LET ((#:G0 IOLIB/SYSCALLS::ADDR))
; (LET (#)
; (LET #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFENTRYPOINT GETRLIMIT
; (IOLIB/SYSCALLS:DEFENTRYPOINT IOLIB/SYSCALLS:GETRLIMIT
; (IOLIB/SYSCALLS::RESOURCE)
; "Return soft and hard limit of system resource RESOURCE."
; (CFFI:WITH-FOREIGN-OBJECT (IOLIB/SYSCALLS::RL
; '(:STRUCT IOLIB/SYSCALLS:RLIMIT))
; (CFFI:WITH-FOREIGN-SLOTS ((IOLIB/SYSCALLS:CUR MAX) IOLIB/SYSCALLS::RL
; (:STRUCT IOLIB/SYSCALLS:RLIMIT))
; (IOLIB/SYSCALLS::%GETRLIMIT IOLIB/SYSCALLS::RESOURCE IOLIB/SYSCALLS::RL)
; (VALUES IOLIB/SYSCALLS:CUR MAX))))
; --> IOLIB/BASE:DEFUN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:GETRLIMIT
; (IOLIB/SYSCALLS::RESOURCE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; "Return soft and hard limit of system resource RESOURCE."
; (BLOCK IOLIB/SYSCALLS:GETRLIMIT
; (MACROLET ((IOLIB/BASE:RETURN* #
; `#))
; (CFFI:WITH-FOREIGN-OBJECT (IOLIB/SYSCALLS::RL '#)
; (CFFI:WITH-FOREIGN-SLOTS #
; #
; #)))))
;
; note: doing unsigned word to integer coercion (cost 20) to ""
;
; note: doing unsigned word to integer coercion (cost 20) to ""
; in: DEFENTRYPOINT GETRUSAGE
; (IOLIB/SYSCALLS:DEFENTRYPOINT IOLIB/SYSCALLS:GETRUSAGE
; (IOLIB/SYSCALLS::WHO)
; "Return resource usage measures of WHO."
; (CFFI:WITH-FOREIGN-OBJECT (IOLIB/SYSCALLS::RU
; '(:STRUCT IOLIB/SYSCALLS:RUSAGE))
; (IOLIB/SYSCALLS::%GETRUSAGE IOLIB/SYSCALLS::WHO IOLIB/SYSCALLS::RU)
; (CFFI:WITH-FOREIGN-SLOTS ((IOLIB/SYSCALLS:MAXRSS IOLIB/SYSCALLS:IXRSS
; IOLIB/SYSCALLS:IDRSS IOLIB/SYSCALLS:ISRSS
; IOLIB/SYSCALLS:MINFLT IOLIB/SYSCALLS:MAJFLT
; IOLIB/SYSCALLS:NSWAP IOLIB/SYSCALLS:INBLOCK
; IOLIB/SYSCALLS::OUBLOCK IOLIB/SYSCALLS:MSGSND
; IOLIB/SYSCALLS:MSGRCV IOLIB/SYSCALLS:NSIGNALS
; ...)
; IOLIB/SYSCALLS::RU
; (:STRUCT IOLIB/SYSCALLS:RUSAGE))
; (VALUES (CFFI:FOREIGN-SLOT-VALUE # '# 'IOLIB/SYSCALLS:SEC)
; (CFFI:FOREIGN-SLOT-VALUE # '# 'IOLIB/SYSCALLS:USEC)
; (CFFI:FOREIGN-SLOT-VALUE # '# 'IOLIB/SYSCALLS:SEC)
; (CFFI:FOREIGN-SLOT-VALUE # '# 'IOLIB/SYSCALLS:USEC)
; IOLIB/SYSCALLS:MAXRSS IOLIB/SYSCALLS:IXRSS IOLIB/SYSCALLS:IDRSS
; IOLIB/SYSCALLS:ISRSS IOLIB/SYSCALLS:MINFLT
; IOLIB/SYSCALLS:MAJFLT IOLIB/SYSCALLS:NSWAP ...))))
; --> IOLIB/BASE:DEFUN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN
; --> SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA IOLIB/SYSCALLS:GETRUSAGE
; (IOLIB/SYSCALLS::WHO)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; "Return resource usage measures of WHO."
; (BLOCK IOLIB/SYSCALLS:GETRUSAGE
; (MACROLET ((IOLIB/BASE:RETURN* #
; `#))
; (CFFI:WITH-FOREIGN-OBJECT (IOLIB/SYSCALLS::RU '#)
; (IOLIB/SYSCALLS::%GETRUSAGE IOLIB/SYSCALLS::WHO IOLIB/SYSCALLS::RU)
; (CFFI:WITH-FOREIGN-SLOTS #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to "