Context Navigation

Back to Ticket #70115

Ticket #70115: cl-com.inuoe.jzon.log

File cl-com.inuoe.jzon.log, 740.3 KB (added by barracuda156, 4 months ago)

Line
1	version:1
2	:debug:clean Starting logging for cl-com.inuoe.jzon @1.1.3_0
3	:debug:sysinfo Mac OS X 10.6 (darwin/10.0.0d2) arch powerpc
4	:debug:sysinfo MacPorts 2.9.99
5	:debug:sysinfo Xcode 3.2, CLT none
6	:debug:sysinfo SDK 10.6
7	:debug:sysinfo MACOSX_DEPLOYMENT_TARGET: 10.6
8	:warn:clean configured user/group macports does not exist, will build as root
9	:debug:clean Attempting ln -sf /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work /opt/local/var/macports/sources/rsync.macports.org/macports/release/tarballs/ports/lisp/cl-com.inuoe.jzon/work
10	:debug:main Executing org.macports.main (cl-com.inuoe.jzon)
11	:debug:archivefetch archivefetch phase started at Thu May 30 21:39:47 CST 2024
12	:debug:archivefetch Executing org.macports.archivefetch (cl-com.inuoe.jzon)
13	:debug:fetch fetch phase started at Thu May 30 21:39:47 CST 2024
14	:notice:fetch ---> Fetching distfiles for cl-com.inuoe.jzon
15	:debug:fetch Executing org.macports.fetch (cl-com.inuoe.jzon)
16	:info:fetch ---> jzon-1.1.3.tar.gz does not exist in /opt/local/var/macports/distfiles/cl-com.inuoe.jzon
17	:notice:fetch ---> Attempting to fetch jzon-1.1.3.tar.gz from https://codeload.github.com/Zulu-Inuoe/jzon/legacy.tar.gz/v1.1.3?dummy=
18	:debug:checksum checksum phase started at Thu May 30 21:39:48 CST 2024
19	:notice:checksum ---> Verifying checksums for cl-com.inuoe.jzon
20	:debug:checksum Executing org.macports.checksum (cl-com.inuoe.jzon)
21	:info:checksum ---> Checksumming jzon-1.1.3.tar.gz
22	:debug:checksum Calculated (rmd160) is 2cd79d808467bdf27ffafafb854d9a32a0e90ee1
23	:debug:checksum Correct (rmd160) checksum for jzon-1.1.3.tar.gz
24	:debug:checksum Calculated (sha256) is b1b8014c444727220f3de9be89d7fe21d94b52f0180e476327e88e5306654ebf
25	:debug:checksum Correct (sha256) checksum for jzon-1.1.3.tar.gz
26	:debug:checksum Calculated (size) is 68494
27	:debug:checksum Correct (size) checksum for jzon-1.1.3.tar.gz
28	:debug:extract extract phase started at Thu May 30 21:39:48 CST 2024
29	:notice:extract ---> Extracting cl-com.inuoe.jzon
30	:debug:extract Executing org.macports.extract (cl-com.inuoe.jzon)
31	:info:extract ---> Extracting jzon-1.1.3.tar.gz
32	:debug:extract setting option extract.args to '/opt/local/var/macports/distfiles/cl-com.inuoe.jzon/jzon-1.1.3.tar.gz'
33	:debug:extract Environment:
34	:debug:extract CC_PRINT_OPTIONS='YES'
35	:debug:extract CC_PRINT_OPTIONS_FILE='/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.CC_PRINT_OPTIONS'
36	:debug:extract CPATH='/opt/local/include'
37	:debug:extract DEVELOPER_DIR='/Developer'
38	:debug:extract LIBRARY_PATH='/opt/local/lib'
39	:debug:extract MACOSX_DEPLOYMENT_TARGET='10.6'
40	:info:extract Executing: cd "/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work" && /usr/bin/gzip -dc '/opt/local/var/macports/distfiles/cl-com.inuoe.jzon/jzon-1.1.3.tar.gz' \| /usr/bin/gnutar --no-same-owner -xf -
41	:debug:extract system: cd "/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work" && /usr/bin/gzip -dc '/opt/local/var/macports/distfiles/cl-com.inuoe.jzon/jzon-1.1.3.tar.gz' \| /usr/bin/gnutar --no-same-owner -xf -
42	:debug:extract extract.rename: Renaming Zulu-Inuoe-jzon-6967eac -> jzon-1.1.3
43	:debug:patch patch phase started at Thu May 30 21:39:49 CST 2024
44	:debug:patch Executing org.macports.patch (cl-com.inuoe.jzon)
45	:debug:configure configure phase started at Thu May 30 21:39:49 CST 2024
46	:notice:configure ---> Configuring cl-com.inuoe.jzon
47	:debug:configure Preferred compilers: gcc-4.2 llvm-gcc-4.2 gcc-4.0 macports-gcc-13 macports-gcc-12 macports-gcc-11 macports-gcc-10 macports-gcc-9 macports-gcc-8 macports-gcc-7 macports-gcc-6 macports-gcc-5 macports-clang-11 macports-clang-10 macports-clang-9.0 macports-clang-8.0 macports-clang-7.0 macports-clang-6.0 macports-clang-5.0 macports-clang-3.7 macports-clang-3.4
48	:debug:configure Using compiler 'Xcode GCC 4.2'
49	:debug:configure Executing proc-pre-org.macports.configure-configure-0
50	:debug:configure Active variants check for source-type install considers depends_fetch depends_extract depends_lib depends_build depends_run: cl-alexandria cl-closer-mop cl-fiveam cl-flexi-streams cl-float-features cl-trivial-gray-streams sbcl
51	:debug:configure Executing org.macports.configure (cl-com.inuoe.jzon)
52	:debug:configure Executing portconfigure::configure_finish
53	:debug:build build phase started at Thu May 30 21:39:49 CST 2024
54	:notice:build ---> Building cl-com.inuoe.jzon
55	:debug:build Executing proc-pre-org.macports.build-build-0
56	:debug:build Executing org.macports.build (cl-com.inuoe.jzon)
57	:info:build xinstall: mkdir /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/build
58	:info:build xinstall: mkdir /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/build/source
59	:info:build xinstall: mkdir /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/build/system
60	:info:build Execute asdf:build-op at com.inuoe.jzon-tests by SBCL
61	:debug:build system -W /tmp/common_lisp.eeb95ahs: /opt/local/bin/sbcl --no-sysinit --no-userinit --non-interactive --eval '(require "asdf")' --eval '(setf asdf:central-registry (list* (quote default-pathname-defaults) #p"/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/build/system/" #p"/opt/local/share/common-lisp/system/" asdf:central-registry))' --eval '(asdf:operate (quote asdf:build-op) (quote com.inuoe.jzon-tests))' 2>&1
62	:info:build This is SBCL 2.4.3, an implementation of ANSI Common Lisp.
63	:info:build More information about SBCL is available at <http://www.sbcl.org/>.
64	:info:build SBCL is free software, provided as is, with absolutely no warranty.
65	:info:build It is mostly in the public domain; some portions are provided under
66	:info:build BSD-style licenses. See the CREDITS and COPYING files in the
67	:info:build distribution for more information.
68	:info:build WARNING: System definition file #P"/opt/local/share/common-lisp/source/cl-flexi-streams/flexi-streams.asd" contains definition for system "flexi-streams-test". Please only define "flexi-streams" and secondary systems with a name starting with "flexi-streams/" (e.g. "flexi-streams/test") in that file.
69	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/package.lisp" (written 22 JUL 2021 02:09:17 PM):
70	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/package-tmp7LQ0A0VI.fasl
71	:info:build ; compilation finished in 0:00:00.023
72	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/definitions.lisp" (written 22 JUL 2021 02:09:17 PM):
73	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/definitions-tmp74KGUNRZ.fasl
74	:info:build ; compilation finished in 0:00:00.048
75	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/binding.lisp" (written 22 JUL 2021 02:09:17 PM):
76	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/binding-tmpCEL1YIM2.fasl
77	:info:build ; compilation finished in 0:00:00.081
78	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/strings.lisp" (written 22 JUL 2021 02:09:17 PM):
79	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/strings-tmpHAMQABTV.fasl
80	:info:build ; compilation finished in 0:00:00.006
81	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/conditions.lisp" (written 22 JUL 2021 02:09:17 PM):
82	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/conditions-tmpUPMG0IBO.fasl
83	:info:build ; compilation finished in 0:00:00.091
84	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/symbols.lisp" (written 22 JUL 2021 02:09:17 PM):
85	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/symbols-tmpAKM32D0F.fasl
86	:info:build ; compilation finished in 0:00:00.063
87	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/macros.lisp" (written 22 JUL 2021 02:09:17 PM):
88	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/macros-tmp8UG37QJ5.fasl
89	:info:build ; compilation finished in 0:00:00.407
90	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/functions.lisp" (written 22 JUL 2021 02:09:17 PM):
91	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/functions-tmp65YV5VYW.fasl
92	:info:build ; compilation finished in 0:00:00.276
93	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/lists.lisp" (written 22 JUL 2021 02:09:17 PM):
94	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/lists-tmpGO4MNX7G.fasl
95	:info:build ; compilation finished in 0:00:00.513
96	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/types.lisp" (written 22 JUL 2021 02:09:17 PM):
97	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/types-tmp9NXH2K1.fasl
98	:info:build ; compilation finished in 0:00:00.370
99	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/io.lisp" (written 22 JUL 2021 02:09:17 PM):
100	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/io-tmp6B86GLV2.fasl
101	:info:build ; compilation finished in 0:00:00.461
102	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/hash-tables.lisp" (written 22 JUL 2021 02:09:17 PM):
103	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/hash-tables-tmpZWLLOVAH.fasl
104	:info:build ; compilation finished in 0:00:00.414
105	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/control-flow.lisp" (written 22 JUL 2021 02:09:17 PM):
106	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/control-flow-tmpS9M8BVBG.fasl
107	:info:build ; compilation finished in 0:00:00.287
108	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/arrays.lisp" (written 22 JUL 2021 02:09:17 PM):
109	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/arrays-tmp205IFRLS.fasl
110	:info:build ; compilation finished in 0:00:00.063
111	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/sequences.lisp" (written 22 JUL 2021 02:09:17 PM):
112	:info:build ; file: /opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/sequences.lisp
113	:info:build ; in: DEFUN LENGTH=
114	:info:build ; (LENGTH FIRST)
115	:info:build ;
116	:info:build ; note: unable to
117	:info:build ; optimize
118	:info:build ; due to type uncertainty:
119	:info:build ; The first argument is a SEQUENCE, not a VECTOR.
120	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/sequences-tmpBW6GBZVX.fasl
121	:info:build ; compilation finished in 0:00:00.706
122	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/numbers.lisp" (written 22 JUL 2021 02:09:17 PM):
123	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/numbers-tmpMDMI656Q.fasl
124	:info:build ; compilation finished in 0:00:00.717
125	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/features.lisp" (written 22 JUL 2021 02:09:17 PM):
126	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-1/features-tmpQN7VP0FI.fasl
127	:info:build ; compilation finished in 0:00:00.031
128	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-2/package.lisp" (written 22 JUL 2021 02:09:17 PM):
129	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-2/package-tmpNOSTK6D0.fasl
130	:info:build ; compilation finished in 0:00:00.033
131	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-2/arrays.lisp" (written 22 JUL 2021 02:09:17 PM):
132	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-2/arrays-tmp9RA72042.fasl
133	:info:build ; compilation finished in 0:00:00.066
134	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-2/control-flow.lisp" (written 22 JUL 2021 02:09:17 PM):
135	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-2/control-flow-tmpGXZUHQQV.fasl
136	:info:build ; compilation finished in 0:00:00.029
137	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-2/sequences.lisp" (written 22 JUL 2021 02:09:17 PM):
138	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-2/sequences-tmp1SBDRUB4.fasl
139	:info:build ; compilation finished in 0:00:00.011
140	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-alexandria/alexandria-2/lists.lisp" (written 22 JUL 2021 02:09:17 PM):
141	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-alexandria/alexandria-2/lists-tmpFJI67R2A.fasl
142	:info:build ; compilation finished in 0:00:00.021
143	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-asdf-flv/package.lisp" (written 12 SEP 2023 10:57:32 PM):
144	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-asdf-flv/package-tmp2LAB0LT0.fasl
145	:info:build ; compilation finished in 0:00:00.006
146	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-asdf-flv/asdf-flv.lisp" (written 12 SEP 2023 10:57:32 PM):
147	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-asdf-flv/asdf-flv-tmp5G8XXQL5.fasl
148	:info:build ; compilation finished in 0:00:00.125
149	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-trivial-backtrace/dev/packages.lisp" (written 12 JAN 2023 02:18:44 AM):
150	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-trivial-backtrace/dev/packages-tmp70X8ZE5V.fasl
151	:info:build ; compilation finished in 0:00:00.006
152	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-trivial-backtrace/dev/utilities.lisp" (written 12 JAN 2023 02:18:44 AM):
153	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-trivial-backtrace/dev/utilities-tmpRJ7B84T0.fasl
154	:info:build ; compilation finished in 0:00:00.301
155	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-trivial-backtrace/dev/backtrace.lisp" (written 12 JAN 2023 02:18:44 AM):
156	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-trivial-backtrace/dev/backtrace-tmpOMGCSPAB.fasl
157	:info:build ; compilation finished in 0:00:00.095
158	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-trivial-backtrace/dev/map-backtrace.lisp" (written 12 JAN 2023 02:18:44 AM):
159	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-trivial-backtrace/dev/map-backtrace-tmpLEWWGRGS.fasl
160	:info:build ; compilation finished in 0:00:00.324
161	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-trivial-backtrace/dev/fallback.lisp" (written 12 JAN 2023 02:18:44 AM):
162	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-trivial-backtrace/dev/fallback-tmp2VH9CUXA.fasl
163	:info:build ; compilation finished in 0:00:00.015
164	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-fiveam/src/package.lisp" (written 08 JUL 2020 04:09:40 PM):
165	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-fiveam/src/package-tmp21MKT5OO.fasl
166	:info:build ; compilation finished in 0:00:00.010
167	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-fiveam/src/utils.lisp" (written 08 JUL 2020 04:09:40 PM):
168	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-fiveam/src/utils-tmpMXTBQGWB.fasl
169	:info:build ; compilation finished in 0:00:00.268
170	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-fiveam/src/check.lisp" (written 08 JUL 2020 04:09:40 PM):
171	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-fiveam/src/check-tmpPPC4Z10Q.fasl
172	:info:build ; compilation finished in 0:00:00.480
173	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-fiveam/src/fixture.lisp" (written 08 JUL 2020 04:09:40 PM):
174	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-fiveam/src/fixture-tmpRD3N4073.fasl
175	:info:build ; compilation finished in 0:00:00.061
176	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-fiveam/src/classes.lisp" (written 08 JUL 2020 04:09:40 PM):
177	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-fiveam/src/classes-tmpFHOV2EXD.fasl
178	:info:build ; compilation finished in 0:00:00.041
179	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-fiveam/src/random.lisp" (written 08 JUL 2020 04:09:40 PM):
180	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-fiveam/src/random-tmp5P00NUE.fasl
181	:info:build ; compilation finished in 0:00:00.445
182	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-fiveam/src/test.lisp" (written 08 JUL 2020 04:09:40 PM):
183	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-fiveam/src/test-tmp94JO3ZTC.fasl
184	:info:build ; compilation finished in 0:00:00.140
185	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-fiveam/src/explain.lisp" (written 08 JUL 2020 04:09:40 PM):
186	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-fiveam/src/explain-tmp6OFDFVAR.fasl
187	:info:build ; compilation finished in 0:00:00.120
188	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-fiveam/src/suite.lisp" (written 08 JUL 2020 04:09:40 PM):
189	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-fiveam/src/suite-tmpRYWTYMDY.fasl
190	:info:build ; compilation finished in 0:00:00.130
191	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-fiveam/src/run.lisp" (written 08 JUL 2020 04:09:40 PM):
192	:info:build ; file: /opt/local/share/common-lisp/source/cl-fiveam/src/run.lisp
193	:info:build ; in: DEFUN RUN!
194	:info:build ; (DEFUN IT.BESE.FIVEAM:RUN!
195	:info:build ; (
196	:info:build ; &OPTIONAL (IT.BESE.FIVEAM::TEST-SPEC IT.BESE.FIVEAM::SUITE)
197	:info:build ; &KEY
198	:info:build ; ((:PRINT-NAMES IT.BESE.FIVEAM:PRINT-NAMES)
199	:info:build ; IT.BESE.FIVEAM:PRINT-NAMES))
200	:info:build ; "Equivalent to (explain! (run TEST-SPEC))."
201	:info:build ; (IT.BESE.FIVEAM:EXPLAIN! (IT.BESE.FIVEAM:RUN IT.BESE.FIVEAM::TEST-SPEC)))
202	:info:build ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
203	:info:build ; ==>
204	:info:build ; #'(SB-INT:NAMED-LAMBDA IT.BESE.FIVEAM:RUN!
205	:info:build ; (&OPTIONAL (IT.BESE.FIVEAM::TEST-SPEC IT.BESE.FIVEAM::SUITE) &KEY
206	:info:build ; ((:PRINT-NAMES IT.BESE.FIVEAM:PRINT-NAMES)
207	:info:build ; IT.BESE.FIVEAM:PRINT-NAMES))
208	:info:build ; (DECLARE (SB-C::TOP-LEVEL-FORM))
209	:info:build ; "Equivalent to (explain! (run TEST-SPEC))."
210	:info:build ; (BLOCK IT.BESE.FIVEAM:RUN!
211	:info:build ; (IT.BESE.FIVEAM:EXPLAIN!
212	:info:build ; (IT.BESE.FIVEAM:RUN IT.BESE.FIVEAM::TEST-SPEC))))
213	:info:build ;
214	:info:build ; caught STYLE-WARNING:
215	:info:build ; &OPTIONAL and &KEY found in the same lambda list: (&OPTIONAL
216	:info:build ; (TEST-SPEC SUITE) &KEY
217	:info:build ; ((PRINT-NAMES PRINT-NAMES)
218	:info:build ; PRINT-NAMES))
219	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-fiveam/src/run-tmpW78F18LW.fasl
220	:info:build ; compilation finished in 0:00:00.428
221	:info:build WARNING:
222	:info:build Lisp compilation had style-warnings while
223	:info:build compiling #<CL-SOURCE-FILE "fiveam" "run">
224	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-trivial-gray-streams/package.lisp" (written 27 JUN 2023 06:42:19 PM):
225	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-trivial-gray-streams/package-tmpWUHTUDVN.fasl
226	:info:build ; compilation finished in 0:00:00.021
227	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-trivial-gray-streams/streams.lisp" (written 27 JUN 2023 06:42:19 PM):
228	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-trivial-gray-streams/streams-tmpCK73UFEK.fasl
229	:info:build ; compilation finished in 0:00:00.172
230	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/packages.lisp" (written 09 JUL 2020 08:18:28 PM):
231	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/packages-tmpEBEIAP0J.fasl
232	:info:build ; compilation finished in 0:00:00.013
233	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/mapping.lisp" (written 09 JUL 2020 08:18:28 PM):
234	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/mapping-tmpSE943D3D.fasl
235	:info:build ; compilation finished in 0:00:00.046
236	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/ascii.lisp" (written 09 JUL 2020 08:18:28 PM):
237	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/ascii-tmpN5RKE5P2.fasl
238	:info:build ; compilation finished in 0:00:00.011
239	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/koi8-r.lisp" (written 09 JUL 2020 08:18:28 PM):
240	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/koi8-r-tmpNQZ6T1LT.fasl
241	:info:build ; compilation finished in 0:00:00.011
242	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/iso-8859.lisp" (written 09 JUL 2020 08:18:28 PM):
243	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/iso-8859-tmpWLS9DP2S.fasl
244	:info:build ; compilation finished in 0:00:00.072
245	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/enc-cn-tbl.lisp" (written 09 JUL 2020 08:18:28 PM):
246	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/enc-cn-tbl-tmp8VCF5G6M.fasl
247	:info:build ; compilation finished in 0:00:01.003
248	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/code-pages.lisp" (written 09 JUL 2020 08:18:28 PM):
249	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/code-pages-tmp8DMZV8XU.fasl
250	:info:build ; compilation finished in 0:00:00.120
251	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/specials.lisp" (written 09 JUL 2020 08:18:28 PM):
252	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/specials-tmpEGA125WT.fasl
253	:info:build ; compilation finished in 0:00:00.090
254	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/util.lisp" (written 09 JUL 2020 08:18:28 PM):
255	:info:build ; file: /opt/local/share/common-lisp/source/cl-flexi-streams/util.lisp
256	:info:build ; in: DEFUN GET-MULTIBYTE-MAPPER
257	:info:build ; (AREF FLEXI-STREAMS::TABLE FLEXI-STREAMS::M 0)
258	:info:build ;
259	:info:build ; note: unable to
260	:info:build ; avoid runtime dispatch on array element type
261	:info:build ; due to type uncertainty:
262	:info:build ; The first argument is a (ARRAY * (* 2)), not a SIMPLE-ARRAY.
263	:info:build ; (AREF FLEXI-STREAMS::TABLE FLEXI-STREAMS::M 1)
264	:info:build ;
265	:info:build ; note: unable to
266	:info:build ; avoid runtime dispatch on array element type
267	:info:build ; due to type uncertainty:
268	:info:build ; The first argument is a (ARRAY * (* 2)), not a SIMPLE-ARRAY.
269	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/util-tmpE9RDNCMC.fasl
270	:info:build ; compilation finished in 0:00:00.254
271	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/conditions.lisp" (written 09 JUL 2020 08:18:28 PM):
272	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/conditions-tmpGTSGBQIR.fasl
273	:info:build ; compilation finished in 0:00:00.065
274	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/external-format.lisp" (written 09 JUL 2020 08:18:28 PM):
275	:info:build ; file: /opt/local/share/common-lisp/source/cl-flexi-streams/external-format.lisp
276	:info:build ; in: DEFUN EXTERNAL-FORMAT-EQUAL
277	:info:build ; (EQL (FLEXI-STREAMS:EXTERNAL-FORMAT-ID FLEXI-STREAMS::EF1)
278	:info:build ; (FLEXI-STREAMS:EXTERNAL-FORMAT-ID FLEXI-STREAMS::EF2))
279	:info:build ;
280	:info:build ; note: unable to
281	:info:build ; optimize
282	:info:build ; due to type uncertainty:
283	:info:build ; The first argument is a T, not a SINGLE-FLOAT.
284	:info:build ; The second argument is a T, not a SINGLE-FLOAT.
285	:info:build ;
286	:info:build ; note: unable to
287	:info:build ; optimize
288	:info:build ; due to type uncertainty:
289	:info:build ; The first argument is a T, not a DOUBLE-FLOAT.
290	:info:build ; The second argument is a T, not a DOUBLE-FLOAT.
291	:info:build ;
292	:info:build ; note: forced to do GENERIC-EQL (cost 10)
293	:info:build ; unable to do inline fixnum comparison (cost 4) because:
294	:info:build ; The first argument is a T, not a FIXNUM.
295	:info:build ; The second argument is a T, not a FIXNUM.
296	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/external-format-tmpRCRZ6VP.fasl
297	:info:build ; compilation finished in 0:00:00.759
298	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/length.lisp" (written 09 JUL 2020 08:18:28 PM):
299	:info:build ; file: /opt/local/share/common-lisp/source/cl-flexi-streams/length.lisp
300	:info:build ; in: DEFMETHOD ENCODING-FACTOR (FLEXI-CRLF-MIXIN)
301	:info:build ; (* 1.02d0 (CALL-NEXT-METHOD))
302	:info:build ;
303	:info:build ; note: forced to do GENERIC-* (cost 50)
304	:info:build ; unable to do inline float arithmetic (cost 5) because:
305	:info:build ; The first argument is a T, not a DOUBLE-FLOAT.
306	:info:build ; The result is a (VALUES (OR (COMPLEX DOUBLE-FLOAT) DOUBLE-FLOAT)
307	:info:build ; &OPTIONAL), not a (VALUES DOUBLE-FLOAT &OPTIONAL).
308	:info:build ; in: DEFGENERIC CHECK-END
309	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT "This sequence can't be decoded ~
310	:info:build ; using ~A as it is too short. ~A octet~:P missing at the end."
311	:info:build ; (FLEXI-STREAMS:EXTERNAL-FORMAT-NAME
312	:info:build ; FORMAT)
313	:info:build ; (- FLEXI-STREAMS::I FLEXI-STREAMS::END))
314	:info:build ;
315	:info:build ; note: doing signed word to integer coercion (cost 20)
316	:info:build ; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-8-BIT-FORMAT T T T)
317	:info:build ; (DEFMETHOD FLEXI-STREAMS::COMPUTE-NUMBER-OF-CHARS
318	:info:build ; ((FORMAT FLEXI-STREAMS::FLEXI-8-BIT-FORMAT) SEQUENCE
319	:info:build ; FLEXI-STREAMS::START FLEXI-STREAMS::END)
320	:info:build ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
321	:info:build ; (DECLARE (FIXNUM FLEXI-STREAMS::START FLEXI-STREAMS::END))
322	:info:build ; (DECLARE (IGNORE SEQUENCE))
323	:info:build ; (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
324	:info:build ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
325	:info:build ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA
326	:info:build ; ==>
327	:info:build ; #'(SB-INT:NAMED-LAMBDA (SB-PCL::FAST-METHOD
328	:info:build ; FLEXI-STREAMS::COMPUTE-NUMBER-OF-CHARS
329	:info:build ; (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT T T T))
330	:info:build ; (SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL. FORMAT SEQUENCE
331	:info:build ; FLEXI-STREAMS::START FLEXI-STREAMS::END)
332	:info:build ; (DECLARE (IGNORABLE SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL.)
333	:info:build ; (DISABLE-PACKAGE-LOCKS SB-PCL::PV-ENV-ENVIRONMENT))
334	:info:build ; (DECLARE (IGNORE SEQUENCE))
335	:info:build ; (DECLARE (FIXNUM FLEXI-STREAMS::END FLEXI-STREAMS::START))
336	:info:build ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
337	:info:build ; (DECLARE
338	:info:build ; (SB-C::CURRENT-DEFMETHOD FLEXI-STREAMS::COMPUTE-NUMBER-OF-CHARS NIL
339	:info:build ; (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT T T T)
340	:info:build ; (FORMAT SEQUENCE FLEXI-STREAMS::START FLEXI-STREAMS::END)))
341	:info:build ; (DECLARE
342	:info:build ; (SB-C::SOURCE-FORM
343	:info:build ; (LAMBDA (FORMAT SEQUENCE FLEXI-STREAMS::START FLEXI-STREAMS::END)
344	:info:build ; (DECLARE #)
345	:info:build ; (DECLARE #)
346	:info:build ; (DECLARE #)
347	:info:build ; (- FLEXI-STREAMS::END FLEXI-STREAMS::START))))
348	:info:build ; (DECLARE (SB-PCL::%PARAMETER FLEXI-STREAMS::END))
349	:info:build ; (DECLARE (SB-PCL::%PARAMETER FLEXI-STREAMS::START))
350	:info:build ; (DECLARE (SB-PCL::%PARAMETER SEQUENCE))
351	:info:build ; ...)
352	:info:build ;
353	:info:build ; note: doing signed word to integer coercion (cost 20) to "<return value>"
354	:info:build ; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-MIXIN T T T)
355	:info:build ; (SEARCH #(13 10) SEQUENCE :START2 FLEXI-STREAMS::I :END2 FLEXI-STREAMS::END
356	:info:build ; :TEST #'=)
357	:info:build ;
358	:info:build ; note: unable to
359	:info:build ; optimize
360	:info:build ; due to type uncertainty:
361	:info:build ; The first argument is a VECTOR, not a SIMPLE-STRING.
362	:info:build ;
363	:info:build ; note: unable to
364	:info:build ; avoid runtime dispatch on array element type
365	:info:build ; due to type uncertainty:
366	:info:build ; The first argument is a VECTOR, not a SIMPLE-ARRAY.
367	:info:build ;
368	:info:build ; note: unable to open code because: The operands might not be the same type.
369	:info:build ; (- FLEXI-STREAMS::END FLEXI-STREAMS::START)
370	:info:build ;
371	:info:build ; note: doing signed word to integer coercion (cost 20), for:
372	:info:build ; the first result of inline (signed-byte 32) arithmetic
373	:info:build ; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-UTF-8-FORMAT T T T)
374	:info:build ; (AREF SEQUENCE FLEXI-STREAMS::I)
375	:info:build ;
376	:info:build ; note: unable to
377	:info:build ; optimize
378	:info:build ; because:
379	:info:build ; Upgraded element type of array is not known at compile time.
380	:info:build ; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-8-FORMAT T T T)
381	:info:build ; (AREF SEQUENCE FLEXI-STREAMS::I)
382	:info:build ;
383	:info:build ; note: unable to
384	:info:build ; optimize
385	:info:build ; because:
386	:info:build ; Upgraded element type of array is not known at compile time.
387	:info:build ; in:
388	:info:build ; DEFMETHOD COMPUTE-NUMBER-OF-CHARS :BEFORE (FLEXI-UTF-16-FORMAT T T T)
389	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT "~A octet~:P cannot be decoded ~
390	:info:build ; using UTF-16 as ~:*~A is not even."
391	:info:build ; (- FLEXI-STREAMS::END
392	:info:build ; FLEXI-STREAMS::START))
393	:info:build ;
394	:info:build ; note: doing signed word to integer coercion (cost 20)
395	:info:build ; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-UTF-16-LE-FORMAT T T T)
396	:info:build ; (AREF SEQUENCE (1+ FLEXI-STREAMS::I))
397	:info:build ;
398	:info:build ; note: unable to
399	:info:build ; optimize
400	:info:build ; because:
401	:info:build ; Upgraded element type of array is not known at compile time.
402	:info:build ; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-UTF-16-BE-FORMAT T T T)
403	:info:build ; (AREF SEQUENCE FLEXI-STREAMS::I)
404	:info:build ;
405	:info:build ; note: unable to
406	:info:build ; optimize
407	:info:build ; because:
408	:info:build ; Upgraded element type of array is not known at compile time.
409	:info:build ; in:
410	:info:build ; DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-16-LE-FORMAT T T T)
411	:info:build ; (AREF SEQUENCE (1+ FLEXI-STREAMS::I))
412	:info:build ;
413	:info:build ; note: unable to
414	:info:build ; optimize
415	:info:build ; because:
416	:info:build ; Upgraded element type of array is not known at compile time.
417	:info:build ; (AREF SEQUENCE FLEXI-STREAMS::I)
418	:info:build ;
419	:info:build ; note: unable to
420	:info:build ; optimize
421	:info:build ; because:
422	:info:build ; Upgraded element type of array is not known at compile time.
423	:info:build ;
424	:info:build ; note: unable to
425	:info:build ; optimize
426	:info:build ; because:
427	:info:build ; Upgraded element type of array is not known at compile time.
428	:info:build ; in:
429	:info:build ; DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-16-BE-FORMAT T T T)
430	:info:build ; (AREF SEQUENCE FLEXI-STREAMS::I)
431	:info:build ;
432	:info:build ; note: unable to
433	:info:build ; optimize
434	:info:build ; because:
435	:info:build ; Upgraded element type of array is not known at compile time.
436	:info:build ; (AREF SEQUENCE (1+ FLEXI-STREAMS::I))
437	:info:build ;
438	:info:build ; note: unable to
439	:info:build ; optimize
440	:info:build ; because:
441	:info:build ; Upgraded element type of array is not known at compile time.
442	:info:build ;
443	:info:build ; note: unable to
444	:info:build ; optimize
445	:info:build ; because:
446	:info:build ; Upgraded element type of array is not known at compile time.
447	:info:build ; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-GBK-FORMAT T T T)
448	:info:build ; (AREF SEQUENCE FLEXI-STREAMS::I)
449	:info:build ;
450	:info:build ; note: unable to
451	:info:build ; optimize
452	:info:build ; because:
453	:info:build ; Upgraded element type of array is not known at compile time.
454	:info:build ; in: DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-GBK-FORMAT T T T)
455	:info:build ; (AREF SEQUENCE FLEXI-STREAMS::I)
456	:info:build ;
457	:info:build ; note: unable to
458	:info:build ; optimize
459	:info:build ; because:
460	:info:build ; Upgraded element type of array is not known at compile time.
461	:info:build ; in:
462	:info:build ; DEFMETHOD COMPUTE-NUMBER-OF-CHARS :BEFORE (FLEXI-UTF-32-FORMAT T T T)
463	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT "~A octet~:P cannot be decoded ~
464	:info:build ; using UTF-32 as ~:*~A is not a multiple-value of four."
465	:info:build ; LENGTH)
466	:info:build ;
467	:info:build ; note: doing signed word to integer coercion (cost 20)
468	:info:build ; in:
469	:info:build ; DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-32-LE-FORMAT T T T)
470	:info:build ; (AREF SEQUENCE FLEXI-STREAMS::J)
471	:info:build ;
472	:info:build ; note: unable to
473	:info:build ; optimize
474	:info:build ; because:
475	:info:build ; Upgraded element type of array is not known at compile time.
476	:info:build ; (= FLEXI-STREAMS:OCTET (AREF SEQUENCE FLEXI-STREAMS::J))
477	:info:build ;
478	:info:build ; note: unable to open code because: The operands might not be the same type.
479	:info:build ; (DECF LENGTH)
480	:info:build ; --> THE SB-IMPL::XSUBTRACT BLOCK
481	:info:build ; ==>
482	:info:build ; (- SB-IMPL::B SB-IMPL::A)
483	:info:build ;
484	:info:build ; note: forced to do GENERIC-- (cost 10)
485	:info:build ; unable to do inline fixnum arithmetic (cost 1) because:
486	:info:build ; The first argument is a (INTEGER * 268435456), not a FIXNUM.
487	:info:build ; The result is a (VALUES (INTEGER * 268435455) &OPTIONAL), not a (VALUES
488	:info:build ; FIXNUM
489	:info:build ; &OPTIONAL).
490	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
491	:info:build ; The first argument is a (INTEGER * 268435456), not a FIXNUM.
492	:info:build ; The result is a (VALUES (INTEGER * 268435455) &OPTIONAL), not a (VALUES
493	:info:build ; FIXNUM
494	:info:build ; &OPTIONAL).
495	:info:build ; etc.
496	:info:build ; in:
497	:info:build ; DEFMETHOD COMPUTE-NUMBER-OF-CHARS (FLEXI-CRLF-UTF-32-BE-FORMAT T T T)
498	:info:build ; (AREF SEQUENCE FLEXI-STREAMS::J)
499	:info:build ;
500	:info:build ; note: unable to
501	:info:build ; optimize
502	:info:build ; because:
503	:info:build ; Upgraded element type of array is not known at compile time.
504	:info:build ; (= FLEXI-STREAMS:OCTET (AREF SEQUENCE FLEXI-STREAMS::J))
505	:info:build ;
506	:info:build ; note: unable to open code because: The operands might not be the same type.
507	:info:build ; (DECF LENGTH)
508	:info:build ; --> THE SB-IMPL::XSUBTRACT BLOCK
509	:info:build ; ==>
510	:info:build ; (- SB-IMPL::B SB-IMPL::A)
511	:info:build ;
512	:info:build ; note: forced to do GENERIC-- (cost 10)
513	:info:build ; unable to do inline fixnum arithmetic (cost 1) because:
514	:info:build ; The first argument is a (INTEGER * 268435456), not a FIXNUM.
515	:info:build ; The result is a (VALUES (INTEGER * 268435455) &OPTIONAL), not a (VALUES
516	:info:build ; FIXNUM
517	:info:build ; &OPTIONAL).
518	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
519	:info:build ; The first argument is a (INTEGER * 268435456), not a FIXNUM.
520	:info:build ; The result is a (VALUES (INTEGER * 268435455) &OPTIONAL), not a (VALUES
521	:info:build ; FIXNUM
522	:info:build ; &OPTIONAL).
523	:info:build ; etc.
524	:info:build ; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-8-BIT-FORMAT T T T)
525	:info:build ; (DEFMETHOD FLEXI-STREAMS::COMPUTE-NUMBER-OF-OCTETS
526	:info:build ; ((FORMAT FLEXI-STREAMS::FLEXI-8-BIT-FORMAT) STRING
527	:info:build ; FLEXI-STREAMS::START FLEXI-STREAMS::END)
528	:info:build ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
529	:info:build ; (DECLARE (FIXNUM FLEXI-STREAMS::START FLEXI-STREAMS::END))
530	:info:build ; (DECLARE (IGNORE STRING))
531	:info:build ; (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
532	:info:build ; --> EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD
533	:info:build ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA
534	:info:build ; ==>
535	:info:build ; #'(SB-INT:NAMED-LAMBDA (SB-PCL::FAST-METHOD
536	:info:build ; FLEXI-STREAMS::COMPUTE-NUMBER-OF-OCTETS
537	:info:build ; (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT T T T))
538	:info:build ; (SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL. FORMAT STRING
539	:info:build ; FLEXI-STREAMS::START FLEXI-STREAMS::END)
540	:info:build ; (DECLARE (IGNORABLE SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL.)
541	:info:build ; (DISABLE-PACKAGE-LOCKS SB-PCL::PV-ENV-ENVIRONMENT))
542	:info:build ; (DECLARE (IGNORE STRING))
543	:info:build ; (DECLARE (FIXNUM FLEXI-STREAMS::END FLEXI-STREAMS::START))
544	:info:build ; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
545	:info:build ; (DECLARE
546	:info:build ; (SB-C::CURRENT-DEFMETHOD FLEXI-STREAMS::COMPUTE-NUMBER-OF-OCTETS NIL
547	:info:build ; (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT T T T)
548	:info:build ; (FORMAT STRING FLEXI-STREAMS::START FLEXI-STREAMS::END)))
549	:info:build ; (DECLARE
550	:info:build ; (SB-C::SOURCE-FORM
551	:info:build ; (LAMBDA (FORMAT STRING FLEXI-STREAMS::START FLEXI-STREAMS::END)
552	:info:build ; (DECLARE #)
553	:info:build ; (DECLARE #)
554	:info:build ; (DECLARE #)
555	:info:build ; (- FLEXI-STREAMS::END FLEXI-STREAMS::START))))
556	:info:build ; (DECLARE (SB-PCL::%PARAMETER FLEXI-STREAMS::END))
557	:info:build ; (DECLARE (SB-PCL::%PARAMETER FLEXI-STREAMS::START))
558	:info:build ; (DECLARE (SB-PCL::%PARAMETER STRING))
559	:info:build ; ...)
560	:info:build ;
561	:info:build ; note: doing signed word to integer coercion (cost 20) to "<return value>"
562	:info:build ; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-GBK-FORMAT T T T)
563	:info:build ; (CHAR STRING FLEXI-STREAMS::I)
564	:info:build ;
565	:info:build ; note: unable to
566	:info:build ; optimize
567	:info:build ; because:
568	:info:build ; Upgraded element type of array is not known at compile time.
569	:info:build ; (INCF FLEXI-STREAMS::SUM FLEXI-STREAMS:CHAR-LENGTH)
570	:info:build ; --> THE MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP
571	:info:build ; ==>
572	:info:build ; 1
573	:info:build ;
574	:info:build ; note: doing signed word to integer coercion (cost 20), for:
575	:info:build ; the first argument of defaulted
576	:info:build ; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-CRLF-GBK-FORMAT T T T)
577	:info:build ; (CHAR STRING FLEXI-STREAMS::I)
578	:info:build ;
579	:info:build ; note: unable to
580	:info:build ; optimize
581	:info:build ; because:
582	:info:build ; Upgraded element type of array is not known at compile time.
583	:info:build ; (INCF FLEXI-STREAMS::SUM FLEXI-STREAMS:CHAR-LENGTH)
584	:info:build ; --> THE MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP
585	:info:build ; ==>
586	:info:build ; 1
587	:info:build ;
588	:info:build ; note: doing signed word to integer coercion (cost 20), for:
589	:info:build ; the first argument of defaulted
590	:info:build ; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-UTF-8-FORMAT T T T)
591	:info:build ; (CHAR STRING FLEXI-STREAMS::I)
592	:info:build ;
593	:info:build ; note: unable to
594	:info:build ; optimize
595	:info:build ; because:
596	:info:build ; Upgraded element type of array is not known at compile time.
597	:info:build ; (INCF FLEXI-STREAMS::SUM FLEXI-STREAMS:CHAR-LENGTH)
598	:info:build ; --> THE MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP
599	:info:build ; ==>
600	:info:build ; 1
601	:info:build ;
602	:info:build ; note: doing signed word to integer coercion (cost 20), for:
603	:info:build ; the first argument of defaulted
604	:info:build ; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-CRLF-UTF-8-FORMAT T T T)
605	:info:build ; (CHAR STRING FLEXI-STREAMS::I)
606	:info:build ;
607	:info:build ; note: unable to
608	:info:build ; optimize
609	:info:build ; because:
610	:info:build ; Upgraded element type of array is not known at compile time.
611	:info:build ; (INCF FLEXI-STREAMS::SUM FLEXI-STREAMS:CHAR-LENGTH)
612	:info:build ; --> THE MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP
613	:info:build ; ==>
614	:info:build ; 1
615	:info:build ;
616	:info:build ; note: doing signed word to integer coercion (cost 20), for:
617	:info:build ; the first argument of defaulted
618	:info:build ; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-UTF-16-FORMAT T T T)
619	:info:build ; (CHAR STRING FLEXI-STREAMS::I)
620	:info:build ;
621	:info:build ; note: unable to
622	:info:build ; optimize
623	:info:build ; because:
624	:info:build ; Upgraded element type of array is not known at compile time.
625	:info:build ; (INCF FLEXI-STREAMS::SUM FLEXI-STREAMS:CHAR-LENGTH)
626	:info:build ; --> THE MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP
627	:info:build ; ==>
628	:info:build ; 1
629	:info:build ;
630	:info:build ; note: doing signed word to integer coercion (cost 20), for:
631	:info:build ; the first argument of defaulted
632	:info:build ; in:
633	:info:build ; DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-CRLF-UTF-16-LE-FORMAT T T T)
634	:info:build ; (CHAR STRING FLEXI-STREAMS::I)
635	:info:build ;
636	:info:build ; note: unable to
637	:info:build ; optimize
638	:info:build ; because:
639	:info:build ; Upgraded element type of array is not known at compile time.
640	:info:build ; (INCF FLEXI-STREAMS::SUM FLEXI-STREAMS:CHAR-LENGTH)
641	:info:build ; --> THE MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP
642	:info:build ; ==>
643	:info:build ; 1
644	:info:build ;
645	:info:build ; note: doing signed word to integer coercion (cost 20), for:
646	:info:build ; the first argument of defaulted
647	:info:build ; in:
648	:info:build ; DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-CRLF-UTF-16-BE-FORMAT T T T)
649	:info:build ; (CHAR STRING FLEXI-STREAMS::I)
650	:info:build ;
651	:info:build ; note: unable to
652	:info:build ; optimize
653	:info:build ; because:
654	:info:build ; Upgraded element type of array is not known at compile time.
655	:info:build ; (INCF FLEXI-STREAMS::SUM FLEXI-STREAMS:CHAR-LENGTH)
656	:info:build ; --> THE MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP
657	:info:build ; ==>
658	:info:build ; 1
659	:info:build ;
660	:info:build ; note: doing signed word to integer coercion (cost 20), for:
661	:info:build ; the first argument of defaulted
662	:info:build ; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-UTF-32-FORMAT T T T)
663	:info:build ; (* 4 (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
664	:info:build ;
665	:info:build ; note: unable to
666	:info:build ; recode as shifts and adds
667	:info:build ; due to type uncertainty:
668	:info:build ; The first argument is a (INTEGER -1073741823
669	:info:build ; 1073741823), not a (UNSIGNED-BYTE 32).
670	:info:build ; The result is a (VALUES
671	:info:build ; (OR (INTEGER 4 4294967292) (INTEGER -4294967292 -4)
672	:info:build ; (INTEGER 0 0))
673	:info:build ; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32) &REST T).
674	:info:build ;
675	:info:build ; note: forced to do GENERIC-* (cost 50)
676	:info:build ; unable to do inline fixnum arithmetic (cost 1) because:
677	:info:build ; The first argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
678	:info:build ; The result is a (VALUES
679	:info:build ; (OR (INTEGER 4 4294967292) (INTEGER -4294967292 -4)
680	:info:build ; (INTEGER 0 0))
681	:info:build ; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
682	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
683	:info:build ; The first argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
684	:info:build ; The result is a (VALUES
685	:info:build ; (OR (INTEGER 4 4294967292) (INTEGER -4294967292 -4)
686	:info:build ; (INTEGER 0 0))
687	:info:build ; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
688	:info:build ; etc.
689	:info:build ;
690	:info:build ; note: doing signed word to integer coercion (cost 20), for:
691	:info:build ; the first argument of GENERIC-*
692	:info:build ; in: DEFMETHOD COMPUTE-NUMBER-OF-OCTETS (FLEXI-CRLF-MIXIN T T T)
693	:info:build ; (+ (CALL-NEXT-METHOD)
694	:info:build ; (*
695	:info:build ; (CASE (FLEXI-STREAMS:EXTERNAL-FORMAT-NAME FORMAT)
696	:info:build ; (:UTF-32 4)
697	:info:build ; (OTHERWISE 1))
698	:info:build ; (COUNT #\Newline STRING :START FLEXI-STREAMS::START :END
699	:info:build ; FLEXI-STREAMS::END :TEST #'CHAR=)))
700	:info:build ;
701	:info:build ; note: forced to do GENERIC-+ (cost 10)
702	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
703	:info:build ; The first argument is a T, not a FIXNUM.
704	:info:build ; The second argument is a (MOD 2147483633), not a FIXNUM.
705	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
706	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
707	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
708	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
709	:info:build ; (UNSIGNED-BYTE 32)
710	:info:build ; &OPTIONAL).
711	:info:build ; etc.
712	:info:build ;
713	:info:build ; note: doing signed word to integer coercion (cost 20), for:
714	:info:build ; the second argument of GENERIC-+
715	:info:build ; in:
716	:info:build ; DEFMETHOD CHARACTER-LENGTH :AROUND (FLEXI-CRLF-MIXIN (EQL #\Newline))
717	:info:build ; (+ (CALL-NEXT-METHOD FORMAT FLEXI-STREAMS::+CR+)
718	:info:build ; (CALL-NEXT-METHOD FORMAT FLEXI-STREAMS::+LF+))
719	:info:build ;
720	:info:build ; note: forced to do GENERIC-+ (cost 10)
721	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
722	:info:build ; The first argument is a T, not a FIXNUM.
723	:info:build ; The second argument is a T, not a FIXNUM.
724	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
725	:info:build ; unable to do inline float arithmetic (cost 2) because:
726	:info:build ; The first argument is a T, not a SINGLE-FLOAT.
727	:info:build ; The second argument is a T, not a SINGLE-FLOAT.
728	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
729	:info:build ; &OPTIONAL).
730	:info:build ; etc.
731	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/length-tmpC6WXNUWP.fasl
732	:info:build ; compilation finished in 0:00:01.078
733	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/encode.lisp" (written 09 JUL 2020 08:18:28 PM):
734	:info:build ; file: /opt/local/share/common-lisp/source/cl-flexi-streams/encode.lisp
735	:info:build ; in:
736	:info:build ; DEFINE-CHAR-ENCODERS (FLEXI-LATIN-1-FORMAT FLEXI-CR-LATIN-1-FORMAT
737	:info:build ; FLEXI-CRLF-LATIN-1-FORMAT)
738	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
739	:info:build ; --> CHAR
740	:info:build ; ==>
741	:info:build ; 1
742	:info:build ;
743	:info:build ; note: unable to
744	:info:build ; optimize
745	:info:build ; because:
746	:info:build ; Upgraded element type of array is not known at compile time.
747	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
748	:info:build ; "~S (code ~A) is not a LATIN-1 character."
749	:info:build ; FLEXI-STREAMS::CHAR-GETTER
750	:info:build ; FLEXI-STREAMS:OCTET)
751	:info:build ; --> CHAR
752	:info:build ; ==>
753	:info:build ; 1
754	:info:build ;
755	:info:build ; note: unable to
756	:info:build ; optimize
757	:info:build ; because:
758	:info:build ; Upgraded element type of array is not known at compile time.
759	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-LATIN-1-FORMAT
760	:info:build ; FLEXI-STREAMS::FLEXI-CR-LATIN-1-FORMAT
761	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-LATIN-1-FORMAT)
762	:info:build ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
763	:info:build ; (WHEN (> FLEXI-STREAMS:OCTET 255)
764	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
765	:info:build ; "~S (code ~A) is not a LATIN-1 character."
766	:info:build ; FLEXI-STREAMS::CHAR-GETTER
767	:info:build ; FLEXI-STREAMS:OCTET))
768	:info:build ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)))
769	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
770	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
771	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
772	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
773	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
774	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
775	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
776	:info:build ; ==>
777	:info:build ; 1
778	:info:build ;
779	:info:build ; note: unable to
780	:info:build ; optimize
781	:info:build ; because:
782	:info:build ; Upgraded element type of array is not known at compile time.
783	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
784	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
785	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
786	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
787	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
788	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
789	:info:build ; ==>
790	:info:build ; 1
791	:info:build ;
792	:info:build ; note: unable to
793	:info:build ; optimize
794	:info:build ; due to type uncertainty:
795	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
796	:info:build ;
797	:info:build ; note: unable to
798	:info:build ; optimize
799	:info:build ; due to type uncertainty:
800	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
801	:info:build ;
802	:info:build ; note: unable to
803	:info:build ; optimize
804	:info:build ; due to type uncertainty:
805	:info:build ; The first argument is a REAL, not a INTEGER.
806	:info:build ;
807	:info:build ; note: unable to
808	:info:build ; convert division by 2^k to shift
809	:info:build ; due to type uncertainty:
810	:info:build ; The first argument is a REAL, not a INTEGER.
811	:info:build ;
812	:info:build ; note: unable to
813	:info:build ; fold division by 1
814	:info:build ; due to type uncertainty:
815	:info:build ; The first argument is a REAL, not a INTEGER.
816	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
817	:info:build ; --> CHAR
818	:info:build ; ==>
819	:info:build ; 1
820	:info:build ;
821	:info:build ; note: unable to
822	:info:build ; optimize
823	:info:build ; because:
824	:info:build ; Upgraded element type of array is not known at compile time.
825	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
826	:info:build ; "~S (code ~A) is not a LATIN-1 character."
827	:info:build ; FLEXI-STREAMS::CHAR-GETTER
828	:info:build ; FLEXI-STREAMS:OCTET)
829	:info:build ; --> CHAR
830	:info:build ; ==>
831	:info:build ; 1
832	:info:build ;
833	:info:build ; note: unable to
834	:info:build ; optimize
835	:info:build ; because:
836	:info:build ; Upgraded element type of array is not known at compile time.
837	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
838	:info:build ; --> AREF
839	:info:build ; ==>
840	:info:build ; 1
841	:info:build ;
842	:info:build ; note: unable to
843	:info:build ; optimize
844	:info:build ; because:
845	:info:build ; Upgraded element type of array is not known at compile time.
846	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
847	:info:build ; "~S (code ~A) is not a LATIN-1 character."
848	:info:build ; FLEXI-STREAMS::CHAR-GETTER
849	:info:build ; FLEXI-STREAMS:OCTET)
850	:info:build ; --> AREF
851	:info:build ; ==>
852	:info:build ; 1
853	:info:build ;
854	:info:build ; note: unable to
855	:info:build ; optimize
856	:info:build ; because:
857	:info:build ; Upgraded element type of array is not known at compile time.
858	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-LATIN-1-FORMAT
859	:info:build ; FLEXI-STREAMS::FLEXI-CR-LATIN-1-FORMAT
860	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-LATIN-1-FORMAT)
861	:info:build ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
862	:info:build ; (WHEN (> FLEXI-STREAMS:OCTET 255)
863	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
864	:info:build ; "~S (code ~A) is not a LATIN-1 character."
865	:info:build ; FLEXI-STREAMS::CHAR-GETTER
866	:info:build ; FLEXI-STREAMS:OCTET))
867	:info:build ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)))
868	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
869	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
870	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
871	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
872	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
873	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
874	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
875	:info:build ; ==>
876	:info:build ; 1
877	:info:build ;
878	:info:build ; note: unable to
879	:info:build ; expand inline
880	:info:build ; due to type uncertainty:
881	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
882	:info:build ;
883	:info:build ; note: unable to
884	:info:build ; expand inline
885	:info:build ; due to type uncertainty:
886	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
887	:info:build ;
888	:info:build ; note: unable to
889	:info:build ; optimize
890	:info:build ; due to type uncertainty:
891	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
892	:info:build ;
893	:info:build ; note: unable to
894	:info:build ; optimize
895	:info:build ; due to type uncertainty:
896	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
897	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
898	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
899	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
900	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
901	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
902	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
903	:info:build ; ==>
904	:info:build ; 1
905	:info:build ;
906	:info:build ; note: forced to do GENERIC-* (cost 50)
907	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
908	:info:build ; The first argument is a T, not a FIXNUM.
909	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
910	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
911	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
912	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
913	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
914	:info:build ; 32).
915	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
916	:info:build ; (UNSIGNED-BYTE 32)
917	:info:build ; &OPTIONAL).
918	:info:build ; etc.
919	:info:build ;
920	:info:build ; note: forced to do GENERIC-< (cost 10)
921	:info:build ; unable to do inline fixnum comparison (cost 4) because:
922	:info:build ; The first argument is a INTEGER, not a FIXNUM.
923	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
924	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
925	:info:build ; etc.
926	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
927	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
928	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
929	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
930	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
931	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
932	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
933	:info:build ; ==>
934	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
935	:info:build ;
936	:info:build ; note: forced to do GENERIC-+ (cost 10)
937	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
938	:info:build ; The first argument is a T, not a FIXNUM.
939	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
940	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
941	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
942	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
943	:info:build ; 32).
944	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
945	:info:build ; (UNSIGNED-BYTE 32)
946	:info:build ; &OPTIONAL).
947	:info:build ; etc.
948	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
949	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
950	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
951	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
952	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
953	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
954	:info:build ; ==>
955	:info:build ; 1
956	:info:build ;
957	:info:build ; note: doing signed word to integer coercion (cost 20), for:
958	:info:build ; the second argument of GENERIC-*
959	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
960	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
961	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
962	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
963	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
964	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
965	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY LET CHAR-CODE LET
966	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
967	:info:build ; ==>
968	:info:build ; 1
969	:info:build ;
970	:info:build ; note: unable to
971	:info:build ; optimize
972	:info:build ; because:
973	:info:build ; Upgraded element type of array is not known at compile time.
974	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
975	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
976	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
977	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
978	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
979	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
980	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY LET WHEN IF
981	:info:build ; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER CHAR
982	:info:build ; ==>
983	:info:build ; 1
984	:info:build ;
985	:info:build ; note: unable to
986	:info:build ; optimize
987	:info:build ; because:
988	:info:build ; Upgraded element type of array is not known at compile time.
989	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
990	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
991	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
992	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
993	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
994	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
995	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
996	:info:build ; ==>
997	:info:build ; 1
998	:info:build ;
999	:info:build ; note: unable to
1000	:info:build ; optimize
1001	:info:build ; because:
1002	:info:build ; Upgraded element type of array is not known at compile time.
1003	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1004	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1005	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1006	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1007	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1008	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
1009	:info:build ; ==>
1010	:info:build ; 1
1011	:info:build ;
1012	:info:build ; note: unable to
1013	:info:build ; optimize
1014	:info:build ; due to type uncertainty:
1015	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
1016	:info:build ;
1017	:info:build ; note: unable to
1018	:info:build ; optimize
1019	:info:build ; due to type uncertainty:
1020	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
1021	:info:build ;
1022	:info:build ; note: unable to
1023	:info:build ; optimize
1024	:info:build ; due to type uncertainty:
1025	:info:build ; The first argument is a REAL, not a INTEGER.
1026	:info:build ;
1027	:info:build ; note: unable to
1028	:info:build ; convert division by 2^k to shift
1029	:info:build ; due to type uncertainty:
1030	:info:build ; The first argument is a REAL, not a INTEGER.
1031	:info:build ;
1032	:info:build ; note: unable to
1033	:info:build ; fold division by 1
1034	:info:build ; due to type uncertainty:
1035	:info:build ; The first argument is a REAL, not a INTEGER.
1036	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1037	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1038	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1039	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1040	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1041	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1042	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
1043	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET CHAR-CODE LET
1044	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
1045	:info:build ; ==>
1046	:info:build ; 1
1047	:info:build ;
1048	:info:build ; note: unable to
1049	:info:build ; optimize
1050	:info:build ; because:
1051	:info:build ; Upgraded element type of array is not known at compile time.
1052	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1053	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1054	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1055	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1056	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1057	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1058	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
1059	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET WHEN IF
1060	:info:build ; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER CHAR
1061	:info:build ; ==>
1062	:info:build ; 1
1063	:info:build ;
1064	:info:build ; note: unable to
1065	:info:build ; optimize
1066	:info:build ; because:
1067	:info:build ; Upgraded element type of array is not known at compile time.
1068	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1069	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1070	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1071	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1072	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1073	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1074	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
1075	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET CHAR-CODE LET
1076	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER AREF
1077	:info:build ; ==>
1078	:info:build ; 1
1079	:info:build ;
1080	:info:build ; note: unable to
1081	:info:build ; optimize
1082	:info:build ; because:
1083	:info:build ; Upgraded element type of array is not known at compile time.
1084	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1085	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1086	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1087	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1088	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1089	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1090	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
1091	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET WHEN IF
1092	:info:build ; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER AREF
1093	:info:build ; ==>
1094	:info:build ; 1
1095	:info:build ;
1096	:info:build ; note: unable to
1097	:info:build ; optimize
1098	:info:build ; because:
1099	:info:build ; Upgraded element type of array is not known at compile time.
1100	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1101	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1102	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1103	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1104	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1105	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1106	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
1107	:info:build ; ==>
1108	:info:build ; 1
1109	:info:build ;
1110	:info:build ; note: unable to
1111	:info:build ; expand inline
1112	:info:build ; due to type uncertainty:
1113	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
1114	:info:build ;
1115	:info:build ; note: unable to
1116	:info:build ; expand inline
1117	:info:build ; due to type uncertainty:
1118	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
1119	:info:build ;
1120	:info:build ; note: unable to
1121	:info:build ; optimize
1122	:info:build ; due to type uncertainty:
1123	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
1124	:info:build ;
1125	:info:build ; note: unable to
1126	:info:build ; optimize
1127	:info:build ; due to type uncertainty:
1128	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
1129	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1130	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1131	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1132	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1133	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1134	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
1135	:info:build ; ==>
1136	:info:build ; 1
1137	:info:build ;
1138	:info:build ; note: forced to do GENERIC-* (cost 50)
1139	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
1140	:info:build ; The first argument is a T, not a FIXNUM.
1141	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
1142	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
1143	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
1144	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
1145	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
1146	:info:build ; 32).
1147	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
1148	:info:build ; (UNSIGNED-BYTE 32)
1149	:info:build ; &OPTIONAL).
1150	:info:build ; etc.
1151	:info:build ;
1152	:info:build ; note: forced to do GENERIC-< (cost 10)
1153	:info:build ; unable to do inline fixnum comparison (cost 4) because:
1154	:info:build ; The first argument is a INTEGER, not a FIXNUM.
1155	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
1156	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
1157	:info:build ; etc.
1158	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1159	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1160	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1161	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1162	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1163	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1164	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
1165	:info:build ; ==>
1166	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
1167	:info:build ;
1168	:info:build ; note: forced to do GENERIC-+ (cost 10)
1169	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
1170	:info:build ; The first argument is a T, not a FIXNUM.
1171	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
1172	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
1173	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
1174	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
1175	:info:build ; 32).
1176	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
1177	:info:build ; (UNSIGNED-BYTE 32)
1178	:info:build ; &OPTIONAL).
1179	:info:build ; etc.
1180	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1181	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1182	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1183	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1184	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1185	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
1186	:info:build ; ==>
1187	:info:build ; 1
1188	:info:build ;
1189	:info:build ; note: doing signed word to integer coercion (cost 20), for:
1190	:info:build ; the second argument of GENERIC-*
1191	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1192	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1193	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1194	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1195	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1196	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
1197	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
1198	:info:build ; ==>
1199	:info:build ; 1
1200	:info:build ;
1201	:info:build ; note: unable to
1202	:info:build ; optimize
1203	:info:build ; because:
1204	:info:build ; Upgraded element type of array is not known at compile time.
1205	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1206	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1207	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1208	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1209	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1210	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1211	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
1212	:info:build ; ==>
1213	:info:build ; 1
1214	:info:build ;
1215	:info:build ; note: unable to
1216	:info:build ; optimize
1217	:info:build ; because:
1218	:info:build ; Upgraded element type of array is not known at compile time.
1219	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1220	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1221	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1222	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1223	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1224	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
1225	:info:build ; ==>
1226	:info:build ; 1
1227	:info:build ;
1228	:info:build ; note: unable to
1229	:info:build ; optimize
1230	:info:build ; due to type uncertainty:
1231	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
1232	:info:build ;
1233	:info:build ; note: unable to
1234	:info:build ; optimize
1235	:info:build ; due to type uncertainty:
1236	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
1237	:info:build ;
1238	:info:build ; note: unable to
1239	:info:build ; optimize
1240	:info:build ; due to type uncertainty:
1241	:info:build ; The first argument is a REAL, not a INTEGER.
1242	:info:build ;
1243	:info:build ; note: unable to
1244	:info:build ; convert division by 2^k to shift
1245	:info:build ; due to type uncertainty:
1246	:info:build ; The first argument is a REAL, not a INTEGER.
1247	:info:build ;
1248	:info:build ; note: unable to
1249	:info:build ; fold division by 1
1250	:info:build ; due to type uncertainty:
1251	:info:build ; The first argument is a REAL, not a INTEGER.
1252	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1253	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1254	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1255	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1256	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1257	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1258	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
1259	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
1260	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
1261	:info:build ; ==>
1262	:info:build ; 1
1263	:info:build ;
1264	:info:build ; note: unable to
1265	:info:build ; optimize
1266	:info:build ; because:
1267	:info:build ; Upgraded element type of array is not known at compile time.
1268	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1269	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1270	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1271	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1272	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1273	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1274	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
1275	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
1276	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER AREF
1277	:info:build ; ==>
1278	:info:build ; 1
1279	:info:build ;
1280	:info:build ; note: unable to
1281	:info:build ; optimize
1282	:info:build ; because:
1283	:info:build ; Upgraded element type of array is not known at compile time.
1284	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1285	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1286	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1287	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1288	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1289	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1290	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
1291	:info:build ; ==>
1292	:info:build ; 1
1293	:info:build ;
1294	:info:build ; note: unable to
1295	:info:build ; expand inline
1296	:info:build ; due to type uncertainty:
1297	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
1298	:info:build ;
1299	:info:build ; note: unable to
1300	:info:build ; expand inline
1301	:info:build ; due to type uncertainty:
1302	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
1303	:info:build ;
1304	:info:build ; note: unable to
1305	:info:build ; optimize
1306	:info:build ; due to type uncertainty:
1307	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
1308	:info:build ;
1309	:info:build ; note: unable to
1310	:info:build ; optimize
1311	:info:build ; due to type uncertainty:
1312	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
1313	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1314	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1315	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1316	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1317	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1318	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
1319	:info:build ; ==>
1320	:info:build ; 1
1321	:info:build ;
1322	:info:build ; note: forced to do GENERIC-* (cost 50)
1323	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
1324	:info:build ; The first argument is a T, not a FIXNUM.
1325	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
1326	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
1327	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
1328	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
1329	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
1330	:info:build ; 32).
1331	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
1332	:info:build ; (UNSIGNED-BYTE 32)
1333	:info:build ; &OPTIONAL).
1334	:info:build ; etc.
1335	:info:build ;
1336	:info:build ; note: forced to do GENERIC-< (cost 10)
1337	:info:build ; unable to do inline fixnum comparison (cost 4) because:
1338	:info:build ; The first argument is a INTEGER, not a FIXNUM.
1339	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
1340	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
1341	:info:build ; etc.
1342	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1343	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1344	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1345	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1346	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1347	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1348	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
1349	:info:build ; ==>
1350	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
1351	:info:build ;
1352	:info:build ; note: forced to do GENERIC-+ (cost 10)
1353	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
1354	:info:build ; The first argument is a T, not a FIXNUM.
1355	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
1356	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
1357	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
1358	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
1359	:info:build ; 32).
1360	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
1361	:info:build ; (UNSIGNED-BYTE 32)
1362	:info:build ; &OPTIONAL).
1363	:info:build ; etc.
1364	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1365	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1366	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1367	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1368	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1369	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
1370	:info:build ; ==>
1371	:info:build ; 1
1372	:info:build ;
1373	:info:build ; note: doing signed word to integer coercion (cost 20), for:
1374	:info:build ; the second argument of GENERIC-*
1375	:info:build ; in:
1376	:info:build ; DEFINE-CHAR-ENCODERS (FLEXI-ASCII-FORMAT FLEXI-CR-ASCII-FORMAT
1377	:info:build ; FLEXI-CRLF-ASCII-FORMAT)
1378	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
1379	:info:build ; --> CHAR
1380	:info:build ; ==>
1381	:info:build ; 1
1382	:info:build ;
1383	:info:build ; note: unable to
1384	:info:build ; optimize
1385	:info:build ; because:
1386	:info:build ; Upgraded element type of array is not known at compile time.
1387	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
1388	:info:build ; "~S (code ~A) is not an ASCII character."
1389	:info:build ; FLEXI-STREAMS::CHAR-GETTER
1390	:info:build ; FLEXI-STREAMS:OCTET)
1391	:info:build ; --> CHAR
1392	:info:build ; ==>
1393	:info:build ; 1
1394	:info:build ;
1395	:info:build ; note: unable to
1396	:info:build ; optimize
1397	:info:build ; because:
1398	:info:build ; Upgraded element type of array is not known at compile time.
1399	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT
1400	:info:build ; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT
1401	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT)
1402	:info:build ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
1403	:info:build ; (WHEN (> FLEXI-STREAMS:OCTET 127)
1404	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
1405	:info:build ; "~S (code ~A) is not an ASCII character."
1406	:info:build ; FLEXI-STREAMS::CHAR-GETTER
1407	:info:build ; FLEXI-STREAMS:OCTET))
1408	:info:build ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)))
1409	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1410	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1411	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1412	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1413	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1414	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1415	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
1416	:info:build ; ==>
1417	:info:build ; 1
1418	:info:build ;
1419	:info:build ; note: unable to
1420	:info:build ; optimize
1421	:info:build ; because:
1422	:info:build ; Upgraded element type of array is not known at compile time.
1423	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1424	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1425	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1426	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1427	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1428	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
1429	:info:build ; ==>
1430	:info:build ; 1
1431	:info:build ;
1432	:info:build ; note: unable to
1433	:info:build ; optimize
1434	:info:build ; due to type uncertainty:
1435	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
1436	:info:build ;
1437	:info:build ; note: unable to
1438	:info:build ; optimize
1439	:info:build ; due to type uncertainty:
1440	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
1441	:info:build ;
1442	:info:build ; note: unable to
1443	:info:build ; optimize
1444	:info:build ; due to type uncertainty:
1445	:info:build ; The first argument is a REAL, not a INTEGER.
1446	:info:build ;
1447	:info:build ; note: unable to
1448	:info:build ; convert division by 2^k to shift
1449	:info:build ; due to type uncertainty:
1450	:info:build ; The first argument is a REAL, not a INTEGER.
1451	:info:build ;
1452	:info:build ; note: unable to
1453	:info:build ; fold division by 1
1454	:info:build ; due to type uncertainty:
1455	:info:build ; The first argument is a REAL, not a INTEGER.
1456	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
1457	:info:build ; --> CHAR
1458	:info:build ; ==>
1459	:info:build ; 1
1460	:info:build ;
1461	:info:build ; note: unable to
1462	:info:build ; optimize
1463	:info:build ; because:
1464	:info:build ; Upgraded element type of array is not known at compile time.
1465	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
1466	:info:build ; "~S (code ~A) is not an ASCII character."
1467	:info:build ; FLEXI-STREAMS::CHAR-GETTER
1468	:info:build ; FLEXI-STREAMS:OCTET)
1469	:info:build ; --> CHAR
1470	:info:build ; ==>
1471	:info:build ; 1
1472	:info:build ;
1473	:info:build ; note: unable to
1474	:info:build ; optimize
1475	:info:build ; because:
1476	:info:build ; Upgraded element type of array is not known at compile time.
1477	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
1478	:info:build ; --> AREF
1479	:info:build ; ==>
1480	:info:build ; 1
1481	:info:build ;
1482	:info:build ; note: unable to
1483	:info:build ; optimize
1484	:info:build ; because:
1485	:info:build ; Upgraded element type of array is not known at compile time.
1486	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
1487	:info:build ; "~S (code ~A) is not an ASCII character."
1488	:info:build ; FLEXI-STREAMS::CHAR-GETTER
1489	:info:build ; FLEXI-STREAMS:OCTET)
1490	:info:build ; --> AREF
1491	:info:build ; ==>
1492	:info:build ; 1
1493	:info:build ;
1494	:info:build ; note: unable to
1495	:info:build ; optimize
1496	:info:build ; because:
1497	:info:build ; Upgraded element type of array is not known at compile time.
1498	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT
1499	:info:build ; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT
1500	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT)
1501	:info:build ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
1502	:info:build ; (WHEN (> FLEXI-STREAMS:OCTET 127)
1503	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
1504	:info:build ; "~S (code ~A) is not an ASCII character."
1505	:info:build ; FLEXI-STREAMS::CHAR-GETTER
1506	:info:build ; FLEXI-STREAMS:OCTET))
1507	:info:build ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)))
1508	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1509	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1510	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1511	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1512	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1513	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1514	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
1515	:info:build ; ==>
1516	:info:build ; 1
1517	:info:build ;
1518	:info:build ; note: unable to
1519	:info:build ; expand inline
1520	:info:build ; due to type uncertainty:
1521	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
1522	:info:build ;
1523	:info:build ; note: unable to
1524	:info:build ; expand inline
1525	:info:build ; due to type uncertainty:
1526	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
1527	:info:build ;
1528	:info:build ; note: unable to
1529	:info:build ; optimize
1530	:info:build ; due to type uncertainty:
1531	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
1532	:info:build ;
1533	:info:build ; note: unable to
1534	:info:build ; optimize
1535	:info:build ; due to type uncertainty:
1536	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
1537	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1538	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1539	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1540	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1541	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1542	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
1543	:info:build ; ==>
1544	:info:build ; 1
1545	:info:build ;
1546	:info:build ; note: forced to do GENERIC-* (cost 50)
1547	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
1548	:info:build ; The first argument is a T, not a FIXNUM.
1549	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
1550	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
1551	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
1552	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
1553	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
1554	:info:build ; 32).
1555	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
1556	:info:build ; (UNSIGNED-BYTE 32)
1557	:info:build ; &OPTIONAL).
1558	:info:build ; etc.
1559	:info:build ;
1560	:info:build ; note: forced to do GENERIC-< (cost 10)
1561	:info:build ; unable to do inline fixnum comparison (cost 4) because:
1562	:info:build ; The first argument is a INTEGER, not a FIXNUM.
1563	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
1564	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
1565	:info:build ; etc.
1566	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1567	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1568	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1569	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1570	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1571	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1572	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
1573	:info:build ; ==>
1574	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
1575	:info:build ;
1576	:info:build ; note: forced to do GENERIC-+ (cost 10)
1577	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
1578	:info:build ; The first argument is a T, not a FIXNUM.
1579	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
1580	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
1581	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
1582	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
1583	:info:build ; 32).
1584	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
1585	:info:build ; (UNSIGNED-BYTE 32)
1586	:info:build ; &OPTIONAL).
1587	:info:build ; etc.
1588	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1589	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1590	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1591	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1592	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1593	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
1594	:info:build ; ==>
1595	:info:build ; 1
1596	:info:build ;
1597	:info:build ; note: doing signed word to integer coercion (cost 20), for:
1598	:info:build ; the second argument of GENERIC-*
1599	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1600	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1601	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1602	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1603	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1604	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
1605	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY LET CHAR-CODE LET
1606	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
1607	:info:build ; ==>
1608	:info:build ; 1
1609	:info:build ;
1610	:info:build ; note: unable to
1611	:info:build ; optimize
1612	:info:build ; because:
1613	:info:build ; Upgraded element type of array is not known at compile time.
1614	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1615	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1616	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1617	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1618	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1619	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
1620	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY LET WHEN IF
1621	:info:build ; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER CHAR
1622	:info:build ; ==>
1623	:info:build ; 1
1624	:info:build ;
1625	:info:build ; note: unable to
1626	:info:build ; optimize
1627	:info:build ; because:
1628	:info:build ; Upgraded element type of array is not known at compile time.
1629	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1630	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1631	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1632	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1633	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1634	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1635	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
1636	:info:build ; ==>
1637	:info:build ; 1
1638	:info:build ;
1639	:info:build ; note: unable to
1640	:info:build ; optimize
1641	:info:build ; because:
1642	:info:build ; Upgraded element type of array is not known at compile time.
1643	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1644	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1645	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1646	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1647	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1648	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
1649	:info:build ; ==>
1650	:info:build ; 1
1651	:info:build ;
1652	:info:build ; note: unable to
1653	:info:build ; optimize
1654	:info:build ; due to type uncertainty:
1655	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
1656	:info:build ;
1657	:info:build ; note: unable to
1658	:info:build ; optimize
1659	:info:build ; due to type uncertainty:
1660	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
1661	:info:build ;
1662	:info:build ; note: unable to
1663	:info:build ; optimize
1664	:info:build ; due to type uncertainty:
1665	:info:build ; The first argument is a REAL, not a INTEGER.
1666	:info:build ;
1667	:info:build ; note: unable to
1668	:info:build ; convert division by 2^k to shift
1669	:info:build ; due to type uncertainty:
1670	:info:build ; The first argument is a REAL, not a INTEGER.
1671	:info:build ;
1672	:info:build ; note: unable to
1673	:info:build ; fold division by 1
1674	:info:build ; due to type uncertainty:
1675	:info:build ; The first argument is a REAL, not a INTEGER.
1676	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1677	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1678	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1679	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1680	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1681	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1682	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
1683	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET CHAR-CODE LET
1684	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
1685	:info:build ; ==>
1686	:info:build ; 1
1687	:info:build ;
1688	:info:build ; note: unable to
1689	:info:build ; optimize
1690	:info:build ; because:
1691	:info:build ; Upgraded element type of array is not known at compile time.
1692	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1693	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1694	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1695	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1696	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1697	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1698	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
1699	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET WHEN IF
1700	:info:build ; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER CHAR
1701	:info:build ; ==>
1702	:info:build ; 1
1703	:info:build ;
1704	:info:build ; note: unable to
1705	:info:build ; optimize
1706	:info:build ; because:
1707	:info:build ; Upgraded element type of array is not known at compile time.
1708	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1709	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1710	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1711	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1712	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1713	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1714	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
1715	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET CHAR-CODE LET
1716	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER AREF
1717	:info:build ; ==>
1718	:info:build ; 1
1719	:info:build ;
1720	:info:build ; note: unable to
1721	:info:build ; optimize
1722	:info:build ; because:
1723	:info:build ; Upgraded element type of array is not known at compile time.
1724	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1725	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1726	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1727	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1728	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1729	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1730	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
1731	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET WHEN IF
1732	:info:build ; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER AREF
1733	:info:build ; ==>
1734	:info:build ; 1
1735	:info:build ;
1736	:info:build ; note: unable to
1737	:info:build ; optimize
1738	:info:build ; because:
1739	:info:build ; Upgraded element type of array is not known at compile time.
1740	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1741	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1742	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1743	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1744	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1745	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1746	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
1747	:info:build ; ==>
1748	:info:build ; 1
1749	:info:build ;
1750	:info:build ; note: unable to
1751	:info:build ; expand inline
1752	:info:build ; due to type uncertainty:
1753	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
1754	:info:build ;
1755	:info:build ; note: unable to
1756	:info:build ; expand inline
1757	:info:build ; due to type uncertainty:
1758	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
1759	:info:build ;
1760	:info:build ; note: unable to
1761	:info:build ; optimize
1762	:info:build ; due to type uncertainty:
1763	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
1764	:info:build ;
1765	:info:build ; note: unable to
1766	:info:build ; optimize
1767	:info:build ; due to type uncertainty:
1768	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
1769	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1770	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1771	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1772	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1773	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1774	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
1775	:info:build ; ==>
1776	:info:build ; 1
1777	:info:build ;
1778	:info:build ; note: forced to do GENERIC-* (cost 50)
1779	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
1780	:info:build ; The first argument is a T, not a FIXNUM.
1781	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
1782	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
1783	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
1784	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
1785	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
1786	:info:build ; 32).
1787	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
1788	:info:build ; (UNSIGNED-BYTE 32)
1789	:info:build ; &OPTIONAL).
1790	:info:build ; etc.
1791	:info:build ;
1792	:info:build ; note: forced to do GENERIC-< (cost 10)
1793	:info:build ; unable to do inline fixnum comparison (cost 4) because:
1794	:info:build ; The first argument is a INTEGER, not a FIXNUM.
1795	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
1796	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
1797	:info:build ; etc.
1798	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1799	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1800	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1801	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1802	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1803	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1804	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
1805	:info:build ; ==>
1806	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
1807	:info:build ;
1808	:info:build ; note: forced to do GENERIC-+ (cost 10)
1809	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
1810	:info:build ; The first argument is a T, not a FIXNUM.
1811	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
1812	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
1813	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
1814	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
1815	:info:build ; 32).
1816	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
1817	:info:build ; (UNSIGNED-BYTE 32)
1818	:info:build ; &OPTIONAL).
1819	:info:build ; etc.
1820	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1821	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1822	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1823	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1824	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1825	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
1826	:info:build ; ==>
1827	:info:build ; 1
1828	:info:build ;
1829	:info:build ; note: doing signed word to integer coercion (cost 20), for:
1830	:info:build ; the second argument of GENERIC-*
1831	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1832	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1833	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1834	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1835	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1836	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
1837	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
1838	:info:build ; ==>
1839	:info:build ; 1
1840	:info:build ;
1841	:info:build ; note: unable to
1842	:info:build ; optimize
1843	:info:build ; because:
1844	:info:build ; Upgraded element type of array is not known at compile time.
1845	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1846	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1847	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1848	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1849	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1850	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1851	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
1852	:info:build ; ==>
1853	:info:build ; 1
1854	:info:build ;
1855	:info:build ; note: unable to
1856	:info:build ; optimize
1857	:info:build ; because:
1858	:info:build ; Upgraded element type of array is not known at compile time.
1859	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1860	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1861	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1862	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1863	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1864	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
1865	:info:build ; ==>
1866	:info:build ; 1
1867	:info:build ;
1868	:info:build ; note: unable to
1869	:info:build ; optimize
1870	:info:build ; due to type uncertainty:
1871	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
1872	:info:build ;
1873	:info:build ; note: unable to
1874	:info:build ; optimize
1875	:info:build ; due to type uncertainty:
1876	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
1877	:info:build ;
1878	:info:build ; note: unable to
1879	:info:build ; optimize
1880	:info:build ; due to type uncertainty:
1881	:info:build ; The first argument is a REAL, not a INTEGER.
1882	:info:build ;
1883	:info:build ; note: unable to
1884	:info:build ; convert division by 2^k to shift
1885	:info:build ; due to type uncertainty:
1886	:info:build ; The first argument is a REAL, not a INTEGER.
1887	:info:build ;
1888	:info:build ; note: unable to
1889	:info:build ; fold division by 1
1890	:info:build ; due to type uncertainty:
1891	:info:build ; The first argument is a REAL, not a INTEGER.
1892	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1893	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1894	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1895	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1896	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1897	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1898	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
1899	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
1900	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
1901	:info:build ; ==>
1902	:info:build ; 1
1903	:info:build ;
1904	:info:build ; note: unable to
1905	:info:build ; optimize
1906	:info:build ; because:
1907	:info:build ; Upgraded element type of array is not known at compile time.
1908	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1909	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1910	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1911	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1912	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1913	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1914	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
1915	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
1916	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER AREF
1917	:info:build ; ==>
1918	:info:build ; 1
1919	:info:build ;
1920	:info:build ; note: unable to
1921	:info:build ; optimize
1922	:info:build ; because:
1923	:info:build ; Upgraded element type of array is not known at compile time.
1924	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1925	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1926	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1927	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1928	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1929	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1930	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
1931	:info:build ; ==>
1932	:info:build ; 1
1933	:info:build ;
1934	:info:build ; note: unable to
1935	:info:build ; expand inline
1936	:info:build ; due to type uncertainty:
1937	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
1938	:info:build ;
1939	:info:build ; note: unable to
1940	:info:build ; expand inline
1941	:info:build ; due to type uncertainty:
1942	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
1943	:info:build ;
1944	:info:build ; note: unable to
1945	:info:build ; optimize
1946	:info:build ; due to type uncertainty:
1947	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
1948	:info:build ;
1949	:info:build ; note: unable to
1950	:info:build ; optimize
1951	:info:build ; due to type uncertainty:
1952	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
1953	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1954	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1955	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1956	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1957	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1958	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
1959	:info:build ; ==>
1960	:info:build ; 1
1961	:info:build ;
1962	:info:build ; note: forced to do GENERIC-* (cost 50)
1963	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
1964	:info:build ; The first argument is a T, not a FIXNUM.
1965	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
1966	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
1967	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
1968	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
1969	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
1970	:info:build ; 32).
1971	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
1972	:info:build ; (UNSIGNED-BYTE 32)
1973	:info:build ; &OPTIONAL).
1974	:info:build ; etc.
1975	:info:build ;
1976	:info:build ; note: forced to do GENERIC-< (cost 10)
1977	:info:build ; unable to do inline fixnum comparison (cost 4) because:
1978	:info:build ; The first argument is a INTEGER, not a FIXNUM.
1979	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
1980	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
1981	:info:build ; etc.
1982	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
1983	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
1984	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
1985	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
1986	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
1987	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
1988	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
1989	:info:build ; ==>
1990	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
1991	:info:build ;
1992	:info:build ; note: forced to do GENERIC-+ (cost 10)
1993	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
1994	:info:build ; The first argument is a T, not a FIXNUM.
1995	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
1996	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
1997	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
1998	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
1999	:info:build ; 32).
2000	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
2001	:info:build ; (UNSIGNED-BYTE 32)
2002	:info:build ; &OPTIONAL).
2003	:info:build ; etc.
2004	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2005	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2006	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2007	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2008	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2009	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
2010	:info:build ; ==>
2011	:info:build ; 1
2012	:info:build ;
2013	:info:build ; note: doing signed word to integer coercion (cost 20), for:
2014	:info:build ; the second argument of GENERIC-*
2015	:info:build ; in:
2016	:info:build ; DEFINE-CHAR-ENCODERS (FLEXI-8-BIT-FORMAT FLEXI-CR-8-BIT-FORMAT
2017	:info:build ; FLEXI-CRLF-8-BIT-FORMAT)
2018	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
2019	:info:build ;
2020	:info:build ; note: unable to
2021	:info:build ; optimize
2022	:info:build ; because:
2023	:info:build ; Upgraded element type of array is not known at compile time.
2024	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
2025	:info:build ; "~S (code ~A) is not in this encoding."
2026	:info:build ; FLEXI-STREAMS::CHAR-GETTER
2027	:info:build ; FLEXI-STREAMS:OCTET)
2028	:info:build ; --> CHAR
2029	:info:build ; ==>
2030	:info:build ; 1
2031	:info:build ;
2032	:info:build ; note: unable to
2033	:info:build ; optimize
2034	:info:build ; because:
2035	:info:build ; Upgraded element type of array is not known at compile time.
2036	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT
2037	:info:build ; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT
2038	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT)
2039	:info:build ; (WITH-ACCESSORS ((FLEXI-STREAMS::ENCODING-HASH
2040	:info:build ; FLEXI-STREAMS::EXTERNAL-FORMAT-ENCODING-HASH))
2041	:info:build ; FORMAT
2042	:info:build ; (LET ((FLEXI-STREAMS:OCTET #))
2043	:info:build ; (UNLESS FLEXI-STREAMS:OCTET
2044	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
2045	:info:build ; "~S (code ~A) is not in this encoding."
2046	:info:build ; FLEXI-STREAMS::CHAR-GETTER
2047	:info:build ; FLEXI-STREAMS:OCTET))
2048	:info:build ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET))))
2049	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2050	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2051	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2052	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2053	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2054	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2055	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
2056	:info:build ; ==>
2057	:info:build ; 1
2058	:info:build ;
2059	:info:build ; note: unable to
2060	:info:build ; optimize
2061	:info:build ; because:
2062	:info:build ; Upgraded element type of array is not known at compile time.
2063	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2064	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2065	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2066	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2067	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2068	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
2069	:info:build ; ==>
2070	:info:build ; 1
2071	:info:build ;
2072	:info:build ; note: unable to
2073	:info:build ; optimize
2074	:info:build ; due to type uncertainty:
2075	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
2076	:info:build ;
2077	:info:build ; note: unable to
2078	:info:build ; optimize
2079	:info:build ; due to type uncertainty:
2080	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
2081	:info:build ;
2082	:info:build ; note: unable to
2083	:info:build ; optimize
2084	:info:build ; due to type uncertainty:
2085	:info:build ; The first argument is a REAL, not a INTEGER.
2086	:info:build ;
2087	:info:build ; note: unable to
2088	:info:build ; convert division by 2^k to shift
2089	:info:build ; due to type uncertainty:
2090	:info:build ; The first argument is a REAL, not a INTEGER.
2091	:info:build ;
2092	:info:build ; note: unable to
2093	:info:build ; fold division by 1
2094	:info:build ; due to type uncertainty:
2095	:info:build ; The first argument is a REAL, not a INTEGER.
2096	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
2097	:info:build ;
2098	:info:build ; note: unable to
2099	:info:build ; optimize
2100	:info:build ; because:
2101	:info:build ; Upgraded element type of array is not known at compile time.
2102	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
2103	:info:build ; "~S (code ~A) is not in this encoding."
2104	:info:build ; FLEXI-STREAMS::CHAR-GETTER
2105	:info:build ; FLEXI-STREAMS:OCTET)
2106	:info:build ; --> CHAR
2107	:info:build ; ==>
2108	:info:build ; 1
2109	:info:build ;
2110	:info:build ; note: unable to
2111	:info:build ; optimize
2112	:info:build ; because:
2113	:info:build ; Upgraded element type of array is not known at compile time.
2114	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
2115	:info:build ;
2116	:info:build ; note: unable to
2117	:info:build ; optimize
2118	:info:build ; because:
2119	:info:build ; Upgraded element type of array is not known at compile time.
2120	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
2121	:info:build ; "~S (code ~A) is not in this encoding."
2122	:info:build ; FLEXI-STREAMS::CHAR-GETTER
2123	:info:build ; FLEXI-STREAMS:OCTET)
2124	:info:build ; --> AREF
2125	:info:build ; ==>
2126	:info:build ; 1
2127	:info:build ;
2128	:info:build ; note: unable to
2129	:info:build ; optimize
2130	:info:build ; because:
2131	:info:build ; Upgraded element type of array is not known at compile time.
2132	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT
2133	:info:build ; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT
2134	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT)
2135	:info:build ; (WITH-ACCESSORS ((FLEXI-STREAMS::ENCODING-HASH
2136	:info:build ; FLEXI-STREAMS::EXTERNAL-FORMAT-ENCODING-HASH))
2137	:info:build ; FORMAT
2138	:info:build ; (LET ((FLEXI-STREAMS:OCTET #))
2139	:info:build ; (UNLESS FLEXI-STREAMS:OCTET
2140	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
2141	:info:build ; "~S (code ~A) is not in this encoding."
2142	:info:build ; FLEXI-STREAMS::CHAR-GETTER
2143	:info:build ; FLEXI-STREAMS:OCTET))
2144	:info:build ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET))))
2145	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2146	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2147	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2148	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2149	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2150	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2151	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
2152	:info:build ; ==>
2153	:info:build ; 1
2154	:info:build ;
2155	:info:build ; note: unable to
2156	:info:build ; expand inline
2157	:info:build ; due to type uncertainty:
2158	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
2159	:info:build ;
2160	:info:build ; note: unable to
2161	:info:build ; expand inline
2162	:info:build ; due to type uncertainty:
2163	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
2164	:info:build ;
2165	:info:build ; note: unable to
2166	:info:build ; optimize
2167	:info:build ; due to type uncertainty:
2168	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
2169	:info:build ;
2170	:info:build ; note: unable to
2171	:info:build ; optimize
2172	:info:build ; due to type uncertainty:
2173	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
2174	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2175	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2176	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2177	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2178	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2179	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
2180	:info:build ; ==>
2181	:info:build ; 1
2182	:info:build ;
2183	:info:build ; note: forced to do GENERIC-* (cost 50)
2184	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
2185	:info:build ; The first argument is a T, not a FIXNUM.
2186	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
2187	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
2188	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
2189	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
2190	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
2191	:info:build ; 32).
2192	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
2193	:info:build ; (UNSIGNED-BYTE 32)
2194	:info:build ; &OPTIONAL).
2195	:info:build ; etc.
2196	:info:build ;
2197	:info:build ; note: forced to do GENERIC-< (cost 10)
2198	:info:build ; unable to do inline fixnum comparison (cost 4) because:
2199	:info:build ; The first argument is a INTEGER, not a FIXNUM.
2200	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
2201	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
2202	:info:build ; etc.
2203	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2204	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2205	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2206	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2207	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2208	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2209	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
2210	:info:build ; ==>
2211	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
2212	:info:build ;
2213	:info:build ; note: forced to do GENERIC-+ (cost 10)
2214	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
2215	:info:build ; The first argument is a T, not a FIXNUM.
2216	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
2217	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
2218	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
2219	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
2220	:info:build ; 32).
2221	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
2222	:info:build ; (UNSIGNED-BYTE 32)
2223	:info:build ; &OPTIONAL).
2224	:info:build ; etc.
2225	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2226	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2227	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2228	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2229	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2230	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
2231	:info:build ; ==>
2232	:info:build ; 1
2233	:info:build ;
2234	:info:build ; note: doing signed word to integer coercion (cost 20), for:
2235	:info:build ; the second argument of GENERIC-*
2236	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2237	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2238	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2239	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2240	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2241	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
2242	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY WITH-ACCESSORS LET SYMBOL-MACROLET LET
2243	:info:build ; --> GETHASH
2244	:info:build ; ==>
2245	:info:build ; 1
2246	:info:build ;
2247	:info:build ; note: unable to
2248	:info:build ; optimize
2249	:info:build ; because:
2250	:info:build ; Upgraded element type of array is not known at compile time.
2251	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2252	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2253	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2254	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2255	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2256	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
2257	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY WITH-ACCESSORS LET SYMBOL-MACROLET LET
2258	:info:build ; --> UNLESS IF FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET
2259	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
2260	:info:build ; ==>
2261	:info:build ; 1
2262	:info:build ;
2263	:info:build ; note: unable to
2264	:info:build ; optimize
2265	:info:build ; because:
2266	:info:build ; Upgraded element type of array is not known at compile time.
2267	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2268	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2269	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2270	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2271	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2272	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2273	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
2274	:info:build ; ==>
2275	:info:build ; 1
2276	:info:build ;
2277	:info:build ; note: unable to
2278	:info:build ; optimize
2279	:info:build ; because:
2280	:info:build ; Upgraded element type of array is not known at compile time.
2281	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2282	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2283	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2284	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2285	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2286	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
2287	:info:build ; ==>
2288	:info:build ; 1
2289	:info:build ;
2290	:info:build ; note: unable to
2291	:info:build ; optimize
2292	:info:build ; due to type uncertainty:
2293	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
2294	:info:build ;
2295	:info:build ; note: unable to
2296	:info:build ; optimize
2297	:info:build ; due to type uncertainty:
2298	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
2299	:info:build ;
2300	:info:build ; note: unable to
2301	:info:build ; optimize
2302	:info:build ; due to type uncertainty:
2303	:info:build ; The first argument is a REAL, not a INTEGER.
2304	:info:build ;
2305	:info:build ; note: unable to
2306	:info:build ; convert division by 2^k to shift
2307	:info:build ; due to type uncertainty:
2308	:info:build ; The first argument is a REAL, not a INTEGER.
2309	:info:build ;
2310	:info:build ; note: unable to
2311	:info:build ; fold division by 1
2312	:info:build ; due to type uncertainty:
2313	:info:build ; The first argument is a REAL, not a INTEGER.
2314	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2315	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2316	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2317	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2318	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2319	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2320	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
2321	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY WITH-ACCESSORS LET
2322	:info:build ; --> SYMBOL-MACROLET LET GETHASH
2323	:info:build ; ==>
2324	:info:build ; 1
2325	:info:build ;
2326	:info:build ; note: unable to
2327	:info:build ; optimize
2328	:info:build ; because:
2329	:info:build ; Upgraded element type of array is not known at compile time.
2330	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2331	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2332	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2333	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2334	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2335	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2336	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
2337	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY WITH-ACCESSORS LET
2338	:info:build ; --> SYMBOL-MACROLET LET UNLESS IF FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET
2339	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
2340	:info:build ; ==>
2341	:info:build ; 1
2342	:info:build ;
2343	:info:build ; note: unable to
2344	:info:build ; optimize
2345	:info:build ; because:
2346	:info:build ; Upgraded element type of array is not known at compile time.
2347	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2348	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2349	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2350	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2351	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2352	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2353	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
2354	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY WITH-ACCESSORS LET
2355	:info:build ; --> SYMBOL-MACROLET LET GETHASH
2356	:info:build ; ==>
2357	:info:build ; 1
2358	:info:build ;
2359	:info:build ; note: unable to
2360	:info:build ; optimize
2361	:info:build ; because:
2362	:info:build ; Upgraded element type of array is not known at compile time.
2363	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2364	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2365	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2366	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2367	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2368	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2369	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
2370	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY WITH-ACCESSORS LET
2371	:info:build ; --> SYMBOL-MACROLET LET UNLESS IF FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET
2372	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER AREF
2373	:info:build ; ==>
2374	:info:build ; 1
2375	:info:build ;
2376	:info:build ; note: unable to
2377	:info:build ; optimize
2378	:info:build ; because:
2379	:info:build ; Upgraded element type of array is not known at compile time.
2380	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2381	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2382	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2383	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2384	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2385	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2386	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
2387	:info:build ; ==>
2388	:info:build ; 1
2389	:info:build ;
2390	:info:build ; note: unable to
2391	:info:build ; expand inline
2392	:info:build ; due to type uncertainty:
2393	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
2394	:info:build ;
2395	:info:build ; note: unable to
2396	:info:build ; expand inline
2397	:info:build ; due to type uncertainty:
2398	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
2399	:info:build ;
2400	:info:build ; note: unable to
2401	:info:build ; optimize
2402	:info:build ; due to type uncertainty:
2403	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
2404	:info:build ;
2405	:info:build ; note: unable to
2406	:info:build ; optimize
2407	:info:build ; due to type uncertainty:
2408	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
2409	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2410	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2411	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2412	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2413	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2414	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
2415	:info:build ; ==>
2416	:info:build ; 1
2417	:info:build ;
2418	:info:build ; note: forced to do GENERIC-* (cost 50)
2419	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
2420	:info:build ; The first argument is a T, not a FIXNUM.
2421	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
2422	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
2423	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
2424	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
2425	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
2426	:info:build ; 32).
2427	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
2428	:info:build ; (UNSIGNED-BYTE 32)
2429	:info:build ; &OPTIONAL).
2430	:info:build ; etc.
2431	:info:build ;
2432	:info:build ; note: forced to do GENERIC-< (cost 10)
2433	:info:build ; unable to do inline fixnum comparison (cost 4) because:
2434	:info:build ; The first argument is a INTEGER, not a FIXNUM.
2435	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
2436	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
2437	:info:build ; etc.
2438	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2439	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2440	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2441	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2442	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2443	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2444	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
2445	:info:build ; ==>
2446	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
2447	:info:build ;
2448	:info:build ; note: forced to do GENERIC-+ (cost 10)
2449	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
2450	:info:build ; The first argument is a T, not a FIXNUM.
2451	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
2452	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
2453	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
2454	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
2455	:info:build ; 32).
2456	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
2457	:info:build ; (UNSIGNED-BYTE 32)
2458	:info:build ; &OPTIONAL).
2459	:info:build ; etc.
2460	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2461	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2462	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2463	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2464	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2465	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
2466	:info:build ; ==>
2467	:info:build ; 1
2468	:info:build ;
2469	:info:build ; note: doing signed word to integer coercion (cost 20), for:
2470	:info:build ; the second argument of GENERIC-*
2471	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2472	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2473	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2474	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2475	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2476	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
2477	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
2478	:info:build ; ==>
2479	:info:build ; 1
2480	:info:build ;
2481	:info:build ; note: unable to
2482	:info:build ; optimize
2483	:info:build ; because:
2484	:info:build ; Upgraded element type of array is not known at compile time.
2485	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2486	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2487	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2488	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2489	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2490	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2491	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
2492	:info:build ; ==>
2493	:info:build ; 1
2494	:info:build ;
2495	:info:build ; note: unable to
2496	:info:build ; optimize
2497	:info:build ; because:
2498	:info:build ; Upgraded element type of array is not known at compile time.
2499	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2500	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2501	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2502	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2503	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2504	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
2505	:info:build ; ==>
2506	:info:build ; 1
2507	:info:build ;
2508	:info:build ; note: unable to
2509	:info:build ; optimize
2510	:info:build ; due to type uncertainty:
2511	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
2512	:info:build ;
2513	:info:build ; note: unable to
2514	:info:build ; optimize
2515	:info:build ; due to type uncertainty:
2516	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
2517	:info:build ;
2518	:info:build ; note: unable to
2519	:info:build ; optimize
2520	:info:build ; due to type uncertainty:
2521	:info:build ; The first argument is a REAL, not a INTEGER.
2522	:info:build ;
2523	:info:build ; note: unable to
2524	:info:build ; convert division by 2^k to shift
2525	:info:build ; due to type uncertainty:
2526	:info:build ; The first argument is a REAL, not a INTEGER.
2527	:info:build ;
2528	:info:build ; note: unable to
2529	:info:build ; fold division by 1
2530	:info:build ; due to type uncertainty:
2531	:info:build ; The first argument is a REAL, not a INTEGER.
2532	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2533	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2534	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2535	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2536	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2537	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2538	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
2539	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
2540	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
2541	:info:build ; ==>
2542	:info:build ; 1
2543	:info:build ;
2544	:info:build ; note: unable to
2545	:info:build ; optimize
2546	:info:build ; because:
2547	:info:build ; Upgraded element type of array is not known at compile time.
2548	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2549	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2550	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2551	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2552	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2553	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2554	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
2555	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
2556	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER AREF
2557	:info:build ; ==>
2558	:info:build ; 1
2559	:info:build ;
2560	:info:build ; note: unable to
2561	:info:build ; optimize
2562	:info:build ; because:
2563	:info:build ; Upgraded element type of array is not known at compile time.
2564	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2565	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2566	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2567	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2568	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2569	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2570	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
2571	:info:build ; ==>
2572	:info:build ; 1
2573	:info:build ;
2574	:info:build ; note: unable to
2575	:info:build ; expand inline
2576	:info:build ; due to type uncertainty:
2577	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
2578	:info:build ;
2579	:info:build ; note: unable to
2580	:info:build ; expand inline
2581	:info:build ; due to type uncertainty:
2582	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
2583	:info:build ;
2584	:info:build ; note: unable to
2585	:info:build ; optimize
2586	:info:build ; due to type uncertainty:
2587	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
2588	:info:build ;
2589	:info:build ; note: unable to
2590	:info:build ; optimize
2591	:info:build ; due to type uncertainty:
2592	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
2593	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2594	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2595	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2596	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2597	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2598	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
2599	:info:build ; ==>
2600	:info:build ; 1
2601	:info:build ;
2602	:info:build ; note: forced to do GENERIC-* (cost 50)
2603	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
2604	:info:build ; The first argument is a T, not a FIXNUM.
2605	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
2606	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
2607	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
2608	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
2609	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
2610	:info:build ; 32).
2611	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
2612	:info:build ; (UNSIGNED-BYTE 32)
2613	:info:build ; &OPTIONAL).
2614	:info:build ; etc.
2615	:info:build ;
2616	:info:build ; note: forced to do GENERIC-< (cost 10)
2617	:info:build ; unable to do inline fixnum comparison (cost 4) because:
2618	:info:build ; The first argument is a INTEGER, not a FIXNUM.
2619	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
2620	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
2621	:info:build ; etc.
2622	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2623	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2624	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2625	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2626	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2627	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2628	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
2629	:info:build ; ==>
2630	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
2631	:info:build ;
2632	:info:build ; note: forced to do GENERIC-+ (cost 10)
2633	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
2634	:info:build ; The first argument is a T, not a FIXNUM.
2635	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
2636	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
2637	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
2638	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
2639	:info:build ; 32).
2640	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
2641	:info:build ; (UNSIGNED-BYTE 32)
2642	:info:build ; &OPTIONAL).
2643	:info:build ; etc.
2644	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2645	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2646	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2647	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2648	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2649	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
2650	:info:build ; ==>
2651	:info:build ; 1
2652	:info:build ;
2653	:info:build ; note: doing signed word to integer coercion (cost 20), for:
2654	:info:build ; the second argument of GENERIC-*
2655	:info:build ; in:
2656	:info:build ; DEFINE-CHAR-ENCODERS (FLEXI-UTF-8-FORMAT FLEXI-CR-UTF-8-FORMAT
2657	:info:build ; FLEXI-CRLF-UTF-8-FORMAT)
2658	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
2659	:info:build ; --> CHAR
2660	:info:build ; ==>
2661	:info:build ; 1
2662	:info:build ;
2663	:info:build ; note: unable to
2664	:info:build ; optimize
2665	:info:build ; because:
2666	:info:build ; Upgraded element type of array is not known at compile time.
2667	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT
2668	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT
2669	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT)
2670	:info:build ; (LET ((CHAR-CODE (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
2671	:info:build ; (TAGBODY
2672	:info:build ; (COND (# # #) (# # #) (# # #) (T #))
2673	:info:build ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGIOR* 128 #))
2674	:info:build ; FLEXI-STREAMS::TWO
2675	:info:build ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGIOR* 128 #))
2676	:info:build ; FLEXI-STREAMS::ONE
2677	:info:build ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGIOR* 128 #))
2678	:info:build ; FLEXI-STREAMS::ZERO)))
2679	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2680	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2681	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2682	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2683	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2684	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2685	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
2686	:info:build ; ==>
2687	:info:build ; 1
2688	:info:build ;
2689	:info:build ; note: unable to
2690	:info:build ; optimize
2691	:info:build ; because:
2692	:info:build ; Upgraded element type of array is not known at compile time.
2693	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2694	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2695	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2696	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2697	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2698	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
2699	:info:build ; ==>
2700	:info:build ; 1
2701	:info:build ;
2702	:info:build ; note: unable to
2703	:info:build ; optimize
2704	:info:build ; due to type uncertainty:
2705	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
2706	:info:build ;
2707	:info:build ; note: unable to
2708	:info:build ; optimize
2709	:info:build ; due to type uncertainty:
2710	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
2711	:info:build ;
2712	:info:build ; note: unable to
2713	:info:build ; optimize
2714	:info:build ; due to type uncertainty:
2715	:info:build ; The first argument is a REAL, not a INTEGER.
2716	:info:build ;
2717	:info:build ; note: unable to
2718	:info:build ; convert division by 2^k to shift
2719	:info:build ; due to type uncertainty:
2720	:info:build ; The first argument is a REAL, not a INTEGER.
2721	:info:build ;
2722	:info:build ; note: unable to
2723	:info:build ; fold division by 1
2724	:info:build ; due to type uncertainty:
2725	:info:build ; The first argument is a REAL, not a INTEGER.
2726	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
2727	:info:build ; --> CHAR
2728	:info:build ; ==>
2729	:info:build ; 1
2730	:info:build ;
2731	:info:build ; note: unable to
2732	:info:build ; optimize
2733	:info:build ; because:
2734	:info:build ; Upgraded element type of array is not known at compile time.
2735	:info:build ; --> AREF
2736	:info:build ; ==>
2737	:info:build ; 1
2738	:info:build ;
2739	:info:build ; note: unable to
2740	:info:build ; optimize
2741	:info:build ; because:
2742	:info:build ; Upgraded element type of array is not known at compile time.
2743	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT
2744	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT
2745	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT)
2746	:info:build ; (LET ((CHAR-CODE (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
2747	:info:build ; (TAGBODY
2748	:info:build ; (COND (# # #) (# # #) (# # #) (T #))
2749	:info:build ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGIOR* 128 #))
2750	:info:build ; FLEXI-STREAMS::TWO
2751	:info:build ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGIOR* 128 #))
2752	:info:build ; FLEXI-STREAMS::ONE
2753	:info:build ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGIOR* 128 #))
2754	:info:build ; FLEXI-STREAMS::ZERO)))
2755	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2756	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2757	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2758	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2759	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2760	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2761	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
2762	:info:build ; ==>
2763	:info:build ; 1
2764	:info:build ;
2765	:info:build ; note: unable to
2766	:info:build ; expand inline
2767	:info:build ; due to type uncertainty:
2768	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
2769	:info:build ;
2770	:info:build ; note: unable to
2771	:info:build ; expand inline
2772	:info:build ; due to type uncertainty:
2773	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
2774	:info:build ;
2775	:info:build ; note: unable to
2776	:info:build ; optimize
2777	:info:build ; due to type uncertainty:
2778	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
2779	:info:build ;
2780	:info:build ; note: unable to
2781	:info:build ; optimize
2782	:info:build ; due to type uncertainty:
2783	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
2784	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2785	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2786	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2787	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2788	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2789	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
2790	:info:build ; ==>
2791	:info:build ; 1
2792	:info:build ;
2793	:info:build ; note: forced to do GENERIC-* (cost 50)
2794	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
2795	:info:build ; The first argument is a T, not a FIXNUM.
2796	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
2797	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
2798	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
2799	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
2800	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
2801	:info:build ; 32).
2802	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
2803	:info:build ; (UNSIGNED-BYTE 32)
2804	:info:build ; &OPTIONAL).
2805	:info:build ; etc.
2806	:info:build ;
2807	:info:build ; note: forced to do GENERIC-< (cost 10)
2808	:info:build ; unable to do inline fixnum comparison (cost 4) because:
2809	:info:build ; The first argument is a INTEGER, not a FIXNUM.
2810	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
2811	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
2812	:info:build ; etc.
2813	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2814	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2815	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2816	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2817	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2818	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2819	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
2820	:info:build ; ==>
2821	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
2822	:info:build ;
2823	:info:build ; note: forced to do GENERIC-+ (cost 10)
2824	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
2825	:info:build ; The first argument is a T, not a FIXNUM.
2826	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
2827	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
2828	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
2829	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
2830	:info:build ; 32).
2831	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
2832	:info:build ; (UNSIGNED-BYTE 32)
2833	:info:build ; &OPTIONAL).
2834	:info:build ; etc.
2835	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2836	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2837	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2838	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2839	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2840	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
2841	:info:build ; ==>
2842	:info:build ; 1
2843	:info:build ;
2844	:info:build ; note: doing signed word to integer coercion (cost 20), for:
2845	:info:build ; the second argument of GENERIC-*
2846	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2847	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2848	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2849	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2850	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2851	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
2852	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY LET CHAR-CODE LET
2853	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
2854	:info:build ; ==>
2855	:info:build ; 1
2856	:info:build ;
2857	:info:build ; note: unable to
2858	:info:build ; optimize
2859	:info:build ; because:
2860	:info:build ; Upgraded element type of array is not known at compile time.
2861	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2862	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2863	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2864	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2865	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2866	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2867	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
2868	:info:build ; ==>
2869	:info:build ; 1
2870	:info:build ;
2871	:info:build ; note: unable to
2872	:info:build ; optimize
2873	:info:build ; because:
2874	:info:build ; Upgraded element type of array is not known at compile time.
2875	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2876	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2877	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2878	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2879	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2880	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
2881	:info:build ; ==>
2882	:info:build ; 1
2883	:info:build ;
2884	:info:build ; note: unable to
2885	:info:build ; optimize
2886	:info:build ; due to type uncertainty:
2887	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
2888	:info:build ;
2889	:info:build ; note: unable to
2890	:info:build ; optimize
2891	:info:build ; due to type uncertainty:
2892	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
2893	:info:build ;
2894	:info:build ; note: unable to
2895	:info:build ; optimize
2896	:info:build ; due to type uncertainty:
2897	:info:build ; The first argument is a REAL, not a INTEGER.
2898	:info:build ;
2899	:info:build ; note: unable to
2900	:info:build ; convert division by 2^k to shift
2901	:info:build ; due to type uncertainty:
2902	:info:build ; The first argument is a REAL, not a INTEGER.
2903	:info:build ;
2904	:info:build ; note: unable to
2905	:info:build ; fold division by 1
2906	:info:build ; due to type uncertainty:
2907	:info:build ; The first argument is a REAL, not a INTEGER.
2908	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2909	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2910	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2911	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2912	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2913	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2914	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
2915	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET CHAR-CODE LET
2916	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
2917	:info:build ; ==>
2918	:info:build ; 1
2919	:info:build ;
2920	:info:build ; note: unable to
2921	:info:build ; optimize
2922	:info:build ; because:
2923	:info:build ; Upgraded element type of array is not known at compile time.
2924	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2925	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2926	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2927	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2928	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2929	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2930	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
2931	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET CHAR-CODE LET
2932	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER AREF
2933	:info:build ; ==>
2934	:info:build ; 1
2935	:info:build ;
2936	:info:build ; note: unable to
2937	:info:build ; optimize
2938	:info:build ; because:
2939	:info:build ; Upgraded element type of array is not known at compile time.
2940	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2941	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2942	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2943	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2944	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2945	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
2946	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
2947	:info:build ; ==>
2948	:info:build ; 1
2949	:info:build ;
2950	:info:build ; note: unable to
2951	:info:build ; expand inline
2952	:info:build ; due to type uncertainty:
2953	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
2954	:info:build ;
2955	:info:build ; note: unable to
2956	:info:build ; expand inline
2957	:info:build ; due to type uncertainty:
2958	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
2959	:info:build ;
2960	:info:build ; note: unable to
2961	:info:build ; optimize
2962	:info:build ; due to type uncertainty:
2963	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
2964	:info:build ;
2965	:info:build ; note: unable to
2966	:info:build ; optimize
2967	:info:build ; due to type uncertainty:
2968	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
2969	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2970	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
2971	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
2972	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
2973	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
2974	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
2975	:info:build ; ==>
2976	:info:build ; 1
2977	:info:build ;
2978	:info:build ; note: forced to do GENERIC-* (cost 50)
2979	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
2980	:info:build ; The first argument is a T, not a FIXNUM.
2981	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
2982	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
2983	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
2984	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
2985	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
2986	:info:build ; 32).
2987	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
2988	:info:build ; (UNSIGNED-BYTE 32)
2989	:info:build ; &OPTIONAL).
2990	:info:build ; etc.
2991	:info:build ;
2992	:info:build ; note: forced to do GENERIC-< (cost 10)
2993	:info:build ; unable to do inline fixnum comparison (cost 4) because:
2994	:info:build ; The first argument is a INTEGER, not a FIXNUM.
2995	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
2996	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
2997	:info:build ; etc.
2998	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
2999	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3000	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3001	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3002	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3003	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3004	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
3005	:info:build ; ==>
3006	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
3007	:info:build ;
3008	:info:build ; note: forced to do GENERIC-+ (cost 10)
3009	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
3010	:info:build ; The first argument is a T, not a FIXNUM.
3011	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
3012	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
3013	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
3014	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
3015	:info:build ; 32).
3016	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
3017	:info:build ; (UNSIGNED-BYTE 32)
3018	:info:build ; &OPTIONAL).
3019	:info:build ; etc.
3020	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3021	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3022	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3023	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3024	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3025	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
3026	:info:build ; ==>
3027	:info:build ; 1
3028	:info:build ;
3029	:info:build ; note: doing signed word to integer coercion (cost 20), for:
3030	:info:build ; the second argument of GENERIC-*
3031	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3032	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3033	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3034	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3035	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3036	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
3037	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
3038	:info:build ; ==>
3039	:info:build ; 1
3040	:info:build ;
3041	:info:build ; note: unable to
3042	:info:build ; optimize
3043	:info:build ; because:
3044	:info:build ; Upgraded element type of array is not known at compile time.
3045	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3046	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3047	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3048	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3049	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3050	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3051	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
3052	:info:build ; ==>
3053	:info:build ; 1
3054	:info:build ;
3055	:info:build ; note: unable to
3056	:info:build ; optimize
3057	:info:build ; because:
3058	:info:build ; Upgraded element type of array is not known at compile time.
3059	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3060	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3061	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3062	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3063	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3064	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
3065	:info:build ; ==>
3066	:info:build ; 1
3067	:info:build ;
3068	:info:build ; note: unable to
3069	:info:build ; optimize
3070	:info:build ; due to type uncertainty:
3071	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
3072	:info:build ;
3073	:info:build ; note: unable to
3074	:info:build ; optimize
3075	:info:build ; due to type uncertainty:
3076	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
3077	:info:build ;
3078	:info:build ; note: unable to
3079	:info:build ; optimize
3080	:info:build ; due to type uncertainty:
3081	:info:build ; The first argument is a REAL, not a INTEGER.
3082	:info:build ;
3083	:info:build ; note: unable to
3084	:info:build ; convert division by 2^k to shift
3085	:info:build ; due to type uncertainty:
3086	:info:build ; The first argument is a REAL, not a INTEGER.
3087	:info:build ;
3088	:info:build ; note: unable to
3089	:info:build ; fold division by 1
3090	:info:build ; due to type uncertainty:
3091	:info:build ; The first argument is a REAL, not a INTEGER.
3092	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3093	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3094	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3095	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3096	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3097	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3098	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
3099	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
3100	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
3101	:info:build ; ==>
3102	:info:build ; 1
3103	:info:build ;
3104	:info:build ; note: unable to
3105	:info:build ; optimize
3106	:info:build ; because:
3107	:info:build ; Upgraded element type of array is not known at compile time.
3108	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3109	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3110	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3111	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3112	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3113	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3114	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
3115	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
3116	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER AREF
3117	:info:build ; ==>
3118	:info:build ; 1
3119	:info:build ;
3120	:info:build ; note: unable to
3121	:info:build ; optimize
3122	:info:build ; because:
3123	:info:build ; Upgraded element type of array is not known at compile time.
3124	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3125	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3126	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3127	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3128	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3129	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3130	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
3131	:info:build ; ==>
3132	:info:build ; 1
3133	:info:build ;
3134	:info:build ; note: unable to
3135	:info:build ; expand inline
3136	:info:build ; due to type uncertainty:
3137	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
3138	:info:build ;
3139	:info:build ; note: unable to
3140	:info:build ; expand inline
3141	:info:build ; due to type uncertainty:
3142	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
3143	:info:build ;
3144	:info:build ; note: unable to
3145	:info:build ; optimize
3146	:info:build ; due to type uncertainty:
3147	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
3148	:info:build ;
3149	:info:build ; note: unable to
3150	:info:build ; optimize
3151	:info:build ; due to type uncertainty:
3152	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
3153	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3154	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3155	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3156	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3157	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3158	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
3159	:info:build ; ==>
3160	:info:build ; 1
3161	:info:build ;
3162	:info:build ; note: forced to do GENERIC-* (cost 50)
3163	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
3164	:info:build ; The first argument is a T, not a FIXNUM.
3165	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
3166	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
3167	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
3168	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
3169	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
3170	:info:build ; 32).
3171	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
3172	:info:build ; (UNSIGNED-BYTE 32)
3173	:info:build ; &OPTIONAL).
3174	:info:build ; etc.
3175	:info:build ;
3176	:info:build ; note: forced to do GENERIC-< (cost 10)
3177	:info:build ; unable to do inline fixnum comparison (cost 4) because:
3178	:info:build ; The first argument is a INTEGER, not a FIXNUM.
3179	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
3180	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
3181	:info:build ; etc.
3182	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3183	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3184	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3185	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3186	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3187	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3188	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
3189	:info:build ; ==>
3190	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
3191	:info:build ;
3192	:info:build ; note: forced to do GENERIC-+ (cost 10)
3193	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
3194	:info:build ; The first argument is a T, not a FIXNUM.
3195	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
3196	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
3197	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
3198	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
3199	:info:build ; 32).
3200	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
3201	:info:build ; (UNSIGNED-BYTE 32)
3202	:info:build ; &OPTIONAL).
3203	:info:build ; etc.
3204	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3205	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3206	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3207	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3208	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3209	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
3210	:info:build ; ==>
3211	:info:build ; 1
3212	:info:build ;
3213	:info:build ; note: doing signed word to integer coercion (cost 20), for:
3214	:info:build ; the second argument of GENERIC-*
3215	:info:build ; in:
3216	:info:build ; DEFINE-CHAR-ENCODERS (FLEXI-UTF-16-LE-FORMAT FLEXI-CR-UTF-16-LE-FORMAT
3217	:info:build ; FLEXI-CRLF-UTF-16-LE-FORMAT)
3218	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
3219	:info:build ; --> CHAR
3220	:info:build ; ==>
3221	:info:build ; 1
3222	:info:build ;
3223	:info:build ; note: unable to
3224	:info:build ; optimize
3225	:info:build ; because:
3226	:info:build ; Upgraded element type of array is not known at compile time.
3227	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-16-LE-FORMAT
3228	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-16-LE-FORMAT
3229	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-LE-FORMAT)
3230	:info:build ; (FLET ((FLEXI-STREAMS::WRITE-WORD (FLEXI-STREAMS::WORD)
3231	:info:build ; (FLEXI-STREAMS::OCTET-WRITER #)
3232	:info:build ; (FLEXI-STREAMS::OCTET-WRITER #)))
3233	:info:build ; (DECLARE (INLINE FLEXI-STREAMS::WRITE-WORD))
3234	:info:build ; (LET ((CHAR-CODE #))
3235	:info:build ; (DECLARE (TYPE FLEXI-STREAMS::CHAR-CODE-INTEGER CHAR-CODE))
3236	:info:build ; (COND (# #) (T # # #)))))
3237	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3238	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3239	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3240	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3241	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3242	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3243	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
3244	:info:build ; ==>
3245	:info:build ; 1
3246	:info:build ;
3247	:info:build ; note: unable to
3248	:info:build ; optimize
3249	:info:build ; because:
3250	:info:build ; Upgraded element type of array is not known at compile time.
3251	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3252	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3253	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3254	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3255	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3256	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
3257	:info:build ; ==>
3258	:info:build ; 1
3259	:info:build ;
3260	:info:build ; note: unable to
3261	:info:build ; optimize
3262	:info:build ; due to type uncertainty:
3263	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
3264	:info:build ;
3265	:info:build ; note: unable to
3266	:info:build ; optimize
3267	:info:build ; due to type uncertainty:
3268	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
3269	:info:build ;
3270	:info:build ; note: unable to
3271	:info:build ; optimize
3272	:info:build ; due to type uncertainty:
3273	:info:build ; The first argument is a REAL, not a INTEGER.
3274	:info:build ;
3275	:info:build ; note: unable to
3276	:info:build ; convert division by 2^k to shift
3277	:info:build ; due to type uncertainty:
3278	:info:build ; The first argument is a REAL, not a INTEGER.
3279	:info:build ;
3280	:info:build ; note: unable to
3281	:info:build ; fold division by 1
3282	:info:build ; due to type uncertainty:
3283	:info:build ; The first argument is a REAL, not a INTEGER.
3284	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
3285	:info:build ; --> CHAR
3286	:info:build ; ==>
3287	:info:build ; 1
3288	:info:build ;
3289	:info:build ; note: unable to
3290	:info:build ; optimize
3291	:info:build ; because:
3292	:info:build ; Upgraded element type of array is not known at compile time.
3293	:info:build ; --> AREF
3294	:info:build ; ==>
3295	:info:build ; 1
3296	:info:build ;
3297	:info:build ; note: unable to
3298	:info:build ; optimize
3299	:info:build ; because:
3300	:info:build ; Upgraded element type of array is not known at compile time.
3301	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-16-LE-FORMAT
3302	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-16-LE-FORMAT
3303	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-LE-FORMAT)
3304	:info:build ; (FLET ((FLEXI-STREAMS::WRITE-WORD (FLEXI-STREAMS::WORD)
3305	:info:build ; (FLEXI-STREAMS::OCTET-WRITER #)
3306	:info:build ; (FLEXI-STREAMS::OCTET-WRITER #)))
3307	:info:build ; (DECLARE (INLINE FLEXI-STREAMS::WRITE-WORD))
3308	:info:build ; (LET ((CHAR-CODE #))
3309	:info:build ; (DECLARE (TYPE FLEXI-STREAMS::CHAR-CODE-INTEGER CHAR-CODE))
3310	:info:build ; (COND (# #) (T # # #)))))
3311	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3312	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3313	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3314	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3315	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3316	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3317	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
3318	:info:build ; ==>
3319	:info:build ; 1
3320	:info:build ;
3321	:info:build ; note: unable to
3322	:info:build ; expand inline
3323	:info:build ; due to type uncertainty:
3324	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
3325	:info:build ;
3326	:info:build ; note: unable to
3327	:info:build ; expand inline
3328	:info:build ; due to type uncertainty:
3329	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
3330	:info:build ;
3331	:info:build ; note: unable to
3332	:info:build ; optimize
3333	:info:build ; due to type uncertainty:
3334	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
3335	:info:build ;
3336	:info:build ; note: unable to
3337	:info:build ; optimize
3338	:info:build ; due to type uncertainty:
3339	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
3340	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3341	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3342	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3343	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3344	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3345	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
3346	:info:build ; ==>
3347	:info:build ; 1
3348	:info:build ;
3349	:info:build ; note: forced to do GENERIC-* (cost 50)
3350	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
3351	:info:build ; The first argument is a T, not a FIXNUM.
3352	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
3353	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
3354	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
3355	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
3356	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
3357	:info:build ; 32).
3358	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
3359	:info:build ; (UNSIGNED-BYTE 32)
3360	:info:build ; &OPTIONAL).
3361	:info:build ; etc.
3362	:info:build ;
3363	:info:build ; note: forced to do GENERIC-< (cost 10)
3364	:info:build ; unable to do inline fixnum comparison (cost 4) because:
3365	:info:build ; The first argument is a INTEGER, not a FIXNUM.
3366	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
3367	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
3368	:info:build ; etc.
3369	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3370	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3371	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3372	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3373	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3374	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3375	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
3376	:info:build ; ==>
3377	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
3378	:info:build ;
3379	:info:build ; note: forced to do GENERIC-+ (cost 10)
3380	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
3381	:info:build ; The first argument is a T, not a FIXNUM.
3382	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
3383	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
3384	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
3385	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
3386	:info:build ; 32).
3387	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
3388	:info:build ; (UNSIGNED-BYTE 32)
3389	:info:build ; &OPTIONAL).
3390	:info:build ; etc.
3391	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3392	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3393	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3394	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3395	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3396	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
3397	:info:build ; ==>
3398	:info:build ; 1
3399	:info:build ;
3400	:info:build ; note: doing signed word to integer coercion (cost 20), for:
3401	:info:build ; the second argument of GENERIC-*
3402	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3403	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3404	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3405	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3406	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3407	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
3408	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET CHAR-CODE LET
3409	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
3410	:info:build ; ==>
3411	:info:build ; 1
3412	:info:build ;
3413	:info:build ; note: unable to
3414	:info:build ; optimize
3415	:info:build ; because:
3416	:info:build ; Upgraded element type of array is not known at compile time.
3417	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3418	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3419	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3420	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3421	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3422	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3423	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
3424	:info:build ; ==>
3425	:info:build ; 1
3426	:info:build ;
3427	:info:build ; note: unable to
3428	:info:build ; optimize
3429	:info:build ; because:
3430	:info:build ; Upgraded element type of array is not known at compile time.
3431	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3432	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3433	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3434	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3435	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3436	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
3437	:info:build ; ==>
3438	:info:build ; 1
3439	:info:build ;
3440	:info:build ; note: unable to
3441	:info:build ; optimize
3442	:info:build ; due to type uncertainty:
3443	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
3444	:info:build ;
3445	:info:build ; note: unable to
3446	:info:build ; optimize
3447	:info:build ; due to type uncertainty:
3448	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
3449	:info:build ;
3450	:info:build ; note: unable to
3451	:info:build ; optimize
3452	:info:build ; due to type uncertainty:
3453	:info:build ; The first argument is a REAL, not a INTEGER.
3454	:info:build ;
3455	:info:build ; note: unable to
3456	:info:build ; convert division by 2^k to shift
3457	:info:build ; due to type uncertainty:
3458	:info:build ; The first argument is a REAL, not a INTEGER.
3459	:info:build ;
3460	:info:build ; note: unable to
3461	:info:build ; fold division by 1
3462	:info:build ; due to type uncertainty:
3463	:info:build ; The first argument is a REAL, not a INTEGER.
3464	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3465	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3466	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3467	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3468	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3469	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3470	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
3471	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET CHAR-CODE
3472	:info:build ; --> LET FLEXI-STREAMS::CHAR-GETTER CHAR
3473	:info:build ; ==>
3474	:info:build ; 1
3475	:info:build ;
3476	:info:build ; note: unable to
3477	:info:build ; optimize
3478	:info:build ; because:
3479	:info:build ; Upgraded element type of array is not known at compile time.
3480	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3481	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3482	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3483	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3484	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3485	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3486	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
3487	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET CHAR-CODE
3488	:info:build ; --> LET FLEXI-STREAMS::CHAR-GETTER AREF
3489	:info:build ; ==>
3490	:info:build ; 1
3491	:info:build ;
3492	:info:build ; note: unable to
3493	:info:build ; optimize
3494	:info:build ; because:
3495	:info:build ; Upgraded element type of array is not known at compile time.
3496	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3497	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3498	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3499	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3500	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3501	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3502	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
3503	:info:build ; ==>
3504	:info:build ; 1
3505	:info:build ;
3506	:info:build ; note: unable to
3507	:info:build ; expand inline
3508	:info:build ; due to type uncertainty:
3509	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
3510	:info:build ;
3511	:info:build ; note: unable to
3512	:info:build ; expand inline
3513	:info:build ; due to type uncertainty:
3514	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
3515	:info:build ;
3516	:info:build ; note: unable to
3517	:info:build ; optimize
3518	:info:build ; due to type uncertainty:
3519	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
3520	:info:build ;
3521	:info:build ; note: unable to
3522	:info:build ; optimize
3523	:info:build ; due to type uncertainty:
3524	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
3525	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3526	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3527	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3528	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3529	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3530	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
3531	:info:build ; ==>
3532	:info:build ; 1
3533	:info:build ;
3534	:info:build ; note: forced to do GENERIC-* (cost 50)
3535	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
3536	:info:build ; The first argument is a T, not a FIXNUM.
3537	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
3538	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
3539	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
3540	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
3541	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
3542	:info:build ; 32).
3543	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
3544	:info:build ; (UNSIGNED-BYTE 32)
3545	:info:build ; &OPTIONAL).
3546	:info:build ; etc.
3547	:info:build ;
3548	:info:build ; note: forced to do GENERIC-< (cost 10)
3549	:info:build ; unable to do inline fixnum comparison (cost 4) because:
3550	:info:build ; The first argument is a INTEGER, not a FIXNUM.
3551	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
3552	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
3553	:info:build ; etc.
3554	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3555	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3556	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3557	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3558	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3559	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3560	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
3561	:info:build ; ==>
3562	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
3563	:info:build ;
3564	:info:build ; note: forced to do GENERIC-+ (cost 10)
3565	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
3566	:info:build ; The first argument is a T, not a FIXNUM.
3567	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
3568	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
3569	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
3570	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
3571	:info:build ; 32).
3572	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
3573	:info:build ; (UNSIGNED-BYTE 32)
3574	:info:build ; &OPTIONAL).
3575	:info:build ; etc.
3576	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3577	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3578	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3579	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3580	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3581	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
3582	:info:build ; ==>
3583	:info:build ; 1
3584	:info:build ;
3585	:info:build ; note: doing signed word to integer coercion (cost 20), for:
3586	:info:build ; the second argument of GENERIC-*
3587	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3588	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3589	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3590	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3591	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3592	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
3593	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
3594	:info:build ; ==>
3595	:info:build ; 1
3596	:info:build ;
3597	:info:build ; note: unable to
3598	:info:build ; optimize
3599	:info:build ; because:
3600	:info:build ; Upgraded element type of array is not known at compile time.
3601	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3602	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3603	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3604	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3605	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3606	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3607	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
3608	:info:build ; ==>
3609	:info:build ; 1
3610	:info:build ;
3611	:info:build ; note: unable to
3612	:info:build ; optimize
3613	:info:build ; because:
3614	:info:build ; Upgraded element type of array is not known at compile time.
3615	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3616	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3617	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3618	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3619	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3620	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
3621	:info:build ; ==>
3622	:info:build ; 1
3623	:info:build ;
3624	:info:build ; note: unable to
3625	:info:build ; optimize
3626	:info:build ; due to type uncertainty:
3627	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
3628	:info:build ;
3629	:info:build ; note: unable to
3630	:info:build ; optimize
3631	:info:build ; due to type uncertainty:
3632	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
3633	:info:build ;
3634	:info:build ; note: unable to
3635	:info:build ; optimize
3636	:info:build ; due to type uncertainty:
3637	:info:build ; The first argument is a REAL, not a INTEGER.
3638	:info:build ;
3639	:info:build ; note: unable to
3640	:info:build ; convert division by 2^k to shift
3641	:info:build ; due to type uncertainty:
3642	:info:build ; The first argument is a REAL, not a INTEGER.
3643	:info:build ;
3644	:info:build ; note: unable to
3645	:info:build ; fold division by 1
3646	:info:build ; due to type uncertainty:
3647	:info:build ; The first argument is a REAL, not a INTEGER.
3648	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3649	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3650	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3651	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3652	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3653	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3654	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
3655	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
3656	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
3657	:info:build ; ==>
3658	:info:build ; 1
3659	:info:build ;
3660	:info:build ; note: unable to
3661	:info:build ; optimize
3662	:info:build ; because:
3663	:info:build ; Upgraded element type of array is not known at compile time.
3664	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3665	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3666	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3667	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3668	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3669	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3670	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
3671	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
3672	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER AREF
3673	:info:build ; ==>
3674	:info:build ; 1
3675	:info:build ;
3676	:info:build ; note: unable to
3677	:info:build ; optimize
3678	:info:build ; because:
3679	:info:build ; Upgraded element type of array is not known at compile time.
3680	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3681	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3682	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3683	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3684	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3685	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3686	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
3687	:info:build ; ==>
3688	:info:build ; 1
3689	:info:build ;
3690	:info:build ; note: unable to
3691	:info:build ; expand inline
3692	:info:build ; due to type uncertainty:
3693	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
3694	:info:build ;
3695	:info:build ; note: unable to
3696	:info:build ; expand inline
3697	:info:build ; due to type uncertainty:
3698	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
3699	:info:build ;
3700	:info:build ; note: unable to
3701	:info:build ; optimize
3702	:info:build ; due to type uncertainty:
3703	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
3704	:info:build ;
3705	:info:build ; note: unable to
3706	:info:build ; optimize
3707	:info:build ; due to type uncertainty:
3708	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
3709	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3710	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3711	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3712	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3713	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3714	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
3715	:info:build ; ==>
3716	:info:build ; 1
3717	:info:build ;
3718	:info:build ; note: forced to do GENERIC-* (cost 50)
3719	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
3720	:info:build ; The first argument is a T, not a FIXNUM.
3721	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
3722	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
3723	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
3724	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
3725	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
3726	:info:build ; 32).
3727	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
3728	:info:build ; (UNSIGNED-BYTE 32)
3729	:info:build ; &OPTIONAL).
3730	:info:build ; etc.
3731	:info:build ;
3732	:info:build ; note: forced to do GENERIC-< (cost 10)
3733	:info:build ; unable to do inline fixnum comparison (cost 4) because:
3734	:info:build ; The first argument is a INTEGER, not a FIXNUM.
3735	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
3736	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
3737	:info:build ; etc.
3738	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3739	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3740	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3741	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3742	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3743	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3744	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
3745	:info:build ; ==>
3746	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
3747	:info:build ;
3748	:info:build ; note: forced to do GENERIC-+ (cost 10)
3749	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
3750	:info:build ; The first argument is a T, not a FIXNUM.
3751	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
3752	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
3753	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
3754	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
3755	:info:build ; 32).
3756	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
3757	:info:build ; (UNSIGNED-BYTE 32)
3758	:info:build ; &OPTIONAL).
3759	:info:build ; etc.
3760	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3761	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3762	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3763	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3764	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3765	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
3766	:info:build ; ==>
3767	:info:build ; 1
3768	:info:build ;
3769	:info:build ; note: doing signed word to integer coercion (cost 20), for:
3770	:info:build ; the second argument of GENERIC-*
3771	:info:build ; in:
3772	:info:build ; DEFINE-CHAR-ENCODERS (FLEXI-UTF-16-BE-FORMAT FLEXI-CR-UTF-16-BE-FORMAT
3773	:info:build ; FLEXI-CRLF-UTF-16-BE-FORMAT)
3774	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
3775	:info:build ; --> CHAR
3776	:info:build ; ==>
3777	:info:build ; 1
3778	:info:build ;
3779	:info:build ; note: unable to
3780	:info:build ; optimize
3781	:info:build ; because:
3782	:info:build ; Upgraded element type of array is not known at compile time.
3783	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-16-BE-FORMAT
3784	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-16-BE-FORMAT
3785	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-BE-FORMAT)
3786	:info:build ; (FLET ((FLEXI-STREAMS::WRITE-WORD (FLEXI-STREAMS::WORD)
3787	:info:build ; (FLEXI-STREAMS::OCTET-WRITER #)
3788	:info:build ; (FLEXI-STREAMS::OCTET-WRITER #)))
3789	:info:build ; (DECLARE (INLINE FLEXI-STREAMS::WRITE-WORD))
3790	:info:build ; (LET ((CHAR-CODE #))
3791	:info:build ; (DECLARE (TYPE FLEXI-STREAMS::CHAR-CODE-INTEGER CHAR-CODE))
3792	:info:build ; (COND (# #) (T # # #)))))
3793	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3794	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3795	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3796	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3797	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3798	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3799	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
3800	:info:build ; ==>
3801	:info:build ; 1
3802	:info:build ;
3803	:info:build ; note: unable to
3804	:info:build ; optimize
3805	:info:build ; because:
3806	:info:build ; Upgraded element type of array is not known at compile time.
3807	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3808	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3809	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3810	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3811	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3812	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
3813	:info:build ; ==>
3814	:info:build ; 1
3815	:info:build ;
3816	:info:build ; note: unable to
3817	:info:build ; optimize
3818	:info:build ; due to type uncertainty:
3819	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
3820	:info:build ;
3821	:info:build ; note: unable to
3822	:info:build ; optimize
3823	:info:build ; due to type uncertainty:
3824	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
3825	:info:build ;
3826	:info:build ; note: unable to
3827	:info:build ; optimize
3828	:info:build ; due to type uncertainty:
3829	:info:build ; The first argument is a REAL, not a INTEGER.
3830	:info:build ;
3831	:info:build ; note: unable to
3832	:info:build ; convert division by 2^k to shift
3833	:info:build ; due to type uncertainty:
3834	:info:build ; The first argument is a REAL, not a INTEGER.
3835	:info:build ;
3836	:info:build ; note: unable to
3837	:info:build ; fold division by 1
3838	:info:build ; due to type uncertainty:
3839	:info:build ; The first argument is a REAL, not a INTEGER.
3840	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
3841	:info:build ; --> CHAR
3842	:info:build ; ==>
3843	:info:build ; 1
3844	:info:build ;
3845	:info:build ; note: unable to
3846	:info:build ; optimize
3847	:info:build ; because:
3848	:info:build ; Upgraded element type of array is not known at compile time.
3849	:info:build ; --> AREF
3850	:info:build ; ==>
3851	:info:build ; 1
3852	:info:build ;
3853	:info:build ; note: unable to
3854	:info:build ; optimize
3855	:info:build ; because:
3856	:info:build ; Upgraded element type of array is not known at compile time.
3857	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-16-BE-FORMAT
3858	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-16-BE-FORMAT
3859	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-BE-FORMAT)
3860	:info:build ; (FLET ((FLEXI-STREAMS::WRITE-WORD (FLEXI-STREAMS::WORD)
3861	:info:build ; (FLEXI-STREAMS::OCTET-WRITER #)
3862	:info:build ; (FLEXI-STREAMS::OCTET-WRITER #)))
3863	:info:build ; (DECLARE (INLINE FLEXI-STREAMS::WRITE-WORD))
3864	:info:build ; (LET ((CHAR-CODE #))
3865	:info:build ; (DECLARE (TYPE FLEXI-STREAMS::CHAR-CODE-INTEGER CHAR-CODE))
3866	:info:build ; (COND (# #) (T # # #)))))
3867	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3868	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3869	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3870	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3871	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3872	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3873	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
3874	:info:build ; ==>
3875	:info:build ; 1
3876	:info:build ;
3877	:info:build ; note: unable to
3878	:info:build ; expand inline
3879	:info:build ; due to type uncertainty:
3880	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
3881	:info:build ;
3882	:info:build ; note: unable to
3883	:info:build ; expand inline
3884	:info:build ; due to type uncertainty:
3885	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
3886	:info:build ;
3887	:info:build ; note: unable to
3888	:info:build ; optimize
3889	:info:build ; due to type uncertainty:
3890	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
3891	:info:build ;
3892	:info:build ; note: unable to
3893	:info:build ; optimize
3894	:info:build ; due to type uncertainty:
3895	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
3896	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3897	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3898	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3899	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3900	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3901	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
3902	:info:build ; ==>
3903	:info:build ; 1
3904	:info:build ;
3905	:info:build ; note: forced to do GENERIC-* (cost 50)
3906	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
3907	:info:build ; The first argument is a T, not a FIXNUM.
3908	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
3909	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
3910	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
3911	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
3912	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
3913	:info:build ; 32).
3914	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
3915	:info:build ; (UNSIGNED-BYTE 32)
3916	:info:build ; &OPTIONAL).
3917	:info:build ; etc.
3918	:info:build ;
3919	:info:build ; note: forced to do GENERIC-< (cost 10)
3920	:info:build ; unable to do inline fixnum comparison (cost 4) because:
3921	:info:build ; The first argument is a INTEGER, not a FIXNUM.
3922	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
3923	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
3924	:info:build ; etc.
3925	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3926	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3927	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3928	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3929	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3930	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3931	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
3932	:info:build ; ==>
3933	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
3934	:info:build ;
3935	:info:build ; note: forced to do GENERIC-+ (cost 10)
3936	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
3937	:info:build ; The first argument is a T, not a FIXNUM.
3938	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
3939	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
3940	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
3941	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
3942	:info:build ; 32).
3943	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
3944	:info:build ; (UNSIGNED-BYTE 32)
3945	:info:build ; &OPTIONAL).
3946	:info:build ; etc.
3947	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3948	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3949	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3950	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3951	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3952	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
3953	:info:build ; ==>
3954	:info:build ; 1
3955	:info:build ;
3956	:info:build ; note: doing signed word to integer coercion (cost 20), for:
3957	:info:build ; the second argument of GENERIC-*
3958	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3959	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3960	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3961	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3962	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3963	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
3964	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET CHAR-CODE LET
3965	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
3966	:info:build ; ==>
3967	:info:build ; 1
3968	:info:build ;
3969	:info:build ; note: unable to
3970	:info:build ; optimize
3971	:info:build ; because:
3972	:info:build ; Upgraded element type of array is not known at compile time.
3973	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3974	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3975	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3976	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3977	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3978	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
3979	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
3980	:info:build ; ==>
3981	:info:build ; 1
3982	:info:build ;
3983	:info:build ; note: unable to
3984	:info:build ; optimize
3985	:info:build ; because:
3986	:info:build ; Upgraded element type of array is not known at compile time.
3987	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
3988	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
3989	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
3990	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
3991	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
3992	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
3993	:info:build ; ==>
3994	:info:build ; 1
3995	:info:build ;
3996	:info:build ; note: unable to
3997	:info:build ; optimize
3998	:info:build ; due to type uncertainty:
3999	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
4000	:info:build ;
4001	:info:build ; note: unable to
4002	:info:build ; optimize
4003	:info:build ; due to type uncertainty:
4004	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
4005	:info:build ;
4006	:info:build ; note: unable to
4007	:info:build ; optimize
4008	:info:build ; due to type uncertainty:
4009	:info:build ; The first argument is a REAL, not a INTEGER.
4010	:info:build ;
4011	:info:build ; note: unable to
4012	:info:build ; convert division by 2^k to shift
4013	:info:build ; due to type uncertainty:
4014	:info:build ; The first argument is a REAL, not a INTEGER.
4015	:info:build ;
4016	:info:build ; note: unable to
4017	:info:build ; fold division by 1
4018	:info:build ; due to type uncertainty:
4019	:info:build ; The first argument is a REAL, not a INTEGER.
4020	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4021	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4022	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4023	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4024	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4025	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
4026	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
4027	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET CHAR-CODE
4028	:info:build ; --> LET FLEXI-STREAMS::CHAR-GETTER CHAR
4029	:info:build ; ==>
4030	:info:build ; 1
4031	:info:build ;
4032	:info:build ; note: unable to
4033	:info:build ; optimize
4034	:info:build ; because:
4035	:info:build ; Upgraded element type of array is not known at compile time.
4036	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4037	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4038	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4039	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4040	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4041	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
4042	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
4043	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET CHAR-CODE
4044	:info:build ; --> LET FLEXI-STREAMS::CHAR-GETTER AREF
4045	:info:build ; ==>
4046	:info:build ; 1
4047	:info:build ;
4048	:info:build ; note: unable to
4049	:info:build ; optimize
4050	:info:build ; because:
4051	:info:build ; Upgraded element type of array is not known at compile time.
4052	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4053	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4054	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4055	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4056	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4057	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
4058	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
4059	:info:build ; ==>
4060	:info:build ; 1
4061	:info:build ;
4062	:info:build ; note: unable to
4063	:info:build ; expand inline
4064	:info:build ; due to type uncertainty:
4065	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
4066	:info:build ;
4067	:info:build ; note: unable to
4068	:info:build ; expand inline
4069	:info:build ; due to type uncertainty:
4070	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
4071	:info:build ;
4072	:info:build ; note: unable to
4073	:info:build ; optimize
4074	:info:build ; due to type uncertainty:
4075	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
4076	:info:build ;
4077	:info:build ; note: unable to
4078	:info:build ; optimize
4079	:info:build ; due to type uncertainty:
4080	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
4081	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4082	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4083	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4084	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4085	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4086	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
4087	:info:build ; ==>
4088	:info:build ; 1
4089	:info:build ;
4090	:info:build ; note: forced to do GENERIC-* (cost 50)
4091	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4092	:info:build ; The first argument is a T, not a FIXNUM.
4093	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
4094	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
4095	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
4096	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
4097	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
4098	:info:build ; 32).
4099	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
4100	:info:build ; (UNSIGNED-BYTE 32)
4101	:info:build ; &OPTIONAL).
4102	:info:build ; etc.
4103	:info:build ;
4104	:info:build ; note: forced to do GENERIC-< (cost 10)
4105	:info:build ; unable to do inline fixnum comparison (cost 4) because:
4106	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4107	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
4108	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
4109	:info:build ; etc.
4110	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4111	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4112	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4113	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4114	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4115	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
4116	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
4117	:info:build ; ==>
4118	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
4119	:info:build ;
4120	:info:build ; note: forced to do GENERIC-+ (cost 10)
4121	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4122	:info:build ; The first argument is a T, not a FIXNUM.
4123	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
4124	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
4125	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
4126	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
4127	:info:build ; 32).
4128	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
4129	:info:build ; (UNSIGNED-BYTE 32)
4130	:info:build ; &OPTIONAL).
4131	:info:build ; etc.
4132	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4133	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4134	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4135	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4136	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4137	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
4138	:info:build ; ==>
4139	:info:build ; 1
4140	:info:build ;
4141	:info:build ; note: doing signed word to integer coercion (cost 20), for:
4142	:info:build ; the second argument of GENERIC-*
4143	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4144	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4145	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4146	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4147	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4148	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
4149	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
4150	:info:build ; ==>
4151	:info:build ; 1
4152	:info:build ;
4153	:info:build ; note: unable to
4154	:info:build ; optimize
4155	:info:build ; because:
4156	:info:build ; Upgraded element type of array is not known at compile time.
4157	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4158	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4159	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4160	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4161	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4162	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
4163	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
4164	:info:build ; ==>
4165	:info:build ; 1
4166	:info:build ;
4167	:info:build ; note: unable to
4168	:info:build ; optimize
4169	:info:build ; because:
4170	:info:build ; Upgraded element type of array is not known at compile time.
4171	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4172	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4173	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4174	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4175	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4176	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
4177	:info:build ; ==>
4178	:info:build ; 1
4179	:info:build ;
4180	:info:build ; note: unable to
4181	:info:build ; optimize
4182	:info:build ; due to type uncertainty:
4183	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
4184	:info:build ;
4185	:info:build ; note: unable to
4186	:info:build ; optimize
4187	:info:build ; due to type uncertainty:
4188	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
4189	:info:build ;
4190	:info:build ; note: unable to
4191	:info:build ; optimize
4192	:info:build ; due to type uncertainty:
4193	:info:build ; The first argument is a REAL, not a INTEGER.
4194	:info:build ;
4195	:info:build ; note: unable to
4196	:info:build ; convert division by 2^k to shift
4197	:info:build ; due to type uncertainty:
4198	:info:build ; The first argument is a REAL, not a INTEGER.
4199	:info:build ;
4200	:info:build ; note: unable to
4201	:info:build ; fold division by 1
4202	:info:build ; due to type uncertainty:
4203	:info:build ; The first argument is a REAL, not a INTEGER.
4204	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4205	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4206	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4207	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4208	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4209	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
4210	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
4211	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
4212	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
4213	:info:build ; ==>
4214	:info:build ; 1
4215	:info:build ;
4216	:info:build ; note: unable to
4217	:info:build ; optimize
4218	:info:build ; because:
4219	:info:build ; Upgraded element type of array is not known at compile time.
4220	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4221	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4222	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4223	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4224	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4225	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
4226	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
4227	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
4228	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER AREF
4229	:info:build ; ==>
4230	:info:build ; 1
4231	:info:build ;
4232	:info:build ; note: unable to
4233	:info:build ; optimize
4234	:info:build ; because:
4235	:info:build ; Upgraded element type of array is not known at compile time.
4236	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4237	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4238	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4239	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4240	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4241	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
4242	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
4243	:info:build ; ==>
4244	:info:build ; 1
4245	:info:build ;
4246	:info:build ; note: unable to
4247	:info:build ; expand inline
4248	:info:build ; due to type uncertainty:
4249	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
4250	:info:build ;
4251	:info:build ; note: unable to
4252	:info:build ; expand inline
4253	:info:build ; due to type uncertainty:
4254	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
4255	:info:build ;
4256	:info:build ; note: unable to
4257	:info:build ; optimize
4258	:info:build ; due to type uncertainty:
4259	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
4260	:info:build ;
4261	:info:build ; note: unable to
4262	:info:build ; optimize
4263	:info:build ; due to type uncertainty:
4264	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
4265	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4266	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4267	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4268	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4269	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4270	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
4271	:info:build ; ==>
4272	:info:build ; 1
4273	:info:build ;
4274	:info:build ; note: forced to do GENERIC-* (cost 50)
4275	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4276	:info:build ; The first argument is a T, not a FIXNUM.
4277	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
4278	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
4279	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
4280	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
4281	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
4282	:info:build ; 32).
4283	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
4284	:info:build ; (UNSIGNED-BYTE 32)
4285	:info:build ; &OPTIONAL).
4286	:info:build ; etc.
4287	:info:build ;
4288	:info:build ; note: forced to do GENERIC-< (cost 10)
4289	:info:build ; unable to do inline fixnum comparison (cost 4) because:
4290	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4291	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
4292	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
4293	:info:build ; etc.
4294	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4295	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4296	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4297	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4298	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4299	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
4300	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
4301	:info:build ; ==>
4302	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
4303	:info:build ;
4304	:info:build ; note: forced to do GENERIC-+ (cost 10)
4305	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4306	:info:build ; The first argument is a T, not a FIXNUM.
4307	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
4308	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
4309	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
4310	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
4311	:info:build ; 32).
4312	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
4313	:info:build ; (UNSIGNED-BYTE 32)
4314	:info:build ; &OPTIONAL).
4315	:info:build ; etc.
4316	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4317	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4318	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4319	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4320	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4321	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
4322	:info:build ; ==>
4323	:info:build ; 1
4324	:info:build ;
4325	:info:build ; note: doing signed word to integer coercion (cost 20), for:
4326	:info:build ; the second argument of GENERIC-*
4327	:info:build ; in:
4328	:info:build ; DEFINE-CHAR-ENCODERS (FLEXI-GBK-FORMAT FLEXI-CR-GBK-FORMAT
4329	:info:build ; FLEXI-CRLF-GBK-FORMAT)
4330	:info:build ; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
4331	:info:build ;
4332	:info:build ; note: forced to do full call
4333	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4334	:info:build ; The first argument is a (NOT NULL), not a FIXNUM.
4335	:info:build ; unable to do inline (unsigned-byte 32) logical op (cost 2) because:
4336	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
4337	:info:build ; etc.
4338	:info:build ; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
4339	:info:build ;
4340	:info:build ; note: forced to do full call
4341	:info:build ; unable to do inline fixnum logical op (cost 1) because:
4342	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4343	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4344	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4345	:info:build ; etc.
4346	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
4347	:info:build ; --> CHAR
4348	:info:build ; ==>
4349	:info:build ; 1
4350	:info:build ;
4351	:info:build ; note: unable to
4352	:info:build ; optimize
4353	:info:build ; because:
4354	:info:build ; Upgraded element type of array is not known at compile time.
4355	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
4356	:info:build ; "~S (code ~A) is not in this encoding."
4357	:info:build ; FLEXI-STREAMS::CHAR-GETTER
4358	:info:build ; FLEXI-STREAMS:OCTET)
4359	:info:build ; --> CHAR
4360	:info:build ; ==>
4361	:info:build ; 1
4362	:info:build ;
4363	:info:build ; note: unable to
4364	:info:build ; optimize
4365	:info:build ; because:
4366	:info:build ; Upgraded element type of array is not known at compile time.
4367	:info:build ; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
4368	:info:build ; ==>
4369	:info:build ; (LOGAND 65280 FLEXI-STREAMS::WORD)
4370	:info:build ;
4371	:info:build ; note: forced to do full call
4372	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4373	:info:build ; The first argument is a (NOT NULL), not a FIXNUM.
4374	:info:build ; unable to do inline (unsigned-byte 32) logical op (cost 2) because:
4375	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
4376	:info:build ; etc.
4377	:info:build ; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
4378	:info:build ; ==>
4379	:info:build ; (LOGAND 255 FLEXI-STREAMS::WORD)
4380	:info:build ;
4381	:info:build ; note: forced to do full call
4382	:info:build ; unable to do inline fixnum logical op (cost 1) because:
4383	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4384	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4385	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4386	:info:build ; etc.
4387	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
4388	:info:build ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
4389	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
4390	:info:build ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
4391	:info:build ; (IF (<= FLEXI-STREAMS:OCTET 127)
4392	:info:build ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
4393	:info:build ; (FLET (#)
4394	:info:build ; (DECLARE #)
4395	:info:build ; (DECLARE #)
4396	:info:build ; (COND # # #)))))
4397	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4398	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4399	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4400	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4401	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4402	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
4403	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
4404	:info:build ; ==>
4405	:info:build ; 1
4406	:info:build ;
4407	:info:build ; note: unable to
4408	:info:build ; optimize
4409	:info:build ; because:
4410	:info:build ; Upgraded element type of array is not known at compile time.
4411	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4412	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4413	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4414	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4415	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4416	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
4417	:info:build ; ==>
4418	:info:build ; 1
4419	:info:build ;
4420	:info:build ; note: unable to
4421	:info:build ; optimize
4422	:info:build ; due to type uncertainty:
4423	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
4424	:info:build ;
4425	:info:build ; note: unable to
4426	:info:build ; optimize
4427	:info:build ; due to type uncertainty:
4428	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
4429	:info:build ;
4430	:info:build ; note: unable to
4431	:info:build ; optimize
4432	:info:build ; due to type uncertainty:
4433	:info:build ; The first argument is a REAL, not a INTEGER.
4434	:info:build ;
4435	:info:build ; note: unable to
4436	:info:build ; convert division by 2^k to shift
4437	:info:build ; due to type uncertainty:
4438	:info:build ; The first argument is a REAL, not a INTEGER.
4439	:info:build ;
4440	:info:build ; note: unable to
4441	:info:build ; fold division by 1
4442	:info:build ; due to type uncertainty:
4443	:info:build ; The first argument is a REAL, not a INTEGER.
4444	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
4445	:info:build ; --> CHAR
4446	:info:build ; ==>
4447	:info:build ; 1
4448	:info:build ;
4449	:info:build ; note: unable to
4450	:info:build ; optimize
4451	:info:build ; because:
4452	:info:build ; Upgraded element type of array is not known at compile time.
4453	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
4454	:info:build ; "~S (code ~A) is not in this encoding."
4455	:info:build ; FLEXI-STREAMS::CHAR-GETTER
4456	:info:build ; FLEXI-STREAMS:OCTET)
4457	:info:build ; --> CHAR
4458	:info:build ; ==>
4459	:info:build ; 1
4460	:info:build ;
4461	:info:build ; note: unable to
4462	:info:build ; optimize
4463	:info:build ; because:
4464	:info:build ; Upgraded element type of array is not known at compile time.
4465	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
4466	:info:build ; --> AREF
4467	:info:build ; ==>
4468	:info:build ; 1
4469	:info:build ;
4470	:info:build ; note: unable to
4471	:info:build ; optimize
4472	:info:build ; because:
4473	:info:build ; Upgraded element type of array is not known at compile time.
4474	:info:build ; (FLEXI-STREAMS::SIGNAL-ENCODING-ERROR FORMAT
4475	:info:build ; "~S (code ~A) is not in this encoding."
4476	:info:build ; FLEXI-STREAMS::CHAR-GETTER
4477	:info:build ; FLEXI-STREAMS:OCTET)
4478	:info:build ; --> AREF
4479	:info:build ; ==>
4480	:info:build ; 1
4481	:info:build ;
4482	:info:build ; note: unable to
4483	:info:build ; optimize
4484	:info:build ; because:
4485	:info:build ; Upgraded element type of array is not known at compile time.
4486	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
4487	:info:build ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
4488	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
4489	:info:build ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
4490	:info:build ; (IF (<= FLEXI-STREAMS:OCTET 127)
4491	:info:build ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
4492	:info:build ; (FLET (#)
4493	:info:build ; (DECLARE #)
4494	:info:build ; (DECLARE #)
4495	:info:build ; (COND # # #)))))
4496	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4497	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4498	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4499	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4500	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4501	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
4502	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
4503	:info:build ; ==>
4504	:info:build ; 1
4505	:info:build ;
4506	:info:build ; note: unable to
4507	:info:build ; expand inline
4508	:info:build ; due to type uncertainty:
4509	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
4510	:info:build ;
4511	:info:build ; note: unable to
4512	:info:build ; expand inline
4513	:info:build ; due to type uncertainty:
4514	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
4515	:info:build ;
4516	:info:build ; note: unable to
4517	:info:build ; optimize
4518	:info:build ; due to type uncertainty:
4519	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
4520	:info:build ;
4521	:info:build ; note: unable to
4522	:info:build ; optimize
4523	:info:build ; due to type uncertainty:
4524	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
4525	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4526	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4527	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4528	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4529	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4530	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
4531	:info:build ; ==>
4532	:info:build ; 1
4533	:info:build ;
4534	:info:build ; note: forced to do GENERIC-* (cost 50)
4535	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4536	:info:build ; The first argument is a T, not a FIXNUM.
4537	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
4538	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
4539	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
4540	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
4541	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
4542	:info:build ; 32).
4543	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
4544	:info:build ; (UNSIGNED-BYTE 32)
4545	:info:build ; &OPTIONAL).
4546	:info:build ; etc.
4547	:info:build ;
4548	:info:build ; note: forced to do GENERIC-< (cost 10)
4549	:info:build ; unable to do inline fixnum comparison (cost 4) because:
4550	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4551	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
4552	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
4553	:info:build ; etc.
4554	:info:build ; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
4555	:info:build ; ==>
4556	:info:build ; (LOGAND 65280 FLEXI-STREAMS::WORD)
4557	:info:build ;
4558	:info:build ; note: forced to do full call
4559	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4560	:info:build ; The first argument is a (NOT NULL), not a FIXNUM.
4561	:info:build ; unable to do inline (unsigned-byte 32) logical op (cost 2) because:
4562	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
4563	:info:build ; etc.
4564	:info:build ; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
4565	:info:build ; ==>
4566	:info:build ; (LOGAND 255 FLEXI-STREAMS::WORD)
4567	:info:build ;
4568	:info:build ; note: forced to do full call
4569	:info:build ; unable to do inline fixnum logical op (cost 1) because:
4570	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4571	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4572	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4573	:info:build ; etc.
4574	:info:build ; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
4575	:info:build ; ==>
4576	:info:build ; (LOGAND 65280 FLEXI-STREAMS::WORD)
4577	:info:build ;
4578	:info:build ; note: forced to do full call
4579	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4580	:info:build ; The first argument is a (NOT NULL), not a FIXNUM.
4581	:info:build ; unable to do inline (unsigned-byte 32) logical op (cost 2) because:
4582	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
4583	:info:build ; etc.
4584	:info:build ; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
4585	:info:build ; ==>
4586	:info:build ; (LOGAND 255 FLEXI-STREAMS::WORD)
4587	:info:build ;
4588	:info:build ; note: forced to do full call
4589	:info:build ; unable to do inline fixnum logical op (cost 1) because:
4590	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4591	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4592	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4593	:info:build ; etc.
4594	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
4595	:info:build ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
4596	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
4597	:info:build ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
4598	:info:build ; (IF (<= FLEXI-STREAMS:OCTET 127)
4599	:info:build ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
4600	:info:build ; (FLET (#)
4601	:info:build ; (DECLARE #)
4602	:info:build ; (DECLARE #)
4603	:info:build ; (COND # # #)))))
4604	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4605	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4606	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4607	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4608	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4609	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
4610	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
4611	:info:build ; ==>
4612	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
4613	:info:build ;
4614	:info:build ; note: forced to do GENERIC-+ (cost 10)
4615	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4616	:info:build ; The first argument is a T, not a FIXNUM.
4617	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
4618	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
4619	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
4620	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
4621	:info:build ; 32).
4622	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
4623	:info:build ; (UNSIGNED-BYTE 32)
4624	:info:build ; &OPTIONAL).
4625	:info:build ; etc.
4626	:info:build ; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
4627	:info:build ; ==>
4628	:info:build ; (LOGAND 65280 FLEXI-STREAMS::WORD)
4629	:info:build ;
4630	:info:build ; note: forced to do full call
4631	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4632	:info:build ; The first argument is a (NOT NULL), not a FIXNUM.
4633	:info:build ; unable to do inline (unsigned-byte 32) logical op (cost 2) because:
4634	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
4635	:info:build ; etc.
4636	:info:build ; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
4637	:info:build ; ==>
4638	:info:build ; (LOGAND 255 FLEXI-STREAMS::WORD)
4639	:info:build ;
4640	:info:build ; note: forced to do full call
4641	:info:build ; unable to do inline fixnum logical op (cost 1) because:
4642	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4643	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4644	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4645	:info:build ; etc.
4646	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
4647	:info:build ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
4648	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
4649	:info:build ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
4650	:info:build ; (IF (<= FLEXI-STREAMS:OCTET 127)
4651	:info:build ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
4652	:info:build ; (FLET (#)
4653	:info:build ; (DECLARE #)
4654	:info:build ; (DECLARE #)
4655	:info:build ; (COND # # #)))))
4656	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4657	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4658	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4659	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4660	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4661	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
4662	:info:build ; ==>
4663	:info:build ; 1
4664	:info:build ;
4665	:info:build ; note: doing signed word to integer coercion (cost 20), for:
4666	:info:build ; the second argument of GENERIC-*
4667	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4668	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4669	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4670	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4671	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4672	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
4673	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY LET CHAR-CODE LET
4674	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
4675	:info:build ; ==>
4676	:info:build ; 1
4677	:info:build ;
4678	:info:build ; note: unable to
4679	:info:build ; optimize
4680	:info:build ; because:
4681	:info:build ; Upgraded element type of array is not known at compile time.
4682	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4683	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4684	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4685	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4686	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4687	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
4688	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY LET IF FLET COND IF IF THE LET IF
4689	:info:build ; --> FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET FLEXI-STREAMS::CHAR-GETTER CHAR
4690	:info:build ; ==>
4691	:info:build ; 1
4692	:info:build ;
4693	:info:build ; note: unable to
4694	:info:build ; optimize
4695	:info:build ; because:
4696	:info:build ; Upgraded element type of array is not known at compile time.
4697	:info:build ; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
4698	:info:build ; ==>
4699	:info:build ; (LOGAND 65280 FLEXI-STREAMS::WORD)
4700	:info:build ;
4701	:info:build ; note: forced to do full call
4702	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4703	:info:build ; The first argument is a (NOT NULL), not a FIXNUM.
4704	:info:build ; unable to do inline (unsigned-byte 32) logical op (cost 2) because:
4705	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
4706	:info:build ; etc.
4707	:info:build ; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
4708	:info:build ; ==>
4709	:info:build ; (LOGAND 255 FLEXI-STREAMS::WORD)
4710	:info:build ;
4711	:info:build ; note: forced to do full call
4712	:info:build ; unable to do inline fixnum logical op (cost 1) because:
4713	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4714	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4715	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4716	:info:build ; etc.
4717	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
4718	:info:build ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
4719	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
4720	:info:build ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
4721	:info:build ; (IF (<= FLEXI-STREAMS:OCTET 127)
4722	:info:build ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
4723	:info:build ; (FLET (#)
4724	:info:build ; (DECLARE #)
4725	:info:build ; (DECLARE #)
4726	:info:build ; (COND # # #)))))
4727	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4728	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4729	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4730	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4731	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4732	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
4733	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
4734	:info:build ; ==>
4735	:info:build ; 1
4736	:info:build ;
4737	:info:build ; note: unable to
4738	:info:build ; optimize
4739	:info:build ; because:
4740	:info:build ; Upgraded element type of array is not known at compile time.
4741	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4742	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4743	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4744	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4745	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4746	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
4747	:info:build ; ==>
4748	:info:build ; 1
4749	:info:build ;
4750	:info:build ; note: unable to
4751	:info:build ; optimize
4752	:info:build ; due to type uncertainty:
4753	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
4754	:info:build ;
4755	:info:build ; note: unable to
4756	:info:build ; optimize
4757	:info:build ; due to type uncertainty:
4758	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
4759	:info:build ;
4760	:info:build ; note: unable to
4761	:info:build ; optimize
4762	:info:build ; due to type uncertainty:
4763	:info:build ; The first argument is a REAL, not a INTEGER.
4764	:info:build ;
4765	:info:build ; note: unable to
4766	:info:build ; convert division by 2^k to shift
4767	:info:build ; due to type uncertainty:
4768	:info:build ; The first argument is a REAL, not a INTEGER.
4769	:info:build ;
4770	:info:build ; note: unable to
4771	:info:build ; fold division by 1
4772	:info:build ; due to type uncertainty:
4773	:info:build ; The first argument is a REAL, not a INTEGER.
4774	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4775	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4776	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4777	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4778	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4779	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
4780	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
4781	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET CHAR-CODE LET
4782	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
4783	:info:build ; ==>
4784	:info:build ; 1
4785	:info:build ;
4786	:info:build ; note: unable to
4787	:info:build ; optimize
4788	:info:build ; because:
4789	:info:build ; Upgraded element type of array is not known at compile time.
4790	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4791	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4792	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4793	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4794	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4795	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
4796	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
4797	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET IF FLET COND IF
4798	:info:build ; --> IF THE LET IF FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET
4799	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
4800	:info:build ; ==>
4801	:info:build ; 1
4802	:info:build ;
4803	:info:build ; note: unable to
4804	:info:build ; optimize
4805	:info:build ; because:
4806	:info:build ; Upgraded element type of array is not known at compile time.
4807	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4808	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4809	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4810	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4811	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4812	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
4813	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
4814	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET CHAR-CODE LET
4815	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER AREF
4816	:info:build ; ==>
4817	:info:build ; 1
4818	:info:build ;
4819	:info:build ; note: unable to
4820	:info:build ; optimize
4821	:info:build ; because:
4822	:info:build ; Upgraded element type of array is not known at compile time.
4823	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4824	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4825	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4826	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4827	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4828	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
4829	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
4830	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET IF FLET COND IF
4831	:info:build ; --> IF THE LET IF FLEXI-STREAMS::SIGNAL-ENCODING-ERROR LET
4832	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER AREF
4833	:info:build ; ==>
4834	:info:build ; 1
4835	:info:build ;
4836	:info:build ; note: unable to
4837	:info:build ; optimize
4838	:info:build ; because:
4839	:info:build ; Upgraded element type of array is not known at compile time.
4840	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4841	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4842	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4843	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4844	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4845	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
4846	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
4847	:info:build ; ==>
4848	:info:build ; 1
4849	:info:build ;
4850	:info:build ; note: unable to
4851	:info:build ; expand inline
4852	:info:build ; due to type uncertainty:
4853	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
4854	:info:build ;
4855	:info:build ; note: unable to
4856	:info:build ; expand inline
4857	:info:build ; due to type uncertainty:
4858	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
4859	:info:build ;
4860	:info:build ; note: unable to
4861	:info:build ; optimize
4862	:info:build ; due to type uncertainty:
4863	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
4864	:info:build ;
4865	:info:build ; note: unable to
4866	:info:build ; optimize
4867	:info:build ; due to type uncertainty:
4868	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
4869	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4870	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4871	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4872	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4873	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4874	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
4875	:info:build ; ==>
4876	:info:build ; 1
4877	:info:build ;
4878	:info:build ; note: forced to do GENERIC-* (cost 50)
4879	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4880	:info:build ; The first argument is a T, not a FIXNUM.
4881	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
4882	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
4883	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
4884	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
4885	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
4886	:info:build ; 32).
4887	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
4888	:info:build ; (UNSIGNED-BYTE 32)
4889	:info:build ; &OPTIONAL).
4890	:info:build ; etc.
4891	:info:build ;
4892	:info:build ; note: forced to do GENERIC-< (cost 10)
4893	:info:build ; unable to do inline fixnum comparison (cost 4) because:
4894	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4895	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
4896	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
4897	:info:build ; etc.
4898	:info:build ; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
4899	:info:build ; ==>
4900	:info:build ; (LOGAND 65280 FLEXI-STREAMS::WORD)
4901	:info:build ;
4902	:info:build ; note: forced to do full call
4903	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4904	:info:build ; The first argument is a (NOT NULL), not a FIXNUM.
4905	:info:build ; unable to do inline (unsigned-byte 32) logical op (cost 2) because:
4906	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
4907	:info:build ; etc.
4908	:info:build ; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
4909	:info:build ; ==>
4910	:info:build ; (LOGAND 255 FLEXI-STREAMS::WORD)
4911	:info:build ;
4912	:info:build ; note: forced to do full call
4913	:info:build ; unable to do inline fixnum logical op (cost 1) because:
4914	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4915	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4916	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4917	:info:build ; etc.
4918	:info:build ; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
4919	:info:build ; ==>
4920	:info:build ; (LOGAND 65280 FLEXI-STREAMS::WORD)
4921	:info:build ;
4922	:info:build ; note: forced to do full call
4923	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4924	:info:build ; The first argument is a (NOT NULL), not a FIXNUM.
4925	:info:build ; unable to do inline (unsigned-byte 32) logical op (cost 2) because:
4926	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
4927	:info:build ; etc.
4928	:info:build ; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
4929	:info:build ; ==>
4930	:info:build ; (LOGAND 255 FLEXI-STREAMS::WORD)
4931	:info:build ;
4932	:info:build ; note: forced to do full call
4933	:info:build ; unable to do inline fixnum logical op (cost 1) because:
4934	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4935	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4936	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4937	:info:build ; etc.
4938	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
4939	:info:build ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
4940	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
4941	:info:build ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
4942	:info:build ; (IF (<= FLEXI-STREAMS:OCTET 127)
4943	:info:build ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
4944	:info:build ; (FLET (#)
4945	:info:build ; (DECLARE #)
4946	:info:build ; (DECLARE #)
4947	:info:build ; (COND # # #)))))
4948	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
4949	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
4950	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
4951	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
4952	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
4953	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
4954	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
4955	:info:build ; ==>
4956	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
4957	:info:build ;
4958	:info:build ; note: forced to do GENERIC-+ (cost 10)
4959	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4960	:info:build ; The first argument is a T, not a FIXNUM.
4961	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
4962	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
4963	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
4964	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
4965	:info:build ; 32).
4966	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
4967	:info:build ; (UNSIGNED-BYTE 32)
4968	:info:build ; &OPTIONAL).
4969	:info:build ; etc.
4970	:info:build ; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
4971	:info:build ; ==>
4972	:info:build ; (LOGAND 65280 FLEXI-STREAMS::WORD)
4973	:info:build ;
4974	:info:build ; note: forced to do full call
4975	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4976	:info:build ; The first argument is a (NOT NULL), not a FIXNUM.
4977	:info:build ; unable to do inline (unsigned-byte 32) logical op (cost 2) because:
4978	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
4979	:info:build ; etc.
4980	:info:build ; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
4981	:info:build ; ==>
4982	:info:build ; (LOGAND 255 FLEXI-STREAMS::WORD)
4983	:info:build ;
4984	:info:build ; note: forced to do full call
4985	:info:build ; unable to do inline fixnum logical op (cost 1) because:
4986	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4987	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
4988	:info:build ; The first argument is a INTEGER, not a FIXNUM.
4989	:info:build ; etc.
4990	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
4991	:info:build ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
4992	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
4993	:info:build ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
4994	:info:build ; (IF (<= FLEXI-STREAMS:OCTET 127)
4995	:info:build ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
4996	:info:build ; (FLET (#)
4997	:info:build ; (DECLARE #)
4998	:info:build ; (DECLARE #)
4999	:info:build ; (COND # # #)))))
5000	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5001	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5002	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5003	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5004	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5005	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
5006	:info:build ; ==>
5007	:info:build ; 1
5008	:info:build ;
5009	:info:build ; note: doing signed word to integer coercion (cost 20), for:
5010	:info:build ; the second argument of GENERIC-*
5011	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5012	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5013	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5014	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5015	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5016	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
5017	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
5018	:info:build ; ==>
5019	:info:build ; 1
5020	:info:build ;
5021	:info:build ; note: unable to
5022	:info:build ; optimize
5023	:info:build ; because:
5024	:info:build ; Upgraded element type of array is not known at compile time.
5025	:info:build ; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
5026	:info:build ; ==>
5027	:info:build ; (LOGAND 65280 FLEXI-STREAMS::WORD)
5028	:info:build ;
5029	:info:build ; note: forced to do full call
5030	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
5031	:info:build ; The first argument is a (NOT NULL), not a FIXNUM.
5032	:info:build ; unable to do inline (unsigned-byte 32) logical op (cost 2) because:
5033	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
5034	:info:build ; etc.
5035	:info:build ; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
5036	:info:build ; ==>
5037	:info:build ; (LOGAND 255 FLEXI-STREAMS::WORD)
5038	:info:build ;
5039	:info:build ; note: forced to do full call
5040	:info:build ; unable to do inline fixnum logical op (cost 1) because:
5041	:info:build ; The first argument is a INTEGER, not a FIXNUM.
5042	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
5043	:info:build ; The first argument is a INTEGER, not a FIXNUM.
5044	:info:build ; etc.
5045	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
5046	:info:build ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
5047	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
5048	:info:build ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
5049	:info:build ; (IF (<= FLEXI-STREAMS:OCTET 127)
5050	:info:build ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
5051	:info:build ; (FLET (#)
5052	:info:build ; (DECLARE #)
5053	:info:build ; (DECLARE #)
5054	:info:build ; (COND # # #)))))
5055	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5056	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5057	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5058	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5059	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5060	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
5061	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY FLET
5062	:info:build ; ==>
5063	:info:build ; (#:WRITE-CHAR2 (#:CHAR1)
5064	:info:build ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE #:CHAR1)))
5065	:info:build ; (IF (<= FLEXI-STREAMS:OCTET 127)
5066	:info:build ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
5067	:info:build ; (FLET (#)
5068	:info:build ; (DECLARE #)
5069	:info:build ; (DECLARE #)
5070	:info:build ; (COND # # #)))))
5071	:info:build ;
5072	:info:build ; note: Return type not fixed values, so can't use known return convention:
5073	:info:build ; *
5074	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5075	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5076	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5077	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5078	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5079	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5080	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
5081	:info:build ; ==>
5082	:info:build ; 1
5083	:info:build ;
5084	:info:build ; note: unable to
5085	:info:build ; optimize
5086	:info:build ; because:
5087	:info:build ; Upgraded element type of array is not known at compile time.
5088	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5089	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5090	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5091	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5092	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5093	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
5094	:info:build ; ==>
5095	:info:build ; 1
5096	:info:build ;
5097	:info:build ; note: unable to
5098	:info:build ; optimize
5099	:info:build ; due to type uncertainty:
5100	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
5101	:info:build ;
5102	:info:build ; note: unable to
5103	:info:build ; optimize
5104	:info:build ; due to type uncertainty:
5105	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
5106	:info:build ;
5107	:info:build ; note: unable to
5108	:info:build ; optimize
5109	:info:build ; due to type uncertainty:
5110	:info:build ; The first argument is a REAL, not a INTEGER.
5111	:info:build ;
5112	:info:build ; note: unable to
5113	:info:build ; convert division by 2^k to shift
5114	:info:build ; due to type uncertainty:
5115	:info:build ; The first argument is a REAL, not a INTEGER.
5116	:info:build ;
5117	:info:build ; note: unable to
5118	:info:build ; fold division by 1
5119	:info:build ; due to type uncertainty:
5120	:info:build ; The first argument is a REAL, not a INTEGER.
5121	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5122	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5123	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5124	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5125	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5126	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5127	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
5128	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
5129	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
5130	:info:build ; ==>
5131	:info:build ; 1
5132	:info:build ;
5133	:info:build ; note: unable to
5134	:info:build ; optimize
5135	:info:build ; because:
5136	:info:build ; Upgraded element type of array is not known at compile time.
5137	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5138	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5139	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5140	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5141	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5142	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5143	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
5144	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
5145	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER AREF
5146	:info:build ; ==>
5147	:info:build ; 1
5148	:info:build ;
5149	:info:build ; note: unable to
5150	:info:build ; optimize
5151	:info:build ; because:
5152	:info:build ; Upgraded element type of array is not known at compile time.
5153	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5154	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5155	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5156	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5157	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5158	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5159	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
5160	:info:build ; ==>
5161	:info:build ; 1
5162	:info:build ;
5163	:info:build ; note: unable to
5164	:info:build ; expand inline
5165	:info:build ; due to type uncertainty:
5166	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
5167	:info:build ;
5168	:info:build ; note: unable to
5169	:info:build ; expand inline
5170	:info:build ; due to type uncertainty:
5171	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
5172	:info:build ;
5173	:info:build ; note: unable to
5174	:info:build ; optimize
5175	:info:build ; due to type uncertainty:
5176	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
5177	:info:build ;
5178	:info:build ; note: unable to
5179	:info:build ; optimize
5180	:info:build ; due to type uncertainty:
5181	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
5182	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5183	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5184	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5185	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5186	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5187	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
5188	:info:build ; ==>
5189	:info:build ; 1
5190	:info:build ;
5191	:info:build ; note: forced to do GENERIC-* (cost 50)
5192	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
5193	:info:build ; The first argument is a T, not a FIXNUM.
5194	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
5195	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
5196	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
5197	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
5198	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
5199	:info:build ; 32).
5200	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
5201	:info:build ; (UNSIGNED-BYTE 32)
5202	:info:build ; &OPTIONAL).
5203	:info:build ; etc.
5204	:info:build ;
5205	:info:build ; note: forced to do GENERIC-< (cost 10)
5206	:info:build ; unable to do inline fixnum comparison (cost 4) because:
5207	:info:build ; The first argument is a INTEGER, not a FIXNUM.
5208	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
5209	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
5210	:info:build ; etc.
5211	:info:build ; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
5212	:info:build ; ==>
5213	:info:build ; (LOGAND 65280 FLEXI-STREAMS::WORD)
5214	:info:build ;
5215	:info:build ; note: forced to do full call
5216	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
5217	:info:build ; The first argument is a (NOT NULL), not a FIXNUM.
5218	:info:build ; unable to do inline (unsigned-byte 32) logical op (cost 2) because:
5219	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
5220	:info:build ; etc.
5221	:info:build ; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
5222	:info:build ; ==>
5223	:info:build ; (LOGAND 255 FLEXI-STREAMS::WORD)
5224	:info:build ;
5225	:info:build ; note: forced to do full call
5226	:info:build ; unable to do inline fixnum logical op (cost 1) because:
5227	:info:build ; The first argument is a INTEGER, not a FIXNUM.
5228	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
5229	:info:build ; The first argument is a INTEGER, not a FIXNUM.
5230	:info:build ; etc.
5231	:info:build ; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
5232	:info:build ; ==>
5233	:info:build ; (LOGAND 65280 FLEXI-STREAMS::WORD)
5234	:info:build ;
5235	:info:build ; note: forced to do full call
5236	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
5237	:info:build ; The first argument is a (NOT NULL), not a FIXNUM.
5238	:info:build ; unable to do inline (unsigned-byte 32) logical op (cost 2) because:
5239	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
5240	:info:build ; etc.
5241	:info:build ; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
5242	:info:build ; ==>
5243	:info:build ; (LOGAND 255 FLEXI-STREAMS::WORD)
5244	:info:build ;
5245	:info:build ; note: forced to do full call
5246	:info:build ; unable to do inline fixnum logical op (cost 1) because:
5247	:info:build ; The first argument is a INTEGER, not a FIXNUM.
5248	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
5249	:info:build ; The first argument is a INTEGER, not a FIXNUM.
5250	:info:build ; etc.
5251	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
5252	:info:build ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
5253	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
5254	:info:build ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
5255	:info:build ; (IF (<= FLEXI-STREAMS:OCTET 127)
5256	:info:build ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
5257	:info:build ; (FLET (#)
5258	:info:build ; (DECLARE #)
5259	:info:build ; (DECLARE #)
5260	:info:build ; (COND # # #)))))
5261	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5262	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5263	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5264	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5265	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5266	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5267	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
5268	:info:build ; ==>
5269	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
5270	:info:build ;
5271	:info:build ; note: forced to do GENERIC-+ (cost 10)
5272	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
5273	:info:build ; The first argument is a T, not a FIXNUM.
5274	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
5275	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
5276	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
5277	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
5278	:info:build ; 32).
5279	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
5280	:info:build ; (UNSIGNED-BYTE 32)
5281	:info:build ; &OPTIONAL).
5282	:info:build ; etc.
5283	:info:build ; (FLEXI-STREAMS::LOGAND* 65280 FLEXI-STREAMS::WORD)
5284	:info:build ; ==>
5285	:info:build ; (LOGAND 65280 FLEXI-STREAMS::WORD)
5286	:info:build ;
5287	:info:build ; note: forced to do full call
5288	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
5289	:info:build ; The first argument is a (NOT NULL), not a FIXNUM.
5290	:info:build ; unable to do inline (unsigned-byte 32) logical op (cost 2) because:
5291	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
5292	:info:build ; etc.
5293	:info:build ; (FLEXI-STREAMS::LOGAND* 255 FLEXI-STREAMS::WORD)
5294	:info:build ; ==>
5295	:info:build ; (LOGAND 255 FLEXI-STREAMS::WORD)
5296	:info:build ;
5297	:info:build ; note: forced to do full call
5298	:info:build ; unable to do inline fixnum logical op (cost 1) because:
5299	:info:build ; The first argument is a INTEGER, not a FIXNUM.
5300	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
5301	:info:build ; The first argument is a INTEGER, not a FIXNUM.
5302	:info:build ; etc.
5303	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
5304	:info:build ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
5305	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
5306	:info:build ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
5307	:info:build ; (IF (<= FLEXI-STREAMS:OCTET 127)
5308	:info:build ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
5309	:info:build ; (FLET (#)
5310	:info:build ; (DECLARE #)
5311	:info:build ; (DECLARE #)
5312	:info:build ; (COND # # #)))))
5313	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5314	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5315	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5316	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5317	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5318	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5319	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OBJECT BLOCK ETYPECASE LET COND IF
5320	:info:build ; --> IF SYMBOL-MACROLET LOCALLY FLET
5321	:info:build ; ==>
5322	:info:build ; (#:WRITE-CHAR2 (#:CHAR1)
5323	:info:build ; (LET ((FLEXI-STREAMS:OCTET (CHAR-CODE #:CHAR1)))
5324	:info:build ; (IF (<= FLEXI-STREAMS:OCTET 127)
5325	:info:build ; (FLEXI-STREAMS::OCTET-WRITER FLEXI-STREAMS:OCTET)
5326	:info:build ; (FLET (#)
5327	:info:build ; (DECLARE #)
5328	:info:build ; (DECLARE #)
5329	:info:build ; (COND # # #)))))
5330	:info:build ;
5331	:info:build ; note: Return type not fixed values, so can't use known return convention:
5332	:info:build ; *
5333	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5334	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5335	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5336	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5337	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5338	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
5339	:info:build ; ==>
5340	:info:build ; 1
5341	:info:build ;
5342	:info:build ; note: doing signed word to integer coercion (cost 20), for:
5343	:info:build ; the second argument of GENERIC-*
5344	:info:build ; in:
5345	:info:build ; DEFINE-CHAR-ENCODERS (FLEXI-UTF-32-LE-FORMAT FLEXI-CR-UTF-32-LE-FORMAT
5346	:info:build ; FLEXI-CRLF-UTF-32-LE-FORMAT)
5347	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
5348	:info:build ; --> CHAR
5349	:info:build ; ==>
5350	:info:build ; 1
5351	:info:build ;
5352	:info:build ; note: unable to
5353	:info:build ; optimize
5354	:info:build ; because:
5355	:info:build ; Upgraded element type of array is not known at compile time.
5356	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
5357	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
5358	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
5359	:info:build ; (LET ((CHAR-CODE (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
5360	:info:build ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGAND* 255 CHAR-CODE))
5361	:info:build ; (FLEXI-STREAMS::OCTET-WRITER
5362	:info:build ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -8)))
5363	:info:build ; (FLEXI-STREAMS::OCTET-WRITER
5364	:info:build ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -16)))
5365	:info:build ; (FLEXI-STREAMS::OCTET-WRITER
5366	:info:build ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -24)))))
5367	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5368	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5369	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5370	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5371	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5372	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5373	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
5374	:info:build ; ==>
5375	:info:build ; 1
5376	:info:build ;
5377	:info:build ; note: unable to
5378	:info:build ; optimize
5379	:info:build ; because:
5380	:info:build ; Upgraded element type of array is not known at compile time.
5381	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5382	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5383	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5384	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5385	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5386	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
5387	:info:build ; ==>
5388	:info:build ; 1
5389	:info:build ;
5390	:info:build ; note: unable to
5391	:info:build ; optimize
5392	:info:build ; due to type uncertainty:
5393	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
5394	:info:build ;
5395	:info:build ; note: unable to
5396	:info:build ; optimize
5397	:info:build ; due to type uncertainty:
5398	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
5399	:info:build ;
5400	:info:build ; note: unable to
5401	:info:build ; optimize
5402	:info:build ; due to type uncertainty:
5403	:info:build ; The first argument is a REAL, not a INTEGER.
5404	:info:build ;
5405	:info:build ; note: unable to
5406	:info:build ; convert division by 2^k to shift
5407	:info:build ; due to type uncertainty:
5408	:info:build ; The first argument is a REAL, not a INTEGER.
5409	:info:build ;
5410	:info:build ; note: unable to
5411	:info:build ; fold division by 1
5412	:info:build ; due to type uncertainty:
5413	:info:build ; The first argument is a REAL, not a INTEGER.
5414	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
5415	:info:build ; --> CHAR
5416	:info:build ; ==>
5417	:info:build ; 1
5418	:info:build ;
5419	:info:build ; note: unable to
5420	:info:build ; optimize
5421	:info:build ; because:
5422	:info:build ; Upgraded element type of array is not known at compile time.
5423	:info:build ; --> AREF
5424	:info:build ; ==>
5425	:info:build ; 1
5426	:info:build ;
5427	:info:build ; note: unable to
5428	:info:build ; optimize
5429	:info:build ; because:
5430	:info:build ; Upgraded element type of array is not known at compile time.
5431	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
5432	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
5433	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
5434	:info:build ; (LET ((CHAR-CODE (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
5435	:info:build ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGAND* 255 CHAR-CODE))
5436	:info:build ; (FLEXI-STREAMS::OCTET-WRITER
5437	:info:build ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -8)))
5438	:info:build ; (FLEXI-STREAMS::OCTET-WRITER
5439	:info:build ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -16)))
5440	:info:build ; (FLEXI-STREAMS::OCTET-WRITER
5441	:info:build ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -24)))))
5442	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5443	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5444	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5445	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5446	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5447	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5448	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
5449	:info:build ; ==>
5450	:info:build ; 1
5451	:info:build ;
5452	:info:build ; note: unable to
5453	:info:build ; expand inline
5454	:info:build ; due to type uncertainty:
5455	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
5456	:info:build ;
5457	:info:build ; note: unable to
5458	:info:build ; expand inline
5459	:info:build ; due to type uncertainty:
5460	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
5461	:info:build ;
5462	:info:build ; note: unable to
5463	:info:build ; optimize
5464	:info:build ; due to type uncertainty:
5465	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
5466	:info:build ;
5467	:info:build ; note: unable to
5468	:info:build ; optimize
5469	:info:build ; due to type uncertainty:
5470	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
5471	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5472	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5473	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5474	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5475	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5476	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
5477	:info:build ; ==>
5478	:info:build ; 1
5479	:info:build ;
5480	:info:build ; note: forced to do GENERIC-* (cost 50)
5481	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
5482	:info:build ; The first argument is a T, not a FIXNUM.
5483	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
5484	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
5485	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
5486	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
5487	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
5488	:info:build ; 32).
5489	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
5490	:info:build ; (UNSIGNED-BYTE 32)
5491	:info:build ; &OPTIONAL).
5492	:info:build ; etc.
5493	:info:build ;
5494	:info:build ; note: forced to do GENERIC-< (cost 10)
5495	:info:build ; unable to do inline fixnum comparison (cost 4) because:
5496	:info:build ; The first argument is a INTEGER, not a FIXNUM.
5497	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
5498	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
5499	:info:build ; etc.
5500	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5501	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5502	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5503	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5504	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5505	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5506	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
5507	:info:build ; ==>
5508	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
5509	:info:build ;
5510	:info:build ; note: forced to do GENERIC-+ (cost 10)
5511	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
5512	:info:build ; The first argument is a T, not a FIXNUM.
5513	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
5514	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
5515	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
5516	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
5517	:info:build ; 32).
5518	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
5519	:info:build ; (UNSIGNED-BYTE 32)
5520	:info:build ; &OPTIONAL).
5521	:info:build ; etc.
5522	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5523	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5524	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5525	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5526	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5527	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
5528	:info:build ; ==>
5529	:info:build ; 1
5530	:info:build ;
5531	:info:build ; note: doing signed word to integer coercion (cost 20), for:
5532	:info:build ; the second argument of GENERIC-*
5533	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5534	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5535	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5536	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5537	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5538	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
5539	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY LET CHAR-CODE LET
5540	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
5541	:info:build ; ==>
5542	:info:build ; 1
5543	:info:build ;
5544	:info:build ; note: unable to
5545	:info:build ; optimize
5546	:info:build ; because:
5547	:info:build ; Upgraded element type of array is not known at compile time.
5548	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5549	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5550	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5551	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5552	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5553	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5554	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
5555	:info:build ; ==>
5556	:info:build ; 1
5557	:info:build ;
5558	:info:build ; note: unable to
5559	:info:build ; optimize
5560	:info:build ; because:
5561	:info:build ; Upgraded element type of array is not known at compile time.
5562	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5563	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5564	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5565	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5566	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5567	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
5568	:info:build ; ==>
5569	:info:build ; 1
5570	:info:build ;
5571	:info:build ; note: unable to
5572	:info:build ; optimize
5573	:info:build ; due to type uncertainty:
5574	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
5575	:info:build ;
5576	:info:build ; note: unable to
5577	:info:build ; optimize
5578	:info:build ; due to type uncertainty:
5579	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
5580	:info:build ;
5581	:info:build ; note: unable to
5582	:info:build ; optimize
5583	:info:build ; due to type uncertainty:
5584	:info:build ; The first argument is a REAL, not a INTEGER.
5585	:info:build ;
5586	:info:build ; note: unable to
5587	:info:build ; convert division by 2^k to shift
5588	:info:build ; due to type uncertainty:
5589	:info:build ; The first argument is a REAL, not a INTEGER.
5590	:info:build ;
5591	:info:build ; note: unable to
5592	:info:build ; fold division by 1
5593	:info:build ; due to type uncertainty:
5594	:info:build ; The first argument is a REAL, not a INTEGER.
5595	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5596	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5597	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5598	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5599	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5600	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5601	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
5602	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET CHAR-CODE LET
5603	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
5604	:info:build ; ==>
5605	:info:build ; 1
5606	:info:build ;
5607	:info:build ; note: unable to
5608	:info:build ; optimize
5609	:info:build ; because:
5610	:info:build ; Upgraded element type of array is not known at compile time.
5611	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5612	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5613	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5614	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5615	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5616	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5617	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
5618	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET CHAR-CODE LET
5619	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER AREF
5620	:info:build ; ==>
5621	:info:build ; 1
5622	:info:build ;
5623	:info:build ; note: unable to
5624	:info:build ; optimize
5625	:info:build ; because:
5626	:info:build ; Upgraded element type of array is not known at compile time.
5627	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5628	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5629	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5630	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5631	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5632	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5633	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
5634	:info:build ; ==>
5635	:info:build ; 1
5636	:info:build ;
5637	:info:build ; note: unable to
5638	:info:build ; expand inline
5639	:info:build ; due to type uncertainty:
5640	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
5641	:info:build ;
5642	:info:build ; note: unable to
5643	:info:build ; expand inline
5644	:info:build ; due to type uncertainty:
5645	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
5646	:info:build ;
5647	:info:build ; note: unable to
5648	:info:build ; optimize
5649	:info:build ; due to type uncertainty:
5650	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
5651	:info:build ;
5652	:info:build ; note: unable to
5653	:info:build ; optimize
5654	:info:build ; due to type uncertainty:
5655	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
5656	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5657	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5658	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5659	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5660	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5661	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
5662	:info:build ; ==>
5663	:info:build ; 1
5664	:info:build ;
5665	:info:build ; note: forced to do GENERIC-* (cost 50)
5666	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
5667	:info:build ; The first argument is a T, not a FIXNUM.
5668	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
5669	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
5670	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
5671	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
5672	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
5673	:info:build ; 32).
5674	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
5675	:info:build ; (UNSIGNED-BYTE 32)
5676	:info:build ; &OPTIONAL).
5677	:info:build ; etc.
5678	:info:build ;
5679	:info:build ; note: forced to do GENERIC-< (cost 10)
5680	:info:build ; unable to do inline fixnum comparison (cost 4) because:
5681	:info:build ; The first argument is a INTEGER, not a FIXNUM.
5682	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
5683	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
5684	:info:build ; etc.
5685	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5686	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5687	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5688	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5689	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5690	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5691	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
5692	:info:build ; ==>
5693	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
5694	:info:build ;
5695	:info:build ; note: forced to do GENERIC-+ (cost 10)
5696	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
5697	:info:build ; The first argument is a T, not a FIXNUM.
5698	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
5699	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
5700	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
5701	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
5702	:info:build ; 32).
5703	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
5704	:info:build ; (UNSIGNED-BYTE 32)
5705	:info:build ; &OPTIONAL).
5706	:info:build ; etc.
5707	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5708	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5709	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5710	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5711	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5712	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
5713	:info:build ; ==>
5714	:info:build ; 1
5715	:info:build ;
5716	:info:build ; note: doing signed word to integer coercion (cost 20), for:
5717	:info:build ; the second argument of GENERIC-*
5718	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5719	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5720	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5721	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5722	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5723	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
5724	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
5725	:info:build ; ==>
5726	:info:build ; 1
5727	:info:build ;
5728	:info:build ; note: unable to
5729	:info:build ; optimize
5730	:info:build ; because:
5731	:info:build ; Upgraded element type of array is not known at compile time.
5732	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5733	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5734	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5735	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5736	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5737	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5738	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
5739	:info:build ; ==>
5740	:info:build ; 1
5741	:info:build ;
5742	:info:build ; note: unable to
5743	:info:build ; optimize
5744	:info:build ; because:
5745	:info:build ; Upgraded element type of array is not known at compile time.
5746	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5747	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5748	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5749	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5750	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5751	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
5752	:info:build ; ==>
5753	:info:build ; 1
5754	:info:build ;
5755	:info:build ; note: unable to
5756	:info:build ; optimize
5757	:info:build ; due to type uncertainty:
5758	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
5759	:info:build ;
5760	:info:build ; note: unable to
5761	:info:build ; optimize
5762	:info:build ; due to type uncertainty:
5763	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
5764	:info:build ;
5765	:info:build ; note: unable to
5766	:info:build ; optimize
5767	:info:build ; due to type uncertainty:
5768	:info:build ; The first argument is a REAL, not a INTEGER.
5769	:info:build ;
5770	:info:build ; note: unable to
5771	:info:build ; convert division by 2^k to shift
5772	:info:build ; due to type uncertainty:
5773	:info:build ; The first argument is a REAL, not a INTEGER.
5774	:info:build ;
5775	:info:build ; note: unable to
5776	:info:build ; fold division by 1
5777	:info:build ; due to type uncertainty:
5778	:info:build ; The first argument is a REAL, not a INTEGER.
5779	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5780	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5781	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5782	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5783	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5784	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5785	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
5786	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
5787	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
5788	:info:build ; ==>
5789	:info:build ; 1
5790	:info:build ;
5791	:info:build ; note: unable to
5792	:info:build ; optimize
5793	:info:build ; because:
5794	:info:build ; Upgraded element type of array is not known at compile time.
5795	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5796	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5797	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5798	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5799	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5800	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5801	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
5802	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
5803	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER AREF
5804	:info:build ; ==>
5805	:info:build ; 1
5806	:info:build ;
5807	:info:build ; note: unable to
5808	:info:build ; optimize
5809	:info:build ; because:
5810	:info:build ; Upgraded element type of array is not known at compile time.
5811	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5812	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5813	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5814	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5815	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5816	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5817	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
5818	:info:build ; ==>
5819	:info:build ; 1
5820	:info:build ;
5821	:info:build ; note: unable to
5822	:info:build ; expand inline
5823	:info:build ; due to type uncertainty:
5824	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
5825	:info:build ;
5826	:info:build ; note: unable to
5827	:info:build ; expand inline
5828	:info:build ; due to type uncertainty:
5829	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
5830	:info:build ;
5831	:info:build ; note: unable to
5832	:info:build ; optimize
5833	:info:build ; due to type uncertainty:
5834	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
5835	:info:build ;
5836	:info:build ; note: unable to
5837	:info:build ; optimize
5838	:info:build ; due to type uncertainty:
5839	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
5840	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5841	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5842	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5843	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5844	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5845	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
5846	:info:build ; ==>
5847	:info:build ; 1
5848	:info:build ;
5849	:info:build ; note: forced to do GENERIC-* (cost 50)
5850	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
5851	:info:build ; The first argument is a T, not a FIXNUM.
5852	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
5853	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
5854	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
5855	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
5856	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
5857	:info:build ; 32).
5858	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
5859	:info:build ; (UNSIGNED-BYTE 32)
5860	:info:build ; &OPTIONAL).
5861	:info:build ; etc.
5862	:info:build ;
5863	:info:build ; note: forced to do GENERIC-< (cost 10)
5864	:info:build ; unable to do inline fixnum comparison (cost 4) because:
5865	:info:build ; The first argument is a INTEGER, not a FIXNUM.
5866	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
5867	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
5868	:info:build ; etc.
5869	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5870	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5871	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5872	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5873	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5874	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5875	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
5876	:info:build ; ==>
5877	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
5878	:info:build ;
5879	:info:build ; note: forced to do GENERIC-+ (cost 10)
5880	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
5881	:info:build ; The first argument is a T, not a FIXNUM.
5882	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
5883	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
5884	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
5885	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
5886	:info:build ; 32).
5887	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
5888	:info:build ; (UNSIGNED-BYTE 32)
5889	:info:build ; &OPTIONAL).
5890	:info:build ; etc.
5891	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5892	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5893	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5894	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5895	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5896	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
5897	:info:build ; ==>
5898	:info:build ; 1
5899	:info:build ;
5900	:info:build ; note: doing signed word to integer coercion (cost 20), for:
5901	:info:build ; the second argument of GENERIC-*
5902	:info:build ; in:
5903	:info:build ; DEFINE-CHAR-ENCODERS (FLEXI-UTF-32-BE-FORMAT FLEXI-CR-UTF-32-BE-FORMAT
5904	:info:build ; FLEXI-CRLF-UTF-32-BE-FORMAT)
5905	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
5906	:info:build ; --> CHAR
5907	:info:build ; ==>
5908	:info:build ; 1
5909	:info:build ;
5910	:info:build ; note: unable to
5911	:info:build ; optimize
5912	:info:build ; because:
5913	:info:build ; Upgraded element type of array is not known at compile time.
5914	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
5915	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
5916	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
5917	:info:build ; (LET ((CHAR-CODE (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
5918	:info:build ; (FLEXI-STREAMS::OCTET-WRITER
5919	:info:build ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -24)))
5920	:info:build ; (FLEXI-STREAMS::OCTET-WRITER
5921	:info:build ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -16)))
5922	:info:build ; (FLEXI-STREAMS::OCTET-WRITER
5923	:info:build ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -8)))
5924	:info:build ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGAND* 255 CHAR-CODE))))
5925	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5926	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5927	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5928	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5929	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5930	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
5931	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
5932	:info:build ; ==>
5933	:info:build ; 1
5934	:info:build ;
5935	:info:build ; note: unable to
5936	:info:build ; optimize
5937	:info:build ; because:
5938	:info:build ; Upgraded element type of array is not known at compile time.
5939	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
5940	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
5941	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
5942	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
5943	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
5944	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
5945	:info:build ; ==>
5946	:info:build ; 1
5947	:info:build ;
5948	:info:build ; note: unable to
5949	:info:build ; optimize
5950	:info:build ; due to type uncertainty:
5951	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
5952	:info:build ;
5953	:info:build ; note: unable to
5954	:info:build ; optimize
5955	:info:build ; due to type uncertainty:
5956	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
5957	:info:build ;
5958	:info:build ; note: unable to
5959	:info:build ; optimize
5960	:info:build ; due to type uncertainty:
5961	:info:build ; The first argument is a REAL, not a INTEGER.
5962	:info:build ;
5963	:info:build ; note: unable to
5964	:info:build ; convert division by 2^k to shift
5965	:info:build ; due to type uncertainty:
5966	:info:build ; The first argument is a REAL, not a INTEGER.
5967	:info:build ;
5968	:info:build ; note: unable to
5969	:info:build ; fold division by 1
5970	:info:build ; due to type uncertainty:
5971	:info:build ; The first argument is a REAL, not a INTEGER.
5972	:info:build ; (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)
5973	:info:build ; --> CHAR
5974	:info:build ; ==>
5975	:info:build ; 1
5976	:info:build ;
5977	:info:build ; note: unable to
5978	:info:build ; optimize
5979	:info:build ; because:
5980	:info:build ; Upgraded element type of array is not known at compile time.
5981	:info:build ; --> AREF
5982	:info:build ; ==>
5983	:info:build ; 1
5984	:info:build ;
5985	:info:build ; note: unable to
5986	:info:build ; optimize
5987	:info:build ; because:
5988	:info:build ; Upgraded element type of array is not known at compile time.
5989	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-ENCODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
5990	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
5991	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
5992	:info:build ; (LET ((CHAR-CODE (CHAR-CODE FLEXI-STREAMS::CHAR-GETTER)))
5993	:info:build ; (FLEXI-STREAMS::OCTET-WRITER
5994	:info:build ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -24)))
5995	:info:build ; (FLEXI-STREAMS::OCTET-WRITER
5996	:info:build ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -16)))
5997	:info:build ; (FLEXI-STREAMS::OCTET-WRITER
5998	:info:build ; (FLEXI-STREAMS::LOGAND* 255 (FLEXI-STREAMS::ASH* CHAR-CODE -8)))
5999	:info:build ; (FLEXI-STREAMS::OCTET-WRITER (FLEXI-STREAMS::LOGAND* 255 CHAR-CODE))))
6000	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6001	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6002	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6003	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6004	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6005	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6006	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
6007	:info:build ; ==>
6008	:info:build ; 1
6009	:info:build ;
6010	:info:build ; note: unable to
6011	:info:build ; expand inline
6012	:info:build ; due to type uncertainty:
6013	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
6014	:info:build ;
6015	:info:build ; note: unable to
6016	:info:build ; expand inline
6017	:info:build ; due to type uncertainty:
6018	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
6019	:info:build ;
6020	:info:build ; note: unable to
6021	:info:build ; optimize
6022	:info:build ; due to type uncertainty:
6023	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
6024	:info:build ;
6025	:info:build ; note: unable to
6026	:info:build ; optimize
6027	:info:build ; due to type uncertainty:
6028	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
6029	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6030	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6031	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6032	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6033	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6034	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
6035	:info:build ; ==>
6036	:info:build ; 1
6037	:info:build ;
6038	:info:build ; note: forced to do GENERIC-* (cost 50)
6039	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
6040	:info:build ; The first argument is a T, not a FIXNUM.
6041	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
6042	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
6043	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
6044	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
6045	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
6046	:info:build ; 32).
6047	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
6048	:info:build ; (UNSIGNED-BYTE 32)
6049	:info:build ; &OPTIONAL).
6050	:info:build ; etc.
6051	:info:build ;
6052	:info:build ; note: forced to do GENERIC-< (cost 10)
6053	:info:build ; unable to do inline fixnum comparison (cost 4) because:
6054	:info:build ; The first argument is a INTEGER, not a FIXNUM.
6055	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
6056	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
6057	:info:build ; etc.
6058	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6059	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6060	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6061	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6062	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6063	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6064	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
6065	:info:build ; ==>
6066	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
6067	:info:build ;
6068	:info:build ; note: forced to do GENERIC-+ (cost 10)
6069	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
6070	:info:build ; The first argument is a T, not a FIXNUM.
6071	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
6072	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
6073	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
6074	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
6075	:info:build ; 32).
6076	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
6077	:info:build ; (UNSIGNED-BYTE 32)
6078	:info:build ; &OPTIONAL).
6079	:info:build ; etc.
6080	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6081	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6082	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6083	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6084	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6085	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
6086	:info:build ; ==>
6087	:info:build ; 1
6088	:info:build ;
6089	:info:build ; note: doing signed word to integer coercion (cost 20), for:
6090	:info:build ; the second argument of GENERIC-*
6091	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6092	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6093	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6094	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6095	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6096	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
6097	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY LET CHAR-CODE LET
6098	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
6099	:info:build ; ==>
6100	:info:build ; 1
6101	:info:build ;
6102	:info:build ; note: unable to
6103	:info:build ; optimize
6104	:info:build ; because:
6105	:info:build ; Upgraded element type of array is not known at compile time.
6106	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6107	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6108	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6109	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6110	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6111	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6112	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
6113	:info:build ; ==>
6114	:info:build ; 1
6115	:info:build ;
6116	:info:build ; note: unable to
6117	:info:build ; optimize
6118	:info:build ; because:
6119	:info:build ; Upgraded element type of array is not known at compile time.
6120	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6121	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6122	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6123	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6124	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6125	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
6126	:info:build ; ==>
6127	:info:build ; 1
6128	:info:build ;
6129	:info:build ; note: unable to
6130	:info:build ; optimize
6131	:info:build ; due to type uncertainty:
6132	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
6133	:info:build ;
6134	:info:build ; note: unable to
6135	:info:build ; optimize
6136	:info:build ; due to type uncertainty:
6137	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
6138	:info:build ;
6139	:info:build ; note: unable to
6140	:info:build ; optimize
6141	:info:build ; due to type uncertainty:
6142	:info:build ; The first argument is a REAL, not a INTEGER.
6143	:info:build ;
6144	:info:build ; note: unable to
6145	:info:build ; convert division by 2^k to shift
6146	:info:build ; due to type uncertainty:
6147	:info:build ; The first argument is a REAL, not a INTEGER.
6148	:info:build ;
6149	:info:build ; note: unable to
6150	:info:build ; fold division by 1
6151	:info:build ; due to type uncertainty:
6152	:info:build ; The first argument is a REAL, not a INTEGER.
6153	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6154	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6155	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6156	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6157	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6158	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6159	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
6160	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET CHAR-CODE LET
6161	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
6162	:info:build ; ==>
6163	:info:build ; 1
6164	:info:build ;
6165	:info:build ; note: unable to
6166	:info:build ; optimize
6167	:info:build ; because:
6168	:info:build ; Upgraded element type of array is not known at compile time.
6169	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6170	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6171	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6172	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6173	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6174	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6175	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
6176	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY LET CHAR-CODE LET
6177	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER AREF
6178	:info:build ; ==>
6179	:info:build ; 1
6180	:info:build ;
6181	:info:build ; note: unable to
6182	:info:build ; optimize
6183	:info:build ; because:
6184	:info:build ; Upgraded element type of array is not known at compile time.
6185	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6186	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6187	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6188	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6189	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6190	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6191	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
6192	:info:build ; ==>
6193	:info:build ; 1
6194	:info:build ;
6195	:info:build ; note: unable to
6196	:info:build ; expand inline
6197	:info:build ; due to type uncertainty:
6198	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
6199	:info:build ;
6200	:info:build ; note: unable to
6201	:info:build ; expand inline
6202	:info:build ; due to type uncertainty:
6203	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
6204	:info:build ;
6205	:info:build ; note: unable to
6206	:info:build ; optimize
6207	:info:build ; due to type uncertainty:
6208	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
6209	:info:build ;
6210	:info:build ; note: unable to
6211	:info:build ; optimize
6212	:info:build ; due to type uncertainty:
6213	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
6214	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6215	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6216	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6217	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6218	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6219	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
6220	:info:build ; ==>
6221	:info:build ; 1
6222	:info:build ;
6223	:info:build ; note: forced to do GENERIC-* (cost 50)
6224	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
6225	:info:build ; The first argument is a T, not a FIXNUM.
6226	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
6227	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
6228	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
6229	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
6230	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
6231	:info:build ; 32).
6232	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
6233	:info:build ; (UNSIGNED-BYTE 32)
6234	:info:build ; &OPTIONAL).
6235	:info:build ; etc.
6236	:info:build ;
6237	:info:build ; note: forced to do GENERIC-< (cost 10)
6238	:info:build ; unable to do inline fixnum comparison (cost 4) because:
6239	:info:build ; The first argument is a INTEGER, not a FIXNUM.
6240	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
6241	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
6242	:info:build ; etc.
6243	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6244	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6245	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6246	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6247	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6248	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6249	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
6250	:info:build ; ==>
6251	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
6252	:info:build ;
6253	:info:build ; note: forced to do GENERIC-+ (cost 10)
6254	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
6255	:info:build ; The first argument is a T, not a FIXNUM.
6256	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
6257	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
6258	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
6259	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
6260	:info:build ; 32).
6261	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
6262	:info:build ; (UNSIGNED-BYTE 32)
6263	:info:build ; &OPTIONAL).
6264	:info:build ; etc.
6265	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6266	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6267	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6268	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6269	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6270	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
6271	:info:build ; ==>
6272	:info:build ; 1
6273	:info:build ;
6274	:info:build ; note: doing signed word to integer coercion (cost 20), for:
6275	:info:build ; the second argument of GENERIC-*
6276	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6277	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6278	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6279	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6280	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6281	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET LOOP BLOCK LET TAGBODY MACROLET
6282	:info:build ; --> SYMBOL-MACROLET PROGN LOCALLY FLET LET FLEXI-STREAMS::CHAR-GETTER CHAR
6283	:info:build ; ==>
6284	:info:build ; 1
6285	:info:build ;
6286	:info:build ; note: unable to
6287	:info:build ; optimize
6288	:info:build ; because:
6289	:info:build ; Upgraded element type of array is not known at compile time.
6290	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6291	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6292	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6293	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6294	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6295	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6296	:info:build ; --> MACROLET LABELS FLEXI-STREAMS::WRITE-OCTET BLOCK SETF LET* FUNCALL
6297	:info:build ; ==>
6298	:info:build ; 1
6299	:info:build ;
6300	:info:build ; note: unable to
6301	:info:build ; optimize
6302	:info:build ; because:
6303	:info:build ; Upgraded element type of array is not known at compile time.
6304	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6305	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6306	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6307	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6308	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6309	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
6310	:info:build ; ==>
6311	:info:build ; 1
6312	:info:build ;
6313	:info:build ; note: unable to
6314	:info:build ; optimize
6315	:info:build ; due to type uncertainty:
6316	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
6317	:info:build ;
6318	:info:build ; note: unable to
6319	:info:build ; optimize
6320	:info:build ; due to type uncertainty:
6321	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
6322	:info:build ;
6323	:info:build ; note: unable to
6324	:info:build ; optimize
6325	:info:build ; due to type uncertainty:
6326	:info:build ; The first argument is a REAL, not a INTEGER.
6327	:info:build ;
6328	:info:build ; note: unable to
6329	:info:build ; convert division by 2^k to shift
6330	:info:build ; due to type uncertainty:
6331	:info:build ; The first argument is a REAL, not a INTEGER.
6332	:info:build ;
6333	:info:build ; note: unable to
6334	:info:build ; fold division by 1
6335	:info:build ; due to type uncertainty:
6336	:info:build ; The first argument is a REAL, not a INTEGER.
6337	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6338	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6339	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6340	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6341	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6342	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6343	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE
6344	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
6345	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER CHAR
6346	:info:build ; ==>
6347	:info:build ; 1
6348	:info:build ;
6349	:info:build ; note: unable to
6350	:info:build ; optimize
6351	:info:build ; because:
6352	:info:build ; Upgraded element type of array is not known at compile time.
6353	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6354	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6355	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6356	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6357	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6358	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6359	:info:build ; --> MACROLET LABELS MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE
6360	:info:build ; --> LOOP BLOCK LET TAGBODY PROGN SYMBOL-MACROLET LOCALLY FLET LET
6361	:info:build ; --> FLEXI-STREAMS::CHAR-GETTER AREF
6362	:info:build ; ==>
6363	:info:build ; 1
6364	:info:build ;
6365	:info:build ; note: unable to
6366	:info:build ; optimize
6367	:info:build ; because:
6368	:info:build ; Upgraded element type of array is not known at compile time.
6369	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6370	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6371	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6372	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6373	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6374	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6375	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET POSITION
6376	:info:build ; ==>
6377	:info:build ; 1
6378	:info:build ;
6379	:info:build ; note: unable to
6380	:info:build ; expand inline
6381	:info:build ; due to type uncertainty:
6382	:info:build ; The second argument is a (OR LIST VECTOR), not a LIST.
6383	:info:build ;
6384	:info:build ; note: unable to
6385	:info:build ; expand inline
6386	:info:build ; due to type uncertainty:
6387	:info:build ; The second argument is a (OR LIST VECTOR), not a VECTOR.
6388	:info:build ;
6389	:info:build ; note: unable to
6390	:info:build ; optimize
6391	:info:build ; due to type uncertainty:
6392	:info:build ; The second argument is a (OR LIST VECTOR), not a BIT-VECTOR.
6393	:info:build ;
6394	:info:build ; note: unable to
6395	:info:build ; optimize
6396	:info:build ; due to type uncertainty:
6397	:info:build ; The second argument is a (OR LIST VECTOR), not a STRING.
6398	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6399	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6400	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6401	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6402	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6403	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
6404	:info:build ; ==>
6405	:info:build ; 1
6406	:info:build ;
6407	:info:build ; note: forced to do GENERIC-* (cost 50)
6408	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
6409	:info:build ; The first argument is a T, not a FIXNUM.
6410	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a FIXNUM.
6411	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
6412	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 4) because:
6413	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
6414	:info:build ; The second argument is a (INTEGER -1073741823 1073741823), not a (UNSIGNED-BYTE
6415	:info:build ; 32).
6416	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
6417	:info:build ; (UNSIGNED-BYTE 32)
6418	:info:build ; &OPTIONAL).
6419	:info:build ; etc.
6420	:info:build ;
6421	:info:build ; note: forced to do GENERIC-< (cost 10)
6422	:info:build ; unable to do inline fixnum comparison (cost 4) because:
6423	:info:build ; The first argument is a INTEGER, not a FIXNUM.
6424	:info:build ; unable to do inline (unsigned-byte 32) comparison (cost 5) because:
6425	:info:build ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32).
6426	:info:build ; etc.
6427	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6428	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6429	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6430	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6431	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6432	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6433	:info:build ; --> MACROLET LABELS SETQ SETF LET* COND IF THE LET COND IF IF
6434	:info:build ; ==>
6435	:info:build ; (+ FLEXI-STREAMS::COLUMN (- FLEXI-STREAMS::END FLEXI-STREAMS::START))
6436	:info:build ;
6437	:info:build ; note: forced to do GENERIC-+ (cost 10)
6438	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
6439	:info:build ; The first argument is a T, not a FIXNUM.
6440	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
6441	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
6442	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
6443	:info:build ; The second argument is a (INTEGER -536870908 536870908), not a (UNSIGNED-BYTE
6444	:info:build ; 32).
6445	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
6446	:info:build ; (UNSIGNED-BYTE 32)
6447	:info:build ; &OPTIONAL).
6448	:info:build ; etc.
6449	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-WRITERS PROGN DEFMETHOD PROGN EVAL-WHEN
6450	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6451	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6452	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6453	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6454	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET* MIN
6455	:info:build ; ==>
6456	:info:build ; 1
6457	:info:build ;
6458	:info:build ; note: doing signed word to integer coercion (cost 20), for:
6459	:info:build ; the second argument of GENERIC-*
6460	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/encode-tmpB17HDEGA.fasl
6461	:info:build ; compilation finished in 0:00:07.457
6462	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/decode.lisp" (written 09 JUL 2020 08:18:28 PM):
6463	:info:build ; file: /opt/local/share/common-lisp/source/cl-flexi-streams/decode.lisp
6464	:info:build ; in:
6465	:info:build ; DEFINE-CHAR-DECODERS (FLEXI-LATIN-1-FORMAT FLEXI-CR-LATIN-1-FORMAT
6466	:info:build ; FLEXI-CRLF-LATIN-1-FORMAT)
6467	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-LATIN-1-FORMAT
6468	:info:build ; FLEXI-STREAMS::FLEXI-CR-LATIN-1-FORMAT
6469	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-LATIN-1-FORMAT)
6470	:info:build ; FLEXI-STREAMS::OCTET-GETTER)
6471	:info:build ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
6472	:info:build ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
6473	:info:build ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6474	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6475	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6476	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
6477	:info:build ; --> <=
6478	:info:build ; ==>
6479	:info:build ; 1
6480	:info:build ;
6481	:info:build ; note: forced to do full call
6482	:info:build ; unable to do inline ASH (cost 3) because:
6483	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
6484	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
6485	:info:build ; (SIGNED-BYTE 32)
6486	:info:build ; &OPTIONAL).
6487	:info:build ; unable to do inline constant ASH (cost 4) because:
6488	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
6489	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
6490	:info:build ; (UNSIGNED-BYTE 32)
6491	:info:build ; &OPTIONAL).
6492	:info:build ; etc.
6493	:info:build ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
6494	:info:build ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
6495	:info:build ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6496	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6497	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6498	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
6499	:info:build ; --> IF
6500	:info:build ; ==>
6501	:info:build ; (> #:CHAR-CODE0 1114111)
6502	:info:build ;
6503	:info:build ; note: forced to do GENERIC-> (cost 10)
6504	:info:build ; unable to do inline fixnum comparison (cost 4) because:
6505	:info:build ; The first argument is a INTEGER, not a FIXNUM.
6506	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6507	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6508	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6509	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6510	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6511	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6512	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
6513	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
6514	:info:build ; --> PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
6515	:info:build ; ==>
6516	:info:build ; 1
6517	:info:build ;
6518	:info:build ; note: unable to
6519	:info:build ; optimize
6520	:info:build ; because:
6521	:info:build ; Upgraded element type of array is not known at compile time.
6522	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6523	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6524	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6525	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6526	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6527	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6528	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
6529	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
6530	:info:build ; --> PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
6531	:info:build ; ==>
6532	:info:build ; 1
6533	:info:build ;
6534	:info:build ; note: unable to
6535	:info:build ; optimize
6536	:info:build ; because:
6537	:info:build ; Upgraded element type of array is not known at compile time.
6538	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6539	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6540	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6541	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6542	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6543	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6544	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
6545	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
6546	:info:build ; --> LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
6547	:info:build ; ==>
6548	:info:build ; 1
6549	:info:build ;
6550	:info:build ; note: unable to
6551	:info:build ; optimize
6552	:info:build ; because:
6553	:info:build ; Upgraded element type of array is not known at compile time.
6554	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6555	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6556	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6557	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6558	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6559	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
6560	:info:build ; --> SB-KERNEL:%SCHARSET
6561	:info:build ; ==>
6562	:info:build ; 1
6563	:info:build ;
6564	:info:build ; note: unable to
6565	:info:build ; optimize
6566	:info:build ; because:
6567	:info:build ; Upgraded element type of array is not known at compile time.
6568	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6569	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6570	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6571	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6572	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6573	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6574	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
6575	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
6576	:info:build ; --> PROGN LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
6577	:info:build ; ==>
6578	:info:build ; 1
6579	:info:build ;
6580	:info:build ; note: unable to
6581	:info:build ; optimize
6582	:info:build ; because:
6583	:info:build ; Upgraded element type of array is not known at compile time.
6584	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6585	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6586	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6587	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6588	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6589	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6590	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
6591	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
6592	:info:build ; --> PROGN LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
6593	:info:build ; ==>
6594	:info:build ; 1
6595	:info:build ;
6596	:info:build ; note: unable to
6597	:info:build ; optimize
6598	:info:build ; because:
6599	:info:build ; Upgraded element type of array is not known at compile time.
6600	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6601	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6602	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6603	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6604	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6605	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6606	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
6607	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
6608	:info:build ; --> LET PROGN LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
6609	:info:build ; ==>
6610	:info:build ; 1
6611	:info:build ;
6612	:info:build ; note: unable to
6613	:info:build ; optimize
6614	:info:build ; because:
6615	:info:build ; Upgraded element type of array is not known at compile time.
6616	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6617	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6618	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6619	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6620	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6621	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
6622	:info:build ; --> SB-KERNEL:%SCHARSET
6623	:info:build ; ==>
6624	:info:build ; 1
6625	:info:build ;
6626	:info:build ; note: unable to
6627	:info:build ; optimize
6628	:info:build ; because:
6629	:info:build ; Upgraded element type of array is not known at compile time.
6630	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6631	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6632	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6633	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6634	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6635	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6636	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
6637	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
6638	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1
6639	:info:build ; --> LET AREF
6640	:info:build ; ==>
6641	:info:build ; 1
6642	:info:build ;
6643	:info:build ; note: unable to
6644	:info:build ; optimize
6645	:info:build ; because:
6646	:info:build ; Upgraded element type of array is not known at compile time.
6647	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6648	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6649	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6650	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6651	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6652	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6653	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
6654	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
6655	:info:build ; --> FLET #:GET-CHAR-CODE4 BLOCK LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK
6656	:info:build ; --> PROG1 LET AREF
6657	:info:build ; ==>
6658	:info:build ; 1
6659	:info:build ;
6660	:info:build ; note: unable to
6661	:info:build ; optimize
6662	:info:build ; because:
6663	:info:build ; Upgraded element type of array is not known at compile time.
6664	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6665	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6666	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6667	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6668	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6669	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6670	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
6671	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
6672	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET PROGN FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1
6673	:info:build ; --> LET AREF
6674	:info:build ; ==>
6675	:info:build ; 1
6676	:info:build ;
6677	:info:build ; note: unable to
6678	:info:build ; optimize
6679	:info:build ; because:
6680	:info:build ; Upgraded element type of array is not known at compile time.
6681	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6682	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6683	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6684	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6685	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6686	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
6687	:info:build ; --> SB-KERNEL:%SCHARSET
6688	:info:build ; ==>
6689	:info:build ; 1
6690	:info:build ;
6691	:info:build ; note: unable to
6692	:info:build ; optimize
6693	:info:build ; because:
6694	:info:build ; Upgraded element type of array is not known at compile time.
6695	:info:build ;
6696	:info:build ; note: forced to do GENERIC-- (cost 10)
6697	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
6698	:info:build ; The second argument is a T, not a FIXNUM.
6699	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
6700	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
6701	:info:build ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
6702	:info:build ; The second argument is a T, not a (UNSIGNED-BYTE 32).
6703	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
6704	:info:build ; (UNSIGNED-BYTE 32)
6705	:info:build ; &OPTIONAL).
6706	:info:build ; etc.
6707	:info:build ; in:
6708	:info:build ; DEFINE-CHAR-DECODERS (FLEXI-ASCII-FORMAT FLEXI-CR-ASCII-FORMAT
6709	:info:build ; FLEXI-CRLF-ASCII-FORMAT)
6710	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT
6711	:info:build ; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT
6712	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT)
6713	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
6714	:info:build ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
6715	:info:build ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
6716	:info:build ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
6717	:info:build ; FLEXI-STREAMS:OCTET)))
6718	:info:build ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
6719	:info:build ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
6720	:info:build ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6721	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6722	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6723	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
6724	:info:build ; --> <=
6725	:info:build ; ==>
6726	:info:build ; 1
6727	:info:build ;
6728	:info:build ; note: forced to do full call
6729	:info:build ; unable to do inline ASH (cost 3) because:
6730	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
6731	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
6732	:info:build ; (SIGNED-BYTE 32)
6733	:info:build ; &OPTIONAL).
6734	:info:build ; unable to do inline constant ASH (cost 4) because:
6735	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
6736	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
6737	:info:build ; (UNSIGNED-BYTE 32)
6738	:info:build ; &OPTIONAL).
6739	:info:build ; etc.
6740	:info:build ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
6741	:info:build ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
6742	:info:build ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6743	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6744	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6745	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
6746	:info:build ; --> IF
6747	:info:build ; ==>
6748	:info:build ; (> #:CHAR-CODE0 1114111)
6749	:info:build ;
6750	:info:build ; note: forced to do GENERIC-> (cost 10)
6751	:info:build ; unable to do inline fixnum comparison (cost 4) because:
6752	:info:build ; The first argument is a INTEGER, not a FIXNUM.
6753	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
6754	:info:build ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
6755	:info:build ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
6756	:info:build ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
6757	:info:build ; FLEXI-STREAMS:OCTET))
6758	:info:build ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
6759	:info:build ; ==>
6760	:info:build ; 1
6761	:info:build ;
6762	:info:build ; note: unable to
6763	:info:build ; optimize
6764	:info:build ; because:
6765	:info:build ; Upgraded element type of array is not known at compile time.
6766	:info:build ;
6767	:info:build ; note: unable to
6768	:info:build ; optimize
6769	:info:build ; because:
6770	:info:build ; Upgraded element type of array is not known at compile time.
6771	:info:build ;
6772	:info:build ; note: unable to
6773	:info:build ; optimize
6774	:info:build ; because:
6775	:info:build ; Upgraded element type of array is not known at compile time.
6776	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT
6777	:info:build ; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT
6778	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT)
6779	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
6780	:info:build ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
6781	:info:build ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
6782	:info:build ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
6783	:info:build ; FLEXI-STREAMS:OCTET)))
6784	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6785	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6786	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6787	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6788	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6789	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6790	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
6791	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
6792	:info:build ; --> WHEN IF AND IF OR LET <=
6793	:info:build ; ==>
6794	:info:build ; 1
6795	:info:build ;
6796	:info:build ; note: forced to do full call
6797	:info:build ; unable to do inline ASH (cost 3) because:
6798	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
6799	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
6800	:info:build ; (SIGNED-BYTE 32)
6801	:info:build ; &OPTIONAL).
6802	:info:build ; unable to do inline constant ASH (cost 4) because:
6803	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
6804	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
6805	:info:build ; (UNSIGNED-BYTE 32)
6806	:info:build ; &OPTIONAL).
6807	:info:build ; etc.
6808	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6809	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6810	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6811	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6812	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6813	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6814	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
6815	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
6816	:info:build ; --> WHEN IF AND IF OR LET IF
6817	:info:build ; ==>
6818	:info:build ; (> #:CHAR-CODE0 1114111)
6819	:info:build ;
6820	:info:build ; note: forced to do GENERIC-> (cost 10)
6821	:info:build ; unable to do inline fixnum comparison (cost 4) because:
6822	:info:build ; The first argument is a INTEGER, not a FIXNUM.
6823	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6824	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6825	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6826	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6827	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6828	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6829	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
6830	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
6831	:info:build ; --> LET WHEN IF AND IF OR LET <=
6832	:info:build ; ==>
6833	:info:build ; 1
6834	:info:build ;
6835	:info:build ; note: forced to do full call
6836	:info:build ; unable to do inline ASH (cost 3) because:
6837	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
6838	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
6839	:info:build ; (SIGNED-BYTE 32)
6840	:info:build ; &OPTIONAL).
6841	:info:build ; unable to do inline constant ASH (cost 4) because:
6842	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
6843	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
6844	:info:build ; (UNSIGNED-BYTE 32)
6845	:info:build ; &OPTIONAL).
6846	:info:build ; etc.
6847	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6848	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6849	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6850	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6851	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6852	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6853	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
6854	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
6855	:info:build ; --> LET WHEN IF AND IF OR LET IF
6856	:info:build ; ==>
6857	:info:build ; (> #:CHAR-CODE0 1114111)
6858	:info:build ;
6859	:info:build ; note: forced to do GENERIC-> (cost 10)
6860	:info:build ; unable to do inline fixnum comparison (cost 4) because:
6861	:info:build ; The first argument is a INTEGER, not a FIXNUM.
6862	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6863	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6864	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6865	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6866	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6867	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6868	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
6869	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
6870	:info:build ; --> WHEN IF AND IF OR LET <=
6871	:info:build ; ==>
6872	:info:build ; 1
6873	:info:build ;
6874	:info:build ; note: forced to do full call
6875	:info:build ; unable to do inline ASH (cost 3) because:
6876	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
6877	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
6878	:info:build ; (SIGNED-BYTE 32)
6879	:info:build ; &OPTIONAL).
6880	:info:build ; unable to do inline constant ASH (cost 4) because:
6881	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
6882	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
6883	:info:build ; (UNSIGNED-BYTE 32)
6884	:info:build ; &OPTIONAL).
6885	:info:build ; etc.
6886	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6887	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6888	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6889	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6890	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6891	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6892	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
6893	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
6894	:info:build ; --> WHEN IF AND IF OR LET IF
6895	:info:build ; ==>
6896	:info:build ; (> #:CHAR-CODE0 1114111)
6897	:info:build ;
6898	:info:build ; note: forced to do GENERIC-> (cost 10)
6899	:info:build ; unable to do inline fixnum comparison (cost 4) because:
6900	:info:build ; The first argument is a INTEGER, not a FIXNUM.
6901	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
6902	:info:build ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
6903	:info:build ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
6904	:info:build ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
6905	:info:build ; FLEXI-STREAMS:OCTET))
6906	:info:build ;
6907	:info:build ; note: unable to
6908	:info:build ; optimize
6909	:info:build ; because:
6910	:info:build ; Upgraded element type of array is not known at compile time.
6911	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT
6912	:info:build ; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT
6913	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT)
6914	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
6915	:info:build ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
6916	:info:build ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
6917	:info:build ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
6918	:info:build ; FLEXI-STREAMS:OCTET)))
6919	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6920	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6921	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6922	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6923	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6924	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
6925	:info:build ; --> SB-KERNEL:%SCHARSET
6926	:info:build ; ==>
6927	:info:build ; 1
6928	:info:build ;
6929	:info:build ; note: forced to do full call
6930	:info:build ; unable to do inline ASH (cost 3) because:
6931	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
6932	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
6933	:info:build ; (SIGNED-BYTE 32)
6934	:info:build ; &OPTIONAL).
6935	:info:build ; unable to do inline constant ASH (cost 4) because:
6936	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
6937	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
6938	:info:build ; (UNSIGNED-BYTE 32)
6939	:info:build ; &OPTIONAL).
6940	:info:build ; etc.
6941	:info:build ;
6942	:info:build ; note: forced to do GENERIC-> (cost 10)
6943	:info:build ; unable to do inline fixnum comparison (cost 4) because:
6944	:info:build ; The first argument is a INTEGER, not a FIXNUM.
6945	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
6946	:info:build ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
6947	:info:build ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
6948	:info:build ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
6949	:info:build ; FLEXI-STREAMS:OCTET))
6950	:info:build ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
6951	:info:build ; ==>
6952	:info:build ; 1
6953	:info:build ;
6954	:info:build ; note: unable to
6955	:info:build ; optimize
6956	:info:build ; because:
6957	:info:build ; Upgraded element type of array is not known at compile time.
6958	:info:build ;
6959	:info:build ; note: unable to
6960	:info:build ; optimize
6961	:info:build ; because:
6962	:info:build ; Upgraded element type of array is not known at compile time.
6963	:info:build ;
6964	:info:build ; note: unable to
6965	:info:build ; optimize
6966	:info:build ; because:
6967	:info:build ; Upgraded element type of array is not known at compile time.
6968	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT
6969	:info:build ; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT
6970	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT)
6971	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
6972	:info:build ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
6973	:info:build ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
6974	:info:build ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
6975	:info:build ; FLEXI-STREAMS:OCTET)))
6976	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
6977	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
6978	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
6979	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
6980	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
6981	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
6982	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
6983	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
6984	:info:build ; --> PROGN LET WHEN IF AND IF OR LET <=
6985	:info:build ; ==>
6986	:info:build ; 1
6987	:info:build ;
6988	:info:build ; note: forced to do full call
6989	:info:build ; unable to do inline ASH (cost 3) because:
6990	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
6991	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
6992	:info:build ; (SIGNED-BYTE 32)
6993	:info:build ; &OPTIONAL).
6994	:info:build ; unable to do inline constant ASH (cost 4) because:
6995	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
6996	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
6997	:info:build ; (UNSIGNED-BYTE 32)
6998	:info:build ; &OPTIONAL).
6999	:info:build ; etc.
7000	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7001	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7002	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7003	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7004	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7005	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7006	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
7007	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
7008	:info:build ; --> PROGN LET WHEN IF AND IF OR LET IF
7009	:info:build ; ==>
7010	:info:build ; (> #:CHAR-CODE0 1114111)
7011	:info:build ;
7012	:info:build ; note: forced to do GENERIC-> (cost 10)
7013	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7014	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7015	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7016	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7017	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7018	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7019	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7020	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7021	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
7022	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
7023	:info:build ; --> LET PROGN LET WHEN IF AND IF OR LET <=
7024	:info:build ; ==>
7025	:info:build ; 1
7026	:info:build ;
7027	:info:build ; note: forced to do full call
7028	:info:build ; unable to do inline ASH (cost 3) because:
7029	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7030	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7031	:info:build ; (SIGNED-BYTE 32)
7032	:info:build ; &OPTIONAL).
7033	:info:build ; unable to do inline constant ASH (cost 4) because:
7034	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7035	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7036	:info:build ; (UNSIGNED-BYTE 32)
7037	:info:build ; &OPTIONAL).
7038	:info:build ; etc.
7039	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7040	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7041	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7042	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7043	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7044	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7045	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
7046	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
7047	:info:build ; --> LET PROGN LET WHEN IF AND IF OR LET IF
7048	:info:build ; ==>
7049	:info:build ; (> #:CHAR-CODE0 1114111)
7050	:info:build ;
7051	:info:build ; note: forced to do GENERIC-> (cost 10)
7052	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7053	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7054	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7055	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7056	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7057	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7058	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7059	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7060	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
7061	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
7062	:info:build ; --> PROGN LET WHEN IF AND IF OR LET <=
7063	:info:build ; ==>
7064	:info:build ; 1
7065	:info:build ;
7066	:info:build ; note: forced to do full call
7067	:info:build ; unable to do inline ASH (cost 3) because:
7068	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7069	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7070	:info:build ; (SIGNED-BYTE 32)
7071	:info:build ; &OPTIONAL).
7072	:info:build ; unable to do inline constant ASH (cost 4) because:
7073	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7074	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7075	:info:build ; (UNSIGNED-BYTE 32)
7076	:info:build ; &OPTIONAL).
7077	:info:build ; etc.
7078	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7079	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7080	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7081	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7082	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7083	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7084	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
7085	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
7086	:info:build ; --> PROGN LET WHEN IF AND IF OR LET IF
7087	:info:build ; ==>
7088	:info:build ; (> #:CHAR-CODE0 1114111)
7089	:info:build ;
7090	:info:build ; note: forced to do GENERIC-> (cost 10)
7091	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7092	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7093	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
7094	:info:build ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
7095	:info:build ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
7096	:info:build ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
7097	:info:build ; FLEXI-STREAMS:OCTET))
7098	:info:build ;
7099	:info:build ; note: unable to
7100	:info:build ; optimize
7101	:info:build ; because:
7102	:info:build ; Upgraded element type of array is not known at compile time.
7103	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT
7104	:info:build ; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT
7105	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT)
7106	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
7107	:info:build ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
7108	:info:build ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
7109	:info:build ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
7110	:info:build ; FLEXI-STREAMS:OCTET)))
7111	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7112	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7113	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7114	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7115	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7116	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
7117	:info:build ; --> SB-KERNEL:%SCHARSET
7118	:info:build ; ==>
7119	:info:build ; 1
7120	:info:build ;
7121	:info:build ; note: forced to do full call
7122	:info:build ; unable to do inline ASH (cost 3) because:
7123	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7124	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7125	:info:build ; (SIGNED-BYTE 32)
7126	:info:build ; &OPTIONAL).
7127	:info:build ; unable to do inline constant ASH (cost 4) because:
7128	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7129	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7130	:info:build ; (UNSIGNED-BYTE 32)
7131	:info:build ; &OPTIONAL).
7132	:info:build ; etc.
7133	:info:build ;
7134	:info:build ; note: forced to do GENERIC-> (cost 10)
7135	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7136	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7137	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
7138	:info:build ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
7139	:info:build ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
7140	:info:build ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
7141	:info:build ; FLEXI-STREAMS:OCTET))
7142	:info:build ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
7143	:info:build ; ==>
7144	:info:build ; 1
7145	:info:build ;
7146	:info:build ; note: unable to
7147	:info:build ; optimize
7148	:info:build ; because:
7149	:info:build ; Upgraded element type of array is not known at compile time.
7150	:info:build ;
7151	:info:build ; note: unable to
7152	:info:build ; optimize
7153	:info:build ; because:
7154	:info:build ; Upgraded element type of array is not known at compile time.
7155	:info:build ;
7156	:info:build ; note: unable to
7157	:info:build ; optimize
7158	:info:build ; because:
7159	:info:build ; Upgraded element type of array is not known at compile time.
7160	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT
7161	:info:build ; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT
7162	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT)
7163	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
7164	:info:build ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
7165	:info:build ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
7166	:info:build ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
7167	:info:build ; FLEXI-STREAMS:OCTET)))
7168	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7169	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7170	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7171	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7172	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7173	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7174	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
7175	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
7176	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
7177	:info:build ; ==>
7178	:info:build ; 1
7179	:info:build ;
7180	:info:build ; note: forced to do full call
7181	:info:build ; unable to do inline ASH (cost 3) because:
7182	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7183	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7184	:info:build ; (SIGNED-BYTE 32)
7185	:info:build ; &OPTIONAL).
7186	:info:build ; unable to do inline constant ASH (cost 4) because:
7187	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7188	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7189	:info:build ; (UNSIGNED-BYTE 32)
7190	:info:build ; &OPTIONAL).
7191	:info:build ; etc.
7192	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7193	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7194	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7195	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7196	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7197	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7198	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
7199	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
7200	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF
7201	:info:build ; ==>
7202	:info:build ; (> #:CHAR-CODE0 1114111)
7203	:info:build ;
7204	:info:build ; note: forced to do GENERIC-> (cost 10)
7205	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7206	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7207	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7208	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7209	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7210	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7211	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7212	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7213	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
7214	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
7215	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
7216	:info:build ; ==>
7217	:info:build ; 1
7218	:info:build ;
7219	:info:build ; note: forced to do full call
7220	:info:build ; unable to do inline ASH (cost 3) because:
7221	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7222	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7223	:info:build ; (SIGNED-BYTE 32)
7224	:info:build ; &OPTIONAL).
7225	:info:build ; unable to do inline constant ASH (cost 4) because:
7226	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7227	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7228	:info:build ; (UNSIGNED-BYTE 32)
7229	:info:build ; &OPTIONAL).
7230	:info:build ; etc.
7231	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7232	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7233	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7234	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7235	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7236	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7237	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
7238	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
7239	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF
7240	:info:build ; ==>
7241	:info:build ; (> #:CHAR-CODE0 1114111)
7242	:info:build ;
7243	:info:build ; note: forced to do GENERIC-> (cost 10)
7244	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7245	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7246	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7247	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7248	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7249	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7250	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7251	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7252	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
7253	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
7254	:info:build ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
7255	:info:build ; ==>
7256	:info:build ; 1
7257	:info:build ;
7258	:info:build ; note: forced to do full call
7259	:info:build ; unable to do inline ASH (cost 3) because:
7260	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7261	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7262	:info:build ; (SIGNED-BYTE 32)
7263	:info:build ; &OPTIONAL).
7264	:info:build ; unable to do inline constant ASH (cost 4) because:
7265	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7266	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7267	:info:build ; (UNSIGNED-BYTE 32)
7268	:info:build ; &OPTIONAL).
7269	:info:build ; etc.
7270	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7271	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7272	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7273	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7274	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7275	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7276	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
7277	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
7278	:info:build ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF
7279	:info:build ; ==>
7280	:info:build ; (> #:CHAR-CODE0 1114111)
7281	:info:build ;
7282	:info:build ; note: forced to do GENERIC-> (cost 10)
7283	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7284	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7285	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
7286	:info:build ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
7287	:info:build ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
7288	:info:build ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
7289	:info:build ; FLEXI-STREAMS:OCTET))
7290	:info:build ;
7291	:info:build ; note: unable to
7292	:info:build ; optimize
7293	:info:build ; because:
7294	:info:build ; Upgraded element type of array is not known at compile time.
7295	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-ASCII-FORMAT
7296	:info:build ; FLEXI-STREAMS::FLEXI-CR-ASCII-FORMAT
7297	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-ASCII-FORMAT)
7298	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
7299	:info:build ; (IF (> (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
7300	:info:build ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
7301	:info:build ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
7302	:info:build ; FLEXI-STREAMS:OCTET)))
7303	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7304	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7305	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7306	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7307	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7308	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
7309	:info:build ; --> SB-KERNEL:%SCHARSET
7310	:info:build ; ==>
7311	:info:build ; 1
7312	:info:build ;
7313	:info:build ; note: forced to do full call
7314	:info:build ; unable to do inline ASH (cost 3) because:
7315	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7316	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7317	:info:build ; (SIGNED-BYTE 32)
7318	:info:build ; &OPTIONAL).
7319	:info:build ; unable to do inline constant ASH (cost 4) because:
7320	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7321	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7322	:info:build ; (UNSIGNED-BYTE 32)
7323	:info:build ; &OPTIONAL).
7324	:info:build ; etc.
7325	:info:build ;
7326	:info:build ; note: forced to do GENERIC-> (cost 10)
7327	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7328	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7329	:info:build ;
7330	:info:build ; note: forced to do GENERIC-- (cost 10)
7331	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
7332	:info:build ; The second argument is a T, not a FIXNUM.
7333	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
7334	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
7335	:info:build ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
7336	:info:build ; The second argument is a T, not a (UNSIGNED-BYTE 32).
7337	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
7338	:info:build ; (UNSIGNED-BYTE 32)
7339	:info:build ; &OPTIONAL).
7340	:info:build ; etc.
7341	:info:build ; in:
7342	:info:build ; DEFINE-CHAR-DECODERS (FLEXI-8-BIT-FORMAT FLEXI-CR-8-BIT-FORMAT
7343	:info:build ; FLEXI-CRLF-8-BIT-FORMAT)
7344	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT
7345	:info:build ; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT
7346	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT)
7347	:info:build ; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE
7348	:info:build ; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE))
7349	:info:build ; FORMAT
7350	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
7351	:info:build ; (LET (#)
7352	:info:build ; (IF #
7353	:info:build ; #
7354	:info:build ; CHAR-CODE)))))
7355	:info:build ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
7356	:info:build ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
7357	:info:build ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7358	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7359	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7360	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
7361	:info:build ; --> <=
7362	:info:build ; ==>
7363	:info:build ; 1
7364	:info:build ;
7365	:info:build ; note: forced to do full call
7366	:info:build ; unable to do inline ASH (cost 3) because:
7367	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7368	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7369	:info:build ; (SIGNED-BYTE 32)
7370	:info:build ; &OPTIONAL).
7371	:info:build ; unable to do inline constant ASH (cost 4) because:
7372	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7373	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7374	:info:build ; (UNSIGNED-BYTE 32)
7375	:info:build ; &OPTIONAL).
7376	:info:build ; etc.
7377	:info:build ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
7378	:info:build ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
7379	:info:build ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7380	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7381	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7382	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
7383	:info:build ; --> IF
7384	:info:build ; ==>
7385	:info:build ; (> #:CHAR-CODE0 1114111)
7386	:info:build ;
7387	:info:build ; note: forced to do GENERIC-> (cost 10)
7388	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7389	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7390	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
7391	:info:build ; (LET ((CHAR-CODE (AREF # #)))
7392	:info:build ; (IF (OR (NULL CHAR-CODE) (= # 65533))
7393	:info:build ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
7394	:info:build ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
7395	:info:build ; CHAR-CODE)))
7396	:info:build ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
7397	:info:build ; ==>
7398	:info:build ; 1
7399	:info:build ;
7400	:info:build ; note: unable to
7401	:info:build ; optimize
7402	:info:build ; because:
7403	:info:build ; Upgraded element type of array is not known at compile time.
7404	:info:build ;
7405	:info:build ; note: unable to
7406	:info:build ; optimize
7407	:info:build ; because:
7408	:info:build ; Upgraded element type of array is not known at compile time.
7409	:info:build ;
7410	:info:build ; note: unable to
7411	:info:build ; optimize
7412	:info:build ; because:
7413	:info:build ; Upgraded element type of array is not known at compile time.
7414	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT
7415	:info:build ; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT
7416	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT)
7417	:info:build ; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE
7418	:info:build ; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE))
7419	:info:build ; FORMAT
7420	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
7421	:info:build ; (LET (#)
7422	:info:build ; (IF #
7423	:info:build ; #
7424	:info:build ; CHAR-CODE)))))
7425	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7426	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7427	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7428	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7429	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7430	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7431	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
7432	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
7433	:info:build ; --> WHEN IF AND IF OR LET <=
7434	:info:build ; ==>
7435	:info:build ; 1
7436	:info:build ;
7437	:info:build ; note: forced to do full call
7438	:info:build ; unable to do inline ASH (cost 3) because:
7439	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7440	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7441	:info:build ; (SIGNED-BYTE 32)
7442	:info:build ; &OPTIONAL).
7443	:info:build ; unable to do inline constant ASH (cost 4) because:
7444	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7445	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7446	:info:build ; (UNSIGNED-BYTE 32)
7447	:info:build ; &OPTIONAL).
7448	:info:build ; etc.
7449	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7450	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7451	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7452	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7453	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7454	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7455	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
7456	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
7457	:info:build ; --> WHEN IF AND IF OR LET IF
7458	:info:build ; ==>
7459	:info:build ; (> #:CHAR-CODE0 1114111)
7460	:info:build ;
7461	:info:build ; note: forced to do GENERIC-> (cost 10)
7462	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7463	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7464	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7465	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7466	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7467	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7468	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7469	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7470	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
7471	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
7472	:info:build ; --> LET WHEN IF AND IF OR LET <=
7473	:info:build ; ==>
7474	:info:build ; 1
7475	:info:build ;
7476	:info:build ; note: forced to do full call
7477	:info:build ; unable to do inline ASH (cost 3) because:
7478	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7479	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7480	:info:build ; (SIGNED-BYTE 32)
7481	:info:build ; &OPTIONAL).
7482	:info:build ; unable to do inline constant ASH (cost 4) because:
7483	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7484	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7485	:info:build ; (UNSIGNED-BYTE 32)
7486	:info:build ; &OPTIONAL).
7487	:info:build ; etc.
7488	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7489	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7490	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7491	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7492	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7493	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7494	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
7495	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
7496	:info:build ; --> LET WHEN IF AND IF OR LET IF
7497	:info:build ; ==>
7498	:info:build ; (> #:CHAR-CODE0 1114111)
7499	:info:build ;
7500	:info:build ; note: forced to do GENERIC-> (cost 10)
7501	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7502	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7503	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7504	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7505	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7506	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7507	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7508	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7509	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
7510	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
7511	:info:build ; --> WHEN IF AND IF OR LET <=
7512	:info:build ; ==>
7513	:info:build ; 1
7514	:info:build ;
7515	:info:build ; note: forced to do full call
7516	:info:build ; unable to do inline ASH (cost 3) because:
7517	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7518	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7519	:info:build ; (SIGNED-BYTE 32)
7520	:info:build ; &OPTIONAL).
7521	:info:build ; unable to do inline constant ASH (cost 4) because:
7522	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7523	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7524	:info:build ; (UNSIGNED-BYTE 32)
7525	:info:build ; &OPTIONAL).
7526	:info:build ; etc.
7527	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7528	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7529	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7530	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7531	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7532	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7533	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
7534	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
7535	:info:build ; --> WHEN IF AND IF OR LET IF
7536	:info:build ; ==>
7537	:info:build ; (> #:CHAR-CODE0 1114111)
7538	:info:build ;
7539	:info:build ; note: forced to do GENERIC-> (cost 10)
7540	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7541	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7542	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
7543	:info:build ; (LET ((CHAR-CODE (AREF # #)))
7544	:info:build ; (IF (OR (NULL CHAR-CODE) (= # 65533))
7545	:info:build ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
7546	:info:build ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
7547	:info:build ; CHAR-CODE)))
7548	:info:build ;
7549	:info:build ; note: unable to
7550	:info:build ; optimize
7551	:info:build ; because:
7552	:info:build ; Upgraded element type of array is not known at compile time.
7553	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT
7554	:info:build ; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT
7555	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT)
7556	:info:build ; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE
7557	:info:build ; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE))
7558	:info:build ; FORMAT
7559	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
7560	:info:build ; (LET (#)
7561	:info:build ; (IF #
7562	:info:build ; #
7563	:info:build ; CHAR-CODE)))))
7564	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7565	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7566	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7567	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7568	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7569	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
7570	:info:build ; --> SB-KERNEL:%SCHARSET
7571	:info:build ; ==>
7572	:info:build ; 1
7573	:info:build ;
7574	:info:build ; note: forced to do full call
7575	:info:build ; unable to do inline ASH (cost 3) because:
7576	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7577	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7578	:info:build ; (SIGNED-BYTE 32)
7579	:info:build ; &OPTIONAL).
7580	:info:build ; unable to do inline constant ASH (cost 4) because:
7581	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7582	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7583	:info:build ; (UNSIGNED-BYTE 32)
7584	:info:build ; &OPTIONAL).
7585	:info:build ; etc.
7586	:info:build ;
7587	:info:build ; note: forced to do GENERIC-> (cost 10)
7588	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7589	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7590	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
7591	:info:build ; (LET ((CHAR-CODE (AREF # #)))
7592	:info:build ; (IF (OR (NULL CHAR-CODE) (= # 65533))
7593	:info:build ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
7594	:info:build ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
7595	:info:build ; CHAR-CODE)))
7596	:info:build ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
7597	:info:build ; ==>
7598	:info:build ; 1
7599	:info:build ;
7600	:info:build ; note: unable to
7601	:info:build ; optimize
7602	:info:build ; because:
7603	:info:build ; Upgraded element type of array is not known at compile time.
7604	:info:build ;
7605	:info:build ; note: unable to
7606	:info:build ; optimize
7607	:info:build ; because:
7608	:info:build ; Upgraded element type of array is not known at compile time.
7609	:info:build ;
7610	:info:build ; note: unable to
7611	:info:build ; optimize
7612	:info:build ; because:
7613	:info:build ; Upgraded element type of array is not known at compile time.
7614	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT
7615	:info:build ; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT
7616	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT)
7617	:info:build ; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE
7618	:info:build ; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE))
7619	:info:build ; FORMAT
7620	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
7621	:info:build ; (LET (#)
7622	:info:build ; (IF #
7623	:info:build ; #
7624	:info:build ; CHAR-CODE)))))
7625	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7626	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7627	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7628	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7629	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7630	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7631	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
7632	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
7633	:info:build ; --> PROGN LET WHEN IF AND IF OR LET <=
7634	:info:build ; ==>
7635	:info:build ; 1
7636	:info:build ;
7637	:info:build ; note: forced to do full call
7638	:info:build ; unable to do inline ASH (cost 3) because:
7639	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7640	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7641	:info:build ; (SIGNED-BYTE 32)
7642	:info:build ; &OPTIONAL).
7643	:info:build ; unable to do inline constant ASH (cost 4) because:
7644	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7645	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7646	:info:build ; (UNSIGNED-BYTE 32)
7647	:info:build ; &OPTIONAL).
7648	:info:build ; etc.
7649	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7650	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7651	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7652	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7653	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7654	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7655	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
7656	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
7657	:info:build ; --> PROGN LET WHEN IF AND IF OR LET IF
7658	:info:build ; ==>
7659	:info:build ; (> #:CHAR-CODE0 1114111)
7660	:info:build ;
7661	:info:build ; note: forced to do GENERIC-> (cost 10)
7662	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7663	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7664	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7665	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7666	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7667	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7668	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7669	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7670	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
7671	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
7672	:info:build ; --> LET PROGN LET WHEN IF AND IF OR LET <=
7673	:info:build ; ==>
7674	:info:build ; 1
7675	:info:build ;
7676	:info:build ; note: forced to do full call
7677	:info:build ; unable to do inline ASH (cost 3) because:
7678	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7679	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7680	:info:build ; (SIGNED-BYTE 32)
7681	:info:build ; &OPTIONAL).
7682	:info:build ; unable to do inline constant ASH (cost 4) because:
7683	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7684	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7685	:info:build ; (UNSIGNED-BYTE 32)
7686	:info:build ; &OPTIONAL).
7687	:info:build ; etc.
7688	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7689	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7690	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7691	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7692	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7693	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7694	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
7695	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
7696	:info:build ; --> LET PROGN LET WHEN IF AND IF OR LET IF
7697	:info:build ; ==>
7698	:info:build ; (> #:CHAR-CODE0 1114111)
7699	:info:build ;
7700	:info:build ; note: forced to do GENERIC-> (cost 10)
7701	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7702	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7703	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7704	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7705	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7706	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7707	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7708	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7709	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
7710	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
7711	:info:build ; --> PROGN LET WHEN IF AND IF OR LET <=
7712	:info:build ; ==>
7713	:info:build ; 1
7714	:info:build ;
7715	:info:build ; note: forced to do full call
7716	:info:build ; unable to do inline ASH (cost 3) because:
7717	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7718	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7719	:info:build ; (SIGNED-BYTE 32)
7720	:info:build ; &OPTIONAL).
7721	:info:build ; unable to do inline constant ASH (cost 4) because:
7722	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7723	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7724	:info:build ; (UNSIGNED-BYTE 32)
7725	:info:build ; &OPTIONAL).
7726	:info:build ; etc.
7727	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7728	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7729	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7730	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7731	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7732	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7733	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
7734	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
7735	:info:build ; --> PROGN LET WHEN IF AND IF OR LET IF
7736	:info:build ; ==>
7737	:info:build ; (> #:CHAR-CODE0 1114111)
7738	:info:build ;
7739	:info:build ; note: forced to do GENERIC-> (cost 10)
7740	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7741	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7742	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
7743	:info:build ; (LET ((CHAR-CODE (AREF # #)))
7744	:info:build ; (IF (OR (NULL CHAR-CODE) (= # 65533))
7745	:info:build ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
7746	:info:build ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
7747	:info:build ; CHAR-CODE)))
7748	:info:build ;
7749	:info:build ; note: unable to
7750	:info:build ; optimize
7751	:info:build ; because:
7752	:info:build ; Upgraded element type of array is not known at compile time.
7753	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT
7754	:info:build ; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT
7755	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT)
7756	:info:build ; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE
7757	:info:build ; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE))
7758	:info:build ; FORMAT
7759	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
7760	:info:build ; (LET (#)
7761	:info:build ; (IF #
7762	:info:build ; #
7763	:info:build ; CHAR-CODE)))))
7764	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7765	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7766	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7767	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7768	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7769	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
7770	:info:build ; --> SB-KERNEL:%SCHARSET
7771	:info:build ; ==>
7772	:info:build ; 1
7773	:info:build ;
7774	:info:build ; note: forced to do full call
7775	:info:build ; unable to do inline ASH (cost 3) because:
7776	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7777	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7778	:info:build ; (SIGNED-BYTE 32)
7779	:info:build ; &OPTIONAL).
7780	:info:build ; unable to do inline constant ASH (cost 4) because:
7781	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7782	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7783	:info:build ; (UNSIGNED-BYTE 32)
7784	:info:build ; &OPTIONAL).
7785	:info:build ; etc.
7786	:info:build ;
7787	:info:build ; note: forced to do GENERIC-> (cost 10)
7788	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7789	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7790	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
7791	:info:build ; (LET ((CHAR-CODE (AREF # #)))
7792	:info:build ; (IF (OR (NULL CHAR-CODE) (= # 65533))
7793	:info:build ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
7794	:info:build ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
7795	:info:build ; CHAR-CODE)))
7796	:info:build ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
7797	:info:build ; ==>
7798	:info:build ; 1
7799	:info:build ;
7800	:info:build ; note: unable to
7801	:info:build ; optimize
7802	:info:build ; because:
7803	:info:build ; Upgraded element type of array is not known at compile time.
7804	:info:build ;
7805	:info:build ; note: unable to
7806	:info:build ; optimize
7807	:info:build ; because:
7808	:info:build ; Upgraded element type of array is not known at compile time.
7809	:info:build ;
7810	:info:build ; note: unable to
7811	:info:build ; optimize
7812	:info:build ; because:
7813	:info:build ; Upgraded element type of array is not known at compile time.
7814	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT
7815	:info:build ; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT
7816	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT)
7817	:info:build ; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE
7818	:info:build ; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE))
7819	:info:build ; FORMAT
7820	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
7821	:info:build ; (LET (#)
7822	:info:build ; (IF #
7823	:info:build ; #
7824	:info:build ; CHAR-CODE)))))
7825	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7826	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7827	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7828	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7829	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7830	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7831	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
7832	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
7833	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
7834	:info:build ; ==>
7835	:info:build ; 1
7836	:info:build ;
7837	:info:build ; note: forced to do full call
7838	:info:build ; unable to do inline ASH (cost 3) because:
7839	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7840	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7841	:info:build ; (SIGNED-BYTE 32)
7842	:info:build ; &OPTIONAL).
7843	:info:build ; unable to do inline constant ASH (cost 4) because:
7844	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7845	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7846	:info:build ; (UNSIGNED-BYTE 32)
7847	:info:build ; &OPTIONAL).
7848	:info:build ; etc.
7849	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7850	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7851	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7852	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7853	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7854	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7855	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
7856	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
7857	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF
7858	:info:build ; ==>
7859	:info:build ; (> #:CHAR-CODE0 1114111)
7860	:info:build ;
7861	:info:build ; note: forced to do GENERIC-> (cost 10)
7862	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7863	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7864	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7865	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7866	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7867	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7868	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7869	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7870	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
7871	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
7872	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
7873	:info:build ; ==>
7874	:info:build ; 1
7875	:info:build ;
7876	:info:build ; note: forced to do full call
7877	:info:build ; unable to do inline ASH (cost 3) because:
7878	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7879	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7880	:info:build ; (SIGNED-BYTE 32)
7881	:info:build ; &OPTIONAL).
7882	:info:build ; unable to do inline constant ASH (cost 4) because:
7883	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7884	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7885	:info:build ; (UNSIGNED-BYTE 32)
7886	:info:build ; &OPTIONAL).
7887	:info:build ; etc.
7888	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7889	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7890	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7891	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7892	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7893	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7894	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
7895	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
7896	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF
7897	:info:build ; ==>
7898	:info:build ; (> #:CHAR-CODE0 1114111)
7899	:info:build ;
7900	:info:build ; note: forced to do GENERIC-> (cost 10)
7901	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7902	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7903	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7904	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7905	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7906	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7907	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7908	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7909	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
7910	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
7911	:info:build ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
7912	:info:build ; ==>
7913	:info:build ; 1
7914	:info:build ;
7915	:info:build ; note: forced to do full call
7916	:info:build ; unable to do inline ASH (cost 3) because:
7917	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7918	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7919	:info:build ; (SIGNED-BYTE 32)
7920	:info:build ; &OPTIONAL).
7921	:info:build ; unable to do inline constant ASH (cost 4) because:
7922	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7923	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7924	:info:build ; (UNSIGNED-BYTE 32)
7925	:info:build ; &OPTIONAL).
7926	:info:build ; etc.
7927	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7928	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7929	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7930	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7931	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7932	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
7933	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
7934	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
7935	:info:build ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF
7936	:info:build ; ==>
7937	:info:build ; (> #:CHAR-CODE0 1114111)
7938	:info:build ;
7939	:info:build ; note: forced to do GENERIC-> (cost 10)
7940	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7941	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7942	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
7943	:info:build ; (LET ((CHAR-CODE (AREF # #)))
7944	:info:build ; (IF (OR (NULL CHAR-CODE) (= # 65533))
7945	:info:build ; (FLEXI-STREAMS::RECOVER-FROM-ENCODING-ERROR FORMAT
7946	:info:build ; "No character which corresponds to octet #x~X." FLEXI-STREAMS:OCTET)
7947	:info:build ; CHAR-CODE)))
7948	:info:build ;
7949	:info:build ; note: unable to
7950	:info:build ; optimize
7951	:info:build ; because:
7952	:info:build ; Upgraded element type of array is not known at compile time.
7953	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-8-BIT-FORMAT
7954	:info:build ; FLEXI-STREAMS::FLEXI-CR-8-BIT-FORMAT
7955	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-8-BIT-FORMAT)
7956	:info:build ; (WITH-ACCESSORS ((FLEXI-STREAMS::DECODING-TABLE
7957	:info:build ; FLEXI-STREAMS::EXTERNAL-FORMAT-DECODING-TABLE))
7958	:info:build ; FORMAT
7959	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
7960	:info:build ; (LET (#)
7961	:info:build ; (IF #
7962	:info:build ; #
7963	:info:build ; CHAR-CODE)))))
7964	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
7965	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
7966	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
7967	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
7968	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
7969	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
7970	:info:build ; --> SB-KERNEL:%SCHARSET
7971	:info:build ; ==>
7972	:info:build ; 1
7973	:info:build ;
7974	:info:build ; note: forced to do full call
7975	:info:build ; unable to do inline ASH (cost 3) because:
7976	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
7977	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7978	:info:build ; (SIGNED-BYTE 32)
7979	:info:build ; &OPTIONAL).
7980	:info:build ; unable to do inline constant ASH (cost 4) because:
7981	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
7982	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
7983	:info:build ; (UNSIGNED-BYTE 32)
7984	:info:build ; &OPTIONAL).
7985	:info:build ; etc.
7986	:info:build ;
7987	:info:build ; note: forced to do GENERIC-> (cost 10)
7988	:info:build ; unable to do inline fixnum comparison (cost 4) because:
7989	:info:build ; The first argument is a INTEGER, not a FIXNUM.
7990	:info:build ;
7991	:info:build ; note: forced to do GENERIC-- (cost 10)
7992	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
7993	:info:build ; The second argument is a T, not a FIXNUM.
7994	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
7995	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
7996	:info:build ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
7997	:info:build ; The second argument is a T, not a (UNSIGNED-BYTE 32).
7998	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
7999	:info:build ; (UNSIGNED-BYTE 32)
8000	:info:build ; &OPTIONAL).
8001	:info:build ; etc.
8002	:info:build ; in:
8003	:info:build ; DEFINE-CHAR-DECODERS (FLEXI-UTF-8-FORMAT FLEXI-CR-UTF-8-FORMAT
8004	:info:build ; FLEXI-CRLF-UTF-8-FORMAT)
8005	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT
8006	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT
8007	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT)
8008	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
8009	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
8010	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
8011	:info:build ; '#))
8012	:info:build ; (FLET (#)
8013	:info:build ; (LET #
8014	:info:build ; #
8015	:info:build ; #)))))
8016	:info:build ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
8017	:info:build ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
8018	:info:build ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8019	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8020	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8021	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
8022	:info:build ; --> <=
8023	:info:build ; ==>
8024	:info:build ; 1
8025	:info:build ;
8026	:info:build ; note: forced to do full call
8027	:info:build ; unable to do inline ASH (cost 3) because:
8028	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
8029	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8030	:info:build ; (SIGNED-BYTE 32)
8031	:info:build ; &OPTIONAL).
8032	:info:build ; unable to do inline constant ASH (cost 4) because:
8033	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
8034	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8035	:info:build ; (UNSIGNED-BYTE 32)
8036	:info:build ; &OPTIONAL).
8037	:info:build ; etc.
8038	:info:build ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
8039	:info:build ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
8040	:info:build ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8041	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8042	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8043	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
8044	:info:build ; --> IF
8045	:info:build ; ==>
8046	:info:build ; (> #:CHAR-CODE0 1114111)
8047	:info:build ;
8048	:info:build ; note: forced to do GENERIC-> (cost 10)
8049	:info:build ; unable to do inline fixnum comparison (cost 4) because:
8050	:info:build ; The first argument is a INTEGER, not a FIXNUM.
8051	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
8052	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
8053	:info:build ; ==>
8054	:info:build ; 1
8055	:info:build ;
8056	:info:build ; note: unable to
8057	:info:build ; optimize
8058	:info:build ; because:
8059	:info:build ; Upgraded element type of array is not known at compile time.
8060	:info:build ;
8061	:info:build ; note: unable to
8062	:info:build ; optimize
8063	:info:build ; because:
8064	:info:build ; Upgraded element type of array is not known at compile time.
8065	:info:build ;
8066	:info:build ; note: unable to
8067	:info:build ; optimize
8068	:info:build ; because:
8069	:info:build ; Upgraded element type of array is not known at compile time.
8070	:info:build ;
8071	:info:build ; note: unable to
8072	:info:build ; optimize
8073	:info:build ; because:
8074	:info:build ; Upgraded element type of array is not known at compile time.
8075	:info:build ;
8076	:info:build ; note: unable to
8077	:info:build ; optimize
8078	:info:build ; because:
8079	:info:build ; Upgraded element type of array is not known at compile time.
8080	:info:build ;
8081	:info:build ; note: unable to
8082	:info:build ; optimize
8083	:info:build ; because:
8084	:info:build ; Upgraded element type of array is not known at compile time.
8085	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT
8086	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT
8087	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT)
8088	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
8089	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
8090	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
8091	:info:build ; '#))
8092	:info:build ; (FLET (#)
8093	:info:build ; (LET #
8094	:info:build ; #
8095	:info:build ; #)))))
8096	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8097	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8098	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8099	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8100	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8101	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
8102	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
8103	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
8104	:info:build ; --> WHEN IF AND IF OR LET <=
8105	:info:build ; ==>
8106	:info:build ; 1
8107	:info:build ;
8108	:info:build ; note: forced to do full call
8109	:info:build ; unable to do inline ASH (cost 3) because:
8110	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
8111	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8112	:info:build ; (SIGNED-BYTE 32)
8113	:info:build ; &OPTIONAL).
8114	:info:build ; unable to do inline constant ASH (cost 4) because:
8115	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
8116	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8117	:info:build ; (UNSIGNED-BYTE 32)
8118	:info:build ; &OPTIONAL).
8119	:info:build ; etc.
8120	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8121	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8122	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8123	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8124	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8125	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
8126	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
8127	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
8128	:info:build ; --> WHEN IF AND IF OR LET IF
8129	:info:build ; ==>
8130	:info:build ; (> #:CHAR-CODE0 1114111)
8131	:info:build ;
8132	:info:build ; note: forced to do GENERIC-> (cost 10)
8133	:info:build ; unable to do inline fixnum comparison (cost 4) because:
8134	:info:build ; The first argument is a INTEGER, not a FIXNUM.
8135	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8136	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8137	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8138	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8139	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8140	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
8141	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
8142	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
8143	:info:build ; --> LET WHEN IF AND IF OR LET <=
8144	:info:build ; ==>
8145	:info:build ; 1
8146	:info:build ;
8147	:info:build ; note: forced to do full call
8148	:info:build ; unable to do inline ASH (cost 3) because:
8149	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
8150	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8151	:info:build ; (SIGNED-BYTE 32)
8152	:info:build ; &OPTIONAL).
8153	:info:build ; unable to do inline constant ASH (cost 4) because:
8154	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
8155	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8156	:info:build ; (UNSIGNED-BYTE 32)
8157	:info:build ; &OPTIONAL).
8158	:info:build ; etc.
8159	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8160	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8161	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8162	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8163	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8164	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
8165	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
8166	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
8167	:info:build ; --> LET WHEN IF AND IF OR LET IF
8168	:info:build ; ==>
8169	:info:build ; (> #:CHAR-CODE0 1114111)
8170	:info:build ;
8171	:info:build ; note: forced to do GENERIC-> (cost 10)
8172	:info:build ; unable to do inline fixnum comparison (cost 4) because:
8173	:info:build ; The first argument is a INTEGER, not a FIXNUM.
8174	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8175	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8176	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8177	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8178	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8179	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
8180	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
8181	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
8182	:info:build ; --> WHEN IF AND IF OR LET <=
8183	:info:build ; ==>
8184	:info:build ; 1
8185	:info:build ;
8186	:info:build ; note: forced to do full call
8187	:info:build ; unable to do inline ASH (cost 3) because:
8188	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
8189	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8190	:info:build ; (SIGNED-BYTE 32)
8191	:info:build ; &OPTIONAL).
8192	:info:build ; unable to do inline constant ASH (cost 4) because:
8193	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
8194	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8195	:info:build ; (UNSIGNED-BYTE 32)
8196	:info:build ; &OPTIONAL).
8197	:info:build ; etc.
8198	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8199	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8200	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8201	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8202	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8203	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
8204	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
8205	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
8206	:info:build ; --> WHEN IF AND IF OR LET IF
8207	:info:build ; ==>
8208	:info:build ; (> #:CHAR-CODE0 1114111)
8209	:info:build ;
8210	:info:build ; note: forced to do GENERIC-> (cost 10)
8211	:info:build ; unable to do inline fixnum comparison (cost 4) because:
8212	:info:build ; The first argument is a INTEGER, not a FIXNUM.
8213	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
8214	:info:build ;
8215	:info:build ; note: unable to
8216	:info:build ; optimize
8217	:info:build ; because:
8218	:info:build ; Upgraded element type of array is not known at compile time.
8219	:info:build ;
8220	:info:build ; note: unable to
8221	:info:build ; optimize
8222	:info:build ; because:
8223	:info:build ; Upgraded element type of array is not known at compile time.
8224	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT
8225	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT
8226	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT)
8227	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
8228	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
8229	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
8230	:info:build ; '#))
8231	:info:build ; (FLET (#)
8232	:info:build ; (LET #
8233	:info:build ; #
8234	:info:build ; #)))))
8235	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8236	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8237	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8238	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8239	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8240	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
8241	:info:build ; --> SB-KERNEL:%SCHARSET
8242	:info:build ; ==>
8243	:info:build ; 1
8244	:info:build ;
8245	:info:build ; note: forced to do full call
8246	:info:build ; unable to do inline ASH (cost 3) because:
8247	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
8248	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8249	:info:build ; (SIGNED-BYTE 32)
8250	:info:build ; &OPTIONAL).
8251	:info:build ; unable to do inline constant ASH (cost 4) because:
8252	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
8253	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8254	:info:build ; (UNSIGNED-BYTE 32)
8255	:info:build ; &OPTIONAL).
8256	:info:build ; etc.
8257	:info:build ;
8258	:info:build ; note: forced to do GENERIC-> (cost 10)
8259	:info:build ; unable to do inline fixnum comparison (cost 4) because:
8260	:info:build ; The first argument is a INTEGER, not a FIXNUM.
8261	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
8262	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
8263	:info:build ; ==>
8264	:info:build ; 1
8265	:info:build ;
8266	:info:build ; note: unable to
8267	:info:build ; optimize
8268	:info:build ; because:
8269	:info:build ; Upgraded element type of array is not known at compile time.
8270	:info:build ;
8271	:info:build ; note: unable to
8272	:info:build ; optimize
8273	:info:build ; because:
8274	:info:build ; Upgraded element type of array is not known at compile time.
8275	:info:build ;
8276	:info:build ; note: unable to
8277	:info:build ; optimize
8278	:info:build ; because:
8279	:info:build ; Upgraded element type of array is not known at compile time.
8280	:info:build ;
8281	:info:build ; note: unable to
8282	:info:build ; optimize
8283	:info:build ; because:
8284	:info:build ; Upgraded element type of array is not known at compile time.
8285	:info:build ;
8286	:info:build ; note: unable to
8287	:info:build ; optimize
8288	:info:build ; because:
8289	:info:build ; Upgraded element type of array is not known at compile time.
8290	:info:build ;
8291	:info:build ; note: unable to
8292	:info:build ; optimize
8293	:info:build ; because:
8294	:info:build ; Upgraded element type of array is not known at compile time.
8295	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT
8296	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT
8297	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT)
8298	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
8299	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
8300	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
8301	:info:build ; '#))
8302	:info:build ; (FLET (#)
8303	:info:build ; (LET #
8304	:info:build ; #
8305	:info:build ; #)))))
8306	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8307	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8308	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8309	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8310	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8311	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
8312	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
8313	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
8314	:info:build ; --> PROGN LET WHEN IF AND IF OR LET <=
8315	:info:build ; ==>
8316	:info:build ; 1
8317	:info:build ;
8318	:info:build ; note: forced to do full call
8319	:info:build ; unable to do inline ASH (cost 3) because:
8320	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
8321	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8322	:info:build ; (SIGNED-BYTE 32)
8323	:info:build ; &OPTIONAL).
8324	:info:build ; unable to do inline constant ASH (cost 4) because:
8325	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
8326	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8327	:info:build ; (UNSIGNED-BYTE 32)
8328	:info:build ; &OPTIONAL).
8329	:info:build ; etc.
8330	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8331	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8332	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8333	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8334	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8335	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
8336	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
8337	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
8338	:info:build ; --> PROGN LET WHEN IF AND IF OR LET IF
8339	:info:build ; ==>
8340	:info:build ; (> #:CHAR-CODE0 1114111)
8341	:info:build ;
8342	:info:build ; note: forced to do GENERIC-> (cost 10)
8343	:info:build ; unable to do inline fixnum comparison (cost 4) because:
8344	:info:build ; The first argument is a INTEGER, not a FIXNUM.
8345	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8346	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8347	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8348	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8349	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8350	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
8351	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
8352	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
8353	:info:build ; --> LET PROGN LET WHEN IF AND IF OR LET <=
8354	:info:build ; ==>
8355	:info:build ; 1
8356	:info:build ;
8357	:info:build ; note: forced to do full call
8358	:info:build ; unable to do inline ASH (cost 3) because:
8359	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
8360	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8361	:info:build ; (SIGNED-BYTE 32)
8362	:info:build ; &OPTIONAL).
8363	:info:build ; unable to do inline constant ASH (cost 4) because:
8364	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
8365	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8366	:info:build ; (UNSIGNED-BYTE 32)
8367	:info:build ; &OPTIONAL).
8368	:info:build ; etc.
8369	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8370	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8371	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8372	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8373	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8374	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
8375	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
8376	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
8377	:info:build ; --> LET PROGN LET WHEN IF AND IF OR LET IF
8378	:info:build ; ==>
8379	:info:build ; (> #:CHAR-CODE0 1114111)
8380	:info:build ;
8381	:info:build ; note: forced to do GENERIC-> (cost 10)
8382	:info:build ; unable to do inline fixnum comparison (cost 4) because:
8383	:info:build ; The first argument is a INTEGER, not a FIXNUM.
8384	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8385	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8386	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8387	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8388	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8389	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
8390	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
8391	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
8392	:info:build ; --> PROGN LET WHEN IF AND IF OR LET <=
8393	:info:build ; ==>
8394	:info:build ; 1
8395	:info:build ;
8396	:info:build ; note: forced to do full call
8397	:info:build ; unable to do inline ASH (cost 3) because:
8398	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
8399	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8400	:info:build ; (SIGNED-BYTE 32)
8401	:info:build ; &OPTIONAL).
8402	:info:build ; unable to do inline constant ASH (cost 4) because:
8403	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
8404	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8405	:info:build ; (UNSIGNED-BYTE 32)
8406	:info:build ; &OPTIONAL).
8407	:info:build ; etc.
8408	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8409	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8410	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8411	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8412	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8413	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
8414	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
8415	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
8416	:info:build ; --> PROGN LET WHEN IF AND IF OR LET IF
8417	:info:build ; ==>
8418	:info:build ; (> #:CHAR-CODE0 1114111)
8419	:info:build ;
8420	:info:build ; note: forced to do GENERIC-> (cost 10)
8421	:info:build ; unable to do inline fixnum comparison (cost 4) because:
8422	:info:build ; The first argument is a INTEGER, not a FIXNUM.
8423	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
8424	:info:build ;
8425	:info:build ; note: unable to
8426	:info:build ; optimize
8427	:info:build ; because:
8428	:info:build ; Upgraded element type of array is not known at compile time.
8429	:info:build ;
8430	:info:build ; note: unable to
8431	:info:build ; optimize
8432	:info:build ; because:
8433	:info:build ; Upgraded element type of array is not known at compile time.
8434	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT
8435	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT
8436	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT)
8437	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
8438	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
8439	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
8440	:info:build ; '#))
8441	:info:build ; (FLET (#)
8442	:info:build ; (LET #
8443	:info:build ; #
8444	:info:build ; #)))))
8445	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8446	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8447	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8448	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8449	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8450	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
8451	:info:build ; --> SB-KERNEL:%SCHARSET
8452	:info:build ; ==>
8453	:info:build ; 1
8454	:info:build ;
8455	:info:build ; note: forced to do full call
8456	:info:build ; unable to do inline ASH (cost 3) because:
8457	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
8458	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8459	:info:build ; (SIGNED-BYTE 32)
8460	:info:build ; &OPTIONAL).
8461	:info:build ; unable to do inline constant ASH (cost 4) because:
8462	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
8463	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8464	:info:build ; (UNSIGNED-BYTE 32)
8465	:info:build ; &OPTIONAL).
8466	:info:build ; etc.
8467	:info:build ;
8468	:info:build ; note: forced to do GENERIC-> (cost 10)
8469	:info:build ; unable to do inline fixnum comparison (cost 4) because:
8470	:info:build ; The first argument is a INTEGER, not a FIXNUM.
8471	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
8472	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
8473	:info:build ; ==>
8474	:info:build ; 1
8475	:info:build ;
8476	:info:build ; note: unable to
8477	:info:build ; optimize
8478	:info:build ; because:
8479	:info:build ; Upgraded element type of array is not known at compile time.
8480	:info:build ;
8481	:info:build ; note: unable to
8482	:info:build ; optimize
8483	:info:build ; because:
8484	:info:build ; Upgraded element type of array is not known at compile time.
8485	:info:build ;
8486	:info:build ; note: unable to
8487	:info:build ; optimize
8488	:info:build ; because:
8489	:info:build ; Upgraded element type of array is not known at compile time.
8490	:info:build ;
8491	:info:build ; note: unable to
8492	:info:build ; optimize
8493	:info:build ; because:
8494	:info:build ; Upgraded element type of array is not known at compile time.
8495	:info:build ;
8496	:info:build ; note: unable to
8497	:info:build ; optimize
8498	:info:build ; because:
8499	:info:build ; Upgraded element type of array is not known at compile time.
8500	:info:build ;
8501	:info:build ; note: unable to
8502	:info:build ; optimize
8503	:info:build ; because:
8504	:info:build ; Upgraded element type of array is not known at compile time.
8505	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT
8506	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT
8507	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT)
8508	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
8509	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
8510	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
8511	:info:build ; '#))
8512	:info:build ; (FLET (#)
8513	:info:build ; (LET #
8514	:info:build ; #
8515	:info:build ; #)))))
8516	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8517	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8518	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8519	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8520	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8521	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
8522	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
8523	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
8524	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
8525	:info:build ; ==>
8526	:info:build ; 1
8527	:info:build ;
8528	:info:build ; note: forced to do full call
8529	:info:build ; unable to do inline ASH (cost 3) because:
8530	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
8531	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8532	:info:build ; (SIGNED-BYTE 32)
8533	:info:build ; &OPTIONAL).
8534	:info:build ; unable to do inline constant ASH (cost 4) because:
8535	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
8536	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8537	:info:build ; (UNSIGNED-BYTE 32)
8538	:info:build ; &OPTIONAL).
8539	:info:build ; etc.
8540	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8541	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8542	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8543	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8544	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8545	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
8546	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
8547	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
8548	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF
8549	:info:build ; ==>
8550	:info:build ; (> #:CHAR-CODE0 1114111)
8551	:info:build ;
8552	:info:build ; note: forced to do GENERIC-> (cost 10)
8553	:info:build ; unable to do inline fixnum comparison (cost 4) because:
8554	:info:build ; The first argument is a INTEGER, not a FIXNUM.
8555	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8556	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8557	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8558	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8559	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8560	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
8561	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
8562	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
8563	:info:build ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
8564	:info:build ; ==>
8565	:info:build ; 1
8566	:info:build ;
8567	:info:build ; note: forced to do full call
8568	:info:build ; unable to do inline ASH (cost 3) because:
8569	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
8570	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8571	:info:build ; (SIGNED-BYTE 32)
8572	:info:build ; &OPTIONAL).
8573	:info:build ; unable to do inline constant ASH (cost 4) because:
8574	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
8575	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8576	:info:build ; (UNSIGNED-BYTE 32)
8577	:info:build ; &OPTIONAL).
8578	:info:build ; etc.
8579	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8580	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8581	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8582	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8583	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8584	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
8585	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
8586	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
8587	:info:build ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF
8588	:info:build ; ==>
8589	:info:build ; (> #:CHAR-CODE0 1114111)
8590	:info:build ;
8591	:info:build ; note: forced to do GENERIC-> (cost 10)
8592	:info:build ; unable to do inline fixnum comparison (cost 4) because:
8593	:info:build ; The first argument is a INTEGER, not a FIXNUM.
8594	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8595	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8596	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8597	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8598	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8599	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
8600	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
8601	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
8602	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
8603	:info:build ; ==>
8604	:info:build ; 1
8605	:info:build ;
8606	:info:build ; note: forced to do full call
8607	:info:build ; unable to do inline ASH (cost 3) because:
8608	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
8609	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8610	:info:build ; (SIGNED-BYTE 32)
8611	:info:build ; &OPTIONAL).
8612	:info:build ; unable to do inline constant ASH (cost 4) because:
8613	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
8614	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8615	:info:build ; (UNSIGNED-BYTE 32)
8616	:info:build ; &OPTIONAL).
8617	:info:build ; etc.
8618	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8619	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8620	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8621	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8622	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8623	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
8624	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
8625	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
8626	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF
8627	:info:build ; ==>
8628	:info:build ; (> #:CHAR-CODE0 1114111)
8629	:info:build ;
8630	:info:build ; note: forced to do GENERIC-> (cost 10)
8631	:info:build ; unable to do inline fixnum comparison (cost 4) because:
8632	:info:build ; The first argument is a INTEGER, not a FIXNUM.
8633	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
8634	:info:build ;
8635	:info:build ; note: unable to
8636	:info:build ; optimize
8637	:info:build ; because:
8638	:info:build ; Upgraded element type of array is not known at compile time.
8639	:info:build ;
8640	:info:build ; note: unable to
8641	:info:build ; optimize
8642	:info:build ; because:
8643	:info:build ; Upgraded element type of array is not known at compile time.
8644	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-8-FORMAT
8645	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-8-FORMAT
8646	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-8-FORMAT)
8647	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
8648	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
8649	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
8650	:info:build ; '#))
8651	:info:build ; (FLET (#)
8652	:info:build ; (LET #
8653	:info:build ; #
8654	:info:build ; #)))))
8655	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
8656	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
8657	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
8658	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
8659	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
8660	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
8661	:info:build ; --> SB-KERNEL:%SCHARSET
8662	:info:build ; ==>
8663	:info:build ; 1
8664	:info:build ;
8665	:info:build ; note: forced to do full call
8666	:info:build ; unable to do inline ASH (cost 3) because:
8667	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
8668	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8669	:info:build ; (SIGNED-BYTE 32)
8670	:info:build ; &OPTIONAL).
8671	:info:build ; unable to do inline constant ASH (cost 4) because:
8672	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
8673	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
8674	:info:build ; (UNSIGNED-BYTE 32)
8675	:info:build ; &OPTIONAL).
8676	:info:build ; etc.
8677	:info:build ;
8678	:info:build ; note: forced to do GENERIC-> (cost 10)
8679	:info:build ; unable to do inline fixnum comparison (cost 4) because:
8680	:info:build ; The first argument is a INTEGER, not a FIXNUM.
8681	:info:build ;
8682	:info:build ; note: forced to do GENERIC-- (cost 10)
8683	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
8684	:info:build ; The second argument is a T, not a FIXNUM.
8685	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
8686	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
8687	:info:build ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
8688	:info:build ; The second argument is a T, not a (UNSIGNED-BYTE 32).
8689	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
8690	:info:build ; (UNSIGNED-BYTE 32)
8691	:info:build ; &OPTIONAL).
8692	:info:build ; etc.
8693	:info:build ; in:
8694	:info:build ; DEFINE-CHAR-DECODERS (FLEXI-UTF-16-LE-FORMAT FLEXI-CR-UTF-16-LE-FORMAT
8695	:info:build ; FLEXI-CRLF-UTF-16-LE-FORMAT)
8696	:info:build ; (FLEXI-STREAMS::READ-NEXT-WORD)
8697	:info:build ;
8698	:info:build ; note: implementation limitation: couldn't inline expand because expansion refers to the optimized away object #<SB-C::CTRAN 1 {13A72CE9}>.
8699	:info:build ;
8700	:info:build ; note: deleting unused function
8701	:info:build ; (SB-C::LOCAL-INLINE READ-NEXT-WORD)
8702	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
8703	:info:build ; --> LET OR
8704	:info:build ; ==>
8705	:info:build ; (LET ((#:G40 FLEXI-STREAMS::OCTET-GETTER))
8706	:info:build ; (IF #:G40
8707	:info:build ; #:G40
8708	:info:build ; (COND
8709	:info:build ; (FLEXI-STREAMS::FIRST-OCTET-SEEN
8710	:info:build ; (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE #))
8711	:info:build ; (T (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE NIL)))))
8712	:info:build ;
8713	:info:build ; note: deleting unused function
8714	:info:build ; (LET (#:G40))
8715	:info:build ; (FLEXI-STREAMS::READ-NEXT-WORD)
8716	:info:build ;
8717	:info:build ; note: implementation limitation: couldn't inline expand because expansion refers to the optimized away object #<SB-C::CTRAN 1 {13A72CE9}>.
8718	:info:build ;
8719	:info:build ; note: deleting unused function
8720	:info:build ; (SB-C::LOCAL-INLINE READ-NEXT-WORD)
8721	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
8722	:info:build ; --> LET OR
8723	:info:build ; ==>
8724	:info:build ; (LET ((#:G42 FLEXI-STREAMS::OCTET-GETTER))
8725	:info:build ; (IF #:G42
8726	:info:build ; #:G42
8727	:info:build ; (COND
8728	:info:build ; (FLEXI-STREAMS::FIRST-OCTET-SEEN
8729	:info:build ; (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE #))
8730	:info:build ; (T (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE NIL)))))
8731	:info:build ;
8732	:info:build ; note: deleting unused function
8733	:info:build ; (LET (#:G42))
8734	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
8735	:info:build ; ==>
8736	:info:build ; 1
8737	:info:build ;
8738	:info:build ; note: unable to
8739	:info:build ; optimize
8740	:info:build ; because:
8741	:info:build ; Upgraded element type of array is not known at compile time.
8742	:info:build ;
8743	:info:build ; note: unable to
8744	:info:build ; optimize
8745	:info:build ; because:
8746	:info:build ; Upgraded element type of array is not known at compile time.
8747	:info:build ;
8748	:info:build ; note: unable to
8749	:info:build ; optimize
8750	:info:build ; because:
8751	:info:build ; Upgraded element type of array is not known at compile time.
8752	:info:build ;
8753	:info:build ; note: unable to
8754	:info:build ; optimize
8755	:info:build ; because:
8756	:info:build ; Upgraded element type of array is not known at compile time.
8757	:info:build ;
8758	:info:build ; note: unable to
8759	:info:build ; optimize
8760	:info:build ; because:
8761	:info:build ; Upgraded element type of array is not known at compile time.
8762	:info:build ;
8763	:info:build ; note: unable to
8764	:info:build ; optimize
8765	:info:build ; because:
8766	:info:build ; Upgraded element type of array is not known at compile time.
8767	:info:build ;
8768	:info:build ; note: unable to
8769	:info:build ; optimize
8770	:info:build ; because:
8771	:info:build ; Upgraded element type of array is not known at compile time.
8772	:info:build ;
8773	:info:build ; note: unable to
8774	:info:build ; optimize
8775	:info:build ; because:
8776	:info:build ; Upgraded element type of array is not known at compile time.
8777	:info:build ;
8778	:info:build ; note: unable to
8779	:info:build ; optimize
8780	:info:build ; because:
8781	:info:build ; Upgraded element type of array is not known at compile time.
8782	:info:build ;
8783	:info:build ; note: unable to
8784	:info:build ; optimize
8785	:info:build ; because:
8786	:info:build ; Upgraded element type of array is not known at compile time.
8787	:info:build ;
8788	:info:build ; note: unable to
8789	:info:build ; optimize
8790	:info:build ; because:
8791	:info:build ; Upgraded element type of array is not known at compile time.
8792	:info:build ;
8793	:info:build ; note: unable to
8794	:info:build ; optimize
8795	:info:build ; because:
8796	:info:build ; Upgraded element type of array is not known at compile time.
8797	:info:build ; --> LET OR LET IF COND IF THE RETURN-FROM
8798	:info:build ; ==>
8799	:info:build ; NIL
8800	:info:build ;
8801	:info:build ; caught STYLE-WARNING:
8802	:info:build ; This is not a (MOD 1114112):
8803	:info:build ; NIL
8804	:info:build ; See also:
8805	:info:build ; The SBCL Manual, Node "Handling of Types"
8806	:info:build ;
8807	:info:build ; note: unable to
8808	:info:build ; optimize
8809	:info:build ; because:
8810	:info:build ; Upgraded element type of array is not known at compile time.
8811	:info:build ;
8812	:info:build ; note: unable to
8813	:info:build ; optimize
8814	:info:build ; because:
8815	:info:build ; Upgraded element type of array is not known at compile time.
8816	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF
8817	:info:build ; ==>
8818	:info:build ; 1
8819	:info:build ;
8820	:info:build ; note: unable to
8821	:info:build ; optimize
8822	:info:build ; because:
8823	:info:build ; Upgraded element type of array is not known at compile time.
8824	:info:build ;
8825	:info:build ; note: unable to
8826	:info:build ; optimize
8827	:info:build ; because:
8828	:info:build ; Upgraded element type of array is not known at compile time.
8829	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
8830	:info:build ; ==>
8831	:info:build ; 1
8832	:info:build ;
8833	:info:build ; note: unable to
8834	:info:build ; optimize
8835	:info:build ; because:
8836	:info:build ; Upgraded element type of array is not known at compile time.
8837	:info:build ;
8838	:info:build ; note: unable to
8839	:info:build ; optimize
8840	:info:build ; because:
8841	:info:build ; Upgraded element type of array is not known at compile time.
8842	:info:build ;
8843	:info:build ; note: unable to
8844	:info:build ; optimize
8845	:info:build ; because:
8846	:info:build ; Upgraded element type of array is not known at compile time.
8847	:info:build ;
8848	:info:build ; note: unable to
8849	:info:build ; optimize
8850	:info:build ; because:
8851	:info:build ; Upgraded element type of array is not known at compile time.
8852	:info:build ;
8853	:info:build ; note: unable to
8854	:info:build ; optimize
8855	:info:build ; because:
8856	:info:build ; Upgraded element type of array is not known at compile time.
8857	:info:build ;
8858	:info:build ; note: unable to
8859	:info:build ; optimize
8860	:info:build ; because:
8861	:info:build ; Upgraded element type of array is not known at compile time.
8862	:info:build ;
8863	:info:build ; note: unable to
8864	:info:build ; optimize
8865	:info:build ; because:
8866	:info:build ; Upgraded element type of array is not known at compile time.
8867	:info:build ;
8868	:info:build ; note: unable to
8869	:info:build ; optimize
8870	:info:build ; because:
8871	:info:build ; Upgraded element type of array is not known at compile time.
8872	:info:build ;
8873	:info:build ; note: unable to
8874	:info:build ; optimize
8875	:info:build ; because:
8876	:info:build ; Upgraded element type of array is not known at compile time.
8877	:info:build ;
8878	:info:build ; note: unable to
8879	:info:build ; optimize
8880	:info:build ; because:
8881	:info:build ; Upgraded element type of array is not known at compile time.
8882	:info:build ;
8883	:info:build ; note: unable to
8884	:info:build ; optimize
8885	:info:build ; because:
8886	:info:build ; Upgraded element type of array is not known at compile time.
8887	:info:build ;
8888	:info:build ; note: unable to
8889	:info:build ; optimize
8890	:info:build ; because:
8891	:info:build ; Upgraded element type of array is not known at compile time.
8892	:info:build ; --> LET OR LET IF COND IF THE RETURN-FROM
8893	:info:build ; ==>
8894	:info:build ; NIL
8895	:info:build ;
8896	:info:build ; caught STYLE-WARNING:
8897	:info:build ; This is not a (MOD 1114112):
8898	:info:build ; NIL
8899	:info:build ; See also:
8900	:info:build ; The SBCL Manual, Node "Handling of Types"
8901	:info:build ;
8902	:info:build ; note: unable to
8903	:info:build ; optimize
8904	:info:build ; because:
8905	:info:build ; Upgraded element type of array is not known at compile time.
8906	:info:build ;
8907	:info:build ; note: unable to
8908	:info:build ; optimize
8909	:info:build ; because:
8910	:info:build ; Upgraded element type of array is not known at compile time.
8911	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF
8912	:info:build ; ==>
8913	:info:build ; 1
8914	:info:build ;
8915	:info:build ; note: unable to
8916	:info:build ; optimize
8917	:info:build ; because:
8918	:info:build ; Upgraded element type of array is not known at compile time.
8919	:info:build ;
8920	:info:build ; note: unable to
8921	:info:build ; optimize
8922	:info:build ; because:
8923	:info:build ; Upgraded element type of array is not known at compile time.
8924	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
8925	:info:build ; ==>
8926	:info:build ; 1
8927	:info:build ;
8928	:info:build ; note: unable to
8929	:info:build ; optimize
8930	:info:build ; because:
8931	:info:build ; Upgraded element type of array is not known at compile time.
8932	:info:build ;
8933	:info:build ; note: unable to
8934	:info:build ; optimize
8935	:info:build ; because:
8936	:info:build ; Upgraded element type of array is not known at compile time.
8937	:info:build ;
8938	:info:build ; note: unable to
8939	:info:build ; optimize
8940	:info:build ; because:
8941	:info:build ; Upgraded element type of array is not known at compile time.
8942	:info:build ;
8943	:info:build ; note: unable to
8944	:info:build ; optimize
8945	:info:build ; because:
8946	:info:build ; Upgraded element type of array is not known at compile time.
8947	:info:build ;
8948	:info:build ; note: unable to
8949	:info:build ; optimize
8950	:info:build ; because:
8951	:info:build ; Upgraded element type of array is not known at compile time.
8952	:info:build ;
8953	:info:build ; note: unable to
8954	:info:build ; optimize
8955	:info:build ; because:
8956	:info:build ; Upgraded element type of array is not known at compile time.
8957	:info:build ;
8958	:info:build ; note: unable to
8959	:info:build ; optimize
8960	:info:build ; because:
8961	:info:build ; Upgraded element type of array is not known at compile time.
8962	:info:build ;
8963	:info:build ; note: unable to
8964	:info:build ; optimize
8965	:info:build ; because:
8966	:info:build ; Upgraded element type of array is not known at compile time.
8967	:info:build ;
8968	:info:build ; note: unable to
8969	:info:build ; optimize
8970	:info:build ; because:
8971	:info:build ; Upgraded element type of array is not known at compile time.
8972	:info:build ;
8973	:info:build ; note: unable to
8974	:info:build ; optimize
8975	:info:build ; because:
8976	:info:build ; Upgraded element type of array is not known at compile time.
8977	:info:build ;
8978	:info:build ; note: unable to
8979	:info:build ; optimize
8980	:info:build ; because:
8981	:info:build ; Upgraded element type of array is not known at compile time.
8982	:info:build ;
8983	:info:build ; note: unable to
8984	:info:build ; optimize
8985	:info:build ; because:
8986	:info:build ; Upgraded element type of array is not known at compile time.
8987	:info:build ; --> LET OR LET IF COND IF THE
8988	:info:build ; ==>
8989	:info:build ; (RETURN-FROM FLEXI-STREAMS::CHAR-DECODER NIL)
8990	:info:build ;
8991	:info:build ; caught STYLE-WARNING:
8992	:info:build ; Result is a (VALUES &OPTIONAL NULL &REST T), not a (MOD 1114112).
8993	:info:build ; See also:
8994	:info:build ; The SBCL Manual, Node "Handling of Types"
8995	:info:build ;
8996	:info:build ; note: unable to
8997	:info:build ; optimize
8998	:info:build ; because:
8999	:info:build ; Upgraded element type of array is not known at compile time.
9000	:info:build ;
9001	:info:build ; note: unable to
9002	:info:build ; optimize
9003	:info:build ; because:
9004	:info:build ; Upgraded element type of array is not known at compile time.
9005	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF
9006	:info:build ; ==>
9007	:info:build ; 1
9008	:info:build ;
9009	:info:build ; note: unable to
9010	:info:build ; optimize
9011	:info:build ; because:
9012	:info:build ; Upgraded element type of array is not known at compile time.
9013	:info:build ;
9014	:info:build ; note: unable to
9015	:info:build ; optimize
9016	:info:build ; because:
9017	:info:build ; Upgraded element type of array is not known at compile time.
9018	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-16-LE-FORMAT
9019	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-16-LE-FORMAT
9020	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-LE-FORMAT)
9021	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
9022	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
9023	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
9024	:info:build ; '#))
9025	:info:build ; (FLET (#)
9026	:info:build ; (DECLARE #)
9027	:info:build ; (LET #
9028	:info:build ; #
9029	:info:build ; #)))))
9030	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
9031	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
9032	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
9033	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
9034	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
9035	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
9036	:info:build ; --> SB-KERNEL:%SCHARSET
9037	:info:build ; ==>
9038	:info:build ; 1
9039	:info:build ;
9040	:info:build ; note: forced to do GENERIC-- (cost 10)
9041	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
9042	:info:build ; The second argument is a T, not a FIXNUM.
9043	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
9044	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
9045	:info:build ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
9046	:info:build ; The second argument is a T, not a (UNSIGNED-BYTE 32).
9047	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
9048	:info:build ; (UNSIGNED-BYTE 32)
9049	:info:build ; &OPTIONAL).
9050	:info:build ; etc.
9051	:info:build ; in:
9052	:info:build ; DEFINE-CHAR-DECODERS (FLEXI-UTF-16-BE-FORMAT FLEXI-CR-UTF-16-BE-FORMAT
9053	:info:build ; FLEXI-CRLF-UTF-16-BE-FORMAT)
9054	:info:build ; (FLEXI-STREAMS::READ-NEXT-WORD)
9055	:info:build ;
9056	:info:build ; note: implementation limitation: couldn't inline expand because expansion refers to the optimized away object #<SB-C::CTRAN 2 {15C173E9}>.
9057	:info:build ;
9058	:info:build ; note: deleting unused function
9059	:info:build ; (SB-C::LOCAL-INLINE READ-NEXT-WORD)
9060	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
9061	:info:build ; --> LET OR
9062	:info:build ; ==>
9063	:info:build ; (LET ((#:G40 FLEXI-STREAMS::OCTET-GETTER))
9064	:info:build ; (IF #:G40
9065	:info:build ; #:G40
9066	:info:build ; (COND
9067	:info:build ; (FLEXI-STREAMS::FIRST-OCTET-SEEN
9068	:info:build ; (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE #))
9069	:info:build ; (T (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE NIL)))))
9070	:info:build ;
9071	:info:build ; note: deleting unused function
9072	:info:build ; (LET (#:G40))
9073	:info:build ; (FLEXI-STREAMS::READ-NEXT-WORD)
9074	:info:build ;
9075	:info:build ; note: implementation limitation: couldn't inline expand because expansion refers to the optimized away object #<SB-C::CTRAN 2 {15C173E9}>.
9076	:info:build ;
9077	:info:build ; note: deleting unused function
9078	:info:build ; (SB-C::LOCAL-INLINE READ-NEXT-WORD)
9079	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
9080	:info:build ; --> LET OR
9081	:info:build ; ==>
9082	:info:build ; (LET ((#:G42 FLEXI-STREAMS::OCTET-GETTER))
9083	:info:build ; (IF #:G42
9084	:info:build ; #:G42
9085	:info:build ; (COND
9086	:info:build ; (FLEXI-STREAMS::FIRST-OCTET-SEEN
9087	:info:build ; (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE #))
9088	:info:build ; (T (RETURN-FROM FLEXI-STREAMS::OCTETS-TO-CHAR-CODE NIL)))))
9089	:info:build ;
9090	:info:build ; note: deleting unused function
9091	:info:build ; (LET (#:G42))
9092	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
9093	:info:build ; ==>
9094	:info:build ; 1
9095	:info:build ;
9096	:info:build ; note: unable to
9097	:info:build ; optimize
9098	:info:build ; because:
9099	:info:build ; Upgraded element type of array is not known at compile time.
9100	:info:build ;
9101	:info:build ; note: unable to
9102	:info:build ; optimize
9103	:info:build ; because:
9104	:info:build ; Upgraded element type of array is not known at compile time.
9105	:info:build ;
9106	:info:build ; note: unable to
9107	:info:build ; optimize
9108	:info:build ; because:
9109	:info:build ; Upgraded element type of array is not known at compile time.
9110	:info:build ;
9111	:info:build ; note: unable to
9112	:info:build ; optimize
9113	:info:build ; because:
9114	:info:build ; Upgraded element type of array is not known at compile time.
9115	:info:build ;
9116	:info:build ; note: unable to
9117	:info:build ; optimize
9118	:info:build ; because:
9119	:info:build ; Upgraded element type of array is not known at compile time.
9120	:info:build ;
9121	:info:build ; note: unable to
9122	:info:build ; optimize
9123	:info:build ; because:
9124	:info:build ; Upgraded element type of array is not known at compile time.
9125	:info:build ;
9126	:info:build ; note: unable to
9127	:info:build ; optimize
9128	:info:build ; because:
9129	:info:build ; Upgraded element type of array is not known at compile time.
9130	:info:build ;
9131	:info:build ; note: unable to
9132	:info:build ; optimize
9133	:info:build ; because:
9134	:info:build ; Upgraded element type of array is not known at compile time.
9135	:info:build ;
9136	:info:build ; note: unable to
9137	:info:build ; optimize
9138	:info:build ; because:
9139	:info:build ; Upgraded element type of array is not known at compile time.
9140	:info:build ;
9141	:info:build ; note: unable to
9142	:info:build ; optimize
9143	:info:build ; because:
9144	:info:build ; Upgraded element type of array is not known at compile time.
9145	:info:build ;
9146	:info:build ; note: unable to
9147	:info:build ; optimize
9148	:info:build ; because:
9149	:info:build ; Upgraded element type of array is not known at compile time.
9150	:info:build ;
9151	:info:build ; note: unable to
9152	:info:build ; optimize
9153	:info:build ; because:
9154	:info:build ; Upgraded element type of array is not known at compile time.
9155	:info:build ; --> LET OR LET IF COND IF THE RETURN-FROM
9156	:info:build ; ==>
9157	:info:build ; NIL
9158	:info:build ;
9159	:info:build ; caught STYLE-WARNING:
9160	:info:build ; This is not a (MOD 1114112):
9161	:info:build ; NIL
9162	:info:build ; See also:
9163	:info:build ; The SBCL Manual, Node "Handling of Types"
9164	:info:build ;
9165	:info:build ; note: unable to
9166	:info:build ; optimize
9167	:info:build ; because:
9168	:info:build ; Upgraded element type of array is not known at compile time.
9169	:info:build ;
9170	:info:build ; note: unable to
9171	:info:build ; optimize
9172	:info:build ; because:
9173	:info:build ; Upgraded element type of array is not known at compile time.
9174	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF
9175	:info:build ; ==>
9176	:info:build ; 1
9177	:info:build ;
9178	:info:build ; note: unable to
9179	:info:build ; optimize
9180	:info:build ; because:
9181	:info:build ; Upgraded element type of array is not known at compile time.
9182	:info:build ;
9183	:info:build ; note: unable to
9184	:info:build ; optimize
9185	:info:build ; because:
9186	:info:build ; Upgraded element type of array is not known at compile time.
9187	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
9188	:info:build ; ==>
9189	:info:build ; 1
9190	:info:build ;
9191	:info:build ; note: unable to
9192	:info:build ; optimize
9193	:info:build ; because:
9194	:info:build ; Upgraded element type of array is not known at compile time.
9195	:info:build ;
9196	:info:build ; note: unable to
9197	:info:build ; optimize
9198	:info:build ; because:
9199	:info:build ; Upgraded element type of array is not known at compile time.
9200	:info:build ;
9201	:info:build ; note: unable to
9202	:info:build ; optimize
9203	:info:build ; because:
9204	:info:build ; Upgraded element type of array is not known at compile time.
9205	:info:build ;
9206	:info:build ; note: unable to
9207	:info:build ; optimize
9208	:info:build ; because:
9209	:info:build ; Upgraded element type of array is not known at compile time.
9210	:info:build ;
9211	:info:build ; note: unable to
9212	:info:build ; optimize
9213	:info:build ; because:
9214	:info:build ; Upgraded element type of array is not known at compile time.
9215	:info:build ;
9216	:info:build ; note: unable to
9217	:info:build ; optimize
9218	:info:build ; because:
9219	:info:build ; Upgraded element type of array is not known at compile time.
9220	:info:build ;
9221	:info:build ; note: unable to
9222	:info:build ; optimize
9223	:info:build ; because:
9224	:info:build ; Upgraded element type of array is not known at compile time.
9225	:info:build ;
9226	:info:build ; note: unable to
9227	:info:build ; optimize
9228	:info:build ; because:
9229	:info:build ; Upgraded element type of array is not known at compile time.
9230	:info:build ;
9231	:info:build ; note: unable to
9232	:info:build ; optimize
9233	:info:build ; because:
9234	:info:build ; Upgraded element type of array is not known at compile time.
9235	:info:build ;
9236	:info:build ; note: unable to
9237	:info:build ; optimize
9238	:info:build ; because:
9239	:info:build ; Upgraded element type of array is not known at compile time.
9240	:info:build ;
9241	:info:build ; note: unable to
9242	:info:build ; optimize
9243	:info:build ; because:
9244	:info:build ; Upgraded element type of array is not known at compile time.
9245	:info:build ;
9246	:info:build ; note: unable to
9247	:info:build ; optimize
9248	:info:build ; because:
9249	:info:build ; Upgraded element type of array is not known at compile time.
9250	:info:build ; --> LET OR LET IF COND IF THE RETURN-FROM
9251	:info:build ; ==>
9252	:info:build ; NIL
9253	:info:build ;
9254	:info:build ; caught STYLE-WARNING:
9255	:info:build ; This is not a (MOD 1114112):
9256	:info:build ; NIL
9257	:info:build ; See also:
9258	:info:build ; The SBCL Manual, Node "Handling of Types"
9259	:info:build ;
9260	:info:build ; note: unable to
9261	:info:build ; optimize
9262	:info:build ; because:
9263	:info:build ; Upgraded element type of array is not known at compile time.
9264	:info:build ;
9265	:info:build ; note: unable to
9266	:info:build ; optimize
9267	:info:build ; because:
9268	:info:build ; Upgraded element type of array is not known at compile time.
9269	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF
9270	:info:build ; ==>
9271	:info:build ; 1
9272	:info:build ;
9273	:info:build ; note: unable to
9274	:info:build ; optimize
9275	:info:build ; because:
9276	:info:build ; Upgraded element type of array is not known at compile time.
9277	:info:build ;
9278	:info:build ; note: unable to
9279	:info:build ; optimize
9280	:info:build ; because:
9281	:info:build ; Upgraded element type of array is not known at compile time.
9282	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
9283	:info:build ; ==>
9284	:info:build ; 1
9285	:info:build ;
9286	:info:build ; note: unable to
9287	:info:build ; optimize
9288	:info:build ; because:
9289	:info:build ; Upgraded element type of array is not known at compile time.
9290	:info:build ;
9291	:info:build ; note: unable to
9292	:info:build ; optimize
9293	:info:build ; because:
9294	:info:build ; Upgraded element type of array is not known at compile time.
9295	:info:build ;
9296	:info:build ; note: unable to
9297	:info:build ; optimize
9298	:info:build ; because:
9299	:info:build ; Upgraded element type of array is not known at compile time.
9300	:info:build ;
9301	:info:build ; note: unable to
9302	:info:build ; optimize
9303	:info:build ; because:
9304	:info:build ; Upgraded element type of array is not known at compile time.
9305	:info:build ;
9306	:info:build ; note: unable to
9307	:info:build ; optimize
9308	:info:build ; because:
9309	:info:build ; Upgraded element type of array is not known at compile time.
9310	:info:build ;
9311	:info:build ; note: unable to
9312	:info:build ; optimize
9313	:info:build ; because:
9314	:info:build ; Upgraded element type of array is not known at compile time.
9315	:info:build ;
9316	:info:build ; note: unable to
9317	:info:build ; optimize
9318	:info:build ; because:
9319	:info:build ; Upgraded element type of array is not known at compile time.
9320	:info:build ;
9321	:info:build ; note: unable to
9322	:info:build ; optimize
9323	:info:build ; because:
9324	:info:build ; Upgraded element type of array is not known at compile time.
9325	:info:build ;
9326	:info:build ; note: unable to
9327	:info:build ; optimize
9328	:info:build ; because:
9329	:info:build ; Upgraded element type of array is not known at compile time.
9330	:info:build ;
9331	:info:build ; note: unable to
9332	:info:build ; optimize
9333	:info:build ; because:
9334	:info:build ; Upgraded element type of array is not known at compile time.
9335	:info:build ;
9336	:info:build ; note: unable to
9337	:info:build ; optimize
9338	:info:build ; because:
9339	:info:build ; Upgraded element type of array is not known at compile time.
9340	:info:build ;
9341	:info:build ; note: unable to
9342	:info:build ; optimize
9343	:info:build ; because:
9344	:info:build ; Upgraded element type of array is not known at compile time.
9345	:info:build ; --> LET OR LET IF COND IF THE
9346	:info:build ; ==>
9347	:info:build ; (RETURN-FROM FLEXI-STREAMS::CHAR-DECODER NIL)
9348	:info:build ;
9349	:info:build ; caught STYLE-WARNING:
9350	:info:build ; Result is a (VALUES &OPTIONAL NULL &REST T), not a (MOD 1114112).
9351	:info:build ; See also:
9352	:info:build ; The SBCL Manual, Node "Handling of Types"
9353	:info:build ;
9354	:info:build ; note: unable to
9355	:info:build ; optimize
9356	:info:build ; because:
9357	:info:build ; Upgraded element type of array is not known at compile time.
9358	:info:build ;
9359	:info:build ; note: unable to
9360	:info:build ; optimize
9361	:info:build ; because:
9362	:info:build ; Upgraded element type of array is not known at compile time.
9363	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER AND IF PROG1 LET THE AREF
9364	:info:build ; ==>
9365	:info:build ; 1
9366	:info:build ;
9367	:info:build ; note: unable to
9368	:info:build ; optimize
9369	:info:build ; because:
9370	:info:build ; Upgraded element type of array is not known at compile time.
9371	:info:build ;
9372	:info:build ; note: unable to
9373	:info:build ; optimize
9374	:info:build ; because:
9375	:info:build ; Upgraded element type of array is not known at compile time.
9376	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-16-BE-FORMAT
9377	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-16-BE-FORMAT
9378	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-16-BE-FORMAT)
9379	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
9380	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
9381	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
9382	:info:build ; '#))
9383	:info:build ; (FLET (#)
9384	:info:build ; (DECLARE #)
9385	:info:build ; (LET #
9386	:info:build ; #
9387	:info:build ; #)))))
9388	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
9389	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
9390	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
9391	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
9392	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
9393	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
9394	:info:build ; --> SB-KERNEL:%SCHARSET
9395	:info:build ; ==>
9396	:info:build ; 1
9397	:info:build ;
9398	:info:build ; note: forced to do GENERIC-- (cost 10)
9399	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
9400	:info:build ; The second argument is a T, not a FIXNUM.
9401	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
9402	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
9403	:info:build ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
9404	:info:build ; The second argument is a T, not a (UNSIGNED-BYTE 32).
9405	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
9406	:info:build ; (UNSIGNED-BYTE 32)
9407	:info:build ; &OPTIONAL).
9408	:info:build ; etc.
9409	:info:build ; in:
9410	:info:build ; DEFINE-CHAR-DECODERS (FLEXI-GBK-FORMAT FLEXI-CR-GBK-FORMAT
9411	:info:build ; FLEXI-CRLF-GBK-FORMAT)
9412	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
9413	:info:build ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
9414	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
9415	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
9416	:info:build ; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733)
9417	:info:build ; (T
9418	:info:build ; (LET #
9419	:info:build ; #)))))
9420	:info:build ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
9421	:info:build ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
9422	:info:build ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
9423	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
9424	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
9425	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
9426	:info:build ; --> <=
9427	:info:build ; ==>
9428	:info:build ; 1
9429	:info:build ;
9430	:info:build ; note: forced to do full call
9431	:info:build ; unable to do inline ASH (cost 3) because:
9432	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
9433	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
9434	:info:build ; (SIGNED-BYTE 32)
9435	:info:build ; &OPTIONAL).
9436	:info:build ; unable to do inline constant ASH (cost 4) because:
9437	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
9438	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
9439	:info:build ; (UNSIGNED-BYTE 32)
9440	:info:build ; &OPTIONAL).
9441	:info:build ; etc.
9442	:info:build ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
9443	:info:build ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
9444	:info:build ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
9445	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
9446	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
9447	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
9448	:info:build ; --> IF
9449	:info:build ; ==>
9450	:info:build ; (> #:CHAR-CODE0 1114111)
9451	:info:build ;
9452	:info:build ; note: forced to do GENERIC-> (cost 10)
9453	:info:build ; unable to do inline fixnum comparison (cost 4) because:
9454	:info:build ; The first argument is a INTEGER, not a FIXNUM.
9455	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
9456	:info:build ; (COND
9457	:info:build ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
9458	:info:build ; FLEXI-STREAMS:OCTET)
9459	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
9460	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
9461	:info:build ; (T
9462	:info:build ; (LET (#)
9463	:info:build ; (IF #
9464	:info:build ; #
9465	:info:build ; #)))))
9466	:info:build ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
9467	:info:build ; ==>
9468	:info:build ; 1
9469	:info:build ;
9470	:info:build ; note: unable to
9471	:info:build ; optimize
9472	:info:build ; because:
9473	:info:build ; Upgraded element type of array is not known at compile time.
9474	:info:build ; (FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)
9475	:info:build ; --> BLOCK PROG1 LET AREF
9476	:info:build ; ==>
9477	:info:build ; 1
9478	:info:build ;
9479	:info:build ; note: unable to
9480	:info:build ; optimize
9481	:info:build ; because:
9482	:info:build ; Upgraded element type of array is not known at compile time.
9483	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
9484	:info:build ; (COND
9485	:info:build ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
9486	:info:build ; FLEXI-STREAMS:OCTET)
9487	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
9488	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
9489	:info:build ; (T
9490	:info:build ; (LET (#)
9491	:info:build ; (IF #
9492	:info:build ; #
9493	:info:build ; #)))))
9494	:info:build ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
9495	:info:build ; ==>
9496	:info:build ; 1
9497	:info:build ;
9498	:info:build ; note: unable to
9499	:info:build ; optimize
9500	:info:build ; because:
9501	:info:build ; Upgraded element type of array is not known at compile time.
9502	:info:build ; (FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)
9503	:info:build ; --> BLOCK PROG1 LET AREF
9504	:info:build ; ==>
9505	:info:build ; 1
9506	:info:build ;
9507	:info:build ; note: unable to
9508	:info:build ; optimize
9509	:info:build ; because:
9510	:info:build ; Upgraded element type of array is not known at compile time.
9511	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
9512	:info:build ; (COND
9513	:info:build ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
9514	:info:build ; FLEXI-STREAMS:OCTET)
9515	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
9516	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
9517	:info:build ; (T
9518	:info:build ; (LET (#)
9519	:info:build ; (IF #
9520	:info:build ; #
9521	:info:build ; #)))))
9522	:info:build ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
9523	:info:build ; ==>
9524	:info:build ; 1
9525	:info:build ;
9526	:info:build ; note: unable to
9527	:info:build ; optimize
9528	:info:build ; because:
9529	:info:build ; Upgraded element type of array is not known at compile time.
9530	:info:build ; (FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)
9531	:info:build ; --> BLOCK PROG1 LET AREF
9532	:info:build ; ==>
9533	:info:build ; 1
9534	:info:build ;
9535	:info:build ; note: unable to
9536	:info:build ; optimize
9537	:info:build ; because:
9538	:info:build ; Upgraded element type of array is not known at compile time.
9539	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
9540	:info:build ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
9541	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
9542	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
9543	:info:build ; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733)
9544	:info:build ; (T
9545	:info:build ; (LET #
9546	:info:build ; #)))))
9547	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
9548	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
9549	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
9550	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
9551	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
9552	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
9553	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
9554	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
9555	:info:build ; --> WHEN IF AND IF OR LET <=
9556	:info:build ; ==>
9557	:info:build ; 1
9558	:info:build ;
9559	:info:build ; note: forced to do full call
9560	:info:build ; unable to do inline ASH (cost 3) because:
9561	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
9562	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
9563	:info:build ; (SIGNED-BYTE 32)
9564	:info:build ; &OPTIONAL).
9565	:info:build ; unable to do inline constant ASH (cost 4) because:
9566	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
9567	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
9568	:info:build ; (UNSIGNED-BYTE 32)
9569	:info:build ; &OPTIONAL).
9570	:info:build ; etc.
9571	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
9572	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
9573	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
9574	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
9575	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
9576	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
9577	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
9578	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
9579	:info:build ; --> WHEN IF AND IF OR LET IF
9580	:info:build ; ==>
9581	:info:build ; (> #:CHAR-CODE0 1114111)
9582	:info:build ;
9583	:info:build ; note: forced to do GENERIC-> (cost 10)
9584	:info:build ; unable to do inline fixnum comparison (cost 4) because:
9585	:info:build ; The first argument is a INTEGER, not a FIXNUM.
9586	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
9587	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
9588	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
9589	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
9590	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
9591	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
9592	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
9593	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
9594	:info:build ; --> LET WHEN IF AND IF OR LET <=
9595	:info:build ; ==>
9596	:info:build ; 1
9597	:info:build ;
9598	:info:build ; note: forced to do full call
9599	:info:build ; unable to do inline ASH (cost 3) because:
9600	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
9601	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
9602	:info:build ; (SIGNED-BYTE 32)
9603	:info:build ; &OPTIONAL).
9604	:info:build ; unable to do inline constant ASH (cost 4) because:
9605	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
9606	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
9607	:info:build ; (UNSIGNED-BYTE 32)
9608	:info:build ; &OPTIONAL).
9609	:info:build ; etc.
9610	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
9611	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
9612	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
9613	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
9614	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
9615	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
9616	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
9617	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
9618	:info:build ; --> LET WHEN IF AND IF OR LET IF
9619	:info:build ; ==>
9620	:info:build ; (> #:CHAR-CODE0 1114111)
9621	:info:build ;
9622	:info:build ; note: forced to do GENERIC-> (cost 10)
9623	:info:build ; unable to do inline fixnum comparison (cost 4) because:
9624	:info:build ; The first argument is a INTEGER, not a FIXNUM.
9625	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
9626	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
9627	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
9628	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
9629	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
9630	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
9631	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
9632	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
9633	:info:build ; --> WHEN IF AND IF OR LET <=
9634	:info:build ; ==>
9635	:info:build ; 1
9636	:info:build ;
9637	:info:build ; note: forced to do full call
9638	:info:build ; unable to do inline ASH (cost 3) because:
9639	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
9640	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
9641	:info:build ; (SIGNED-BYTE 32)
9642	:info:build ; &OPTIONAL).
9643	:info:build ; unable to do inline constant ASH (cost 4) because:
9644	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
9645	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
9646	:info:build ; (UNSIGNED-BYTE 32)
9647	:info:build ; &OPTIONAL).
9648	:info:build ; etc.
9649	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
9650	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
9651	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
9652	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
9653	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
9654	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
9655	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
9656	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
9657	:info:build ; --> WHEN IF AND IF OR LET IF
9658	:info:build ; ==>
9659	:info:build ; (> #:CHAR-CODE0 1114111)
9660	:info:build ;
9661	:info:build ; note: forced to do GENERIC-> (cost 10)
9662	:info:build ; unable to do inline fixnum comparison (cost 4) because:
9663	:info:build ; The first argument is a INTEGER, not a FIXNUM.
9664	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
9665	:info:build ; (COND
9666	:info:build ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
9667	:info:build ; FLEXI-STREAMS:OCTET)
9668	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
9669	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
9670	:info:build ; (T
9671	:info:build ; (LET (#)
9672	:info:build ; (IF #
9673	:info:build ; #
9674	:info:build ; #)))))
9675	:info:build ;
9676	:info:build ; note: unable to
9677	:info:build ; optimize
9678	:info:build ; because:
9679	:info:build ; Upgraded element type of array is not known at compile time.
9680	:info:build ; (FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)
9681	:info:build ;
9682	:info:build ; note: unable to
9683	:info:build ; optimize
9684	:info:build ; because:
9685	:info:build ; Upgraded element type of array is not known at compile time.
9686	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
9687	:info:build ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
9688	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
9689	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
9690	:info:build ; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733)
9691	:info:build ; (T
9692	:info:build ; (LET #
9693	:info:build ; #)))))
9694	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
9695	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
9696	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
9697	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
9698	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
9699	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
9700	:info:build ; --> SB-KERNEL:%SCHARSET
9701	:info:build ; ==>
9702	:info:build ; 1
9703	:info:build ;
9704	:info:build ; note: forced to do full call
9705	:info:build ; unable to do inline ASH (cost 3) because:
9706	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
9707	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
9708	:info:build ; (SIGNED-BYTE 32)
9709	:info:build ; &OPTIONAL).
9710	:info:build ; unable to do inline constant ASH (cost 4) because:
9711	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
9712	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
9713	:info:build ; (UNSIGNED-BYTE 32)
9714	:info:build ; &OPTIONAL).
9715	:info:build ; etc.
9716	:info:build ;
9717	:info:build ; note: forced to do GENERIC-> (cost 10)
9718	:info:build ; unable to do inline fixnum comparison (cost 4) because:
9719	:info:build ; The first argument is a INTEGER, not a FIXNUM.
9720	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
9721	:info:build ; (COND
9722	:info:build ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
9723	:info:build ; FLEXI-STREAMS:OCTET)
9724	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
9725	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
9726	:info:build ; (T
9727	:info:build ; (LET (#)
9728	:info:build ; (IF #
9729	:info:build ; #
9730	:info:build ; #)))))
9731	:info:build ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
9732	:info:build ; ==>
9733	:info:build ; 1
9734	:info:build ;
9735	:info:build ; note: unable to
9736	:info:build ; optimize
9737	:info:build ; because:
9738	:info:build ; Upgraded element type of array is not known at compile time.
9739	:info:build ; (FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)
9740	:info:build ; --> BLOCK PROG1 LET AREF
9741	:info:build ; ==>
9742	:info:build ; 1
9743	:info:build ;
9744	:info:build ; note: unable to
9745	:info:build ; optimize
9746	:info:build ; because:
9747	:info:build ; Upgraded element type of array is not known at compile time.
9748	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
9749	:info:build ; (COND
9750	:info:build ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
9751	:info:build ; FLEXI-STREAMS:OCTET)
9752	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
9753	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
9754	:info:build ; (T
9755	:info:build ; (LET (#)
9756	:info:build ; (IF #
9757	:info:build ; #
9758	:info:build ; #)))))
9759	:info:build ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
9760	:info:build ; ==>
9761	:info:build ; 1
9762	:info:build ;
9763	:info:build ; note: unable to
9764	:info:build ; optimize
9765	:info:build ; because:
9766	:info:build ; Upgraded element type of array is not known at compile time.
9767	:info:build ; (FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)
9768	:info:build ; --> BLOCK PROG1 LET AREF
9769	:info:build ; ==>
9770	:info:build ; 1
9771	:info:build ;
9772	:info:build ; note: unable to
9773	:info:build ; optimize
9774	:info:build ; because:
9775	:info:build ; Upgraded element type of array is not known at compile time.
9776	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
9777	:info:build ; (COND
9778	:info:build ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
9779	:info:build ; FLEXI-STREAMS:OCTET)
9780	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
9781	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
9782	:info:build ; (T
9783	:info:build ; (LET (#)
9784	:info:build ; (IF #
9785	:info:build ; #
9786	:info:build ; #)))))
9787	:info:build ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
9788	:info:build ; ==>
9789	:info:build ; 1
9790	:info:build ;
9791	:info:build ; note: unable to
9792	:info:build ; optimize
9793	:info:build ; because:
9794	:info:build ; Upgraded element type of array is not known at compile time.
9795	:info:build ; (FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)
9796	:info:build ; --> BLOCK PROG1 LET AREF
9797	:info:build ; ==>
9798	:info:build ; 1
9799	:info:build ;
9800	:info:build ; note: unable to
9801	:info:build ; optimize
9802	:info:build ; because:
9803	:info:build ; Upgraded element type of array is not known at compile time.
9804	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
9805	:info:build ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
9806	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
9807	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
9808	:info:build ; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733)
9809	:info:build ; (T
9810	:info:build ; (LET #
9811	:info:build ; #)))))
9812	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
9813	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
9814	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
9815	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
9816	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
9817	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
9818	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
9819	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
9820	:info:build ; --> PROGN LET WHEN IF AND IF OR LET <=
9821	:info:build ; ==>
9822	:info:build ; 1
9823	:info:build ;
9824	:info:build ; note: forced to do full call
9825	:info:build ; unable to do inline ASH (cost 3) because:
9826	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
9827	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
9828	:info:build ; (SIGNED-BYTE 32)
9829	:info:build ; &OPTIONAL).
9830	:info:build ; unable to do inline constant ASH (cost 4) because:
9831	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
9832	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
9833	:info:build ; (UNSIGNED-BYTE 32)
9834	:info:build ; &OPTIONAL).
9835	:info:build ; etc.
9836	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
9837	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
9838	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
9839	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
9840	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
9841	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
9842	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
9843	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
9844	:info:build ; --> PROGN LET WHEN IF AND IF OR LET IF
9845	:info:build ; ==>
9846	:info:build ; (> #:CHAR-CODE0 1114111)
9847	:info:build ;
9848	:info:build ; note: forced to do GENERIC-> (cost 10)
9849	:info:build ; unable to do inline fixnum comparison (cost 4) because:
9850	:info:build ; The first argument is a INTEGER, not a FIXNUM.
9851	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
9852	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
9853	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
9854	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
9855	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
9856	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
9857	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
9858	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
9859	:info:build ; --> LET PROGN LET WHEN IF AND IF OR LET <=
9860	:info:build ; ==>
9861	:info:build ; 1
9862	:info:build ;
9863	:info:build ; note: forced to do full call
9864	:info:build ; unable to do inline ASH (cost 3) because:
9865	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
9866	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
9867	:info:build ; (SIGNED-BYTE 32)
9868	:info:build ; &OPTIONAL).
9869	:info:build ; unable to do inline constant ASH (cost 4) because:
9870	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
9871	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
9872	:info:build ; (UNSIGNED-BYTE 32)
9873	:info:build ; &OPTIONAL).
9874	:info:build ; etc.
9875	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
9876	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
9877	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
9878	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
9879	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
9880	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
9881	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
9882	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
9883	:info:build ; --> LET PROGN LET WHEN IF AND IF OR LET IF
9884	:info:build ; ==>
9885	:info:build ; (> #:CHAR-CODE0 1114111)
9886	:info:build ;
9887	:info:build ; note: forced to do GENERIC-> (cost 10)
9888	:info:build ; unable to do inline fixnum comparison (cost 4) because:
9889	:info:build ; The first argument is a INTEGER, not a FIXNUM.
9890	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
9891	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
9892	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
9893	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
9894	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
9895	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
9896	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
9897	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
9898	:info:build ; --> PROGN LET WHEN IF AND IF OR LET <=
9899	:info:build ; ==>
9900	:info:build ; 1
9901	:info:build ;
9902	:info:build ; note: forced to do full call
9903	:info:build ; unable to do inline ASH (cost 3) because:
9904	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
9905	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
9906	:info:build ; (SIGNED-BYTE 32)
9907	:info:build ; &OPTIONAL).
9908	:info:build ; unable to do inline constant ASH (cost 4) because:
9909	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
9910	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
9911	:info:build ; (UNSIGNED-BYTE 32)
9912	:info:build ; &OPTIONAL).
9913	:info:build ; etc.
9914	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
9915	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
9916	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
9917	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
9918	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
9919	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
9920	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
9921	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
9922	:info:build ; --> PROGN LET WHEN IF AND IF OR LET IF
9923	:info:build ; ==>
9924	:info:build ; (> #:CHAR-CODE0 1114111)
9925	:info:build ;
9926	:info:build ; note: forced to do GENERIC-> (cost 10)
9927	:info:build ; unable to do inline fixnum comparison (cost 4) because:
9928	:info:build ; The first argument is a INTEGER, not a FIXNUM.
9929	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
9930	:info:build ; (COND
9931	:info:build ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
9932	:info:build ; FLEXI-STREAMS:OCTET)
9933	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
9934	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
9935	:info:build ; (T
9936	:info:build ; (LET (#)
9937	:info:build ; (IF #
9938	:info:build ; #
9939	:info:build ; #)))))
9940	:info:build ;
9941	:info:build ; note: unable to
9942	:info:build ; optimize
9943	:info:build ; because:
9944	:info:build ; Upgraded element type of array is not known at compile time.
9945	:info:build ; (FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)
9946	:info:build ;
9947	:info:build ; note: unable to
9948	:info:build ; optimize
9949	:info:build ; because:
9950	:info:build ; Upgraded element type of array is not known at compile time.
9951	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
9952	:info:build ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
9953	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
9954	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
9955	:info:build ; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733)
9956	:info:build ; (T
9957	:info:build ; (LET #
9958	:info:build ; #)))))
9959	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
9960	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
9961	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
9962	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
9963	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
9964	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
9965	:info:build ; --> SB-KERNEL:%SCHARSET
9966	:info:build ; ==>
9967	:info:build ; 1
9968	:info:build ;
9969	:info:build ; note: forced to do full call
9970	:info:build ; unable to do inline ASH (cost 3) because:
9971	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
9972	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
9973	:info:build ; (SIGNED-BYTE 32)
9974	:info:build ; &OPTIONAL).
9975	:info:build ; unable to do inline constant ASH (cost 4) because:
9976	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
9977	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
9978	:info:build ; (UNSIGNED-BYTE 32)
9979	:info:build ; &OPTIONAL).
9980	:info:build ; etc.
9981	:info:build ;
9982	:info:build ; note: forced to do GENERIC-> (cost 10)
9983	:info:build ; unable to do inline fixnum comparison (cost 4) because:
9984	:info:build ; The first argument is a INTEGER, not a FIXNUM.
9985	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
9986	:info:build ; (COND
9987	:info:build ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
9988	:info:build ; FLEXI-STREAMS:OCTET)
9989	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
9990	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
9991	:info:build ; (T
9992	:info:build ; (LET (#)
9993	:info:build ; (IF #
9994	:info:build ; #
9995	:info:build ; #)))))
9996	:info:build ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
9997	:info:build ; ==>
9998	:info:build ; 1
9999	:info:build ;
10000	:info:build ; note: unable to
10001	:info:build ; optimize
10002	:info:build ; because:
10003	:info:build ; Upgraded element type of array is not known at compile time.
10004	:info:build ; (FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)
10005	:info:build ; --> BLOCK PROG1 LET AREF
10006	:info:build ; ==>
10007	:info:build ; 1
10008	:info:build ;
10009	:info:build ; note: unable to
10010	:info:build ; optimize
10011	:info:build ; because:
10012	:info:build ; Upgraded element type of array is not known at compile time.
10013	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
10014	:info:build ; (COND
10015	:info:build ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
10016	:info:build ; FLEXI-STREAMS:OCTET)
10017	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
10018	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
10019	:info:build ; (T
10020	:info:build ; (LET (#)
10021	:info:build ; (IF #
10022	:info:build ; #
10023	:info:build ; #)))))
10024	:info:build ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
10025	:info:build ; ==>
10026	:info:build ; 1
10027	:info:build ;
10028	:info:build ; note: unable to
10029	:info:build ; optimize
10030	:info:build ; because:
10031	:info:build ; Upgraded element type of array is not known at compile time.
10032	:info:build ; (FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)
10033	:info:build ; --> BLOCK PROG1 LET AREF
10034	:info:build ; ==>
10035	:info:build ; 1
10036	:info:build ;
10037	:info:build ; note: unable to
10038	:info:build ; optimize
10039	:info:build ; because:
10040	:info:build ; Upgraded element type of array is not known at compile time.
10041	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
10042	:info:build ; (COND
10043	:info:build ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
10044	:info:build ; FLEXI-STREAMS:OCTET)
10045	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
10046	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
10047	:info:build ; (T
10048	:info:build ; (LET (#)
10049	:info:build ; (IF #
10050	:info:build ; #
10051	:info:build ; #)))))
10052	:info:build ; --> FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
10053	:info:build ; ==>
10054	:info:build ; 1
10055	:info:build ;
10056	:info:build ; note: unable to
10057	:info:build ; optimize
10058	:info:build ; because:
10059	:info:build ; Upgraded element type of array is not known at compile time.
10060	:info:build ; (FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)
10061	:info:build ; --> BLOCK PROG1 LET AREF
10062	:info:build ; ==>
10063	:info:build ; 1
10064	:info:build ;
10065	:info:build ; note: unable to
10066	:info:build ; optimize
10067	:info:build ; because:
10068	:info:build ; Upgraded element type of array is not known at compile time.
10069	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
10070	:info:build ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
10071	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
10072	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
10073	:info:build ; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733)
10074	:info:build ; (T
10075	:info:build ; (LET #
10076	:info:build ; #)))))
10077	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
10078	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
10079	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
10080	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
10081	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
10082	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
10083	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
10084	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
10085	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
10086	:info:build ; ==>
10087	:info:build ; 1
10088	:info:build ;
10089	:info:build ; note: forced to do full call
10090	:info:build ; unable to do inline ASH (cost 3) because:
10091	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
10092	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
10093	:info:build ; (SIGNED-BYTE 32)
10094	:info:build ; &OPTIONAL).
10095	:info:build ; unable to do inline constant ASH (cost 4) because:
10096	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
10097	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
10098	:info:build ; (UNSIGNED-BYTE 32)
10099	:info:build ; &OPTIONAL).
10100	:info:build ; etc.
10101	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
10102	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
10103	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
10104	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
10105	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
10106	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
10107	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
10108	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
10109	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF
10110	:info:build ; ==>
10111	:info:build ; (> #:CHAR-CODE0 1114111)
10112	:info:build ;
10113	:info:build ; note: forced to do GENERIC-> (cost 10)
10114	:info:build ; unable to do inline fixnum comparison (cost 4) because:
10115	:info:build ; The first argument is a INTEGER, not a FIXNUM.
10116	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
10117	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
10118	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
10119	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
10120	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
10121	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
10122	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
10123	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
10124	:info:build ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
10125	:info:build ; ==>
10126	:info:build ; 1
10127	:info:build ;
10128	:info:build ; note: forced to do full call
10129	:info:build ; unable to do inline ASH (cost 3) because:
10130	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
10131	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
10132	:info:build ; (SIGNED-BYTE 32)
10133	:info:build ; &OPTIONAL).
10134	:info:build ; unable to do inline constant ASH (cost 4) because:
10135	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
10136	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
10137	:info:build ; (UNSIGNED-BYTE 32)
10138	:info:build ; &OPTIONAL).
10139	:info:build ; etc.
10140	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
10141	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
10142	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
10143	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
10144	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
10145	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
10146	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
10147	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
10148	:info:build ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF
10149	:info:build ; ==>
10150	:info:build ; (> #:CHAR-CODE0 1114111)
10151	:info:build ;
10152	:info:build ; note: forced to do GENERIC-> (cost 10)
10153	:info:build ; unable to do inline fixnum comparison (cost 4) because:
10154	:info:build ; The first argument is a INTEGER, not a FIXNUM.
10155	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
10156	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
10157	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
10158	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
10159	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
10160	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
10161	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
10162	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
10163	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
10164	:info:build ; ==>
10165	:info:build ; 1
10166	:info:build ;
10167	:info:build ; note: forced to do full call
10168	:info:build ; unable to do inline ASH (cost 3) because:
10169	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
10170	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
10171	:info:build ; (SIGNED-BYTE 32)
10172	:info:build ; &OPTIONAL).
10173	:info:build ; unable to do inline constant ASH (cost 4) because:
10174	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
10175	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
10176	:info:build ; (UNSIGNED-BYTE 32)
10177	:info:build ; &OPTIONAL).
10178	:info:build ; etc.
10179	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
10180	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
10181	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
10182	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
10183	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
10184	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
10185	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
10186	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
10187	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET IF
10188	:info:build ; ==>
10189	:info:build ; (> #:CHAR-CODE0 1114111)
10190	:info:build ;
10191	:info:build ; note: forced to do GENERIC-> (cost 10)
10192	:info:build ; unable to do inline fixnum comparison (cost 4) because:
10193	:info:build ; The first argument is a INTEGER, not a FIXNUM.
10194	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
10195	:info:build ; (COND
10196	:info:build ; ((<= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 127)
10197	:info:build ; FLEXI-STREAMS:OCTET)
10198	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 128) 8364)
10199	:info:build ; ((= (THE FLEXI-STREAMS:OCTET FLEXI-STREAMS:OCTET) 255) 63733)
10200	:info:build ; (T
10201	:info:build ; (LET (#)
10202	:info:build ; (IF #
10203	:info:build ; #
10204	:info:build ; #)))))
10205	:info:build ;
10206	:info:build ; note: unable to
10207	:info:build ; optimize
10208	:info:build ; because:
10209	:info:build ; Upgraded element type of array is not known at compile time.
10210	:info:build ; (FLEXI-STREAMS::NEXT-BYTE FLEXI-STREAMS::OCTET-GETTER)
10211	:info:build ;
10212	:info:build ; note: unable to
10213	:info:build ; optimize
10214	:info:build ; because:
10215	:info:build ; Upgraded element type of array is not known at compile time.
10216	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-GBK-FORMAT
10217	:info:build ; FLEXI-STREAMS::FLEXI-CR-GBK-FORMAT
10218	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-GBK-FORMAT)
10219	:info:build ; (FLEXI-STREAMS::WHEN-LET (FLEXI-STREAMS:OCTET FLEXI-STREAMS::OCTET-GETTER)
10220	:info:build ; (COND ((<= # 127) FLEXI-STREAMS:OCTET) ((= # 128) 8364) ((= # 255) 63733)
10221	:info:build ; (T
10222	:info:build ; (LET #
10223	:info:build ; #)))))
10224	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
10225	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
10226	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
10227	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
10228	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
10229	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
10230	:info:build ; --> SB-KERNEL:%SCHARSET
10231	:info:build ; ==>
10232	:info:build ; 1
10233	:info:build ;
10234	:info:build ; note: forced to do full call
10235	:info:build ; unable to do inline ASH (cost 3) because:
10236	:info:build ; The first argument is a (NOT NULL), not a (SIGNED-BYTE 32).
10237	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
10238	:info:build ; (SIGNED-BYTE 32)
10239	:info:build ; &OPTIONAL).
10240	:info:build ; unable to do inline constant ASH (cost 4) because:
10241	:info:build ; The first argument is a (NOT NULL), not a (UNSIGNED-BYTE 32).
10242	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
10243	:info:build ; (UNSIGNED-BYTE 32)
10244	:info:build ; &OPTIONAL).
10245	:info:build ; etc.
10246	:info:build ;
10247	:info:build ; note: forced to do GENERIC-> (cost 10)
10248	:info:build ; unable to do inline fixnum comparison (cost 4) because:
10249	:info:build ; The first argument is a INTEGER, not a FIXNUM.
10250	:info:build ;
10251	:info:build ; note: forced to do GENERIC-- (cost 10)
10252	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
10253	:info:build ; The second argument is a T, not a FIXNUM.
10254	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
10255	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
10256	:info:build ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
10257	:info:build ; The second argument is a T, not a (UNSIGNED-BYTE 32).
10258	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
10259	:info:build ; (UNSIGNED-BYTE 32)
10260	:info:build ; &OPTIONAL).
10261	:info:build ; etc.
10262	:info:build ; in:
10263	:info:build ; DEFINE-CHAR-DECODERS (FLEXI-UTF-32-LE-FORMAT FLEXI-CR-UTF-32-LE-FORMAT
10264	:info:build ; FLEXI-CRLF-UTF-32-LE-FORMAT)
10265	:info:build ; (LOOP FLEXI-STREAMS::FOR
10266	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10267	:info:build ; FLEXI-STREAMS::FOR ...)
10268	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
10269	:info:build ; ==>
10270	:info:build ; (+ #:LOOP-SUM-23 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
10271	:info:build ;
10272	:info:build ; note: forced to do GENERIC-+ (cost 10)
10273	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
10274	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
10275	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
10276	:info:build ; &OPTIONAL).
10277	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
10278	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10279	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10280	:info:build ; (UNSIGNED-BYTE
10281	:info:build ; 32)
10282	:info:build ; &OPTIONAL).
10283	:info:build ; etc.
10284	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
10285	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
10286	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
10287	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
10288	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
10289	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
10290	:info:build ; '#))
10291	:info:build ; (LOOP FLEXI-STREAMS::FOR
10292	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10293	:info:build ; FLEXI-STREAMS::FOR ...))))
10294	:info:build ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
10295	:info:build ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
10296	:info:build ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
10297	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
10298	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
10299	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
10300	:info:build ; --> <=
10301	:info:build ; ==>
10302	:info:build ; 1
10303	:info:build ;
10304	:info:build ; note: forced to do full call
10305	:info:build ; unable to do inline ASH (cost 3) because:
10306	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
10307	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10308	:info:build ; (SIGNED-BYTE 32)
10309	:info:build ; &OPTIONAL).
10310	:info:build ; unable to do inline constant ASH (cost 4) because:
10311	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10312	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10313	:info:build ; (UNSIGNED-BYTE
10314	:info:build ; 32)
10315	:info:build ; &OPTIONAL).
10316	:info:build ; etc.
10317	:info:build ; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
10318	:info:build ; ==>
10319	:info:build ; (ASH FLEXI-STREAMS:OCTET COUNT)
10320	:info:build ;
10321	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
10322	:info:build ; the first result of inline ASH
10323	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
10324	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
10325	:info:build ; ==>
10326	:info:build ; 1
10327	:info:build ;
10328	:info:build ; note: unable to
10329	:info:build ; optimize
10330	:info:build ; because:
10331	:info:build ; Upgraded element type of array is not known at compile time.
10332	:info:build ;
10333	:info:build ; note: unable to
10334	:info:build ; optimize
10335	:info:build ; because:
10336	:info:build ; Upgraded element type of array is not known at compile time.
10337	:info:build ;
10338	:info:build ; note: unable to
10339	:info:build ; optimize
10340	:info:build ; because:
10341	:info:build ; Upgraded element type of array is not known at compile time.
10342	:info:build ; (LOOP FLEXI-STREAMS::FOR
10343	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10344	:info:build ; FLEXI-STREAMS::FOR ...)
10345	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
10346	:info:build ; ==>
10347	:info:build ; (+ #:LOOP-SUM-157 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
10348	:info:build ;
10349	:info:build ; note: forced to do GENERIC-+ (cost 10)
10350	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
10351	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
10352	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
10353	:info:build ; &OPTIONAL).
10354	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
10355	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10356	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10357	:info:build ; (UNSIGNED-BYTE
10358	:info:build ; 32)
10359	:info:build ; &OPTIONAL).
10360	:info:build ; etc.
10361	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
10362	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
10363	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
10364	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
10365	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
10366	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
10367	:info:build ; '#))
10368	:info:build ; (LOOP FLEXI-STREAMS::FOR
10369	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10370	:info:build ; FLEXI-STREAMS::FOR ...))))
10371	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
10372	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
10373	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
10374	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
10375	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
10376	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
10377	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
10378	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
10379	:info:build ; --> WHEN IF AND IF OR LET <=
10380	:info:build ; ==>
10381	:info:build ; 1
10382	:info:build ;
10383	:info:build ; note: forced to do full call
10384	:info:build ; unable to do inline ASH (cost 3) because:
10385	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
10386	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10387	:info:build ; (SIGNED-BYTE 32)
10388	:info:build ; &OPTIONAL).
10389	:info:build ; unable to do inline constant ASH (cost 4) because:
10390	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10391	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10392	:info:build ; (UNSIGNED-BYTE
10393	:info:build ; 32)
10394	:info:build ; &OPTIONAL).
10395	:info:build ; etc.
10396	:info:build ; (LOOP FLEXI-STREAMS::FOR
10397	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10398	:info:build ; FLEXI-STREAMS::FOR ...)
10399	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
10400	:info:build ; ==>
10401	:info:build ; (+ #:LOOP-SUM-175 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
10402	:info:build ;
10403	:info:build ; note: forced to do GENERIC-+ (cost 10)
10404	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
10405	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
10406	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
10407	:info:build ; &OPTIONAL).
10408	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
10409	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10410	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10411	:info:build ; (UNSIGNED-BYTE
10412	:info:build ; 32)
10413	:info:build ; &OPTIONAL).
10414	:info:build ; etc.
10415	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
10416	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
10417	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
10418	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
10419	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
10420	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
10421	:info:build ; '#))
10422	:info:build ; (LOOP FLEXI-STREAMS::FOR
10423	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10424	:info:build ; FLEXI-STREAMS::FOR ...))))
10425	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
10426	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
10427	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
10428	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
10429	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
10430	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
10431	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
10432	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
10433	:info:build ; --> LET WHEN IF AND IF OR LET <=
10434	:info:build ; ==>
10435	:info:build ; 1
10436	:info:build ;
10437	:info:build ; note: forced to do full call
10438	:info:build ; unable to do inline ASH (cost 3) because:
10439	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
10440	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10441	:info:build ; (SIGNED-BYTE 32)
10442	:info:build ; &OPTIONAL).
10443	:info:build ; unable to do inline constant ASH (cost 4) because:
10444	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10445	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10446	:info:build ; (UNSIGNED-BYTE
10447	:info:build ; 32)
10448	:info:build ; &OPTIONAL).
10449	:info:build ; etc.
10450	:info:build ; (LOOP FLEXI-STREAMS::FOR
10451	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10452	:info:build ; FLEXI-STREAMS::FOR ...)
10453	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
10454	:info:build ; ==>
10455	:info:build ; (+ #:LOOP-SUM-136 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
10456	:info:build ;
10457	:info:build ; note: forced to do GENERIC-+ (cost 10)
10458	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
10459	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
10460	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
10461	:info:build ; &OPTIONAL).
10462	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
10463	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10464	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10465	:info:build ; (UNSIGNED-BYTE
10466	:info:build ; 32)
10467	:info:build ; &OPTIONAL).
10468	:info:build ; etc.
10469	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
10470	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
10471	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
10472	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
10473	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
10474	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
10475	:info:build ; '#))
10476	:info:build ; (LOOP FLEXI-STREAMS::FOR
10477	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10478	:info:build ; FLEXI-STREAMS::FOR ...))))
10479	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
10480	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
10481	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
10482	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
10483	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
10484	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
10485	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
10486	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
10487	:info:build ; --> WHEN IF AND IF OR LET <=
10488	:info:build ; ==>
10489	:info:build ; 1
10490	:info:build ;
10491	:info:build ; note: forced to do full call
10492	:info:build ; unable to do inline ASH (cost 3) because:
10493	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
10494	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10495	:info:build ; (SIGNED-BYTE 32)
10496	:info:build ; &OPTIONAL).
10497	:info:build ; unable to do inline constant ASH (cost 4) because:
10498	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10499	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10500	:info:build ; (UNSIGNED-BYTE
10501	:info:build ; 32)
10502	:info:build ; &OPTIONAL).
10503	:info:build ; etc.
10504	:info:build ; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
10505	:info:build ; ==>
10506	:info:build ; (ASH FLEXI-STREAMS:OCTET COUNT)
10507	:info:build ;
10508	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
10509	:info:build ; the first result of inline ASH
10510	:info:build ;
10511	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
10512	:info:build ; the first result of inline ASH
10513	:info:build ;
10514	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
10515	:info:build ; the first result of inline ASH
10516	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
10517	:info:build ;
10518	:info:build ; note: unable to
10519	:info:build ; optimize
10520	:info:build ; because:
10521	:info:build ; Upgraded element type of array is not known at compile time.
10522	:info:build ; (LOOP FLEXI-STREAMS::FOR
10523	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10524	:info:build ; FLEXI-STREAMS::FOR ...)
10525	:info:build ;
10526	:info:build ; note: forced to do GENERIC-+ (cost 10)
10527	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
10528	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
10529	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
10530	:info:build ; &OPTIONAL).
10531	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
10532	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10533	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10534	:info:build ; (UNSIGNED-BYTE
10535	:info:build ; 32)
10536	:info:build ; &OPTIONAL).
10537	:info:build ; etc.
10538	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
10539	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
10540	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
10541	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
10542	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
10543	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
10544	:info:build ; '#))
10545	:info:build ; (LOOP FLEXI-STREAMS::FOR
10546	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10547	:info:build ; FLEXI-STREAMS::FOR ...))))
10548	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
10549	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
10550	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
10551	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
10552	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
10553	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
10554	:info:build ; --> SB-KERNEL:%SCHARSET
10555	:info:build ; ==>
10556	:info:build ; 1
10557	:info:build ;
10558	:info:build ; note: forced to do full call
10559	:info:build ; unable to do inline ASH (cost 3) because:
10560	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
10561	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10562	:info:build ; (SIGNED-BYTE 32)
10563	:info:build ; &OPTIONAL).
10564	:info:build ; unable to do inline constant ASH (cost 4) because:
10565	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10566	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10567	:info:build ; (UNSIGNED-BYTE
10568	:info:build ; 32)
10569	:info:build ; &OPTIONAL).
10570	:info:build ; etc.
10571	:info:build ; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
10572	:info:build ;
10573	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
10574	:info:build ; the first result of inline ASH
10575	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
10576	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
10577	:info:build ; ==>
10578	:info:build ; 1
10579	:info:build ;
10580	:info:build ; note: unable to
10581	:info:build ; optimize
10582	:info:build ; because:
10583	:info:build ; Upgraded element type of array is not known at compile time.
10584	:info:build ;
10585	:info:build ; note: unable to
10586	:info:build ; optimize
10587	:info:build ; because:
10588	:info:build ; Upgraded element type of array is not known at compile time.
10589	:info:build ;
10590	:info:build ; note: unable to
10591	:info:build ; optimize
10592	:info:build ; because:
10593	:info:build ; Upgraded element type of array is not known at compile time.
10594	:info:build ; (LOOP FLEXI-STREAMS::FOR
10595	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10596	:info:build ; FLEXI-STREAMS::FOR ...)
10597	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
10598	:info:build ; ==>
10599	:info:build ; (+ #:LOOP-SUM-516 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
10600	:info:build ;
10601	:info:build ; note: forced to do GENERIC-+ (cost 10)
10602	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
10603	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
10604	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
10605	:info:build ; &OPTIONAL).
10606	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
10607	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10608	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10609	:info:build ; (UNSIGNED-BYTE
10610	:info:build ; 32)
10611	:info:build ; &OPTIONAL).
10612	:info:build ; etc.
10613	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
10614	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
10615	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
10616	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
10617	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
10618	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
10619	:info:build ; '#))
10620	:info:build ; (LOOP FLEXI-STREAMS::FOR
10621	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10622	:info:build ; FLEXI-STREAMS::FOR ...))))
10623	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
10624	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
10625	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
10626	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
10627	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
10628	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
10629	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
10630	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
10631	:info:build ; --> PROGN LET WHEN IF AND IF OR LET <=
10632	:info:build ; ==>
10633	:info:build ; 1
10634	:info:build ;
10635	:info:build ; note: forced to do full call
10636	:info:build ; unable to do inline ASH (cost 3) because:
10637	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
10638	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10639	:info:build ; (SIGNED-BYTE 32)
10640	:info:build ; &OPTIONAL).
10641	:info:build ; unable to do inline constant ASH (cost 4) because:
10642	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10643	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10644	:info:build ; (UNSIGNED-BYTE
10645	:info:build ; 32)
10646	:info:build ; &OPTIONAL).
10647	:info:build ; etc.
10648	:info:build ; (LOOP FLEXI-STREAMS::FOR
10649	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10650	:info:build ; FLEXI-STREAMS::FOR ...)
10651	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
10652	:info:build ; ==>
10653	:info:build ; (+ #:LOOP-SUM-534 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
10654	:info:build ;
10655	:info:build ; note: forced to do GENERIC-+ (cost 10)
10656	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
10657	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
10658	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
10659	:info:build ; &OPTIONAL).
10660	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
10661	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10662	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10663	:info:build ; (UNSIGNED-BYTE
10664	:info:build ; 32)
10665	:info:build ; &OPTIONAL).
10666	:info:build ; etc.
10667	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
10668	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
10669	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
10670	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
10671	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
10672	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
10673	:info:build ; '#))
10674	:info:build ; (LOOP FLEXI-STREAMS::FOR
10675	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10676	:info:build ; FLEXI-STREAMS::FOR ...))))
10677	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
10678	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
10679	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
10680	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
10681	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
10682	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
10683	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
10684	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
10685	:info:build ; --> LET PROGN LET WHEN IF AND IF OR LET <=
10686	:info:build ; ==>
10687	:info:build ; 1
10688	:info:build ;
10689	:info:build ; note: forced to do full call
10690	:info:build ; unable to do inline ASH (cost 3) because:
10691	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
10692	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10693	:info:build ; (SIGNED-BYTE 32)
10694	:info:build ; &OPTIONAL).
10695	:info:build ; unable to do inline constant ASH (cost 4) because:
10696	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10697	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10698	:info:build ; (UNSIGNED-BYTE
10699	:info:build ; 32)
10700	:info:build ; &OPTIONAL).
10701	:info:build ; etc.
10702	:info:build ; (LOOP FLEXI-STREAMS::FOR
10703	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10704	:info:build ; FLEXI-STREAMS::FOR ...)
10705	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
10706	:info:build ; ==>
10707	:info:build ; (+ #:LOOP-SUM-495 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
10708	:info:build ;
10709	:info:build ; note: forced to do GENERIC-+ (cost 10)
10710	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
10711	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
10712	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
10713	:info:build ; &OPTIONAL).
10714	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
10715	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10716	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10717	:info:build ; (UNSIGNED-BYTE
10718	:info:build ; 32)
10719	:info:build ; &OPTIONAL).
10720	:info:build ; etc.
10721	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
10722	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
10723	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
10724	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
10725	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
10726	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
10727	:info:build ; '#))
10728	:info:build ; (LOOP FLEXI-STREAMS::FOR
10729	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10730	:info:build ; FLEXI-STREAMS::FOR ...))))
10731	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
10732	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
10733	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
10734	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
10735	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
10736	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
10737	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
10738	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
10739	:info:build ; --> PROGN LET WHEN IF AND IF OR LET <=
10740	:info:build ; ==>
10741	:info:build ; 1
10742	:info:build ;
10743	:info:build ; note: forced to do full call
10744	:info:build ; unable to do inline ASH (cost 3) because:
10745	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
10746	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10747	:info:build ; (SIGNED-BYTE 32)
10748	:info:build ; &OPTIONAL).
10749	:info:build ; unable to do inline constant ASH (cost 4) because:
10750	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10751	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10752	:info:build ; (UNSIGNED-BYTE
10753	:info:build ; 32)
10754	:info:build ; &OPTIONAL).
10755	:info:build ; etc.
10756	:info:build ; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
10757	:info:build ; ==>
10758	:info:build ; (ASH FLEXI-STREAMS:OCTET COUNT)
10759	:info:build ;
10760	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
10761	:info:build ; the first result of inline ASH
10762	:info:build ;
10763	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
10764	:info:build ; the first result of inline ASH
10765	:info:build ;
10766	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
10767	:info:build ; the first result of inline ASH
10768	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
10769	:info:build ;
10770	:info:build ; note: unable to
10771	:info:build ; optimize
10772	:info:build ; because:
10773	:info:build ; Upgraded element type of array is not known at compile time.
10774	:info:build ; (LOOP FLEXI-STREAMS::FOR
10775	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10776	:info:build ; FLEXI-STREAMS::FOR ...)
10777	:info:build ;
10778	:info:build ; note: forced to do GENERIC-+ (cost 10)
10779	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
10780	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
10781	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
10782	:info:build ; &OPTIONAL).
10783	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
10784	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10785	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10786	:info:build ; (UNSIGNED-BYTE
10787	:info:build ; 32)
10788	:info:build ; &OPTIONAL).
10789	:info:build ; etc.
10790	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
10791	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
10792	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
10793	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
10794	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
10795	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
10796	:info:build ; '#))
10797	:info:build ; (LOOP FLEXI-STREAMS::FOR
10798	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10799	:info:build ; FLEXI-STREAMS::FOR ...))))
10800	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
10801	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
10802	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
10803	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
10804	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
10805	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
10806	:info:build ; --> SB-KERNEL:%SCHARSET
10807	:info:build ; ==>
10808	:info:build ; 1
10809	:info:build ;
10810	:info:build ; note: forced to do full call
10811	:info:build ; unable to do inline ASH (cost 3) because:
10812	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
10813	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10814	:info:build ; (SIGNED-BYTE 32)
10815	:info:build ; &OPTIONAL).
10816	:info:build ; unable to do inline constant ASH (cost 4) because:
10817	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10818	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10819	:info:build ; (UNSIGNED-BYTE
10820	:info:build ; 32)
10821	:info:build ; &OPTIONAL).
10822	:info:build ; etc.
10823	:info:build ; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
10824	:info:build ;
10825	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
10826	:info:build ; the first result of inline ASH
10827	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
10828	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
10829	:info:build ; ==>
10830	:info:build ; 1
10831	:info:build ;
10832	:info:build ; note: unable to
10833	:info:build ; optimize
10834	:info:build ; because:
10835	:info:build ; Upgraded element type of array is not known at compile time.
10836	:info:build ;
10837	:info:build ; note: unable to
10838	:info:build ; optimize
10839	:info:build ; because:
10840	:info:build ; Upgraded element type of array is not known at compile time.
10841	:info:build ;
10842	:info:build ; note: unable to
10843	:info:build ; optimize
10844	:info:build ; because:
10845	:info:build ; Upgraded element type of array is not known at compile time.
10846	:info:build ; (LOOP FLEXI-STREAMS::FOR
10847	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10848	:info:build ; FLEXI-STREAMS::FOR ...)
10849	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
10850	:info:build ; ==>
10851	:info:build ; (+ #:LOOP-SUM-851 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
10852	:info:build ;
10853	:info:build ; note: forced to do GENERIC-+ (cost 10)
10854	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
10855	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
10856	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
10857	:info:build ; &OPTIONAL).
10858	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
10859	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10860	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10861	:info:build ; (UNSIGNED-BYTE
10862	:info:build ; 32)
10863	:info:build ; &OPTIONAL).
10864	:info:build ; etc.
10865	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
10866	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
10867	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
10868	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
10869	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
10870	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
10871	:info:build ; '#))
10872	:info:build ; (LOOP FLEXI-STREAMS::FOR
10873	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10874	:info:build ; FLEXI-STREAMS::FOR ...))))
10875	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
10876	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
10877	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
10878	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
10879	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
10880	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
10881	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
10882	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
10883	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
10884	:info:build ; ==>
10885	:info:build ; 1
10886	:info:build ;
10887	:info:build ; note: forced to do full call
10888	:info:build ; unable to do inline ASH (cost 3) because:
10889	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
10890	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10891	:info:build ; (SIGNED-BYTE 32)
10892	:info:build ; &OPTIONAL).
10893	:info:build ; unable to do inline constant ASH (cost 4) because:
10894	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10895	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10896	:info:build ; (UNSIGNED-BYTE
10897	:info:build ; 32)
10898	:info:build ; &OPTIONAL).
10899	:info:build ; etc.
10900	:info:build ; (LOOP FLEXI-STREAMS::FOR
10901	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10902	:info:build ; FLEXI-STREAMS::FOR ...)
10903	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
10904	:info:build ; ==>
10905	:info:build ; (+ #:LOOP-SUM-872 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
10906	:info:build ;
10907	:info:build ; note: forced to do GENERIC-+ (cost 10)
10908	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
10909	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
10910	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
10911	:info:build ; &OPTIONAL).
10912	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
10913	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10914	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10915	:info:build ; (UNSIGNED-BYTE
10916	:info:build ; 32)
10917	:info:build ; &OPTIONAL).
10918	:info:build ; etc.
10919	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
10920	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
10921	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
10922	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
10923	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
10924	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
10925	:info:build ; '#))
10926	:info:build ; (LOOP FLEXI-STREAMS::FOR
10927	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10928	:info:build ; FLEXI-STREAMS::FOR ...))))
10929	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
10930	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
10931	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
10932	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
10933	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
10934	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
10935	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
10936	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
10937	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
10938	:info:build ; ==>
10939	:info:build ; 1
10940	:info:build ;
10941	:info:build ; note: forced to do full call
10942	:info:build ; unable to do inline ASH (cost 3) because:
10943	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
10944	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10945	:info:build ; (SIGNED-BYTE 32)
10946	:info:build ; &OPTIONAL).
10947	:info:build ; unable to do inline constant ASH (cost 4) because:
10948	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10949	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10950	:info:build ; (UNSIGNED-BYTE
10951	:info:build ; 32)
10952	:info:build ; &OPTIONAL).
10953	:info:build ; etc.
10954	:info:build ; (LOOP FLEXI-STREAMS::FOR
10955	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10956	:info:build ; FLEXI-STREAMS::FOR ...)
10957	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
10958	:info:build ; ==>
10959	:info:build ; (+ #:LOOP-SUM-890 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
10960	:info:build ;
10961	:info:build ; note: forced to do GENERIC-+ (cost 10)
10962	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
10963	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
10964	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
10965	:info:build ; &OPTIONAL).
10966	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
10967	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
10968	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10969	:info:build ; (UNSIGNED-BYTE
10970	:info:build ; 32)
10971	:info:build ; &OPTIONAL).
10972	:info:build ; etc.
10973	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
10974	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
10975	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
10976	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
10977	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
10978	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
10979	:info:build ; '#))
10980	:info:build ; (LOOP FLEXI-STREAMS::FOR
10981	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
10982	:info:build ; FLEXI-STREAMS::FOR ...))))
10983	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
10984	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
10985	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
10986	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
10987	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
10988	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
10989	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
10990	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
10991	:info:build ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
10992	:info:build ; ==>
10993	:info:build ; 1
10994	:info:build ;
10995	:info:build ; note: forced to do full call
10996	:info:build ; unable to do inline ASH (cost 3) because:
10997	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
10998	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
10999	:info:build ; (SIGNED-BYTE 32)
11000	:info:build ; &OPTIONAL).
11001	:info:build ; unable to do inline constant ASH (cost 4) because:
11002	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11003	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11004	:info:build ; (UNSIGNED-BYTE
11005	:info:build ; 32)
11006	:info:build ; &OPTIONAL).
11007	:info:build ; etc.
11008	:info:build ; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
11009	:info:build ; ==>
11010	:info:build ; (ASH FLEXI-STREAMS:OCTET COUNT)
11011	:info:build ;
11012	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
11013	:info:build ; the first result of inline ASH
11014	:info:build ;
11015	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
11016	:info:build ; the first result of inline ASH
11017	:info:build ;
11018	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
11019	:info:build ; the first result of inline ASH
11020	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
11021	:info:build ;
11022	:info:build ; note: unable to
11023	:info:build ; optimize
11024	:info:build ; because:
11025	:info:build ; Upgraded element type of array is not known at compile time.
11026	:info:build ; (LOOP FLEXI-STREAMS::FOR
11027	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
11028	:info:build ; FLEXI-STREAMS::FOR ...)
11029	:info:build ;
11030	:info:build ; note: forced to do GENERIC-+ (cost 10)
11031	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
11032	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
11033	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
11034	:info:build ; &OPTIONAL).
11035	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
11036	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11037	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11038	:info:build ; (UNSIGNED-BYTE
11039	:info:build ; 32)
11040	:info:build ; &OPTIONAL).
11041	:info:build ; etc.
11042	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-LE-FORMAT
11043	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-LE-FORMAT
11044	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-LE-FORMAT)
11045	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
11046	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
11047	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
11048	:info:build ; '#))
11049	:info:build ; (LOOP FLEXI-STREAMS::FOR
11050	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 0 FLEXI-STREAMS::TO 24 FLEXI-STREAMS::BY 8
11051	:info:build ; FLEXI-STREAMS::FOR ...))))
11052	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
11053	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
11054	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
11055	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
11056	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
11057	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
11058	:info:build ; --> SB-KERNEL:%SCHARSET
11059	:info:build ; ==>
11060	:info:build ; 1
11061	:info:build ;
11062	:info:build ; note: forced to do full call
11063	:info:build ; unable to do inline ASH (cost 3) because:
11064	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
11065	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11066	:info:build ; (SIGNED-BYTE 32)
11067	:info:build ; &OPTIONAL).
11068	:info:build ; unable to do inline constant ASH (cost 4) because:
11069	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11070	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11071	:info:build ; (UNSIGNED-BYTE
11072	:info:build ; 32)
11073	:info:build ; &OPTIONAL).
11074	:info:build ; etc.
11075	:info:build ;
11076	:info:build ; note: forced to do GENERIC-- (cost 10)
11077	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
11078	:info:build ; The second argument is a T, not a FIXNUM.
11079	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
11080	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
11081	:info:build ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
11082	:info:build ; The second argument is a T, not a (UNSIGNED-BYTE 32).
11083	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
11084	:info:build ; (UNSIGNED-BYTE 32)
11085	:info:build ; &OPTIONAL).
11086	:info:build ; etc.
11087	:info:build ; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
11088	:info:build ;
11089	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
11090	:info:build ; the first result of inline ASH
11091	:info:build ; in:
11092	:info:build ; DEFINE-CHAR-DECODERS (FLEXI-UTF-32-BE-FORMAT FLEXI-CR-UTF-32-BE-FORMAT
11093	:info:build ; FLEXI-CRLF-UTF-32-BE-FORMAT)
11094	:info:build ; (LOOP FLEXI-STREAMS::FOR
11095	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11096	:info:build ; FLEXI-STREAMS::FOR ...)
11097	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
11098	:info:build ; ==>
11099	:info:build ; (+ #:LOOP-SUM-23 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
11100	:info:build ;
11101	:info:build ; note: forced to do GENERIC-+ (cost 10)
11102	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
11103	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
11104	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
11105	:info:build ; &OPTIONAL).
11106	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
11107	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11108	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11109	:info:build ; (UNSIGNED-BYTE
11110	:info:build ; 32)
11111	:info:build ; &OPTIONAL).
11112	:info:build ; etc.
11113	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
11114	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
11115	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
11116	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
11117	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
11118	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
11119	:info:build ; '#))
11120	:info:build ; (LOOP FLEXI-STREAMS::FOR
11121	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11122	:info:build ; FLEXI-STREAMS::FOR ...))))
11123	:info:build ; --> DEFMETHOD PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER
11124	:info:build ; --> SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD LIST* LET*
11125	:info:build ; --> SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
11126	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
11127	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
11128	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK SYMBOL-MACROLET LET WHEN IF AND IF OR LET
11129	:info:build ; --> <=
11130	:info:build ; ==>
11131	:info:build ; 1
11132	:info:build ;
11133	:info:build ; note: forced to do full call
11134	:info:build ; unable to do inline ASH (cost 3) because:
11135	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
11136	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11137	:info:build ; (SIGNED-BYTE 32)
11138	:info:build ; &OPTIONAL).
11139	:info:build ; unable to do inline constant ASH (cost 4) because:
11140	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11141	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11142	:info:build ; (UNSIGNED-BYTE
11143	:info:build ; 32)
11144	:info:build ; &OPTIONAL).
11145	:info:build ; etc.
11146	:info:build ; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
11147	:info:build ; ==>
11148	:info:build ; (ASH FLEXI-STREAMS:OCTET COUNT)
11149	:info:build ;
11150	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
11151	:info:build ; the first result of inline ASH
11152	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
11153	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
11154	:info:build ; ==>
11155	:info:build ; 1
11156	:info:build ;
11157	:info:build ; note: unable to
11158	:info:build ; optimize
11159	:info:build ; because:
11160	:info:build ; Upgraded element type of array is not known at compile time.
11161	:info:build ;
11162	:info:build ; note: unable to
11163	:info:build ; optimize
11164	:info:build ; because:
11165	:info:build ; Upgraded element type of array is not known at compile time.
11166	:info:build ;
11167	:info:build ; note: unable to
11168	:info:build ; optimize
11169	:info:build ; because:
11170	:info:build ; Upgraded element type of array is not known at compile time.
11171	:info:build ; (LOOP FLEXI-STREAMS::FOR
11172	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11173	:info:build ; FLEXI-STREAMS::FOR ...)
11174	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
11175	:info:build ; ==>
11176	:info:build ; (+ #:LOOP-SUM-157 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
11177	:info:build ;
11178	:info:build ; note: forced to do GENERIC-+ (cost 10)
11179	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
11180	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
11181	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
11182	:info:build ; &OPTIONAL).
11183	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
11184	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11185	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11186	:info:build ; (UNSIGNED-BYTE
11187	:info:build ; 32)
11188	:info:build ; &OPTIONAL).
11189	:info:build ; etc.
11190	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
11191	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
11192	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
11193	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
11194	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
11195	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
11196	:info:build ; '#))
11197	:info:build ; (LOOP FLEXI-STREAMS::FOR
11198	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11199	:info:build ; FLEXI-STREAMS::FOR ...))))
11200	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
11201	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
11202	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
11203	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
11204	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
11205	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
11206	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
11207	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
11208	:info:build ; --> WHEN IF AND IF OR LET <=
11209	:info:build ; ==>
11210	:info:build ; 1
11211	:info:build ;
11212	:info:build ; note: forced to do full call
11213	:info:build ; unable to do inline ASH (cost 3) because:
11214	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
11215	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11216	:info:build ; (SIGNED-BYTE 32)
11217	:info:build ; &OPTIONAL).
11218	:info:build ; unable to do inline constant ASH (cost 4) because:
11219	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11220	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11221	:info:build ; (UNSIGNED-BYTE
11222	:info:build ; 32)
11223	:info:build ; &OPTIONAL).
11224	:info:build ; etc.
11225	:info:build ; (LOOP FLEXI-STREAMS::FOR
11226	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11227	:info:build ; FLEXI-STREAMS::FOR ...)
11228	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
11229	:info:build ; ==>
11230	:info:build ; (+ #:LOOP-SUM-175 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
11231	:info:build ;
11232	:info:build ; note: forced to do GENERIC-+ (cost 10)
11233	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
11234	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
11235	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
11236	:info:build ; &OPTIONAL).
11237	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
11238	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11239	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11240	:info:build ; (UNSIGNED-BYTE
11241	:info:build ; 32)
11242	:info:build ; &OPTIONAL).
11243	:info:build ; etc.
11244	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
11245	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
11246	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
11247	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
11248	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
11249	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
11250	:info:build ; '#))
11251	:info:build ; (LOOP FLEXI-STREAMS::FOR
11252	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11253	:info:build ; FLEXI-STREAMS::FOR ...))))
11254	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
11255	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
11256	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
11257	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
11258	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
11259	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
11260	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
11261	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
11262	:info:build ; --> LET WHEN IF AND IF OR LET <=
11263	:info:build ; ==>
11264	:info:build ; 1
11265	:info:build ;
11266	:info:build ; note: forced to do full call
11267	:info:build ; unable to do inline ASH (cost 3) because:
11268	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
11269	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11270	:info:build ; (SIGNED-BYTE 32)
11271	:info:build ; &OPTIONAL).
11272	:info:build ; unable to do inline constant ASH (cost 4) because:
11273	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11274	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11275	:info:build ; (UNSIGNED-BYTE
11276	:info:build ; 32)
11277	:info:build ; &OPTIONAL).
11278	:info:build ; etc.
11279	:info:build ; (LOOP FLEXI-STREAMS::FOR
11280	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11281	:info:build ; FLEXI-STREAMS::FOR ...)
11282	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
11283	:info:build ; ==>
11284	:info:build ; (+ #:LOOP-SUM-136 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
11285	:info:build ;
11286	:info:build ; note: forced to do GENERIC-+ (cost 10)
11287	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
11288	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
11289	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
11290	:info:build ; &OPTIONAL).
11291	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
11292	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11293	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11294	:info:build ; (UNSIGNED-BYTE
11295	:info:build ; 32)
11296	:info:build ; &OPTIONAL).
11297	:info:build ; etc.
11298	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
11299	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
11300	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
11301	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
11302	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
11303	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
11304	:info:build ; '#))
11305	:info:build ; (LOOP FLEXI-STREAMS::FOR
11306	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11307	:info:build ; FLEXI-STREAMS::FOR ...))))
11308	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
11309	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
11310	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
11311	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
11312	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
11313	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
11314	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
11315	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
11316	:info:build ; --> WHEN IF AND IF OR LET <=
11317	:info:build ; ==>
11318	:info:build ; 1
11319	:info:build ;
11320	:info:build ; note: forced to do full call
11321	:info:build ; unable to do inline ASH (cost 3) because:
11322	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
11323	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11324	:info:build ; (SIGNED-BYTE 32)
11325	:info:build ; &OPTIONAL).
11326	:info:build ; unable to do inline constant ASH (cost 4) because:
11327	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11328	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11329	:info:build ; (UNSIGNED-BYTE
11330	:info:build ; 32)
11331	:info:build ; &OPTIONAL).
11332	:info:build ; etc.
11333	:info:build ; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
11334	:info:build ; ==>
11335	:info:build ; (ASH FLEXI-STREAMS:OCTET COUNT)
11336	:info:build ;
11337	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
11338	:info:build ; the first result of inline ASH
11339	:info:build ;
11340	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
11341	:info:build ; the first result of inline ASH
11342	:info:build ;
11343	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
11344	:info:build ; the first result of inline ASH
11345	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
11346	:info:build ;
11347	:info:build ; note: unable to
11348	:info:build ; optimize
11349	:info:build ; because:
11350	:info:build ; Upgraded element type of array is not known at compile time.
11351	:info:build ; (LOOP FLEXI-STREAMS::FOR
11352	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11353	:info:build ; FLEXI-STREAMS::FOR ...)
11354	:info:build ;
11355	:info:build ; note: forced to do GENERIC-+ (cost 10)
11356	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
11357	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
11358	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
11359	:info:build ; &OPTIONAL).
11360	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
11361	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11362	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11363	:info:build ; (UNSIGNED-BYTE
11364	:info:build ; 32)
11365	:info:build ; &OPTIONAL).
11366	:info:build ; etc.
11367	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
11368	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
11369	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
11370	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
11371	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
11372	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
11373	:info:build ; '#))
11374	:info:build ; (LOOP FLEXI-STREAMS::FOR
11375	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11376	:info:build ; FLEXI-STREAMS::FOR ...))))
11377	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
11378	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
11379	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
11380	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
11381	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
11382	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
11383	:info:build ; --> SB-KERNEL:%SCHARSET
11384	:info:build ; ==>
11385	:info:build ; 1
11386	:info:build ;
11387	:info:build ; note: forced to do full call
11388	:info:build ; unable to do inline ASH (cost 3) because:
11389	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
11390	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11391	:info:build ; (SIGNED-BYTE 32)
11392	:info:build ; &OPTIONAL).
11393	:info:build ; unable to do inline constant ASH (cost 4) because:
11394	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11395	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11396	:info:build ; (UNSIGNED-BYTE
11397	:info:build ; 32)
11398	:info:build ; &OPTIONAL).
11399	:info:build ; etc.
11400	:info:build ; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
11401	:info:build ;
11402	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
11403	:info:build ; the first result of inline ASH
11404	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
11405	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
11406	:info:build ; ==>
11407	:info:build ; 1
11408	:info:build ;
11409	:info:build ; note: unable to
11410	:info:build ; optimize
11411	:info:build ; because:
11412	:info:build ; Upgraded element type of array is not known at compile time.
11413	:info:build ;
11414	:info:build ; note: unable to
11415	:info:build ; optimize
11416	:info:build ; because:
11417	:info:build ; Upgraded element type of array is not known at compile time.
11418	:info:build ;
11419	:info:build ; note: unable to
11420	:info:build ; optimize
11421	:info:build ; because:
11422	:info:build ; Upgraded element type of array is not known at compile time.
11423	:info:build ; (LOOP FLEXI-STREAMS::FOR
11424	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11425	:info:build ; FLEXI-STREAMS::FOR ...)
11426	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
11427	:info:build ; ==>
11428	:info:build ; (+ #:LOOP-SUM-516 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
11429	:info:build ;
11430	:info:build ; note: forced to do GENERIC-+ (cost 10)
11431	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
11432	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
11433	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
11434	:info:build ; &OPTIONAL).
11435	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
11436	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11437	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11438	:info:build ; (UNSIGNED-BYTE
11439	:info:build ; 32)
11440	:info:build ; &OPTIONAL).
11441	:info:build ; etc.
11442	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
11443	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
11444	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
11445	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
11446	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
11447	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
11448	:info:build ; '#))
11449	:info:build ; (LOOP FLEXI-STREAMS::FOR
11450	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11451	:info:build ; FLEXI-STREAMS::FOR ...))))
11452	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
11453	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
11454	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
11455	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
11456	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
11457	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
11458	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
11459	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
11460	:info:build ; --> PROGN LET WHEN IF AND IF OR LET <=
11461	:info:build ; ==>
11462	:info:build ; 1
11463	:info:build ;
11464	:info:build ; note: forced to do full call
11465	:info:build ; unable to do inline ASH (cost 3) because:
11466	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
11467	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11468	:info:build ; (SIGNED-BYTE 32)
11469	:info:build ; &OPTIONAL).
11470	:info:build ; unable to do inline constant ASH (cost 4) because:
11471	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11472	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11473	:info:build ; (UNSIGNED-BYTE
11474	:info:build ; 32)
11475	:info:build ; &OPTIONAL).
11476	:info:build ; etc.
11477	:info:build ; (LOOP FLEXI-STREAMS::FOR
11478	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11479	:info:build ; FLEXI-STREAMS::FOR ...)
11480	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
11481	:info:build ; ==>
11482	:info:build ; (+ #:LOOP-SUM-534 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
11483	:info:build ;
11484	:info:build ; note: forced to do GENERIC-+ (cost 10)
11485	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
11486	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
11487	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
11488	:info:build ; &OPTIONAL).
11489	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
11490	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11491	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11492	:info:build ; (UNSIGNED-BYTE
11493	:info:build ; 32)
11494	:info:build ; &OPTIONAL).
11495	:info:build ; etc.
11496	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
11497	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
11498	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
11499	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
11500	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
11501	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
11502	:info:build ; '#))
11503	:info:build ; (LOOP FLEXI-STREAMS::FOR
11504	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11505	:info:build ; FLEXI-STREAMS::FOR ...))))
11506	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
11507	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
11508	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
11509	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
11510	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
11511	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
11512	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
11513	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
11514	:info:build ; --> LET PROGN LET WHEN IF AND IF OR LET <=
11515	:info:build ; ==>
11516	:info:build ; 1
11517	:info:build ;
11518	:info:build ; note: forced to do full call
11519	:info:build ; unable to do inline ASH (cost 3) because:
11520	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
11521	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11522	:info:build ; (SIGNED-BYTE 32)
11523	:info:build ; &OPTIONAL).
11524	:info:build ; unable to do inline constant ASH (cost 4) because:
11525	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11526	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11527	:info:build ; (UNSIGNED-BYTE
11528	:info:build ; 32)
11529	:info:build ; &OPTIONAL).
11530	:info:build ; etc.
11531	:info:build ; (LOOP FLEXI-STREAMS::FOR
11532	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11533	:info:build ; FLEXI-STREAMS::FOR ...)
11534	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
11535	:info:build ; ==>
11536	:info:build ; (+ #:LOOP-SUM-495 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
11537	:info:build ;
11538	:info:build ; note: forced to do GENERIC-+ (cost 10)
11539	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
11540	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
11541	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
11542	:info:build ; &OPTIONAL).
11543	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
11544	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11545	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11546	:info:build ; (UNSIGNED-BYTE
11547	:info:build ; 32)
11548	:info:build ; &OPTIONAL).
11549	:info:build ; etc.
11550	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
11551	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
11552	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
11553	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
11554	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
11555	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
11556	:info:build ; '#))
11557	:info:build ; (LOOP FLEXI-STREAMS::FOR
11558	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11559	:info:build ; FLEXI-STREAMS::FOR ...))))
11560	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
11561	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
11562	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
11563	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
11564	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
11565	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
11566	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
11567	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY LET
11568	:info:build ; --> PROGN LET WHEN IF AND IF OR LET <=
11569	:info:build ; ==>
11570	:info:build ; 1
11571	:info:build ;
11572	:info:build ; note: forced to do full call
11573	:info:build ; unable to do inline ASH (cost 3) because:
11574	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
11575	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11576	:info:build ; (SIGNED-BYTE 32)
11577	:info:build ; &OPTIONAL).
11578	:info:build ; unable to do inline constant ASH (cost 4) because:
11579	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11580	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11581	:info:build ; (UNSIGNED-BYTE
11582	:info:build ; 32)
11583	:info:build ; &OPTIONAL).
11584	:info:build ; etc.
11585	:info:build ; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
11586	:info:build ; ==>
11587	:info:build ; (ASH FLEXI-STREAMS:OCTET COUNT)
11588	:info:build ;
11589	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
11590	:info:build ; the first result of inline ASH
11591	:info:build ;
11592	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
11593	:info:build ; the first result of inline ASH
11594	:info:build ;
11595	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
11596	:info:build ; the first result of inline ASH
11597	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
11598	:info:build ;
11599	:info:build ; note: unable to
11600	:info:build ; optimize
11601	:info:build ; because:
11602	:info:build ; Upgraded element type of array is not known at compile time.
11603	:info:build ; (LOOP FLEXI-STREAMS::FOR
11604	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11605	:info:build ; FLEXI-STREAMS::FOR ...)
11606	:info:build ;
11607	:info:build ; note: forced to do GENERIC-+ (cost 10)
11608	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
11609	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
11610	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
11611	:info:build ; &OPTIONAL).
11612	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
11613	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11614	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11615	:info:build ; (UNSIGNED-BYTE
11616	:info:build ; 32)
11617	:info:build ; &OPTIONAL).
11618	:info:build ; etc.
11619	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
11620	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
11621	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
11622	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
11623	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
11624	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
11625	:info:build ; '#))
11626	:info:build ; (LOOP FLEXI-STREAMS::FOR
11627	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11628	:info:build ; FLEXI-STREAMS::FOR ...))))
11629	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
11630	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
11631	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
11632	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
11633	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
11634	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
11635	:info:build ; --> SB-KERNEL:%SCHARSET
11636	:info:build ; ==>
11637	:info:build ; 1
11638	:info:build ;
11639	:info:build ; note: forced to do full call
11640	:info:build ; unable to do inline ASH (cost 3) because:
11641	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
11642	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11643	:info:build ; (SIGNED-BYTE 32)
11644	:info:build ; &OPTIONAL).
11645	:info:build ; unable to do inline constant ASH (cost 4) because:
11646	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11647	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11648	:info:build ; (UNSIGNED-BYTE
11649	:info:build ; 32)
11650	:info:build ; &OPTIONAL).
11651	:info:build ; etc.
11652	:info:build ; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
11653	:info:build ;
11654	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
11655	:info:build ; the first result of inline ASH
11656	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
11657	:info:build ; --> LET OR LET FLEXI-STREAMS::OCTET-GETTER BLOCK PROG1 LET AREF
11658	:info:build ; ==>
11659	:info:build ; 1
11660	:info:build ;
11661	:info:build ; note: unable to
11662	:info:build ; optimize
11663	:info:build ; because:
11664	:info:build ; Upgraded element type of array is not known at compile time.
11665	:info:build ;
11666	:info:build ; note: unable to
11667	:info:build ; optimize
11668	:info:build ; because:
11669	:info:build ; Upgraded element type of array is not known at compile time.
11670	:info:build ;
11671	:info:build ; note: unable to
11672	:info:build ; optimize
11673	:info:build ; because:
11674	:info:build ; Upgraded element type of array is not known at compile time.
11675	:info:build ; (LOOP FLEXI-STREAMS::FOR
11676	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11677	:info:build ; FLEXI-STREAMS::FOR ...)
11678	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
11679	:info:build ; ==>
11680	:info:build ; (+ #:LOOP-SUM-872 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
11681	:info:build ;
11682	:info:build ; note: forced to do GENERIC-+ (cost 10)
11683	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
11684	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
11685	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
11686	:info:build ; &OPTIONAL).
11687	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
11688	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11689	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11690	:info:build ; (UNSIGNED-BYTE
11691	:info:build ; 32)
11692	:info:build ; &OPTIONAL).
11693	:info:build ; etc.
11694	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
11695	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
11696	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
11697	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
11698	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
11699	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
11700	:info:build ; '#))
11701	:info:build ; (LOOP FLEXI-STREAMS::FOR
11702	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11703	:info:build ; FLEXI-STREAMS::FOR ...))))
11704	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
11705	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
11706	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
11707	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
11708	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
11709	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
11710	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF FLEXI-STREAMS::ITERATE FLET LOOP
11711	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
11712	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
11713	:info:build ; ==>
11714	:info:build ; 1
11715	:info:build ;
11716	:info:build ; note: forced to do full call
11717	:info:build ; unable to do inline ASH (cost 3) because:
11718	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
11719	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11720	:info:build ; (SIGNED-BYTE 32)
11721	:info:build ; &OPTIONAL).
11722	:info:build ; unable to do inline constant ASH (cost 4) because:
11723	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11724	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11725	:info:build ; (UNSIGNED-BYTE
11726	:info:build ; 32)
11727	:info:build ; &OPTIONAL).
11728	:info:build ; etc.
11729	:info:build ; (LOOP FLEXI-STREAMS::FOR
11730	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11731	:info:build ; FLEXI-STREAMS::FOR ...)
11732	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
11733	:info:build ; ==>
11734	:info:build ; (+ #:LOOP-SUM-851 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
11735	:info:build ;
11736	:info:build ; note: forced to do GENERIC-+ (cost 10)
11737	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
11738	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
11739	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
11740	:info:build ; &OPTIONAL).
11741	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
11742	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11743	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11744	:info:build ; (UNSIGNED-BYTE
11745	:info:build ; 32)
11746	:info:build ; &OPTIONAL).
11747	:info:build ; etc.
11748	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
11749	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
11750	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
11751	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
11752	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
11753	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
11754	:info:build ; '#))
11755	:info:build ; (LOOP FLEXI-STREAMS::FOR
11756	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11757	:info:build ; FLEXI-STREAMS::FOR ...))))
11758	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
11759	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
11760	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
11761	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
11762	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
11763	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
11764	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF FLEXI-STREAMS::ITERATE FLET LOOP
11765	:info:build ; --> BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY FLET
11766	:info:build ; --> #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
11767	:info:build ; ==>
11768	:info:build ; 1
11769	:info:build ;
11770	:info:build ; note: forced to do full call
11771	:info:build ; unable to do inline ASH (cost 3) because:
11772	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
11773	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11774	:info:build ; (SIGNED-BYTE 32)
11775	:info:build ; &OPTIONAL).
11776	:info:build ; unable to do inline constant ASH (cost 4) because:
11777	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11778	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11779	:info:build ; (UNSIGNED-BYTE
11780	:info:build ; 32)
11781	:info:build ; &OPTIONAL).
11782	:info:build ; etc.
11783	:info:build ; (LOOP FLEXI-STREAMS::FOR
11784	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11785	:info:build ; FLEXI-STREAMS::FOR ...)
11786	:info:build ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
11787	:info:build ; ==>
11788	:info:build ; (+ #:LOOP-SUM-890 (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT))
11789	:info:build ;
11790	:info:build ; note: forced to do GENERIC-+ (cost 10)
11791	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
11792	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
11793	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
11794	:info:build ; &OPTIONAL).
11795	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
11796	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11797	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11798	:info:build ; (UNSIGNED-BYTE
11799	:info:build ; 32)
11800	:info:build ; &OPTIONAL).
11801	:info:build ; etc.
11802	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
11803	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
11804	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
11805	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
11806	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
11807	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
11808	:info:build ; '#))
11809	:info:build ; (LOOP FLEXI-STREAMS::FOR
11810	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11811	:info:build ; FLEXI-STREAMS::FOR ...))))
11812	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
11813	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
11814	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
11815	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
11816	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
11817	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK WITH-ACCESSORS LET SYMBOL-MACROLET LET*
11818	:info:build ; --> FLET MACROLET ETYPECASE LET COND IF IF IF FLEXI-STREAMS::ITERATE FLET
11819	:info:build ; --> LOOP BLOCK TAGBODY PROGN LET PROGN SYMBOL-MACROLET MACROLET BLOCK LOCALLY
11820	:info:build ; --> FLET #:GET-CHAR-CODE4 BLOCK LET WHEN IF AND IF OR LET <=
11821	:info:build ; ==>
11822	:info:build ; 1
11823	:info:build ;
11824	:info:build ; note: forced to do full call
11825	:info:build ; unable to do inline ASH (cost 3) because:
11826	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
11827	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11828	:info:build ; (SIGNED-BYTE 32)
11829	:info:build ; &OPTIONAL).
11830	:info:build ; unable to do inline constant ASH (cost 4) because:
11831	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11832	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11833	:info:build ; (UNSIGNED-BYTE
11834	:info:build ; 32)
11835	:info:build ; &OPTIONAL).
11836	:info:build ; etc.
11837	:info:build ; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
11838	:info:build ; ==>
11839	:info:build ; (ASH FLEXI-STREAMS:OCTET COUNT)
11840	:info:build ;
11841	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
11842	:info:build ; the first result of inline ASH
11843	:info:build ;
11844	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
11845	:info:build ; the first result of inline ASH
11846	:info:build ;
11847	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
11848	:info:build ; the first result of inline ASH
11849	:info:build ; (FLEXI-STREAMS::READ-NEXT-BYTE)
11850	:info:build ;
11851	:info:build ; note: unable to
11852	:info:build ; optimize
11853	:info:build ; because:
11854	:info:build ; Upgraded element type of array is not known at compile time.
11855	:info:build ; (LOOP FLEXI-STREAMS::FOR
11856	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11857	:info:build ; FLEXI-STREAMS::FOR ...)
11858	:info:build ;
11859	:info:build ; note: forced to do GENERIC-+ (cost 10)
11860	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
11861	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
11862	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
11863	:info:build ; &OPTIONAL).
11864	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
11865	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11866	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11867	:info:build ; (UNSIGNED-BYTE
11868	:info:build ; 32)
11869	:info:build ; &OPTIONAL).
11870	:info:build ; etc.
11871	:info:build ; (FLEXI-STREAMS::DEFINE-CHAR-DECODERS (FLEXI-STREAMS::FLEXI-UTF-32-BE-FORMAT
11872	:info:build ; FLEXI-STREAMS::FLEXI-CR-UTF-32-BE-FORMAT
11873	:info:build ; FLEXI-STREAMS::FLEXI-CRLF-UTF-32-BE-FORMAT)
11874	:info:build ; (LET (FLEXI-STREAMS::FIRST-OCTET-SEEN)
11875	:info:build ; (DECLARE (BOOLEAN FLEXI-STREAMS::FIRST-OCTET-SEEN))
11876	:info:build ; (MACROLET ((FLEXI-STREAMS::READ-NEXT-BYTE #
11877	:info:build ; '#))
11878	:info:build ; (LOOP FLEXI-STREAMS::FOR
11879	:info:build ; COUNT FLEXI-STREAMS::OF-TYPE FIXNUM FLEXI-STREAMS::FROM 24 FLEXI-STREAMS::DOWNTO 0 FLEXI-STREAMS::BY 8
11880	:info:build ; FLEXI-STREAMS::FOR ...))))
11881	:info:build ; --> FLEXI-STREAMS::DEFINE-SEQUENCE-READERS PROGN DEFMETHOD PROGN EVAL-WHEN
11882	:info:build ; --> SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD SB-PCL::LOAD-DEFMETHOD
11883	:info:build ; --> LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION SYMBOL-MACROLET
11884	:info:build ; --> SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS
11885	:info:build ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET*
11886	:info:build ; --> LOCALLY SYMBOL-MACROLET BLOCK LET* LOOP BLOCK LET TAGBODY SETF
11887	:info:build ; --> SB-KERNEL:%SCHARSET
11888	:info:build ; ==>
11889	:info:build ; 1
11890	:info:build ;
11891	:info:build ; note: forced to do full call
11892	:info:build ; unable to do inline ASH (cost 3) because:
11893	:info:build ; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 32).
11894	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11895	:info:build ; (SIGNED-BYTE 32)
11896	:info:build ; &OPTIONAL).
11897	:info:build ; unable to do inline constant ASH (cost 4) because:
11898	:info:build ; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32).
11899	:info:build ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
11900	:info:build ; (UNSIGNED-BYTE
11901	:info:build ; 32)
11902	:info:build ; &OPTIONAL).
11903	:info:build ; etc.
11904	:info:build ;
11905	:info:build ; note: forced to do GENERIC-- (cost 10)
11906	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
11907	:info:build ; The second argument is a T, not a FIXNUM.
11908	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
11909	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
11910	:info:build ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32).
11911	:info:build ; The second argument is a T, not a (UNSIGNED-BYTE 32).
11912	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
11913	:info:build ; (UNSIGNED-BYTE 32)
11914	:info:build ; &OPTIONAL).
11915	:info:build ; etc.
11916	:info:build ; (FLEXI-STREAMS::ASH* FLEXI-STREAMS:OCTET COUNT)
11917	:info:build ;
11918	:info:build ; note: doing unsigned word to integer coercion (cost 20), for:
11919	:info:build ; the first result of inline ASH
11920	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/decode-tmpE3AQVWGT.fasl
11921	:info:build ; compilation finished in 0:00:17.843
11922	:info:build WARNING:
11923	:info:build Lisp compilation had style-warnings while
11924	:info:build compiling #<CL-SOURCE-FILE "flexi-streams" "decode">
11925	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/in-memory.lisp" (written 09 JUL 2020 08:18:28 PM):
11926	:info:build ; file: /opt/local/share/common-lisp/source/cl-flexi-streams/in-memory.lisp
11927	:info:build ; in: DEFMETHOD PEEK-BYTE (VECTOR-INPUT-STREAM)
11928	:info:build ; (= BYTE FLEXI-STREAMS::PEEK-TYPE)
11929	:info:build ;
11930	:info:build ; note: unable to open code because: The operands might not be the same type.
11931	:info:build ; (LOOP :FOR BYTE = (READ-BYTE STREAM FLEXI-STREAMS::EOF-ERROR-P :EOF)
11932	:info:build ; :FOR FLEXI-STREAMS::NEW-INDEX :FROM FLEXI-STREAMS::INDEX
11933	:info:build ; :UNTIL (COND ((EQ BYTE :EOF) (RETURN FLEXI-STREAMS::EOF-VALUE))
11934	:info:build ; ((NULL FLEXI-STREAMS::PEEK-TYPE))
11935	:info:build ; ((EQ FLEXI-STREAMS::PEEK-TYPE 'T) (PLUSP BYTE))
11936	:info:build ; ((= BYTE FLEXI-STREAMS::PEEK-TYPE)))
11937	:info:build ; :FINALLY ...)
11938	:info:build ; --> LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE 1+
11939	:info:build ; ==>
11940	:info:build ; 1
11941	:info:build ;
11942	:info:build ; note: unable to
11943	:info:build ; associate +/(+ -) of constants
11944	:info:build ; due to type uncertainty:
11945	:info:build ; The first argument is a NUMBER, not a RATIONAL.
11946	:info:build ; (PLUSP BYTE)
11947	:info:build ;
11948	:info:build ; note: forced to do GENERIC-> (cost 10)
11949	:info:build ; unable to do inline fixnum comparison (cost 3) because:
11950	:info:build ; The first argument is a INTEGER, not a FIXNUM.
11951	:info:build ; unable to do inline fixnum comparison (cost 4) because:
11952	:info:build ; The first argument is a INTEGER, not a FIXNUM.
11953	:info:build ; etc.
11954	:info:build ; (LOOP :FOR BYTE = (READ-BYTE STREAM FLEXI-STREAMS::EOF-ERROR-P :EOF)
11955	:info:build ; :FOR FLEXI-STREAMS::NEW-INDEX :FROM FLEXI-STREAMS::INDEX
11956	:info:build ; :UNTIL (COND ((EQ BYTE :EOF) (RETURN FLEXI-STREAMS::EOF-VALUE))
11957	:info:build ; ((NULL FLEXI-STREAMS::PEEK-TYPE))
11958	:info:build ; ((EQ FLEXI-STREAMS::PEEK-TYPE 'T) (PLUSP BYTE))
11959	:info:build ; ((= BYTE FLEXI-STREAMS::PEEK-TYPE)))
11960	:info:build ; :FINALLY ...)
11961	:info:build ; --> LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE 1+
11962	:info:build ; ==>
11963	:info:build ; 1
11964	:info:build ;
11965	:info:build ; note: forced to do GENERIC-+ (cost 10)
11966	:info:build ; unable to do inline fixnum arithmetic (cost 1) because:
11967	:info:build ; The first argument is a NUMBER, not a FIXNUM.
11968	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
11969	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
11970	:info:build ; The first argument is a NUMBER, not a FIXNUM.
11971	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
11972	:info:build ; etc.
11973	:info:build ; in: DEFMETHOD PEEK-BYTE (LIST-INPUT-STREAM)
11974	:info:build ; (= BYTE FLEXI-STREAMS::PEEK-TYPE)
11975	:info:build ;
11976	:info:build ; note: unable to open code because: The operands might not be the same type.
11977	:info:build ; (PLUSP BYTE)
11978	:info:build ;
11979	:info:build ; note: forced to do GENERIC-> (cost 10)
11980	:info:build ; unable to do inline fixnum comparison (cost 3) because:
11981	:info:build ; The first argument is a INTEGER, not a FIXNUM.
11982	:info:build ; unable to do inline fixnum comparison (cost 4) because:
11983	:info:build ; The first argument is a INTEGER, not a FIXNUM.
11984	:info:build ; etc.
11985	:info:build ; in: DEFMETHOD TRANSFORM-OCTET (IN-MEMORY-STREAM T)
11986	:info:build ; (FUNCALL (OR (FLEXI-STREAMS::IN-MEMORY-STREAM-TRANSFORMER STREAM) #'IDENTITY)
11987	:info:build ; FLEXI-STREAMS:OCTET)
11988	:info:build ;
11989	:info:build ; note: unable to
11990	:info:build ; optimize away possible call to FDEFINITION at runtime
11991	:info:build ; because:
11992	:info:build ; callable expression is not known to be a function
11993	:info:build ; in: DEFMETHOD STREAM-READ-SEQUENCE (LIST-INPUT-STREAM T T T)
11994	:info:build ; (FUNCALL FLEXI-STREAMS::TRANSFORMER ELT)
11995	:info:build ;
11996	:info:build ; note: unable to
11997	:info:build ; optimize away possible call to FDEFINITION at runtime
11998	:info:build ; because:
11999	:info:build ; TRANSFORMER is not known to be a function
12000	:info:build ; (SETF (ELT SEQUENCE FLEXI-STREAMS::INDEX)
12001	:info:build ; (IF FLEXI-STREAMS::TRANSFORMER
12002	:info:build ; (FUNCALL FLEXI-STREAMS::TRANSFORMER ELT)
12003	:info:build ; ELT))
12004	:info:build ;
12005	:info:build ; note: unable to
12006	:info:build ; optimize
12007	:info:build ; due to type uncertainty:
12008	:info:build ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
12009	:info:build ;
12010	:info:build ; note: unable to
12011	:info:build ; optimize
12012	:info:build ; due to type uncertainty:
12013	:info:build ; The first argument is a SEQUENCE, not a LIST.
12014	:info:build ; in: DEFMETHOD STREAM-READ-BYTE (VECTOR-INPUT-STREAM)
12015	:info:build ; (AREF VECTOR FLEXI-STREAMS::CURRENT-INDEX)
12016	:info:build ;
12017	:info:build ; note: unable to
12018	:info:build ; optimize
12019	:info:build ; because:
12020	:info:build ; Upgraded element type of array is not known at compile time.
12021	:info:build ; in: DEFMETHOD STREAM-READ-SEQUENCE (VECTOR-INPUT-STREAM T T T)
12022	:info:build ; (AREF VECTOR FLEXI-STREAMS::VECTOR-INDEX)
12023	:info:build ;
12024	:info:build ; note: unable to
12025	:info:build ; optimize
12026	:info:build ; because:
12027	:info:build ; Upgraded element type of array is not known at compile time.
12028	:info:build ; (FUNCALL FLEXI-STREAMS::TRANSFORMER ELT)
12029	:info:build ;
12030	:info:build ; note: unable to
12031	:info:build ; optimize away possible call to FDEFINITION at runtime
12032	:info:build ; because:
12033	:info:build ; TRANSFORMER is not known to be a function
12034	:info:build ; (SETF (ELT SEQUENCE FLEXI-STREAMS::INDEX)
12035	:info:build ; (IF FLEXI-STREAMS::TRANSFORMER
12036	:info:build ; (FUNCALL FLEXI-STREAMS::TRANSFORMER ELT)
12037	:info:build ; ELT))
12038	:info:build ;
12039	:info:build ; note: unable to
12040	:info:build ; optimize
12041	:info:build ; due to type uncertainty:
12042	:info:build ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
12043	:info:build ;
12044	:info:build ; note: unable to
12045	:info:build ; optimize
12046	:info:build ; due to type uncertainty:
12047	:info:build ; The first argument is a SEQUENCE, not a LIST.
12048	:info:build ; in: DEFMETHOD STREAM-WRITE-SEQUENCE (VECTOR-OUTPUT-STREAM T T T)
12049	:info:build ; (ELT SEQUENCE FLEXI-STREAMS::INDEX)
12050	:info:build ;
12051	:info:build ; note: unable to
12052	:info:build ; optimize
12053	:info:build ; due to type uncertainty:
12054	:info:build ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
12055	:info:build ;
12056	:info:build ; note: unable to
12057	:info:build ; optimize
12058	:info:build ; due to type uncertainty:
12059	:info:build ; The first argument is a SEQUENCE, not a LIST.
12060	:info:build ; in: DEFMETHOD (SETF STREAM-FILE-POSITION) (T VECTOR-INPUT-STREAM)
12061	:info:build ; (<= 0 FLEXI-STREAMS::POSITION-SPEC FLEXI-STREAMS::END)
12062	:info:build ;
12063	:info:build ; note: unable to open code because: The operands might not be the same type.
12064	:info:build ;
12065	:info:build ; note: forced to do GENERIC-< (cost 10)
12066	:info:build ; unable to do inline fixnum comparison (cost 3) because:
12067	:info:build ; The first argument is a INTEGER, not a FIXNUM.
12068	:info:build ; unable to do inline fixnum comparison (cost 4) because:
12069	:info:build ; The first argument is a INTEGER, not a FIXNUM.
12070	:info:build ; etc.
12071	:info:build ;
12072	:info:build ; note: forced to do GENERIC-< (cost 10)
12073	:info:build ; unable to do inline fixnum comparison (cost 4) because:
12074	:info:build ; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
12075	:info:build ; The second argument is a REAL, not a FIXNUM.
12076	:info:build ; in: DEFMETHOD (SETF STREAM-FILE-POSITION) (T VECTOR-OUTPUT-STREAM)
12077	:info:build ; (ARRAY-TOTAL-SIZE VECTOR)
12078	:info:build ;
12079	:info:build ; note: unable to optimize because: can't tell the rank at compile time
12080	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/in-memory-tmpYKOEPICF.fasl
12081	:info:build ; compilation finished in 0:00:00.608
12082	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/stream.lisp" (written 09 JUL 2020 08:18:28 PM):
12083	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/stream-tmpQK8YY837.fasl
12084	:info:build ; compilation finished in 0:00:00.183
12085	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/output.lisp" (written 09 JUL 2020 08:18:28 PM):
12086	:info:build ; file: /opt/local/share/common-lisp/source/cl-flexi-streams/output.lisp
12087	:info:build ; in: DEFMETHOD STREAM-WRITE-CHAR :AFTER (FLEXI-OUTPUT-STREAM T)
12088	:info:build ; (INCF (THE INTEGER FLEXI-STREAMS::COLUMN))
12089	:info:build ; ==>
12090	:info:build ; (+ 1 (THE INTEGER (FLEXI-STREAMS:FLEXI-STREAM-COLUMN #:G913)))
12091	:info:build ;
12092	:info:build ; note: forced to do GENERIC-+ (cost 10)
12093	:info:build ; unable to do inline fixnum arithmetic (cost 1) because:
12094	:info:build ; The first argument is a INTEGER, not a FIXNUM.
12095	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
12096	:info:build ; &OPTIONAL).
12097	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
12098	:info:build ; The first argument is a INTEGER, not a FIXNUM.
12099	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
12100	:info:build ; &OPTIONAL).
12101	:info:build ; etc.
12102	:info:build ; in: DEFMETHOD STREAM-WRITE-STRING (FLEXI-OUTPUT-STREAM T)
12103	:info:build ; (LENGTH STRING)
12104	:info:build ;
12105	:info:build ; note: unable to
12106	:info:build ; optimize
12107	:info:build ; due to type uncertainty:
12108	:info:build ; The first argument is a SEQUENCE, not a VECTOR.
12109	:info:build ;
12110	:info:build ; note: unable to
12111	:info:build ; optimize
12112	:info:build ; due to type uncertainty:
12113	:info:build ; The first argument is a SEQUENCE, not a VECTOR.
12114	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/output-tmpJQI6KMRZ.fasl
12115	:info:build ; compilation finished in 0:00:00.136
12116	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/input.lisp" (written 09 JUL 2020 08:18:28 PM):
12117	:info:build ; file: /opt/local/share/common-lisp/source/cl-flexi-streams/input.lisp
12118	:info:build ; in: DEFMETHOD READ-BYTE* (FLEXI-INPUT-STREAM)
12119	:info:build ; (>= POSITION FLEXI-STREAMS::BOUND)
12120	:info:build ;
12121	:info:build ; note: forced to do GENERIC-< (cost 10)
12122	:info:build ; unable to do inline fixnum comparison (cost 4) because:
12123	:info:build ; The first argument is a INTEGER, not a FIXNUM.
12124	:info:build ; The second argument is a (OR NULL INTEGER), not a FIXNUM.
12125	:info:build ; (INCF POSITION)
12126	:info:build ; ==>
12127	:info:build ; (+ 1 (THE INTEGER (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G1214)))
12128	:info:build ;
12129	:info:build ; note: forced to do GENERIC-+ (cost 10)
12130	:info:build ; unable to do inline fixnum arithmetic (cost 1) because:
12131	:info:build ; The first argument is a INTEGER, not a FIXNUM.
12132	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
12133	:info:build ; &OPTIONAL).
12134	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
12135	:info:build ; The first argument is a INTEGER, not a FIXNUM.
12136	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
12137	:info:build ; &OPTIONAL).
12138	:info:build ; etc.
12139	:info:build ; (DECF POSITION)
12140	:info:build ; --> SB-IMPL::XSUBTRACT BLOCK
12141	:info:build ; ==>
12142	:info:build ; (- SB-IMPL::B SB-IMPL::A)
12143	:info:build ;
12144	:info:build ; note: forced to do GENERIC-- (cost 10)
12145	:info:build ; unable to do inline fixnum arithmetic (cost 1) because:
12146	:info:build ; The first argument is a INTEGER, not a FIXNUM.
12147	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
12148	:info:build ; &OPTIONAL).
12149	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
12150	:info:build ; The first argument is a INTEGER, not a FIXNUM.
12151	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
12152	:info:build ; &OPTIONAL).
12153	:info:build ; etc.
12154	:info:build ; in: DEFMETHOD STREAM-LISTEN (FLEXI-INPUT-STREAM)
12155	:info:build ; (>= POSITION FLEXI-STREAMS::BOUND)
12156	:info:build ;
12157	:info:build ; note: forced to do GENERIC-< (cost 10)
12158	:info:build ; unable to do inline fixnum comparison (cost 4) because:
12159	:info:build ; The first argument is a INTEGER, not a FIXNUM.
12160	:info:build ; The second argument is a (OR NULL INTEGER), not a FIXNUM.
12161	:info:build ; in: DEFUN UNREAD-CHAR%
12162	:info:build ; (DECF POSITION FLEXI-STREAMS::COUNTER)
12163	:info:build ; --> SB-IMPL::XSUBTRACT BLOCK
12164	:info:build ; ==>
12165	:info:build ; (- SB-IMPL::B SB-IMPL::A)
12166	:info:build ;
12167	:info:build ; note: forced to do GENERIC-- (cost 10)
12168	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
12169	:info:build ; The first argument is a T, not a FIXNUM.
12170	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
12171	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
12172	:info:build ; The first argument is a T, not a (UNSIGNED-BYTE 32).
12173	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
12174	:info:build ; (UNSIGNED-BYTE 32)
12175	:info:build ; &OPTIONAL).
12176	:info:build ; etc.
12177	:info:build ; in: DEFMETHOD STREAM-READ-CHAR (FLEXI-INPUT-STREAM)
12178	:info:build ; (OR (CODE-CHAR CHAR-CODE) CHAR-CODE)
12179	:info:build ; --> IF
12180	:info:build ; ==>
12181	:info:build ; CHAR-CODE
12182	:info:build ;
12183	:info:build ; note: deleting unreachable code
12184	:info:build ; in: DEFMETHOD STREAM-READ-SEQUENCE (FLEXI-INPUT-STREAM T T T)
12185	:info:build ; (MIN FLEXI-STREAMS::END
12186	:info:build ; (+ FLEXI-STREAMS::START (- FLEXI-STREAMS::BOUND POSITION)))
12187	:info:build ;
12188	:info:build ; note: unable to
12189	:info:build ; open-code FLOAT to RATIONAL comparison
12190	:info:build ; due to type uncertainty:
12191	:info:build ; The first argument is a REAL, not a SINGLE-FLOAT.
12192	:info:build ;
12193	:info:build ; note: unable to
12194	:info:build ; open-code FLOAT to RATIONAL comparison
12195	:info:build ; due to type uncertainty:
12196	:info:build ; The first argument is a REAL, not a DOUBLE-FLOAT.
12197	:info:build ; (REPLACE SEQUENCE FLEXI-STREAMS::OCTET-STACK :START1 FLEXI-STREAMS::START
12198	:info:build ; :END1 FLEXI-STREAMS::END)
12199	:info:build ;
12200	:info:build ; note: unable to
12201	:info:build ; optimize
12202	:info:build ; due to type uncertainty:
12203	:info:build ; The first argument is a (OR LIST
12204	:info:build ; (AND (NOT (VECTOR CHARACTER)) (NOT BASE-STRING)
12205	:info:build ; VECTOR)
12206	:info:build ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY
12207	:info:build ; * (*)).
12208	:info:build ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
12209	:info:build ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES
12210	:info:build ; (SIMPLE-ARRAY * (*))
12211	:info:build ; &REST T).
12212	:info:build ; (LENGTH FLEXI-STREAMS::OCTET-STACK)
12213	:info:build ;
12214	:info:build ; note: unable to
12215	:info:build ; optimize
12216	:info:build ; due to type uncertainty:
12217	:info:build ; The first argument is a SEQUENCE, not a VECTOR.
12218	:info:build ; (ELT SEQUENCE (1- FLEXI-STREAMS::INDEX))
12219	:info:build ;
12220	:info:build ; note: unable to
12221	:info:build ; optimize
12222	:info:build ; due to type uncertainty:
12223	:info:build ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
12224	:info:build ;
12225	:info:build ; note: unable to
12226	:info:build ; optimize
12227	:info:build ; due to type uncertainty:
12228	:info:build ; The first argument is a SEQUENCE, not a LIST.
12229	:info:build ; (- FLEXI-STREAMS::BOUND POSITION)
12230	:info:build ;
12231	:info:build ; note: forced to do GENERIC-- (cost 10)
12232	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
12233	:info:build ; The first argument is a T, not a FIXNUM.
12234	:info:build ; The second argument is a T, not a FIXNUM.
12235	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
12236	:info:build ; unable to do inline float arithmetic (cost 2) because:
12237	:info:build ; The first argument is a T, not a SINGLE-FLOAT.
12238	:info:build ; The second argument is a T, not a SINGLE-FLOAT.
12239	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
12240	:info:build ; &OPTIONAL).
12241	:info:build ; etc.
12242	:info:build ; (+ FLEXI-STREAMS::START (- FLEXI-STREAMS::BOUND POSITION))
12243	:info:build ;
12244	:info:build ; note: forced to do GENERIC-+ (cost 10)
12245	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
12246	:info:build ; The second argument is a NUMBER, not a FIXNUM.
12247	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
12248	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
12249	:info:build ; The first argument is a (INTEGER -536870912 536870910), not a (UNSIGNED-BYTE
12250	:info:build ; 32).
12251	:info:build ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 32).
12252	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
12253	:info:build ; (UNSIGNED-BYTE 32)
12254	:info:build ; &OPTIONAL).
12255	:info:build ; etc.
12256	:info:build ; (MIN FLEXI-STREAMS::END
12257	:info:build ; (+ FLEXI-STREAMS::START (- FLEXI-STREAMS::BOUND POSITION)))
12258	:info:build ;
12259	:info:build ; note: forced to do GENERIC-< (cost 10)
12260	:info:build ; unable to do inline fixnum comparison (cost 4) because:
12261	:info:build ; The first argument is a NUMBER, not a FIXNUM.
12262	:info:build ; (INCF POSITION (- FLEXI-STREAMS::INDEX FLEXI-STREAMS::START))
12263	:info:build ; ==>
12264	:info:build ; (+ (- FLEXI-STREAMS::INDEX FLEXI-STREAMS::START)
12265	:info:build ; (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G3467))
12266	:info:build ;
12267	:info:build ; note: forced to do GENERIC-+ (cost 10)
12268	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
12269	:info:build ; The first argument is a (INTEGER -536870910 1073741820), not a FIXNUM.
12270	:info:build ; The second argument is a T, not a FIXNUM.
12271	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
12272	:info:build ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because:
12273	:info:build ; The first argument is a (INTEGER -536870910 1073741820), not a (UNSIGNED-BYTE
12274	:info:build ; 32).
12275	:info:build ; The second argument is a T, not a (UNSIGNED-BYTE 32).
12276	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
12277	:info:build ; (UNSIGNED-BYTE 32)
12278	:info:build ; &OPTIONAL).
12279	:info:build ; etc.
12280	:info:build ;
12281	:info:build ; note: doing signed word to integer coercion (cost 20), for:
12282	:info:build ; the first argument of GENERIC-+
12283	:info:build ; (INCF FLEXI-STREAMS::INDEX FLEXI-STREAMS::OCTETS-FLUSHED)
12284	:info:build ; --> THE MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP
12285	:info:build ; ==>
12286	:info:build ; 1
12287	:info:build ;
12288	:info:build ; note: doing signed word to integer coercion (cost 20), for:
12289	:info:build ; the first argument of defaulted
12290	:info:build ; in: DEFMETHOD STREAM-UNREAD-CHAR (FLEXI-INPUT-STREAM T)
12291	:info:build ; (= (CHAR-CODE CHAR) FLEXI-STREAMS::LAST-CHAR-CODE)
12292	:info:build ;
12293	:info:build ; note: unable to open code because: The operands might not be the same type.
12294	:info:build ; in: DEFMETHOD UNREAD-BYTE (T FLEXI-INPUT-STREAM)
12295	:info:build ; (= BYTE FLEXI-STREAMS::LAST-OCTET)
12296	:info:build ;
12297	:info:build ; note: unable to
12298	:info:build ; open-code FLOAT to RATIONAL comparison
12299	:info:build ; due to type uncertainty:
12300	:info:build ; The first argument is a NUMBER, not a SINGLE-FLOAT.
12301	:info:build ; The second argument is a NUMBER, not a RATIONAL.
12302	:info:build ;
12303	:info:build ; note: unable to
12304	:info:build ; open-code FLOAT to RATIONAL comparison
12305	:info:build ; due to type uncertainty:
12306	:info:build ; The first argument is a NUMBER, not a DOUBLE-FLOAT.
12307	:info:build ; The second argument is a NUMBER, not a RATIONAL.
12308	:info:build ;
12309	:info:build ; note: unable to
12310	:info:build ; open-code FLOAT to RATIONAL comparison
12311	:info:build ; due to type uncertainty:
12312	:info:build ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
12313	:info:build ; The second argument is a NUMBER, not a RATIONAL.
12314	:info:build ;
12315	:info:build ; note: unable to
12316	:info:build ; open-code FLOAT to RATIONAL comparison
12317	:info:build ; due to type uncertainty:
12318	:info:build ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
12319	:info:build ; The second argument is a NUMBER, not a RATIONAL.
12320	:info:build ;
12321	:info:build ; note: unable to open code because: The operands might not be the same type.
12322	:info:build ;
12323	:info:build ; note: forced to do GENERIC-= (cost 10)
12324	:info:build ; unable to do inline float comparison (cost 3) because:
12325	:info:build ; The first argument is a T, not a SINGLE-FLOAT.
12326	:info:build ; The second argument is a T, not a SINGLE-FLOAT.
12327	:info:build ; unable to do inline float comparison (cost 3) because:
12328	:info:build ; The first argument is a T, not a DOUBLE-FLOAT.
12329	:info:build ; The second argument is a T, not a DOUBLE-FLOAT.
12330	:info:build ; (DECF (THE INTEGER POSITION))
12331	:info:build ; --> SB-IMPL::XSUBTRACT BLOCK
12332	:info:build ; ==>
12333	:info:build ; (- SB-IMPL::B SB-IMPL::A)
12334	:info:build ;
12335	:info:build ; note: forced to do GENERIC-- (cost 10)
12336	:info:build ; unable to do inline fixnum arithmetic (cost 1) because:
12337	:info:build ; The first argument is a INTEGER, not a FIXNUM.
12338	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
12339	:info:build ; &OPTIONAL).
12340	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
12341	:info:build ; The first argument is a INTEGER, not a FIXNUM.
12342	:info:build ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
12343	:info:build ; &OPTIONAL).
12344	:info:build ; etc.
12345	:info:build ; in: DEFMETHOD PEEK-BYTE (FLEXI-INPUT-STREAM)
12346	:info:build ; (= FLEXI-STREAMS:OCTET FLEXI-STREAMS::PEEK-TYPE)
12347	:info:build ;
12348	:info:build ; note: unable to open code because: The operands might not be the same type.
12349	:info:build ; (PLUSP FLEXI-STREAMS:OCTET)
12350	:info:build ;
12351	:info:build ; note: forced to do GENERIC-> (cost 10)
12352	:info:build ; unable to do inline fixnum comparison (cost 3) because:
12353	:info:build ; The first argument is a INTEGER, not a FIXNUM.
12354	:info:build ; unable to do inline fixnum comparison (cost 4) because:
12355	:info:build ; The first argument is a INTEGER, not a FIXNUM.
12356	:info:build ; etc.
12357	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/input-tmpWUHK9UI0.fasl
12358	:info:build ; compilation finished in 0:00:00.267
12359	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/io.lisp" (written 09 JUL 2020 08:18:28 PM):
12360	:info:build ; file: /opt/local/share/common-lisp/source/cl-flexi-streams/io.lisp
12361	:info:build ; in: DEFMETHOD RESET-INPUT-STATE (FLEXI-IO-STREAM)
12362	:info:build ; (LENGTH FLEXI-STREAMS::OCTET-STACK)
12363	:info:build ;
12364	:info:build ; note: unable to
12365	:info:build ; optimize
12366	:info:build ; due to type uncertainty:
12367	:info:build ; The first argument is a SEQUENCE, not a VECTOR.
12368	:info:build ; in: DEFMETHOD WRITE-BYTE* :AFTER (T FLEXI-IO-STREAM)
12369	:info:build ; (INCF POSITION)
12370	:info:build ; ==>
12371	:info:build ; (+ 1 (FLEXI-STREAMS:FLEXI-STREAM-POSITION #:G79))
12372	:info:build ;
12373	:info:build ; note: unable to
12374	:info:build ; associate +/(+ -) of constants
12375	:info:build ; due to type uncertainty:
12376	:info:build ; The first argument is a NUMBER, not a RATIONAL.
12377	:info:build ;
12378	:info:build ; note: forced to do GENERIC-+ (cost 10)
12379	:info:build ; unable to do inline fixnum arithmetic (cost 1) because:
12380	:info:build ; The first argument is a T, not a FIXNUM.
12381	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
12382	:info:build ; unable to do inline fixnum arithmetic (cost 2) because:
12383	:info:build ; The first argument is a T, not a FIXNUM.
12384	:info:build ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
12385	:info:build ; etc.
12386	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/io-tmpUUOI3UDB.fasl
12387	:info:build ; compilation finished in 0:00:00.127
12388	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-flexi-streams/strings.lisp" (written 09 JUL 2020 08:18:28 PM):
12389	:info:build ; file: /opt/local/share/common-lisp/source/cl-flexi-streams/strings.lisp
12390	:info:build ; in: DEFUN STRING-TO-OCTETS
12391	:info:build ; (LENGTH STRING)
12392	:info:build ;
12393	:info:build ; note: unable to
12394	:info:build ; optimize
12395	:info:build ; due to type uncertainty:
12396	:info:build ; The first argument is a SEQUENCE, not a VECTOR.
12397	:info:build ; in: DEFUN OCTETS-TO-STRING
12398	:info:build ; (LENGTH SEQUENCE)
12399	:info:build ;
12400	:info:build ; note: unable to
12401	:info:build ; optimize
12402	:info:build ; due to type uncertainty:
12403	:info:build ; The first argument is a SEQUENCE, not a VECTOR.
12404	:info:build ; in: DEFUN OCTET-LENGTH
12405	:info:build ; (LENGTH STRING)
12406	:info:build ;
12407	:info:build ; note: unable to
12408	:info:build ; optimize
12409	:info:build ; due to type uncertainty:
12410	:info:build ; The first argument is a SEQUENCE, not a VECTOR.
12411	:info:build ; in: DEFUN CHAR-LENGTH
12412	:info:build ; (LENGTH SEQUENCE)
12413	:info:build ;
12414	:info:build ; note: unable to
12415	:info:build ; optimize
12416	:info:build ; due to type uncertainty:
12417	:info:build ; The first argument is a SEQUENCE, not a VECTOR.
12418	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-flexi-streams/strings-tmpG1IOPEUW.fasl
12419	:info:build ; compilation finished in 0:00:00.138
12420	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-trivial-features/src/tf-sbcl.lisp" (written 07 JUN 2023 10:27:43 PM):
12421	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-trivial-features/src/tf-sbcl-tmpM0NOM18K.fasl
12422	:info:build ; compilation finished in 0:00:00.480
12423	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-trivial-indent/indent.lisp" (written 04 JUL 2023 01:01:58 AM):
12424	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-trivial-indent/indent-tmpVIL8T0YR.fasl
12425	:info:build ; compilation finished in 0:00:00.121
12426	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-documentation-utils/package.lisp" (written 04 JUL 2023 01:01:34 AM):
12427	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-documentation-utils/package-tmpBODYQO2B.fasl
12428	:info:build ; compilation finished in 0:00:00.007
12429	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-documentation-utils/toolkit.lisp" (written 04 JUL 2023 01:01:34 AM):
12430	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-documentation-utils/toolkit-tmpTLIPDLNH.fasl
12431	:info:build ; compilation finished in 0:00:00.335
12432	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-documentation-utils/documentation.lisp" (written 04 JUL 2023 01:01:34 AM):
12433	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-documentation-utils/documentation-tmpMOOD9PZK.fasl
12434	:info:build ; compilation finished in 0:00:00.059
12435	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-float-features/package.lisp" (written 30 NOV 2023 05:43:37 AM):
12436	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-float-features/package-tmpJSQEHKQD.fasl
12437	:info:build ; compilation finished in 0:00:00.005
12438	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-float-features/float-features.lisp" (written 30 NOV 2023 05:43:37 AM):
12439	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-float-features/float-features-tmpX9RFG54G.fasl
12440	:info:build ; compilation finished in 0:00:00.160
12441	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-float-features/constants.lisp" (written 30 NOV 2023 05:43:37 AM):
12442	:info:build ; file: /opt/local/share/common-lisp/source/cl-float-features/constants.lisp
12443	:info:build ; in: DEFCONSTANT LONG-FLOAT-NAN
12444	:info:build ; (FLOAT-FEATURES:BITS-LONG-FLOAT 170138587312039964317873038467719495680)
12445	:info:build ;
12446	:info:build ; note: deleting unreachable code
12447	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-float-features/constants-tmpJZYZV5YE.fasl
12448	:info:build ; compilation finished in 0:00:00.060
12449	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-float-features/documentation.lisp" (written 30 NOV 2023 05:43:37 AM):
12450	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-float-features/documentation-tmp7AGT8VJK.fasl
12451	:info:build ; compilation finished in 0:00:00.026
12452	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-closer-mop/closer-mop-packages.lisp" (written 28 NOV 2023 02:28:08 AM):
12453	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-closer-mop/closer-mop-packages-tmpVX9R9U8P.fasl
12454	:info:build ; compilation finished in 0:00:00.605
12455	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-closer-mop/closer-mop-shared.lisp" (written 28 NOV 2023 02:28:08 AM):
12456	:info:build ; file: /opt/local/share/common-lisp/source/cl-closer-mop/closer-mop-shared.lisp
12457	:info:build ; in:
12458	:info:build ; COMMON-LISP:DEFMETHOD COMPUTE-EFFECTIVE-METHOD-FUNCTION (GENERIC-FUNCTION T T)
12459	:info:build ; (CLOSER-MOP::TRANSFORM-EFFECTIVE-METHOD (CLOSER-MOP::FORM)
12460	:info:build ; (IF (ATOM CLOSER-MOP::FORM)
12461	:info:build ; CLOSER-MOP::FORM
12462	:info:build ; (CASE (CAR CLOSER-MOP::FORM)
12463	:info:build ; (CALL-METHOD (CLOSER-MOP::TRANSFORM-EFFECTIVE-METHOD #))
12464	:info:build ; (MAKE-METHOD
12465	:info:build ; (WHEN # #)
12466	:info:build ; (LET #
12467	:info:build ; #))
12468	:info:build ; (T (MAPCAR #'CLOSER-MOP::TRANSFORM-EFFECTIVE-METHOD #)))))
12469	:info:build ;
12470	:info:build ; note: Return type not fixed values, so can't use known return convention:
12471	:info:build ; *
12472	:info:build ; in: DEFUN GET-EMF
12473	:info:build ; (SUBSEQ CLOSER-MOP::ARGS 0 CLOSER-MOP::NOF-REQUIRED-ARGS)
12474	:info:build ;
12475	:info:build ; note: unable to
12476	:info:build ; optimize
12477	:info:build ; due to type uncertainty:
12478	:info:build ; The first argument is a SEQUENCE, not a VECTOR.
12479	:info:build ;
12480	:info:build ; note: unable to
12481	:info:build ; optimize
12482	:info:build ; due to type uncertainty:
12483	:info:build ; The first argument is a SEQUENCE, not a LIST.
12484	:info:build ;
12485	:info:build ; note: unable to
12486	:info:build ; optimize
12487	:info:build ; due to type uncertainty:
12488	:info:build ; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
12489	:info:build ; in: DEFUN ONLY-STANDARD-METHODS
12490	:info:build ; (TYPEP CLOSER-MOP::GF SB-MOP:SPECIALIZER)
12491	:info:build ;
12492	:info:build ; note: unable to optimize because: can't open-code test of non-constant type
12493	:info:build ; (EQL (SB-MOP:EQL-SPECIALIZER-OBJECT SB-MOP:SPECIALIZER) CLOSER-MOP::GF)
12494	:info:build ;
12495	:info:build ; note: unable to
12496	:info:build ; optimize
12497	:info:build ; due to type uncertainty:
12498	:info:build ; The first argument is a T, not a SINGLE-FLOAT.
12499	:info:build ; The second argument is a T, not a SINGLE-FLOAT.
12500	:info:build ;
12501	:info:build ; note: unable to
12502	:info:build ; optimize
12503	:info:build ; due to type uncertainty:
12504	:info:build ; The first argument is a T, not a DOUBLE-FLOAT.
12505	:info:build ; The second argument is a T, not a DOUBLE-FLOAT.
12506	:info:build ;
12507	:info:build ; note: forced to do GENERIC-EQL (cost 10)
12508	:info:build ; unable to do inline fixnum comparison (cost 4) because:
12509	:info:build ; The first argument is a T, not a FIXNUM.
12510	:info:build ; The second argument is a T, not a FIXNUM.
12511	:info:build ; in: DEFUN METHODS-ALL-THE-SAME-SPECIALIZERS
12512	:info:build ; (EQL (SB-MOP:EQL-SPECIALIZER-OBJECT CLOSER-MOP::SPEC1)
12513	:info:build ; (SB-MOP:EQL-SPECIALIZER-OBJECT CLOSER-MOP::SPEC2))
12514	:info:build ;
12515	:info:build ; note: unable to
12516	:info:build ; optimize
12517	:info:build ; due to type uncertainty:
12518	:info:build ; The first argument is a T, not a SINGLE-FLOAT.
12519	:info:build ; The second argument is a T, not a SINGLE-FLOAT.
12520	:info:build ;
12521	:info:build ; note: unable to
12522	:info:build ; optimize
12523	:info:build ; due to type uncertainty:
12524	:info:build ; The first argument is a T, not a DOUBLE-FLOAT.
12525	:info:build ; The second argument is a T, not a DOUBLE-FLOAT.
12526	:info:build ;
12527	:info:build ; note: forced to do GENERIC-EQL (cost 10)
12528	:info:build ; unable to do inline fixnum comparison (cost 4) because:
12529	:info:build ; The first argument is a T, not a FIXNUM.
12530	:info:build ; The second argument is a T, not a FIXNUM.
12531	:info:build ; in: DEFUN COMPUTE-DISCRIMINATOR
12532	:info:build ; (TYPEP CLOSER-MOP::ARG CLOSER-MOP::SPEC)
12533	:info:build ;
12534	:info:build ; note: unable to optimize because: can't open-code test of non-constant type
12535	:info:build ; (EQL CLOSER-MOP::ARG (SB-MOP:EQL-SPECIALIZER-OBJECT CLOSER-MOP::SPEC))
12536	:info:build ;
12537	:info:build ; note: unable to
12538	:info:build ; optimize
12539	:info:build ; due to type uncertainty:
12540	:info:build ; The first argument is a T, not a SINGLE-FLOAT.
12541	:info:build ; The second argument is a T, not a SINGLE-FLOAT.
12542	:info:build ;
12543	:info:build ; note: unable to
12544	:info:build ; optimize
12545	:info:build ; due to type uncertainty:
12546	:info:build ; The first argument is a T, not a DOUBLE-FLOAT.
12547	:info:build ; The second argument is a T, not a DOUBLE-FLOAT.
12548	:info:build ; (FUNCALL CLOSER-MOP::COMPUTE-NATIVE-DISCRIMINATOR)
12549	:info:build ;
12550	:info:build ; note: unable to
12551	:info:build ; optimize away possible call to FDEFINITION at runtime
12552	:info:build ; because:
12553	:info:build ; COMPUTE-NATIVE-DISCRIMINATOR is not known to be a function
12554	:info:build ;
12555	:info:build ; note: unable to
12556	:info:build ; optimize away possible call to FDEFINITION at runtime
12557	:info:build ; because:
12558	:info:build ; COMPUTE-NATIVE-DISCRIMINATOR is not known to be a function
12559	:info:build ; (EQL CLOSER-MOP::ARG (SB-MOP:EQL-SPECIALIZER-OBJECT CLOSER-MOP::SPEC))
12560	:info:build ;
12561	:info:build ; note: forced to do GENERIC-EQL (cost 10)
12562	:info:build ; unable to do inline fixnum comparison (cost 4) because:
12563	:info:build ; The first argument is a T, not a FIXNUM.
12564	:info:build ; The second argument is a T, not a FIXNUM.
12565	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-closer-mop/closer-mop-shared-tmpQCDFKETQ.fasl
12566	:info:build ; compilation finished in 0:00:00.638
12567	:info:build ; compiling file "/opt/local/share/common-lisp/source/cl-closer-mop/closer-sbcl.lisp" (written 28 NOV 2023 02:28:08 AM):
12568	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/share/common-lisp/source/cl-closer-mop/closer-sbcl-tmpO1PDDUR.fasl
12569	:info:build ; compilation finished in 0:00:00.009
12570	:info:build ; compiling file "/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/build/source/cl-com.inuoe.jzon/src/eisel-lemire.lisp" (written 21 DEC 2023 09:51:08 AM):
12571	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/build/source/cl-com.inuoe.jzon/src/eisel-lemire-tmpIX4U16ZB.fasl
12572	:info:build ; compilation finished in 0:00:03.183
12573	:info:build ; compiling file "/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/build/source/cl-com.inuoe.jzon/src/ratio-to-double.lisp" (written 21 DEC 2023 09:51:08 AM):
12574	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/build/source/cl-com.inuoe.jzon/src/ratio-to-double-tmp93OFNPHA.fasl
12575	:info:build ; compilation finished in 0:00:00.142
12576	:info:build ; compiling file "/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/build/source/cl-com.inuoe.jzon/src/schubfach.lisp" (written 21 DEC 2023 09:51:08 AM):
12577	:info:build ; file: /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/build/source/cl-com.inuoe.jzon/src/schubfach.lisp
12578	:info:build ; in: DEFUN %WRITE-SIGNIFICANT-FRACTION-DIGITS64
12579	:info:build ; (LET* ((COM.INUOE.JZON/SCHUBFACH::Q1
12580	:info:build ; (COM.INUOE.JZON/SCHUBFACH::%INT32
12581	:info:build ; (COM.INUOE.JZON/SCHUBFACH::%>>>64 # 25)))
12582	:info:build ; (COM.INUOE.JZON/SCHUBFACH::R1
12583	:info:build ; (COM.INUOE.JZON/SCHUBFACH::%INT32 (- COM.INUOE.JZON/SCHUBFACH::Q #)))
12584	:info:build ; (COM.INUOE.JZON/SCHUBFACH::POSM8 (- COM.INUOE.JZON/SCHUBFACH::POS 8)))
12585	:info:build ; (COND
12586	:info:build ; ((ZEROP COM.INUOE.JZON/SCHUBFACH::R1)
12587	:info:build ; (SETF COM.INUOE.JZON/SCHUBFACH::Q0 COM.INUOE.JZON/SCHUBFACH::Q1)
12588	:info:build ; (SETF COM.INUOE.JZON/SCHUBFACH::POS COM.INUOE.JZON/SCHUBFACH::POSM8))
12589	:info:build ; (T
12590	:info:build ; (COM.INUOE.JZON/SCHUBFACH::%WRITE-FRACTION-DIGITS
12591	:info:build ; COM.INUOE.JZON/SCHUBFACH::Q1 COM.INUOE.JZON/SCHUBFACH::POSM8
12592	:info:build ; COM.INUOE.JZON/SCHUBFACH::POS-LIM COM.INUOE.JZON/SCHUBFACH::BUF
12593	:info:build ; COM.INUOE.JZON/SCHUBFACH::DS)
12594	:info:build ; (SETF COM.INUOE.JZON/SCHUBFACH::Q0 COM.INUOE.JZON/SCHUBFACH::R1)
12595	:info:build ; (SETF COM.INUOE.JZON/SCHUBFACH::POS-LIM
12596	:info:build ; COM.INUOE.JZON/SCHUBFACH::POSM8))))
12597	:info:build ;
12598	:info:build ; note: deleting unreachable code
12599	:info:build ; (COM.INUOE.JZON/SCHUBFACH::%MULTIPLY-HIGH COM.INUOE.JZON/SCHUBFACH::Q
12600	:info:build ; 6189700196426901375)
12601	:info:build ;
12602	:info:build ; caught WARNING:
12603	:info:build ; Constant
12604	:info:build ; 6189700196426901375 conflicts with its asserted type
12605	:info:build ; (UNSIGNED-BYTE 32).
12606	:info:build ; See also:
12607	:info:build ; The SBCL Manual, Node "Handling of Types"
12608	:info:build ; in: DEFUN %WRITE-DOUBLE
12609	:info:build ; (LET* ((COM.INUOE.JZON/SCHUBFACH::VB40
12610	:info:build ; (COM.INUOE.JZON/SCHUBFACH::%INT32
12611	:info:build ; (* COM.INUOE.JZON/SCHUBFACH::M10 40)))
12612	:info:build ; (COM.INUOE.JZON/SCHUBFACH::DIFF
12613	:info:build ; (COM.INUOE.JZON/SCHUBFACH::%INT32
12614	:info:build ; (- COM.INUOE.JZON/SCHUBFACH::VBL COM.INUOE.JZON/SCHUBFACH::VB40))))
12615	:info:build ; (OR (>= (LOGXOR (+ # 40) COM.INUOE.JZON/SCHUBFACH::DIFF) 0)
12616	:info:build ; (PROGN
12617	:info:build ; (SETF COM.INUOE.JZON/SCHUBFACH::M10 #)
12618	:info:build ; (SETF COM.INUOE.JZON/SCHUBFACH::E10 #)
12619	:info:build ; NIL)))
12620	:info:build ;
12621	:info:build ; note: deleting unreachable code
12622	:info:build ; (COM.INUOE.JZON/SCHUBFACH::%MULTIPLY-HIGH COM.INUOE.JZON/SCHUBFACH::VB
12623	:info:build ; 461168601842738792)
12624	:info:build ;
12625	:info:build ; caught WARNING:
12626	:info:build ; Constant 461168601842738792 conflicts with its asserted type (UNSIGNED-BYTE 32).
12627	:info:build ; See also:
12628	:info:build ; The SBCL Manual, Node "Handling of Types"
12629	:info:build ; wrote /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/.home/.cache/common-lisp/sbcl-2.4.3-macosx-ppc32/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/build/source/cl-com.inuoe.jzon/src/schubfach-tmpOH5AKS8D.fasl
12630	:info:build ; compilation finished in 0:00:01.410
12631	:info:build Unhandled UIOP/LISP-BUILD:COMPILE-FILE-ERROR in thread #<SB-THREAD:THREAD tid=267 "main thread" RUNNING
12632	:info:build {11493851}>:
12633	:info:build COMPILE-FILE-ERROR while
12634	:info:build compiling #<CL-SOURCE-FILE "com.inuoe.jzon" "schubfach">
12635	:info:build Backtrace for: #<SB-THREAD:THREAD tid=267 "main thread" RUNNING {11493851}>
12636	:info:build 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {17C7BB81}> #<unused argument> :QUIT T)
12637	:info:build 1: (SB-DEBUG::RUN-HOOK INVOKE-DEBUGGER-HOOK #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {17C7BB81}>)
12638	:info:build 2: (INVOKE-DEBUGGER #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {17C7BB81}>)
12639	:info:build 3: (ERROR UIOP/LISP-BUILD:COMPILE-FILE-ERROR :CONTEXT-FORMAT "~/asdf-action::format-action/" :CONTEXT-ARGUMENTS ((#<ASDF/LISP-ACTION:COMPILE-OP > . #<ASDF/LISP-ACTION:CL-SOURCE-FILE "com.inuoe.jzon" "schubfach">)))
12640	:info:build 4: (UIOP/LISP-BUILD:CHECK-LISP-COMPILE-RESULTS NIL T T "~/asdf-action::format-action/" ((#<ASDF/LISP-ACTION:COMPILE-OP > . #<ASDF/LISP-ACTION:CL-SOURCE-FILE "com.inuoe.jzon" "schubfach">)))
12641	:info:build 5: ((SB-PCL::EMF ASDF/ACTION:PERFORM) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "com.inuoe.jzon" "schubfach">)
12642	:info:build 6: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
12643	:info:build 7: ((:METHOD ASDF/ACTION:PERFORM :AROUND (ASDF/LISP-ACTION:COMPILE-OP ASDF/LISP-ACTION:CL-SOURCE-FILE)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "com.inuoe.jzon" "schubfach">) [fast-method]
12644	:info:build 8: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "com.inuoe.jzon" "schubfach">) [fast-method]
12645	:info:build 9: ((:METHOD ASDF/PLAN:PERFORM-PLAN (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {11C5C239}>) [fast-method]
12646	:info:build 10: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
12647	:info:build 11: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {11C5C239}>) [fast-method]
12648	:info:build 12: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/OPERATE:BUILD-OP > #<ASDF/SYSTEM:SYSTEM "com.inuoe.jzon-tests"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method]
12649	:info:build 13: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/OPERATE:BUILD-OP > #<ASDF/SYSTEM:SYSTEM "com.inuoe.jzon-tests">)
12650	:info:build 14: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
12651	:info:build 15: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/OPERATE:BUILD-OP > #<ASDF/SYSTEM:SYSTEM "com.inuoe.jzon-tests">) [fast-method]
12652	:info:build 16: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/OPERATE:BUILD-OP COM.INUOE.JZON-TESTS)
12653	:info:build 17: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
12654	:info:build 18: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/OPERATE:BUILD-OP COM.INUOE.JZON-TESTS) [fast-method]
12655	:info:build 19: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {11C5C10D}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL)
12656	:info:build 20: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
12657	:info:build 21: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {11C5C08D}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL)
12658	:info:build 22: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/OPERATE:BUILD-OP COM.INUOE.JZON-TESTS) [fast-method]
12659	:info:build 23: (SB-INT:SIMPLE-EVAL-IN-LEXENV (ASDF/OPERATE:OPERATE (QUOTE ASDF/OPERATE:BUILD-OP) (QUOTE COM.INUOE.JZON-TESTS)) #<NULL-LEXENV>)
12660	:info:build 24: (EVAL (ASDF/OPERATE:OPERATE (QUOTE ASDF/OPERATE:BUILD-OP) (QUOTE COM.INUOE.JZON-TESTS)))
12661	:info:build 25: (SB-IMPL::PROCESS-EVAL/LOAD-OPTIONS ((:EVAL . "(require \"asdf\")") (:EVAL . #<(SIMPLE-ARRAY CHARACTER (316)) (setf asdf:central-registry (list* (quote default-pathname-defaults) #p"/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com... {11DF6007}>) (:EVAL . "(asdf:operate (quote asdf:build-op) (quote com.inuoe.jzon-tests))") (:QUIT)))
12662	:info:build 26: (SB-IMPL::TOPLEVEL-INIT)
12663	:info:build 27: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP))
12664	:info:build 28: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP))
12665	:info:build 29: (SB-IMPL::%START-LISP)
12666	:info:build unhandled condition in --disable-debugger mode, quitting
12667	:info:build ;
12668	:info:build ; compilation unit aborted
12669	:info:build ; caught 1 fatal ERROR condition
12670	:info:build ; caught 2 WARNING conditions
12671	:info:build ; caught 7 STYLE-WARNING conditions
12672	:info:build ; printed 1053 notes
12673	:info:build Command failed: /opt/local/bin/sbcl --no-sysinit --no-userinit --non-interactive --eval '(require "asdf")' --eval '(setf asdf:central-registry (list* (quote default-pathname-defaults) #p"/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/work/build/system/" #p"/opt/local/share/common-lisp/system/" asdf:central-registry))' --eval '(asdf:operate (quote asdf:build-op) (quote com.inuoe.jzon-tests))' 2>&1
12674	:info:build Exit code: 1
12675	:error:build Failed to build cl-com.inuoe.jzon: asdf:build-op cannot be executed
12676	:debug:build Error code: NONE
12677	:debug:build Backtrace: asdf:build-op cannot be executed
12678	:debug:build while executing
12679	:debug:build "$procedure $targetname"
12680	:error:build See /opt/local/var/macports/logs/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_lisp_cl-com.inuoe.jzon/cl-com.inuoe.jzon/main.log for details.

Download in other formats:

Original Format