==> Building on shinx ==> Checking for remote environment... ==> Syncing package to remote host... sending incremental file list created directory packages/sbcl ./ .SRCINFO 512 100% 0.00kB/s 0:00:00 512 100% 0.00kB/s 0:00:00 (xfr#1, to-chk=4/6) .nvchecker.toml 81 100% 79.10kB/s 0:00:00 81 100% 79.10kB/s 0:00:00 (xfr#2, to-chk=3/6) PKGBUILD 1,881 100% 1.79MB/s 0:00:00 1,881 100% 1.79MB/s 0:00:00 (xfr#3, to-chk=2/6) arch-fixes.lisp 668 100% 652.34kB/s 0:00:00 668 100% 652.34kB/s 0:00:00 (xfr#4, to-chk=1/6) sbcl-2.4.9-1.log 610 100% 595.70kB/s 0:00:00 610 100% 595.70kB/s 0:00:00 (xfr#5, to-chk=0/6) sent 2,350 bytes received 150 bytes 1,666.67 bytes/sec total size is 3,334 speedup is 1.33 ==> Applying RISC-V patches... sending incremental file list ./ riscv64.patch 671 100% 0.00kB/s 0:00:00 671 100% 0.00kB/s 0:00:00 (xfr#1, to-chk=0/2) sent 553 bytes received 38 bytes 394.00 bytes/sec total size is 671 speedup is 1.14 patching file PKGBUILD Hunk #1 succeeded at 12 with fuzz 1. ==> Patching arch to riscv64... ==> Running extra-riscv64-build -- -d /home/felix/packages/riscv64-pkg-cache:/var/cache/pacman/pkg -l felix21 on remote host... ==> Locking clean chroot...done ]2;🔵 Container arch-nspawn-3455986 on shinx.felixc.at[?25l:: Synchronizing package databases... core downloading... extra downloading... :: Starting full system upgrade... there is nothing to do [?25h==> Building in chroot for [extra] (riscv64)... ==> Synchronizing chroot copy [/var/lib/archbuild/extra-riscv64/root] -> [felix21]...done ==> Making package: sbcl 2.4.9-1 (Sat Oct 12 02:24:18 2024) ==> Retrieving sources...  -> Downloading sbcl-2.4.9-source.tar.bz2... % Total % Received % Xferd Average Speed Time Time Time Current Dload Upload Total Spent Left Speed 0 0 0 0 0 0 0 0 --:--:-- --:--:-- --:--:-- 0 100 375 100 375 0 0 756 0 --:--:-- --:--:-- --:--:-- 757 100 7970k 100 7970k 0 0 9742k 0 --:--:-- --:--:-- --:--:-- 9742k  -> Found arch-fixes.lisp ==> Validating source files with sha256sums... sbcl-2.4.9-source.tar.bz2 ... Passed arch-fixes.lisp ... Passed ]2;🔵 Container arch-nspawn-3458163 on shinx.felixc.at==> Making package: sbcl 2.4.9-1 (Sat Oct 12 02:24:31 2024) ==> Checking runtime dependencies... ==> Checking buildtime dependencies... ==> Installing missing dependencies... [?25lresolving dependencies... looking for conflicting packages... Package (3) New Version Net Change extra/ffcall 2.4-3 1.16 MiB extra/libsigsegv 2.14-3 0.02 MiB extra/clisp 2.49.93-7.1 21.83 MiB Total Installed Size: 23.01 MiB :: Proceed with installation? [Y/n] checking keyring... checking package integrity... loading package files... checking for file conflicts... :: Processing package changes... installing libsigsegv... installing ffcall... installing clisp... :: Running post-transaction hooks... (1/1) Arming ConditionNeedsUpdate... [?25h==> Retrieving sources...  -> Found sbcl-2.4.9-source.tar.bz2  -> Found arch-fixes.lisp ==> WARNING: Skipping all source file integrity checks. ==> Extracting sources...  -> Extracting sbcl-2.4.9-source.tar.bz2 with bsdtar ==> Starting build()... [1]> "CLISP" rm -f *~ *.bak *.orig \#*\# .\#* texput.log *.fasl rm -rf sbcl asdf "docstrings/" rm -f sbcl.html asdf.html rm -f contrib-docs.texi-temp rm -f package-locks.texi-temp rm -f variables.texinfo rm -f sbcl.ps asdf.ps sbcl.pdf asdf.pdf html-stamp tempfiles-stamp rm -f asdf.aux asdf.cp asdf.cps asdf.fn asdf.fns asdf.ky asdf.log asdf.pg asdf.toc asdf.tp asdf.tps asdf.vr asdf.vrs sbcl.aux sbcl.cp sbcl.cps sbcl.fn sbcl.fns sbcl.ky sbcl.log sbcl.pg sbcl.toc sbcl.tp sbcl.tps sbcl.vr sbcl.vrs rm -f sbcl.info sbcl.info-* asdf.info rm -rf *.include *.info *.pdf *~ *.cp *.fn *.ky *.log *.pg *.toc \ *.tp *.vr *.aux *.eps *.png *.dvi *.ps *.txt *.fns \ html-stamp sbcl-internals/ //entering make-config.sh //ensuring the existence of output/ directory //guessing default target CPU architecture from host architecture //setting up CPU-architecture-dependent information sbcl_arch="riscv" Enabling threads due to --fancy. //initializing /build/sbcl/src/sbcl-2.4.9/local-target-features.lisp-expr //setting up OS-dependent information make: Entering directory '/build/sbcl/src/sbcl-2.4.9/tools-for-build' cc -I../src/runtime -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl determine-endianness.c -ldl -Wl,-no-as-needed -o determine-endianness make: Leaving directory '/build/sbcl/src/sbcl-2.4.9/tools-for-build' //finishing /build/sbcl/src/sbcl-2.4.9/local-target-features.lisp-expr //building host tools make: Entering directory '/build/sbcl/src/sbcl-2.4.9/tools-for-build' cc -DDEFINE_MAIN -Wl,-O1 -Wl,--sort-common -Wl,--as-needed -Wl,-z,relro -Wl,-z,now -flto=auto -I../src/runtime -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -o perfecthash ../src/runtime/perfecthash.c make: Leaving directory '/build/sbcl/src/sbcl-2.4.9/tools-for-build' //Starting build: Sat Oct 12 02:25:02 CEST 2024 //Options: --prefix='/usr' --xc-host='env LC_ALL=C.utf8 clisp -q -norc' //entering make-host-1.sh //building cross-compiler, and doing first genesis [1]> ;; Loading file loader.lisp ... ;; Loaded file loader.lisp #P"/build/sbcl/src/sbcl-2.4.9/loader.lisp" [2]> ;; Loading file make-host-1.lisp ... ;; Loading file src/cold/shared.lisp ... ;; Loading file src/cold/shebang.lisp ... ;; Loaded file src/cold/shebang.lisp ;; Loaded file src/cold/shared.lisp target SB-XC:*FEATURES* = (:RISCV :GENCGC :64-BIT :ANSI-CL :ANSI-COMPLIANT-LOAD-TRUENAME :COMMON-LISP :COMPACT-SYMBOL :COMPARE-AND-SWAP-VOPS :ELF :GENERATIONAL :IEEE-FLOATING-POINT :LINUX :LITTLE-ENDIAN :MEMORY-BARRIER-VOPS :OS-PROVIDES-BLKSIZE-T :OS-PROVIDES-CLOSE-RANGE-WRAPPER :OS-PROVIDES-DLADDR :OS-PROVIDES-DLOPEN :OS-PROVIDES-GETPROTOBY-R :OS-PROVIDES-POLL :OS-PROVIDES-POSIX-SPAWN :OS-PROVIDES-SUSECONDS-T :PACKAGE-LOCAL-NICKNAMES :SB-AFTER-XC-CORE :SB-CORE-COMPRESSION :SB-DOC :SB-EVAL :SB-FUTEX :SB-LDB :SB-PACKAGE-LOCKS :SB-SOURCE-LOCATIONS :SB-THREAD :SB-UNICODE :SB-XREF-FOR-INTERNALS :SBCL :UNIX) ;; Loading file src/cold/set-up-cold-packages.lisp ... ;; Loading file src/cold/exports.lisp ... ;; Loaded file src/cold/exports.lisp ;; Loaded file src/cold/set-up-cold-packages.lisp ;; Loading file src/cold/defun-load-or-cload-xcompiler.lisp ... ;; Loaded file src/cold/defun-load-or-cload-xcompiler.lisp ; Building Unicode data ;; Compiling file /build/sbcl/src/sbcl-2.4.9/tools-for-build/ucd.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/tools-for-build/ucd.fas 0 errors, 0 warnings ;; Loading file /build/sbcl/src/sbcl-2.4.9/tools-for-build/ucd.fas ... ;; Loaded file /build/sbcl/src/sbcl-2.4.9/tools-for-build/ucd.fas //slurp-ucd ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/cross-early.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/cross-early.fas-tmp The following functions were used but not defined: SB-XC:= SB-XC:< SB-IMPL::XFLOAT-EXPT SB-IMPL::XFLOAT-FLOOR SB-IMPL::XFLOAT-CEILING SB-IMPL::XFLOAT-TRUNCATE SB-IMPL::XFLOAT-ROUND SB-IMPL::XFLOAT-MOD SB-IMPL::XFLOAT-REM SB-IMPL::XFLOAT-ABS SB-IMPL::XFLOAT-SIGNUM SB-IMPL::XFLOAT-COERCE SB-XC:MAKE-ARRAY 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/cross-early.fas ... ;; Loaded file obj/from-host/src/code/cross-early.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/show.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/show.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/show.fas ... ;; Loaded file obj/from-host/src/code/show.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/early-constantp.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/early-constantp.fas-tmp The following functions were used but not defined: SB-C::%CONSTANTP SB-C::%CONSTANT-FORM-VALUE 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/early-constantp.fas ... ;; Loaded file obj/from-host/src/compiler/early-constantp.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/vop-existsp.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/vop-existsp.fas-tmp The following functions were used but not defined: SB-INT:INFO SB-C::FUN-INFO-TEMPLATES 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/vop-existsp.fas ... ;; Loaded file obj/from-host/src/compiler/vop-existsp.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/primordial-extensions.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/primordial-extensions.fas-tmp The following functions were used but not defined: SB-XC:GENSYM SB-IMPL::PACKAGE-%NAME SB-XC:< SB-XC:= 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/primordial-extensions.fas ... ;; Loaded file obj/from-host/src/code/primordial-extensions.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/cold-init-helper-macros.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/cold-init-helper-macros.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/cold-init-helper-macros.fas ... ;; Loaded file obj/from-host/src/code/cold-init-helper-macros.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/backq.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/backq.fas-tmp The following functions were used but not defined: SB-XC:MAKE-LOAD-FORM-SAVING-SLOTS SB-XC:= 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/backq.fas ... ;; Loaded file obj/from-host/src/code/backq.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/cross-byte.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/cross-byte.fas-tmp The following functions were used but not defined: SB-INT:BUG SB-XC:GENSYM 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/cross-byte.fas ... ;; Loaded file obj/from-host/src/code/cross-byte.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/cross-misc.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/cross-misc.fas-tmp The following functions were used but not defined: SB-XC:ARRAY-ELEMENT-TYPE SB-XC:|-| SB-INT:BUG SB-KERNEL:CLASSOID-LAYOUT SB-KERNEL:FIND-CLASSOID SB-INT:MISSING-ARG SB-XC:CHAR-CODE 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/cross-misc.fas ... ;; Loaded file obj/from-host/src/code/cross-misc.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/cross-char.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/cross-char.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/cross-char.fas ... ;; Loaded file obj/from-host/src/code/cross-char.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/cross-io.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/cross-io.fas-tmp The following functions were used but not defined: SB-XC:= 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/cross-io.fas ... ;; Loaded file obj/from-host/src/code/cross-io.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/cross-condition.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/cross-condition.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/cross-condition.fas ... ;; Loaded file obj/from-host/src/code/cross-condition.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/uncross.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/uncross.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/uncross.fas ... ;; Loaded file obj/from-host/src/code/uncross.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/defbangtype.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/defbangtype.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/defbangtype.fas ... ;; Loaded file obj/from-host/src/code/defbangtype.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/early-constants.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/early-constants.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/early-constants.fas ... ;; Loaded file obj/from-host/src/code/early-constants.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/function-names.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/function-names.fas-tmp The following functions were used but not defined: SB-INT:INFO 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/function-names.fas ... ;; Loaded file obj/from-host/src/code/function-names.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/early-globaldb.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/early-globaldb.fas-tmp The following functions were used but not defined: SB-IMPL::PACKED-INFO-VALUE-INDEX 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/early-globaldb.fas ... ;; Loaded file obj/from-host/src/compiler/early-globaldb.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/parms.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/parms.fas-tmp The following functions were used but not defined: SB-XC:= SB-IMPL::XFLOAT-EXPT 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/parms.fas ... ;; Loaded file obj/from-host/src/compiler/generic/parms.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/parms.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/parms.fas-tmp The following functions were used but not defined: SB-IMPL::XFLOAT-EXPT 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/parms.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/parms.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/early-vm.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/early-vm.fas-tmp The following functions were used but not defined: SB-IMPL::XFLOAT-EXPT 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/early-vm.fas ... ;; Loaded file obj/from-host/src/compiler/generic/early-vm.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/early-objdef.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/early-objdef.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/early-objdef.fas ... ;; Loaded file obj/from-host/src/compiler/generic/early-objdef.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/parse-body.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/parse-body.fas-tmp The following functions were used but not defined: SB-C:COMPILER-WARN 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/parse-body.fas ... ;; Loaded file obj/from-host/src/code/parse-body.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/policy.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/policy.fas-tmp The following functions were used but not defined: SB-IMPL::XFLOAT-EXPT SB-XC:PROCLAIM SB-C::%CONSTANTP SB-XC:< SB-C:COMPILER-WARN 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/policy.fas ... ;; Loaded file obj/from-host/src/compiler/policy.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/early-extensions.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/early-extensions.fas-tmp The following functions were used but not defined: SB-IMPL::XFLOAT-EXPT SB-KERNEL:VALUES-SPECIFIER-TYPE-CACHE-CLEAR SB-XC:SPECIAL-OPERATOR-P SB-KERNEL:TYPE-SPECIFIER SB-IMPL::%CHECK-DEPRECATED-TYPE SB-C::%DEFINE-SYMBOL-MACRO SB-IMPL::%DEFTYPE SB-IMPL::CONSTANT-TYPE-EXPANDER SB-INT:INFO SB-XC:= The following functions were used but are deprecated: SET - This function name is anachronistic. Use SETF SYMBOL-VALUE instead. 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/early-extensions.fas ... ;; Loaded file obj/from-host/src/code/early-extensions.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/defbangstruct.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/defbangstruct.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/defbangstruct.fas ... ;; Loaded file obj/from-host/src/code/defbangstruct.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/early-raw-slots.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/early-raw-slots.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/early-raw-slots.fas ... ;; Loaded file obj/from-host/src/code/early-raw-slots.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/hashset.lisp ... WARNING: in HS-CELLS-OCCUPANCY in lines 276..293 : Unknown declaration INDEX. The whole declaration will be ignored. WARNING: in lines 341..371 : function SB-INT::HASHSET-INSERT-VALIDP is not used. Misspelled or missing IGNORE declaration? ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/hashset.fas-tmp The following functions were used but not defined: SB-XC:FLOAT 0 errors, 2 warnings ** - Continuable Error FAILURE-P was set when creating "obj/from-host/src/code/hashset.fas". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-host/src/code/hashset.fas" The following restarts are also available: RECOMPILE :R1 Recompile file "src/code/hashset.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (MAYBE-WITH-COMPILATION-UNIT # # ...) RETRY :R4 retry (MAYBE-WITH-COMPILATION-UNIT # # ...) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-1.lisp ABORT-BUILD :R6 Abort building SBCL. ABORT :R7 Abort main loop ;; Loading file obj/from-host/src/code/hashset.fas ... ;; Loaded file obj/from-host/src/code/hashset.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/string-hash.lisp ... WARNING: LOOP: FOR clauses should occur before the loop's main body ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/string-hash.fas-tmp The following functions were used but not defined: SB-KERNEL:%MAKE-LISP-OBJ 0 errors, 1 warning ** - Continuable Error FAILURE-P was set when creating "obj/from-host/src/code/string-hash.fas". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-host/src/code/string-hash.fas" The following restarts are also available: RECOMPILE :R1 Recompile file "src/code/string-hash.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (MAYBE-WITH-COMPILATION-UNIT # # ...) RETRY :R4 retry (MAYBE-WITH-COMPILATION-UNIT # # ...) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-1.lisp ABORT-BUILD :R6 Abort building SBCL. ABORT :R7 Abort main loop ;; Loading file obj/from-host/src/code/string-hash.fas ... ;; Loaded file obj/from-host/src/code/string-hash.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/xset.lisp ... WARNING: in XSET-UNION in lines 131..156 : Unknown declaration INDEX. The whole declaration will be ignored. WARNING: in XSET-ELTS-HASH in lines 215..243 : Unknown declaration SB-XC:FIXNUM. The whole declaration will be ignored. ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/xset.fas-tmp The following functions were used but not defined: SB-C::PLUS-MOD-FIXNUM SB-IMPL::EQL-HASH SB-KERNEL:%MAKE-LISP-OBJ SB-KERNEL::CTYPE-RANDOM SB-XC:= 0 errors, 2 warnings ** - Continuable Error FAILURE-P was set when creating "obj/from-host/src/code/xset.fas". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-host/src/code/xset.fas" The following restarts are also available: RECOMPILE :R1 Recompile file "src/code/xset.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (MAYBE-WITH-COMPILATION-UNIT # # ...) RETRY :R4 retry (MAYBE-WITH-COMPILATION-UNIT # # ...) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-1.lisp ABORT-BUILD :R6 Abort building SBCL. ABORT :R7 Abort main loop ;; Loading file obj/from-host/src/code/xset.fas ... ;; Loaded file obj/from-host/src/code/xset.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/type-class.lisp ... WARNING: in lines 1332..1422 : function TYPEP-IMPL-MACRO-METATYPE-NAME->CLASS-ID is not used. Misspelled or missing IGNORE declaration? WARNING: in lines 1332..1422 : function TYPEP-IMPL-MACRO-CONVERT-CLAUSE is not used. Misspelled or missing IGNORE declaration? ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/type-class.fas-tmp The following functions were used but not defined: SB-ALIEN::GUESS-ALIGNMENT SB-INT:MAKE-MACRO-LAMBDA SB-C::FALLBACK-HASH SB-XC:SXHASH SB-C::NUMBER-HASH SB-KERNEL:TYPE-SPECIFIER SB-KERNEL:SYMBOL-HASH SB-C::PLUS-MOD-FIXNUM SB-KERNEL:CSUBTYPEP 0 errors, 2 warnings ;; Loading file obj/from-host/src/code/type-class.fas ... ;; Loaded file obj/from-host/src/code/type-class.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/thread-structs.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/thread-structs.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/thread-structs.fas ... ;; Loaded file obj/from-host/src/code/thread-structs.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/early-c.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/early-c.fas-tmp The following functions were used but not defined: SB-C::MAKE-SIMILARITY-TABLE SB-XC:= SB-C::NAME-CONTEXT 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/early-c.fas ... ;; Loaded file obj/from-host/src/compiler/early-c.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/pcl/slot-name.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/pcl/slot-name.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/pcl/slot-name.fas ... ;; Loaded file obj/from-host/src/pcl/slot-name.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/early-classoid.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/early-classoid.fas-tmp The following functions were used but not defined: SB-XC:MAKE-LOAD-FORM-SAVING-SLOTS SB-KERNEL:FIND-LAYOUT SB-KERNEL:DSD-INDEX SB-KERNEL:DSD-NAME SB-KERNEL:FIND-DEFSTRUCT-DESCRIPTION 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/early-classoid.fas ... ;; Loaded file obj/from-host/src/code/early-classoid.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/layout-ids.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/layout-ids.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/layout-ids.fas ... ;; Loaded file obj/from-host/src/compiler/generic/layout-ids.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/debug-var-io.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/debug-var-io.fas-tmp The following functions were used but not defined: SB-XC:= 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/debug-var-io.fas ... ;; Loaded file obj/from-host/src/code/debug-var-io.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/number-dispatch.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/number-dispatch.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/number-dispatch.fas ... ;; Loaded file obj/from-host/src/code/number-dispatch.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/float.lisp ... WARNING: in FLOAT-SIGN in lines 370..385 : Unknown declaration FLOAT. The whole declaration will be ignored. WARNING: in INTEGER-DECODE-SINGLE-FLOAT in lines 441..456 : Unknown declaration SINGLE-FLOAT. The whole declaration will be ignored. WARNING: in INTEGER-DECODE-DOUBLE-FLOAT in lines 458..489 : Unknown declaration DOUBLE-FLOAT. The whole declaration will be ignored. WARNING: in DECODE-SINGLE-FLOAT in lines 507..532 : Unknown declaration SINGLE-FLOAT. The whole declaration will be ignored. WARNING: in DECODE-DOUBLE-FLOAT in lines 534..568 : Unknown declaration DOUBLE-FLOAT. The whole declaration will be ignored. WARNING: in SCALE-SINGLE-FLOAT in lines 589..611 : Unknown declaration SINGLE-FLOAT. The whole declaration will be ignored. ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/float.fas-tmp The following functions were used but not defined: SB-XC:* SB-XC:= SB-XC:|-| SB-XC:<= SB-XC:< 0 errors, 6 warnings ** - Continuable Error FAILURE-P was set when creating "obj/from-host/src/code/float.fas". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-host/src/code/float.fas" The following restarts are also available: RECOMPILE :R1 Recompile file "src/code/float.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (MAYBE-WITH-COMPILATION-UNIT # # ...) RETRY :R4 retry (MAYBE-WITH-COMPILATION-UNIT # # ...) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-1.lisp ABORT-BUILD :R6 Abort building SBCL. ABORT :R7 Abort main loop ;; Loading file obj/from-host/src/code/float.fas ... ;; Loaded file obj/from-host/src/code/float.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/cross-float-reader.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/cross-float-reader.fas-tmp The following functions were used but not defined: SB-XC:= 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/cross-float-reader.fas ... ;; Loaded file obj/from-host/src/code/cross-float-reader.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/cross-float.lisp ... WARNING: in XFLOAT-COERCE in lines 61..95 : Unknown declaration NUMBER. The whole declaration will be ignored. WARNING: in NATURAL-LOG in lines 401..422 : Unknown declaration RATIONAL. The whole declaration will be ignored. WARNING: in NATURAL-LOG-%LOG in lines 401..422 : Unknown declaration RATIONAL. The whole declaration will be ignored. ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/cross-float.fas-tmp 0 errors, 3 warnings ** - Continuable Error FAILURE-P was set when creating "obj/from-host/src/code/cross-float.fas". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-host/src/code/cross-float.fas" The following restarts are also available: RECOMPILE :R1 Recompile file "src/code/cross-float.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (MAYBE-WITH-COMPILATION-UNIT # # ...) RETRY :R4 retry (MAYBE-WITH-COMPILATION-UNIT # # ...) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-1.lisp ABORT-BUILD :R6 Abort building SBCL. ABORT :R7 Abort main loop ;; Loading file obj/from-host/src/code/cross-float.fas ... ;; Loaded file obj/from-host/src/code/cross-float.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/early-time.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/early-time.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/early-time.fas ... ;; Loaded file obj/from-host/src/code/early-time.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/misc.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/misc.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/misc.fas ... ;; Loaded file obj/from-host/src/code/misc.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/parse-lambda-list.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/parse-lambda-list.fas-tmp The following functions were used but not defined: SB-C::%CONSTANTP SB-C::STYLE-WARN-ONCE SB-C:COMPILER-ERROR SB-C::CHECK-VARIABLE-NAME SB-INT:INFO 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/parse-lambda-list.fas ... ;; Loaded file obj/from-host/src/compiler/parse-lambda-list.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/macros.lisp ... WARNING: in DEFTRANSFORM in lines 235..357 : Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in DEFTRANSFORM in lines 235..357 : Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/macros.fas-tmp The following functions were used but not defined: SB-INT:INFO (SETF SB-INT:INFO) 0 errors, 2 warnings ** - Continuable Error FAILURE-P was set when creating "obj/from-host/src/compiler/macros.fas". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-host/src/compiler/macros.fas" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/macros.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (MAYBE-WITH-COMPILATION-UNIT # # ...) RETRY :R4 retry (MAYBE-WITH-COMPILATION-UNIT # # ...) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-1.lisp ABORT-BUILD :R6 Abort building SBCL. ABORT :R7 Abort main loop ;; Loading file obj/from-host/src/compiler/macros.fas ... ;; Loaded file obj/from-host/src/compiler/macros.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/fun-info.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/fun-info.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/fun-info.fas ... ;; Loaded file obj/from-host/src/compiler/fun-info.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/vm-macs.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/vm-macs.fas-tmp The following functions were used but not defined: SB-C::IR2-CONVERT-REFFER SB-C::IR2-CONVERT-SETFER SB-C::IR2-CONVERT-SETTER SB-C::IR2-CONVERT-VARIABLE-ALLOCATION SB-C::IR2-CONVERT-FIXED-ALLOCATION SB-C::IR2-CONVERT-STRUCTURE-ALLOCATION SB-C::FUN-INFO-OR-LOSE SB-C::IR2-CONVERT-CASSER 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/vm-macs.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-macs.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/policies.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/policies.fas-tmp The following functions were used but not defined: SB-C::%COERCE-TO-POLICY 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/policies.fas ... ;; Loaded file obj/from-host/src/compiler/policies.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/info-vector.lisp ... WARNING: in TEST-PACKIFY-INFOS-CHECK in lines 584..636 : variable VALUE is assigned but not read ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/info-vector.fas-tmp The following functions were used but not defined: SB-IMPL::INFO-PUTHASH 0 errors, 1 warning ;; Loading file obj/from-host/src/compiler/info-vector.fas ... ;; Loaded file obj/from-host/src/compiler/info-vector.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/globaldb.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/globaldb.fas-tmp The following functions were used but not defined: SB-KERNEL:SPECIFIER-TYPE SB-XC:MAKE-LOAD-FORM-SAVING-SLOTS SB-KERNEL:FIND-CLASSOID SB-C::MAKE-LEXENV 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/globaldb.fas ... ;; Loaded file obj/from-host/src/compiler/globaldb.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/objdef.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/objdef.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/objdef.fas ... ;; Loaded file obj/from-host/src/compiler/generic/objdef.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/lockfree-list.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/lockfree-list.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/lockfree-list.fas ... ;; Loaded file obj/from-host/src/code/lockfree-list.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/vm-array.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/vm-array.fas-tmp The following functions were used but not defined: SB-KERNEL:CSUBTYPEP 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/vm-array.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-array.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/primordial-type.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/primordial-type.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/primordial-type.fas ... ;; Loaded file obj/from-host/src/code/primordial-type.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/specializable-array.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/specializable-array.fas-tmp The following functions were used but not defined: SB-KERNEL:TYPE-SPECIFIER SB-KERNEL:SPECIFIER-TYPE 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/specializable-array.fas ... ;; Loaded file obj/from-host/src/code/specializable-array.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/sset.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/sset.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/sset.fas ... ;; Loaded file obj/from-host/src/compiler/sset.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/node.lisp ... WARNING: in DEFAULT-OUTER-LOOP in lines 540..647 : HEAD is neither declared nor bound, it will be treated as if it were declared SPECIAL. WARNING: in DEFAULT-OUTER-LOOP in lines 540..647 : TAIL is neither declared nor bound, it will be treated as if it were declared SPECIAL. ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/node.fas-tmp The following functions were used but not defined: SB-C::%LVAR-DERIVED-TYPE SB-C::CONT-NUM SB-KERNEL:CTYPE-OF SB-KERNEL:SPECIFIER-TYPE SB-KERNEL:MAKE-SINGLE-VALUE-TYPE The following special variables were not defined: SB-C::HEAD SB-C::TAIL 0 errors, 2 warnings ** - Continuable Error FAILURE-P was set when creating "obj/from-host/src/compiler/node.fas". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-host/src/compiler/node.fas" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/node.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (MAYBE-WITH-COMPILATION-UNIT # # ...) RETRY :R4 retry (MAYBE-WITH-COMPILATION-UNIT # # ...) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-1.lisp ABORT-BUILD :R6 Abort building SBCL. ABORT :R7 Abort main loop ;; Loading file obj/from-host/src/compiler/node.fas ... ;; Loaded file obj/from-host/src/compiler/node.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/early-assem.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/early-assem.fas-tmp The following functions were used but not defined: SB-C:LABEL-ID SB-C::PARSE-REG-SPEC SB-C::EMIT-ASSEMBLE SB-C::EMIT-ASSEMBLE-VOP 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/early-assem.fas ... ;; Loaded file obj/from-host/src/compiler/early-assem.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/vop.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/vop.fas-tmp The following functions were used but not defined: SB-C:MAKE-STACK-POINTER-TN SB-C:MAKE-DYNAMIC-STATE-TNS SB-C::PRINT-TN-GUTS 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/vop.fas ... ;; Loaded file obj/from-host/src/compiler/vop.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/backend.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/backend.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/backend.fas ... ;; Loaded file obj/from-host/src/compiler/backend.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/sc-offset.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/sc-offset.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/sc-offset.fas ... ;; Loaded file obj/from-host/src/code/sc-offset.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/vmdef.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/vmdef.fas-tmp The following functions were used but not defined: SB-C:MAKE-WIRED-TN SB-C:MAKE-RESTRICTED-TN SB-C:REFERENCE-TN SB-REGALLOC:TARGET-IF-DESIRABLE SB-C:PRIMITIVE-TYPE SB-KERNEL:SPECIFIER-TYPE 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/vmdef.fas ... ;; Loaded file obj/from-host/src/compiler/vmdef.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/defmacro.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/defmacro.fas-tmp The following functions were used but not defined: SB-INT:CHECK-DESIGNATOR SB-C:COMPILER-STYLE-WARN SB-KERNEL:UNDEFINE-FUN-NAME 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/defmacro.fas ... ;; Loaded file obj/from-host/src/code/defmacro.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/meta-vmdef.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/meta-vmdef.fas-tmp The following functions were used but not defined: SB-KERNEL:TYPE= SB-KERNEL:SPECIFIER-TYPE 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/meta-vmdef.fas ... ;; Loaded file obj/from-host/src/compiler/meta-vmdef.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/vm.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/vm.fas-tmp The following functions were used but not defined: SB-VM:STATIC-SYMBOL-P SB-VM:FIXNUMIZE 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/vm.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/vm.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/cross-sxhash.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/cross-sxhash.fas-tmp The following functions were used but not defined: SB-XC:TYPEP 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/cross-sxhash.fas ... ;; Loaded file obj/from-host/src/code/cross-sxhash.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/alieneval.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/alieneval.fas-tmp The following functions were used but not defined: SB-INT:%MACROEXPAND SB-XC:MAKE-LOAD-FORM-SAVING-SLOTS 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/alieneval.fas ... ;; Loaded file obj/from-host/src/code/alieneval.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/class.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/class.fas-tmp The following functions were used but not defined: SB-C:COMPILER-ERROR SB-KERNEL::%REDEFINE-DEFSTRUCT SB-KERNEL:%NOTE-TYPE-DEFINED SB-KERNEL:VALUES-SPECIFIER-TYPE-CACHE-CLEAR SB-PCL::CLASS-HAS-A-FORWARD-REFERENCED-SUPERCLASS-P SB-KERNEL:TYPE-UNION SB-KERNEL:SPECIFIER-TYPE 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/class.fas ... ;; Loaded file obj/from-host/src/code/class.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/pcl/pre-warm.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/pcl/pre-warm.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/pcl/pre-warm.fas ... ;; Loaded file obj/from-host/src/pcl/pre-warm.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/debug-info.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/debug-info.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/debug-info.fas ... ;; Loaded file obj/from-host/src/code/debug-info.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/source-location.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/source-location.fas-tmp The following functions were used but not defined: SB-XC:MAKE-LOAD-FORM-SAVING-SLOTS SB-C:GET-TOPLEVELISH-FILE-INFO SB-C::SOURCE-PATH-TLF-NUMBER SB-C::SOURCE-PATH-FORM-NUMBER 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/source-location.fas ... ;; Loaded file obj/from-host/src/code/source-location.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/proclaim.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/proclaim.fas-tmp The following functions were used but not defined: SB-C:COMPILER-ERROR SB-KERNEL:TYPE-INTERSECTION SB-C::COMPILER-SPECIFIER-TYPE SB-KERNEL:TYPE= SB-KERNEL:TYPE/= SB-KERNEL:CSUBTYPEP SB-INT:GLOBAL-FTYPE SB-KERNEL:VALUES-SUBTYPEP SB-KERNEL:TYPE-SPECIFIER SB-EXT:TYPEXPAND SB-C::%COMPILER-PROCLAIM SB-KERNEL:SPECIFIER-TYPE SB-C::WARN-IF-INLINE-FAILED/PROCLAIM SB-C:COMPILER-WARN SB-KERNEL:VALUES-SPECIFIER-TYPE-CACHE-CLEAR SB-C:COMPILER-STYLE-WARN 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/proclaim.fas ... ;; Loaded file obj/from-host/src/compiler/proclaim.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/constantp.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/constantp.fas-tmp The following functions were used but not defined: SB-INT:%MACROEXPAND SB-C::CAREFUL-SPECIFIER-TYPE SB-KERNEL:CTYPEP 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/constantp.fas ... ;; Loaded file obj/from-host/src/compiler/constantp.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/deftype.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/deftype.fas-tmp The following functions were used but not defined: SB-KERNEL:UNDECLARE-STRUCTURE 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/deftype.fas ... ;; Loaded file obj/from-host/src/code/deftype.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/type.lisp ... WARNING: in VALUES-TYPE-IN in lines 823..844 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in VALUES-TYPE-IN in lines 823..844 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in VALUES-TYPE-IN in lines 823..844 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in VALUES-TYPE-IN in lines 823..844 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in MAKE-CHARACTER-SET-TYPE in lines 3546..3595 : Unknown declaration %CHAR-CODE. The whole declaration will be ignored. WARNING: in CTYPE-ARRAY-UNION-DIMENSIONS in lines 4515..4525 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in CTYPE-ARRAY-UNION-DIMENSIONS in lines 4515..4525 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/type.fas-tmp The following functions were used but not defined: SB-C:COMPILER-WARN SB-XC:TYPEP SB-KERNEL:CTYPEP SB-KERNEL:CTYPE-OF SB-KERNEL::SIMPLIFY-ARRAY-UNIONS SB-KERNEL::%UPGRADED-ARRAY-ELEMENT-TYPE SB-KERNEL:FLOAT-FORMAT-NAME 0 errors, 7 warnings ** - Continuable Error FAILURE-P was set when creating "obj/from-host/src/code/type.fas". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-host/src/code/type.fas" The following restarts are also available: RECOMPILE :R1 Recompile file "src/code/type.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (MAYBE-WITH-COMPILATION-UNIT # # ...) RETRY :R4 retry (MAYBE-WITH-COMPILATION-UNIT # # ...) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-1.lisp ABORT-BUILD :R6 Abort building SBCL. ABORT :R7 Abort main loop ;; Loading file obj/from-host/src/code/type.fas ... ;; Loaded file obj/from-host/src/code/type.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/vm-type.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/vm-type.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/vm-type.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-type.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/primtype.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/primtype.fas-tmp The following functions were used but not defined: SB-KERNEL:CTYPE-OF 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/primtype.fas ... ;; Loaded file obj/from-host/src/compiler/generic/primtype.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/cross-type.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/cross-type.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/cross-type.fas ... ;; Loaded file obj/from-host/src/code/cross-type.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/deftypes-for-target.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/deftypes-for-target.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/deftypes-for-target.fas ... ;; Loaded file obj/from-host/src/code/deftypes-for-target.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/type-init.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/type-init.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/type-init.fas ... ;; Loaded file obj/from-host/src/code/type-init.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/defstruct.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/defstruct.fas-tmp The following functions were used but not defined: SB-INT:%PROGRAM-ERROR SB-C:COMPILER-STYLE-WARN 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/defstruct.fas ... ;; Loaded file obj/from-host/src/code/defstruct.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/alien-type.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/alien-type.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/alien-type.fas ... ;; Loaded file obj/from-host/src/code/alien-type.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/force-delayed-defbangstructs.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/force-delayed-defbangstructs.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/force-delayed-defbangstructs.fas ... ;; Loaded file obj/from-host/src/code/force-delayed-defbangstructs.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/compiler-error.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/compiler-error.fas-tmp The following functions were used but not defined: SB-KERNEL:COERCE-TO-CONDITION SB-INT:STREAM-ERROR-POSITION-INFO 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/compiler-error.fas ... ;; Loaded file obj/from-host/src/compiler/compiler-error.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/fixup-type.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/fixup-type.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/fixup-type.fas ... ;; Loaded file obj/from-host/src/compiler/fixup-type.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/package.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/package.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/package.fas ... ;; Loaded file obj/from-host/src/code/package.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/random.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/random.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/random.fas ... ;; Loaded file obj/from-host/src/code/random.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/hash-table.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/hash-table.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/hash-table.fas ... ;; Loaded file obj/from-host/src/code/hash-table.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/readtable.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/readtable.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/readtable.fas ... ;; Loaded file obj/from-host/src/code/readtable.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/host-pprint.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/host-pprint.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/host-pprint.fas ... ;; Loaded file obj/from-host/src/code/host-pprint.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/knownfun.lisp ... WARNING: in ARRAY-CALL-TYPE-DERIVER in lines 540..585 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in ARRAY-CALL-TYPE-DERIVER in lines 540..585 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/knownfun.fas-tmp The following functions were used but not defined: SB-C::SIMPLIFY-VECTOR-TYPE SB-C::CAREFUL-SPECIFIER-TYPE SB-C:CONSTANT-LVAR-P SB-C:LVAR-VALUE SB-C::PROPER-SEQUENCE-P SB-C::LVAR-TYPE SB-C::LVAR-FUN-TYPE SB-C::ASSERT-ARRAY-INDEX-LVAR-TYPE SB-C::LVAR-FUN-NAME SB-C::COMBINATION-FUN-DEBUG-NAME SB-C::ADD-ANNOTATION SB-C::ASSERT-LVAR-TYPE SB-C::REOPTIMIZE-LVAR 0 errors, 2 warnings ** - Continuable Error FAILURE-P was set when creating "obj/from-host/src/compiler/knownfun.fas". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-host/src/compiler/knownfun.fas" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/knownfun.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (MAYBE-WITH-COMPILATION-UNIT # # ...) RETRY :R4 retry (MAYBE-WITH-COMPILATION-UNIT # # ...) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-1.lisp ABORT-BUILD :R6 Abort building SBCL. ABORT :R7 Abort main loop ;; Loading file obj/from-host/src/compiler/knownfun.fas ... ;; Loaded file obj/from-host/src/compiler/knownfun.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/ctype.lisp ... WARNING: in VALID-TRANSFORM-FUN in lines 165..201 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in VALID-TRANSFORM-FUN in lines 165..201 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in VALID-TRANSFORM-FUN in lines 165..201 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in VALID-TRANSFORM-FUN in lines 165..201 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in VALID-TRANSFORM-FUN in lines 165..201 : variable KEYWORDS is not used. Misspelled or missing IGNORE declaration? ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/ctype.fas-tmp The following functions were used but not defined: SB-C::REPORT-ARG-COUNT-MISMATCH SB-C::VALIDATE-TEST-AND-TEST-NOT SB-C::CHECK-KEY-ARGS-CONSTANT SB-C::FIND-KEYWORD-LVAR SB-C:CONSTANT-LVAR-P SB-C:LVAR-VALUE SB-C:COMPILER-NOTIFY SB-C::MAIN-ENTRY SB-C::%LVAR-DERIVED-TYPE SB-C::LVAR-FUN-TYPE SB-C::RESOLVE-KEY-ARGS SB-C::SUBSTITUTE-LVAR SB-C::MAYBE-WEAKEN-CHECK SB-C::%INSERT-CAST-BEFORE SB-C::USE-LVAR SB-C::ASSERT-FUNCTION-DESIGNATOR SB-C::COMPILER-SPECIFIER-TYPE SB-C::ADD-ANNOTATION SB-C::ASSERT-LVAR-TYPE SB-C::DERIVE-NODE-TYPE SB-C::ASSERT-NODE-TYPE SB-C::LVAR-FUN-NAME SB-C::REOPTIMIZE-LVAR SB-C::LVAR-ALL-SOURCES SB-C::LVAR-TYPE 0 errors, 5 warnings ** - Continuable Error FAILURE-P was set when creating "obj/from-host/src/compiler/ctype.fas". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-host/src/compiler/ctype.fas" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/ctype.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (MAYBE-WITH-COMPILATION-UNIT # # ...) RETRY :R4 retry (MAYBE-WITH-COMPILATION-UNIT # # ...) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-1.lisp ABORT-BUILD :R6 Abort building SBCL. ABORT :R7 Abort main loop ;; Loading file obj/from-host/src/compiler/ctype.fas ... ;; Loaded file obj/from-host/src/compiler/ctype.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/fndb.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/fndb.fas-tmp The following functions were used but not defined: SB-C::LVAR-TYPE 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/fndb.fas ... ;; Loaded file obj/from-host/src/compiler/fndb.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/vm-fndb.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/vm-fndb.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/vm-fndb.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-fndb.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/late-objdef.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/late-objdef.fas-tmp The following functions were used but not defined: SB-FASL::LISPOBJ-DOT-H 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/late-objdef.fas ... ;; Loaded file obj/from-host/src/compiler/generic/late-objdef.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/interr.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/interr.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/interr.fas ... ;; Loaded file obj/from-host/src/compiler/generic/interr.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/bit-util.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/bit-util.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/bit-util.fas ... ;; Loaded file obj/from-host/src/compiler/bit-util.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/load.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/load.fas-tmp The following functions were used but not defined: SB-FASL::MAKE-CHARACTER-DESCRIPTOR SB-FASL::NUMBER-TO-CORE SB-FASL::COLD-CONS SB-KERNEL:ALLOCATE-VECTOR SB-SYS:READ-N-BYTES (SETF SB-KERNEL:CODE-HEADER-REF) SB-KERNEL:%CODE-ENTRY-POINT 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/load.fas ... ;; Loaded file obj/from-host/src/code/load.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/format-directive.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/format-directive.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/format-directive.fas ... ;; Loaded file obj/from-host/src/code/format-directive.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/c-call.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/c-call.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/c-call.fas ... ;; Loaded file obj/from-host/src/code/c-call.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/disassem.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/disassem.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/disassem.fas ... ;; Loaded file obj/from-host/src/compiler/disassem.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/assem.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/assem.fas-tmp The following functions were used but not defined: SB-C::TRACE-INSTRUCTION SB-C:NOTE-FIXUP SB-C:MAKE-FIXUP SB-C:COMPONENT-HEADER-LENGTH 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/assem.fas ... ;; Loaded file obj/from-host/src/compiler/assem.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/codegen.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/codegen.fas-tmp The following functions were used but not defined: SB-C::PRINT-VOP SB-C::BLOCK-HOME-LAMBDA SB-C:EMIT-BLOCK-HEADER SB-C::BLOCK-LABEL SB-C::BLOCK-ENVIRONMENT 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/codegen.fas ... ;; Loaded file obj/from-host/src/compiler/codegen.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/dump.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/dump.fas-tmp The following functions were used but not defined: SB-C::DEBUG-INFO-FOR-COMPONENT SB-C::DEBUG-SOURCE-FOR-INFO 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/dump.fas ... ;; Loaded file obj/from-host/src/compiler/dump.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/ir1report.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/ir1report.fas-tmp The following functions were used but not defined: SB-C::SOURCE-PATH-FORMS SB-C::SOURCE-PATH-TLF-NUMBER SB-C::FIND-SOURCE-ROOT SB-C::SOURCE-PATH-ORIGINAL-SOURCE SB-C::BLOCK-START-NODE SB-KERNEL:COERCE-TO-CONDITION SB-C::WOULD-MUFFLE-P SB-XC:COMPILER-MACRO-FUNCTION SB-INT:FUN-NAME-INLINE-EXPANSION 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/ir1report.fas ... ;; Loaded file obj/from-host/src/compiler/ir1report.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/main.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/main.fas-tmp The following functions were used but not defined: SB-C::IR1-OPTIMIZE SB-C::IR1-OPTIMIZE-LAST-EFFORT SB-C::LOCALL-ANALYZE-COMPONENT SB-C::CONSTRAINT-PROPAGATE SB-C::%EVENT SB-C::RETRY-DELAYED-IR1-TRANSFORMS SB-C::GENERATE-TYPE-CHECKS SB-C::JOIN-BLOCKS-IF-POSSIBLE SB-C::IR1-FINALIZE SB-C::GTN-ANALYZE SB-C::LTN-ANALYZE SB-C::CONTROL-ANALYZE SB-C::STACK-ANALYZE SB-C::ENTRY-ANALYZE SB-C::CLEAR-DOMINATORS SB-C:IR2-CONVERT SB-C::COPY-PROPAGATE SB-C::SELECT-REPRESENTATIONS SB-C::CHECK-IR2-CONSISTENCY SB-C::DELETE-UNREFERENCED-TNS SB-C::LIFETIME-ANALYZE SB-C::CHECK-LIFE-CONSISTENCY SB-REGALLOC:PACK SB-C::CHECK-PACK-CONSISTENCY SB-C::IR2-OPTIMIZE SB-C::DELETE-COMPONENT SB-C::RECORD-COMPONENT-XREFS SB-C::FIND-DFO SB-C::FIND-DOMINATORS SB-C::LOOP-ANALYZE SB-C::ENVIRONMENT-ANALYZE SB-C::REPORT-CODE-DELETION SB-C::PRINT-ALL-BLOCKS SB-C:LABEL-ID SB-C::PRE-PACK-TN-STATS SB-C::PRINT-IR2-BLOCKS SB-C::EXPAND-COMPILER-MACRO SB-INT:%MACROEXPAND-1 SB-C::PROCESS-DECLS SB-C::SOURCE-PATH-TLF-NUMBER SB-C::MAKE-LEXENV SB-C::GET-SOURCE-PATH SB-C::FUNCALL-IN-MACROLET-LEXENV SB-C::FUNCALL-IN-SYMBOL-MACROLET-LEXENV SB-C::IR1-TOPLEVEL SB-C::LAMBDA-COMPONENT SB-C::MERGE-TOPLEVEL-LAMBDAS SB-C::LOCALL-ANALYZE-CLAMBDAS-UNTIL-DONE SB-C::FIND-INITIAL-DFO SB-C::REPLACE-TOPLEVEL-XEPS SB-C::CHECK-IR1-CONSISTENCY SB-C::FIND-SOURCE-PATHS 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/main.fas ... ;; Loaded file obj/from-host/src/compiler/main.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/xref.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/xref.fas-tmp The following functions were used but not defined: SB-C::BLOCK-HOME-LAMBDA SB-C::NODE-HOME-LAMBDA SB-C::COMBINATION-FUN-DEBUG-NAME SB-C:CONSTANT-LVAR-P SB-C:LVAR-VALUE SB-C::SOURCE-PATH-FORM-NUMBER 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/xref.fas ... ;; Loaded file obj/from-host/src/compiler/xref.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/ir1tran.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/ir1tran.fas-tmp The following functions were used but not defined: SB-C::REOPTIMIZE-LVAR SB-C::MAKE-EMPTY-COMPONENT SB-C::IR1-CONVERT-LAMBDA-BODY SB-C::INSTRUMENT-COVERAGE SB-C::FIND-CONSTANT SB-C::ASSURE-LEAF-LIVE-P SB-C::MAKE-CAST SB-C::CTRAN-HOME-LAMBDA-OR-NULL SB-XC:COMPILER-MACRO-FUNCTION SB-KERNEL:VALID-MACROEXPAND-HOOK SB-C::MAYBE-INSTRUMENT-PROGN-LIKE SB-C::SHOW-TRANSFORM-P SB-C::SHOW-TRANSFORM SB-C::CTRAN-STARTS-BLOCK SB-C::LINK-BLOCKS SB-C::VALIDATE-CALL-TYPE SB-C::ASSURE-FUNCTIONAL-LIVE-P SB-C::COMPILER-SPECIFIER-TYPE SB-C::MAKE-LEXENV SB-C::COMPILER-VALUES-SPECIFIER-TYPE 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/ir1tran.fas ... ;; Loaded file obj/from-host/src/compiler/ir1tran.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/ir1tran-lambda.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/ir1tran-lambda.fas-tmp The following functions were used but not defined: SB-C::CTRAN-STARTS-BLOCK SB-C::LINK-BLOCKS SB-C:MAKE-RESTART-LOCATION SB-C::CAREFUL-SPECIFIER-TYPE SB-WALKER:MACROEXPAND-ALL SB-C::NAME-LAMBDALIKE SB-C::MAKE-LEXENV SB-C::SUBSTITUTE-LEAF-IF SB-C::SUBSTITUTE-LEAF 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/ir1tran-lambda.fas ... ;; Loaded file obj/from-host/src/compiler/ir1tran-lambda.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/ir1-translators.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/ir1-translators.fas-tmp The following functions were used but not defined: SB-C::POSSIBLE-REST-ARG-CONTEXT SB-C::INSTRUMENT-COVERAGE SB-C::LINK-BLOCKS SB-C::CTRAN-DELETED-P SB-C::MAKE-RESTRICTED-LEXENV SB-INT:%PROGRAM-ERROR SB-C:CONSTANT-LVAR-P SB-C:LVAR-VALUE SB-C::PRINCIPAL-LVAR-USE SB-INT:%MACROEXPAND SB-C::NODE-HOME-LAMBDA SB-C::SUBSTITUTE-LEAF SB-C::COMPILER-VALUES-SPECIFIER-TYPE SB-C::MAKE-CAST SB-C::MAYBE-TERMINATE-BLOCK SB-C::DERIVE-NODE-TYPE SB-C::ADD-ANNOTATION SB-C::CTRAN-HOME-LAMBDA-OR-NULL SB-C::MAKE-LEXENV SB-C::CTRAN-STARTS-BLOCK 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/ir1-translators.fas ... ;; Loaded file obj/from-host/src/compiler/ir1-translators.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/ir1util.lisp ... WARNING: in PROCESS-LVAR-MODIFIED-ANNOTATION in lines 3243..3274 : Reference to VALUES is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in PROCESS-LVAR-MODIFIED-ANNOTATION in lines 3243..3274 : Reference to VALUES is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in PROCESS-LVAR-PROPER-SEQUENCE-ANNOTATION in lines 3291..3321 : Reference to VALUES is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in PROCESS-LVAR-PROPER-SEQUENCE-ANNOTATION in lines 3291..3321 : Reference to VALUES is implementation-dependent, per ANSI CL 6.1.1.4. ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/ir1util.fas-tmp The following functions were used but not defined: SB-C::FIND-DOMINATORS SB-C::DOMINATES-P SB-C::XEP-ENCLOSE SB-C::LOCALL-ANALYZE-COMPONENT SB-C::MERGE-TAIL-SETS SB-C::FUN-TYPE-ARG-LIMITS SB-C::FUN-TYPE-N-ARG-TYPES SB-C::CAST-TYPE-CHECK SB-C::GET-LAMBDA-ENVIRONMENT SB-C::MAYBE-LET-CONVERT SB-C::MAYBE-CONVERT-TO-ASSIGNMENT SB-C::REOPTIMIZE-NODE SB-C::DERIVE-NODE-TYPE SB-C::REOPTIMIZE-LVAR SB-C::CONSTANT-REFERENCE-P SB-C::GIVE-UP-IR1-TRANSFORM SB-C::MAYBE-WEAKEN-CHECK SB-C::%LVAR-DERIVED-TYPE SB-C::CONSTANT-LVAR-USES-P SB-C::LVAR-USES-VALUES SB-C::PROPER-SEQUENCE-P SB-C:CONSTANT-LVAR-P SB-C::LVAR-TYPE SB-C::CHECK-SEQUENCE-RANGES SB-C::CHECK-FUNCTION-DESIGNATOR-LVAR SB-C::CHECK-FUNCTION-LVAR SB-C:TN-VALUE SB-C:LVAR-VALUE 0 errors, 4 warnings ** - Continuable Error FAILURE-P was set when creating "obj/from-host/src/compiler/ir1util.fas". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-host/src/compiler/ir1util.fas" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/ir1util.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (MAYBE-WITH-COMPILATION-UNIT # # ...) RETRY :R4 retry (MAYBE-WITH-COMPILATION-UNIT # # ...) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-1.lisp ABORT-BUILD :R6 Abort building SBCL. ABORT :R7 Abort main loop ;; Loading file obj/from-host/src/compiler/ir1util.fas ... ;; Loaded file obj/from-host/src/compiler/ir1util.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/callable-args.lisp ... WARNING: in MAP-CALLABLE-ARGUMENTS in lines 134..170 : Reference to ANNOTATION is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in MAP-CALLABLE-ARGUMENTS in lines 134..170 : Reference to ANNOTATION is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in MAP-CALLABLE-ARGUMENTS in lines 134..170 : Reference to ANNOTATION is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in MAP-CALLABLE-ARGUMENTS in lines 134..170 : Reference to ANNOTATION is implementation-dependent, per ANSI CL 6.1.1.4. ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/callable-args.fas-tmp The following functions were used but not defined: SB-C::ASSERT-LVAR-TYPE SB-C:CONSTANT-LVAR-P SB-C:LVAR-VALUE SB-C::LVAR-TYPE 0 errors, 4 warnings ** - Continuable Error FAILURE-P was set when creating "obj/from-host/src/compiler/callable-args.fas" . If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-host/src/compiler/callable-args.fas" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/callable-args.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (MAYBE-WITH-COMPILATION-UNIT # # ...) RETRY :R4 retry (MAYBE-WITH-COMPILATION-UNIT # # ...) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-1.lisp ABORT-BUILD :R6 Abort building SBCL. ABORT :R7 Abort main loop ;; Loading file obj/from-host/src/compiler/callable-args.fas ... ;; Loaded file obj/from-host/src/compiler/callable-args.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/locall.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/locall.fas-tmp The following functions were used but not defined: SB-C::FIND-DFO SB-C::ASSERT-LVAR-TYPE SB-C::%LVAR-DERIVED-TYPE SB-C::TRANSFORM-CALL SB-C::LVAR-TYPE SB-C:CONSTANT-LVAR-P SB-C:LVAR-VALUE SB-C::JOIN-COMPONENTS SB-C::GET-LAMBDA-ENVIRONMENT SB-C::REOPTIMIZE-NODE SB-C::DERIVE-NODE-TYPE SB-C::MAYBE-TERMINATE-BLOCK SB-C::SUBSTITUTE-SINGLE-USE-LVAR SB-C::REOPTIMIZE-LVAR 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/locall.fas ... ;; Loaded file obj/from-host/src/compiler/locall.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/ir1opt.lisp ... WARNING: in TRANSFORM-&ARGS in lines 1770..1831 : variable P is assigned but not read ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/ir1opt.fas-tmp The following functions were used but not defined: SB-C::NEXT-BLOCK SB-C::SHOW-TYPE-DERIVATION SB-C::SHOW-TRANSFORM-P SB-C::SHOW-TRANSFORM SB-C::DXIFY-DOWNWARD-FUNARGS SB-C::NUMERIC-TYPE-REAL-P SB-C::INTERNAL-TYPE-ERROR-CALL 0 errors, 1 warning ;; Loading file obj/from-host/src/compiler/ir1opt.fas ... ;; Loaded file obj/from-host/src/compiler/ir1opt.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/loop.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/loop.fas-tmp The following functions were used but not defined: SB-C::NUMBER-BLOCKS 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/loop.fas ... ;; Loaded file obj/from-host/src/compiler/loop.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/constraint.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/constraint.fas-tmp The following functions were used but not defined: SB-C::INHERIT-EQUALITY-CONSTRAINTS SB-C::ADD-EQUALITY-CONSTRAINT SB-C::ADD-EQUALITY-CONSTRAINTS SB-C::TYPE-APPROXIMATE-INTERVAL SB-C::ADD-MV-LET-RESULT-CONSTRAINTS SB-C::CONSTRAINT-PROPAGATE-BACK SB-C::ADD-SET-CONSTRAINTS SB-C::ADD-EQ-CONSTRAINT SB-C::TRY-EQUALITY-CONSTRAINT SB-C::ADD-VAR-RESULT-CONSTRAINTS SB-C::LAMBDA-VAR/VECTOR-LENGTH-P SB-C::JOIN-EQUALITY-CONSTRAINTS 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/constraint.fas ... ;; Loaded file obj/from-host/src/compiler/constraint.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/equality-constraints.lisp ... WARNING: in JOIN-EQUALITY-CONSTRAINTS in lines 347..389 : Reference to PRED is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in JOIN-EQUALITY-CONSTRAINTS in lines 347..389 : Reference to PRED is implementation-dependent, per ANSI CL 6.1.1.4. ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/equality-constraints.fas-tmp The following functions were used but not defined: SB-C::CONSTRAINT-PROPAGATE-BACK SB-C::INTERVAL-< SB-C::INTERVAL-NEG SB-C::INTERVAL-SUB SB-C::SEQUENCE-ELEMENT-TYPE SB-C::FIND-DERIVE-TYPE SB-C::VECTOR-LENGTH-TYPE SB-C::EQUAL-TYPE SB-C::EQUALP-TYPE SB-C::TYPE-APPROXIMATE-INTERVAL 0 errors, 2 warnings ** - Continuable Error FAILURE-P was set when creating "obj/from-host/src/compiler/equality-constraints.fas". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-host/src/compiler/equality-constraints.fas" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/equality-constraints.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (MAYBE-WITH-COMPILATION-UNIT # # ...) RETRY :R4 retry (MAYBE-WITH-COMPILATION-UNIT # # ...) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-1.lisp ABORT-BUILD :R6 Abort building SBCL. ABORT :R7 Abort main loop ;; Loading file obj/from-host/src/compiler/equality-constraints.fas ... ;; Loaded file obj/from-host/src/compiler/equality-constraints.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/constraint-back.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/constraint-back.fas-tmp The following functions were used but not defined: SB-C::INTERVAL-ADD SB-C::INTERVAL-SUB SB-C::INTERVAL-DIV SB-C::INTERVAL-CONTAINS-P SB-C::TYPE-APPROXIMATE-INTERVAL 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/constraint-back.fas ... ;; Loaded file obj/from-host/src/compiler/constraint-back.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/saptran.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/saptran.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/saptran.fas ... ;; Loaded file obj/from-host/src/compiler/saptran.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/modarith.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/modarith.fas-tmp The following functions were used but not defined: SB-C::MASK-SIGNED-FIELD SB-C::INTEGER-TYPE-NUMERIC-BOUNDS 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/modarith.fas ... ;; Loaded file obj/from-host/src/compiler/modarith.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/sxhash.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/sxhash.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/sxhash.fas ... ;; Loaded file obj/from-host/src/compiler/sxhash.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/quantifiers.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/quantifiers.fas-tmp The following functions were used but not defined: SB-INT:FUNARG-BIND/CALL-FORMS 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/quantifiers.fas ... ;; Loaded file obj/from-host/src/code/quantifiers.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/bitops-derive-type.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/bitops-derive-type.fas-tmp The following functions were used but not defined: SB-C::TWO-ARG-DERIVE-TYPE SB-C::LOGNOT-DERIVE-TYPE-AUX 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/bitops-derive-type.fas ... ;; Loaded file obj/from-host/src/compiler/bitops-derive-type.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/dfo.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/dfo.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/dfo.fas ... ;; Loaded file obj/from-host/src/compiler/dfo.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/checkgen.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/checkgen.fas-tmp The following functions were used but not defined: SB-C::CHANGE-FULL-CALL SB-C:MAKE-RESTART-LOCATION 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/checkgen.fas ... ;; Loaded file obj/from-host/src/compiler/checkgen.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/tn.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/tn.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/tn.fas ... ;; Loaded file obj/from-host/src/compiler/tn.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/life.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/life.fas-tmp The following functions were used but not defined: SB-C::ADD-TO-EMIT-ORDER SB-C::FIND-IN-ENVIRONMENT 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/life.fas ... ;; Loaded file obj/from-host/src/compiler/life.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/debug-dump.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/debug-dump.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/debug-dump.fas ... ;; Loaded file obj/from-host/src/compiler/debug-dump.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/static-syms.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/static-syms.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/static-syms.fas ... ;; Loaded file obj/from-host/src/compiler/generic/static-syms.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/utils.lisp ... WARNING: in SB-C::COMPUTE-FASTREM-COEFFICIENT-IS-POW2 in lines 445..493 : Unknown declaration UNSIGNED-BYTE. The whole declaration will be ignored. ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/utils.fas-tmp The following functions were used but not defined: SB-VM::EMIT-ERROR-BREAK SB-C::UNBOUND-MARKER-TN-P 0 errors, 1 warning ** - Continuable Error FAILURE-P was set when creating "obj/from-host/src/compiler/generic/utils.fas" . If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-host/src/compiler/generic/utils.fas" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/generic/utils.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (MAYBE-WITH-COMPILATION-UNIT # # ...) RETRY :R4 retry (MAYBE-WITH-COMPILATION-UNIT # # ...) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-1.lisp ABORT-BUILD :R6 Abort building SBCL. ABORT :R7 Abort main loop ;; Loading file obj/from-host/src/compiler/generic/utils.fas ... ;; Loaded file obj/from-host/src/compiler/generic/utils.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/assembly/assemfile.lisp ... WARNING: in ASSEMBLE-FILE in lines 18..85 : variable LABEL is assigned but not read ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/assembly/assemfile.fas-tmp The following functions were used but not defined: SB-C:GENERATE-RETURN-SEQUENCE SB-C:GENERATE-CALL-SEQUENCE 0 errors, 1 warning ;; Loading file obj/from-host/src/assembly/assemfile.fas ... ;; Loaded file obj/from-host/src/assembly/assemfile.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/insts.lisp ... WARNING: in lines 833..864 : function FUNCT3-PRINTER is not used. Misspelled or missing IGNORE declaration? WARNING: in lines 833..864 : function FUNCT3-FMT is not used. Misspelled or missing IGNORE declaration? ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/insts.fas-tmp The following functions were used but not defined: SB-KERNEL:CODE-INSTRUCTIONS SB-SYS:SAP-REF-32 (SETF SB-SYS:SAP-REF-32) 0 errors, 2 warnings ;; Loading file obj/from-host/src/compiler/riscv/insts.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/insts.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/macros.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/macros.fas-tmp The following functions were used but not defined: SB-VM::EMIT-INTERNAL-ERROR 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/macros.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/macros.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/assembly/riscv/support.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/assembly/riscv/support.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/assembly/riscv/support.fas ... ;; Loaded file obj/from-host/src/assembly/riscv/support.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/move.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/move.fas-tmp The following functions were used but not defined: SB-SYS:SAP-INT SB-C:EMIT-CONSTANT 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/move.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/move.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/float.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/float.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/float.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/float.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/sap.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/sap.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/sap.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/sap.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/system.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/system.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/system.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/system.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/char.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/char.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/char.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/char.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/memory.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/memory.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/memory.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/memory.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/arith.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/arith.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/arith.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/arith.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/pred.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/pred.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/pred.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/pred.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/float-tran.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/float-tran.fas-tmp The following functions were used but not defined: SB-C::INTERVAL-INTERSECTION/DIFFERENCE SB-C::MAKE-INTERVAL SB-C::INTERVAL-NEG SB-C::INTERVAL-RANGE-INFO SB-C::INTERVAL-SPLIT SB-C::PREPARE-ARG-FOR-DERIVE-TYPE SB-C::/-DERIVE-TYPE-AUX SB-C::FLATTEN-LIST SB-C::ABS-DERIVE-TYPE-AUX SB-C::INTERVAL-RANGE-INFO> SB-C::NUMERIC-TYPE->INTERVAL SB-C::TWO-ARG-DERIVE-TYPE SB-C::BOUND-FUNC SB-C::ONE-ARG-DERIVE-TYPE SB-C::CAST-OR-CHECK-BOUND-TYPE SB-C::TYPE-APPROXIMATE-INTERVAL SB-C::SAFE-SINGLE-COERCION-P 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/float-tran.fas ... ;; Loaded file obj/from-host/src/compiler/float-tran.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/array-tran.lisp ... WARNING: in ARRAY-TYPE-DIMENSIONS-OR-GIVE-UP-MAYBE-ARRAY-TYPE-DIMENSIONS in lines 1535..1593 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in ARRAY-TYPE-DIMENSIONS-OR-GIVE-UP-MAYBE-ARRAY-TYPE-DIMENSIONS in lines 1535..1593 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in CONSERVATIVE-ARRAY-TYPE-COMPLEXP in lines 1595..1611 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in CONSERVATIVE-ARRAY-TYPE-COMPLEXP in lines 1595..1611 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/array-tran.fas-tmp The following functions were used but not defined: SB-XC:MACROEXPAND-1 SB-XC:MACROEXPAND SB-VM::MAKE-ARRAY-HEADER-INITS SB-C::SIMPLIFY-VECTOR-TYPE SB-C::STRIP-ARRAY-DIMENSIONS-AND-COMPLEXITY SB-C::INTEGER-TYPE-NUMERIC-BOUNDS 0 errors, 4 warnings ** - Continuable Error FAILURE-P was set when creating "obj/from-host/src/compiler/array-tran.fas". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-host/src/compiler/array-tran.fas" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/array-tran.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (MAYBE-WITH-COMPILATION-UNIT # # ...) RETRY :R4 retry (MAYBE-WITH-COMPILATION-UNIT # # ...) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-1.lisp ABORT-BUILD :R6 Abort building SBCL. ABORT :R7 Abort main loop ;; Loading file obj/from-host/src/compiler/array-tran.fas ... ;; Loaded file obj/from-host/src/compiler/array-tran.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/vm-tran.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/vm-tran.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/vm-tran.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-tran.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/type-vop-macros.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/type-vop-macros.fas-tmp The following functions were used but not defined: SB-VM::%TEST-HEADERS 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/type-vop-macros.fas ... ;; Loaded file obj/from-host/src/compiler/type-vop-macros.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/type-vops.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/type-vops.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/type-vops.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/type-vops.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/type-vops.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/type-vops.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/type-vops.fas ... ;; Loaded file obj/from-host/src/compiler/generic/type-vops.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/ir1final.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/ir1final.fas-tmp The following functions were used but not defined: SB-C::NEXT-NODE 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/ir1final.fas ... ;; Loaded file obj/from-host/src/compiler/ir1final.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/alloc.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/alloc.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/alloc.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/alloc.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/values.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/values.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/values.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/values.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/srctran.lisp ... WARNING: in COMBINATION-TYPED-P-GEN in lines 3222..3244 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in COMBINATION-TYPED-P-GEN in lines 3222..3244 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in COMBINATION-TYPED-P-GEN in lines 3222..3244 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in COMBINATION-TYPED-P-GEN in lines 3222..3244 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in #:|6183 6209 (DEFTRANSFORM ARRAY-ELEMENT-TYPE (#) ...)-420-1| in lines 6183..6209 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in #:|6183 6209 (DEFTRANSFORM ARRAY-ELEMENT-TYPE (#) ...)-420-1| in lines 6183..6209 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in #:|6183 6209 (DEFTRANSFORM ARRAY-ELEMENT-TYPE (#) ...)-420-1| in lines 6183..6209 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in #:|6183 6209 (DEFTRANSFORM ARRAY-ELEMENT-TYPE (#) ...)-420-1| in lines 6183..6209 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in SINGLE-OR-CHAIN in lines 7034..7201 : variable NEXT-IF is assigned but not read WARNING: in OR-EQ-TO-JUMP-TABLE in lines 7256..7339 : variable NODE is assigned but not read ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/srctran.fas-tmp The following functions were used but not defined: SB-INT:%MACROEXPAND SB-C::EQ-COMPARABLE-TYPE-P SB-FORMAT::EXTRACT-USER-FUN-DIRECTIVES SB-FORMAT::TOKENIZE-CONTROL-STRING SB-FORMAT:%COMPILER-WALK-FORMAT-STRING SB-KERNEL:GET-LISP-OBJ-ADDRESS SB-IMPL::SHOULD-ATTEMPT-HASH-BASED-CASE-DISPATCH SB-C::PREHASH-FOR-PERFECT-HASH 0 errors, 10 warnings ** - Continuable Error FAILURE-P was set when creating "obj/from-host/src/compiler/srctran.fas". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-host/src/compiler/srctran.fas" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/srctran.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (MAYBE-WITH-COMPILATION-UNIT # # ...) RETRY :R4 retry (MAYBE-WITH-COMPILATION-UNIT # # ...) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-1.lisp ABORT-BUILD :R6 Abort building SBCL. ABORT :R7 Abort main loop ;; Loading file obj/from-host/src/compiler/srctran.fas ... ;; Loaded file obj/from-host/src/compiler/srctran.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/seqtran.lisp ... WARNING: in VECTOR-SPECIFIER-WIDETAG in lines 2472..2493 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in VECTOR-SPECIFIER-WIDETAG in lines 2472..2493 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in VECTOR-TYPE-LENGTHS in lines 3586..3596 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in VECTOR-TYPE-LENGTHS in lines 3586..3596 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/seqtran.fas-tmp The following functions were used but not defined: SB-INT:FUNARG-BIND/CALL-FORMS SB-C::STRIP-ARRAY-DIMENSIONS-AND-COMPLEXITY SB-C::SIMPLIFY-VECTOR-TYPE SB-C::LEGAL-IMMEDIATE-CONSTANT-P 0 errors, 4 warnings ** - Continuable Error FAILURE-P was set when creating "obj/from-host/src/compiler/seqtran.fas". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-host/src/compiler/seqtran.fas" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/seqtran.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (MAYBE-WITH-COMPILATION-UNIT # # ...) RETRY :R4 retry (MAYBE-WITH-COMPILATION-UNIT # # ...) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-1.lisp ABORT-BUILD :R6 Abort building SBCL. ABORT :R7 Abort main loop ;; Loading file obj/from-host/src/compiler/seqtran.fas ... ;; Loaded file obj/from-host/src/compiler/seqtran.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/typetran.lisp ... WARNING: in SOURCE-TRANSFORM-INTERSECTION-TYPEP in lines 739..764 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in SOURCE-TRANSFORM-INTERSECTION-TYPEP in lines 739..764 : Reference to TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/typetran.fas-tmp The following functions were used but not defined: SB-C::SPLIT-UNION-TYPE-TESTS SB-C::BACKEND-TYPE-PREDICATE 0 errors, 2 warnings ** - Continuable Error FAILURE-P was set when creating "obj/from-host/src/compiler/typetran.fas". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-host/src/compiler/typetran.fas" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/typetran.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (MAYBE-WITH-COMPILATION-UNIT # # ...) RETRY :R4 retry (MAYBE-WITH-COMPILATION-UNIT # # ...) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-1.lisp ABORT-BUILD :R6 Abort building SBCL. ABORT :R7 Abort main loop ;; Loading file obj/from-host/src/compiler/typetran.fas ... ;; Loaded file obj/from-host/src/compiler/typetran.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/vm-typetran.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/vm-typetran.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/vm-typetran.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-typetran.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/cross-modular.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/cross-modular.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/cross-modular.fas ... ;; Loaded file obj/from-host/src/code/cross-modular.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/subprim.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/subprim.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/subprim.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/subprim.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/debug.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/debug.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/debug.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/debug.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/c-call.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/c-call.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/c-call.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/c-call.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/cell.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/cell.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/cell.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/cell.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/call.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/call.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/call.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/call.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/nlx.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/nlx.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/nlx.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/nlx.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/late-nlx.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/late-nlx.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/late-nlx.fas ... ;; Loaded file obj/from-host/src/compiler/generic/late-nlx.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/show.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/show.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/show.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/show.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/riscv/array.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/riscv/array.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/riscv/array.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/array.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/type-error.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/type-error.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/type-error.fas ... ;; Loaded file obj/from-host/src/compiler/generic/type-error.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/envanal.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/envanal.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/envanal.fas ... ;; Loaded file obj/from-host/src/compiler/envanal.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/assembly/riscv/assem-rtns.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/assembly/riscv/assem-rtns.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/assembly/riscv/assem-rtns.fas ... ;; Loaded file obj/from-host/src/assembly/riscv/assem-rtns.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/assembly/riscv/array.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/assembly/riscv/array.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/assembly/riscv/array.fas ... ;; Loaded file obj/from-host/src/assembly/riscv/array.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/assembly/riscv/arith.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/assembly/riscv/arith.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/assembly/riscv/arith.fas ... ;; Loaded file obj/from-host/src/assembly/riscv/arith.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/assembly/riscv/alloc.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/assembly/riscv/alloc.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/assembly/riscv/alloc.fas ... ;; Loaded file obj/from-host/src/assembly/riscv/alloc.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/pseudo-vops.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/pseudo-vops.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/pseudo-vops.fas ... ;; Loaded file obj/from-host/src/compiler/pseudo-vops.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/aliencomp.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/aliencomp.fas-tmp The following functions were used but not defined: SB-C::ANNOTATE-ORDINARY-LVAR SB-C::EMIT-MOVE SB-C::LVAR-TN SB-C::MOVE-LVAR-RESULT 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/aliencomp.fas ... ;; Loaded file obj/from-host/src/compiler/aliencomp.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/coverage.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/coverage.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/coverage.fas ... ;; Loaded file obj/from-host/src/compiler/coverage.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/ltv.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/ltv.fas-tmp The following functions were used but not defined: SB-C::MOVE-LVAR-RESULT 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/ltv.fas ... ;; Loaded file obj/from-host/src/compiler/ltv.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/gtn.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/gtn.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/gtn.fas ... ;; Loaded file obj/from-host/src/compiler/gtn.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/ltn.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/ltn.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/ltn.fas ... ;; Loaded file obj/from-host/src/compiler/ltn.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/stack.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/stack.fas-tmp The following functions were used but not defined: SB-C::ADD-TO-EMIT-ORDER 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/stack.fas ... ;; Loaded file obj/from-host/src/compiler/stack.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/control.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/control.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/control.fas ... ;; Loaded file obj/from-host/src/compiler/control.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/entry.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/entry.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/entry.fas ... ;; Loaded file obj/from-host/src/compiler/entry.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/ir2tran.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/ir2tran.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/ir2tran.fas ... ;; Loaded file obj/from-host/src/compiler/ir2tran.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/vm-ir2tran.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/vm-ir2tran.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/vm-ir2tran.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-ir2tran.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/copyprop.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/copyprop.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/copyprop.fas ... ;; Loaded file obj/from-host/src/compiler/copyprop.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/represent.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/represent.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/represent.fas ... ;; Loaded file obj/from-host/src/compiler/represent.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/ir2opt.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/ir2opt.fas-tmp The following functions were used but not defined: SB-C::PRINT-IR2-BLOCKS 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/ir2opt.fas ... ;; Loaded file obj/from-host/src/compiler/ir2opt.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/pack.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/pack.fas-tmp The following functions were used but not defined: SB-C::PRINT-TN-GUTS SB-REGALLOC::PACK-ITERATIVE 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/pack.fas ... ;; Loaded file obj/from-host/src/compiler/pack.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/pack-iterative.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/pack-iterative.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/pack-iterative.fas ... ;; Loaded file obj/from-host/src/compiler/pack-iterative.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/debug.lisp ... WARNING: in IR1-TO-DOT in lines 1411..1461 : Reference to SUCC is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in IR1-TO-DOT in lines 1411..1461 : Reference to SUCC is implementation-dependent, per ANSI CL 6.1.1.4. ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/debug.fas-tmp 0 errors, 2 warnings ** - Continuable Error FAILURE-P was set when creating "obj/from-host/src/compiler/debug.fas". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-host/src/compiler/debug.fas" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/debug.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (MAYBE-WITH-COMPILATION-UNIT # # ...) RETRY :R4 retry (MAYBE-WITH-COMPILATION-UNIT # # ...) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-1.lisp ABORT-BUILD :R6 Abort building SBCL. ABORT :R7 Abort main loop ;; Loading file obj/from-host/src/compiler/debug.fas ... ;; Loaded file obj/from-host/src/compiler/debug.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/error.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/error.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/error.fas ... ;; Loaded file obj/from-host/src/code/error.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/parse-defmacro-errors.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/parse-defmacro-errors.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/parse-defmacro-errors.fas ... ;; Loaded file obj/from-host/src/code/parse-defmacro-errors.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/macroexpand.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/macroexpand.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/macroexpand.fas ... ;; Loaded file obj/from-host/src/code/macroexpand.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/late-extensions.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/late-extensions.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/late-extensions.fas ... ;; Loaded file obj/from-host/src/code/late-extensions.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/brothertree.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/brothertree.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/brothertree.fas ... ;; Loaded file obj/from-host/src/code/brothertree.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/early-step.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/early-step.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/early-step.fas ... ;; Loaded file obj/from-host/src/code/early-step.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/avltree.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/avltree.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/avltree.fas ... ;; Loaded file obj/from-host/src/code/avltree.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/pcl/walk.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/pcl/walk.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/pcl/walk.fas ... ;; Loaded file obj/from-host/src/pcl/walk.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/setf.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/setf.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/setf.fas ... ;; Loaded file obj/from-host/src/code/setf.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/macros.lisp ... WARNING: in CASE-BODY in lines 999..1206 : variable CLAUSE is assigned but not read ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/macros.fas-tmp The following functions were used but not defined: SB-INT:ABOUT-TO-MODIFY-SYMBOL-VALUE SB-PCL::EMIT-CACHE-LOOKUP 0 errors, 1 warning ;; Loading file obj/from-host/src/code/macros.fas ... ;; Loaded file obj/from-host/src/code/macros.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/loop.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/loop.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/loop.fas ... ;; Loaded file obj/from-host/src/code/loop.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/pcl/defclass.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/pcl/defclass.fas-tmp The following functions were used but not defined: SB-PCL::*SUBTYPEP SB-PCL::MAKE-STRUCTURE-CLASS-DEFSTRUCT-FORM SB-MOP:CLASS-DIRECT-SLOTS 0 errors, 0 warnings ;; Loading file obj/from-host/src/pcl/defclass.fas ... ;; Loaded file obj/from-host/src/pcl/defclass.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/early-defmethod.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/early-defmethod.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/early-defmethod.fas ... ;; Loaded file obj/from-host/src/code/early-defmethod.fas ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/code/format.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/code/format.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/code/format.fas ... ;; Loaded file obj/from-host/src/code/format.fas ; Math journal: wrote #P"obj/from-host/xfloat-math.lisp-expr" (186 entries) ;; Loading file tests/type.before-xc.lisp ... ;; Loaded file tests/type.before-xc.lisp ;; Loading file tests/info.before-xc.lisp ... ;; Loaded file tests/info.before-xc.lisp ;; Loading file tests/vm.before-xc.lisp ... ;; Loaded file tests/vm.before-xc.lisp ; Math journal: wrote #P"obj/from-host/xfloat-math.lisp-expr" (200 entries) ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/genesis.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/genesis.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/genesis.fas ... ;; Loaded file obj/from-host/src/compiler/generic/genesis.fas beginning GENESIS, creating headers in "src/runtime/genesis" ;; Loaded file make-host-1.lisp real 5m25.212s user 5m23.727s sys 0m0.404s //entering make-target-1.sh //building runtime system and symbol table file make: Entering directory '/build/sbcl/src/sbcl-2.4.9/src/runtime' rm -f *.[do] ../../tlsf-bsd/tlsf/tlsf.o sbcl *.tmp libsbcl.a \ ldb unit-tests libsbcl.a shrinkwrap-sbcl* sbcl.mk core make: Leaving directory '/build/sbcl/src/sbcl-2.4.9/src/runtime' make: Entering directory '/build/sbcl/src/sbcl-2.4.9/src/runtime' cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o alloc.o alloc.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o arena.o arena.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o backtrace.o backtrace.c backtrace.c:17:9: warning: "_GNU_SOURCE" redefined 17 | #define _GNU_SOURCE | ^~~~~~~~~~~ : note: this is the location of the previous definition cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o breakpoint.o breakpoint.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o coalesce.o coalesce.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o coreparse.o coreparse.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o dynbind.o dynbind.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o funcall.o funcall.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o gc-common.o gc-common.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o globals.o globals.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o hopscotch.o hopscotch.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o interr.o interr.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o interrupt.o interrupt.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o largefile.o largefile.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o main.o main.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o math.o math.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o monitor.o monitor.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o murmur_hash.o murmur_hash.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o os-common.o os-common.c os-common.c:11:10: warning: "_GNU_SOURCE" redefined 11 | # define _GNU_SOURCE /* needed for RTLD_DEFAULT from dlfcn.h */ | ^~~~~~~~~~~ : note: this is the location of the previous definition cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o parse.o parse.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o perfecthash.o perfecthash.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o print.o print.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o regnames.o regnames.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o runtime.o runtime.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o safepoint.o safepoint.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o save.o save.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o sc-offset.o sc-offset.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o search.o search.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o stringspace.o stringspace.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o thread.o thread.c thread.c:13:9: warning: "_GNU_SOURCE" redefined 13 | #define _GNU_SOURCE // for pthread_setname_np() | ^~~~~~~~~~~ : note: this is the location of the previous definition cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o time.o time.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o validate.o validate.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o var-io.o var-io.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o vars.o vars.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o wrap.o wrap.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o run-program.o run-program.c run-program.c:18:9: warning: "_GNU_SOURCE" redefined 18 | #define _GNU_SOURCE | ^~~~~~~~~~~ : note: this is the location of the previous definition cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o sprof.o sprof.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o riscv-arch.o riscv-arch.c riscv-arch.c: In function 'arch_install_breakpoint': riscv-arch.c:58:2: warning: #warning "Implement." [-Wcpp] 58 | #warning "Implement." | ^~~~~~~ riscv-arch.c: In function 'arch_remove_breakpoint': riscv-arch.c:64:2: warning: #warning "Implement." [-Wcpp] 64 | #warning "Implement." | ^~~~~~~ riscv-arch.c: In function 'arch_do_displaced_inst': riscv-arch.c:69:2: warning: #warning "Implement." [-Wcpp] 69 | #warning "Implement." | ^~~~~~~ cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o linux-os.o linux-os.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o linux-mman.o linux-mman.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o riscv-linux-os.o riscv-linux-os.c riscv-linux-os.c: In function 'os_restore_fp_control': riscv-linux-os.c:71:2: warning: #warning "Implement correct fp control." [-Wcpp] 71 | #warning "Implement correct fp control." | ^~~~~~~ cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o fullcgc.o fullcgc.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o gencgc.o gencgc.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o traceroot.o traceroot.c cc -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -I. -c -o ../../tlsf-bsd/tlsf/tlsf.o ../../tlsf-bsd/tlsf/tlsf.c cc -Wl,-O1 -Wl,--sort-common -Wl,--as-needed -Wl,-z,relro -Wl,-z,now -flto=auto -g -Wl,--export-dynamic -o sbcl alloc.o arena.o backtrace.o breakpoint.o coalesce.o coreparse.o dynbind.o funcall.o gc-common.o globals.o hopscotch.o interr.o interrupt.o largefile.o main.o math.o monitor.o murmur_hash.o os-common.o parse.o perfecthash.o print.o regnames.o runtime.o safepoint.o save.o sc-offset.o search.o stringspace.o thread.o time.o validate.o var-io.o vars.o wrap.o run-program.o sprof.o riscv-arch.o linux-os.o linux-mman.o riscv-linux-os.o fullcgc.o gencgc.o traceroot.o ../../tlsf-bsd/tlsf/tlsf.o -ldl -Wl,-no-as-needed -lpthread -lzstd -lm In function 'arch_write_linkage_table_entry', inlined from 'os_link_runtime' at os-common.c:210:13, inlined from 'os_link_runtime' at os-common.c:180:6: riscv-arch.c:182:17: warning: writing 8 bytes into a region of size 0 [-Wstringop-overflow=] 182 | *inst_ptr++ = inst; | ^ riscv-arch.c:188:17: warning: writing 4 bytes into a region of size 0 [-Wstringop-overflow=] 188 | *inst_ptr++ = inst; | ^ riscv-arch.c:190:34: warning: writing 8 bytes into a region of size 0 [-Wstringop-overflow=] 190 | *(unsigned long *)inst_ptr++ = (unsigned long)target_addr; | ^ riscv-arch.c:151:36: warning: writing 8 bytes into a region of size 0 [-Wstringop-overflow=] 151 | *(unsigned long *)reloc_addr = (unsigned long)target_addr; | ^ : sbcl cc -g -I. -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -DSTANDALONE_LDB -c -o standalone-monitor.o monitor.c cc -g -I. -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -DSTANDALONE_LDB -c -o standalone-interr.o interr.c cc -g -I. -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3 -DSTANDALONE_LDB -c -o standalone-thread.o thread.c thread.c:13:9: warning: "_GNU_SOURCE" redefined 13 | #define _GNU_SOURCE // for pthread_setname_np() | ^~~~~~~~~~~ : note: this is the location of the previous definition cc -Wl,-O1 -Wl,--sort-common -Wl,--as-needed -Wl,-z,relro -Wl,-z,now -flto=auto -g -Wl,--export-dynamic -o ldb standalone-monitor.o standalone-interr.o standalone-thread.o \ alloc.o arena.o backtrace.o breakpoint.o coalesce.o coreparse.o dynbind.o funcall.o gc-common.o globals.o hopscotch.o interrupt.o largefile.o math.o murmur_hash.o os-common.o parse.o perfecthash.o print.o regnames.o save.o sc-offset.o search.o stringspace.o time.o validate.o var-io.o vars.o wrap.o run-program.o sprof.o riscv-arch.o linux-os.o linux-mman.o riscv-linux-os.o fullcgc.o gencgc.o traceroot.o ../../tlsf-bsd/tlsf/tlsf.o -ldl -Wl,-no-as-needed -lpthread -lzstd -lm In function 'arch_write_linkage_table_entry', inlined from 'os_link_runtime' at os-common.c:210:13, inlined from 'os_link_runtime' at os-common.c:180:6: riscv-arch.c:182:17: warning: writing 8 bytes into a region of size 0 [-Wstringop-overflow=] 182 | *inst_ptr++ = inst; | ^ riscv-arch.c:188:17: warning: writing 4 bytes into a region of size 0 [-Wstringop-overflow=] 188 | *inst_ptr++ = inst; | ^ riscv-arch.c:190:34: warning: writing 8 bytes into a region of size 0 [-Wstringop-overflow=] 190 | *(unsigned long *)inst_ptr++ = (unsigned long)target_addr; | ^ riscv-arch.c:151:36: warning: writing 8 bytes into a region of size 0 [-Wstringop-overflow=] 151 | *(unsigned long *)reloc_addr = (unsigned long)target_addr; | ^ ( echo 'CC=cc' ; \ echo 'LD=ld' ; \ echo 'CFLAGS=-march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3' ; \ echo 'ASFLAGS=-march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl -g -Wall -Wundef -Wsign-compare -Wpointer-arith -O3' ; \ echo 'LINKFLAGS=-Wl,-O1 -Wl,--sort-common -Wl,--as-needed -Wl,-z,relro -Wl,-z,now -flto=auto -g -Wl,--export-dynamic' ; \ echo 'LDFLAGS=' ; \ echo '__LDFLAGS__=' ; \ echo 'LIBS=-ldl -Wl,-no-as-needed -lpthread -lzstd -lm' ; \ if [ -n '' ] ; then \ echo 'LIBSBCL=alloc.o arena.o backtrace.o breakpoint.o coalesce.o coreparse.o dynbind.o funcall.o gc-common.o globals.o hopscotch.o interr.o interrupt.o largefile.o main.o math.o monitor.o murmur_hash.o os-common.o parse.o perfecthash.o print.o regnames.o runtime.o safepoint.o save.o sc-offset.o search.o stringspace.o thread.o time.o validate.o var-io.o vars.o wrap.o run-program.o sprof.o riscv-arch.o linux-os.o linux-mman.o riscv-linux-os.o fullcgc.o gencgc.o traceroot.o ../../tlsf-bsd/tlsf/tlsf.o' ; \ echo 'USE_LIBSBCL=alloc.o arena.o backtrace.o breakpoint.o coalesce.o coreparse.o dynbind.o funcall.o gc-common.o globals.o hopscotch.o interr.o interrupt.o largefile.o main.o math.o monitor.o murmur_hash.o os-common.o parse.o perfecthash.o print.o regnames.o runtime.o safepoint.o save.o sc-offset.o search.o stringspace.o thread.o time.o validate.o var-io.o vars.o wrap.o run-program.o sprof.o riscv-arch.o linux-os.o linux-mman.o riscv-linux-os.o fullcgc.o gencgc.o traceroot.o ../../tlsf-bsd/tlsf/tlsf.o' ; \ fi ; \ : ) > sbcl.mk /bin/sh: line 1: etags: command not found make: Leaving directory '/build/sbcl/src/sbcl-2.4.9/src/runtime' cc -I../src/runtime -march=rv64gc -mabi=lp64d -O2 -pipe -fno-plt -fexceptions -Wp,-D_FORTIFY_SOURCE=3 -Wformat -Werror=format-security -fstack-clash-protection -fno-omit-frame-pointer -g -ffile-prefix-map=/build/sbcl/src=/usr/src/debug/sbcl -flto=auto -D_GNU_SOURCE -fno-omit-frame-pointer -DSBCL_HOME=/usr/lib/sbcl grovel-headers.c -ldl -Wl,-no-as-needed -lpthread -lzstd -o grovel-headers real 1m30.193s user 3m25.239s sys 0m3.729s //entering make-host-2.sh //running cross-compiler to create target object files [1]> ;; Loading file loader.lisp ... ;; Loaded file loader.lisp #P"/build/sbcl/src/sbcl-2.4.9/loader.lisp" [2]> ;; Loading file make-host-2.lisp ... ;; Loading file src/cold/shared.lisp ... ;; Loading file src/cold/shebang.lisp ... ;; Loaded file src/cold/shebang.lisp ;; Loaded file src/cold/shared.lisp ;; Loading file src/cold/set-up-cold-packages.lisp ... ;; Loading file src/cold/exports.lisp ... ;; Loaded file src/cold/exports.lisp ;; Loaded file src/cold/set-up-cold-packages.lisp ;; Loading file src/cold/defun-load-or-cload-xcompiler.lisp ... ;; Loaded file src/cold/defun-load-or-cload-xcompiler.lisp ;; Loading file obj/from-host/src/code/cross-early.fas ... ;; Loaded file obj/from-host/src/code/cross-early.fas ;; Loading file obj/from-host/src/code/show.fas ... ;; Loaded file obj/from-host/src/code/show.fas ;; Loading file obj/from-host/src/compiler/early-constantp.fas ... ;; Loaded file obj/from-host/src/compiler/early-constantp.fas ;; Loading file obj/from-host/src/compiler/vop-existsp.fas ... ;; Loaded file obj/from-host/src/compiler/vop-existsp.fas ;; Loading file obj/from-host/src/code/primordial-extensions.fas ... ;; Loaded file obj/from-host/src/code/primordial-extensions.fas ;; Loading file obj/from-host/src/code/cold-init-helper-macros.fas ... ;; Loaded file obj/from-host/src/code/cold-init-helper-macros.fas ;; Loading file obj/from-host/src/code/backq.fas ... ;; Loaded file obj/from-host/src/code/backq.fas ;; Loading file obj/from-host/src/code/cross-byte.fas ... ;; Loaded file obj/from-host/src/code/cross-byte.fas ;; Loading file obj/from-host/src/code/cross-misc.fas ... ;; Loaded file obj/from-host/src/code/cross-misc.fas ;; Loading file obj/from-host/src/code/cross-char.fas ... ;; Loaded file obj/from-host/src/code/cross-char.fas ;; Loading file obj/from-host/src/code/cross-io.fas ... ;; Loaded file obj/from-host/src/code/cross-io.fas ;; Loading file obj/from-host/src/code/cross-condition.fas ... ;; Loaded file obj/from-host/src/code/cross-condition.fas ;; Loading file obj/from-host/src/code/uncross.fas ... ;; Loaded file obj/from-host/src/code/uncross.fas ;; Loading file obj/from-host/src/code/defbangtype.fas ... ;; Loaded file obj/from-host/src/code/defbangtype.fas ;; Loading file obj/from-host/src/code/early-constants.fas ... ;; Loaded file obj/from-host/src/code/early-constants.fas ;; Loading file obj/from-host/src/code/function-names.fas ... ;; Loaded file obj/from-host/src/code/function-names.fas ;; Loading file obj/from-host/src/compiler/early-globaldb.fas ... ;; Loaded file obj/from-host/src/compiler/early-globaldb.fas ;; Loading file obj/from-host/src/compiler/generic/parms.fas ... ;; Loaded file obj/from-host/src/compiler/generic/parms.fas ;; Loading file obj/from-host/src/compiler/riscv/parms.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/parms.fas ;; Loading file obj/from-host/src/compiler/generic/early-vm.fas ... ;; Loaded file obj/from-host/src/compiler/generic/early-vm.fas ;; Loading file obj/from-host/src/compiler/generic/early-objdef.fas ... ;; Loaded file obj/from-host/src/compiler/generic/early-objdef.fas ;; Loading file obj/from-host/src/code/parse-body.fas ... ;; Loaded file obj/from-host/src/code/parse-body.fas ;; Loading file obj/from-host/src/compiler/policy.fas ... ;; Loaded file obj/from-host/src/compiler/policy.fas ;; Loading file obj/from-host/src/code/early-extensions.fas ... ;; Loaded file obj/from-host/src/code/early-extensions.fas ;; Loading file obj/from-host/src/code/defbangstruct.fas ... ;; Loaded file obj/from-host/src/code/defbangstruct.fas ;; Loading file obj/from-host/src/code/early-raw-slots.fas ... ;; Loaded file obj/from-host/src/code/early-raw-slots.fas ;; Loading file obj/from-host/src/code/hashset.fas ... ;; Loaded file obj/from-host/src/code/hashset.fas ;; Loading file obj/from-host/src/code/string-hash.fas ... ;; Loaded file obj/from-host/src/code/string-hash.fas ;; Loading file obj/from-host/src/code/xset.fas ... ;; Loaded file obj/from-host/src/code/xset.fas ;; Loading file obj/from-host/src/code/type-class.fas ... ;; Loaded file obj/from-host/src/code/type-class.fas ;; Loading file obj/from-host/src/code/thread-structs.fas ... ;; Loaded file obj/from-host/src/code/thread-structs.fas ;; Loading file obj/from-host/src/compiler/early-c.fas ... ;; Loaded file obj/from-host/src/compiler/early-c.fas ;; Loading file obj/from-host/src/pcl/slot-name.fas ... ;; Loaded file obj/from-host/src/pcl/slot-name.fas ;; Loading file obj/from-host/src/code/early-classoid.fas ... ;; Loaded file obj/from-host/src/code/early-classoid.fas ;; Loading file obj/from-host/src/compiler/generic/layout-ids.fas ... ;; Loaded file obj/from-host/src/compiler/generic/layout-ids.fas ;; Loading file obj/from-host/src/code/debug-var-io.fas ... ;; Loaded file obj/from-host/src/code/debug-var-io.fas ;; Loading file obj/from-host/src/code/number-dispatch.fas ... ;; Loaded file obj/from-host/src/code/number-dispatch.fas ;; Loading file obj/from-host/src/code/float.fas ... ;; Loaded file obj/from-host/src/code/float.fas ;; Loading file obj/from-host/src/code/cross-float-reader.fas ... ;; Loaded file obj/from-host/src/code/cross-float-reader.fas ;; Loading file obj/from-host/src/code/cross-float.fas ... ; Math journal: prefilled 200 entries from #P"obj/from-host/xfloat-math.lisp-expr" ;; Loaded file obj/from-host/src/code/cross-float.fas ;; Loading file obj/from-host/src/code/early-time.fas ... ;; Loaded file obj/from-host/src/code/early-time.fas ;; Loading file obj/from-host/src/code/misc.fas ... ;; Loaded file obj/from-host/src/code/misc.fas ;; Loading file obj/from-host/src/compiler/parse-lambda-list.fas ... ;; Loaded file obj/from-host/src/compiler/parse-lambda-list.fas ;; Loading file obj/from-host/src/compiler/macros.fas ... ;; Loaded file obj/from-host/src/compiler/macros.fas ;; Loading file obj/from-host/src/compiler/fun-info.fas ... ;; Loaded file obj/from-host/src/compiler/fun-info.fas ;; Loading file obj/from-host/src/compiler/generic/vm-macs.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-macs.fas ;; Loading file obj/from-host/src/compiler/policies.fas ... ;; Loaded file obj/from-host/src/compiler/policies.fas ;; Loading file obj/from-host/src/compiler/info-vector.fas ... ;; Loaded file obj/from-host/src/compiler/info-vector.fas ;; Loading file obj/from-host/src/compiler/globaldb.fas ... ;; Loaded file obj/from-host/src/compiler/globaldb.fas ;; Loading file obj/from-host/src/compiler/generic/objdef.fas ... ;; Loaded file obj/from-host/src/compiler/generic/objdef.fas ;; Loading file obj/from-host/src/code/lockfree-list.fas ... ;; Loaded file obj/from-host/src/code/lockfree-list.fas ;; Loading file obj/from-host/src/compiler/generic/vm-array.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-array.fas ;; Loading file obj/from-host/src/code/primordial-type.fas ... ;; Loaded file obj/from-host/src/code/primordial-type.fas ;; Loading file obj/from-host/src/code/specializable-array.fas ... ;; Loaded file obj/from-host/src/code/specializable-array.fas ;; Loading file obj/from-host/src/compiler/sset.fas ... ;; Loaded file obj/from-host/src/compiler/sset.fas ;; Loading file obj/from-host/src/compiler/node.fas ... ;; Loaded file obj/from-host/src/compiler/node.fas ;; Loading file obj/from-host/src/compiler/early-assem.fas ... ;; Loaded file obj/from-host/src/compiler/early-assem.fas ;; Loading file obj/from-host/src/compiler/vop.fas ... ;; Loaded file obj/from-host/src/compiler/vop.fas ;; Loading file obj/from-host/src/compiler/backend.fas ... ;; Loaded file obj/from-host/src/compiler/backend.fas ;; Loading file obj/from-host/src/code/sc-offset.fas ... ;; Loaded file obj/from-host/src/code/sc-offset.fas ;; Loading file obj/from-host/src/compiler/vmdef.fas ... ;; Loaded file obj/from-host/src/compiler/vmdef.fas ;; Loading file obj/from-host/src/code/defmacro.fas ... ;; Loaded file obj/from-host/src/code/defmacro.fas ;; Loading file obj/from-host/src/compiler/meta-vmdef.fas ... ;; Loaded file obj/from-host/src/compiler/meta-vmdef.fas ;; Loading file obj/from-host/src/compiler/riscv/vm.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/vm.fas ;; Loading file obj/from-host/src/code/cross-sxhash.fas ... ;; Loaded file obj/from-host/src/code/cross-sxhash.fas ;; Loading file obj/from-host/src/code/alieneval.fas ... ;; Loaded file obj/from-host/src/code/alieneval.fas ;; Loading file obj/from-host/src/code/class.fas ... ;; Loaded file obj/from-host/src/code/class.fas ;; Loading file obj/from-host/src/pcl/pre-warm.fas ... ;; Loaded file obj/from-host/src/pcl/pre-warm.fas ;; Loading file obj/from-host/src/code/debug-info.fas ... ;; Loaded file obj/from-host/src/code/debug-info.fas ;; Loading file obj/from-host/src/code/source-location.fas ... ;; Loaded file obj/from-host/src/code/source-location.fas ;; Loading file obj/from-host/src/compiler/proclaim.fas ... ;; Loaded file obj/from-host/src/compiler/proclaim.fas ;; Loading file obj/from-host/src/compiler/constantp.fas ... ;; Loaded file obj/from-host/src/compiler/constantp.fas ;; Loading file obj/from-host/src/code/deftype.fas ... ;; Loaded file obj/from-host/src/code/deftype.fas ;; Loading file obj/from-host/src/code/type.fas ... ;; Loaded file obj/from-host/src/code/type.fas ;; Loading file obj/from-host/src/compiler/generic/vm-type.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-type.fas ;; Loading file obj/from-host/src/compiler/generic/primtype.fas ... ;; Loaded file obj/from-host/src/compiler/generic/primtype.fas ;; Loading file obj/from-host/src/code/cross-type.fas ... ;; Loaded file obj/from-host/src/code/cross-type.fas ;; Loading file obj/from-host/src/code/deftypes-for-target.fas ... ;; Loaded file obj/from-host/src/code/deftypes-for-target.fas ;; Loading file obj/from-host/src/code/type-init.fas ... ;; Loaded file obj/from-host/src/code/type-init.fas ;; Loading file obj/from-host/src/code/defstruct.fas ... ;; Loaded file obj/from-host/src/code/defstruct.fas ;; Loading file obj/from-host/src/code/alien-type.fas ... ;; Loaded file obj/from-host/src/code/alien-type.fas ;; Loading file obj/from-host/src/code/force-delayed-defbangstructs.fas ... ;; Loaded file obj/from-host/src/code/force-delayed-defbangstructs.fas ;; Loading file obj/from-host/src/compiler/compiler-error.fas ... ;; Loaded file obj/from-host/src/compiler/compiler-error.fas ;; Loading file obj/from-host/src/compiler/fixup-type.fas ... ;; Loaded file obj/from-host/src/compiler/fixup-type.fas ;; Loading file obj/from-host/src/code/package.fas ... ;; Loaded file obj/from-host/src/code/package.fas ;; Loading file obj/from-host/src/code/random.fas ... ;; Loaded file obj/from-host/src/code/random.fas ;; Loading file obj/from-host/src/code/hash-table.fas ... ;; Loaded file obj/from-host/src/code/hash-table.fas ;; Loading file obj/from-host/src/code/readtable.fas ... ;; Loaded file obj/from-host/src/code/readtable.fas ;; Loading file obj/from-host/src/code/host-pprint.fas ... ;; Loaded file obj/from-host/src/code/host-pprint.fas ;; Loading file obj/from-host/src/compiler/knownfun.fas ... ;; Loaded file obj/from-host/src/compiler/knownfun.fas ;; Loading file obj/from-host/src/compiler/ctype.fas ... ;; Loaded file obj/from-host/src/compiler/ctype.fas ;; Loading file obj/from-host/src/compiler/fndb.fas ... ;; Loaded file obj/from-host/src/compiler/fndb.fas ;; Loading file obj/from-host/src/compiler/generic/vm-fndb.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-fndb.fas ;; Loading file obj/from-host/src/compiler/generic/late-objdef.fas ... ;; Loaded file obj/from-host/src/compiler/generic/late-objdef.fas ;; Loading file obj/from-host/src/compiler/generic/interr.fas ... ;; Loaded file obj/from-host/src/compiler/generic/interr.fas ;; Loading file obj/from-host/src/compiler/bit-util.fas ... ;; Loaded file obj/from-host/src/compiler/bit-util.fas ;; Loading file obj/from-host/src/code/load.fas ... ;; Loaded file obj/from-host/src/code/load.fas ;; Loading file obj/from-host/src/code/format-directive.fas ... ;; Loaded file obj/from-host/src/code/format-directive.fas ;; Loading file obj/from-host/src/code/c-call.fas ... ;; Loaded file obj/from-host/src/code/c-call.fas ;; Loading file obj/from-host/src/compiler/disassem.fas ... ;; Loaded file obj/from-host/src/compiler/disassem.fas ;; Loading file obj/from-host/src/compiler/assem.fas ... ;; Loaded file obj/from-host/src/compiler/assem.fas ;; Loading file obj/from-host/src/compiler/codegen.fas ... ;; Loaded file obj/from-host/src/compiler/codegen.fas ;; Loading file obj/from-host/src/compiler/dump.fas ... ;; Loaded file obj/from-host/src/compiler/dump.fas ;; Loading file obj/from-host/src/compiler/ir1report.fas ... ;; Loaded file obj/from-host/src/compiler/ir1report.fas ;; Loading file obj/from-host/src/compiler/main.fas ... ;; Loaded file obj/from-host/src/compiler/main.fas ;; Loading file obj/from-host/src/compiler/xref.fas ... ;; Loaded file obj/from-host/src/compiler/xref.fas ;; Loading file obj/from-host/src/compiler/ir1tran.fas ... ;; Loaded file obj/from-host/src/compiler/ir1tran.fas ;; Loading file obj/from-host/src/compiler/ir1tran-lambda.fas ... ;; Loaded file obj/from-host/src/compiler/ir1tran-lambda.fas ;; Loading file obj/from-host/src/compiler/ir1-translators.fas ... ;; Loaded file obj/from-host/src/compiler/ir1-translators.fas ;; Loading file obj/from-host/src/compiler/ir1util.fas ... ;; Loaded file obj/from-host/src/compiler/ir1util.fas ;; Loading file obj/from-host/src/compiler/callable-args.fas ... ;; Loaded file obj/from-host/src/compiler/callable-args.fas ;; Loading file obj/from-host/src/compiler/locall.fas ... ;; Loaded file obj/from-host/src/compiler/locall.fas ;; Loading file obj/from-host/src/compiler/ir1opt.fas ... ;; Loaded file obj/from-host/src/compiler/ir1opt.fas ;; Loading file obj/from-host/src/compiler/loop.fas ... ;; Loaded file obj/from-host/src/compiler/loop.fas ;; Loading file obj/from-host/src/compiler/constraint.fas ... ;; Loaded file obj/from-host/src/compiler/constraint.fas ;; Loading file obj/from-host/src/compiler/equality-constraints.fas ... ;; Loaded file obj/from-host/src/compiler/equality-constraints.fas ;; Loading file obj/from-host/src/compiler/constraint-back.fas ... ;; Loaded file obj/from-host/src/compiler/constraint-back.fas ;; Loading file obj/from-host/src/compiler/saptran.fas ... ;; Loaded file obj/from-host/src/compiler/saptran.fas ;; Loading file obj/from-host/src/compiler/modarith.fas ... ;; Loaded file obj/from-host/src/compiler/modarith.fas ;; Loading file obj/from-host/src/compiler/sxhash.fas ... ;; Loaded file obj/from-host/src/compiler/sxhash.fas ;; Loading file obj/from-host/src/code/quantifiers.fas ... ;; Loaded file obj/from-host/src/code/quantifiers.fas ;; Loading file obj/from-host/src/compiler/bitops-derive-type.fas ... ;; Loaded file obj/from-host/src/compiler/bitops-derive-type.fas ;; Loading file obj/from-host/src/compiler/dfo.fas ... ;; Loaded file obj/from-host/src/compiler/dfo.fas ;; Loading file obj/from-host/src/compiler/checkgen.fas ... ;; Loaded file obj/from-host/src/compiler/checkgen.fas ;; Loading file obj/from-host/src/compiler/tn.fas ... ;; Loaded file obj/from-host/src/compiler/tn.fas ;; Loading file obj/from-host/src/compiler/life.fas ... ;; Loaded file obj/from-host/src/compiler/life.fas ;; Loading file obj/from-host/src/compiler/debug-dump.fas ... ;; Loaded file obj/from-host/src/compiler/debug-dump.fas ;; Loading file obj/from-host/src/compiler/generic/static-syms.fas ... ;; Loaded file obj/from-host/src/compiler/generic/static-syms.fas ;; Loading file obj/from-host/src/compiler/generic/utils.fas ... ;; Loaded file obj/from-host/src/compiler/generic/utils.fas ;; Loading file obj/from-host/src/assembly/assemfile.fas ... ;; Loaded file obj/from-host/src/assembly/assemfile.fas ;; Loading file obj/from-host/src/compiler/riscv/insts.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/insts.fas ;; Loading file obj/from-host/src/compiler/riscv/macros.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/macros.fas ;; Loading file obj/from-host/src/assembly/riscv/support.fas ... ;; Loaded file obj/from-host/src/assembly/riscv/support.fas ;; Loading file obj/from-host/src/compiler/riscv/move.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/move.fas ;; Loading file obj/from-host/src/compiler/riscv/float.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/float.fas ;; Loading file obj/from-host/src/compiler/riscv/sap.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/sap.fas ;; Loading file obj/from-host/src/compiler/riscv/system.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/system.fas ;; Loading file obj/from-host/src/compiler/riscv/char.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/char.fas ;; Loading file obj/from-host/src/compiler/riscv/memory.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/memory.fas ;; Loading file obj/from-host/src/compiler/riscv/arith.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/arith.fas ;; Loading file obj/from-host/src/compiler/riscv/pred.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/pred.fas ;; Loading file obj/from-host/src/compiler/float-tran.fas ... ;; Loaded file obj/from-host/src/compiler/float-tran.fas ;; Loading file obj/from-host/src/compiler/array-tran.fas ... ;; Loaded file obj/from-host/src/compiler/array-tran.fas ;; Loading file obj/from-host/src/compiler/generic/vm-tran.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-tran.fas ;; Loading file obj/from-host/src/compiler/type-vop-macros.fas ... ;; Loaded file obj/from-host/src/compiler/type-vop-macros.fas ;; Loading file obj/from-host/src/compiler/riscv/type-vops.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/type-vops.fas ;; Loading file obj/from-host/src/compiler/generic/type-vops.fas ... ;; Loaded file obj/from-host/src/compiler/generic/type-vops.fas ;; Loading file obj/from-host/src/compiler/ir1final.fas ... ;; Loaded file obj/from-host/src/compiler/ir1final.fas ;; Loading file obj/from-host/src/compiler/riscv/alloc.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/alloc.fas ;; Loading file obj/from-host/src/compiler/riscv/values.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/values.fas ;; Loading file obj/from-host/src/compiler/srctran.fas ... ;; Loaded file obj/from-host/src/compiler/srctran.fas ;; Loading file obj/from-host/src/compiler/seqtran.fas ... ;; Loaded file obj/from-host/src/compiler/seqtran.fas ;; Loading file obj/from-host/src/compiler/typetran.fas ... ;; Loaded file obj/from-host/src/compiler/typetran.fas ;; Loading file obj/from-host/src/compiler/generic/vm-typetran.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-typetran.fas ;; Loading file obj/from-host/src/code/cross-modular.fas ... ;; Loaded file obj/from-host/src/code/cross-modular.fas ;; Loading file obj/from-host/src/compiler/riscv/subprim.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/subprim.fas ;; Loading file obj/from-host/src/compiler/riscv/debug.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/debug.fas ;; Loading file obj/from-host/src/compiler/riscv/c-call.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/c-call.fas ;; Loading file obj/from-host/src/compiler/riscv/cell.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/cell.fas ;; Loading file obj/from-host/src/compiler/riscv/call.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/call.fas ;; Loading file obj/from-host/src/compiler/riscv/nlx.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/nlx.fas ;; Loading file obj/from-host/src/compiler/generic/late-nlx.fas ... ;; Loaded file obj/from-host/src/compiler/generic/late-nlx.fas ;; Loading file obj/from-host/src/compiler/riscv/show.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/show.fas ;; Loading file obj/from-host/src/compiler/riscv/array.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/array.fas ;; Loading file obj/from-host/src/compiler/generic/type-error.fas ... ;; Loaded file obj/from-host/src/compiler/generic/type-error.fas ;; Loading file obj/from-host/src/compiler/envanal.fas ... ;; Loaded file obj/from-host/src/compiler/envanal.fas ;; Loading file obj/from-host/src/assembly/riscv/assem-rtns.fas ... ;; Loaded file obj/from-host/src/assembly/riscv/assem-rtns.fas ;; Loading file obj/from-host/src/assembly/riscv/array.fas ... ;; Loaded file obj/from-host/src/assembly/riscv/array.fas ;; Loading file obj/from-host/src/assembly/riscv/arith.fas ... ;; Loaded file obj/from-host/src/assembly/riscv/arith.fas ;; Loading file obj/from-host/src/assembly/riscv/alloc.fas ... ;; Loaded file obj/from-host/src/assembly/riscv/alloc.fas ;; Loading file obj/from-host/src/compiler/pseudo-vops.fas ... ;; Loaded file obj/from-host/src/compiler/pseudo-vops.fas ;; Loading file obj/from-host/src/compiler/aliencomp.fas ... ;; Loaded file obj/from-host/src/compiler/aliencomp.fas ;; Loading file obj/from-host/src/compiler/coverage.fas ... ;; Loaded file obj/from-host/src/compiler/coverage.fas ;; Loading file obj/from-host/src/compiler/ltv.fas ... ;; Loaded file obj/from-host/src/compiler/ltv.fas ;; Loading file obj/from-host/src/compiler/gtn.fas ... ;; Loaded file obj/from-host/src/compiler/gtn.fas ;; Loading file obj/from-host/src/compiler/ltn.fas ... ;; Loaded file obj/from-host/src/compiler/ltn.fas ;; Loading file obj/from-host/src/compiler/stack.fas ... ;; Loaded file obj/from-host/src/compiler/stack.fas ;; Loading file obj/from-host/src/compiler/control.fas ... ;; Loaded file obj/from-host/src/compiler/control.fas ;; Loading file obj/from-host/src/compiler/entry.fas ... ;; Loaded file obj/from-host/src/compiler/entry.fas ;; Loading file obj/from-host/src/compiler/ir2tran.fas ... ;; Loaded file obj/from-host/src/compiler/ir2tran.fas ;; Loading file obj/from-host/src/compiler/generic/vm-ir2tran.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-ir2tran.fas ;; Loading file obj/from-host/src/compiler/copyprop.fas ... ;; Loaded file obj/from-host/src/compiler/copyprop.fas ;; Loading file obj/from-host/src/compiler/represent.fas ... ;; Loaded file obj/from-host/src/compiler/represent.fas ;; Loading file obj/from-host/src/compiler/ir2opt.fas ... ;; Loaded file obj/from-host/src/compiler/ir2opt.fas ;; Loading file obj/from-host/src/compiler/pack.fas ... ;; Loaded file obj/from-host/src/compiler/pack.fas ;; Loading file obj/from-host/src/compiler/pack-iterative.fas ... ;; Loaded file obj/from-host/src/compiler/pack-iterative.fas ;; Loading file obj/from-host/src/compiler/debug.fas ... ;; Loaded file obj/from-host/src/compiler/debug.fas ;; Loading file obj/from-host/src/code/error.fas ... ;; Loaded file obj/from-host/src/code/error.fas ;; Loading file obj/from-host/src/code/parse-defmacro-errors.fas ... ;; Loaded file obj/from-host/src/code/parse-defmacro-errors.fas ;; Loading file obj/from-host/src/code/macroexpand.fas ... ;; Loaded file obj/from-host/src/code/macroexpand.fas ;; Loading file obj/from-host/src/code/late-extensions.fas ... ;; Loaded file obj/from-host/src/code/late-extensions.fas ;; Loading file obj/from-host/src/code/brothertree.fas ... ;; Loaded file obj/from-host/src/code/brothertree.fas ;; Loading file obj/from-host/src/code/early-step.fas ... ;; Loaded file obj/from-host/src/code/early-step.fas ;; Loading file obj/from-host/src/code/avltree.fas ... ;; Loaded file obj/from-host/src/code/avltree.fas ;; Loading file obj/from-host/src/pcl/walk.fas ... ;; Loaded file obj/from-host/src/pcl/walk.fas ;; Loading file obj/from-host/src/code/setf.fas ... ;; Loaded file obj/from-host/src/code/setf.fas ;; Loading file obj/from-host/src/code/macros.fas ... ;; Loaded file obj/from-host/src/code/macros.fas ;; Loading file obj/from-host/src/code/loop.fas ... ;; Loaded file obj/from-host/src/code/loop.fas ;; Loading file obj/from-host/src/pcl/defclass.fas ... ;; Loaded file obj/from-host/src/pcl/defclass.fas ;; Loading file obj/from-host/src/code/early-defmethod.fas ... ;; Loaded file obj/from-host/src/code/early-defmethod.fas ;; Loading file obj/from-host/src/code/format.fas ... ;; Loaded file obj/from-host/src/code/format.fas ;; Loading file tests/type.before-xc.lisp ... ;; Loaded file tests/type.before-xc.lisp ;; Loading file tests/info.before-xc.lisp ... ;; Loaded file tests/info.before-xc.lisp ;; Loading file tests/vm.before-xc.lisp ... ;; Loaded file tests/vm.before-xc.lisp ;; Loading file src/cold/compile-cold-sbcl.lisp ... ;; Loading file src/cold/muffler.lisp ... ;; Loaded file src/cold/muffler.lisp ctype cache metrics: Count LF Seek Hit maxPSL Mask FUN : 1291 63.0% 8 7FF List : 850 41.5% 5 7FF Set : 245 47.9% 6 1FF UNION : 223 43.6% 5 1FF VALUES : 182 71.1% 8 FF ARRAY : 153 59.8% 5 FF NUMERIC : 153 59.8% 4 FF Key-Info : 92 71.9% 4 7F CONSTANT : 52 40.6% 6 7F Key-Info-Set : 42 65.6% 4 3F INTERSECTION : 32 50.0% 2 3F UNKNOWN : 27 42.2% 2 3F MEMBER : 20 31.2% 2 3F NEGATION : 15 23.4% 4 3F HAIRY : 9 14.1% 1 3F EQL : 9 NIL% CHARACTER-SET : 4 6.2% 1 3F CONS : 2 3.1% 1 3F ALIEN-TYPE : 1 1.6% 1 3F MEMBER/EQ : 0 0.0% 0 3F FUN-DESIGNATOR : 0 0.0% 0 3F Total : 3402 Alien: POINTER : 1 1.6% 1 3F INTEGER : 0 0.0% 0 3F BOOLEAN : 0 0.0% 0 3F C-STRING : 0 0.0% 0 3F ARRAY : 0 0.0% 0 3F FUN : 0 0.0% 0 3F VALUES : 0 0.0% 0 3F ENUM : 0 0.0% 0 3F UNION : 0 0.0% 0 3F STRUCT : 0 0.0% 0 3F Total : 1 [ 1/299] src/code/show (0.688 sec) [ 2/299] src/compiler/early-constantp (0.640 sec) [ 3/299] src/compiler/vop-existsp (0.981 sec) [ 4/299] src/code/defsetfs (8.886 sec) [ 5/299] src/code/cl-specials (0.796 sec) [ 6/299] src/code/primordial-extensions (7.542 sec) [ 7/299] src/code/cold-init-helper-macros (1.053 sec) [ 8/299] src/code/backq (7.144 sec) [ 9/299] src/code/globals (0.550 sec) [ 10/299] src/code/cmacros (1.710 sec) [ 11/299] src/code/uncross (0.073 sec) [ 12/299] src/code/defbangtype (0.194 sec) [ 13/299] src/code/early-constants (0.350 sec) [ 14/299] src/code/function-names (1.273 sec) [ 15/299] src/compiler/early-globaldb (6.022 sec) [ 16/299] src/compiler/generic/parms (1.855 sec) [ 17/299] src/compiler/riscv/parms (1.036 sec) [ 18/299] src/compiler/generic/early-vm (0.658 sec) [ 19/299] src/compiler/generic/early-objdef (5.633 sec) [ 20/299] src/code/barrier (0.379 sec) [ 21/299] src/code/parse-body (0.371 sec) [ 22/299] src/compiler/policy (11.111 sec) [ 23/299] src/code/early-extensions (26.865 sec) [ 24/299] src/code/ansi-stream (24.030 sec) [ 25/299] src/code/restart (5.936 sec) [ 26/299] src/code/early-pprint (11.241 sec) [ 27/299] src/code/early-impl (0.295 sec) [ 28/299] src/code/early-package (0.558 sec) [ 29/299] src/code/early-raw-slots (4.505 sec) [ 30/299] src/code/maphash (3.363 sec) [ 31/299] src/code/sysmacs (3.760 sec) [ 32/299] src/code/hashset (15.044 sec) [ 33/299] src/code/string-hash (4.155 sec) [ 34/299] src/code/xset (7.778 sec) [ 35/299] src/code/type-class (57.476 sec) [ 36/299] src/code/cas (2.413 sec) [ 37/299] src/code/thread-structs (8.585 sec) [ 38/299] src/compiler/early-c (13.633 sec) [ 39/299] src/pcl/slot-name (0.470 sec) [ 40/299] src/code/early-classoid (35.388 sec) [ 41/299] src/code/initial-method (3.088 sec) [ 42/299] src/compiler/generic/pinned-objects (0.668 sec) [ 43/299] src/compiler/generic/layout-ids (0.904 sec) [ 44/299] src/code/signal (0.952 sec) [ 45/299] src/code/cold-error (4.658 sec) [ 46/299] src/code/early-full-eval (3.877 sec) [ 47/299] src/code/debug-var-io (8.759 sec) [ 48/299] src/code/number-dispatch (3.064 sec) [ 49/299] src/code/float (15.395 sec) [ 50/299] src/code/early-time (0.059 sec) [ 51/299] src/code/misc (0.079 sec) [ 52/299] src/code/target-error (90.575 sec) [ 53/299] src/code/target-extensions (5.255 sec) [ 54/299] src/compiler/parse-lambda-list (27.482 sec) [ 55/299] src/compiler/macros (21.005 sec) [ 56/299] src/compiler/fun-info (10.278 sec) [ 57/299] src/compiler/generic/vm-macs (6.896 sec) [ 58/299] src/compiler/policies (23.034 sec) [ 59/299] src/code/target-lfhash (13.497 sec) [ 60/299] src/compiler/info-vector (29.844 sec) [ 61/299] src/compiler/globaldb (11.062 sec) [ 62/299] src/compiler/generic/objdef (6.237 sec) [ 63/299] src/code/lockfree-list (7.134 sec) [ 64/299] src/compiler/generic/vm-array (6.094 sec) [ 65/299] src/code/primordial-type (0.908 sec) [ 66/299] src/compiler/sset (8.318 sec) [ 67/299] src/compiler/node (257.612 sec) [ 68/299] src/compiler/early-assem (2.051 sec) [ 69/299] src/compiler/vop (102.725 sec) [ 70/299] src/compiler/backend (0.832 sec) [ 71/299] src/code/sc-offset (0.807 sec) [ 72/299] src/compiler/vmdef (7.572 sec) [ 73/299] src/code/defmacro (1.512 sec) [ 74/299] src/compiler/meta-vmdef (65.470 sec) [ 75/299] src/compiler/riscv/vm (18.485 sec) [ 76/299] src/code/alieneval (79.779 sec) [ 77/299] output/stuff-groveled-from-headers (1.838 sec) [ 78/299] src/code/target-alieneval (13.657 sec) [ 79/299] src/code/target-c-call (0.954 sec) [ 80/299] src/code/misc-aliens (3.892 sec) [ 81/299] src/code/weak (1.202 sec) [ 82/299] src/code/array ; file: src/code/array.lisp ; in: ; DEFUN ; EXTEND-VECTOR ; (THE SB-INT:INDEX (+ SB-VM::OLD-LENGTH (MAX 1 SB-VM::MIN-EXTENSION))) ; --> LET PROGN UNLESS IF TYPEP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of defaulted (83.191 sec) [ 83/299] src/code/list (49.237 sec) [ 84/299] src/code/seq (295.675 sec) [ 85/299] src/code/coerce (7.000 sec) [ 86/299] src/code/thread (13.960 sec) [ 87/299] src/code/target-random (26.814 sec) [ 88/299] src/code/class (30.705 sec) [ 89/299] src/pcl/pre-warm (3.941 sec) [ 90/299] src/code/pathname (6.179 sec) [ 91/299] src/code/target-sxhash ; file: src/code/target-sxhash.lisp ; in: ; DEFUN ; PSXHASH ; (SB-IMPL::RAW-CASES) ; --> COND IF IF IF LET SB-INT:MIXF LET* SB-XC:SXHASH IF ; ==> ; SB-IMPL::X ; note: doing float to pointer coercion (cost 13) ; --> COND IF IF IF IF IF LET LET SB-INT:MIXF LET* SB-XC:SXHASH IF ; ==> ; SB-IMPL::X ; note: doing float to pointer coercion (cost 13) ; note: doing float to pointer coercion (cost 13) ; (SB-IMPL::HASH-FLOAT SB-XC:DOUBLE-FLOAT SB-IMPL::KEY) ; --> COND IF IF THE ; ==> ; (SB-BIGNUM:SXHASH-BIGNUM-DOUBLE-FLOAT SB-IMPL::KEY) ; note: doing float to pointer coercion (cost 13) from KEY (19.577 sec) [ 92/299] src/code/debug-info (20.276 sec) [ 93/299] src/code/source-location (3.204 sec) [ 94/299] src/compiler/proclaim (9.636 sec) [ 95/299] src/compiler/constantp (6.526 sec) [ 96/299] src/code/deftype (1.280 sec) [ 97/299] src/code/type (107.922 sec) [ 98/299] src/compiler/generic/vm-type (7.139 sec) [ 99/299] src/code/pred (23.912 sec) [100/299] src/compiler/generic/primtype (12.675 sec) [101/299] src/code/deftypes-for-target (4.820 sec) [102/299] src/code/type-init (0.911 sec) [103/299] src/code/defstruct (46.145 sec) [104/299] src/code/alien-type (1.151 sec) [105/299] src/compiler/compiler-error (1.702 sec) [106/299] src/compiler/fixup-type (0.325 sec) [107/299] src/code/package (7.549 sec) [108/299] src/code/typep (9.566 sec) [109/299] src/code/random (1.072 sec) [110/299] src/code/hash-table (8.826 sec) [111/299] src/code/readtable (2.743 sec) [112/299] src/code/host-pprint (1.247 sec) [113/299] src/compiler/knownfun (16.217 sec) [114/299] src/compiler/ctype (26.355 sec) [115/299] src/compiler/fndb (24.059 sec) [116/299] src/compiler/generic/vm-fndb (5.310 sec) [117/299] src/compiler/generic/late-objdef (4.686 sec) [118/299] src/compiler/generic/interr (2.823 sec) [119/299] src/compiler/bit-util (1.348 sec) [120/299] src/code/foreign (5.445 sec) [121/299] src/code/unix (35.753 sec) [122/299] src/code/symbol (10.271 sec) [123/299] src/code/bignum ; file: src/code/bignum.lisp ; in: ; DEFUN ; BIGNUM-LOWER-BITS-ZERO-P ; (SB-XC:ZEROP (SB-BIGNUM:%BIGNUM-REF BIGNUM SB-INT:INDEX)) ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ ; (SB-XC:ZEROP ; (LOGAND (1- (ASH 1 SB-BIGNUM::N-BITS-PARTIAL-DIGIT)) ; (SB-BIGNUM:%BIGNUM-REF BIGNUM SB-BIGNUM::N-FULL-DIGITS))) ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ ; in: ; DEFUN ; BIGNUM-NEGATE-LAST-TWO ; (SETF (VALUES SB-BIGNUM::LAST2 SB-BIGNUM::CARRY) ; (SB-BIGNUM:%ADD-WITH-CARRY ; (SB-BIGNUM::%LOGNOT (SB-BIGNUM:%BIGNUM-REF BIGNUM SB-BIGNUM::I)) 0 ; SB-BIGNUM::CARRY)) ; --> MULTIPLE-VALUE-CALL FUNCTION VALUES ; ==> ; (SETQ SB-BIGNUM::LAST2 #:NEW) ; note: doing unsigned word to integer coercion (cost 20) to LAST2 ; in: ; DEFUN ; LAST-BIGNUM-PART=>FIXNUM ; (ASH (SB-BIGNUM:%BIGNUM-REF BIGNUM (1+ SB-BIGNUM::WORD-INDEX)) ; (SB-EXT:TRULY-THE (INTEGER 0 (64)) ; (- SB-BIGNUM::DIGIT-SIZE SB-BIGNUM:BIT-INDEX))) ; note: doing unsigned word to integer coercion (cost 20) ; in: ; DEF ; DOUBLE-FLOAT ; (SB-BIGNUM::DEF SB-XC:DOUBLE-FLOAT) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET SB-KERNEL:%MAKE-DOUBLE-FLOAT IF ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; --> SB-BIGNUM::BIGNUM-NEGATE-LAST-TWO BLOCK SB-C::IF-VOP-EXISTSP LET* ; --> LOOP BLOCK TAGBODY PROGN SETF MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION VALUES ; ==> ; (SETQ SB-BIGNUM::LAST2 #:NEW) ; note: doing unsigned word to integer coercion (cost 20) to LAST2 ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA SB-BIGNUM:BIGNUM-TO-DOUBLE-FLOAT (BIGNUM) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK SB-BIGNUM:BIGNUM-TO-DOUBLE-FLOAT ; (LET (#) (DECLARE #) (SB-KERNEL:%MAKE-DOUBLE-FLOAT #)))) ; note: doing float to pointer coercion (cost 13) to "" ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET SB-KERNEL:%MAKE-DOUBLE-FLOAT IF ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET* WHEN IF AND ; --> IF OR LET IF NOT ; ==> ; 1 ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET SB-KERNEL:%MAKE-DOUBLE-FLOAT IF LET* WHEN IF ; --> AND IF OR LET IF NOT ; ==> ; 1 ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ ; in: ; DEF ; SINGLE-FLOAT ; (SB-BIGNUM::DEF SB-XC:SINGLE-FLOAT) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET SB-KERNEL:MAKE-SINGLE-FLOAT IF ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; --> SB-BIGNUM::BIGNUM-NEGATE-LAST-TWO BLOCK SB-C::IF-VOP-EXISTSP LET* ; --> LOOP BLOCK TAGBODY PROGN SETF MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION VALUES ; ==> ; (SETQ SB-BIGNUM::LAST2 #:NEW) ; note: doing unsigned word to integer coercion (cost 20) to LAST2 ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET SB-KERNEL:MAKE-SINGLE-FLOAT IF ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET* WHEN IF AND ; --> IF OR LET IF NOT ; ==> ; 1 ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET SB-KERNEL:MAKE-SINGLE-FLOAT IF LET* WHEN IF ; --> AND IF OR LET IF NOT ; ==> ; 1 ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ ; in: ; DEFUN ; MAKE-GCD-BIGNUM-ODD ; (SB-XC:ZEROP SB-BIGNUM::DIGIT) ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ ; in: ; DEFUN ; BIGNUM-BINARY-GCD ; (SB-XC:ZEROP (SB-BIGNUM:%BIGNUM-REF SB-BIGNUM::R 0)) ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ ; in: ; DEFUN ; BIGNUM-MOD-GCD ; (SB-XC:ZEROP (SB-BIGNUM:%BIGNUM-REF SB-BIGNUM::B 0)) ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ ; in: ; DEFUN ; BIGNUM-GCD ; (SB-XC:ZEROP (SB-BIGNUM:%BIGNUM-REF SB-BIGNUM::V 0)) ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ ; in: ; DEFUN ; BIGNUM-FACTORS-OF-TWO ; (SB-XC:ZEROP SB-BIGNUM::OR-DIGITS) ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ ; in: ; DEFUN ; DMOD ; (SB-XC:ZEROP (SB-BIGNUM:%BIGNUM-REF SB-BIGNUM::U 0)) ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ ; (LOGTEST (SB-BIGNUM:%BIGNUM-REF SB-BIGNUM::U 0) SB-BIGNUM::N) ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ ; in: ; DEFUN ; %NORMALIZE-BIGNUM-BUFFER ; (SB-XC:ZEROP ; (LOGXOR SB-BIGNUM::SIGN-DIGIT ; (SB-BIGNUM:%ASHR SB-BIGNUM::NEXT-DIGIT (1- SB-BIGNUM::DIGIT-SIZE)))) ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ ; in: ; DEFUN ; REDUCED-RATIO-MOD ; (INTEGER-LENGTH SB-BIGNUM::N1) ; note: doing unsigned word to integer coercion (cost 20) from N1 ; (INTEGER-LENGTH SB-BIGNUM::N2) ; note: doing unsigned word to integer coercion (cost 20) from N2 (72.577 sec) [124/299] src/code/numbers (123.005 sec) [125/299] src/code/float-trap (4.271 sec) [126/299] src/code/target-float (4.795 sec) [127/299] src/code/irrat (62.574 sec) [128/299] src/code/alloc (2.054 sec) [129/299] src/code/fd-stream (113.149 sec) [130/299] src/code/target-char (16.671 sec) [131/299] src/code/stream (125.472 sec) [132/299] src/code/load ; file: src/code/load.lisp ; in: ; DEFUN ; FOP-LIST ; (DO* ; ((SB-FASL::I (+ SB-FASL::PTR SB-FASL::N) (1- SB-FASL::I)) ; (SB-FASL::RES NIL (SB-FASL::COLD-CONS # SB-FASL::RES))) ; ((= SB-FASL::I SB-FASL::PTR) SB-FASL::RES) ; (DECLARE (TYPE SB-INT:INDEX SB-FASL::I))) ; --> LET* MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of defaulted ; in: ; DEFUN ; FOP-LIST* ; (DO* ; ((SB-FASL::I (+ SB-FASL::PTR SB-FASL::N) (1- SB-FASL::I)) ; (SB-FASL::RES (SB-FASL::FOP-STACK-REF #) ; (SB-FASL::COLD-CONS # SB-FASL::RES))) ; ((= SB-FASL::I SB-FASL::PTR) SB-FASL::RES) ; (DECLARE (TYPE SB-INT:INDEX SB-FASL::I))) ; --> LET* MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of defaulted (40.488 sec) [133/299] src/code/deadline (8.185 sec) [134/299] src/code/common-os (1.933 sec) [135/299] src/code/format-directive (6.185 sec) [136/299] src/code/c-call (1.741 sec) [137/299] src/code/foreign-load (3.401 sec) [138/299] src/code/unix-foreign-load (2.114 sec) [139/299] src/compiler/disassem (15.358 sec) [140/299] src/compiler/assem (41.370 sec) [141/299] src/compiler/codegen (6.429 sec) [142/299] src/compiler/dump (49.357 sec) [143/299] src/compiler/generic/core (6.730 sec) [144/299] src/compiler/ir1report (15.454 sec) [145/299] src/compiler/main (34.942 sec) [146/299] src/compiler/xref (6.190 sec) [147/299] src/compiler/target-main (11.692 sec) [148/299] src/compiler/ir1tran (46.631 sec) [149/299] src/compiler/ir1tran-lambda (34.712 sec) [150/299] src/compiler/ir1-translators (33.928 sec) [151/299] src/compiler/ir1util (80.151 sec) [152/299] src/compiler/callable-args (10.952 sec) [153/299] src/compiler/locall (25.463 sec) [154/299] src/compiler/ir1opt ; file: src/compiler/ir1opt.lisp ; in: ; DEFTRANSFORM ; |+| ; (SB-C:DEFTRANSFORM + ((SB-C::X SB-C::Y) * * :RESULT SB-C::RESULT) ; "check for iteration variable reoptimization" ; (LET ((SB-C::DEST #) (SB-C::USE #)) ; (WHEN (AND # # #) (SB-C::REOPTIMIZE-LVAR #))) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; VALUES-LIST ; (SB-C:DEFTRANSFORM VALUES-LIST ((LIST) * * :NODE SB-C::NODE) ; (COND ((AND # #) (SB-INT:QUASIQUOTE #)) ; ((AND # # #) (LET # # #) (SB-INT:QUASIQUOTE #)) ; (T (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM VALUES-LIST ((LIST) (LIST)) ; (SB-C::SPLICE-FUN-ARGS LIST 'SB-C:%LISTIFY-REST-ARGS 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::MORE COUNT) (SB-C:%MORE-ARG-VALUES SB-C::MORE 0 COUNT)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; VALUES ; (SB-C:DEFTRANSFORM VALUES ((&REST SB-C::VALS) * * :NODE SB-C::NODE) ; (UNLESS (SB-C::LVAR-SINGLE-VALUE-P (SB-C::NODE-LVAR SB-C::NODE)) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (SETF (SB-C::NODE-DERIVED-TYPE SB-C::NODE) ; (SB-KERNEL:MAKE-SHORT-VALUES-TYPE (LIST #))) ; (SB-C::PRINCIPAL-LVAR-SINGLE-VALUIFY (SB-C::NODE-LVAR SB-C::NODE)) ; (IF SB-C::VALS (LET (#) (SB-INT:QUASIQUOTE #)) NIL)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ** - Continuable Error FAILURE-P was set when creating "obj/from-xc/src/compiler/ir1opt.lisp-obj". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-xc/src/compiler/ir1opt.lisp-obj" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/ir1opt.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (COND # #) RETRY :R4 retry (COND # #) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/src/cold/compile-cold-sbcl.lisp SKIP :R6 skip (LET # # ...) RETRY :R7 retry (LET # # ...) STOP :R8 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-2.lisp ABORT-BUILD :R9 Abort building SBCL. ABORT :R10 Abort main loop (61.266 sec) [155/299] src/compiler/loop (3.814 sec) [156/299] src/compiler/constraint ; file: src/compiler/constraint.lisp ; in: ; DEFSTRUCT ; CONSET ; (DEFSTRUCT ; (SB-C::CONSET (:CONSTRUCTOR SB-C::MAKE-CONSET NIL) ; (:COPIER SB-C::%COPY-CONSET)) ; (VECTOR ; (MAKE-ARRAY (SB-INT:POWER-OF-TWO-CEILING #) :ELEMENT-TYPE 'BIT ; :INITIAL-ELEMENT 0) ; :TYPE SIMPLE-BIT-VECTOR) ; (MIN 0 :TYPE FIXNUM) (MAX 0 :TYPE FIXNUM)) ; --> SB-KERNEL::%TARGET-DEFSTRUCT SB-KERNEL::%TARGET-DEFSTRUCT ; --> SB-INT:NAMED-LAMBDA FUNCTION AND IF ; --> (LAMBDA (SB-KERNEL::X SB-KERNEL::Y) (OR (EQ SB-KERNEL::X SB-KERNEL::Y) (SB-INT:BIT-VECTOR-= SB-KERNEL::X SB-KERNEL::Y))) ; --> SB-C::%FUNCALL OR LET IF SB-INT:BIT-VECTOR-= ; ==> ; 1 ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ ; in: ; DEFUN ; CONSET= ; (EQUAL SB-C::VECTOR1 SB-C::VECTOR2) ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ (43.908 sec) [157/299] src/compiler/equality-constraints ; file: src/compiler/equality-constraints.lisp ; in: ; DEFTRANSFORM ; %CHECK-BOUND ; (SB-C:DEFTRANSFORM SB-KERNEL:%CHECK-BOUND ; ((ARRAY SB-C::DIMENSION SB-INT:INDEX) ((SIMPLE-ARRAY * #) T T) * :NODE ; SB-C::NODE) ; (IF (OR (EQ # 'ARRAY-IN-BOUNDS-P) (LET # #)) (SB-INT:QUASIQUOTE (PROGN # #)) ; (SB-C::GIVE-UP-IR1-TRANSFORM))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %IN-BOUNDS-CONSTRAINT ; (SB-C:DEFTRANSFORM SB-C::%IN-BOUNDS-CONSTRAINT ; ((VECTOR LENGTH) * * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) NIL) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ** - Continuable Error FAILURE-P was set when creating "obj/from-xc/src/compiler/equality-constraints.lisp-obj". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-xc/src/compiler/equality-constraints.lisp-obj" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/equality-constraints.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (COND # #) RETRY :R4 retry (COND # #) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/src/cold/compile-cold-sbcl.lisp SKIP :R6 skip (LET # # ...) RETRY :R7 retry (LET # # ...) STOP :R8 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-2.lisp ABORT-BUILD :R9 Abort building SBCL. ABORT :R10 Abort main loop (32.325 sec) [158/299] src/compiler/constraint-back (15.210 sec) [159/299] src/compiler/saptran ; file: src/compiler/saptran.lisp ; in: ; DEFTRANSFORM ; FOREIGN-SYMBOL-ADDRESS ; (SB-C:DEFTRANSFORM SB-SYS:FOREIGN-SYMBOL-ADDRESS ; ((SYMBOL &OPTIONAL SB-C::DATAP) ; ((SB-INT:CONSTANT-ARG SIMPLE-STRING) &OPTIONAL ; (SB-INT:CONSTANT-ARG BOOLEAN))) ; (IF (AND SB-C::DATAP (SB-C:LVAR-VALUE SB-C::DATAP)) ; (SB-C::GIVE-UP-IR1-TRANSFORM) (SB-INT:QUASIQUOTE (VALUES # T)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; FOREIGN-SYMBOL-SAP ; (SB-C:DEFTRANSFORM SB-SYS:FOREIGN-SYMBOL-SAP ; ((SYMBOL &OPTIONAL SB-C::DATAP) (SIMPLE-STRING &OPTIONAL BOOLEAN)) ; (IF (AND (SB-C:CONSTANT-LVAR-P SYMBOL) (AND SB-C::DATAP #)) ; (IF (SB-C:LVAR-VALUE SB-C::DATAP) (SB-INT:QUASIQUOTE #) ; (SB-INT:QUASIQUOTE #)) ; (SB-C::GIVE-UP-IR1-TRANSFORM))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFSAPREF ; SAP-REF-8 ; (SB-C::DEFSAPREF SB-SYS:SAP-REF-8 (UNSIGNED-BYTE 8)) ; ==> ; (SB-C:DEFTRANSFORM SB-SYS:SAP-REF-8 ((SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) (# SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%SET-SAP-REF-8 ; ((SB-C::VALUE SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::VALUE SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) ; (# SB-C::VALUE SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFSAPREF ; SIGNED-SAP-REF-8 ; (SB-C::DEFSAPREF SB-SYS:SIGNED-SAP-REF-8 (SIGNED-BYTE 8)) ; ==> ; (SB-C:DEFTRANSFORM SB-SYS:SIGNED-SAP-REF-8 ((SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) (# SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%SET-SIGNED-SAP-REF-8 ; ((SB-C::VALUE SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::VALUE SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) ; (# SB-C::VALUE SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFSAPREF ; SAP-REF-16 ; (SB-C::DEFSAPREF SB-SYS:SAP-REF-16 (UNSIGNED-BYTE 16)) ; ==> ; (SB-C:DEFTRANSFORM SB-SYS:SAP-REF-16 ((SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) (# SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%SET-SAP-REF-16 ; ((SB-C::VALUE SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::VALUE SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) ; (# SB-C::VALUE SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFSAPREF ; SIGNED-SAP-REF-16 ; (SB-C::DEFSAPREF SB-SYS:SIGNED-SAP-REF-16 (SIGNED-BYTE 16)) ; ==> ; (SB-C:DEFTRANSFORM SB-SYS:SIGNED-SAP-REF-16 ((SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) (# SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%SET-SIGNED-SAP-REF-16 ; ((SB-C::VALUE SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::VALUE SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) ; (# SB-C::VALUE SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFSAPREF ; SAP-REF-32 ; (SB-C::DEFSAPREF SB-SYS:SAP-REF-32 (UNSIGNED-BYTE 32)) ; ==> ; (SB-C:DEFTRANSFORM SB-SYS:SAP-REF-32 ((SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) (# SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%SET-SAP-REF-32 ; ((SB-C::VALUE SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::VALUE SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) ; (# SB-C::VALUE SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFSAPREF ; SIGNED-SAP-REF-32 ; (SB-C::DEFSAPREF SB-SYS:SIGNED-SAP-REF-32 (SIGNED-BYTE 32)) ; ==> ; (SB-C:DEFTRANSFORM SB-SYS:SIGNED-SAP-REF-32 ((SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) (# SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%SET-SIGNED-SAP-REF-32 ; ((SB-C::VALUE SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::VALUE SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) ; (# SB-C::VALUE SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFSAPREF ; SAP-REF-64 ; (SB-C::DEFSAPREF SB-SYS:SAP-REF-64 (UNSIGNED-BYTE 64)) ; ==> ; (SB-C:DEFTRANSFORM SB-SYS:SAP-REF-64 ((SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) (# SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%SET-SAP-REF-64 ; ((SB-C::VALUE SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::VALUE SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) ; (# SB-C::VALUE SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFSAPREF ; SIGNED-SAP-REF-64 ; (SB-C::DEFSAPREF SB-SYS:SIGNED-SAP-REF-64 (SIGNED-BYTE 64)) ; ==> ; (SB-C:DEFTRANSFORM SB-SYS:SIGNED-SAP-REF-64 ((SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) (# SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%SET-SIGNED-SAP-REF-64 ; ((SB-C::VALUE SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::VALUE SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) ; (# SB-C::VALUE SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFSAPREF ; SAP-REF-SAP ; (SB-C::DEFSAPREF SB-SYS:SAP-REF-SAP SB-SYS:SYSTEM-AREA-POINTER) ; ==> ; (SB-C:DEFTRANSFORM SB-SYS:SAP-REF-SAP ((SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) (# SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%SET-SAP-REF-SAP ; ((SB-C::VALUE SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::VALUE SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) ; (# SB-C::VALUE SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFSAPREF ; SAP-REF-LISPOBJ ; (SB-C::DEFSAPREF SB-SYS:SAP-REF-LISPOBJ T) ; ==> ; (SB-C:DEFTRANSFORM SB-SYS:SAP-REF-LISPOBJ ((SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) (# SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%SET-SAP-REF-LISPOBJ ; ((SB-C::VALUE SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::VALUE SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) ; (# SB-C::VALUE SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFSAPREF ; SAP-REF-SINGLE ; (SB-C::DEFSAPREF SB-SYS:SAP-REF-SINGLE SB-XC:SINGLE-FLOAT) ; ==> ; (SB-C:DEFTRANSFORM SB-SYS:SAP-REF-SINGLE ((SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) (# SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%SET-SAP-REF-SINGLE ; ((SB-C::VALUE SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::VALUE SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) ; (# SB-C::VALUE SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFSAPREF ; SAP-REF-DOUBLE ; (SB-C::DEFSAPREF SB-SYS:SAP-REF-DOUBLE SB-XC:DOUBLE-FLOAT) ; ==> ; (SB-C:DEFTRANSFORM SB-SYS:SAP-REF-DOUBLE ((SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) (# SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%SET-SAP-REF-DOUBLE ; ((SB-C::VALUE SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::VALUE SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) ; (# SB-C::VALUE SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFSAPREF ; SAP-REF-LONG ; (SB-C::DEFSAPREF SB-SYS:SAP-REF-LONG SB-XC:LONG-FLOAT) ; ==> ; (SB-C:DEFTRANSFORM SB-SYS:SAP-REF-LONG ((SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) (# SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%SET-SAP-REF-LONG ; ((SB-C::VALUE SB-C::SAP SB-C::OFFSET)) ; (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) ; (SB-INT:QUASIQUOTE ; (LAMBDA (SB-C::VALUE SB-C::SAP SB-C::OFFSET1 SB-C::OFFSET2) ; (# SB-C::VALUE SB-C::SAP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; SAP< ; (SB-C::DEF SB-SYS:SAP< <) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; SAP<= ; (SB-C::DEF SB-SYS:SAP<= <=) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; SAP= ; (SB-C::DEF SB-SYS:SAP= =) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; SAP>= ; (SB-C::DEF SB-SYS:SAP>= >=) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; SAP> ; (SB-C::DEF SB-SYS:SAP> >) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SAP+ ; (SB-C:DEFTRANSFORM SB-SYS:SAP+ ((SB-C::SAP SB-C::OFFSET)) ; (COND ((AND # #) 'SB-C::SAP) ; (T (SB-C::SPLICE-FUN-ARGS SB-C::SAP 'SB-SYS:SAP+ 2) '(LAMBDA # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ** - Continuable Error FAILURE-P was set when creating "obj/from-xc/src/compiler/saptran.lisp-obj". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-xc/src/compiler/saptran.lisp-obj" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/saptran.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (COND # #) RETRY :R4 retry (COND # #) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/src/cold/compile-cold-sbcl.lisp SKIP :R6 skip (LET # # ...) RETRY :R7 retry (LET # # ...) STOP :R8 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-2.lisp ABORT-BUILD :R9 Abort building SBCL. ABORT :R10 Abort main loop (9.554 sec) [160/299] src/compiler/modarith ; file: src/compiler/modarith.lisp ; in: ; DEFTRANSFORM ; ASH ; (SB-C:DEFTRANSFORM ASH ((SB-C::VALUE SB-C::AMOUNT)) ; (LET ((SB-C::VALUE-NODE #)) ; (UNLESS (SB-C::COMBINATION-P SB-C::VALUE-NODE) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (LET (#) (MULTIPLE-VALUE-BIND # # # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; SB-VM::ASH-LEFT-MOD64 ; (SB-C::DEF SB-VM::ASH-LEFT-MOD64 SB-VM::ASH-MOD64 :UNTAGGED 64 NIL) ; ==> ; (SB-C:DEFTRANSFORM SB-VM::ASH-LEFT-MOD64 ; ((INTEGER COUNT) (T (SB-INT:CONSTANT-ARG #))) 'INTEGER) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ** - Continuable Error FAILURE-P was set when creating "obj/from-xc/src/compiler/modarith.lisp-obj". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-xc/src/compiler/modarith.lisp-obj" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/modarith.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (COND # #) RETRY :R4 retry (COND # #) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/src/cold/compile-cold-sbcl.lisp SKIP :R6 skip (LET # # ...) RETRY :R7 retry (LET # # ...) STOP :R8 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-2.lisp ABORT-BUILD :R9 Abort building SBCL. ABORT :R10 Abort main loop (13.325 sec) [161/299] src/compiler/sxhash ; file: src/compiler/sxhash.lisp ; in: ; DEFTRANSFORM ; SXHASH ; (SB-C:DEFTRANSFORM SB-XC:SXHASH ((SB-C::X) (T)) ; (LET ((TYPE #)) (OR (DOLIST # #) (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:SXHASH ((SB-C::X) (SB-XC:NUMBER)) ; (SB-INT:QUASIQUOTE (SB-IMPL::NUMBER-SXHASH SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:SXHASH ((SB-C::X) (INTEGER)) ; (SB-INT:QUASIQUOTE (SB-IMPL::INTEGER-SXHASH SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:SXHASH ((SB-C::X) (SB-XC:SINGLE-FLOAT)) ; '(LET ((SB-C::BITS #)) (LOGXOR 66194023 (SB-XC:SXHASH #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:SXHASH ((SB-C::X) (FIXNUM)) ; '(LOGAND (LOGXOR (ASH SB-C::X 4) (ASH SB-C::X -1) 1193941380939624010) ; SB-XC:MOST-POSITIVE-FIXNUM)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:SXHASH ((SB-C::X) (SB-XC:DOUBLE-FLOAT)) ; '(LET ((SB-C::X #)) ; (LOGAND (LOGXOR # # 3417744637487763893) SB-XC:MOST-POSITIVE-FIXNUM))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:SXHASH ((SB-C::X) (SYMBOL)) ; '(LET ((SB-C::H #)) (SB-INT:MIX SB-C::H SB-C::H))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; HASH-AS-IF-SYMBOL-NAME ; (SB-C:DEFTRANSFORM SB-KERNEL:HASH-AS-IF-SYMBOL-NAME ; ((SB-C::OBJECT) (SYMBOL) * :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (SB-INT:SYMBOL-NAME-HASH SB-C::OBJECT))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ** - Continuable Error FAILURE-P was set when creating "obj/from-xc/src/compiler/sxhash.lisp-obj". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-xc/src/compiler/sxhash.lisp-obj" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/sxhash.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (COND # #) RETRY :R4 retry (COND # #) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/src/cold/compile-cold-sbcl.lisp SKIP :R6 skip (LET # # ...) RETRY :R7 retry (LET # # ...) STOP :R8 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-2.lisp ABORT-BUILD :R9 Abort building SBCL. ABORT :R10 Abort main loop (5.638 sec) [162/299] src/code/quantifiers (2.134 sec) [163/299] src/compiler/bitops-derive-type (5.868 sec) [164/299] src/compiler/dfo (10.155 sec) [165/299] src/compiler/checkgen (12.779 sec) [166/299] src/compiler/tn (17.810 sec) [167/299] src/compiler/life (17.992 sec) [168/299] src/compiler/debug-dump (34.003 sec) [169/299] src/compiler/generic/static-syms (0.232 sec) [170/299] src/compiler/generic/utils (11.724 sec) [171/299] src/compiler/target-dstate (12.154 sec) [172/299] src/compiler/riscv/insts (54.800 sec) [173/299] src/compiler/riscv/macros (19.090 sec) [174/299] src/assembly/riscv/support (0.255 sec) [175/299] src/compiler/riscv/move (24.253 sec) [176/299] src/compiler/riscv/float (67.555 sec) [177/299] src/compiler/riscv/sap (50.784 sec) [178/299] src/compiler/riscv/system (12.280 sec) [179/299] src/compiler/riscv/char (10.090 sec) [180/299] src/compiler/riscv/memory (2.114 sec) [181/299] src/compiler/riscv/arith ; file: src/compiler/riscv/arith.lisp ; in: ; DEFTRANSFORM ; ASH-LEFT-MOD64 ; (SB-C:DEFTRANSFORM SB-VM::ASH-LEFT-MOD64 ; ((INTEGER COUNT) ((UNSIGNED-BYTE 64) (UNSIGNED-BYTE 6))) ; (WHEN (SB-C:CONSTANT-LVAR-P COUNT) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; '(SB-SYS:%PRIMITIVE SB-VM::FAST-ASH-LEFT-MOD64/UNSIGNED=>UNSIGNED INTEGER ; COUNT)) ; caught WARNING: ; ; Reference to SB-C::RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ** - Continuable Error FAILURE-P was set when creating "obj/from-xc/src/compiler/riscv/arith.lisp-obj". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-xc/src/compiler/riscv/arith.lisp-obj" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/riscv/arith.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (COND # #) RETRY :R4 retry (COND # #) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/src/cold/compile-cold-sbcl.lisp SKIP :R6 skip (LET # # ...) RETRY :R7 retry (LET # # ...) STOP :R8 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-2.lisp ABORT-BUILD :R9 Abort building SBCL. ABORT :R10 Abort main loop (89.944 sec) [182/299] src/compiler/riscv/pred (1.647 sec) [183/299] src/compiler/float-tran ; file: src/compiler/float-tran.lisp ; in: ; DEFTRANSFORM ; FLOAT ; (SB-C:DEFTRANSFORM SB-XC:FLOAT ((SB-C::N SB-C::F) (T SB-XC:SINGLE-FLOAT) *) ; '(SB-KERNEL:%SINGLE-FLOAT SB-C::N)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:FLOAT ((SB-C::N SB-C::F) (T SB-XC:DOUBLE-FLOAT) *) ; '(SB-KERNEL:%DOUBLE-FLOAT SB-C::N)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:FLOAT ((SB-C::N) *) ; '(IF (SB-XC:FLOATP SB-C::N) SB-C::N (SB-KERNEL:%SINGLE-FLOAT SB-C::N))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %SINGLE-FLOAT ; (SB-C:DEFTRANSFORM SB-KERNEL:%SINGLE-FLOAT ; ((SB-C::N) (SB-XC:SINGLE-FLOAT) * :IMPORTANT NIL) 'SB-C::N) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %DOUBLE-FLOAT ; (SB-C:DEFTRANSFORM SB-KERNEL:%DOUBLE-FLOAT ; ((SB-C::N) (SB-XC:DOUBLE-FLOAT) * :IMPORTANT NIL) 'SB-C::N) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %SINGLE-FLOAT ; (SB-C:DEFTRANSFORM SB-KERNEL:%SINGLE-FLOAT ; ((SB-C::N) (RATIO) * :IMPORTANT NIL) '(SB-KERNEL::SINGLE-FLOAT-RATIO SB-C::N)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %DOUBLE-FLOAT ; (SB-C:DEFTRANSFORM SB-KERNEL:%DOUBLE-FLOAT ; ((SB-C::N) (RATIO) * :IMPORTANT NIL) '(SB-KERNEL::DOUBLE-FLOAT-RATIO SB-C::N)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; SINGLE-FLOAT ; (SB-C::DEF SB-XC:SINGLE-FLOAT SB-XC:DOUBLE-FLOAT) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C::DEF SB-XC:SINGLE-FLOAT SB-VM:SIGNED-WORD) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C::DEF SB-XC:SINGLE-FLOAT SB-EXT:WORD) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; DOUBLE-FLOAT ; (SB-C::DEF SB-XC:DOUBLE-FLOAT SB-XC:SINGLE-FLOAT) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C::DEF SB-XC:DOUBLE-FLOAT SB-VM:SIGNED-WORD) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C::DEF SB-XC:DOUBLE-FLOAT SB-EXT:WORD) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; SINGLE-FLOAT ; (SB-C::DEF SB-XC:SINGLE-FLOAT INTEGER FIXNUM) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; DOUBLE-FLOAT ; (SB-C::DEF SB-XC:DOUBLE-FLOAT INTEGER FIXNUM) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; ; MACROLET ; ; ((FROB (FUN TYPE) ; ; (QUASIQUOTE ; ; (DEFTRANSFORM RANDOM (# # *) "Use inline float operations." '(# NUM #))))) ; (SB-C::FROB SB-KERNEL:%RANDOM-SINGLE-FLOAT SB-XC:SINGLE-FLOAT) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C::FROB SB-KERNEL:%RANDOM-DOUBLE-FLOAT SB-XC:DOUBLE-FLOAT) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; RANDOM ; (SB-C:DEFTRANSFORM RANDOM ; ((SB-C::NUM &OPTIONAL SB-C::STATE) ((SB-INT:CONSTANT-ARG #) &OPTIONAL T) * ; :POLICY (AND (> SPEED COMPILATION-SPEED) (> SPEED SPACE))) ; "optimize to inlined RANDOM-CHUNK operations" ; (LET ((SB-C::NUM #)) (IF (= SB-C::NUM 1) 0 (FLET # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; MAKE-SINGLE-FLOAT ; (SB-C:DEFTRANSFORM SB-KERNEL:MAKE-SINGLE-FLOAT ; ((SB-C::BITS) ((SB-INT:CONSTANT-ARG T))) "Conditional constant folding" ; (LET ((SB-XC:FLOAT #)) ; (IF (SB-EXT:FLOAT-NAN-P SB-XC:FLOAT) (SB-C::GIVE-UP-IR1-TRANSFORM) ; SB-XC:FLOAT))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; MAKE-DOUBLE-FLOAT ; (SB-C:DEFTRANSFORM SB-KERNEL:MAKE-DOUBLE-FLOAT ; ((SB-C::HI SB-C::LO) ((SB-INT:CONSTANT-ARG T) (SB-INT:CONSTANT-ARG T))) ; "Conditional constant folding" ; (LET ((SB-XC:FLOAT #)) ; (IF (SB-EXT:FLOAT-NAN-P SB-XC:FLOAT) (SB-C::GIVE-UP-IR1-TRANSFORM) ; SB-XC:FLOAT))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %MAKE-DOUBLE-FLOAT ; (SB-C:DEFTRANSFORM SB-KERNEL:%MAKE-DOUBLE-FLOAT ; ((SB-C::BITS) ((SB-INT:CONSTANT-ARG T))) "Conditional constant folding" ; (LET ((SB-XC:FLOAT #)) ; (IF (SB-EXT:FLOAT-NAN-P SB-XC:FLOAT) (SB-C::GIVE-UP-IR1-TRANSFORM) ; SB-XC:FLOAT))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; FLOAT-SIGN ; (SB-C:DEFTRANSFORM SB-XC:FLOAT-SIGN ; ((SB-XC:FLOAT &OPTIONAL SB-C::FLOAT2) ; (SB-XC:SINGLE-FLOAT &OPTIONAL SB-XC:SINGLE-FLOAT) *) ; (IF (SB-C::VOP-EXISTSP :TRANSLATE SB-KERNEL:SINGLE-FLOAT-COPYSIGN) ; (IF SB-C::FLOAT2 (SB-INT:QUASIQUOTE #) (SB-INT:QUASIQUOTE #)) ; (IF SB-C::FLOAT2 (LET # #) '(IF # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:FLOAT-SIGN ; ((SB-XC:FLOAT &OPTIONAL SB-C::FLOAT2) ; (SB-XC:DOUBLE-FLOAT &OPTIONAL SB-XC:DOUBLE-FLOAT) *) ; (LET ((SB-C::BITS '#)) (IF SB-C::FLOAT2 (LET # #) (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; FLOAT-SIGN-BIT ; (SB-C:DEFTRANSFORM SB-KERNEL:FLOAT-SIGN-BIT ; ((SB-C::X) (SB-XC:SINGLE-FLOAT) *) (SB-INT:QUASIQUOTE (LOGAND (ASH # -31) 1))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-KERNEL:FLOAT-SIGN-BIT ; ((SB-C::X) (SB-XC:DOUBLE-FLOAT) *) ; (SB-INT:QUASIQUOTE (ASH (LOGAND # SB-EXT:MOST-POSITIVE-WORD) -63))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; FLOAT-SIGN-BIT-SET-P ; (SB-C:DEFTRANSFORM SB-KERNEL:FLOAT-SIGN-BIT-SET-P ; ((SB-C::X) (SB-XC:SINGLE-FLOAT) *) ; (SB-INT:QUASIQUOTE (LOGBITP 31 (SB-KERNEL:SINGLE-FLOAT-BITS SB-C::X)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-KERNEL:FLOAT-SIGN-BIT-SET-P ; ((SB-C::X) (SB-XC:DOUBLE-FLOAT) *) ; (SB-INT:QUASIQUOTE (LOGBITP 63 (SB-KERNEL:DOUBLE-FLOAT-BITS SB-C::X)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SIGNUM ; (SB-C:DEFTRANSFORM SB-XC:SIGNUM ((SB-C::X) (SB-XC:NUMBER)) ; (LET* ((SB-KERNEL:CTYPE #) (SB-C::RESULT-TYPE #)) ; (WHEN (EQ SB-C::RESULT-TYPE 'SB-XC:RATIONAL) ; (SETQ SB-C::RESULT-TYPE 'INTEGER)) ; (IF SB-C::RESULT-TYPE (SB-INT:QUASIQUOTE #) (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; DECODE-FLOAT ; (SB-C:DEFTRANSFORM SB-XC:DECODE-FLOAT ((SB-C::X) (SB-XC:SINGLE-FLOAT) *) ; '(SB-KERNEL:DECODE-SINGLE-FLOAT SB-C::X)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:DECODE-FLOAT ((SB-C::X) (SB-XC:DOUBLE-FLOAT) *) ; '(SB-KERNEL:DECODE-DOUBLE-FLOAT SB-C::X)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; INTEGER-DECODE-FLOAT ; (SB-C:DEFTRANSFORM SB-XC:INTEGER-DECODE-FLOAT ; ((SB-C::X) (SB-XC:SINGLE-FLOAT) *) ; '(SB-KERNEL:INTEGER-DECODE-SINGLE-FLOAT SB-C::X)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:INTEGER-DECODE-FLOAT ; ((SB-C::X) (SB-XC:DOUBLE-FLOAT) *) ; '(SB-KERNEL:INTEGER-DECODE-DOUBLE-FLOAT SB-C::X)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SCALE-FLOAT ; (SB-C:DEFTRANSFORM SB-XC:SCALE-FLOAT ; ((SB-C::F SB-C::EX) (SB-XC:SINGLE-FLOAT T) *) ; (COND (T '(SB-KERNEL:SCALE-SINGLE-FLOAT SB-C::F SB-C::EX)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:SCALE-FLOAT ; ((SB-C::F SB-C::EX) (SB-XC:DOUBLE-FLOAT T) *) ; (COND (T '(SB-KERNEL:SCALE-DOUBLE-FLOAT SB-C::F SB-C::EX)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; SINGLE-FLOAT ; (SB-C::DEF SB-XC:SINGLE-FLOAT #.(MAKE-SINGLE-FLOAT #x3F800000) ; #.(MAKE-SINGLE-FLOAT #x-40800000)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; DOUBLE-FLOAT ; (SB-C::DEF SB-XC:DOUBLE-FLOAT #.(MAKE-DOUBLE-FLOAT #x3FF00000 #x0) ; #.(MAKE-DOUBLE-FLOAT #x-40100000 #x0)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; SINGLE-FLOAT ; (SB-C::DEF SB-XC:SINGLE-FLOAT) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; DOUBLE-FLOAT ; (SB-C::DEF SB-XC:DOUBLE-FLOAT) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; |+| ; (SB-C::DEF + SB-XC:SINGLE-FLOAT 0 #.(MAKE-SINGLE-FLOAT #x0)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; |-| ; (SB-C::DEF - SB-XC:SINGLE-FLOAT 0 #.(MAKE-SINGLE-FLOAT #x0)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; |+| ; (SB-C::DEF + SB-XC:DOUBLE-FLOAT 0 #.(MAKE-SINGLE-FLOAT #x0) ; #.(MAKE-DOUBLE-FLOAT #x0 #x0)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; |-| ; (SB-C::DEF - SB-XC:DOUBLE-FLOAT 0 #.(MAKE-SINGLE-FLOAT #x0) ; #.(MAKE-DOUBLE-FLOAT #x0 #x0)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; SINGLE-FLOAT ; (SB-C::DEF SB-XC:SINGLE-FLOAT 2 #.(MAKE-SINGLE-FLOAT #x40000000)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; DOUBLE-FLOAT ; (SB-C::DEF SB-XC:DOUBLE-FLOAT 2 #.(MAKE-SINGLE-FLOAT #x40000000) ; #.(MAKE-DOUBLE-FLOAT #x40000000 #x0)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; EXP ; (SB-C::DEF SB-XC:EXP SB-KERNEL:%EXP *) ; ==> ; (SB-C:DEFTRANSFORM SB-XC:EXP ; ((SB-C::X) (SB-XC:SINGLE-FLOAT) * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE (SB-KERNEL:%SINGLE-FLOAT (# #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:EXP ; ((SB-C::X) (SB-XC:DOUBLE-FLOAT) * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE (# SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; LOG ; (SB-C::DEF SB-XC:LOG SB-KERNEL:%LOG SB-XC:FLOAT) ; ==> ; (SB-C:DEFTRANSFORM SB-XC:LOG ; ((SB-C::X) (SB-XC:SINGLE-FLOAT) SB-XC:FLOAT :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE (SB-KERNEL:%SINGLE-FLOAT (# #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:LOG ; ((SB-C::X) (SB-XC:DOUBLE-FLOAT) SB-XC:FLOAT :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE (# SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; SQRT ; (SB-C::DEF SB-XC:SQRT SB-KERNEL:%SQRT SB-XC:FLOAT) ; ==> ; (SB-C:DEFTRANSFORM SB-XC:SQRT ; ((SB-C::X) (SB-XC:SINGLE-FLOAT) SB-XC:FLOAT :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE (SB-KERNEL:%SINGLE-FLOAT (# #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:SQRT ; ((SB-C::X) (SB-XC:DOUBLE-FLOAT) SB-XC:FLOAT :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE ; (# SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; ASIN ; (SB-C::DEF SB-XC:ASIN SB-KERNEL:%ASIN SB-XC:FLOAT) ; ==> ; (SB-C:DEFTRANSFORM SB-XC:ASIN ; ((SB-C::X) (SB-XC:SINGLE-FLOAT) SB-XC:FLOAT :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE (SB-KERNEL:%SINGLE-FLOAT (# #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:ASIN ; ((SB-C::X) (SB-XC:DOUBLE-FLOAT) SB-XC:FLOAT :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE ; (# SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; ACOS ; (SB-C::DEF SB-XC:ACOS SB-KERNEL:%ACOS SB-XC:FLOAT) ; ==> ; (SB-C:DEFTRANSFORM SB-XC:ACOS ; ((SB-C::X) (SB-XC:SINGLE-FLOAT) SB-XC:FLOAT :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE (SB-KERNEL:%SINGLE-FLOAT (# #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:ACOS ; ((SB-C::X) (SB-XC:DOUBLE-FLOAT) SB-XC:FLOAT :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE ; (# SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; ATAN ; (SB-C::DEF SB-XC:ATAN SB-KERNEL:%ATAN *) ; ==> ; (SB-C:DEFTRANSFORM SB-XC:ATAN ; ((SB-C::X) (SB-XC:SINGLE-FLOAT) * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE (SB-KERNEL:%SINGLE-FLOAT (# #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:ATAN ; ((SB-C::X) (SB-XC:DOUBLE-FLOAT) * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE ; (# SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; SINH ; (SB-C::DEF SB-XC:SINH SB-KERNEL:%SINH *) ; ==> ; (SB-C:DEFTRANSFORM SB-XC:SINH ; ((SB-C::X) (SB-XC:SINGLE-FLOAT) * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE (SB-KERNEL:%SINGLE-FLOAT (# #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:SINH ; ((SB-C::X) (SB-XC:DOUBLE-FLOAT) * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE ; (# SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; COSH ; (SB-C::DEF SB-XC:COSH SB-KERNEL:%COSH *) ; ==> ; (SB-C:DEFTRANSFORM SB-XC:COSH ; ((SB-C::X) (SB-XC:SINGLE-FLOAT) * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE (SB-KERNEL:%SINGLE-FLOAT (# #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:COSH ; ((SB-C::X) (SB-XC:DOUBLE-FLOAT) * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE ; (# SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; TANH ; (SB-C::DEF SB-XC:TANH SB-KERNEL:%TANH *) ; ==> ; (SB-C:DEFTRANSFORM SB-XC:TANH ; ((SB-C::X) (SB-XC:SINGLE-FLOAT) * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE (SB-KERNEL:%SINGLE-FLOAT (# #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:TANH ; ((SB-C::X) (SB-XC:DOUBLE-FLOAT) * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE ; (# SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; ASINH ; (SB-C::DEF SB-XC:ASINH SB-KERNEL:%ASINH *) ; ==> ; (SB-C:DEFTRANSFORM SB-XC:ASINH ; ((SB-C::X) (SB-XC:SINGLE-FLOAT) * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE (SB-KERNEL:%SINGLE-FLOAT (# #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:ASINH ; ((SB-C::X) (SB-XC:DOUBLE-FLOAT) * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE ; (# SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; ACOSH ; (SB-C::DEF SB-XC:ACOSH SB-KERNEL:%ACOSH SB-XC:FLOAT) ; ==> ; (SB-C:DEFTRANSFORM SB-XC:ACOSH ; ((SB-C::X) (SB-XC:SINGLE-FLOAT) SB-XC:FLOAT :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE (SB-KERNEL:%SINGLE-FLOAT (# #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:ACOSH ; ((SB-C::X) (SB-XC:DOUBLE-FLOAT) SB-XC:FLOAT :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE ; (# SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; ATANH ; (SB-C::DEF SB-XC:ATANH SB-KERNEL:%ATANH SB-XC:FLOAT) ; ==> ; (SB-C:DEFTRANSFORM SB-XC:ATANH ; ((SB-C::X) (SB-XC:SINGLE-FLOAT) SB-XC:FLOAT :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE (SB-KERNEL:%SINGLE-FLOAT (# #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:ATANH ; ((SB-C::X) (SB-XC:DOUBLE-FLOAT) SB-XC:FLOAT :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE ; (# SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; SIN ; (SB-C::DEF SB-XC:SIN SB-KERNEL:%SIN SB-KERNEL:%SIN-QUICK) ; ==> ; (SB-C:DEFTRANSFORM SB-XC:SIN ((SB-C::X) (SB-XC:SINGLE-FLOAT) *) ; (SB-INT:QUASIQUOTE (SB-XC:COERCE (# #) 'SB-XC:SINGLE-FLOAT))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:SIN ((SB-C::X) (SB-XC:DOUBLE-FLOAT) *) ; (SB-INT:QUASIQUOTE (# SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; COS ; (SB-C::DEF SB-XC:COS SB-KERNEL:%COS SB-KERNEL:%COS-QUICK) ; ==> ; (SB-C:DEFTRANSFORM SB-XC:COS ((SB-C::X) (SB-XC:SINGLE-FLOAT) *) ; (SB-INT:QUASIQUOTE (SB-XC:COERCE (# #) 'SB-XC:SINGLE-FLOAT))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:COS ((SB-C::X) (SB-XC:DOUBLE-FLOAT) *) ; (SB-INT:QUASIQUOTE (# SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; TAN ; (SB-C::DEF SB-XC:TAN SB-KERNEL:%TAN SB-KERNEL:%TAN-QUICK) ; ==> ; (SB-C:DEFTRANSFORM SB-XC:TAN ((SB-C::X) (SB-XC:SINGLE-FLOAT) *) ; (SB-INT:QUASIQUOTE (SB-XC:COERCE (# #) 'SB-XC:SINGLE-FLOAT))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:TAN ((SB-C::X) (SB-XC:DOUBLE-FLOAT) *) ; (SB-INT:QUASIQUOTE (# SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; ATAN ; (SB-C:DEFTRANSFORM SB-XC:ATAN ; ((SB-C::X SB-C::Y) (SB-XC:SINGLE-FLOAT SB-XC:SINGLE-FLOAT) *) ; (SB-INT:QUASIQUOTE (SB-XC:COERCE (SB-KERNEL:%ATAN2 # #) 'SB-XC:SINGLE-FLOAT))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:ATAN ; ((SB-C::X SB-C::Y) (SB-XC:DOUBLE-FLOAT SB-XC:DOUBLE-FLOAT) *) ; (SB-INT:QUASIQUOTE (SB-KERNEL:%ATAN2 SB-C::X SB-C::Y))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; EXPT ; (SB-C:DEFTRANSFORM SB-XC:EXPT ; ((SB-C::X SB-C::Y) (SB-XC:SINGLE-FLOAT SB-XC:SINGLE-FLOAT) SB-XC:SINGLE-FLOAT) ; (SB-INT:QUASIQUOTE (SB-XC:COERCE (SB-KERNEL:%POW # #) 'SB-XC:SINGLE-FLOAT))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:EXPT ; ((SB-C::X SB-C::Y) (SB-XC:DOUBLE-FLOAT SB-XC:DOUBLE-FLOAT) SB-XC:DOUBLE-FLOAT) ; (SB-INT:QUASIQUOTE (SB-KERNEL:%POW SB-C::X SB-C::Y))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:EXPT ; ((SB-C::X SB-C::Y) (SB-XC:SINGLE-FLOAT INTEGER) SB-XC:SINGLE-FLOAT) ; (SB-INT:QUASIQUOTE (SB-XC:COERCE (SB-KERNEL:%POW # #) 'SB-XC:SINGLE-FLOAT))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:EXPT ; ((SB-C::X SB-C::Y) (SB-XC:DOUBLE-FLOAT INTEGER) SB-XC:DOUBLE-FLOAT) ; (SB-INT:QUASIQUOTE ; (SB-KERNEL:%POW SB-C::X (SB-XC:COERCE SB-C::Y 'SB-XC:DOUBLE-FLOAT)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; LOG ; (SB-C:DEFTRANSFORM SB-XC:LOG ; ((SB-C::X SB-C::Y) (SB-XC:SINGLE-FLOAT SB-XC:SINGLE-FLOAT) SB-XC:SINGLE-FLOAT ; :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE ; (IF (SB-XC:ZEROP SB-C::Y) #.(MAKE-SINGLE-FLOAT #x0) ; (SB-XC:COERCE # 'SB-XC:SINGLE-FLOAT)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:LOG ; ((SB-C::X SB-C::Y) (SB-XC:SINGLE-FLOAT SB-XC:DOUBLE-FLOAT) SB-XC:DOUBLE-FLOAT ; :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE ; (IF (SB-XC:ZEROP SB-C::Y) #.(MAKE-DOUBLE-FLOAT #x0 #x0) (/ # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:LOG ; ((SB-C::X SB-C::Y) (SB-XC:DOUBLE-FLOAT SB-XC:SINGLE-FLOAT) SB-XC:DOUBLE-FLOAT ; :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE ; (IF (SB-XC:ZEROP SB-C::Y) #.(MAKE-DOUBLE-FLOAT #x0 #x0) (/ # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:LOG ; ((SB-C::X SB-C::Y) (SB-XC:DOUBLE-FLOAT SB-XC:DOUBLE-FLOAT) SB-XC:DOUBLE-FLOAT ; :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE ; (IF (SB-XC:ZEROP SB-C::Y) #.(MAKE-DOUBLE-FLOAT #x0 #x0) (/ # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; ABS ; (SB-C:DEFTRANSFORM SB-XC:ABS ; ((SB-C::X) ((SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT)) SB-XC:DOUBLE-FLOAT) ; '(SB-KERNEL:%HYPOT (SB-XC:REALPART SB-C::X) (SB-XC:IMAGPART SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:ABS ; ((SB-C::X) ((SB-XC:COMPLEX SB-XC:SINGLE-FLOAT)) SB-XC:SINGLE-FLOAT) ; '(SB-XC:COERCE ; (SB-KERNEL:%HYPOT (SB-XC:COERCE # 'SB-XC:DOUBLE-FLOAT) ; (SB-XC:COERCE # 'SB-XC:DOUBLE-FLOAT)) ; 'SB-XC:SINGLE-FLOAT)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; PHASE ; (SB-C:DEFTRANSFORM SB-XC:PHASE ; ((SB-C::X) ((SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT)) SB-XC:DOUBLE-FLOAT) ; '(SB-KERNEL:%ATAN2 (SB-XC:IMAGPART SB-C::X) (SB-XC:REALPART SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:PHASE ; ((SB-C::X) ((SB-XC:COMPLEX SB-XC:SINGLE-FLOAT)) SB-XC:SINGLE-FLOAT) ; '(SB-XC:COERCE ; (SB-KERNEL:%ATAN2 (SB-XC:COERCE # 'SB-XC:DOUBLE-FLOAT) ; (SB-XC:COERCE # 'SB-XC:DOUBLE-FLOAT)) ; 'SB-XC:SINGLE-FLOAT)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:PHASE ((SB-C::X) ((SB-XC:FLOAT)) SB-XC:FLOAT) ; '(IF (SB-XC:MINUSP (SB-XC:FLOAT-SIGN SB-C::X)) (SB-XC:FLOAT SB-XC:PI SB-C::X) ; (SB-XC:FLOAT 0 SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; REALPART ; (SB-C:DEFTRANSFORM SB-XC:REALPART ; ((SB-C::X) ((SB-XC:COMPLEX SB-XC:RATIONAL)) * :IMPORTANT NIL) ; '(SB-KERNEL:%REALPART SB-C::X)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; IMAGPART ; (SB-C:DEFTRANSFORM SB-XC:IMAGPART ; ((SB-C::X) ((SB-XC:COMPLEX SB-XC:RATIONAL)) * :IMPORTANT NIL) ; '(SB-KERNEL:%IMAGPART SB-C::X)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; REALPART ; (SB-C:DEFTRANSFORM SB-XC:REALPART ((SB-C::X) (SB-XC:REAL) * :IMPORTANT NIL) ; 'SB-C::X) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; IMAGPART ; (SB-C:DEFTRANSFORM SB-XC:IMAGPART ; ((SB-C::X) ((AND SB-XC:SINGLE-FLOAT #)) * :IMPORTANT NIL) ; #.(MAKE-SINGLE-FLOAT #x0)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:IMAGPART ; ((SB-C::X) ((AND SB-XC:DOUBLE-FLOAT #)) * :IMPORTANT NIL) ; #.(MAKE-DOUBLE-FLOAT #x0 #x0)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; ; MACROLET ; ; ((FROB (TYPE CONTAGION) ; ; (QUASIQUOTE ; ; (PROGN (DEFTRANSFORM COMPLEX # '#) (DEFTRANSFORM COMPLEX # # '#) ; ; (DEFTRANSFORM COMPLEX # # '#) (UNLESS # # # # ...) ...)))) ; (SB-C::FROB SB-XC:SINGLE-FLOAT (OR SB-XC:RATIONAL SB-XC:SINGLE-FLOAT)) ; ==> ; (SB-C:DEFTRANSFORM SB-XC:COMPLEX ((SB-C::R) (SB-XC:SINGLE-FLOAT)) ; '(SB-XC:COMPLEX SB-C::R #.(MAKE-SINGLE-FLOAT #x0))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:COMPLEX ; ((SB-C::R SB-C::I) ; (SB-XC:SINGLE-FLOAT (OR SB-XC:RATIONAL SB-XC:SINGLE-FLOAT))) ; (WHEN ; (SB-KERNEL:CSUBTYPEP (SB-C::LVAR-TYPE SB-C::I) ; (SB-KERNEL:SPECIFIER-TYPE 'SB-XC:SINGLE-FLOAT)) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; '(SB-XC:COMPLEX SB-C::R ; (SB-EXT:TRULY-THE SB-XC:SINGLE-FLOAT ; (SB-XC:COERCE SB-C::I 'SB-XC:SINGLE-FLOAT)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:COMPLEX ; ((SB-C::R SB-C::I) ; ((OR SB-XC:RATIONAL SB-XC:SINGLE-FLOAT) SB-XC:SINGLE-FLOAT)) ; (WHEN ; (SB-KERNEL:CSUBTYPEP (SB-C::LVAR-TYPE SB-C::R) ; (SB-KERNEL:SPECIFIER-TYPE 'SB-XC:SINGLE-FLOAT)) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; '(SB-XC:COMPLEX ; (SB-EXT:TRULY-THE SB-XC:SINGLE-FLOAT ; (SB-XC:COERCE SB-C::R 'SB-XC:SINGLE-FLOAT)) ; SB-C::I)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; --> UNLESS IF IF PROGN ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%NEGATE ; ((SB-C::Z) ((SB-XC:COMPLEX SB-XC:SINGLE-FLOAT)) * :IMPORTANT NIL) ; '(SB-XC:COMPLEX (SB-KERNEL:%NEGATE (SB-XC:REALPART SB-C::Z)) ; (SB-KERNEL:%NEGATE (SB-XC:IMAGPART SB-C::Z)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM + ; ((SB-C::W SB-C::Z) ; ((SB-XC:COMPLEX SB-XC:SINGLE-FLOAT) (SB-XC:COMPLEX SB-XC:SINGLE-FLOAT)) * ; :IMPORTANT NIL) ; '(SB-XC:COMPLEX (+ (SB-XC:REALPART SB-C::W) (SB-XC:REALPART SB-C::Z)) ; (+ (SB-XC:IMAGPART SB-C::W) (SB-XC:IMAGPART SB-C::Z)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM - ; ((SB-C::W SB-C::Z) ; ((SB-XC:COMPLEX SB-XC:SINGLE-FLOAT) (SB-XC:COMPLEX SB-XC:SINGLE-FLOAT)) * ; :IMPORTANT NIL) ; '(SB-XC:COMPLEX (- (SB-XC:REALPART SB-C::W) (SB-XC:REALPART SB-C::Z)) ; (- (SB-XC:IMAGPART SB-C::W) (SB-XC:IMAGPART SB-C::Z)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM + ; ((SB-C::W SB-C::Z) ((SB-XC:COMPLEX SB-XC:SINGLE-FLOAT) SB-XC:REAL) * ; :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (SB-XC:COMPLEX (+ # SB-C::Z) (+ # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM + ; ((SB-C::Z SB-C::W) (SB-XC:REAL (SB-XC:COMPLEX SB-XC:SINGLE-FLOAT)) * ; :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (SB-XC:COMPLEX (+ # SB-C::Z) (+ # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM - ; ((SB-C::W SB-C::Z) ((SB-XC:COMPLEX SB-XC:SINGLE-FLOAT) SB-XC:REAL) * ; :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (SB-XC:COMPLEX (- # SB-C::Z) (- # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM - ; ((SB-C::Z SB-C::W) (SB-XC:REAL (SB-XC:COMPLEX SB-XC:SINGLE-FLOAT)) * ; :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (SB-XC:COMPLEX (- SB-C::Z #) (- # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM * ; ((SB-C::W SB-C::Z) ((SB-XC:COMPLEX SB-XC:SINGLE-FLOAT) SB-XC:REAL) * ; :IMPORTANT NIL) ; '(SB-XC:COMPLEX (* (SB-XC:REALPART SB-C::W) SB-C::Z) ; (* (SB-XC:IMAGPART SB-C::W) SB-C::Z))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM * ; ((SB-C::Z SB-C::W) (SB-XC:REAL (SB-XC:COMPLEX SB-XC:SINGLE-FLOAT)) * ; :IMPORTANT NIL) ; '(SB-XC:COMPLEX (* (SB-XC:REALPART SB-C::W) SB-C::Z) ; (* (SB-XC:IMAGPART SB-C::W) SB-C::Z))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:CONJUGATE ; ((SB-C::Z) ((SB-XC:COMPLEX SB-XC:SINGLE-FLOAT)) * :IMPORTANT NIL) ; '(SB-XC:COMPLEX (SB-XC:REALPART SB-C::Z) (- (SB-XC:IMAGPART SB-C::Z)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM = ; ((SB-C::W SB-C::Z) ; ((SB-XC:COMPLEX SB-XC:SINGLE-FLOAT) (SB-XC:COMPLEX SB-XC:SINGLE-FLOAT)) * ; :IMPORTANT NIL) ; '(AND (= (SB-XC:REALPART SB-C::W) (SB-XC:REALPART SB-C::Z)) ; (= (SB-XC:IMAGPART SB-C::W) (SB-XC:IMAGPART SB-C::Z)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM = ; ((SB-C::W SB-C::Z) ((SB-XC:COMPLEX SB-XC:SINGLE-FLOAT) SB-XC:REAL) * ; :IMPORTANT NIL) ; '(AND (= (SB-XC:REALPART SB-C::W) SB-C::Z) ; (SB-XC:ZEROP (SB-XC:IMAGPART SB-C::W)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM = ; ((SB-C::W SB-C::Z) (SB-XC:REAL (SB-XC:COMPLEX SB-XC:SINGLE-FLOAT)) * ; :IMPORTANT NIL) ; '(AND (= (SB-XC:REALPART SB-C::Z) SB-C::W) ; (SB-XC:ZEROP (SB-XC:IMAGPART SB-C::Z)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM * ; ((SB-C::X SB-C::Y) ; ((SB-XC:COMPLEX SB-XC:SINGLE-FLOAT) (SB-XC:COMPLEX SB-XC:SINGLE-FLOAT)) * ; :IMPORTANT NIL) ; '(LET* ((SB-C::RX #) (SB-C::IX #) (SB-C::RY #) (SB-C::IY #)) ; (SB-XC:COMPLEX (- # #) (+ # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM / ; ((SB-C::W SB-C::Z) ((SB-XC:COMPLEX SB-XC:SINGLE-FLOAT) SB-XC:REAL) * ; :IMPORTANT NIL) ; '(SB-XC:COMPLEX (/ (SB-XC:REALPART SB-C::W) SB-C::Z) ; (/ (SB-XC:IMAGPART SB-C::W) SB-C::Z))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM / ; ((SB-C::X SB-C::Y) ; ((SB-XC:COMPLEX SB-XC:SINGLE-FLOAT) (SB-XC:COMPLEX SB-XC:SINGLE-FLOAT)) * ; :IMPORTANT NIL) ; (IF (SB-C::VOP-EXISTSP :TRANSLATE SB-VM::SWAP-COMPLEX) ; '(LET* (# # #) (IF # # #)) '(LET* (# # # #) (IF # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM / ; ((SB-C::X SB-C::Y) (SB-XC:REAL (SB-XC:COMPLEX SB-XC:SINGLE-FLOAT)) * ; :IMPORTANT NIL) ; (IF (SB-C::VOP-EXISTSP :TRANSLATE SB-VM::SWAP-COMPLEX) ; '(LET* (# #) (IF # # #)) '(LET* (# #) (IF # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:CIS ((SB-C::Z) ((SB-XC:SINGLE-FLOAT)) *) ; '(SB-XC:COMPLEX (SB-XC:COS SB-C::Z) (SB-XC:SIN SB-C::Z))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C::FROB SB-XC:DOUBLE-FLOAT ; (OR SB-XC:RATIONAL SB-XC:SINGLE-FLOAT SB-XC:DOUBLE-FLOAT)) ; ==> ; (SB-C:DEFTRANSFORM SB-XC:COMPLEX ((SB-C::R) (SB-XC:DOUBLE-FLOAT)) ; '(SB-XC:COMPLEX SB-C::R #.(MAKE-DOUBLE-FLOAT #x0 #x0))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:COMPLEX ; ((SB-C::R SB-C::I) ; (SB-XC:DOUBLE-FLOAT ; (OR SB-XC:RATIONAL SB-XC:SINGLE-FLOAT SB-XC:DOUBLE-FLOAT))) ; (WHEN ; (SB-KERNEL:CSUBTYPEP (SB-C::LVAR-TYPE SB-C::I) ; (SB-KERNEL:SPECIFIER-TYPE 'SB-XC:DOUBLE-FLOAT)) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; '(SB-XC:COMPLEX SB-C::R ; (SB-EXT:TRULY-THE SB-XC:DOUBLE-FLOAT ; (SB-XC:COERCE SB-C::I 'SB-XC:DOUBLE-FLOAT)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:COMPLEX ; ((SB-C::R SB-C::I) ; ((OR SB-XC:RATIONAL SB-XC:SINGLE-FLOAT SB-XC:DOUBLE-FLOAT) ; SB-XC:DOUBLE-FLOAT)) ; (WHEN ; (SB-KERNEL:CSUBTYPEP (SB-C::LVAR-TYPE SB-C::R) ; (SB-KERNEL:SPECIFIER-TYPE 'SB-XC:DOUBLE-FLOAT)) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; '(SB-XC:COMPLEX ; (SB-EXT:TRULY-THE SB-XC:DOUBLE-FLOAT ; (SB-XC:COERCE SB-C::R 'SB-XC:DOUBLE-FLOAT)) ; SB-C::I)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; --> UNLESS IF IF PROGN ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%NEGATE ; ((SB-C::Z) ((SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT)) * :IMPORTANT NIL) ; '(SB-XC:COMPLEX (SB-KERNEL:%NEGATE (SB-XC:REALPART SB-C::Z)) ; (SB-KERNEL:%NEGATE (SB-XC:IMAGPART SB-C::Z)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM + ; ((SB-C::W SB-C::Z) ; ((SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT) (SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT)) * ; :IMPORTANT NIL) ; '(SB-XC:COMPLEX (+ (SB-XC:REALPART SB-C::W) (SB-XC:REALPART SB-C::Z)) ; (+ (SB-XC:IMAGPART SB-C::W) (SB-XC:IMAGPART SB-C::Z)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM - ; ((SB-C::W SB-C::Z) ; ((SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT) (SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT)) * ; :IMPORTANT NIL) ; '(SB-XC:COMPLEX (- (SB-XC:REALPART SB-C::W) (SB-XC:REALPART SB-C::Z)) ; (- (SB-XC:IMAGPART SB-C::W) (SB-XC:IMAGPART SB-C::Z)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM + ; ((SB-C::W SB-C::Z) ((SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT) SB-XC:REAL) * ; :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (SB-XC:COMPLEX (+ # SB-C::Z) (+ # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM + ; ((SB-C::Z SB-C::W) (SB-XC:REAL (SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT)) * ; :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (SB-XC:COMPLEX (+ # SB-C::Z) (+ # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM - ; ((SB-C::W SB-C::Z) ((SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT) SB-XC:REAL) * ; :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (SB-XC:COMPLEX (- # SB-C::Z) (- # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM - ; ((SB-C::Z SB-C::W) (SB-XC:REAL (SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT)) * ; :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (SB-XC:COMPLEX (- SB-C::Z #) (- # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM * ; ((SB-C::W SB-C::Z) ((SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT) SB-XC:REAL) * ; :IMPORTANT NIL) ; '(SB-XC:COMPLEX (* (SB-XC:REALPART SB-C::W) SB-C::Z) ; (* (SB-XC:IMAGPART SB-C::W) SB-C::Z))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM * ; ((SB-C::Z SB-C::W) (SB-XC:REAL (SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT)) * ; :IMPORTANT NIL) ; '(SB-XC:COMPLEX (* (SB-XC:REALPART SB-C::W) SB-C::Z) ; (* (SB-XC:IMAGPART SB-C::W) SB-C::Z))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:CONJUGATE ; ((SB-C::Z) ((SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT)) * :IMPORTANT NIL) ; '(SB-XC:COMPLEX (SB-XC:REALPART SB-C::Z) (- (SB-XC:IMAGPART SB-C::Z)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM = ; ((SB-C::W SB-C::Z) ; ((SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT) (SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT)) * ; :IMPORTANT NIL) ; '(AND (= (SB-XC:REALPART SB-C::W) (SB-XC:REALPART SB-C::Z)) ; (= (SB-XC:IMAGPART SB-C::W) (SB-XC:IMAGPART SB-C::Z)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM = ; ((SB-C::W SB-C::Z) ((SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT) SB-XC:REAL) * ; :IMPORTANT NIL) ; '(AND (= (SB-XC:REALPART SB-C::W) SB-C::Z) ; (SB-XC:ZEROP (SB-XC:IMAGPART SB-C::W)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM = ; ((SB-C::W SB-C::Z) (SB-XC:REAL (SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT)) * ; :IMPORTANT NIL) ; '(AND (= (SB-XC:REALPART SB-C::Z) SB-C::W) ; (SB-XC:ZEROP (SB-XC:IMAGPART SB-C::Z)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM * ; ((SB-C::X SB-C::Y) ; ((SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT) (SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT)) * ; :IMPORTANT NIL) ; '(LET* ((SB-C::RX #) (SB-C::IX #) (SB-C::RY #) (SB-C::IY #)) ; (SB-XC:COMPLEX (- # #) (+ # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM / ; ((SB-C::W SB-C::Z) ((SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT) SB-XC:REAL) * ; :IMPORTANT NIL) ; '(SB-XC:COMPLEX (/ (SB-XC:REALPART SB-C::W) SB-C::Z) ; (/ (SB-XC:IMAGPART SB-C::W) SB-C::Z))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM / ; ((SB-C::X SB-C::Y) ; ((SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT) (SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT)) * ; :IMPORTANT NIL) ; (IF (SB-C::VOP-EXISTSP :TRANSLATE SB-VM::SWAP-COMPLEX) ; '(LET* (# # #) (IF # # #)) '(LET* (# # # #) (IF # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM / ; ((SB-C::X SB-C::Y) (SB-XC:REAL (SB-XC:COMPLEX SB-XC:DOUBLE-FLOAT)) * ; :IMPORTANT NIL) ; (IF (SB-C::VOP-EXISTSP :TRANSLATE SB-VM::SWAP-COMPLEX) ; '(LET* (# #) (IF # # #)) '(LET* (# #) (IF # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-XC:CIS ((SB-C::Z) ((SB-XC:DOUBLE-FLOAT)) *) ; '(SB-XC:COMPLEX (SB-XC:COS SB-C::Z) (SB-XC:SIN SB-C::Z))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; COMPLEX ; (SB-C:DEFTRANSFORM SB-XC:COMPLEX ; ((SB-XC:REALPART &OPTIONAL SB-XC:IMAGPART) ; (SB-XC:RATIONAL &OPTIONAL (OR NULL #)) * :IMPORTANT NIL) ; 'SB-XC:REALPART) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; TRUNCATE ; (SB-C:DEFTRANSFORM SB-XC:TRUNCATE ; ((SB-C::X &OPTIONAL SB-C::BY) (T &OPTIONAL (SB-INT:CONSTANT-ARG #))) ; '(SB-KERNEL:UNARY-TRUNCATE SB-C::X)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; ROUND ; (SB-C:DEFTRANSFORM SB-XC:ROUND ; ((SB-C::X &OPTIONAL SB-C::BY) (T &OPTIONAL (SB-INT:CONSTANT-ARG #))) ; '(LET ((SB-C::RES #)) (VALUES SB-C::RES (LOCALLY # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %UNARY-TRUNCATE ; (SB-C:DEFTRANSFORM SB-KERNEL:%UNARY-TRUNCATE ((SB-C::X) (SB-XC:SINGLE-FLOAT)) ; (SB-INT:QUASIQUOTE (VALUES (SB-KERNEL:UNARY-TRUNCATE SB-C::X)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-KERNEL:%UNARY-TRUNCATE ((SB-C::X) (SB-XC:DOUBLE-FLOAT)) ; (SB-INT:QUASIQUOTE (VALUES (SB-KERNEL:UNARY-TRUNCATE SB-C::X)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; UNARY-TRUNCATE ; (SB-C:DEFTRANSFORM SB-KERNEL:UNARY-TRUNCATE ; ((SB-C::X) * * :RESULT SB-C::RESULT :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :CONSTRAINT) ; (UNLESS ; (OR (SB-C::LVAR-SINGLE-VALUE-P SB-C::RESULT) ; (SB-C::MV-BIND-UNUSED-P SB-C::RESULT 1)) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (LET ((SB-C::REM-TYPE #)) (SB-INT:QUASIQUOTE (VALUES # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; SINGLE-FLOAT ; (SB-C::DEF SB-XC:SINGLE-FLOAT) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; DOUBLE-FLOAT ; (SB-C::DEF SB-XC:DOUBLE-FLOAT) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; SINGLE-FLOAT ; (SB-C::DEF SB-XC:SINGLE-FLOAT NIL) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; DOUBLE-FLOAT ; (SB-C::DEF SB-XC:DOUBLE-FLOAT (SB-XC:SINGLE-FLOAT)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; FLOOR ; (SB-C::DEF SB-XC:FLOOR SB-XC:SINGLE-FLOAT NIL) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C::DEF SB-XC:FLOOR SB-XC:DOUBLE-FLOAT (SB-XC:SINGLE-FLOAT)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; CEILING ; (SB-C::DEF SB-XC:CEILING SB-XC:SINGLE-FLOAT NIL) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C::DEF SB-XC:CEILING SB-XC:DOUBLE-FLOAT (SB-XC:SINGLE-FLOAT)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %UNARY-FROUND ; (SB-C:DEFTRANSFORM SB-KERNEL:%UNARY-FROUND ((SB-C::X) (SB-XC:SINGLE-FLOAT)) ; (SB-INT:QUASIQUOTE (COND (# #) (# #) (T SB-C::X)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-KERNEL:%UNARY-FROUND ((SB-C::X) (SB-XC:DOUBLE-FLOAT)) ; (SB-INT:QUASIQUOTE (COND (# #) (# #) (T SB-C::X)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; ROUND-SINGLE ; (SB-C::DEF SB-KERNEL:ROUND-SINGLE SB-XC:SINGLE-FLOAT "f") ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; ROUND-DOUBLE ; (SB-C::DEF SB-KERNEL:ROUND-DOUBLE SB-XC:DOUBLE-FLOAT) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; = ; (SB-C::DEF =) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; < ; (SB-C::DEF <) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; > ; (SB-C::DEF >) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; <= ; (SB-C::DEF <=) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; >= ; (SB-C::DEF >=) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; PHASE ; (SB-C:DEFTRANSFORM SB-XC:PHASE ((SB-C::N)) ; (SB-C::SPLICE-FUN-ARGS SB-C::N 'SB-XC:COMPLEX 2) ; (SB-INT:QUASIQUOTE (LAMBDA (SB-C::X SB-C::Y) (SB-XC:ATAN SB-C::Y SB-C::X)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ** - Continuable Error FAILURE-P was set when creating "obj/from-xc/src/compiler/float-tran.lisp-obj" . If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-xc/src/compiler/float-tran.lisp-obj" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/float-tran.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (COND # #) RETRY :R4 retry (COND # #) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/src/cold/compile-cold-sbcl.lisp SKIP :R6 skip (LET # # ...) RETRY :R7 retry (LET # # ...) STOP :R8 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-2.lisp ABORT-BUILD :R9 Abort building SBCL. ABORT :R10 Abort main loop (54.047 sec) [184/299] src/compiler/array-tran ; file: src/compiler/array-tran.lisp ; in: ; DEFTRANSFORM ; ARRAY-IN-BOUNDS-P ; (SB-C:DEFTRANSFORM ARRAY-IN-BOUNDS-P ((ARRAY &REST SB-C::SUBSCRIPTS)) ; (BLOCK NIL (FLET (# #) (LET # # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; MAKE-STRING ; (SB-C:DEFTRANSFORM MAKE-STRING ; ((LENGTH &KEY SB-C::ELEMENT-TYPE SB-C::INITIAL-ELEMENT)) ; (LET ((SB-C::ELT-CTYPE #)) (WHEN (OR # # #) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (MULTIPLE-VALUE-BIND (SB-XC:SUBTYPEP SB-C::CERTAINP) ; (SB-KERNEL:CSUBTYPEP SB-C::ELT-CTYPE #) (IF # #) (IF # #)) ; (SB-INT:QUASIQUOTE (THE SIMPLE-STRING #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; MAKE-ARRAY ; (SB-C:DEFTRANSFORM MAKE-ARRAY ; ((SB-C::DIMS &KEY SB-C::INITIAL-ELEMENT SB-C::INITIAL-CONTENTS ; SB-C::ELEMENT-TYPE SB-C::ADJUSTABLE FILL-POINTER SB-C::DISPLACED-TO ; SB-C::DISPLACED-INDEX-OFFSET) ; (T &REST T) * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :CONSTRAINT) ; (WHEN (AND SB-C::INITIAL-CONTENTS SB-C::INITIAL-ELEMENT) ; (SB-C::ABORT-IR1-TRANSFORM ; "Can't specify both :INITIAL-ELEMENT and :INITIAL-CONTENTS")) ; (WHEN (AND SB-C::DISPLACED-INDEX-OFFSET (NOT SB-C::DISPLACED-TO)) ; (SB-C::ABORT-IR1-TRANSFORM ; "Can't specify :DISPLACED-INDEX-OFFSET without :DISPLACED-TO")) ; (WHEN ; (AND SB-C::DISPLACED-TO (OR SB-C::INITIAL-ELEMENT SB-C::INITIAL-CONTENTS)) ; (IF (SB-KERNEL:TYPES-EQUAL-OR-INTERSECT # #) ; (SB-C::GIVE-UP-IR1-TRANSFORM ":DISPLACED-TO potentially used with ~S" #) ; (SB-C::ABORT-IR1-TRANSFORM "Can't specify :DISPLACED-TO and ~S" #))) ; (LET ((SB-C::FP-TYPE #)) (WHEN (AND SB-C::FP-TYPE #) (LET* # #))) ; (MACROLET ((SB-C::MAYBE-ARG # #)) (BLOCK NIL (LET* # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM MAKE-ARRAY ; ((SB-C::DIMS &KEY SB-C::ELEMENT-TYPE SB-C::INITIAL-ELEMENT ; SB-C::INITIAL-CONTENTS SB-C::ADJUSTABLE FILL-POINTER) ; (LIST &KEY (:ELEMENT-TYPE #) (:INITIAL-ELEMENT *) (:INITIAL-CONTENTS *) ; (:ADJUSTABLE *) (:FILL-POINTER *)) ; * :NODE SB-C:CALL) ; (BLOCK MAKE-ARRAY ; (SB-INT:AWHEN (COND # #) (SB-C::ASSERT-LVAR-TYPE SB-INT:IT # #) ; (RETURN-FROM MAKE-ARRAY #)) ; (UNLESS (SB-C:CONSTANT-LVAR-P SB-C::DIMS) ; (SB-C::GIVE-UP-IR1-TRANSFORM ; "The dimension list is not constant; cannot open code array creation.")) ; (LET (# #) (WHEN # #) (UNLESS # #) (COND # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM MAKE-ARRAY ; ((SB-C::DIMS &KEY SB-C::ELEMENT-TYPE SB-C::INITIAL-ELEMENT ; SB-C::INITIAL-CONTENTS SB-C::ADJUSTABLE FILL-POINTER) ; (INTEGER &KEY (:ELEMENT-TYPE #) (:INITIAL-ELEMENT *) (:INITIAL-CONTENTS *) ; (:ADJUSTABLE *) (:FILL-POINTER *)) ; * :NODE SB-C:CALL) ; (SB-C::TRANSFORM-MAKE-ARRAY-VECTOR SB-C::DIMS SB-C::ELEMENT-TYPE ; SB-C::INITIAL-ELEMENT SB-C::INITIAL-CONTENTS SB-C:CALL :ADJUSTABLE ; SB-C::ADJUSTABLE :FILL-POINTER FILL-POINTER)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; ADJUST-ARRAY ; (SB-C:DEFTRANSFORM ADJUST-ARRAY ; ((ARRAY SB-C::DIMS &KEY SB-C::DISPLACED-TO SB-C::DISPLACED-INDEX-OFFSET) ; (ARRAY INTEGER &KEY (:DISPLACED-TO ARRAY) (:DISPLACED-INDEX-OFFSET *))) ; (UNLESS SB-C::DISPLACED-TO (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (SB-INT:QUASIQUOTE (PROGN (WHEN # #) (UNLESS # #) (UNLESS # #) (LET # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; ARRAY-RANK ; (SB-C:DEFTRANSFORM ARRAY-RANK ((ARRAY) (ARRAY) * :NODE SB-C::NODE) ; (LET ((SB-KERNEL:ARRAY-TYPE #)) (COND (# #) (# 1) (# '#) (T # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; ARRAY-DIMENSION ; (SB-C:DEFTRANSFORM ARRAY-DIMENSION ((ARRAY SB-C::AXIS) (ARRAY SB-INT:INDEX)) ; (UNLESS (SB-C:CONSTANT-LVAR-P SB-C::AXIS) ; (SB-C::GIVE-UP-IR1-TRANSFORM "The axis is not constant.")) ; (LET* ((SB-KERNEL:ARRAY-TYPE #) (SB-C::AXIS #) (SB-C::DIMS #)) ; (UNLESS (LISTP SB-C::DIMS) ; (SB-C::GIVE-UP-IR1-TRANSFORM ; "The array dimensions are unknown; must call ARRAY-DIMENSION at runtime.")) ; (UNLESS (> # SB-C::AXIS) ; (SB-C::ABORT-IR1-TRANSFORM "The array has dimensions ~S, ~W is too large." ; SB-C::DIMS SB-C::AXIS)) ; (LET (#) (COND # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %ARRAY-DIMENSION ; (SB-C:DEFTRANSFORM SB-KERNEL:%ARRAY-DIMENSION ; ((ARRAY SB-C::AXIS) (ARRAY (SB-INT:CONSTANT-ARG SB-INT:INDEX))) ; (LET* ((SB-KERNEL:ARRAY-TYPE #) (SB-C::DIMS #) (SB-C::AXIS #) (SB-C::DIM #)) ; (IF (INTEGERP SB-C::DIM) SB-C::DIM (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; LENGTH ; (SB-C:DEFTRANSFORM LENGTH ((VECTOR) (VECTOR)) '(SB-C::VECTOR-LENGTH VECTOR)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM LENGTH ((VECTOR) ((OR NULL VECTOR)) * :IMPORTANT NIL) ; (UNLESS ; (AND (SB-KERNEL:TYPES-EQUAL-OR-INTERSECT # #) ; (SB-KERNEL:TYPES-EQUAL-OR-INTERSECT # #)) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (SB-INT:QUASIQUOTE (IF VECTOR (SB-C::VECTOR-LENGTH VECTOR) 0))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; ARRAY-TOTAL-SIZE ; (SB-C:DEFTRANSFORM ARRAY-TOTAL-SIZE ((ARRAY) (ARRAY)) ; (LET* ((SB-KERNEL:ARRAY-TYPE #) (SB-C::DIMS #)) ; (UNLESS (LISTP SB-C::DIMS) ; (SB-C::GIVE-UP-IR1-TRANSFORM "can't tell the rank at compile time")) ; (COND (# #) (# #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; ARRAY-HAS-FILL-POINTER-P ; (SB-C:DEFTRANSFORM ARRAY-HAS-FILL-POINTER-P ((ARRAY) * * :NODE SB-C::NODE) ; (LET* ((SB-KERNEL:ARRAY-TYPE #) (SB-C::DIMS #) SB-XC:COMPLEXP) ; (COND (# NIL) (# NIL) (T # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; CHECK-BOUND ; (SB-C:DEFTRANSFORM SB-KERNEL:CHECK-BOUND ; ((ARRAY SB-C::DIMENSION SB-INT:INDEX)) ; (SB-C::CHECK-BOUND-CODE 'ARRAY ; (IF (SB-C:CONSTANT-LVAR-P SB-C::DIMENSION) (SB-C:LVAR-VALUE SB-C::DIMENSION) ; 'SB-C::DIMENSION) ; 'SB-INT:INDEX SB-INT:INDEX)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %WITH-ARRAY-DATA ; (SB-C:DEFTRANSFORM SB-KERNEL:%WITH-ARRAY-DATA ; ((ARRAY SB-C::START SB-C::END) ; ((OR VECTOR SIMPLE-ARRAY) SB-INT:INDEX (OR SB-INT:INDEX NULL)) * :NODE ; SB-C::NODE :POLICY (> SPEED SPACE)) ; "inline non-SIMPLE-vector-handling logic" ; (SB-C::TRANSFORM-%WITH-ARRAY-DATA/MUMBLE ARRAY SB-C::NODE NIL)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %WITH-ARRAY-DATA/FP ; (SB-C:DEFTRANSFORM SB-KERNEL:%WITH-ARRAY-DATA/FP ; ((ARRAY SB-C::START SB-C::END) ; ((OR VECTOR SIMPLE-ARRAY) SB-INT:INDEX (OR SB-INT:INDEX NULL)) * :NODE ; SB-C::NODE :POLICY (> SPEED SPACE)) ; "inline non-SIMPLE-vector-handling logic" ; (SB-C::TRANSFORM-%WITH-ARRAY-DATA/MUMBLE ARRAY SB-C::NODE T)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; ARRAY-ROW-MAJOR-INDEX ; (SB-C:DEFTRANSFORM ARRAY-ROW-MAJOR-INDEX ((ARRAY &REST SB-C::INDICES)) ; (SB-C::WITH-ROW-MAJOR-INDEX (ARRAY SB-C::INDICES SB-INT:INDEX) SB-INT:INDEX)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; AREF ; (SB-C:DEFTRANSFORM AREF ((ARRAY &REST SB-C::INDICES)) ; (SB-C::WITH-ROW-MAJOR-INDEX (ARRAY SB-C::INDICES SB-INT:INDEX) ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY SB-INT:INDEX))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; (SETF AREF) ; (SB-C:DEFTRANSFORM (SETF AREF) ; ((SB-C::NEW-VALUE ARRAY &REST SB-C::SUBSCRIPTS)) ; (SB-C::WITH-ROW-MAJOR-INDEX ; (ARRAY SB-C::SUBSCRIPTS SB-INT:INDEX SB-C::NEW-VALUE) ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY SB-INT:INDEX SB-C::NEW-VALUE))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; AREF ; (SB-C:DEFTRANSFORM AREF ((ARRAY SB-INT:INDEX) (T T) * :NODE SB-C::NODE) ; (LET* ((TYPE #) (SB-C::ELEMENT-CTYPE #) (SB-C::DECLARED-ELEMENT-CTYPE #)) ; (COND (# #) (# #) (# #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; (SETF AREF) ; (SB-C:DEFTRANSFORM (SETF AREF) ; ((SB-C::NEW-VALUE ARRAY SB-INT:INDEX) (T T T) * :NODE SB-C::NODE) ; (LET* ; ((TYPE #) (SB-C::DECLARED-ELEMENT-CTYPE #) (SB-C::ELEMENT-CTYPE #) ; (SB-C::NO-CHECK #)) ; (SB-C::TRULY-THE-UNWILD SB-C::DECLARED-ELEMENT-CTYPE (COND # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; HAIRY-DATA-VECTOR-REF/CHECK-BOUNDS ; (SB-C:DEFTRANSFORM SB-KERNEL:HAIRY-DATA-VECTOR-REF/CHECK-BOUNDS ; ((ARRAY SB-INT:INDEX)) ; (LET* ((TYPE #) (SB-C::ELEMENT-TYPE #)) ; (WHEN (OR # #) ; (SB-C::GIVE-UP-IR1-TRANSFORM ; "Upgraded element type of array is not known at compile time.")) ; (SB-INT:QUASIQUOTE (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; HAIRY-DATA-VECTOR-SET/CHECK-BOUNDS ; (SB-C:DEFTRANSFORM SB-KERNEL:HAIRY-DATA-VECTOR-SET/CHECK-BOUNDS ; ((ARRAY SB-INT:INDEX SB-C::NEW-VALUE)) ; (LET* ((TYPE #) (SB-C::ELEMENT-TYPE #) (SB-C::SIMPLE #)) ; (IF (OR # #) (IF # # #) (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; ROW-MAJOR-AREF ; (SB-C:DEFTRANSFORM ROW-MAJOR-AREF ((ARRAY SB-INT:INDEX)) ; (SB-INT:QUASIQUOTE ; (SB-KERNEL:HAIRY-DATA-VECTOR-REF ARRAY #))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %SET-ROW-MAJOR-AREF ; (SB-C:DEFTRANSFORM SB-KERNEL:%SET-ROW-MAJOR-AREF ; ((ARRAY SB-INT:INDEX SB-C::NEW-VALUE)) ; (SB-INT:QUASIQUOTE ; (SB-KERNEL:HAIRY-DATA-VECTOR-SET ARRAY # ; SB-C::NEW-VALUE))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; BIT-AND ; (SB-C::DEF BIT-AND) ; ==> ; (SB-C:DEFTRANSFORM BIT-AND ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 &OPTIONAL SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR &OPTIONAL NULL) * :POLICY (>= SPEED SPACE)) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 ; (MAKE-ARRAY # :ELEMENT-TYPE 'BIT)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM BIT-AND ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR (EQL T)) *) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 ; SB-C::BIT-ARRAY-1))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; BIT-IOR ; (SB-C::DEF BIT-IOR) ; ==> ; (SB-C:DEFTRANSFORM BIT-IOR ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 &OPTIONAL SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR &OPTIONAL NULL) * :POLICY (>= SPEED SPACE)) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 ; (MAKE-ARRAY # :ELEMENT-TYPE 'BIT)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM BIT-IOR ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR (EQL T)) *) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 ; SB-C::BIT-ARRAY-1))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; BIT-XOR ; (SB-C::DEF BIT-XOR) ; ==> ; (SB-C:DEFTRANSFORM BIT-XOR ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 &OPTIONAL SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR &OPTIONAL NULL) * :POLICY (>= SPEED SPACE)) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 ; (MAKE-ARRAY # :ELEMENT-TYPE 'BIT)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM BIT-XOR ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR (EQL T)) *) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 ; SB-C::BIT-ARRAY-1))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; BIT-EQV ; (SB-C::DEF BIT-EQV) ; ==> ; (SB-C:DEFTRANSFORM BIT-EQV ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 &OPTIONAL SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR &OPTIONAL NULL) * :POLICY (>= SPEED SPACE)) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 ; (MAKE-ARRAY # :ELEMENT-TYPE 'BIT)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM BIT-EQV ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR (EQL T)) *) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 ; SB-C::BIT-ARRAY-1))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; BIT-NAND ; (SB-C::DEF BIT-NAND) ; ==> ; (SB-C:DEFTRANSFORM BIT-NAND ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 &OPTIONAL SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR &OPTIONAL NULL) * :POLICY (>= SPEED SPACE)) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 ; SB-C::BIT-ARRAY-2 (MAKE-ARRAY # :ELEMENT-TYPE 'BIT)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM BIT-NAND ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR (EQL T)) *) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 ; SB-C::BIT-ARRAY-2 SB-C::BIT-ARRAY-1))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; BIT-NOR ; (SB-C::DEF BIT-NOR) ; ==> ; (SB-C:DEFTRANSFORM BIT-NOR ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 &OPTIONAL SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR &OPTIONAL NULL) * :POLICY (>= SPEED SPACE)) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 ; (MAKE-ARRAY # :ELEMENT-TYPE 'BIT)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM BIT-NOR ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR (EQL T)) *) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 ; SB-C::BIT-ARRAY-1))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; BIT-ANDC1 ; (SB-C::DEF BIT-ANDC1) ; ==> ; (SB-C:DEFTRANSFORM BIT-ANDC1 ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 &OPTIONAL SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR &OPTIONAL NULL) * :POLICY (>= SPEED SPACE)) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 ; SB-C::BIT-ARRAY-2 (MAKE-ARRAY # :ELEMENT-TYPE 'BIT)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM BIT-ANDC1 ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR (EQL T)) *) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 ; SB-C::BIT-ARRAY-2 SB-C::BIT-ARRAY-1))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; BIT-ANDC2 ; (SB-C::DEF BIT-ANDC2) ; ==> ; (SB-C:DEFTRANSFORM BIT-ANDC2 ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 &OPTIONAL SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR &OPTIONAL NULL) * :POLICY (>= SPEED SPACE)) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 ; SB-C::BIT-ARRAY-2 (MAKE-ARRAY # :ELEMENT-TYPE 'BIT)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM BIT-ANDC2 ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR (EQL T)) *) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 ; SB-C::BIT-ARRAY-2 SB-C::BIT-ARRAY-1))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; BIT-ORC1 ; (SB-C::DEF BIT-ORC1) ; ==> ; (SB-C:DEFTRANSFORM BIT-ORC1 ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 &OPTIONAL SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR &OPTIONAL NULL) * :POLICY (>= SPEED SPACE)) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 ; SB-C::BIT-ARRAY-2 (MAKE-ARRAY # :ELEMENT-TYPE 'BIT)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM BIT-ORC1 ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR (EQL T)) *) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 ; SB-C::BIT-ARRAY-2 SB-C::BIT-ARRAY-1))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; BIT-ORC2 ; (SB-C::DEF BIT-ORC2) ; ==> ; (SB-C:DEFTRANSFORM BIT-ORC2 ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 &OPTIONAL SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR &OPTIONAL NULL) * :POLICY (>= SPEED SPACE)) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 ; SB-C::BIT-ARRAY-2 (MAKE-ARRAY # :ELEMENT-TYPE 'BIT)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM BIT-ORC2 ; ((SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-2 SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR BIT-VECTOR (EQL T)) *) ; (SB-INT:QUASIQUOTE ; (# SB-C::BIT-ARRAY-1 ; SB-C::BIT-ARRAY-2 SB-C::BIT-ARRAY-1))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; BIT-NOT ; (SB-C:DEFTRANSFORM BIT-NOT ; ((SB-C::BIT-ARRAY-1 &OPTIONAL SB-C::RESULT-BIT-ARRAY) ; (BIT-VECTOR &OPTIONAL NULL) * :POLICY (>= SPEED SPACE)) ; '(BIT-NOT SB-C::BIT-ARRAY-1 ; (MAKE-ARRAY (ARRAY-DIMENSION SB-C::BIT-ARRAY-1 0) :ELEMENT-TYPE 'BIT))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM BIT-NOT ; ((SB-C::BIT-ARRAY-1 SB-C::RESULT-BIT-ARRAY) (BIT-VECTOR (EQL T))) ; '(BIT-NOT SB-C::BIT-ARRAY-1 SB-C::BIT-ARRAY-1)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ** - Continuable Error FAILURE-P was set when creating "obj/from-xc/src/compiler/array-tran.lisp-obj" . If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-xc/src/compiler/array-tran.lisp-obj" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/array-tran.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (COND # #) RETRY :R4 retry (COND # #) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/src/cold/compile-cold-sbcl.lisp SKIP :R6 skip (LET # # ...) RETRY :R7 retry (LET # # ...) STOP :R8 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-2.lisp ABORT-BUILD :R9 Abort building SBCL. ABORT :R10 Abort main loop (56.406 sec) [185/299] src/compiler/generic/vm-tran ; file: src/compiler/generic/vm-tran.lisp ; in: ; DEFTRANSFORM ; ABS ; (SB-C:DEFTRANSFORM SB-XC:ABS ((SB-C::X) (SB-XC:RATIONAL)) ; '(IF (< SB-C::X 0) (- SB-C::X) SB-C::X)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; MAKE-SYMBOL ; (SB-C:DEFTRANSFORM MAKE-SYMBOL ((STRING) (SIMPLE-STRING)) ; (SB-INT:QUASIQUOTE (SB-KERNEL:%MAKE-SYMBOL 0 STRING))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; COPY-STRUCTURE ; (SB-C:DEFTRANSFORM COPY-STRUCTURE ; ((SB-KERNEL:INSTANCE) * * :RESULT SB-C::RESULT :NODE SB-C::NODE) ; (LET* ; ((SB-KERNEL:CLASSOID #) (SB-C::NAME #) (SB-KERNEL:LAYOUT #) ; (SB-C::CLASS-EQ #) (SB-C::DD #) (SB-C::DD-COPIER #) ; (SB-C::MAX-INLINED-WORDS 5)) ; (UNLESS (AND SB-C::RESULT SB-KERNEL:LAYOUT # #) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (COND (# #) (# #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %INSTANCE-LENGTH ; (SB-C:DEFTRANSFORM SB-KERNEL:%INSTANCE-LENGTH ((SB-KERNEL:INSTANCE)) ; (LET ((SB-KERNEL:CLASSOID #)) ; (IF (AND # # # # #) (SB-KERNEL:DD-LENGTH #) (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; HAIRY-DATA-VECTOR-REF ; (SB-C:DEFTRANSFORM SB-KERNEL:HAIRY-DATA-VECTOR-REF ; ((STRING SB-INT:INDEX) (SIMPLE-STRING T)) ; (LET ((SB-KERNEL:CTYPE #)) ; (IF (SB-KERNEL:ARRAY-TYPE-P SB-KERNEL:CTYPE) (SB-C::GIVE-UP-IR1-TRANSFORM) ; (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-KERNEL:HAIRY-DATA-VECTOR-REF ; ((ARRAY SB-INT:INDEX) (SIMPLE-ARRAY T) *) ; "avoid runtime dispatch on array element type" ; (LET* ((TYPE #) (SB-C::ELEMENT-CTYPE #) (SB-C::DECLARED-ELEMENT-CTYPE #)) ; (DECLARE (TYPE SB-KERNEL:CTYPE SB-C::ELEMENT-CTYPE)) ; (WHEN (EQ SB-KERNEL:*WILD-TYPE* SB-C::ELEMENT-CTYPE) ; (SB-C::GIVE-UP-IR1-TRANSFORM ; "Upgraded element type of array is not known at compile time.")) ; (LET* (#) (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; DATA-VECTOR-REF ; (SB-C:DEFTRANSFORM SB-KERNEL:DATA-VECTOR-REF ; ((ARRAY SB-INT:INDEX) (SIMPLE-ARRAY T)) ; (LET ((SB-KERNEL:ARRAY-TYPE #)) ; (UNLESS (SB-KERNEL:ARRAY-TYPE-P SB-KERNEL:ARRAY-TYPE) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (LET (#) (WHEN # #) (LET # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; HAIRY-DATA-VECTOR-SET ; (SB-C:DEFTRANSFORM SB-KERNEL:HAIRY-DATA-VECTOR-SET ; ((STRING SB-INT:INDEX SB-C::NEW-VALUE) (SIMPLE-STRING T T)) ; (LET ((SB-KERNEL:CTYPE #)) ; (IF (SB-KERNEL:ARRAY-TYPE-P SB-KERNEL:CTYPE) (SB-C::GIVE-UP-IR1-TRANSFORM) ; (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-KERNEL:HAIRY-DATA-VECTOR-SET ; ((ARRAY SB-INT:INDEX SB-C::NEW-VALUE) (SIMPLE-ARRAY T T) *) ; "avoid runtime dispatch on array element type" ; (LET* ((TYPE #) (SB-C::ELEMENT-CTYPE #) (SB-C::DECLARED-ELEMENT-CTYPE #)) ; (DECLARE (TYPE SB-KERNEL:CTYPE SB-C::ELEMENT-CTYPE)) (COND (# #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; DATA-VECTOR-SET ; (SB-C:DEFTRANSFORM SB-KERNEL:DATA-VECTOR-SET ; ((ARRAY SB-INT:INDEX SB-C::NEW-VALUE) (SIMPLE-ARRAY T T)) ; (LET ((SB-KERNEL:ARRAY-TYPE #)) ; (UNLESS (SB-KERNEL:ARRAY-TYPE-P SB-KERNEL:ARRAY-TYPE) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (LET (#) (WHEN # #) (LET # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; ARRAY-STORAGE-VECTOR ; (SB-C:DEFTRANSFORM SB-EXT:ARRAY-STORAGE-VECTOR ((ARRAY) ((SIMPLE-ARRAY * #))) ; 'ARRAY) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %DATA-VECTOR-AND-INDEX ; (SB-C:DEFTRANSFORM SB-KERNEL:%DATA-VECTOR-AND-INDEX ; ((SB-C::%ARRAY SB-C::%INDEX) (SIMPLE-ARRAY T) *) ; (SB-C::UPGRADED-ELEMENT-TYPE-SPECIFIER-OR-GIVE-UP SB-C::%ARRAY) ; '(IF (SB-KERNEL:ARRAY-HEADER-P SB-C::%ARRAY) ; (VALUES (SB-KERNEL:%ARRAY-DATA SB-C::%ARRAY) SB-C::%INDEX) ; (VALUES SB-C::%ARRAY SB-C::%INDEX))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; BIT-NOT ; (SB-C:DEFTRANSFORM BIT-NOT ; ((SB-C::BIT-ARRAY SB-C::RESULT-BIT-ARRAY) ; (SIMPLE-BIT-VECTOR SIMPLE-BIT-VECTOR) * :NODE SB-C::NODE :POLICY ; (>= SPEED SPACE)) ; (SB-INT:QUASIQUOTE ; (PROGN # (LET # # SB-C::RESULT-BIT-ARRAY)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; BIT-VECTOR-= ; (SB-C:DEFTRANSFORM SB-INT:BIT-VECTOR-= ; ((SB-C::X SB-C::Y) (SIMPLE-BIT-VECTOR SIMPLE-BIT-VECTOR)) ; (SB-INT:QUASIQUOTE (LET (#) (AND # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; COUNT ; (SB-C:DEFTRANSFORM COUNT ; ((SB-C::ITEM SEQUENCE) (BIT SIMPLE-BIT-VECTOR) * :POLICY (>= SPEED SPACE)) ; (SB-INT:QUASIQUOTE ; (LET* (# # #) (DECLARE #) (DECLARE #) (DOTIMES # #) (LET # #) ; #))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %BYTE-BLT ; (SB-C:DEFTRANSFORM SB-KERNEL:%BYTE-BLT ; ((SB-C::SRC SB-C::SRC-START SB-C::DST SB-C::DST-START SB-C::NBYTES) ; ((OR # SB-SYS:SYSTEM-AREA-POINTER) SB-INT:INDEX ; (OR # SB-SYS:SYSTEM-AREA-POINTER) SB-INT:INDEX SB-INT:INDEX)) ; '(FLET ((SB-C::SAPIFY # #)) (DECLARE (INLINE SB-C::SAPIFY)) ; (SB-SYS:WITH-PINNED-OBJECTS (SB-C::DST SB-C::SRC) ; (SB-SYS:MEMMOVE # # SB-C::NBYTES)) ; (VALUES))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; EQL ; (SB-C:DEFTRANSFORM EQL ; ((SB-C::X SB-C::Y) (SB-XC:SINGLE-FLOAT SB-XC:SINGLE-FLOAT) * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; '(EQL (SB-KERNEL:SINGLE-FLOAT-BITS SB-C::X) ; (SB-KERNEL:SINGLE-FLOAT-BITS SB-C::Y))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM EQL ; ((SB-C::X SB-C::Y) (SB-XC:DOUBLE-FLOAT SB-XC:DOUBLE-FLOAT) * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; '(EQL (SB-KERNEL:DOUBLE-FLOAT-BITS SB-C::X) ; (SB-KERNEL:DOUBLE-FLOAT-BITS SB-C::Y))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; WORD-LOGICAL-AND ; (SB-C:DEFTRANSFORM SB-KERNEL:WORD-LOGICAL-AND ((SB-C::X SB-C::Y)) ; '(LOGAND SB-C::X SB-C::Y)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; WORD-LOGICAL-NAND ; (SB-C:DEFTRANSFORM SB-KERNEL:WORD-LOGICAL-NAND ((SB-C::X SB-C::Y)) ; (SB-INT:QUASIQUOTE ; (LOGAND (LOGNAND SB-C::X SB-C::Y) ; #))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; WORD-LOGICAL-OR ; (SB-C:DEFTRANSFORM SB-KERNEL:WORD-LOGICAL-OR ((SB-C::X SB-C::Y)) ; '(LOGIOR SB-C::X SB-C::Y)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; WORD-LOGICAL-NOR ; (SB-C:DEFTRANSFORM SB-KERNEL:WORD-LOGICAL-NOR ((SB-C::X SB-C::Y)) ; (SB-INT:QUASIQUOTE ; (LOGAND (LOGNOR SB-C::X SB-C::Y) ; #))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; WORD-LOGICAL-XOR ; (SB-C:DEFTRANSFORM SB-KERNEL:WORD-LOGICAL-XOR ((SB-C::X SB-C::Y)) ; '(LOGXOR SB-C::X SB-C::Y)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; WORD-LOGICAL-EQV ; (SB-C:DEFTRANSFORM SB-KERNEL:WORD-LOGICAL-EQV ((SB-C::X SB-C::Y)) ; (SB-INT:QUASIQUOTE ; (LOGAND (LOGEQV SB-C::X SB-C::Y) ; #))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; WORD-LOGICAL-ORC1 ; (SB-C:DEFTRANSFORM SB-KERNEL:WORD-LOGICAL-ORC1 ((SB-C::X SB-C::Y)) ; (SB-INT:QUASIQUOTE ; (LOGAND (LOGORC1 SB-C::X SB-C::Y) ; #))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; WORD-LOGICAL-ORC2 ; (SB-C:DEFTRANSFORM SB-KERNEL:WORD-LOGICAL-ORC2 ((SB-C::X SB-C::Y)) ; (SB-INT:QUASIQUOTE ; (LOGAND (LOGORC2 SB-C::X SB-C::Y) ; #))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; WORD-LOGICAL-ANDC1 ; (SB-C:DEFTRANSFORM SB-KERNEL:WORD-LOGICAL-ANDC1 ((SB-C::X SB-C::Y)) ; (SB-INT:QUASIQUOTE ; (LOGAND (LOGANDC2 SB-C::Y SB-C::X) ; #))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; WORD-LOGICAL-ANDC2 ; (SB-C:DEFTRANSFORM SB-KERNEL:WORD-LOGICAL-ANDC2 ((SB-C::X SB-C::Y)) ; (SB-INT:QUASIQUOTE ; (LOGAND (LOGANDC2 SB-C::X SB-C::Y) ; #))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; GET-LISP-OBJ-ADDRESS ; (SB-C:DEFTRANSFORM SB-KERNEL:GET-LISP-OBJ-ADDRESS ; ((SB-C::OBJ) ((SB-INT:CONSTANT-ARG FIXNUM))) ; (ASH (SB-C:LVAR-VALUE SB-C::OBJ) SB-VM:N-FIXNUM-TAG-BITS)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-KERNEL:GET-LISP-OBJ-ADDRESS ; ((SB-C::OBJ) ((SB-INT:CONSTANT-ARG CHARACTER))) ; (LOGIOR SB-VM:CHARACTER-WIDETAG ; (ASH (SB-XC:CHAR-CODE #) SB-VM:N-WIDETAG-BITS))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; (CAS SYMBOL-VALUE) ; (SB-C:DEFTRANSFORM (SB-EXT:CAS SYMBOL-VALUE) ((SB-C::OLD SB-C::NEW SYMBOL)) ; (LET ((SB-C::CNAME #)) (CASE (AND SB-C::CNAME #) (# #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; (CAS SVREF) ; (SB-C:DEFTRANSFORM (SB-EXT:CAS SVREF) ; ((SB-C::OLD SB-C::NEW VECTOR SB-INT:INDEX)) ; '(LET ((SB-C::V #)) ; (SB-KERNEL:%COMPARE-AND-SWAP-SVREF SB-C::V ; (SB-KERNEL:CHECK-BOUND SB-C::V # SB-INT:INDEX) SB-C::OLD SB-C::NEW))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ** - Continuable Error FAILURE-P was set when creating "obj/from-xc/src/compiler/generic/vm-tran.lisp-obj". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-xc/src/compiler/generic/vm-tran.lisp-obj" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/generic/vm-tran.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (COND # #) RETRY :R4 retry (COND # #) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/src/cold/compile-cold-sbcl.lisp SKIP :R6 skip (LET # # ...) RETRY :R7 retry (LET # # ...) STOP :R8 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-2.lisp ABORT-BUILD :R9 Abort building SBCL. ABORT :R10 Abort main loop (11.125 sec) [186/299] src/compiler/type-vop-macros (3.059 sec) [187/299] src/compiler/riscv/type-vops (7.402 sec) [188/299] src/compiler/generic/type-vops (71.199 sec) [189/299] src/compiler/ir1final (10.129 sec) [190/299] src/compiler/riscv/alloc (10.181 sec) [191/299] src/compiler/riscv/values (5.758 sec) [192/299] src/compiler/srctran ; file: src/compiler/srctran.lisp ; in: ; DEFTRANSFORM ; COMPLEMENT ; (SB-C:DEFTRANSFORM COMPLEMENT ((SB-C::FUN) * * :NODE SB-C::NODE) "open code" ; (MULTIPLE-VALUE-BIND (MIN MAX) ; (SB-KERNEL:FUN-TYPE-NARGS (SB-C::LVAR-TYPE SB-C::FUN)) ; (COND (# #) (# '#'#) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %MAKE-LIST ; (SB-C:DEFTRANSFORM SB-KERNEL:%MAKE-LIST ; ((LENGTH SB-C::ITEM) ((SB-INT:CONSTANT-ARG #) T)) ; (SB-INT:QUASIQUOTE (LIST #))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SB-IMPL::APPEND2 ; (SB-C:DEFTRANSFORM SB-IMPL::APPEND2 ; ((SB-C::X SB-C::Y) (NULL T) * :IMPORTANT NIL) 'SB-C::Y) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-IMPL::APPEND2 ; ((SB-C::X SB-C::Y) (LIST T) * :IMPORTANT NIL) ; (LET* ((SB-C::N #) (SB-C::ARGS #)) (SB-INT:QUASIQUOTE (LAMBDA # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; APPEND ; (SB-C:DEFTRANSFORM APPEND ; ((SB-C::X &REST SB-C::ARGS) (LIST &REST T) * :IMPORTANT NIL) ; (LET* ((SB-C::N #) (SB-C::LIST-ARGS #) (SB-C::APPEND-ARGS #)) ; (SB-INT:QUASIQUOTE (LAMBDA # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM APPEND ((&REST SB-C::ARGS)) ; (SB-C::REMOVE-NIL 'APPEND SB-C::ARGS)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; NCONC ; (SB-C:DEFTRANSFORM NCONC ((&REST SB-C::ARGS)) ; (SB-C::REMOVE-NIL 'NCONC SB-C::ARGS)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %CONCATENATE-TO-LIST ; (SB-C:DEFTRANSFORM SB-KERNEL:%CONCATENATE-TO-LIST ((&REST SB-C::ARGS)) ; (SB-C::TRANSFORM 'SB-KERNEL:%CONCATENATE-TO-LIST SB-C::ARGS ; 'SB-KERNEL:%CONCATENATE-TO-LIST-SUBSEQ)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %CONCATENATE-TO-STRING ; (SB-C:DEFTRANSFORM SB-KERNEL:%CONCATENATE-TO-STRING ((&REST SB-C::ARGS)) ; (SB-C::TRANSFORM 'SB-KERNEL:%CONCATENATE-TO-STRING SB-C::ARGS ; 'SB-KERNEL:%CONCATENATE-TO-STRING-SUBSEQ)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %CONCATENATE-TO-BASE-STRING ; (SB-C:DEFTRANSFORM SB-KERNEL:%CONCATENATE-TO-BASE-STRING ((&REST SB-C::ARGS)) ; (SB-C::TRANSFORM 'SB-KERNEL:%CONCATENATE-TO-BASE-STRING SB-C::ARGS ; 'SB-KERNEL:%CONCATENATE-TO-BASE-STRING-SUBSEQ)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %CONCATENATE-TO-VECTOR ; (SB-C:DEFTRANSFORM SB-KERNEL:%CONCATENATE-TO-VECTOR ; ((SB-C::WIDETAG &REST SB-C::ARGS)) ; (SB-C::TRANSFORM 'SB-KERNEL:%CONCATENATE-TO-VECTOR SB-C::ARGS ; 'SB-KERNEL:%CONCATENATE-TO-VECTOR-SUBSEQ 'SB-C::WIDETAG)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %CONCATENATE-TO-SIMPLE-VECTOR ; (SB-C:DEFTRANSFORM SB-KERNEL:%CONCATENATE-TO-SIMPLE-VECTOR ; ((&REST SB-C::ARGS)) ; (SB-C::TRANSFORM 'SB-KERNEL:%CONCATENATE-TO-SIMPLE-VECTOR SB-C::ARGS ; 'SB-KERNEL:%CONCATENATE-TO-SIMPLE-VECTOR-SUBSEQ)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; CONCATENATE ; (SB-C:DEFTRANSFORM CONCATENATE ((TYPE &REST SB-C::ARGS)) ; (SB-C::TRANSFORM 'CONCATENATE SB-C::ARGS NIL 'TYPE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %CONCATENATE-TO-STRING ; (SB-C:DEFTRANSFORM SB-KERNEL:%CONCATENATE-TO-STRING ; ((STRING) ((ARRAY CHARACTER #))) (SB-INT:QUASIQUOTE (SUBSEQ STRING 0))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-KERNEL:%CONCATENATE-TO-STRING ; ((STRING) ((ARRAY BASE-CHAR #))) ; (SB-INT:QUASIQUOTE (SB-XC:COERCE STRING '(ARRAY CHARACTER #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; LAST ; (SB-C:DEFTRANSFORM LAST ((LIST &OPTIONAL SB-C::N) (T &OPTIONAL T)) ; (LET ((SB-C::C #)) (COND (# '#) (# '#) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; NTHCDR ; (SB-C:DEFTRANSFORM NTHCDR ; ((SB-C::N SB-C::L) (UNSIGNED-BYTE T) * :NODE SB-C::NODE) ; "convert NTHCDR to CAxxR" ; (UNLESS (SB-C:CONSTANT-LVAR-P SB-C::N) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (LET ((SB-C::N #)) (WHEN (> SB-C::N #) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (LABELS (#) (SB-C::FROB SB-C::N)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; NTH ; (SB-C:DEFTRANSFORM NTH ; ((SB-C::N SB-C::L) (UNSIGNED-BYTE T) * :NODE SB-C::NODE) ; "convert NTH to CAxxR" ; (UNLESS (SB-C:CONSTANT-LVAR-P SB-C::N) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (LET ((SB-C::N #)) (WHEN (> SB-C::N #) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (LABELS (#) (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; LOGTEST ; (SB-C:DEFTRANSFORM LOGTEST ((SB-C::X SB-C::Y) * * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE (NOT (SB-XC:ZEROP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; LOGBITP ; (SB-C:DEFTRANSFORM LOGBITP ((SB-INT:INDEX INTEGER) * * :NODE SB-C::NODE) ; (LET ((SB-C::INTEGER-TYPE #) (SB-C::INTEGER-VALUE #)) ; (COND (# NIL) (# T) (# # #) (# #) (# #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; UNARY-TRUNCATE ; (SB-C:DEFTRANSFORM SB-KERNEL:UNARY-TRUNCATE ((SB-XC:NUMBER) (INTEGER)) ; '(VALUES SB-XC:NUMBER 0)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; CODE-CHAR ; (SB-C:DEFTRANSFORM SB-XC:CODE-CHAR ((SB-C::CODE)) ; (SB-C::SPLICE-FUN-ARGS SB-C::CODE 'SB-XC:CHAR-CODE 1) 'SB-C::CODE) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; CHAR-CODE ; (SB-C:DEFTRANSFORM SB-XC:CHAR-CODE ((CHAR)) ; (SB-C::SPLICE-FUN-ARGS CHAR 'SB-XC:CODE-CHAR 1) 'CHAR) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; DIGIT-CHAR ; (SB-C:DEFTRANSFORM DIGIT-CHAR ; ((SB-C::CODE &OPTIONAL SB-C::RADIX) ((INTEGER 0 9) T)) ; (IF (OR (NOT SB-C::RADIX) (SB-C::INTERVAL-< # #)) ; (SB-INT:QUASIQUOTE (SB-XC:CODE-CHAR #)) (SB-C::GIVE-UP-IR1-TRANSFORM))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; DIGIT-CHAR-P ; (SB-C:DEFTRANSFORM DIGIT-CHAR-P ; ((CHAR &OPTIONAL (SB-C::RADIX 10)) ((OR BASE-CHAR #) &OPTIONAL (INTEGER 2 10)) ; * :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (LET (#) (IF # SB-C::DIGIT)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM DIGIT-CHAR-P ; ((CHAR SB-C::RADIX) ((OR BASE-CHAR #) (SB-INT:CONSTANT-ARG #)) * :IMPORTANT ; NIL) ; (SB-INT:QUASIQUOTE (LET* (# #) (IF # SB-C::DIGIT #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %LDB ; (SB-C:DEFTRANSFORM SB-KERNEL:%LDB ; ((SB-C::SIZE SB-C::POSN SB-ALIEN:INT) (FIXNUM FIXNUM INTEGER) SB-EXT:WORD ; :NODE SB-C::NODE) ; "convert to inline logical operations" ; (LET* ((SB-C::SIZE-MAX #) (SB-C::POSN-MAX #) (SB-C::WIDTH #)) ; (COND (# #) (#) (T # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %MASK-FIELD ; (SB-C:DEFTRANSFORM SB-KERNEL:%MASK-FIELD ; ((SB-C::SIZE SB-C::POSN SB-ALIEN:INT) ((INTEGER 0 64) FIXNUM INTEGER) ; SB-EXT:WORD) ; "convert to inline logical operations" ; (SB-INT:QUASIQUOTE (LOGAND SB-ALIEN:INT (ASH # SB-C::POSN)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %DPB ; (SB-C:DEFTRANSFORM SB-KERNEL:%DPB ; ((SB-C::NEW SB-C::SIZE SB-C::POSN SB-ALIEN:INT) ; ((SB-INT:CONSTANT-ARG INTEGER) (SB-INT:CONSTANT-ARG INTEGER) T T) * ; :IMPORTANT NIL) ; (LET* ((SB-C::NEW #) (SB-C::SIZE #) (SB-C::CUT #)) ; (COND (# #) (# #) (# # #) (# # #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; ASH ; (SB-C:DEFTRANSFORM ASH ; ((INTEGER SB-C::AMOUNT) (SB-VM:SIGNED-WORD (INTEGER * 0)) * :IMPORTANT NIL) ; "Convert ASH of signed word to %ASH/RIGHT" ; (WHEN (SB-C:CONSTANT-LVAR-P SB-C::AMOUNT) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (LET ((SB-C::USE #)) (COND (# # #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM ASH ; ((INTEGER SB-C::AMOUNT) (SB-EXT:WORD (INTEGER * 0)) * :IMPORTANT NIL) ; "Convert ASH of word to %ASH/RIGHT" ; (WHEN (SB-C:CONSTANT-LVAR-P SB-C::AMOUNT) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (LET ((SB-C::USE #)) (COND (# # #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %ASH/RIGHT ; (SB-C:DEFTRANSFORM SB-KERNEL:%ASH/RIGHT ; ((INTEGER SB-C::AMOUNT) (INTEGER (SB-INT:CONSTANT-ARG UNSIGNED-BYTE))) ; "Convert %ASH/RIGHT by constant back to ASH" ; (SB-INT:QUASIQUOTE (ASH INTEGER #))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-KERNEL:%ASH/RIGHT ; ((INTEGER SB-C::AMOUNT) * * :NODE SB-C::NODE) ; "strength reduce large variable right shift" ; (LET ((SB-C::RETURN-TYPE #)) (COND (# 0) (# -1) (# #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; EXPT ; (SB-C:DEFTRANSFORM SB-XC:EXPT ; ((SB-C::BASE SB-C::POWER) ((SB-INT:CONSTANT-ARG UNSIGNED-BYTE) INTEGER)) ; (LET ((SB-C::BASE #)) (COND (# #) (# 1) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:EXPT ; ((SB-C::BASE SB-C::POWER) ((SB-INT:CONSTANT-ARG UNSIGNED-BYTE) UNSIGNED-BYTE)) ; (LET ((SB-C::BASE #)) (UNLESS (= # 1) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (SB-INT:QUASIQUOTE (ASH 1 #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; BOOLE ; (SB-C:DEFTRANSFORM BOOLE ((SB-C::OP SB-C::X SB-C::Y) * *) ; "convert to inline logical operations" ; (UNLESS (SB-C:CONSTANT-LVAR-P SB-C::OP) ; (SB-C::GIVE-UP-IR1-TRANSFORM "BOOLE code is not a constant.")) ; (LET ((SB-C::CONTROL #)) ; (CASE SB-C::CONTROL (0 0) (1 -1) (2 'SB-C::X) (3 'SB-C::Y) (4 '#) (5 '#) ; (6 '#) (7 '#) (8 '#) (9 '#) ...))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; * ; (SB-C:DEFTRANSFORM * ; ((SB-C::X SB-C::Y) (INTEGER (SB-INT:CONSTANT-ARG UNSIGNED-BYTE)) * :NODE ; SB-C::NODE) ; "convert x*2^k to shift" (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (LET* ((TYPE #) (SB-C::Y #) (SB-C::LEN #)) ; (UNLESS (OR # # # #) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (UNLESS (= SB-C::Y #) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (SB-INT:QUASIQUOTE (ASH SB-C::X #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; ASH ; (SB-C:DEFTRANSFORM ASH ; ((INTEGER SB-C::AMOUNT) ; ((OR SB-EXT:WORD SB-VM:SIGNED-WORD) (SB-INT:CONSTANT-ARG #)) * :IMPORTANT NIL ; :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (LET ((TYPE #) (SB-C::SHIFT #)) ; (WHEN (OR # # #) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (SB-INT:QUASIQUOTE (* INTEGER #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; * ; (SB-C:DEFTRANSFORM * ; ((SB-C::X SB-C::Y) ; ((OR SB-EXT:WORD SB-VM:SIGNED-WORD) (OR SB-EXT:WORD SB-VM:SIGNED-WORD)) * ; :NODE SB-C::NODE :IMPORTANT NIL) ; (SB-C::OVERFLOW-TRANSFORM 'SB-KERNEL:OVERFLOW* SB-C::X SB-C::Y SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; |+| ; (SB-C:DEFTRANSFORM + ; ((SB-C::X SB-C::Y) ; ((OR SB-EXT:WORD SB-VM:SIGNED-WORD) (OR SB-EXT:WORD SB-VM:SIGNED-WORD)) * ; :NODE SB-C::NODE :IMPORTANT NIL) ; (SB-C::OVERFLOW-TRANSFORM 'SB-KERNEL:OVERFLOW+ SB-C::X SB-C::Y SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; |-| ; (SB-C:DEFTRANSFORM - ; ((SB-C::X SB-C::Y) ; ((OR SB-EXT:WORD SB-VM:SIGNED-WORD) (OR SB-EXT:WORD SB-VM:SIGNED-WORD)) * ; :NODE SB-C::NODE :IMPORTANT NIL) ; (SB-C::OVERFLOW-TRANSFORM 'SB-KERNEL:OVERFLOW- SB-C::X SB-C::Y SB-C::NODE ; NIL)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; ASH ; (SB-C:DEFTRANSFORM ASH ; ((SB-C::X SB-C::Y) ; ((OR SB-EXT:WORD SB-VM:SIGNED-WORD) (OR SB-EXT:WORD SB-VM:SIGNED-WORD)) * ; :NODE SB-C::NODE :IMPORTANT NIL) ; (SB-C::OVERFLOW-TRANSFORM 'SB-KERNEL:OVERFLOW-ASH SB-C::X SB-C::Y SB-C::NODE ; NIL)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; |+| ; (SB-C:DEFTRANSFORM + ; ((SB-C::X SB-C::Y) (T (OR SB-EXT:WORD SB-VM:SIGNED-WORD)) * :NODE SB-C::NODE ; :IMPORTANT NIL) ; (SB-C::OVERFLOW-TRANSFORM-UNKNOWN-X 'SB-KERNEL:OVERFLOW+ SB-C::X SB-C::Y ; SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM + ; ((SB-C::Y SB-C::X) ((OR SB-EXT:WORD SB-VM:SIGNED-WORD) T) * :NODE SB-C::NODE ; :IMPORTANT NIL) ; (SB-C::OVERFLOW-TRANSFORM-UNKNOWN-X 'SB-KERNEL:OVERFLOW+ SB-C::X SB-C::Y ; SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; * ; (SB-C:DEFTRANSFORM * ; ((SB-C::X SB-C::Y) ((NOT RATIO) (OR SB-EXT:WORD SB-VM:SIGNED-WORD)) * :NODE ; SB-C::NODE :IMPORTANT NIL) ; (SB-C::OVERFLOW-TRANSFORM-UNKNOWN-X 'SB-KERNEL:OVERFLOW* SB-C::X SB-C::Y ; SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM * ; ((SB-C::Y SB-C::X) ((OR SB-EXT:WORD SB-VM:SIGNED-WORD) (NOT RATIO)) * :NODE ; SB-C::NODE :IMPORTANT NIL) ; (SB-C::OVERFLOW-TRANSFORM-UNKNOWN-X 'SB-KERNEL:OVERFLOW* SB-C::X SB-C::Y ; SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; |-| ; (SB-C:DEFTRANSFORM - ; ((SB-C::X SB-C::Y) (T (OR SB-EXT:WORD SB-VM:SIGNED-WORD)) * :NODE SB-C::NODE ; :IMPORTANT NIL) ; (SB-C::OVERFLOW-TRANSFORM-UNKNOWN-X 'SB-KERNEL:OVERFLOW- SB-C::X SB-C::Y ; SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM - ; ((SB-C::X SB-C::Y) ((OR SB-EXT:WORD SB-VM:SIGNED-WORD) T) * :NODE SB-C::NODE ; :IMPORTANT NIL) ; (SB-C::OVERFLOW-TRANSFORM-UNKNOWN-X 'SB-KERNEL:OVERFLOW- SB-C::X SB-C::Y ; SB-C::NODE T)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %NEGATE ; (SB-C:DEFTRANSFORM SB-KERNEL:%NEGATE ; ((SB-C::X) ((OR SB-EXT:WORD SB-VM:SIGNED-WORD)) * :NODE SB-C::NODE :IMPORTANT ; NIL) ; (SB-C::OVERFLOW-TRANSFORM-1 'SB-KERNEL:OVERFLOW-NEGATE SB-C::X SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; FLOOR ; (SB-C:DEFTRANSFORM SB-XC:FLOOR ; ((SB-XC:NUMBER SB-C::DIVISOR) (INTEGER INTEGER) * :NODE SB-C::NODE) ; (LET ((SB-C::TRUNCATE-TYPE #)) ; (IF (SB-C::TEMPLATE-TRANSLATES 'SB-XC:TRUNCATE # #) (LET* # #) ; (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; CEILING ; (SB-C:DEFTRANSFORM SB-XC:CEILING ; ((SB-XC:NUMBER SB-C::DIVISOR) (INTEGER INTEGER) * :NODE SB-C::NODE) ; (LET ((SB-C::TRUNCATE-TYPE #)) ; (IF (SB-C::TEMPLATE-TRANSLATES 'SB-XC:TRUNCATE # #) (LET* # #) ; (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:CEILING ; ((SB-XC:NUMBER SB-C::DIVISOR) ((SB-XC:REAL # #) (INTEGER * #)) * :IMPORTANT ; NIL) ; (SB-INT:QUASIQUOTE (VALUES 0 SB-XC:NUMBER))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:CEILING ; ((SB-XC:NUMBER SB-C::DIVISOR) ((SB-XC:REAL # #) (INTEGER # *)) * :IMPORTANT ; NIL) ; (SB-INT:QUASIQUOTE (VALUES 0 SB-XC:NUMBER))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; FLOOR ; (SB-C:DEFTRANSFORM SB-XC:FLOOR ; ((SB-XC:NUMBER SB-C::DIVISOR) ((SB-XC:REAL # #) (INTEGER * #)) * :IMPORTANT ; NIL) ; (SB-INT:QUASIQUOTE (VALUES 0 SB-XC:NUMBER))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:FLOOR ; ((SB-XC:NUMBER SB-C::DIVISOR) ((SB-XC:REAL # #) (INTEGER # *)) * :IMPORTANT ; NIL) ; (SB-INT:QUASIQUOTE (VALUES 0 SB-XC:NUMBER))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; TRUNCATE ; (SB-C:DEFTRANSFORM SB-XC:TRUNCATE ; ((SB-XC:NUMBER SB-C::DIVISOR) ((AND # # #) (AND INTEGER #)) * :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (VALUES 0 SB-XC:NUMBER))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; FLOOR ; (SB-C:DEFTRANSFORM SB-XC:FLOOR ; ((SB-C::X SB-C::Y) (INTEGER (SB-INT:CONSTANT-ARG INTEGER)) *) ; "convert division by 2^k to shift" (SB-C::FROB SB-C::Y NIL)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; CEILING ; (SB-C:DEFTRANSFORM SB-XC:CEILING ; ((SB-C::X SB-C::Y) (INTEGER (SB-INT:CONSTANT-ARG INTEGER)) *) ; "convert division by 2^k to shift" (SB-C::FROB SB-C::Y T)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; TRUNCATE ; (SB-C:DEFTRANSFORM SB-XC:TRUNCATE ; ((SB-C::X SB-C::Y) (INTEGER (SB-INT:CONSTANT-ARG INTEGER)) * :RESULT ; SB-C::RESULT :NODE SB-C::NODE) ; "convert division by 2^k to shift" ; (LET* ((SB-C::Y #) (SB-C::Y-ABS #) (SB-C::LEN #)) ; (UNLESS (AND # #) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) (LET* (# #) (LET # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:TRUNCATE ; ((SB-C::X SB-C::Y) (SB-XC:RATIONAL (OR # #)) * :IMPORTANT NIL) ; (IF (SB-C::SAME-LEAF-REF-P SB-C::X SB-C::Y) (SB-INT:QUASIQUOTE (VALUES 1 0)) ; (SB-C::GIVE-UP-IR1-TRANSFORM))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:TRUNCATE ; ((SB-C::X SB-C::Y) (SB-EXT:WORD (SB-INT:CONSTANT-ARG SB-EXT:WORD)) * :POLICY ; (AND (> SPEED COMPILATION-SPEED) (> SPEED SPACE)) :NODE SB-C::NODE :IMPORTANT ; NIL) ; "convert integer division to multiplication" ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (LET* ((SB-C::Y #) (SB-C::X-TYPE #) (SB-C::MAX-X #)) ; (WHEN (SB-XC:ZEROP #) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (SB-INT:QUASIQUOTE (LET* # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:TRUNCATE ; ((SB-C::X SB-C::Y) (SB-XC:RATIONAL SB-XC:RATIONAL) * :IMPORTANT NIL) ; (FLET ((SB-C::STRIP # #)) (LET* (# # # # # # # #) (IF # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; ASH ; (SB-C::DEF ASH 0 SB-C::X) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; LOGAND ; (SB-C::DEF LOGAND -1 SB-C::X) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C::DEF LOGAND 0 0) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; LOGIOR ; (SB-C::DEF LOGIOR 0 SB-C::X) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C::DEF LOGIOR -1 -1) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; LOGXOR ; (SB-C::DEF LOGXOR -1 (LOGNOT SB-C::X)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C::DEF LOGXOR 0 SB-C::X) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; LOGANDC2 ; (SB-C::DEF LOGANDC2 0 SB-C::X) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; LOGAND ; (SB-C:DEFTRANSFORM LOGAND ; ((SB-C::X SB-C::Y) (T (SB-INT:CONSTANT-ARG INTEGER)) *) ; "fold identity operation" ; (LET* ((SB-C::Y #) (SB-C::WIDTH #)) ; (UNLESS (AND # #) (SB-C::GIVE-UP-IR1-TRANSFORM)) 'SB-C::X)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM LOGAND ; ((SB-C::X SB-C::Y) (T (SB-INT:CONSTANT-ARG INTEGER)) SB-EXT:WORD :NODE ; SB-C::NODE :IMPORTANT NIL) ; (LET* ((SB-C::HIGH #) (SB-C::MASK #) (SB-C::CUT #)) ; (IF (= SB-C::CUT SB-C::MASK) (SB-C::GIVE-UP-IR1-TRANSFORM) ; (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; LOGANDC2 ; (SB-C:DEFTRANSFORM LOGANDC2 ((SB-C::X SB-C::Y) ((SB-INT:CONSTANT-ARG #) T) *) ; (SB-INT:QUASIQUOTE (LOGNOT SB-C::Y))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM LOGANDC2 ; ((SB-C::X SB-C::Y) * * :IMPORTANT NIL :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (IF (AND (NOT #) (SB-KERNEL:CSUBTYPEP # #) (SB-KERNEL:CSUBTYPEP # #)) ; (SB-INT:QUASIQUOTE (LOGAND SB-C::X #)) (SB-C::GIVE-UP-IR1-TRANSFORM))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; MASK-SIGNED-FIELD ; (SB-C:DEFTRANSFORM SB-C::MASK-SIGNED-FIELD ; ((SB-C::SIZE SB-C::X) ((SB-INT:CONSTANT-ARG T) T) *) "fold identity operation" ; (LET ((SB-C::SIZE #)) (COND (# 0) (# 'SB-C::X) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; LOGIOR ; (SB-C:DEFTRANSFORM LOGIOR ; ((SB-C::X SB-C::Y) (T (SB-INT:CONSTANT-ARG INTEGER)) *) ; "fold identity operation" ; (LET* ((SB-C::Y #) (SB-C::WIDTH #)) ; (UNLESS (SB-KERNEL:CSUBTYPEP # #) (SB-C::GIVE-UP-IR1-TRANSFORM)) 'SB-C::X)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; LOGAND ; (SB-C::DEF LOGAND) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; LOGIOR ; (SB-C::DEF LOGIOR) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; LOGXOR ; (SB-C::DEF LOGXOR) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; LOGTEST ; (SB-C::DEF LOGTEST :FOLDED (LOGAND)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; |+| ; (SB-C::DEF + :TYPE SB-XC:RATIONAL :FOLDED (+ -)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; * ; (SB-C::DEF * :TYPE SB-XC:RATIONAL :FOLDED (* /)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; * ; (SB-C:DEFTRANSFORM * ; ((SB-C::X SB-C::Y) (SB-XC:RATIONAL (SB-INT:CONSTANT-ARG RATIO))) ; (LET ((SB-C::Y #)) ; (IF (INTEGERP SB-C::Y) (SB-INT:QUASIQUOTE #) (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; / ; (SB-C:DEFTRANSFORM / ; ((SB-C::X SB-C::Y) (SB-XC:RATIONAL (SB-INT:CONSTANT-ARG RATIO))) ; (LET ((SB-C::Y #)) ; (IF (INTEGERP SB-C::Y) (SB-INT:QUASIQUOTE #) (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; MASK-SIGNED-FIELD ; (SB-C:DEFTRANSFORM SB-C::MASK-SIGNED-FIELD ; ((SB-C::WIDTH SB-C::X) ((SB-INT:CONSTANT-ARG UNSIGNED-BYTE) T)) ; "Fold mask-signed-field/mask-signed-field of constant width" ; (SB-INT:BINDING* ; ((SB-C::NODE #) (NIL #) (NIL #) (SB-C::X-WIDTH #) (NIL #) (SB-C::X-WIDTH #)) ; (UNLESS (TYPEP SB-C::X-WIDTH 'UNSIGNED-BYTE) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (SB-C::SPLICE-FUN-ARGS SB-C::X 'SB-C::MASK-SIGNED-FIELD 2) ; (SB-INT:QUASIQUOTE (LAMBDA # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; |-| ; (SB-C:DEFTRANSFORM - ; ((SB-C::X SB-C::Y) ((SB-INT:CONSTANT-ARG #) SB-XC:RATIONAL) *) ; "convert (- 0 x) to negate" '(SB-KERNEL:%NEGATE SB-C::Y)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; * ; (SB-C:DEFTRANSFORM * ; ((SB-C::X SB-C::Y) (SB-XC:RATIONAL (SB-INT:CONSTANT-ARG #)) *) ; "convert (* x 0) to 0" 0) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %NEGATE ; (SB-C:DEFTRANSFORM SB-KERNEL:%NEGATE ((SB-C::X) (SB-XC:RATIONAL)) ; "Eliminate %negate/%negate of rationals" ; (SB-C::SPLICE-FUN-ARGS SB-C::X 'SB-KERNEL:%NEGATE 1) ; '(THE SB-XC:RATIONAL SB-C::X)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-KERNEL:%NEGATE ((SB-C::X) (SB-XC:NUMBER)) ; "Combine %negate/*" ; (LET ((SB-C::USE #) SB-C::ARG) ; (UNLESS (AND # # # #) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (SB-C::SPLICE-FUN-ARGS SB-C::X '* 2) (SB-INT:QUASIQUOTE (LAMBDA # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; |+| ; (SB-C:DEFTRANSFORM + ; ((SB-C::X SB-C::Y) (SB-C::EXACT-NUMBER (SB-INT:CONSTANT-ARG #)) *) ; "fold zero arg" 'SB-C::X) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; |-| ; (SB-C:DEFTRANSFORM - ; ((SB-C::X SB-C::Y) (SB-C::EXACT-NUMBER (SB-INT:CONSTANT-ARG #)) *) ; "fold zero arg" 'SB-C::X) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; * ; (SB-C::DEF * SB-C::X (SB-KERNEL:%NEGATE SB-C::X) SB-XC:NUMBER) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; / ; (SB-C::DEF / SB-C::X (SB-KERNEL:%NEGATE SB-C::X) SB-XC:NUMBER) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; EXPT ; (SB-C::DEF SB-XC:EXPT SB-C::X (/ 1 SB-C::X) ; (OR SB-C::EXACT-NUMBER SB-XC:REAL)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; |+| ; (SB-C:DEFTRANSFORM + ((SB-C::X SB-C::Y) (SB-XC:NUMBER SB-XC:NUMBER)) ; (COND ; ((SB-C::SPLICE-FUN-ARGS SB-C::Y 'SB-KERNEL:%NEGATE 1 NIL) ; (SB-INT:QUASIQUOTE #)) ; ((SB-C::SPLICE-FUN-ARGS SB-C::X 'SB-KERNEL:%NEGATE 1 NIL) ; (SB-INT:QUASIQUOTE #)) ; (T (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; |-| ; (SB-C:DEFTRANSFORM - ((SB-C::X SB-C::Y) (SB-XC:NUMBER SB-XC:NUMBER)) ; (SB-C::SPLICE-FUN-ARGS SB-C::Y 'SB-KERNEL:%NEGATE 1) ; (SB-INT:QUASIQUOTE (+ SB-C::X SB-C::Y))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; EXPT ; (SB-C:DEFTRANSFORM SB-XC:EXPT ; ((SB-C::X SB-C::Y) (T (SB-INT:CONSTANT-ARG SB-XC:REAL)) *) ; "recode as multiplication or sqrt" ; (LET ((SB-C::VAL #)) ; (UNLESS (SB-C::NOT-MORE-CONTAGIOUS SB-C::Y SB-C::X) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (COND (# #) (# '#) (# '#) (# '#) (# '#) (# '#) (# '#) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:EXPT ; ((SB-C::X SB-C::Y) ((SB-INT:CONSTANT-ARG #) INTEGER) *) ; "recode as an ODDP check" ; (LET ((SB-C::VAL #)) (IF (EQL -1 SB-C::VAL) '(- 1 #) (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-XC:EXPT ; ((SB-C::X SB-C::Y) ((OR SB-XC:RATIONAL #) INTEGER) * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE (SB-KERNEL::INTEXP SB-C::X SB-C::Y))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; ASH ; (SB-C::DEF ASH) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; / ; (SB-C::DEF /) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; TRUNCATE ; (SB-C::DEF SB-XC:TRUNCATE) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; ROUND ; (SB-C::DEF SB-XC:ROUND) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; FLOOR ; (SB-C::DEF SB-XC:FLOOR) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; CEILING ; (SB-C::DEF SB-XC:CEILING) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; TRUNCATE ; (SB-C::DEF SB-XC:TRUNCATE) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; ROUND ; (SB-C::DEF SB-XC:ROUND) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; FLOOR ; (SB-C::DEF SB-XC:FLOOR) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; CEILING ; (SB-C::DEF SB-XC:CEILING) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; FTRUNCATE ; (SB-C::DEF SB-XC:FTRUNCATE T) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; FROUND ; (SB-C::DEF SB-XC:FROUND T) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; FFLOOR ; (SB-C::DEF SB-XC:FFLOOR T) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; FCEILING ; (SB-C::DEF SB-XC:FCEILING T) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; CHAR-EQUAL ; (SB-C:DEFTRANSFORM CHAR-EQUAL ; ((SB-C::A SB-C::B) (BASE-CHAR BASE-CHAR) * :POLICY (>= SPEED SPACE) :NODE ; SB-C::NODE) ; "open code" (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :CONSTRAINT) ; '(LET* ((SB-C::AC #) (SB-C::BC #) (SB-C::SUM #)) ; (OR (SB-XC:ZEROP SB-C::SUM) (WHEN # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM CHAR-EQUAL ; ((SB-C::A SB-C::B) (BASE-CHAR CHARACTER) * :POLICY (>= SPEED SPACE) :NODE ; SB-C::NODE) ; "open code" (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :CONSTRAINT) ; '(LET* ((SB-C::AC #) (SB-C::BC #) (SB-C::SUM #)) ; (OR (SB-XC:ZEROP SB-C::SUM) (WHEN # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM CHAR-EQUAL ; ((SB-C::A SB-C::B) (CHARACTER BASE-CHAR) * :POLICY (>= SPEED SPACE) :NODE ; SB-C::NODE) ; "open code" (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :CONSTRAINT) ; '(LET* ((SB-C::AC #) (SB-C::BC #) (SB-C::SUM #)) ; (OR (SB-XC:ZEROP SB-C::SUM) (WHEN # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM CHAR-EQUAL ; ((SB-C::A SB-C::B) (T (SB-INT:CONSTANT-ARG CHARACTER)) * :NODE SB-C::NODE) ; (SB-C::TRANSFORM-CONSTANT-CHAR-EQUAL 'SB-C::A SB-C::B)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM CHAR-EQUAL ((SB-C::A SB-C::B)) ; (COND ((SB-C::SAME-LEAF-REF-P SB-C::A SB-C::B) T) ; ((OR # #) (SB-INT:QUASIQUOTE #)) (T (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; CHAR-UPCASE ; (SB-C:DEFTRANSFORM CHAR-UPCASE ((SB-C::X) (BASE-CHAR)) "open code" ; '(LET ((SB-C::N-CODE #)) (IF (OR # # #) (SB-XC:CODE-CHAR #) SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; CHAR-DOWNCASE ; (SB-C:DEFTRANSFORM CHAR-DOWNCASE ((SB-C::X) (BASE-CHAR)) "open code" ; '(LET ((SB-C::N-CODE #)) (IF (OR # # #) (SB-XC:CODE-CHAR #) SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; CHAR= ; (SB-C:DEFTRANSFORM CHAR= ((SB-C::X SB-C::Y) * *) "Simple equality transform" ; (LET ((SB-C::USE #) SB-C::ARG) (DECLARE (IGNORABLE SB-C::USE SB-C::ARG)) ; (COND (# T) (# NIL) (# # #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; EQ ; (SB-C:DEFTRANSFORM EQ ((SB-C::X SB-C::Y) * *) "Simple equality transform" ; (LET ((SB-C::USE #) SB-C::ARG) (DECLARE (IGNORABLE SB-C::USE SB-C::ARG)) ; (COND (# T) (# NIL) (# # #) (#) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; EQL ; (SB-C:DEFTRANSFORM EQL ((SB-C::X SB-C::Y) * * :NODE SB-C::NODE) ; "convert to simpler equality predicate" ; (LET* ((SB-C::X-TYPE #) (SB-C::Y-TYPE #) (SB-C::CHAR-TYPE #)) ; (COND (# T) (# NIL) (# '#) (# '#) (#) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; EQUAL ; (SB-C:DEFTRANSFORM EQUAL ((SB-C::X SB-C::Y) * *) ; "convert to simpler equality predicate" ; (LET ((SB-C::X-TYPE #) (SB-C::Y-TYPE #)) (FLET (#) (COND # # # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; EQUALP ; (SB-C:DEFTRANSFORM EQUALP ((SB-C::X SB-C::Y) * *) ; "convert to simpler equality predicate" ; (LET ((SB-C::X-TYPE #) (SB-C::Y-TYPE #)) (FLET (#) (COND # # # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; = ; (SB-C:DEFTRANSFORM = ((SB-C::X SB-C::Y) (SB-XC:NUMBER SB-XC:NUMBER) *) ; "open code" ; (LET ((SB-C::X-TYPE #) (SB-C::Y-TYPE #)) (COND (# #) (# '#) (# NIL) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; >= ; (SB-C:DEFTRANSFORM >= ; ((SB-C::X SB-C::Y) (SB-XC:NUMBER SB-XC:NUMBER) * :NODE SB-C::NODE) ; "invert or open code" (SB-C::MAYBE-INVERT SB-C::NODE '> '< SB-C::X SB-C::Y)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; <= ; (SB-C:DEFTRANSFORM <= ; ((SB-C::X SB-C::Y) (SB-XC:NUMBER SB-XC:NUMBER) * :NODE SB-C::NODE) ; "invert or open code" (SB-C::MAYBE-INVERT SB-C::NODE '< '> SB-C::X SB-C::Y)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; = ; (SB-C::DEF = =) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; < ; (SB-C::DEF < >) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; > ; (SB-C::DEF > <) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; <= ; (SB-C::DEF <= >=) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; >= ; (SB-C::DEF >= <=) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; CHAR< ; (SB-C:DEFTRANSFORM CHAR< ((SB-C::X SB-C::Y) (CHARACTER CHARACTER) *) ; (SB-C::IR1-TRANSFORM-CHAR< SB-C::X SB-C::Y SB-C::X SB-C::Y 'CHAR>)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; CHAR> ; (SB-C:DEFTRANSFORM CHAR> ((SB-C::X SB-C::Y) (CHARACTER CHARACTER) *) ; (SB-C::IR1-TRANSFORM-CHAR< SB-C::Y SB-C::X SB-C::X SB-C::Y 'CHAR<)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; < ; (SB-C::DEF < SB-XC:CEILING) ; ==> ; (SB-C:DEFTRANSFORM < ; ((SB-C::X SB-C::Y) (SB-XC:RATIONAL (SB-INT:CONSTANT-ARG SB-XC:FLOAT))) ; "open-code RATIONAL to FLOAT comparison" ; (LET ((SB-C::Y #)) ; (WHEN (SB-KERNEL:FLOAT-INFINITY-OR-NAN-P SB-C::Y) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (SETF SB-C::Y (SB-XC:RATIONAL SB-C::Y)) (SB-INT:QUASIQUOTE (# SB-C::X #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM < ; ((SB-C::X SB-C::Y) (INTEGER (SB-INT:CONSTANT-ARG RATIO))) ; "open-code INTEGER to RATIO comparison" ; (SB-INT:QUASIQUOTE ; (# SB-C::X ; #))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; > ; (SB-C::DEF > SB-XC:FLOOR) ; ==> ; (SB-C:DEFTRANSFORM > ; ((SB-C::X SB-C::Y) (SB-XC:RATIONAL (SB-INT:CONSTANT-ARG SB-XC:FLOAT))) ; "open-code RATIONAL to FLOAT comparison" ; (LET ((SB-C::Y #)) ; (WHEN (SB-KERNEL:FLOAT-INFINITY-OR-NAN-P SB-C::Y) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (SETF SB-C::Y (SB-XC:RATIONAL SB-C::Y)) (SB-INT:QUASIQUOTE (# SB-C::X #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM > ; ((SB-C::X SB-C::Y) (INTEGER (SB-INT:CONSTANT-ARG RATIO))) ; "open-code INTEGER to RATIO comparison" ; (SB-INT:QUASIQUOTE ; (# :KIND 0> SB-C::X ; #))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; <= ; (SB-C::DEF <= < SB-XC:CEILING) ; ==> ; (SB-C:DEFTRANSFORM <= ; ((SB-C::X SB-C::Y) (SB-XC:RATIONAL (SB-INT:CONSTANT-ARG SB-XC:FLOAT))) ; "open-code RATIONAL to FLOAT comparison" ; (LET ((SB-C::Y #)) ; (WHEN (SB-KERNEL:FLOAT-INFINITY-OR-NAN-P SB-C::Y) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (SETF SB-C::Y (SB-XC:RATIONAL SB-C::Y)) ; (MULTIPLE-VALUE-BIND (SB-C::QOUT SB-XC:REM) (IF # # #) ; (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM <= ; ((SB-C::X SB-C::Y) (INTEGER (SB-INT:CONSTANT-ARG RATIO))) ; "open-code INTEGER to RATIO comparison" ; (SB-INT:QUASIQUOTE ; (# SB-C::X ; #))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; >= ; (SB-C::DEF >= > SB-XC:FLOOR) ; ==> ; (SB-C:DEFTRANSFORM >= ; ((SB-C::X SB-C::Y) (SB-XC:RATIONAL (SB-INT:CONSTANT-ARG SB-XC:FLOAT))) ; "open-code RATIONAL to FLOAT comparison" ; (LET ((SB-C::Y #)) ; (WHEN (SB-KERNEL:FLOAT-INFINITY-OR-NAN-P SB-C::Y) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (SETF SB-C::Y (SB-XC:RATIONAL SB-C::Y)) ; (MULTIPLE-VALUE-BIND (SB-C::QOUT SB-XC:REM) (IF # # #) ; (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM >= ; ((SB-C::X SB-C::Y) (INTEGER (SB-INT:CONSTANT-ARG RATIO))) ; "open-code INTEGER to RATIO comparison" ; (SB-INT:QUASIQUOTE ; (# :KIND 0> SB-C::X ; #))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; < ; (SB-C::DEF < SB-C::I SB-C::F (INTEGER -4611686018427387904) FIXNUM) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; > ; (SB-C::DEF > SB-C::F SB-C::I FIXNUM (INTEGER -4611686018427387904)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C::DEF > SB-C::I SB-C::F (INTEGER * 4611686018427387903) FIXNUM) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; < ; (SB-C::DEF < SB-C::F SB-C::I FIXNUM (INTEGER * 4611686018427387903)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; > ; (SB-C::DEF > SB-C::I SB-C::F (INTEGER -4611686018427387904) FIXNUM T) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; < ; (SB-C::DEF < SB-C::F SB-C::I FIXNUM (INTEGER -4611686018427387904) T) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C::DEF < SB-C::I SB-C::F (INTEGER * 4611686018427387903) FIXNUM T) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; > ; (SB-C::DEF > SB-C::F SB-C::I FIXNUM (INTEGER * 4611686018427387903) T) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; < ; (SB-C:DEFTRANSFORM < ; ((SB-C::X SB-C::Y) (INTEGER (EQL 4611686018427387904)) * :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (NOT (> SB-C::X SB-XC:MOST-POSITIVE-FIXNUM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; > ; (SB-C:DEFTRANSFORM > ; ((SB-C::X SB-C::Y) (INTEGER (EQL -4611686018427387905)) * :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (NOT (< SB-C::X SB-XC:MOST-NEGATIVE-FIXNUM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; = ; (SB-C:DEFTRANSFORM = ; ((SB-C::X SB-C::Y) (SB-XC:RATIONAL (SB-INT:CONSTANT-ARG SB-XC:FLOAT))) ; "open-code RATIONAL to FLOAT comparison" ; (LET ((SB-C::Y #)) ; (WHEN (SB-KERNEL:FLOAT-INFINITY-OR-NAN-P SB-C::Y) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (SETF SB-C::Y (SB-XC:RATIONAL SB-C::Y)) ; (IF (AND # #) NIL (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM = ((SB-C::X SB-C::Y) (T (SB-INT:CONSTANT-ARG INTEGER))) ; (LET ((SB-C::Y #)) ; (IF (AND # # #) (SB-INT:QUASIQUOTE #) (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM = ; ((SB-C::X SB-C::Y) (INTEGER (SB-INT:CONSTANT-ARG RATIO))) ; "constant-fold INTEGER to RATIO comparison" NIL) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; LOGANDC1 ; (SB-C:DEFTRANSFORM LOGANDC1 ((SB-C::X SB-C::Y)) ; (SB-INT:QUASIQUOTE (LOGANDC2 SB-C::Y SB-C::X))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; GCD ; (SB-C:DEFTRANSFORM GCD ((SB-C::X SB-C::Y) ((AND FIXNUM #) (AND FIXNUM #))) ; (SB-INT:QUASIQUOTE (SB-KERNEL::FIXNUM-GCD SB-C::X SB-C::Y))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; LCM ; (SB-C:DEFTRANSFORM LCM ((SB-C::X SB-C::Y)) ; (COND ((OR # #) '(SB-XC:ABS SB-C::X)) ; ((SB-KERNEL:CSUBTYPEP # #) '(SB-XC:ABS SB-C::Y)) ((OR # #) 0) ; (T (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; / ; (SB-C:DEFTRANSFORM / ((NUMERATOR DENOMINATOR) (INTEGER INTEGER)) ; "convert x/2^k to shift" ; (UNLESS (SB-C:CONSTANT-LVAR-P DENOMINATOR) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (LET* ((DENOMINATOR #) (SB-C::BITS #)) ; (UNLESS (AND # #) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (LET (#) (UNLESS # #) (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %REST-VALUES ; (SB-C:DEFTRANSFORM SB-C::%REST-VALUES ((LIST SB-C::CONTEXT SB-C::SKIP COUNT)) ; (IF (SB-C::REST-VAR-MORE-CONTEXT-OK LIST) ; (SB-INT:QUASIQUOTE (SB-C:%MORE-ARG-VALUES SB-C::CONTEXT SB-C::SKIP COUNT)) ; (SB-INT:QUASIQUOTE (VALUES-LIST #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %REST-REF ; (SB-C:DEFTRANSFORM SB-C::%REST-REF ; ((SB-C::N LIST SB-C::CONTEXT COUNT &OPTIONAL SB-C::LENGTH-CHECKED-P)) ; (COND ((NOT #) (SB-INT:QUASIQUOTE #)) ; ((AND SB-C::LENGTH-CHECKED-P # #) (SB-INT:QUASIQUOTE #)) ; (T (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %REST-LENGTH ; (SB-C:DEFTRANSFORM SB-C::%REST-LENGTH ((LIST SB-C::CONTEXT COUNT)) ; (IF (SB-C::REST-VAR-MORE-CONTEXT-OK LIST) 'COUNT ; (SB-INT:QUASIQUOTE (LENGTH LIST)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %REST-NULL ; (SB-C:DEFTRANSFORM SB-C::%REST-NULL ((SB-C::OP LIST SB-C::CONTEXT COUNT)) ; (SB-INT:AVER (SB-C:CONSTANT-LVAR-P SB-C::OP)) ; (IF (SB-C::REST-VAR-MORE-CONTEXT-OK LIST) (SB-INT:QUASIQUOTE (EQL 0 COUNT)) ; (SB-INT:QUASIQUOTE (# LIST)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %REST-TRUE ; (SB-C:DEFTRANSFORM SB-C::%REST-TRUE ((LIST SB-C::CONTEXT COUNT)) ; (IF (SB-C::REST-VAR-MORE-CONTEXT-OK LIST) (SB-INT:QUASIQUOTE (NOT #)) ; (SB-INT:QUASIQUOTE LIST))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; FORMAT ; (SB-C:DEFTRANSFORM FORMAT ; ((SB-C::DEST SB-C::CONTROL &REST SB-C::ARGS) (T SIMPLE-STRING &REST T) * ; :POLICY (>= SPEED SPACE)) ; (UNLESS (SB-C:CONSTANT-LVAR-P SB-C::CONTROL) ; (SB-C::GIVE-UP-IR1-TRANSFORM "The control string is not a constant.")) ; (LET* ((SB-C::ARGC #) (SB-C::ARG-NAMES #) (SB-C::CONTROL #) (SB-C::EXPR #)) ; (SB-INT:QUASIQUOTE (LAMBDA # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM FORMAT ; ((STREAM SB-C::CONTROL &REST SB-C::ARGS) (STREAM FUNCTION &REST T)) ; (LET ((SB-C::ARG-NAMES #)) (SB-INT:QUASIQUOTE (LAMBDA # # NIL)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM FORMAT ; ((SB-C::TEE SB-C::CONTROL &REST SB-C::ARGS) ((MEMBER T) FUNCTION &REST T)) ; (LET ((SB-C::ARG-NAMES #)) (SB-INT:QUASIQUOTE (LAMBDA # # # NIL)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM FORMAT ; ((STREAM SB-C::CONTROL &REST SB-C::ARGS) (NULL FUNCTION &REST T)) ; (LET ((SB-C::ARG-NAMES #)) (SB-INT:QUASIQUOTE (LAMBDA # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM FORMAT ; ((STREAM SB-C::CONTROL &REST SB-C::ARGS) ; (NULL (SB-INT:CONSTANT-ARG STRING) &REST T)) ; (LET ((SB-C::TOKENIZED #)) ; (UNLESS (SB-C::CONCATENATE-FORMAT-P SB-C::TOKENIZED SB-C::ARGS) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (LET* (# # #) (IF # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SB-FORMAT::PRINC-MULTIPLE-TO-STRING ; (SB-C:DEFTRANSFORM SB-FORMAT::PRINC-MULTIPLE-TO-STRING ; ((&REST SB-C::ARGS) (&REST STRING) * :IMPORTANT NIL) ; (LET ((SB-C::ARG-NAMES #)) (SB-INT:QUASIQUOTE (LAMBDA # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SB-FORMAT::FORMAT-INTEGER ; (SB-C:DEFTRANSFORM SB-FORMAT::FORMAT-INTEGER ; ((SB-C::OBJECT SB-C::BASE STREAM) * * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :IR1-PHASES) ; (SB-INT:QUASIQUOTE (LET (# #) (PRINC SB-C::OBJECT STREAM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-FORMAT::FORMAT-INTEGER ; ((SB-C::OBJECT SB-C::BASE STREAM) (INTEGER T T)) ; (SB-INT:QUASIQUOTE ; (SB-IMPL::%OUTPUT-INTEGER-IN-BASE SB-C::OBJECT SB-C::BASE STREAM))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; PATHNAME ; (SB-C:DEFTRANSFORM PATHNAME ((SB-C::PATHSPEC) (PATHNAME) *) 'SB-C::PATHSPEC) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM PATHNAME ((SB-C::PATHSPEC) (STRING) *) ; '(VALUES (PARSE-NAMESTRING SB-C::PATHSPEC))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; ERROR ; (SB-C:DEFTRANSFORM ERROR ; ((SB-C::X &KEY SB-C::DATUM SB-C::EXPECTED-TYPE SB-KERNEL:FORMAT-CONTROL ; SB-C::FORMAT-ARGUMENTS)) ; (IF (AND SB-KERNEL:FORMAT-CONTROL SB-C::FORMAT-ARGUMENTS (LET # #)) ; (COND (# #) (# #) (T #)) (SB-C::GIVE-UP-IR1-TRANSFORM))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; ARRAY-ELEMENT-TYPE ; (SB-C:DEFTRANSFORM SB-XC:ARRAY-ELEMENT-TYPE ((ARRAY)) ; (LET ((TYPE #)) (FLET (#) (COND # # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SORT ; (SB-C:DEFTRANSFORM SORT ; ((LIST SB-C::PREDICATE &KEY SB-C::KEY) (LIST T &REST T) *) ; (SB-INT:QUASIQUOTE ; (SB-IMPL::STABLE-SORT-LIST LIST ; (SB-KERNEL:%COERCE-CALLABLE-TO-FUN SB-C::PREDICATE) ; (IF SB-C::KEY # #'IDENTITY)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SORT ; ((VECTOR SB-C::PREDICATE &KEY SB-C::KEY) (VECTOR T &REST T) * :POLICY ; (= SPACE 0)) ; (WHEN (EQ (SB-C::ARRAY-TYPE-UPGRADED-ELEMENT-TYPE #) SB-KERNEL:*WILD-TYPE*) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (SB-INT:QUASIQUOTE (PROGN (SB-KERNEL:WITH-ARRAY-DATA # #) VECTOR))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; STABLE-SORT ; (SB-C:DEFTRANSFORM STABLE-SORT ; ((SEQUENCE SB-C::PREDICATE &KEY SB-C::KEY) ((OR VECTOR LIST) T)) ; (LET ((SB-C::SEQUENCE-TYPE #)) (COND (# #) (# #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; STRING-TO-OCTETS ; (SB-C:DEFTRANSFORM SB-EXT:STRING-TO-OCTETS ; ((STRING &KEY SB-C::EXTERNAL-FORMAT (SB-C::START 0) SB-C::END ; SB-C::NULL-TERMINATE) ; (T &REST T) * :NODE SB-C::NODE) ; "precompute external-format lookup" ; (UNLESS SB-C::EXTERNAL-FORMAT (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (UNLESS (SB-C:CONSTANT-LVAR-P SB-C::EXTERNAL-FORMAT) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (LET ((SB-C::XF-DESIGNATOR #)) ; (WHEN (EQL SB-C::XF-DESIGNATOR :DEFAULT) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (LET (#) (UNLESS SB-C::XF #) (LET # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; OCTETS-TO-STRING ; (SB-C:DEFTRANSFORM SB-EXT:OCTETS-TO-STRING ; ((VECTOR &KEY SB-C::EXTERNAL-FORMAT (SB-C::START 0) SB-C::END) (T &REST T) * ; :NODE SB-C::NODE) ; "precompute external-format lookup" ; (UNLESS SB-C::EXTERNAL-FORMAT (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (UNLESS (SB-C:CONSTANT-LVAR-P SB-C::EXTERNAL-FORMAT) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (LET ((SB-C::XF-DESIGNATOR #)) ; (WHEN (EQL SB-C::XF-DESIGNATOR :DEFAULT) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (LET (#) (UNLESS SB-C::XF #) (LET # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SLEEP ; (SB-C:DEFTRANSFORM SLEEP ((SB-C::SECONDS) ((INTEGER 0 100000000))) ; (SB-INT:QUASIQUOTE ; (IF SB-IMPL::*DEADLINE* (LOCALLY # #) (SB-UNIX:NANOSLEEP SB-C::SECONDS 0)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SLEEP ((SB-C::SECONDS) ((SB-INT:CONSTANT-ARG #))) ; (LET ((SB-C::SECONDS-VALUE #)) ; (MULTIPLE-VALUE-BIND (SB-C::SECONDS SB-C::NANO) ; (SB-IMPL::SPLIT-SECONDS-FOR-SLEEP SB-C::SECONDS-VALUE) (IF # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; MAKE-STRING-OUTPUT-STREAM ; (SB-C:DEFTRANSFORM MAKE-STRING-OUTPUT-STREAM ((&KEY SB-C::ELEMENT-TYPE)) ; (CASE (COND (# 'CHARACTER) (# NIL) (T #)) (CHARACTER (SB-INT:QUASIQUOTE #)) ; (BASE-CHAR (SB-INT:QUASIQUOTE #)) (T (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SYMBOL-GLOBAL-VALUE ; (SB-C:DEFTRANSFORM SB-EXT:SYMBOL-GLOBAL-VALUE ((SYMBOL)) ; (OR (SB-C::XFORM SYMBOL :GLOBAL) (SB-C::GIVE-UP-IR1-TRANSFORM))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SYMBOL-VALUE ; (SB-C:DEFTRANSFORM SYMBOL-VALUE ((SYMBOL)) ; (OR (SB-C::XFORM SYMBOL :SPECIAL) (SB-C::GIVE-UP-IR1-TRANSFORM))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SYMBOL-VALUE ((SYMBOL) ((SB-INT:CONSTANT-ARG SYMBOL))) ; (LET* ((SYMBOL #) (SB-C::KIND #)) ; (IF (AND # # #) SYMBOL (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; BOUNDP ; (SB-C:DEFTRANSFORM BOUNDP ; ((SYMBOL) ((SB-INT:CONSTANT-ARG SYMBOL)) * :POLICY (< SAFETY 3)) ; (IF (SB-C::ALWAYS-BOUNDP (SB-C:LVAR-VALUE SYMBOL)) T ; (SB-C::GIVE-UP-IR1-TRANSFORM))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SET-SYMBOL-GLOBAL-VALUE ; (SB-C:DEFTRANSFORM SB-KERNEL:SET-SYMBOL-GLOBAL-VALUE ; ((SYMBOL SB-C::VALUE) ((SB-INT:CONSTANT-ARG SYMBOL) T)) ; (SB-C::XFORM SYMBOL :GLOBAL)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SET ; (SB-C:DEFTRANSFORM SET ; ((SYMBOL SB-C::VALUE) ((SB-INT:CONSTANT-ARG SYMBOL) T)) ; (SB-C::XFORM SYMBOL :SPECIAL)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SYMBOL-PACKAGE ; (SB-C:DEFTRANSFORM XC-STRICT-CL:SYMBOL-PACKAGE ((SB-C::S) (SYMBOL) *) ; (IF (SB-C::CAST-P (SB-C::LVAR-USES SB-C::S)) (SB-C::GIVE-UP-IR1-TRANSFORM) ; (SB-INT:QUASIQUOTE (SB-KERNEL:%SYMBOL-PACKAGE SB-C::S)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; PRINC ; (SB-C:DEFTRANSFORM PRINC ; ((SB-C::OBJECT &OPTIONAL STREAM) (STRING &OPTIONAL T) * :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (WRITE-STRING SB-C::OBJECT STREAM))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; POINTERP ; (SB-C:DEFTRANSFORM SB-KERNEL:POINTERP ((SB-C::OBJECT)) ; (LET ((TYPE #)) (COND (# 'NIL) (# 'T) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; FBOUNDP ; (SB-C:DEFTRANSFORM FBOUNDP ((SYMBOL) (SYMBOL)) ; (SB-INT:QUASIQUOTE (LET (#) (AND # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM FBOUNDP ((SB-C::NAME) ((SB-INT:CONSTANT-ARG SYMBOL))) ; (SB-INT:QUASIQUOTE (SB-KERNEL:FDEFN-FUN (LOAD-TIME-VALUE # T)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %CLEANUP-POINT ; (SB-C:DEFTRANSFORM SB-C::%CLEANUP-POINT (NIL * * :NODE SB-C::NODE) ; (LET ((SB-C::PREV #)) (COND (# # # NIL) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; PARSE-INTEGER ; (SB-C:DEFTRANSFORM PARSE-INTEGER ; ((STRING &KEY (SB-C::START 0) SB-C::END SB-C::RADIX SB-C::JUNK-ALLOWED) ; (T &KEY (:RADIX #) (:START T) (:END T) (:JUNK-ALLOWED T))) ; (SB-INT:QUASIQUOTE ; (# STRING SB-C::START SB-C::END ; SB-C::JUNK-ALLOWED))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %COERCE-TO-POLICY ; (SB-C:DEFTRANSFORM SB-C::%COERCE-TO-POLICY ((SB-C::THING) (SB-C:POLICY)) ; 'SB-C::THING) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %COERCE-CALLABLE-TO-FUN ; (SB-C:DEFTRANSFORM SB-KERNEL:%COERCE-CALLABLE-TO-FUN ; ((SB-C::THING) * * :NODE SB-C::NODE) ; "optimize away possible call to FDEFINITION at runtime" ; (SB-C::ENSURE-LVAR-FUN-FORM SB-C::THING 'SB-C::THING :GIVE-UP T :NODE ; SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %COERCE-CALLABLE-FOR-CALL ; (SB-C:DEFTRANSFORM SB-KERNEL:%COERCE-CALLABLE-FOR-CALL ; ((SB-C::THING) * * :NODE SB-C::NODE) ; "optimize away possible call to FDEFINITION at runtime" ; (SB-C::ENSURE-LVAR-FUN-FORM SB-C::THING 'SB-C::THING :GIVE-UP T :COERCER ; 'SB-KERNEL:%COERCE-CALLABLE-FOR-CALL :NODE SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ** - Continuable Error FAILURE-P was set when creating "obj/from-xc/src/compiler/srctran.lisp-obj". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-xc/src/compiler/srctran.lisp-obj" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/srctran.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (COND # #) RETRY :R4 retry (COND # #) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/src/cold/compile-cold-sbcl.lisp SKIP :R6 skip (LET # # ...) RETRY :R7 retry (LET # # ...) STOP :R8 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-2.lisp ABORT-BUILD :R9 Abort building SBCL. ABORT :R10 Abort main loop (174.058 sec) [193/299] src/compiler/seqtran ; file: src/compiler/seqtran.lisp ; in: ; DEFTRANSFORM ; MAP ; (SB-C:DEFTRANSFORM MAP ; ((SB-C::RESULT-TYPE-ARG SB-C::FUN SB-C::SEQ &REST SB-C::SEQS) * * :NODE ; SB-C::NODE) ; (LET* ; ((SB-C::SEQ-NAMES #) (SB-C::CONSTANT-RESULT-TYPE-ARG-P #) (SB-C::NIL-P) ; (SB-C::RESULT-TYPE #) (SB-C::RESULT-CTYPE #)) ; (SB-INT:QUASIQUOTE (LAMBDA # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %MAP ; (SB-C:DEFTRANSFORM SB-KERNEL:%MAP ; ((SB-C::RESULT-TYPE SB-C::FUN SB-C::SEQ &REST SB-C::SEQS) * * :NODE SB-C::NODE ; :POLICY (>= SPEED SPACE)) ; "open code" ; (UNLESS (SB-C:CONSTANT-LVAR-P SB-C::RESULT-TYPE) ; (SB-C::GIVE-UP-IR1-TRANSFORM "RESULT-TYPE argument not constant")) ; (FLET ((SB-C::1SUBTYPEP # #)) (LET* (# # #) (COND # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; MAP-INTO ; (SB-C:DEFTRANSFORM MAP-INTO ; ((SB-C::RESULT SB-C::FUN &REST SB-C::SEQS) (VECTOR T &REST T) * :NODE ; SB-C::NODE) ; "open code" ; (LET* ; ((SB-C::SEQS-NAMES #) (SB-C::RESULT-TYPE #) ; (SB-C::NON-COMPLEX-VECTOR-TYPE-P #)) ; (SB-C::CATCH-GIVE-UP-IR1-TRANSFORM (#) (COND # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM MAP-INTO ; ((SB-C::RESULT SB-C::FUN &REST SB-C::SEQUENCES) (LIST &REST T) * :POLICY ; (>= SPEED SPACE)) ; (IF SB-C::SEQUENCES (LET (#) (SB-INT:QUASIQUOTE #)) ; (SB-INT:QUASIQUOTE (LET # # SB-C::RESULT)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; ELT ; (SB-C:DEFTRANSFORM ELT ((SB-C::S SB-C::I) ((SIMPLE-ARRAY * #) T) *) ; '(AREF SB-C::S SB-C::I)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM ELT ((SB-C::S SB-C::I) (LIST T) * :POLICY (< SAFETY 3)) ; '(NTH SB-C::I SB-C::S)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %SETELT ; (SB-C:DEFTRANSFORM SB-KERNEL:%SETELT ; ((SB-C::S SB-C::I SB-C::V) ((SIMPLE-ARRAY * #) T T) *) ; '(SETF (AREF SB-C::S SB-C::I) SB-C::V)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-KERNEL:%SETELT ; ((SB-C::S SB-C::I SB-C::V) (LIST T T) * :POLICY (< SAFETY 3)) ; '(SETF (CAR (NTHCDR SB-C::I SB-C::S)) SB-C::V)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %CHECK-VECTOR-SEQUENCE-BOUNDS ; (SB-C:DEFTRANSFORM SB-KERNEL:%CHECK-VECTOR-SEQUENCE-BOUNDS ; ((VECTOR SB-C::START SB-C::END) (VECTOR T T) * :NODE SB-C::NODE) ; (IF (SB-C:POLICY SB-C::NODE (= 0 SB-C:INSERT-ARRAY-BOUNDS-CHECKS)) ; '(OR SB-C::END (LENGTH VECTOR)) '(LET (#) (IF # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; ADJOIN ; (SB-C::DEF ADJOIN) ; ==> ; (SB-C:DEFTRANSFORM ADJOIN ; ((SB-C::ITEM LIST &KEY SB-C::KEY SB-C::TEST SB-C::TEST-NOT) * * :NODE ; SB-C::NODE) ; (SB-C::TRANSFORM-LIST-ITEM-SEEK 'ADJOIN SB-C::ITEM LIST SB-C::KEY SB-C::TEST ; SB-C::TEST-NOT SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%ADJOIN ; ((SB-C::ITEM LIST) (SB-C::EQ-COMPARABLE-TYPE T) * :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE ; (# SB-C::ITEM LIST))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%ADJOIN-TEST ; ((SB-C::ITEM LIST SB-C::TEST) (T T T) * :NODE SB-C::NODE) ; (LET ((SB-C::TEST #)) ; (CASE (SB-C::CHANGE-TEST-BASED-ON-ITEM SB-C::TEST #) (EQ #) (EQL #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%ADJOIN-KEY-TEST ; ((SB-C::ITEM LIST SB-C::KEY SB-C::TEST) (T T T T) * :IMPORTANT NIL) ; (LET ((SB-C::TEST #)) (CASE SB-C::TEST (EQ #) (EQL #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; ASSOC ; (SB-C::DEF ASSOC T) ; ==> ; (SB-C:DEFTRANSFORM ASSOC ; ((SB-C::ITEM LIST &KEY SB-C::KEY SB-C::TEST SB-C::TEST-NOT) * * :NODE ; SB-C::NODE) ; (SB-C::TRANSFORM-LIST-ITEM-SEEK 'ASSOC SB-C::ITEM LIST SB-C::KEY SB-C::TEST ; SB-C::TEST-NOT SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%ASSOC ; ((SB-C::ITEM LIST) (SB-C::EQ-COMPARABLE-TYPE T) * :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE ; (# SB-C::ITEM LIST))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%ASSOC-KEY ; ((SB-C::ITEM LIST SB-C::KEY) (SB-C::EQ-COMPARABLE-TYPE T T) * :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE ; (# SB-C::ITEM LIST ; SB-C::KEY))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%ASSOC-TEST ; ((SB-C::ITEM LIST SB-C::TEST) (T T T) * :NODE SB-C::NODE) ; (LET ((SB-C::TEST #)) ; (CASE (SB-C::CHANGE-TEST-BASED-ON-ITEM SB-C::TEST #) (EQ #) (EQL #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%ASSOC-KEY-TEST ; ((SB-C::ITEM LIST SB-C::KEY SB-C::TEST) (T T T T) * :IMPORTANT NIL) ; (LET ((SB-C::TEST #)) ; (CASE (SB-C::CHANGE-TEST-BASED-ON-ITEM SB-C::TEST #) (EQ #) (EQL #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM ASSOC-IF ; ((SB-C::PRED LIST &KEY SB-C::KEY) * * :NODE SB-C::NODE) ; (SB-C::TRANSFORM-LIST-PRED-SEEK 'ASSOC-IF SB-C::PRED LIST SB-C::KEY ; SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM ASSOC-IF-NOT ; ((SB-C::PRED LIST &KEY SB-C::KEY) * * :NODE SB-C::NODE) ; (SB-C::TRANSFORM-LIST-PRED-SEEK 'ASSOC-IF-NOT SB-C::PRED LIST SB-C::KEY ; SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; MEMBER ; (SB-C::DEF MEMBER T) ; ==> ; (SB-C:DEFTRANSFORM MEMBER ; ((SB-C::ITEM LIST &KEY SB-C::KEY SB-C::TEST SB-C::TEST-NOT) * * :NODE ; SB-C::NODE) ; (SB-C::TRANSFORM-LIST-ITEM-SEEK 'MEMBER SB-C::ITEM LIST SB-C::KEY SB-C::TEST ; SB-C::TEST-NOT SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%MEMBER ; ((SB-C::ITEM LIST) (SB-C::EQ-COMPARABLE-TYPE T) * :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE ; (# SB-C::ITEM LIST))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%MEMBER-KEY ; ((SB-C::ITEM LIST SB-C::KEY) (SB-C::EQ-COMPARABLE-TYPE T T) * :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE ; (# SB-C::ITEM LIST ; SB-C::KEY))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%MEMBER-TEST ; ((SB-C::ITEM LIST SB-C::TEST) (T T T) * :NODE SB-C::NODE) ; (LET ((SB-C::TEST #)) ; (CASE (SB-C::CHANGE-TEST-BASED-ON-ITEM SB-C::TEST #) (EQ #) (EQL #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%MEMBER-KEY-TEST ; ((SB-C::ITEM LIST SB-C::KEY SB-C::TEST) (T T T T) * :IMPORTANT NIL) ; (LET ((SB-C::TEST #)) ; (CASE (SB-C::CHANGE-TEST-BASED-ON-ITEM SB-C::TEST #) (EQ #) (EQL #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM MEMBER-IF ; ((SB-C::PRED LIST &KEY SB-C::KEY) * * :NODE SB-C::NODE) ; (SB-C::TRANSFORM-LIST-PRED-SEEK 'MEMBER-IF SB-C::PRED LIST SB-C::KEY ; SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM MEMBER-IF-NOT ; ((SB-C::PRED LIST &KEY SB-C::KEY) * * :NODE SB-C::NODE) ; (SB-C::TRANSFORM-LIST-PRED-SEEK 'MEMBER-IF-NOT SB-C::PRED LIST SB-C::KEY ; SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; RASSOC ; (SB-C::DEF RASSOC T) ; ==> ; (SB-C:DEFTRANSFORM RASSOC ; ((SB-C::ITEM LIST &KEY SB-C::KEY SB-C::TEST SB-C::TEST-NOT) * * :NODE ; SB-C::NODE) ; (SB-C::TRANSFORM-LIST-ITEM-SEEK 'RASSOC SB-C::ITEM LIST SB-C::KEY SB-C::TEST ; SB-C::TEST-NOT SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%RASSOC ; ((SB-C::ITEM LIST) (SB-C::EQ-COMPARABLE-TYPE T) * :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE ; (# SB-C::ITEM LIST))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%RASSOC-KEY ; ((SB-C::ITEM LIST SB-C::KEY) (SB-C::EQ-COMPARABLE-TYPE T T) * :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE ; (# SB-C::ITEM LIST ; SB-C::KEY))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%RASSOC-TEST ; ((SB-C::ITEM LIST SB-C::TEST) (T T T) * :NODE SB-C::NODE) ; (LET ((SB-C::TEST #)) ; (CASE (SB-C::CHANGE-TEST-BASED-ON-ITEM SB-C::TEST #) (EQ #) (EQL #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM SB-KERNEL:%RASSOC-KEY-TEST ; ((SB-C::ITEM LIST SB-C::KEY SB-C::TEST) (T T T T) * :IMPORTANT NIL) ; (LET ((SB-C::TEST #)) ; (CASE (SB-C::CHANGE-TEST-BASED-ON-ITEM SB-C::TEST #) (EQ #) (EQL #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM RASSOC-IF ; ((SB-C::PRED LIST &KEY SB-C::KEY) * * :NODE SB-C::NODE) ; (SB-C::TRANSFORM-LIST-PRED-SEEK 'RASSOC-IF SB-C::PRED LIST SB-C::KEY ; SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; ==> ; (SB-C:DEFTRANSFORM RASSOC-IF-NOT ; ((SB-C::PRED LIST &KEY SB-C::KEY) * * :NODE SB-C::NODE) ; (SB-C::TRANSFORM-LIST-PRED-SEEK 'RASSOC-IF-NOT SB-C::PRED LIST SB-C::KEY ; SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; DELETE ; (SB-C:DEFTRANSFORM DELETE ; ((SB-C::ITEM LIST &KEY SB-C::TEST) (T LIST &REST T) *) "convert to EQ test" ; (LET ((TYPE #)) (UNLESS (OR # #) (SB-C::GIVE-UP-IR1-TRANSFORM))) ; (SB-INT:QUASIQUOTE (SB-INT:DELQ SB-C::ITEM LIST))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; DELETE-IF ; (SB-C:DEFTRANSFORM DELETE-IF ((SB-C::PRED LIST) (T LIST)) "open code" ; '(DO ((SB-C::X LIST #) (SB-C::SPLICE 'NIL)) ((ENDP SB-C::X) LIST) ; (COND (# #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; FILL ; (SB-C:DEFTRANSFORM FILL ; ((SB-C::SEQ SB-C::ITEM &KEY (SB-C::START 0) (SB-C::END NIL)) ; (LIST T &KEY (:START T) (:END T))) ; '(SB-KERNEL:LIST-FILL* SB-C::SEQ SB-C::ITEM SB-C::START SB-C::END)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; QUICKFILL ; (SB-C:DEFTRANSFORM SB-C::QUICKFILL ; ((SB-C::SEQ SB-C::ITEM) (VECTOR T) * :NODE SB-C::NODE) ; (SB-INT:QUASIQUOTE (LET (# #) (DECLARE #) #))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; FILL ; (SB-C:DEFTRANSFORM FILL ; ((SB-C::SEQ SB-C::ITEM &KEY (SB-C::START 0) (SB-C::END NIL)) ; (VECTOR T &KEY (:START T) (:END T)) * :NODE SB-C::NODE) ; (SB-C::FILL-TRANSFORM 'FILL SB-C::NODE SB-C::SEQ SB-C::ITEM SB-C::START ; SB-C::END)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM FILL ; ((SB-C::SEQ SB-C::ITEM &KEY (SB-C::START 0) (SB-C::END NIL)) ; ((AND SEQUENCE # #) T &KEY (:START T) (:END T))) ; (SB-INT:QUASIQUOTE ; (SB-SEQUENCE:FILL SB-C::SEQ SB-C::ITEM :START SB-C::START :END ; (SB-KERNEL:%CHECK-GENERIC-SEQUENCE-BOUNDS SB-C::SEQ SB-C::START ; SB-C::END)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; STRING< ; (SB-C::DEF STRING< SB-KERNEL:STRING<*) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; STRING> ; (SB-C::DEF STRING> SB-KERNEL:STRING>*) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; STRING<= ; (SB-C::DEF STRING<= SB-KERNEL:STRING<=*) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; STRING>= ; (SB-C::DEF STRING>= SB-KERNEL:STRING>=*) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; STRING= ; (SB-C::DEF STRING= SB-KERNEL:STRING=*) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; STRING/= ; (SB-C::DEF STRING/= SB-KERNEL:STRING/=*) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; STRING<* ; (SB-C::DEF SB-KERNEL:STRING<* (< SB-C::DIFF 0) T) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; STRING<=* ; (SB-C::DEF SB-KERNEL:STRING<=* (> SB-C::DIFF 0) NIL) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; STRING>* ; (SB-C::DEF SB-KERNEL:STRING>* (> SB-C::DIFF 0) T) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; STRING>=* ; (SB-C::DEF SB-KERNEL:STRING>=* (< SB-C::DIFF 0) NIL) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; STRING=* ; (SB-C:DEFTRANSFORM SB-KERNEL:STRING=* ; ((SB-C::STRING1 SB-C::STRING2 SB-C::START1 SB-C::END1 SB-C::START2 SB-C::END2) ; (T T (SB-INT:CONSTANT-ARG #) (SB-INT:CONSTANT-ARG NULL) ; (SB-INT:CONSTANT-ARG #) (SB-INT:CONSTANT-ARG NULL))) ; (FLET ((SB-C::LITERAL # #)) ; (OR (SB-C::LITERAL SB-C::STRING1 SB-C::STRING2 'SB-C::STRING2) ; (SB-C::LITERAL SB-C::STRING2 SB-C::STRING1 'SB-C::STRING1) ; (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; STRING/=* ; (SB-C:DEFTRANSFORM SB-KERNEL:STRING/=* ; ((SB-C::STRING1 SB-C::STRING2 SB-C::START1 SB-C::END1 SB-C::START2 SB-C::END2) ; (STRING STRING (SB-INT:CONSTANT-ARG #) (SB-INT:CONSTANT-ARG NULL) ; (SB-INT:CONSTANT-ARG #) (SB-INT:CONSTANT-ARG NULL))) ; (COND ((AND # #) (SB-INT:QUASIQUOTE #)) ((AND # #) (SB-INT:QUASIQUOTE #)) ; (T (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; STRING=* ; (SB-C:DEFTRANSFORM SB-KERNEL:STRING=* ; ((SB-C::STRING1 SB-C::STRING2 SB-C::START1 SB-C::END1 SB-C::START2 SB-C::END2) ; (SIMPLE-BASE-STRING SIMPLE-BASE-STRING T T T T) *) ; (SB-INT:QUASIQUOTE ; (SB-KERNEL:SIMPLE-BASE-STRING= SB-C::STRING1 SB-C::STRING2 SB-C::START1 ; SB-C::END1 SB-C::START2 SB-C::END2))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-KERNEL:STRING=* ; ((SB-C::STRING1 SB-C::STRING2 SB-C::START1 SB-C::END1 SB-C::START2 SB-C::END2) ; (SB-KERNEL:SIMPLE-CHARACTER-STRING SB-KERNEL:SIMPLE-CHARACTER-STRING T T T T) ; *) ; (SB-INT:QUASIQUOTE ; (SB-KERNEL:SIMPLE-CHARACTER-STRING= SB-C::STRING1 SB-C::STRING2 SB-C::START1 ; SB-C::END1 SB-C::START2 SB-C::END2))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; STRING/=* ; (SB-C:DEFTRANSFORM SB-KERNEL:STRING/=* ; ((SB-C::STRING1 SB-C::STRING2 SB-C::START1 SB-C::END1 SB-C::START2 SB-C::END2) ; (SIMPLE-STRING SIMPLE-STRING T T T T) *) ; (SB-INT:QUASIQUOTE ; (MULTIPLE-VALUE-BIND (SB-INT:INDEX SB-C::DIFF) ; (SB-KERNEL:%SP-STRING-COMPARE SB-C::STRING1 SB-C::STRING2 SB-C::START1 ; SB-C::END1 SB-C::START2 SB-C::END2) ; (DECLARE #) (IF # # NIL)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; STRING-EQUAL ; (SB-C:DEFTRANSFORM STRING-EQUAL ; ((SB-C::STRING1 SB-C::STRING2 &KEY SB-C::START1 SB-C::END1 SB-C::START2 ; SB-C::END2) ; (T T &KEY (:START1 #) (:START2 #) (:END1 #) (:END2 #))) ; (SB-C::STRING-COMPARE-TRANSFORM SB-C::STRING1 SB-C::STRING2 SB-C::START1 ; SB-C::END1 SB-C::START2 SB-C::END2)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM STRING-EQUAL ; ((SB-C::STRING1 SB-C::STRING2 &KEY (SB-C::START1 0) SB-C::END1 ; (SB-C::START2 0) SB-C::END2) ; *) ; (IF (OR (AND # #) (AND # #)) ; (SB-INT:QUASIQUOTE ; (SB-KERNEL:STRING=* SB-C::STRING1 SB-C::STRING2 SB-C::START1 SB-C::END1 ; SB-C::START2 SB-C::END2)) ; (SB-C::GIVE-UP-IR1-TRANSFORM))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; STRING/=* ; (SB-C:DEFTRANSFORM SB-KERNEL:STRING/=* ; ((SB-C::STR1 SB-C::STR2 SB-C::START1 SB-C::END1 SB-C::START2 SB-C::END2) * * ; :NODE SB-C::NODE :IMPORTANT NIL) ; (IF (SB-C::IF-P (SB-C::NODE-DEST SB-C::NODE)) (SB-INT:QUASIQUOTE (IF # NIL 0)) ; (SB-C::GIVE-UP-IR1-TRANSFORM))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; STRING ; (SB-C:DEFTRANSFORM STRING ((SB-C::X) ((OR SYMBOL STRING))) ; '(IF (SYMBOLP SB-C::X) (SYMBOL-NAME SB-C::X) SB-C::X)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM STRING ((SB-C::X) (SYMBOL)) '(SYMBOL-NAME SB-C::X)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM STRING ((SB-C::X) (STRING)) '(PROGN SB-C::X)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; REPLACE ; (SB-C:DEFTRANSFORM REPLACE ; ((SB-C::SEQ1 SB-C::SEQ2 &KEY (SB-C::START1 0) (SB-C::START2 0) SB-C::END1 ; SB-C::END2) ; ((OR NULL #) (OR NULL #) &REST T) * :NODE SB-C::NODE) ; (FLET ((SB-C::ET # #)) (LET (# #) (IF # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM REPLACE ; ((SB-C::SEQ1 SB-C::SEQ2 &KEY (SB-C::START1 0) (SB-C::START2 0) SB-C::END1 ; SB-C::END2) ; ((OR NULL SIMPLE-BASE-STRING) (OR NULL SB-KERNEL:SIMPLE-CHARACTER-STRING) ; &REST T) ; * :NODE SB-C::NODE) ; (SB-C::TRANSFORM-REPLACE NIL SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM REPLACE ; ((SB-C::SEQ1 SB-C::SEQ2 &KEY (SB-C::START1 0) (SB-C::START2 0) SB-C::END1 ; SB-C::END2) ; ((OR NULL SB-KERNEL:SIMPLE-CHARACTER-STRING) (OR NULL SIMPLE-BASE-STRING) ; &REST T) ; * :NODE SB-C::NODE) ; (SB-C::TRANSFORM-REPLACE NIL SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; MAKE-SEQUENCE ; (SB-C:DEFTRANSFORM MAKE-SEQUENCE ; ((SB-C::RESULT-TYPE SB-C::SIZE &KEY SB-C::INITIAL-ELEMENT) * *) ; (MULTIPLE-VALUE-BIND (SB-C::SPEC TYPE) ; (AND (SB-C:CONSTANT-LVAR-P SB-C::RESULT-TYPE) (LET # #)) ; (UNLESS TYPE (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (IF (SB-KERNEL:TYPE= TYPE #) (SB-INT:QUASIQUOTE #) ; (MULTIPLE-VALUE-BIND # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SUBSEQ ; (SB-C:DEFTRANSFORM SUBSEQ ; ((SB-C::SEQ SB-C::START &OPTIONAL SB-C::END) (VECTOR T &OPTIONAL T) * :NODE ; SB-C::NODE) ; (LET ((TYPE #)) (COND (# #) (T '#)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SUBSEQ ; ((SB-C::SEQ SB-C::START &OPTIONAL SB-C::END) (LIST T &OPTIONAL T)) ; (SB-INT:QUASIQUOTE (SB-KERNEL:LIST-SUBSEQ* SB-C::SEQ SB-C::START SB-C::END))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SUBSEQ ; ((SB-C::SEQ SB-C::START &OPTIONAL SB-C::END) ; ((AND SEQUENCE # #) T &OPTIONAL T)) ; '(SB-SEQUENCE:SUBSEQ SB-C::SEQ SB-C::START SB-C::END)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; COPY-SEQ ; (SB-C:DEFTRANSFORM COPY-SEQ ((SB-C::SEQ) (VECTOR)) ; (LET ((TYPE #)) (COND (# #) (T '#)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM COPY-SEQ ((SB-C::SEQ) (LIST)) ; '(SB-KERNEL:LIST-COPY-SEQ* SB-C::SEQ)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM COPY-SEQ ((SB-C::SEQ) ((AND SEQUENCE # #))) ; '(SB-SEQUENCE:COPY-SEQ SB-C::SEQ)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SEARCH ; (SB-C:DEFTRANSFORM SEARCH ; ((SB-C::PATTERN SB-C::TEXT &KEY SB-C::START1 SB-C::START2 SB-C::END1 ; SB-C::END2 SB-C::TEST SB-C::TEST-NOT SB-C::KEY SB-C::FROM-END) ; ((SB-INT:CONSTANT-ARG SEQUENCE) T &REST T)) ; (IF SB-C::KEY (SB-C::GIVE-UP-IR1-TRANSFORM) (LET* (# # # #) (MACROLET # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SEARCH ; ((SB-C::PATTERN SB-C::TEXT &KEY (SB-C::START1 0) (SB-C::START2 0) SB-C::END1 ; SB-C::END2 (SB-C::TEST #'EQL) (SB-C::KEY #'IDENTITY) SB-C::FROM-END) ; (VECTOR VECTOR &REST T) * :NODE SB-C::NODE :POLICY ; (> SPEED (MAX SPACE SAFETY))) ; "open code" (FLET ((SB-C::MAYBE # #)) (LET (# # # #) (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; CONCATENATE ; (SB-C:DEFTRANSFORM CONCATENATE ; ((SB-C::RESULT-TYPE &REST SB-C::LVARS) ; ((SB-INT:CONSTANT-ARG T) &REST SEQUENCE) * :NODE SB-C::NODE) ; (LET* ((TYPE #) (SB-C::VECTOR-WIDETAG #)) (FLET (#) (COND # # # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; %FIND-POSITION-IF ; (SB-C::DEF SB-KERNEL:%FIND-POSITION-IF WHEN) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; %FIND-POSITION-IF-NOT ; (SB-C::DEF SB-KERNEL:%FIND-POSITION-IF-NOT UNLESS) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %FIND-POSITION ; (SB-C:DEFTRANSFORM SB-KERNEL:%FIND-POSITION ; ((SB-C::ITEM SEQUENCE SB-C::FROM-END SB-C::START SB-C::END SB-C::KEY ; SB-C::TEST)) ; (LET* ((SB-C::TEST #) (SB-C::TEST-ORIGIN SB-C::TEST)) ; (WHEN SB-C::TEST (SETF SB-C::TEST #) (UNLESS # #)) ; (IF (EQ SB-C::TEST SB-C::TEST-ORIGIN) (SB-C::GIVE-UP-IR1-TRANSFORM) ; (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-KERNEL:%FIND-POSITION ; ((SB-C::ITEM SEQUENCE SB-C::FROM-END SB-C::START SB-C::END SB-C::KEY ; SB-C::TEST) ; (T LIST T T T T T) * :POLICY (> SPEED SPACE)) ; "expand inline" ; '(SB-KERNEL:%FIND-POSITION-IF (LET (#) (LAMBDA # #)) SEQUENCE SB-C::FROM-END ; SB-C::START SB-C::END (SB-KERNEL:%COERCE-CALLABLE-TO-FUN SB-C::KEY))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %FIND-POSITION-IF ; (SB-C:DEFTRANSFORM SB-KERNEL:%FIND-POSITION-IF ; ((SB-C::PREDICATE SEQUENCE SB-C::FROM-END SB-C::START SB-C::END SB-C::KEY) ; (FUNCTION VECTOR T T T FUNCTION) * :POLICY (> SPEED SPACE)) ; "expand inline" ; (SB-C::CHECK-INLINEABILITY-OF-FIND-POSITION-IF SEQUENCE SB-C::FROM-END) ; '(SB-KERNEL:%FIND-POSITION-IF-VECTOR-MACRO SB-C::PREDICATE SEQUENCE ; SB-C::FROM-END SB-C::START SB-C::END SB-C::KEY)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %FIND-POSITION-IF-NOT ; (SB-C:DEFTRANSFORM SB-KERNEL:%FIND-POSITION-IF-NOT ; ((SB-C::PREDICATE SEQUENCE SB-C::FROM-END SB-C::START SB-C::END SB-C::KEY) ; (FUNCTION VECTOR T T T FUNCTION) * :POLICY (> SPEED SPACE)) ; "expand inline" ; (SB-C::CHECK-INLINEABILITY-OF-FIND-POSITION-IF SEQUENCE SB-C::FROM-END) ; '(SB-KERNEL:%FIND-POSITION-IF-NOT-VECTOR-MACRO SB-C::PREDICATE SEQUENCE ; SB-C::FROM-END SB-C::START SB-C::END SB-C::KEY)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %FIND-POSITION ; (SB-C:DEFTRANSFORM SB-KERNEL:%FIND-POSITION ; ((SB-C::ITEM SEQUENCE SB-C::FROM-END SB-C::START SB-C::END SB-C::KEY ; SB-C::TEST) ; (T VECTOR T T T FUNCTION FUNCTION) * :NODE SB-C::NODE) ; "expand inline" ; (SB-C::CHECK-INLINEABILITY-OF-FIND-POSITION-IF SEQUENCE SB-C::FROM-END) ; (UNLESS (OR (SB-C:POLICY SB-C::NODE #) (AND # # # # #)) ; (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :CONSTRAINT) ; '(SB-KERNEL:%FIND-POSITION-VECTOR-MACRO SB-C::ITEM SEQUENCE SB-C::FROM-END ; SB-C::START SB-C::END SB-C::KEY SB-C::TEST)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-KERNEL:%FIND-POSITION ; ((SB-C::ITEM SEQUENCE SB-C::FROM-END SB-C::START SB-C::END SB-C::KEY ; SB-C::TEST) ; (T BIT-VECTOR T T T T T) * :NODE SB-C::NODE) ; (WHEN (AND SB-C::TEST (SB-C::LVAR-FUN-IS SB-C::TEST '#)) ; (SETF SB-C::TEST NIL)) ; (WHEN (AND SB-C::KEY (SB-C::LVAR-FUN-IS SB-C::KEY '#)) (SETF SB-C::KEY NIL)) ; (WHEN (OR SB-C::TEST SB-C::KEY) ; (SB-C::GIVE-UP-IR1-TRANSFORM "non-trivial :KEY or :TEST")) ; (BLOCK SB-C::NOT-A-BIT (SB-INT:QUASIQUOTE (SB-KERNEL:WITH-ARRAY-DATA # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-KERNEL:%FIND-POSITION ; ((SB-C::ITEM SEQUENCE SB-C::FROM-END SB-C::START SB-C::END SB-C::KEY ; SB-C::TEST) ; (T STRING T T T FUNCTION FUNCTION) * :POLICY (> SPEED SPACE)) ; (IF (EQ '* (SB-C::UPGRADED-ELEMENT-TYPE-SPECIFIER SEQUENCE)) ; (SB-INT:QUASIQUOTE (SB-KERNEL:WITH-ARRAY-DATA # #)) ; (SB-C::GIVE-UP-IR1-TRANSFORM))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFINE-FIND-POSITION ; FIND ; (SB-C::DEFINE-FIND-POSITION FIND 0) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFINE-FIND-POSITION ; POSITION ; (SB-C::DEFINE-FIND-POSITION POSITION 1) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; FIND ; (SB-C::DEF FIND) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEF ; POSITION ; (SB-C::DEF POSITION) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFINE-FIND-POSITION-IF ; FIND-IF ; (SB-C::DEFINE-FIND-POSITION-IF FIND-IF 0) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFINE-FIND-POSITION-IF ; POSITION-IF ; (SB-C::DEFINE-FIND-POSITION-IF POSITION-IF 1) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFINE-FIND-POSITION-IF-NOT ; FIND-IF-NOT ; (SB-C::DEFINE-FIND-POSITION-IF-NOT FIND-IF-NOT 0) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFINE-FIND-POSITION-IF-NOT ; POSITION-IF-NOT ; (SB-C::DEFINE-FIND-POSITION-IF-NOT POSITION-IF-NOT 1) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFINE-TRIMMER-TRANSFORM ; STRING-LEFT-TRIM ; (SB-C::DEFINE-TRIMMER-TRANSFORM STRING-LEFT-TRIM T NIL) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFINE-TRIMMER-TRANSFORM ; STRING-RIGHT-TRIM ; (SB-C::DEFINE-TRIMMER-TRANSFORM STRING-RIGHT-TRIM NIL T) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFINE-TRIMMER-TRANSFORM ; STRING-TRIM ; (SB-C::DEFINE-TRIMMER-TRANSFORM STRING-TRIM T T) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SB-IMPL::|List| ; (SB-C:DEFTRANSFORM SB-IMPL::|List| ((&REST SB-C::ELTS)) ; (SB-C::TRANSFORM-BACKQ-LIST-OR-LIST* 'LIST SB-C::ELTS)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SB-IMPL::|List*| ; (SB-C:DEFTRANSFORM SB-IMPL::|List*| ((&REST SB-C::ELTS)) ; (SB-C::TRANSFORM-BACKQ-LIST-OR-LIST* 'LIST* SB-C::ELTS)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SB-IMPL::|Vector| ; (SB-C:DEFTRANSFORM SB-IMPL::|Vector| ((&REST SB-C::ELTS)) ; (LET ((SB-C::GENSYMS #) SB-C::CONSTANTS) (DOLIST (ELT SB-C::ELTS) (COND # #)) ; (SB-INT:QUASIQUOTE (LAMBDA # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SB-IMPL::|Append| ; (SB-C:DEFTRANSFORM SB-IMPL::|Append| ((&REST SB-C::ELTS)) ; (LET ; ((SB-C::GENSYMS #) (SB-C::ACC NIL) (SB-C::IGNORED 'NIL) ; (SB-C::ARGUMENTS 'NIL)) ; (FLET (#) ; (LOOP SB-C::FOR SB-XC:GENSYM SB-C::IN SB-C::GENSYMS SB-C::FOR # SB-C::ON ; SB-C::ELTS SB-C::BY #'CDR DO ...)) ; (LET (#) (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; REVERSE ; (SB-C:DEFTRANSFORM REVERSE ((SEQUENCE) (VECTOR) * :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (SB-IMPL::VECTOR-REVERSE SEQUENCE))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM REVERSE ((SEQUENCE) (LIST) * :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (SB-IMPL::LIST-REVERSE SEQUENCE))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; NREVERSE ; (SB-C:DEFTRANSFORM NREVERSE ((SEQUENCE) (VECTOR) * :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (SB-IMPL::VECTOR-NREVERSE SEQUENCE))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM NREVERSE ((SEQUENCE) (LIST) * :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (SB-IMPL::LIST-NREVERSE SEQUENCE))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; NUNION ; (SB-C:DEFTRANSFORM NUNION ; ((SB-C::LIST1 SB-C::LIST2 &KEY SB-C::KEY SB-C::TEST SB-C::TEST-NOT)) ; (LET ((SB-C::NULL-TYPE #)) ; (COND (# 'SB-C::LIST2) (# 'SB-C::LIST1) (# 'SB-C::LIST1) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; UNION ; (SB-C:DEFTRANSFORM UNION ; ((SB-C::LIST1 SB-C::LIST2 &KEY SB-C::KEY SB-C::TEST SB-C::TEST-NOT)) ; (LET ((SB-C::NULL-TYPE #)) (FLET (#) (COND # # # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SUBSETP ; (SB-C:DEFTRANSFORM SUBSETP ; ((SB-C::LIST1 SB-C::LIST2 &KEY SB-C::KEY SB-C::TEST SB-C::TEST-NOT)) ; (COND ((SB-KERNEL:CSUBTYPEP # #) T) ((AND # # # #) T) ; (T (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; TREE-EQUAL ; (SB-C:DEFTRANSFORM TREE-EQUAL ; ((SB-C::LIST1 SB-C::LIST2 &KEY SB-C::TEST SB-C::TEST-NOT)) ; (COND ((AND # # #) T) ((AND # #) (SB-INT:QUASIQUOTE #)) ; (T (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ** - Continuable Error FAILURE-P was set when creating "obj/from-xc/src/compiler/seqtran.lisp-obj". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-xc/src/compiler/seqtran.lisp-obj" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/seqtran.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (COND # #) RETRY :R4 retry (COND # #) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/src/cold/compile-cold-sbcl.lisp SKIP :R6 skip (LET # # ...) RETRY :R7 retry (LET # # ...) STOP :R8 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-2.lisp ABORT-BUILD :R9 Abort building SBCL. ABORT :R10 Abort main loop (84.295 sec) [194/299] src/compiler/typetran ; file: src/compiler/typetran.lisp ; in: ; DEFTRANSFORM ; TYPEP ; (SB-C:DEFTRANSFORM TYPEP ; ((SB-C::OBJECT TYPE &OPTIONAL SB-C::ENV) * * :NODE SB-C::NODE) ; (UNLESS (SB-C:CONSTANT-LVAR-P TYPE) ; (SB-C::GIVE-UP-IR1-TRANSFORM "can't open-code test of non-constant type")) ; (UNLESS (SB-C::UNSUPPLIED-OR-NIL SB-C::ENV) ; (SB-C::GIVE-UP-IR1-TRANSFORM "environment argument present and not null")) ; (MULTIPLE-VALUE-BIND (SB-C::EXPANSION SB-C::FAIL-P) ; (SB-C::SOURCE-TRANSFORM-TYPEP 'SB-C::OBJECT (SB-C:LVAR-VALUE TYPE)) ; (IF SB-C::FAIL-P (SB-C::ABORT-IR1-TRANSFORM) SB-C::EXPANSION))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %TYPEP ; (SB-C:DEFTRANSFORM SB-KERNEL:%TYPEP ; ((SB-C::OBJECT TYPE) * * :NODE SB-C::NODE) ; (UNLESS (SB-C:CONSTANT-LVAR-P TYPE) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (SB-C::IR1-TRANSFORM-TYPE-PREDICATE SB-C::OBJECT ; (SB-C::IR1-TRANSFORM-SPECIFIER-TYPE (SB-C:LVAR-VALUE TYPE)) SB-C::NODE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; FIND-CLASSOID ; (SB-C:DEFTRANSFORM SB-KERNEL:FIND-CLASSOID ; ((SB-C::NAME) ((SB-INT:CONSTANT-ARG SYMBOL)) *) ; (LET* ((SB-C::NAME #) (SB-C::CELL #)) (SB-INT:QUASIQUOTE (OR # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %TYPEP-WRAPPER ; (SB-C:DEFTRANSFORM SB-C::%TYPEP-WRAPPER ; ((SB-C::TEST-VALUE VARIABLE TYPE) * * :NODE SB-C::NODE) ; (SB-INT:AVER (SB-C:CONSTANT-LVAR-P TYPE)) ; (IF (SB-C:CONSTANT-LVAR-P SB-C::TEST-VALUE) ; (SB-INT:QUASIQUOTE '#) ; (LET* (# # #) (COND # # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %TYPE-CONSTRAINT ; (SB-C:DEFTRANSFORM SB-C::%TYPE-CONSTRAINT ; ((SB-C::X TYPE) * * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :CONSTRAINT) NIL) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; CONSP ; (SB-C:DEFTRANSFORM CONSP ((SB-C::X) ((NOT NULL)) * :IMPORTANT NIL) ; '(LISTP SB-C::X)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SYMBOLP ; (SB-C:DEFTRANSFORM SYMBOLP ((SB-C::X) ((NOT NULL)) * :IMPORTANT NIL) ; '(SB-KERNEL:NON-NULL-SYMBOL-P SB-C::X)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; NON-NULL-SYMBOL-P ; (SB-C:DEFTRANSFORM SB-KERNEL:NON-NULL-SYMBOL-P ; ((SB-C::OBJECT) (SYMBOL) * :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (NOT (EQ SB-C::OBJECT NIL)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; KEYWORDP ; (SB-C:DEFTRANSFORM KEYWORDP ((SB-C::X) ((SB-INT:CONSTANT-ARG SYMBOL))) ; (LET ((SB-C::PKG #)) (COND (# 'NIL) (# 'T) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %INSTANCE-TYPEP ; (SB-C:DEFTRANSFORM SB-C::%INSTANCE-TYPEP ; ((SB-C::OBJECT SB-C::SPEC) * * :NODE SB-C::NODE) ; (SB-INT:AVER (SB-C:CONSTANT-LVAR-P SB-C::SPEC)) ; (LET* ((SB-C::SPEC #) (CLASS #) (SB-C::NAME #) (SB-C::OTYPE #)) ; (COND (# NIL) (# T) (# #) (T # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; COERCE ; (SB-C:DEFTRANSFORM SB-XC:COERCE ((SB-C::X TYPE) * * :NODE SB-C::NODE) ; (UNLESS (SB-C:CONSTANT-LVAR-P TYPE) (SB-C::GIVE-UP-IR1-TRANSFORM)) ; (LET* ((SB-C::TVAL #) (SB-C::TSPEC #) (SB-C::VALUE-TYPE #)) ; (SB-C::CHECK-COERCE SB-C::VALUE-TYPE SB-C::TSPEC SB-C::TVAL SB-C::NODE) ; (COND (# 'SB-C::X) (# #) (# #) (# #) (# #) (# #) (#) (# #) (# #) (# #) (# #) ; ...))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; UNSIGNED-BYTE-64-P ; (SB-C:DEFTRANSFORM SB-KERNEL:UNSIGNED-BYTE-64-P ; ((SB-C::VALUE) (SB-VM:SIGNED-WORD) * :IMPORTANT NIL) ; (SB-INT:QUASIQUOTE (>= SB-C::VALUE 0))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %OTHER-POINTER-P ; (SB-C:DEFTRANSFORM SB-KERNEL:%OTHER-POINTER-P ((SB-C::OBJECT)) ; (LET ((TYPE #)) (COND (# NIL) (# T) (#)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; INTEGERP ; (SB-C:DEFTRANSFORM INTEGERP ((SB-C::X) ((NOT FIXNUM)) * :IMPORTANT NIL) ; '(SB-INT:BIGNUMP SB-C::X)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; STRUCTURE-TYPEP ; (SB-C:DEFTRANSFORM SB-C::STRUCTURE-TYPEP ; ((SB-C::OBJECT TYPE) (T T) * :NODE SB-C::NODE) ; (IF ; (SB-KERNEL:TYPES-EQUAL-OR-INTERSECT (SB-C::LVAR-TYPE SB-C::OBJECT) ; (SB-KERNEL:SPECIFIER-TYPE 'SB-KERNEL:INSTANCE)) ; (SB-C::GIVE-UP-IR1-TRANSFORM) NIL)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-C::STRUCTURE-TYPEP ; ((SB-C::OBJECT TYPE) (T (SB-INT:CONSTANT-ARG T))) ; (LET* ((SB-KERNEL:LAYOUT #) (TYPE #) (SB-C::DIFF #) (SB-C::PRED #)) ; (COND (# NIL) (# T) (SB-C::PRED #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; CLASSOID-CELL-TYPEP ; (SB-C:DEFTRANSFORM SB-KERNEL:CLASSOID-CELL-TYPEP ; ((SB-C::CELL SB-C::OBJECT) ((SB-INT:CONSTANT-ARG T) T)) ; (LET* ((TYPE #) (SB-C::DIFF #) (SB-C::PRED #)) ; (IF SB-C::PRED (SB-INT:QUASIQUOTE #) (SB-C::GIVE-UP-IR1-TRANSFORM)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; STRING-DESIGNATOR-P ; (SB-C:DEFTRANSFORM SB-C::STRING-DESIGNATOR-P ((SB-C::X) * * :NODE SB-C::NODE) ; (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :CONSTRAINT) ; (SB-INT:QUASIQUOTE ; (OR (SB-KERNEL:%OTHER-POINTER-SUBTYPE-P SB-C::X '#) (NULL #) ; (CHARACTERP #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ** - Continuable Error FAILURE-P was set when creating "obj/from-xc/src/compiler/typetran.lisp-obj". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-xc/src/compiler/typetran.lisp-obj" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/typetran.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (COND # #) RETRY :R4 retry (COND # #) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/src/cold/compile-cold-sbcl.lisp SKIP :R6 skip (LET # # ...) RETRY :R7 retry (LET # # ...) STOP :R8 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-2.lisp ABORT-BUILD :R9 Abort building SBCL. ABORT :R10 Abort main loop (27.402 sec) [195/299] src/compiler/generic/vm-typetran (3.693 sec) [196/299] src/compiler/riscv/subprim (1.409 sec) [197/299] src/compiler/riscv/debug (5.596 sec) [198/299] src/compiler/riscv/c-call (7.604 sec) [199/299] src/compiler/riscv/cell (55.002 sec) [200/299] src/compiler/riscv/call (62.453 sec) [201/299] src/compiler/riscv/nlx (10.034 sec) [202/299] src/compiler/generic/late-nlx (0.084 sec) [203/299] src/compiler/riscv/show (1.319 sec) [204/299] src/compiler/riscv/array (109.125 sec) [205/299] src/compiler/generic/type-error (12.052 sec) [206/299] src/compiler/envanal (12.209 sec) [207/299] src/assembly/riscv/assem-rtns (7.809 sec) [208/299] src/assembly/riscv/array (0.032 sec) [209/299] src/assembly/riscv/arith (0.032 sec) [210/299] src/assembly/riscv/alloc (1.352 sec) [211/299] src/assembly/master ;; Loading file src/assembly/master.lisp ... ;; Loaded file src/assembly/master.lisp (0.170 sec) [212/299] src/compiler/pseudo-vops (2.074 sec) [213/299] src/compiler/aliencomp ; file: src/compiler/aliencomp.lisp ; in: ; DEFTRANSFORM ; SLOT ; (SB-C:DEFTRANSFORM SB-ALIEN:SLOT ; ((SB-C::OBJECT SB-ALIEN:SLOT) ((SB-ALIEN:ALIEN #) SYMBOL)) ; '(SB-ALIEN:SLOT (SB-ALIEN:DEREF SB-C::OBJECT) SB-ALIEN:SLOT)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %SET-SLOT ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:%SET-SLOT ; ((SB-C::OBJECT SB-ALIEN:SLOT SB-C::VALUE) ((SB-ALIEN:ALIEN #) SYMBOL T)) ; '(SB-ALIEN-INTERNALS:%SET-SLOT (SB-ALIEN:DEREF SB-C::OBJECT) SB-ALIEN:SLOT ; SB-C::VALUE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %SLOT-ADDR ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:%SLOT-ADDR ; ((SB-C::OBJECT SB-ALIEN:SLOT) ((SB-ALIEN:ALIEN #) SYMBOL)) ; '(SB-ALIEN-INTERNALS:%SLOT-ADDR (SB-ALIEN:DEREF SB-C::OBJECT) SB-ALIEN:SLOT)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SLOT ; (SB-C:DEFTRANSFORM SB-ALIEN:SLOT ((SB-ALIEN:ALIEN SB-ALIEN:SLOT)) ; (MULTIPLE-VALUE-BIND (SB-C::SLOT-OFFSET SB-C::SLOT-TYPE) ; (SB-C::FIND-SLOT-OFFSET-AND-TYPE SB-ALIEN:ALIEN SB-ALIEN:SLOT) ; (SB-INT:QUASIQUOTE (SB-ALIEN-INTERNALS:%ALIEN-VALUE # # '#)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %SET-SLOT ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:%SET-SLOT ; ((SB-ALIEN:ALIEN SB-ALIEN:SLOT SB-C::VALUE)) ; (MULTIPLE-VALUE-BIND (SB-C::SLOT-OFFSET SB-C::SLOT-TYPE) ; (SB-C::FIND-SLOT-OFFSET-AND-TYPE SB-ALIEN:ALIEN SB-ALIEN:SLOT) ; (SB-INT:QUASIQUOTE (SETF # SB-C::VALUE)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %SLOT-ADDR ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:%SLOT-ADDR ; ((SB-ALIEN:ALIEN SB-ALIEN:SLOT)) ; (MULTIPLE-VALUE-BIND (SB-C::SLOT-OFFSET SB-C::SLOT-TYPE) ; (SB-C::FIND-SLOT-OFFSET-AND-TYPE SB-ALIEN:ALIEN SB-ALIEN:SLOT) ; (SB-INT:/NOSHOW "in DEFTRANSFORM %SLOT-ADDR, creating %SAP-ALIEN") ; (SB-INT:QUASIQUOTE (SB-ALIEN-INTERNALS:%SAP-ALIEN # '#)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; DEREF ; (SB-C:DEFTRANSFORM SB-ALIEN:DEREF ((SB-ALIEN:ALIEN &REST SB-C::INDICES)) ; (MULTIPLE-VALUE-BIND (SB-C::INDICES-ARGS SB-C::OFFSET-EXPR SB-C::ELEMENT-TYPE) ; (SB-C::COMPUTE-DEREF-GUTS SB-ALIEN:ALIEN SB-C::INDICES) ; (SB-INT:QUASIQUOTE (LAMBDA # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %SET-DEREF ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:%SET-DEREF ; ((SB-ALIEN:ALIEN SB-C::VALUE &REST SB-C::INDICES)) ; (MULTIPLE-VALUE-BIND (SB-C::INDICES-ARGS SB-C::OFFSET-EXPR SB-C::ELEMENT-TYPE) ; (SB-C::COMPUTE-DEREF-GUTS SB-ALIEN:ALIEN SB-C::INDICES) ; (SB-INT:QUASIQUOTE (LAMBDA # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %DEREF-ADDR ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:%DEREF-ADDR ; ((SB-ALIEN:ALIEN &REST SB-C::INDICES)) ; (MULTIPLE-VALUE-BIND (SB-C::INDICES-ARGS SB-C::OFFSET-EXPR SB-C::ELEMENT-TYPE) ; (SB-C::COMPUTE-DEREF-GUTS SB-ALIEN:ALIEN SB-C::INDICES) ; (SB-INT:/NOSHOW ; "in DEFTRANSFORM %DEREF-ADDR, creating (LAMBDA .. %SAP-ALIEN)") ; (SB-INT:QUASIQUOTE (LAMBDA # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %HEAP-ALIEN ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:%HEAP-ALIEN ; ((SB-INT:INFO) ((SB-INT:CONSTANT-ARG SB-ALIEN-INTERNALS:HEAP-ALIEN-INFO)) *) ; (MULTIPLE-VALUE-BIND (SB-C::SAP TYPE) ; (SB-C::HEAP-ALIEN-SAP-AND-TYPE SB-INT:INFO) ; (SB-INT:QUASIQUOTE (SB-ALIEN-INTERNALS:%ALIEN-VALUE # 0 '#)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %SET-HEAP-ALIEN ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:%SET-HEAP-ALIEN ; ((SB-INT:INFO SB-C::VALUE) (SB-ALIEN-INTERNALS:HEAP-ALIEN-INFO T) *) ; (MULTIPLE-VALUE-BIND (SB-C::SAP TYPE) ; (SB-C::HEAP-ALIEN-SAP-AND-TYPE SB-INT:INFO) ; (SB-INT:QUASIQUOTE (SETF # SB-C::VALUE)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %HEAP-ALIEN-ADDR ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:%HEAP-ALIEN-ADDR ((SB-INT:INFO)) ; (MULTIPLE-VALUE-BIND (SB-C::SAP TYPE) ; (SB-C::HEAP-ALIEN-SAP-AND-TYPE SB-INT:INFO) ; (SB-INT:/NOSHOW "in DEFTRANSFORM %HEAP-ALIEN-ADDR, creating %SAP-ALIEN") ; (SB-INT:QUASIQUOTE (SB-ALIEN-INTERNALS:%SAP-ALIEN # '#)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; MAKE-LOCAL-ALIEN ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:MAKE-LOCAL-ALIEN ((SB-INT:INFO)) ; (SB-C::ALIEN-INFO-CONSTANT-OR-ABORT SB-INT:INFO) ; (LET* ((SB-INT:INFO #) (SB-ALIEN-INTERNALS:ALIEN-TYPE #) (SB-C::BITS #)) ; (UNLESS SB-C::BITS (SB-C::ABORT-IR1-TRANSFORM "unknown size: ~S" #)) ; (SB-INT:/NOSHOW "in DEFTRANSFORM MAKE-LOCAL-ALIEN" SB-INT:INFO) ; (SB-INT:/NOSHOW ; (SB-ALIEN-INTERNALS:LOCAL-ALIEN-INFO-FORCE-TO-MEMORY-P SB-INT:INFO)) ; (SB-INT:/NOSHOW SB-ALIEN-INTERNALS:ALIEN-TYPE ; (SB-ALIEN-INTERNALS:UNPARSE-ALIEN-TYPE SB-ALIEN-INTERNALS:ALIEN-TYPE) ; (SB-ALIEN-INTERNALS:ALIEN-TYPE-BITS SB-ALIEN-INTERNALS:ALIEN-TYPE)) ; (IF (SB-ALIEN-INTERNALS:LOCAL-ALIEN-INFO-FORCE-TO-MEMORY-P SB-INT:INFO) ; (SB-INT:QUASIQUOTE #) (LET* # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; NOTE-LOCAL-ALIEN-TYPE ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:NOTE-LOCAL-ALIEN-TYPE ; ((SB-INT:INFO SB-C::VAR)) (SB-C::ALIEN-INFO-CONSTANT-OR-ABORT SB-INT:INFO) ; (LET ((SB-INT:INFO #)) ; (UNLESS (SB-ALIEN-INTERNALS:LOCAL-ALIEN-INFO-FORCE-TO-MEMORY-P SB-INT:INFO) ; (LET # #))) ; NIL) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; LOCAL-ALIEN ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:LOCAL-ALIEN ((SB-INT:INFO SB-C::VAR)) ; (SB-C::ALIEN-INFO-CONSTANT-OR-ABORT SB-INT:INFO) ; (LET* ((SB-INT:INFO #) (SB-ALIEN-INTERNALS:ALIEN-TYPE #)) ; (SB-INT:/NOSHOW "in DEFTRANSFORM LOCAL-ALIEN" SB-INT:INFO ; SB-ALIEN-INTERNALS:ALIEN-TYPE) ; (SB-INT:/NOSHOW ; (SB-ALIEN-INTERNALS:LOCAL-ALIEN-INFO-FORCE-TO-MEMORY-P SB-INT:INFO)) ; (IF (SB-ALIEN-INTERNALS:LOCAL-ALIEN-INFO-FORCE-TO-MEMORY-P SB-INT:INFO) ; (SB-INT:QUASIQUOTE #) (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %LOCAL-ALIEN-FORCED-TO-MEMORY-P ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:%LOCAL-ALIEN-FORCED-TO-MEMORY-P ; ((SB-INT:INFO)) (SB-C::ALIEN-INFO-CONSTANT-OR-ABORT SB-INT:INFO) ; (LET ((SB-INT:INFO #)) ; (SB-ALIEN-INTERNALS:LOCAL-ALIEN-INFO-FORCE-TO-MEMORY-P SB-INT:INFO))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %SET-LOCAL-ALIEN ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:%SET-LOCAL-ALIEN ; ((SB-INT:INFO SB-C::VAR SB-C::VALUE)) ; (SB-C::ALIEN-INFO-CONSTANT-OR-ABORT SB-INT:INFO) ; (LET* ((SB-INT:INFO #) (SB-ALIEN-INTERNALS:ALIEN-TYPE #)) ; (IF (SB-ALIEN-INTERNALS:LOCAL-ALIEN-INFO-FORCE-TO-MEMORY-P SB-INT:INFO) ; (SB-INT:QUASIQUOTE #) '(ERROR "This should be eliminated as dead code.")))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %LOCAL-ALIEN-ADDR ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:%LOCAL-ALIEN-ADDR ; ((SB-INT:INFO SB-C::VAR)) (SB-C::ALIEN-INFO-CONSTANT-OR-ABORT SB-INT:INFO) ; (LET* ((SB-INT:INFO #) (SB-ALIEN-INTERNALS:ALIEN-TYPE #)) ; (SB-INT:/NOSHOW "in DEFTRANSFORM %LOCAL-ALIEN-ADDR, creating %SAP-ALIEN") ; (IF (SB-ALIEN-INTERNALS:LOCAL-ALIEN-INFO-FORCE-TO-MEMORY-P SB-INT:INFO) ; (SB-INT:QUASIQUOTE #) (ERROR "This shouldn't happen.")))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %CAST ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:%CAST ; ((SB-ALIEN:ALIEN SB-C::TARGET-TYPE)) ; (UNLESS (SB-C:CONSTANT-LVAR-P SB-C::TARGET-TYPE) ; (SB-C::GIVE-UP-IR1-TRANSFORM ; "The alien type is not constant, so access cannot be open coded.")) ; (LET ((SB-C::TARGET-TYPE #)) (COND (# #) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; ALIEN-SAP ; (SB-C:DEFTRANSFORM SB-ALIEN:ALIEN-SAP ((SB-ALIEN:ALIEN)) ; (LET ((SB-C::ALIEN-NODE #)) ; (TYPECASE SB-C::ALIEN-NODE (SB-C::COMBINATION # '#) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %SAP-ALIEN ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:%SAP-ALIEN ((SB-C::SAP TYPE)) ; "optimize away %SAP-ALIEN" ; (SB-C::GIVE-UP-IR1-TRANSFORM ; "forced to do runtime allocation of alien-value structure")) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; NATURALIZE ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:NATURALIZE ((SB-C::OBJECT TYPE)) ; (SB-C::%COMPUTED-LAMBDA #'SB-ALIEN-INTERNALS:COMPUTE-NATURALIZE-LAMBDA TYPE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; DEPORT ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:DEPORT ((SB-ALIEN:ALIEN TYPE)) ; (SB-C::%COMPUTED-LAMBDA #'SB-ALIEN-INTERNALS:COMPUTE-DEPORT-LAMBDA TYPE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; DEPORT-ALLOC ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:DEPORT-ALLOC ((SB-ALIEN:ALIEN TYPE)) ; (SB-C::%COMPUTED-LAMBDA #'SB-ALIEN-INTERNALS:COMPUTE-DEPORT-ALLOC-LAMBDA ; TYPE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; %ALIEN-VALUE ; (SB-C:DEFTRANSFORM SB-ALIEN-INTERNALS:%ALIEN-VALUE ; ((SB-C::SAP SB-C::OFFSET TYPE)) ; (SB-C::%COMPUTED-LAMBDA #'SB-ALIEN-INTERNALS:COMPUTE-EXTRACT-LAMBDA TYPE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; (SETF %ALIEN-VALUE) ; (SB-C:DEFTRANSFORM (SETF SB-ALIEN-INTERNALS:%ALIEN-VALUE) ; ((SB-C::VALUE SB-C::SAP SB-C::OFFSET TYPE)) ; (SB-C::%COMPUTED-LAMBDA #'SB-ALIEN-INTERNALS:COMPUTE-DEPOSIT-LAMBDA TYPE)) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; ALIEN-FUNCALL ; (SB-C:DEFTRANSFORM SB-ALIEN:ALIEN-FUNCALL ; ((FUNCTION &REST SB-C::ARGS) ((SB-ALIEN:ALIEN #) &REST T) *) ; (LET ((SB-C::NAMES #)) ; (SB-INT:/NOSHOW "entering first DEFTRANSFORM ALIEN-FUNCALL" FUNCTION ; SB-C::ARGS) ; (SB-INT:QUASIQUOTE (LAMBDA #'# #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SB-ALIEN:ALIEN-FUNCALL ; ((FUNCTION &REST SB-C::ARGS) * * :NODE SB-C::NODE) ; (LET ((TYPE #)) ; (UNLESS (SB-KERNEL:ALIEN-TYPE-TYPE-P TYPE) ; (SB-C::GIVE-UP-IR1-TRANSFORM "can't tell function type at compile time")) ; (SB-INT:/NOSHOW "entering second DEFTRANSFORM ALIEN-FUNCALL" FUNCTION) ; (LET (#) (UNLESS # #) (LET # # #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SB-ALIEN::C-STRING-EXTERNAL-FORMAT ; (SB-C:DEFTRANSFORM SB-ALIEN::C-STRING-EXTERNAL-FORMAT ; ((TYPE) ((SB-INT:CONSTANT-ARG SB-ALIEN::ALIEN-C-STRING-TYPE))) ; (LET ((FORMAT #)) ; (IF (EQ FORMAT :DEFAULT) (SB-INT:QUASIQUOTE #) (SB-INT:QUASIQUOTE '#)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ** - Continuable Error FAILURE-P was set when creating "obj/from-xc/src/compiler/aliencomp.lisp-obj". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-xc/src/compiler/aliencomp.lisp-obj" The following restarts are also available: RECOMPILE :R1 Recompile file "src/compiler/aliencomp.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (COND # #) RETRY :R4 retry (COND # #) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/src/cold/compile-cold-sbcl.lisp SKIP :R6 skip (LET # # ...) RETRY :R7 retry (LET # # ...) STOP :R8 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-2.lisp ABORT-BUILD :R9 Abort building SBCL. ABORT :R10 Abort main loop (11.211 sec) [214/299] src/compiler/coverage (1.868 sec) [215/299] src/compiler/ltv (1.243 sec) [216/299] src/compiler/gtn (5.612 sec) [217/299] src/compiler/ltn (19.311 sec) [218/299] src/compiler/stack (7.035 sec) [219/299] src/compiler/control (3.857 sec) [220/299] src/compiler/entry (2.848 sec) [221/299] src/compiler/ir2tran (47.040 sec) [222/299] src/compiler/generic/vm-ir2tran (15.091 sec) [223/299] src/compiler/copyprop (3.545 sec) [224/299] src/compiler/represent (19.462 sec) [225/299] src/compiler/ir2opt (23.300 sec) [226/299] src/compiler/pack (115.830 sec) [227/299] src/compiler/pack-iterative (22.136 sec) [228/299] src/compiler/debug (36.371 sec) [229/299] src/code/format-time (23.994 sec) [230/299] src/code/error (7.089 sec) [231/299] src/code/parse-defmacro-errors (2.228 sec) [232/299] src/code/macroexpand (2.192 sec) [233/299] src/code/funutils (0.354 sec) [234/299] src/code/linux-os (0.197 sec) [235/299] src/code/share-vm (6.579 sec) [236/299] src/code/riscv-vm (1.906 sec) [237/299] src/code/unicode-norm (5.930 sec) [238/299] src/code/mipsstrops (2.160 sec) [239/299] src/code/string (82.850 sec) [240/299] src/code/target-signal-common (1.952 sec) [241/299] src/code/target-signal (3.858 sec) [242/299] src/code/serve-event (15.052 sec) [243/299] src/code/late-extensions (1.459 sec) [244/299] src/code/brothertree (9.945 sec) [245/299] src/code/simple-fun (11.902 sec) [246/299] src/code/eval (4.922 sec) [247/299] src/code/toplevel (12.275 sec) [248/299] src/code/time (9.987 sec) [249/299] src/code/target-package ; file: src/code/target-package.lisp ; in: ; DEFTRANSFORM ; INTERN ; (SB-C:DEFTRANSFORM INTERN ; ((SB-C::NAME XC-STRICT-CL:PACKAGE-NAME) ; (T (SB-INT:CONSTANT-ARG SB-KERNEL:STRING-DESIGNATOR))) ; (SB-INT:QUASIQUOTE ; (SB-IMPL::INTERN2 SB-C::NAME #))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; FIND-SYMBOL ; (SB-C:DEFTRANSFORM FIND-SYMBOL ; ((SB-C::NAME XC-STRICT-CL:PACKAGE-NAME) ; (T (SB-INT:CONSTANT-ARG SB-KERNEL:STRING-DESIGNATOR))) ; (SB-INT:QUASIQUOTE ; (SB-IMPL::FIND-SYMBOL2 SB-C::NAME #))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; FIND-PACKAGE ; (SB-C:DEFTRANSFORM FIND-PACKAGE ; ((SB-C::NAME) ((SB-INT:CONSTANT-ARG SB-KERNEL:STRING-DESIGNATOR))) ; (MULTIPLE-VALUE-BIND (SB-KERNEL:FORM SB-C::CONSTP) ; (SB-C::FIND-PACKAGE-XFORM SB-C::NAME) ; (IF SB-C::CONSTP SB-KERNEL:FORM (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ** - Continuable Error FAILURE-P was set when creating "obj/from-xc/src/code/target-package.lisp-obj" . If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-xc/src/code/target-package.lisp-obj" The following restarts are also available: RECOMPILE :R1 Recompile file "src/code/target-package.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (COND # #) RETRY :R4 retry (COND # #) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/src/cold/compile-cold-sbcl.lisp SKIP :R6 skip (LET # # ...) RETRY :R7 retry (LET # # ...) STOP :R8 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-2.lisp ABORT-BUILD :R9 Abort building SBCL. ABORT :R10 Abort main loop (61.459 sec) [250/299] src/code/bignum-random (9.298 sec) [251/299] src/code/target-hash-table ; file: src/code/target-hash-table.lisp ; in: ; DEFUN ; GUESS-EQ-HASH-FUN ; (SB-IMPL::ALMOST-WORD-LEAST-ZERO-BIT ; (ASH SB-IMPL::UNCHANGED-BITS (- SB-IMPL::MIN-RIGHT-SHIFT))) ; --> BLOCK 1- ; ==> ; 1 ; note: doing unsigned word to integer coercion (cost 20) ; in: ; DEFUN ; ADAPT-EQ-HASH-FUN-BY-N-COLLISIONS ; (SB-XC:FLOAT SB-IMPL::N-EMPTY-BUCKETS #.(MAKE-DOUBLE-FLOAT #x0 #x0)) ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of defaulted ; in: ; DEFUN ; RAISE-SXSTATE-LIMIT-AND-REHASH ; (1- SB-IMPL::N-COLLISIONS) ; note: doing unsigned word to integer coercion (cost 20) from N-COLLISIONS ; in: ; DEFUN ; FINDHASH-WEAK ; (SB-IMPL::DONE-REHASHING HASH-TABLE SB-IMPL::KV-VECTOR ; SB-IMPL::INITIAL-STAMP) ; --> LET UNLESS IF PROGN SB-INT:AVER UNLESS IF EQ ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ ; in: ; DEFINE-HT-GETTER ; GETHASH/EQ-HASH/COMMON ; (SB-IMPL::DEFINE-HT-GETTER SB-IMPL::GETHASH/EQ-HASH/COMMON EQ ; SB-IMPL::EQ-HASH/COMMON* T) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK SB-SYS:WITH-PINNED-OBJECTS LET SB-INT:BINDING* ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL SB-IMPL::EQ-HASH/COMMON* ; --> SB-IMPL::HASH-TABLE-%HASH-FUN-STATE ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first result of %RAW-INSTANCE-REF/SIGNED-WORD-C ; in: ; DEFINE-HT-SETTER ; PUTHASH/EQ-HASH/COMMON ; (SB-IMPL::DEFINE-HT-SETTER SB-IMPL::PUTHASH/EQ-HASH/COMMON EQ ; SB-IMPL::EQ-HASH/COMMON* T 14) ; --> PROGN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK BLOCK ; --> SB-SYS:WITH-PINNED-OBJECTS LET SB-INT:BINDING* LET* ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL SB-IMPL::EQ-HASH/COMMON* ; --> SB-IMPL::HASH-TABLE-%HASH-FUN-STATE ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first result of %RAW-INSTANCE-REF/SIGNED-WORD-C ; in: ; DEFINE-REMHASH ; REMHASH/EQ-HASH/COMMON ; (SB-IMPL::DEFINE-REMHASH SB-IMPL::REMHASH/EQ-HASH/COMMON EQ ; SB-IMPL::EQ-HASH/COMMON* T) ; --> PROGN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK ; --> SB-SYS:WITH-PINNED-OBJECTS LET SB-INT:BINDING* LET* ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL SB-IMPL::EQ-HASH/COMMON* ; --> SB-IMPL::HASH-TABLE-%HASH-FUN-STATE ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first result of %RAW-INSTANCE-REF/SIGNED-WORD-C (121.876 sec) [252/299] src/code/fdefinition (6.866 sec) [253/299] src/code/sort (29.896 sec) [254/299] src/code/target-lflist (19.121 sec) [255/299] src/code/solist (11.240 sec) [256/299] src/code/final (5.786 sec) [257/299] src/code/reader (77.784 sec) [258/299] src/code/print ; file: src/code/print.lisp ; in: ; DEFUN ; %OUTPUT-INTEGER-IN-BASE ; (SB-IMPL::ITERATIVE-ALGORITHM) ; --> BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; --> FUNCTION WHEN IF SB-XC:ZEROP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15) to INTEGER ; note: doing signed word to integer coercion (cost 15) (89.956 sec) [259/299] src/code/pprint (64.823 sec) [260/299] src/code/target-defstruct (23.766 sec) [261/299] src/code/target-stream (10.774 sec) [262/299] src/code/target-pathname (76.634 sec) [263/299] src/code/unix-pathname (17.879 sec) [264/299] src/code/filesys (29.811 sec) [265/299] src/code/target-misc (4.767 sec) [266/299] src/code/sharpm (9.554 sec) [267/299] src/code/early-step (0.404 sec) [268/299] src/code/avltree (4.180 sec) [269/299] src/code/target-thread ; file: src/code/target-thread.lisp ; in: ; DEFUN ; %TRY-MUTEX ; (= (SB-EXT:CAS (SB-THREAD::MUTEX-STATE SB-THREAD:MUTEX) 0 1) 0) ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ (42.165 sec) [270/299] src/code/error-error (0.632 sec) [271/299] src/code/debug-int (81.912 sec) [272/299] src/code/gc (9.386 sec) [273/299] src/code/interr (9.380 sec) [274/299] src/code/target-load (10.424 sec) [275/299] src/compiler/target-disassem (62.499 sec) [276/299] src/compiler/riscv/target-insts (7.778 sec) [277/299] src/code/debug (28.986 sec) [278/299] src/code/octets (16.706 sec) [279/299] src/code/external-formats/enc-basic ; file: src/code/external-formats/enc-basic.lisp ; in: ; DEFUN ; SB-VM::SIMD-COPY-UTF8-TO-CHARACTER-STRING ; (LOGTEST SB-EXT:WORD SB-IMPL::ASCII-MASK) ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ ; in: ; DEFUN ; SB-VM::SIMD-COPY-UTF8-TO-BASE-STRING ; (LOGTEST SB-EXT:WORD SB-IMPL::ASCII-MASK) ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ (213.435 sec) [280/299] src/code/external-formats/enc-ucs (52.961 sec) [281/299] src/code/bit-bash ; file: src/code/bit-bash.lisp ; in: ; PROGN ; (!DEFINE-BYTE-BASHERS 1) ; (SB-VM::!DEFINE-BYTE-BASHERS 64) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK SB-KERNEL::CONSTANT-UB64-BASH BLOCK ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION IF LET LET ; --> MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of defaulted ; in: ; DEF ; (SB-VM::DEF) ; --> SB-VM::!DEFINE-CONSTANT-BYTE-BASHERS PROGN DEFUN PROGN ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION ; --> BLOCK SB-KERNEL::CONSTANT-UB64-BASH BLOCK MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION IF LET LET MULTIPLE-VALUE-BIND LET ; --> PROGN UNLESS IF TYPEP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of defaulted ; in: ; !DEFINE-CONSTANT-BYTE-BASHERS ; 64 ; (SB-VM::!DEFINE-CONSTANT-BYTE-BASHERS 64 FIXNUM ; (LAMBDA (SB-VM::VALUE) ; (SB-XC:LDB (SB-XC:BYTE 64 0) (ASH SB-VM::VALUE SB-VM:N-FIXNUM-TAG-BITS)))) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK SB-KERNEL::CONSTANT-UB64-BASH BLOCK ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION IF LET LET ; --> MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of defaulted ; (SB-VM::!DEFINE-CONSTANT-BYTE-BASHERS 64 SB-XC:DOUBLE-FLOAT ; (LAMBDA (SB-VM::VALUE) ; (SB-XC:LDB (SB-XC:BYTE 64 0) (SB-KERNEL:DOUBLE-FLOAT-BITS SB-VM::VALUE)))) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK SB-KERNEL::CONSTANT-UB64-BASH BLOCK ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION IF LET LET ; --> MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of defaulted ; (SB-VM::!DEFINE-CONSTANT-BYTE-BASHERS 64 (SB-XC:COMPLEX SB-XC:SINGLE-FLOAT) ; (LAMBDA (SB-VM::ITEM) (LOGIOR (ASH # 32) (SB-XC:LDB # #))) ; SB-KERNEL:COMPLEX-SINGLE-FLOAT) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK SB-KERNEL::CONSTANT-UB64-BASH BLOCK ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION IF LET LET ; --> MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of defaulted ; in: ; DEF ; %BIT-POS-FWD/1 ; (SB-VM::DEF SB-KERNEL:%BIT-POS-FWD/1 NIL (IDENTITY)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK ; ==> ; (LET* ; ((SB-VM::FIRST-WORD (ASH SB-VM::START #)) ; (SB-VM::LAST-WORD (ASH SB-VM::END #)) ; (SB-VM::START-MASK (SB-VM::COMPUTE-START-MASK SB-VM::START)) ; (SB-VM::END-MASK (SB-VM::COMPUTE-END-MASK SB-VM::END))) ; (DECLARE (SB-INT:INDEX SB-VM::LAST-WORD SB-VM::FIRST-WORD)) ; (FLET ((SB-VM::START-BIT # # #) (SB-VM::END-BIT # # #) (SB-VM::GET-WORD # #)) ; (DECLARE (INLINE SB-VM::START-BIT SB-VM::END-BIT SB-VM::GET-WORD)) ; (UNLESS (< SB-VM::FIRST-WORD SB-VM::LAST-WORD) ; (RETURN-FROM SB-KERNEL:%BIT-POS-FWD/1 #)) ; (LET* (# #) (DECLARE #) (UNLESS # #) (INCF SB-VM::WORD-INDEX) ; (LOOP SB-VM::WHILE # DO # #) (UNLESS # #)))) ; note: doing signed word to integer coercion (cost 15) to END-MASK ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET* UNLESS IF SB-XC:ZEROP ; ==> ; 1 ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET* LOOP BLOCK TAGBODY PROGN LET UNLESS ; --> IF SB-XC:ZEROP ; ==> ; 1 ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET* UNLESS IF LET UNLESS IF SB-XC:ZEROP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET* LOOP BLOCK TAGBODY PROGN LET UNLESS ; --> IF RETURN-FROM SB-VM::CALC-INDEX LOGIOR THE SB-VM::START-BIT ; --> BLOCK - INTEGER-LENGTH LOGAND - ; ==> ; 1 ; note: doing unsigned word to integer coercion (cost 20) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET* LOOP BLOCK TAGBODY PROGN LET UNLESS ; --> IF RETURN-FROM SB-VM::CALC-INDEX LOGIOR THE SB-VM::START-BIT ; --> BLOCK - ; ==> ; (INTEGER-LENGTH (LOGAND SB-VM::X (- SB-VM::X))) ; note: doing unsigned word to integer coercion (cost 20) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET* UNLESS IF RETURN-FROM ; --> SB-VM::CALC-INDEX LOGIOR THE SB-VM::START-BIT BLOCK - ; --> INTEGER-LENGTH LOGAND - ; ==> ; 1 ; note: doing unsigned word to integer coercion (cost 20) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET* UNLESS IF RETURN-FROM ; --> SB-VM::CALC-INDEX LOGIOR THE SB-VM::START-BIT BLOCK - ; ==> ; (INTEGER-LENGTH (LOGAND SB-VM::X (- SB-VM::X))) ; note: doing unsigned word to integer coercion (cost 20) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET UNLESS IF RETURN-FROM LET UNLESS IF ; --> SB-XC:ZEROP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET UNLESS IF RETURN-FROM LET UNLESS IF LET ; --> UNLESS IF SB-XC:ZEROP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ ; in: ; DEF ; %BIT-POS-REV/1 ; (SB-VM::DEF SB-KERNEL:%BIT-POS-REV/1 T (IDENTITY)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET UNLESS IF SB-XC:ZEROP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET LOOP BLOCK TAGBODY PROGN LET ; --> SB-VM::GET-WORD BLOCK IDENTITY ; ==> ; 1 ; note: doing unsigned word to integer coercion (cost 20), for: ; the first result of VECTOR-RAW-BITS ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET LET ; ==> ; (LOGAND SB-VM::START-MASK (SB-VM::GET-WORD SB-VM::FIRST-WORD)) ; note: doing unsigned word to integer coercion (cost 20), for: ; the first result of inline (unsigned-byte 64) arithmetic ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET UNLESS IF LET UNLESS IF SB-XC:ZEROP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET UNLESS IF RETURN-FROM LET UNLESS IF ; --> SB-XC:ZEROP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET UNLESS IF RETURN-FROM LET UNLESS IF LET ; --> UNLESS IF SB-XC:ZEROP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ ; in: ; DEF ; %BIT-POS-FWD/0 ; (SB-VM::DEF SB-KERNEL:%BIT-POS-FWD/0 NIL ; (LOGANDC2 SB-EXT:MOST-POSITIVE-WORD)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK ; ==> ; (LET* ; ((SB-VM::FIRST-WORD (ASH SB-VM::START #)) ; (SB-VM::LAST-WORD (ASH SB-VM::END #)) ; (SB-VM::START-MASK (SB-VM::COMPUTE-START-MASK SB-VM::START)) ; (SB-VM::END-MASK (SB-VM::COMPUTE-END-MASK SB-VM::END))) ; (DECLARE (SB-INT:INDEX SB-VM::LAST-WORD SB-VM::FIRST-WORD)) ; (FLET ((SB-VM::START-BIT # # #) (SB-VM::END-BIT # # #) (SB-VM::GET-WORD # #)) ; (DECLARE (INLINE SB-VM::START-BIT SB-VM::END-BIT SB-VM::GET-WORD)) ; (UNLESS (< SB-VM::FIRST-WORD SB-VM::LAST-WORD) ; (RETURN-FROM SB-KERNEL:%BIT-POS-FWD/0 #)) ; (LET* (# #) (DECLARE #) (UNLESS # #) (INCF SB-VM::WORD-INDEX) ; (LOOP SB-VM::WHILE # DO # #) (UNLESS # #)))) ; note: doing signed word to integer coercion (cost 15) to END-MASK ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET* UNLESS IF SB-XC:ZEROP ; ==> ; 1 ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET* LOOP BLOCK TAGBODY PROGN LET UNLESS ; --> IF SB-XC:ZEROP ; ==> ; 1 ; note: doing unsigned word to integer coercion (cost 20), for: ; the first argument of IF-EQ ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET* UNLESS IF LET UNLESS IF SB-XC:ZEROP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET* LOOP BLOCK TAGBODY PROGN LET UNLESS ; --> IF RETURN-FROM SB-VM::CALC-INDEX LOGIOR THE SB-VM::START-BIT ; --> BLOCK - INTEGER-LENGTH LOGAND - ; ==> ; 1 ; note: doing unsigned word to integer coercion (cost 20) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET* LOOP BLOCK TAGBODY PROGN LET UNLESS ; --> IF RETURN-FROM SB-VM::CALC-INDEX LOGIOR THE SB-VM::START-BIT ; --> BLOCK - ; ==> ; (INTEGER-LENGTH (LOGAND SB-VM::X (- SB-VM::X))) ; note: doing unsigned word to integer coercion (cost 20) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET* UNLESS IF RETURN-FROM ; --> SB-VM::CALC-INDEX LOGIOR THE SB-VM::START-BIT BLOCK - ; --> INTEGER-LENGTH LOGAND - ; ==> ; 1 ; note: doing unsigned word to integer coercion (cost 20) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET* UNLESS IF RETURN-FROM ; --> SB-VM::CALC-INDEX LOGIOR THE SB-VM::START-BIT BLOCK - ; ==> ; (INTEGER-LENGTH (LOGAND SB-VM::X (- SB-VM::X))) ; note: doing unsigned word to integer coercion (cost 20) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET UNLESS IF RETURN-FROM LET UNLESS IF ; --> SB-XC:ZEROP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET UNLESS IF RETURN-FROM LET UNLESS IF LET ; --> UNLESS IF SB-XC:ZEROP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ ; in: ; DEF ; %BIT-POS-REV/0 ; (SB-VM::DEF SB-KERNEL:%BIT-POS-REV/0 T (LOGANDC2 SB-EXT:MOST-POSITIVE-WORD)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET UNLESS IF SB-XC:ZEROP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET LOOP BLOCK TAGBODY PROGN LET ; --> SB-VM::GET-WORD BLOCK LOGANDC2 ; ==> ; 1 ; note: doing unsigned word to integer coercion (cost 20), for: ; the first result of LOGNOT-MOD64/UNSIGNED=>UNSIGNED ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET LET ; ==> ; (LOGAND SB-VM::START-MASK (SB-VM::GET-WORD SB-VM::FIRST-WORD)) ; note: doing unsigned word to integer coercion (cost 20), for: ; the first result of inline (unsigned-byte 64) arithmetic ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET LET UNLESS IF LET UNLESS IF SB-XC:ZEROP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET UNLESS IF RETURN-FROM LET UNLESS IF ; --> SB-XC:ZEROP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* FLET UNLESS IF RETURN-FROM LET UNLESS IF LET ; --> UNLESS IF SB-XC:ZEROP ; ==> ; 1 ; note: doing signed word to integer coercion (cost 15), for: ; the first argument of IF-EQ (94.500 sec) [282/299] src/compiler/generic/sanctify (1.264 sec) [283/299] src/pcl/walk (17.653 sec) [284/299] src/pcl/low (3.842 sec) [285/299] src/pcl/macros (2.449 sec) [286/299] src/pcl/ecd (3.551 sec) [287/299] src/pcl/compiler-support ; file: src/pcl/compiler-support.lisp ; in: ; DEFTRANSFORM ; SB-PCL::PCL-INSTANCE-P ; (SB-C:DEFTRANSFORM SB-PCL::PCL-INSTANCE-P ((SB-C::OBJECT)) ; (DECLARE (NOTINLINE SB-KERNEL:SPECIFIER-TYPE)) ; (LET* ((SB-C::OTYPE #) (STANDARD-OBJECT #)) (COND (# T) (# NIL) (T #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SLOT-BOUNDP ; (SB-C:DEFTRANSFORM SLOT-BOUNDP ; ((SB-C::OBJECT SB-C::SLOT-NAME) (T (SB-INT:CONSTANT-ARG SYMBOL)) * :NODE ; SB-C::NODE) ; (COND ((SB-C::ALWAYS-BOUND-STRUCT-ACCESSOR-P SB-C::OBJECT SB-C::SLOT-NAME) T) ; (T (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :CONSTRAINT) ; (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SLOT-MAKUNBOUND ; (SB-C:DEFTRANSFORM SLOT-MAKUNBOUND ; ((SB-C::OBJECT SB-C::SLOT-NAME) (T (SB-INT:CONSTANT-ARG SYMBOL)) * :NODE ; SB-C::NODE) ; (COND ; ((SB-C::ALWAYS-BOUND-STRUCT-ACCESSOR-P SB-C::OBJECT SB-C::SLOT-NAME) ; (SB-INT:QUASIQUOTE #)) ; (T (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :CONSTRAINT) ; (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SLOT-VALUE ; (SB-C:DEFTRANSFORM SLOT-VALUE ; ((SB-C::OBJECT SB-C::SLOT-NAME) (STRUCTURE-OBJECT SYMBOL) * :POLICY ; (< SAFETY 3)) ; (SB-INT:QUASIQUOTE ; (SB-PCL::STRUCTURE-SLOT-VALUE SB-C::OBJECT SB-C::SLOT-NAME))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; (SB-C:DEFTRANSFORM SLOT-VALUE ; ((SB-C::OBJECT SB-C::SLOT-NAME) (T (SB-INT:CONSTANT-ARG SYMBOL)) * :NODE ; SB-C::NODE) ; (SB-INT:ACOND ; ((SB-C::ALWAYS-BOUND-STRUCT-ACCESSOR-P SB-C::OBJECT SB-C::SLOT-NAME) ; (SB-INT:QUASIQUOTE #)) ; (T (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :CONSTRAINT) ; (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ; in: ; DEFTRANSFORM ; SB-PCL::SET-SLOT-VALUE ; (SB-C:DEFTRANSFORM SB-PCL::SET-SLOT-VALUE ; ((SB-C::OBJECT SB-C::SLOT-NAME SB-C::NEW-VALUE) ; (T (SB-INT:CONSTANT-ARG SYMBOL) T) * :NODE SB-C::NODE) ; (SB-INT:ACOND ; ((SB-C::ALWAYS-BOUND-STRUCT-ACCESSOR-P SB-C::OBJECT SB-C::SLOT-NAME) ; (SB-INT:QUASIQUOTE #)) ; ((SB-C:POLICY SB-C::NODE #) ; (SB-C::GIVE-UP-IR1-TRANSFORM "cannot use optimized accessor in safe code")) ; (T (SB-C::DELAY-IR1-TRANSFORM SB-C::NODE :CONSTRAINT) ; (SB-INT:QUASIQUOTE #)))) ; caught WARNING: ; ; Reference to RESULT-TYPE is implementation-dependent, per ANSI CL 6.1.1.4. ** - Continuable Error FAILURE-P was set when creating "obj/from-xc/src/pcl/compiler-support.lisp-obj". If you continue (by typing 'continue'): Continue, using possibly bogus file "obj/from-xc/src/pcl/compiler-support.lisp-obj" The following restarts are also available: RECOMPILE :R1 Recompile file "src/pcl/compiler-support.lisp" RECOMPILE :R2 Recompile SKIP :R3 skip (COND # #) RETRY :R4 retry (COND # #) STOP :R5 stop loading file /build/sbcl/src/sbcl-2.4.9/src/cold/compile-cold-sbcl.lisp SKIP :R6 skip (LET # # ...) RETRY :R7 retry (LET # # ...) STOP :R8 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-2.lisp ABORT-BUILD :R9 Abort building SBCL. ABORT :R10 Abort main loop (2.860 sec) [288/299] src/pcl/defs (12.264 sec) [289/299] src/pcl/wrapper (4.128 sec) [290/299] src/pcl/class-init (21.413 sec) [291/299] src/code/cold-init (5.839 sec) [292/299] src/code/setf (11.050 sec) [293/299] src/code/macros (32.690 sec) [294/299] src/code/loop (37.970 sec) [295/299] src/pcl/defclass (5.498 sec) [296/299] src/code/early-defmethod (2.822 sec) [297/299] src/code/format (63.836 sec) [298/299] src/code/target-format (71.353 sec) [299/299] src/code/late-globaldb (1.618 sec) 6708.2437 ; Math journal: wrote #P"obj/from-host/xfloat-math.lisp-expr" (6296 entries) ctype cache metrics: Count LF Seek Hit maxPSL Mask VALUES : 45951 70.1% 10 FFFF List : 42954 65.5% 11 FFFF Set : 35717 54.5% 6 FFFF UNION : 26563 40.5% 6 FFFF EQL : 18166 NIL% NUMERIC : 10683 65.2% 7 3FFF INTERSECTION : 9391 57.3% 6 3FFF FUN : 9227 56.3% 6 3FFF MEMBER : 5088 62.1% 7 1FFF NEGATION : 3592 43.8% 7 1FFF Key-Info : 1432 69.9% 6 7FF ARRAY : 611 59.7% 5 3FF CONS : 464 45.3% 4 3FF Key-Info-Set : 431 42.1% 5 3FF CHARACTER-SET : 212 41.4% 4 1FF ALIEN-TYPE : 108 42.2% 4 FF UNKNOWN : 68 53.1% 3 7F CONSTANT : 52 40.6% 6 7F HAIRY : 16 25.0% 2 3F MEMBER/EQ : 9 14.1% 2 3F FUN-DESIGNATOR : 5 7.8% 2 3F Total : 210740 Alien: FUN : 76 59.4% 4 7F POINTER : 18 28.1% 3 3F INTEGER : 8 12.5% 2 3F ARRAY : 5 7.8% 1 3F C-STRING : 3 4.7% 1 3F BOOLEAN : 1 1.6% 1 3F VALUES : 1 1.6% 1 3F ENUM : 0 0.0% 0 3F UNION : 0 0.0% 0 3F STRUCT : 0 0.0% 0 3F Total : 112 ;; Loaded file src/cold/compile-cold-sbcl.lisp Math journal: replaced from #P"obj/from-host/xfloat-math.lisp-expr" ; compilation unit finished ; caught 653 WARNING conditions ; printed 83 notes ** - Continuable Error make-host-2 stopped due to unexpected WARNING raised from the host. If you continue (by typing 'continue'): Proceed anyway The following restarts are also available: SKIP :R1 skip (LET # # ...) RETRY :R2 retry (LET # # ...) STOP :R3 stop loading file /build/sbcl/src/sbcl-2.4.9/make-host-2.lisp ABORT-BUILD :R4 Abort building SBCL. ABORT :R5 Abort main loop Likely suspicious calls: 2 SB-IMPL::GETHASH3 2 SB-IMPL::EQL-HASH 1 SB-KERNEL:%PUTHASH 1 SB-KERNEL:CLASSOID-OF 1 SB-KERNEL:%CODE-FUN-OFFSET Possibly suspicious calls: 222 SB-KERNEL:SPECIFIER-TYPE 191 SB-KERNEL:%COERCE-CALLABLE-TO-FUN 154 SB-KERNEL:%NEGATE 154 SB-KERNEL:%SINGLE-FLOAT 137 SB-KERNEL:%DOUBLE-FLOAT 26 (SETF SB-INT:INFO) 11 SB-INT:INFO 7 SB-KERNEL:VALUES-SPECIFIER-TYPE 6 SB-VM::ASH-LEFT-MOD64 4 SB-KERNEL:%UNARY-ROUND 1 SB-SYS:FOREIGN-SYMBOL-SAP 1 SB-C::%STRUCTURE-IS-A 1 SB-C::FUN-INFO-TEMPLATES 1 SB-KERNEL:DSD-INDEX 1 SB-IMPL::%FAILED-AVER ;; Loading file tests/type.after-xc.lisp ... ;; Loaded file tests/type.after-xc.lisp ;; Wrote the memory image into output/after-xc.core (144,890,544 bytes) Bytes permanently allocated: 179,976 Bytes currently in use: 144,667,128 Bytes available until next GC: 65,128 ;; Loaded file make-host-2.lisp //entering make-genesis-2.sh //loading and running GENESIS to create cold-sbcl.core [1]> ;; Loading file loader.lisp ... ;; Loaded file loader.lisp #P"/build/sbcl/src/sbcl-2.4.9/loader.lisp" [2]> ;; Loading file make-genesis-2.lisp ... ;; Loading file src/cold/shared.lisp ... ;; Loading file src/cold/shebang.lisp ... ;; Loaded file src/cold/shebang.lisp ;; Loaded file src/cold/shared.lisp ;; Loading file src/cold/set-up-cold-packages.lisp ... ;; Loading file src/cold/exports.lisp ... ;; Loaded file src/cold/exports.lisp ;; Loaded file src/cold/set-up-cold-packages.lisp ;; Loading file src/cold/defun-load-or-cload-xcompiler.lisp ... ;; Loaded file src/cold/defun-load-or-cload-xcompiler.lisp ;; Loading file obj/from-host/src/code/cross-early.fas ... ;; Loaded file obj/from-host/src/code/cross-early.fas ;; Loading file obj/from-host/src/code/show.fas ... ;; Loaded file obj/from-host/src/code/show.fas ;; Loading file obj/from-host/src/compiler/early-constantp.fas ... ;; Loaded file obj/from-host/src/compiler/early-constantp.fas ;; Loading file obj/from-host/src/compiler/vop-existsp.fas ... ;; Loaded file obj/from-host/src/compiler/vop-existsp.fas ;; Loading file obj/from-host/src/code/primordial-extensions.fas ... ;; Loaded file obj/from-host/src/code/primordial-extensions.fas ;; Loading file obj/from-host/src/code/cold-init-helper-macros.fas ... ;; Loaded file obj/from-host/src/code/cold-init-helper-macros.fas ;; Loading file obj/from-host/src/code/backq.fas ... ;; Loaded file obj/from-host/src/code/backq.fas ;; Loading file obj/from-host/src/code/cross-byte.fas ... ;; Loaded file obj/from-host/src/code/cross-byte.fas ;; Loading file obj/from-host/src/code/cross-misc.fas ... ;; Loaded file obj/from-host/src/code/cross-misc.fas ;; Loading file obj/from-host/src/code/cross-char.fas ... ;; Loaded file obj/from-host/src/code/cross-char.fas ;; Loading file obj/from-host/src/code/cross-io.fas ... ;; Loaded file obj/from-host/src/code/cross-io.fas ;; Loading file obj/from-host/src/code/cross-condition.fas ... ;; Loaded file obj/from-host/src/code/cross-condition.fas ;; Loading file obj/from-host/src/code/uncross.fas ... ;; Loaded file obj/from-host/src/code/uncross.fas ;; Loading file obj/from-host/src/code/defbangtype.fas ... ;; Loaded file obj/from-host/src/code/defbangtype.fas ;; Loading file obj/from-host/src/code/early-constants.fas ... ;; Loaded file obj/from-host/src/code/early-constants.fas ;; Loading file obj/from-host/src/code/function-names.fas ... ;; Loaded file obj/from-host/src/code/function-names.fas ;; Loading file obj/from-host/src/compiler/early-globaldb.fas ... ;; Loaded file obj/from-host/src/compiler/early-globaldb.fas ;; Loading file obj/from-host/src/compiler/generic/parms.fas ... ;; Loaded file obj/from-host/src/compiler/generic/parms.fas ;; Loading file obj/from-host/src/compiler/riscv/parms.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/parms.fas ;; Loading file obj/from-host/src/compiler/generic/early-vm.fas ... ;; Loaded file obj/from-host/src/compiler/generic/early-vm.fas ;; Loading file obj/from-host/src/compiler/generic/early-objdef.fas ... ;; Loaded file obj/from-host/src/compiler/generic/early-objdef.fas ;; Loading file obj/from-host/src/code/parse-body.fas ... ;; Loaded file obj/from-host/src/code/parse-body.fas ;; Loading file obj/from-host/src/compiler/policy.fas ... ;; Loaded file obj/from-host/src/compiler/policy.fas ;; Loading file obj/from-host/src/code/early-extensions.fas ... ;; Loaded file obj/from-host/src/code/early-extensions.fas ;; Loading file obj/from-host/src/code/defbangstruct.fas ... ;; Loaded file obj/from-host/src/code/defbangstruct.fas ;; Loading file obj/from-host/src/code/early-raw-slots.fas ... ;; Loaded file obj/from-host/src/code/early-raw-slots.fas ;; Loading file obj/from-host/src/code/hashset.fas ... ;; Loaded file obj/from-host/src/code/hashset.fas ;; Loading file obj/from-host/src/code/string-hash.fas ... ;; Loaded file obj/from-host/src/code/string-hash.fas ;; Loading file obj/from-host/src/code/xset.fas ... ;; Loaded file obj/from-host/src/code/xset.fas ;; Loading file obj/from-host/src/code/type-class.fas ... ;; Loaded file obj/from-host/src/code/type-class.fas ;; Loading file obj/from-host/src/code/thread-structs.fas ... ;; Loaded file obj/from-host/src/code/thread-structs.fas ;; Loading file obj/from-host/src/compiler/early-c.fas ... ;; Loaded file obj/from-host/src/compiler/early-c.fas ;; Loading file obj/from-host/src/pcl/slot-name.fas ... ;; Loaded file obj/from-host/src/pcl/slot-name.fas ;; Loading file obj/from-host/src/code/early-classoid.fas ... ;; Loaded file obj/from-host/src/code/early-classoid.fas ;; Loading file obj/from-host/src/compiler/generic/layout-ids.fas ... ;; Loaded file obj/from-host/src/compiler/generic/layout-ids.fas ;; Loading file obj/from-host/src/code/debug-var-io.fas ... ;; Loaded file obj/from-host/src/code/debug-var-io.fas ;; Loading file obj/from-host/src/code/number-dispatch.fas ... ;; Loaded file obj/from-host/src/code/number-dispatch.fas ;; Loading file obj/from-host/src/code/float.fas ... ;; Loaded file obj/from-host/src/code/float.fas ;; Loading file obj/from-host/src/code/cross-float-reader.fas ... ;; Loaded file obj/from-host/src/code/cross-float-reader.fas ;; Loading file obj/from-host/src/code/cross-float.fas ... ; Math journal: prefilled 6296 entries from #P"obj/from-host/xfloat-math.lisp-expr" ;; Loaded file obj/from-host/src/code/cross-float.fas ;; Loading file obj/from-host/src/code/early-time.fas ... ;; Loaded file obj/from-host/src/code/early-time.fas ;; Loading file obj/from-host/src/code/misc.fas ... ;; Loaded file obj/from-host/src/code/misc.fas ;; Loading file obj/from-host/src/compiler/parse-lambda-list.fas ... ;; Loaded file obj/from-host/src/compiler/parse-lambda-list.fas ;; Loading file obj/from-host/src/compiler/macros.fas ... ;; Loaded file obj/from-host/src/compiler/macros.fas ;; Loading file obj/from-host/src/compiler/fun-info.fas ... ;; Loaded file obj/from-host/src/compiler/fun-info.fas ;; Loading file obj/from-host/src/compiler/generic/vm-macs.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-macs.fas ;; Loading file obj/from-host/src/compiler/policies.fas ... ;; Loaded file obj/from-host/src/compiler/policies.fas ;; Loading file obj/from-host/src/compiler/info-vector.fas ... ;; Loaded file obj/from-host/src/compiler/info-vector.fas ;; Loading file obj/from-host/src/compiler/globaldb.fas ... ;; Loaded file obj/from-host/src/compiler/globaldb.fas ;; Loading file obj/from-host/src/compiler/generic/objdef.fas ... ;; Loaded file obj/from-host/src/compiler/generic/objdef.fas ;; Loading file obj/from-host/src/code/lockfree-list.fas ... ;; Loaded file obj/from-host/src/code/lockfree-list.fas ;; Loading file obj/from-host/src/compiler/generic/vm-array.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-array.fas ;; Loading file obj/from-host/src/code/primordial-type.fas ... ;; Loaded file obj/from-host/src/code/primordial-type.fas ;; Loading file obj/from-host/src/code/specializable-array.fas ... ;; Loaded file obj/from-host/src/code/specializable-array.fas ;; Loading file obj/from-host/src/compiler/sset.fas ... ;; Loaded file obj/from-host/src/compiler/sset.fas ;; Loading file obj/from-host/src/compiler/node.fas ... ;; Loaded file obj/from-host/src/compiler/node.fas ;; Loading file obj/from-host/src/compiler/early-assem.fas ... ;; Loaded file obj/from-host/src/compiler/early-assem.fas ;; Loading file obj/from-host/src/compiler/vop.fas ... ;; Loaded file obj/from-host/src/compiler/vop.fas ;; Loading file obj/from-host/src/compiler/backend.fas ... ;; Loaded file obj/from-host/src/compiler/backend.fas ;; Loading file obj/from-host/src/code/sc-offset.fas ... ;; Loaded file obj/from-host/src/code/sc-offset.fas ;; Loading file obj/from-host/src/compiler/vmdef.fas ... ;; Loaded file obj/from-host/src/compiler/vmdef.fas ;; Loading file obj/from-host/src/code/defmacro.fas ... ;; Loaded file obj/from-host/src/code/defmacro.fas ;; Loading file obj/from-host/src/compiler/meta-vmdef.fas ... ;; Loaded file obj/from-host/src/compiler/meta-vmdef.fas ;; Loading file obj/from-host/src/compiler/riscv/vm.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/vm.fas ;; Loading file obj/from-host/src/code/cross-sxhash.fas ... ;; Loaded file obj/from-host/src/code/cross-sxhash.fas ;; Loading file obj/from-host/src/code/alieneval.fas ... ;; Loaded file obj/from-host/src/code/alieneval.fas ;; Loading file obj/from-host/src/code/class.fas ... ;; Loaded file obj/from-host/src/code/class.fas ;; Loading file obj/from-host/src/pcl/pre-warm.fas ... ;; Loaded file obj/from-host/src/pcl/pre-warm.fas ;; Loading file obj/from-host/src/code/debug-info.fas ... ;; Loaded file obj/from-host/src/code/debug-info.fas ;; Loading file obj/from-host/src/code/source-location.fas ... ;; Loaded file obj/from-host/src/code/source-location.fas ;; Loading file obj/from-host/src/compiler/proclaim.fas ... ;; Loaded file obj/from-host/src/compiler/proclaim.fas ;; Loading file obj/from-host/src/compiler/constantp.fas ... ;; Loaded file obj/from-host/src/compiler/constantp.fas ;; Loading file obj/from-host/src/code/deftype.fas ... ;; Loaded file obj/from-host/src/code/deftype.fas ;; Loading file obj/from-host/src/code/type.fas ... ;; Loaded file obj/from-host/src/code/type.fas ;; Loading file obj/from-host/src/compiler/generic/vm-type.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-type.fas ;; Loading file obj/from-host/src/compiler/generic/primtype.fas ... ;; Loaded file obj/from-host/src/compiler/generic/primtype.fas ;; Loading file obj/from-host/src/code/cross-type.fas ... ;; Loaded file obj/from-host/src/code/cross-type.fas ;; Loading file obj/from-host/src/code/deftypes-for-target.fas ... ;; Loaded file obj/from-host/src/code/deftypes-for-target.fas ;; Loading file obj/from-host/src/code/type-init.fas ... ;; Loaded file obj/from-host/src/code/type-init.fas ;; Loading file obj/from-host/src/code/defstruct.fas ... ;; Loaded file obj/from-host/src/code/defstruct.fas ;; Loading file obj/from-host/src/code/alien-type.fas ... ;; Loaded file obj/from-host/src/code/alien-type.fas ;; Loading file obj/from-host/src/code/force-delayed-defbangstructs.fas ... ;; Loaded file obj/from-host/src/code/force-delayed-defbangstructs.fas ;; Loading file obj/from-host/src/compiler/compiler-error.fas ... ;; Loaded file obj/from-host/src/compiler/compiler-error.fas ;; Loading file obj/from-host/src/compiler/fixup-type.fas ... ;; Loaded file obj/from-host/src/compiler/fixup-type.fas ;; Loading file obj/from-host/src/code/package.fas ... ;; Loaded file obj/from-host/src/code/package.fas ;; Loading file obj/from-host/src/code/random.fas ... ;; Loaded file obj/from-host/src/code/random.fas ;; Loading file obj/from-host/src/code/hash-table.fas ... ;; Loaded file obj/from-host/src/code/hash-table.fas ;; Loading file obj/from-host/src/code/readtable.fas ... ;; Loaded file obj/from-host/src/code/readtable.fas ;; Loading file obj/from-host/src/code/host-pprint.fas ... ;; Loaded file obj/from-host/src/code/host-pprint.fas ;; Loading file obj/from-host/src/compiler/knownfun.fas ... ;; Loaded file obj/from-host/src/compiler/knownfun.fas ;; Loading file obj/from-host/src/compiler/ctype.fas ... ;; Loaded file obj/from-host/src/compiler/ctype.fas ;; Loading file obj/from-host/src/compiler/fndb.fas ... ;; Loaded file obj/from-host/src/compiler/fndb.fas ;; Loading file obj/from-host/src/compiler/generic/vm-fndb.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-fndb.fas ;; Loading file obj/from-host/src/compiler/generic/late-objdef.fas ... ;; Loaded file obj/from-host/src/compiler/generic/late-objdef.fas ;; Loading file obj/from-host/src/compiler/generic/interr.fas ... ;; Loaded file obj/from-host/src/compiler/generic/interr.fas ;; Loading file obj/from-host/src/compiler/bit-util.fas ... ;; Loaded file obj/from-host/src/compiler/bit-util.fas ;; Loading file obj/from-host/src/code/load.fas ... ;; Loaded file obj/from-host/src/code/load.fas ;; Loading file obj/from-host/src/code/format-directive.fas ... ;; Loaded file obj/from-host/src/code/format-directive.fas ;; Loading file obj/from-host/src/code/c-call.fas ... ;; Loaded file obj/from-host/src/code/c-call.fas ;; Loading file obj/from-host/src/compiler/disassem.fas ... ;; Loaded file obj/from-host/src/compiler/disassem.fas ;; Loading file obj/from-host/src/compiler/assem.fas ... ;; Loaded file obj/from-host/src/compiler/assem.fas ;; Loading file obj/from-host/src/compiler/codegen.fas ... ;; Loaded file obj/from-host/src/compiler/codegen.fas ;; Loading file obj/from-host/src/compiler/dump.fas ... ;; Loaded file obj/from-host/src/compiler/dump.fas ;; Loading file obj/from-host/src/compiler/ir1report.fas ... ;; Loaded file obj/from-host/src/compiler/ir1report.fas ;; Loading file obj/from-host/src/compiler/main.fas ... ;; Loaded file obj/from-host/src/compiler/main.fas ;; Loading file obj/from-host/src/compiler/xref.fas ... ;; Loaded file obj/from-host/src/compiler/xref.fas ;; Loading file obj/from-host/src/compiler/ir1tran.fas ... ;; Loaded file obj/from-host/src/compiler/ir1tran.fas ;; Loading file obj/from-host/src/compiler/ir1tran-lambda.fas ... ;; Loaded file obj/from-host/src/compiler/ir1tran-lambda.fas ;; Loading file obj/from-host/src/compiler/ir1-translators.fas ... ;; Loaded file obj/from-host/src/compiler/ir1-translators.fas ;; Loading file obj/from-host/src/compiler/ir1util.fas ... ;; Loaded file obj/from-host/src/compiler/ir1util.fas ;; Loading file obj/from-host/src/compiler/callable-args.fas ... ;; Loaded file obj/from-host/src/compiler/callable-args.fas ;; Loading file obj/from-host/src/compiler/locall.fas ... ;; Loaded file obj/from-host/src/compiler/locall.fas ;; Loading file obj/from-host/src/compiler/ir1opt.fas ... ;; Loaded file obj/from-host/src/compiler/ir1opt.fas ;; Loading file obj/from-host/src/compiler/loop.fas ... ;; Loaded file obj/from-host/src/compiler/loop.fas ;; Loading file obj/from-host/src/compiler/constraint.fas ... ;; Loaded file obj/from-host/src/compiler/constraint.fas ;; Loading file obj/from-host/src/compiler/equality-constraints.fas ... ;; Loaded file obj/from-host/src/compiler/equality-constraints.fas ;; Loading file obj/from-host/src/compiler/constraint-back.fas ... ;; Loaded file obj/from-host/src/compiler/constraint-back.fas ;; Loading file obj/from-host/src/compiler/saptran.fas ... ;; Loaded file obj/from-host/src/compiler/saptran.fas ;; Loading file obj/from-host/src/compiler/modarith.fas ... ;; Loaded file obj/from-host/src/compiler/modarith.fas ;; Loading file obj/from-host/src/compiler/sxhash.fas ... ;; Loaded file obj/from-host/src/compiler/sxhash.fas ;; Loading file obj/from-host/src/code/quantifiers.fas ... ;; Loaded file obj/from-host/src/code/quantifiers.fas ;; Loading file obj/from-host/src/compiler/bitops-derive-type.fas ... ;; Loaded file obj/from-host/src/compiler/bitops-derive-type.fas ;; Loading file obj/from-host/src/compiler/dfo.fas ... ;; Loaded file obj/from-host/src/compiler/dfo.fas ;; Loading file obj/from-host/src/compiler/checkgen.fas ... ;; Loaded file obj/from-host/src/compiler/checkgen.fas ;; Loading file obj/from-host/src/compiler/tn.fas ... ;; Loaded file obj/from-host/src/compiler/tn.fas ;; Loading file obj/from-host/src/compiler/life.fas ... ;; Loaded file obj/from-host/src/compiler/life.fas ;; Loading file obj/from-host/src/compiler/debug-dump.fas ... ;; Loaded file obj/from-host/src/compiler/debug-dump.fas ;; Loading file obj/from-host/src/compiler/generic/static-syms.fas ... ;; Loaded file obj/from-host/src/compiler/generic/static-syms.fas ;; Loading file obj/from-host/src/compiler/generic/utils.fas ... ;; Loaded file obj/from-host/src/compiler/generic/utils.fas ;; Loading file obj/from-host/src/assembly/assemfile.fas ... ;; Loaded file obj/from-host/src/assembly/assemfile.fas ;; Loading file obj/from-host/src/compiler/riscv/insts.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/insts.fas ;; Loading file obj/from-host/src/compiler/riscv/macros.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/macros.fas ;; Loading file obj/from-host/src/assembly/riscv/support.fas ... ;; Loaded file obj/from-host/src/assembly/riscv/support.fas ;; Loading file obj/from-host/src/compiler/riscv/move.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/move.fas ;; Loading file obj/from-host/src/compiler/riscv/float.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/float.fas ;; Loading file obj/from-host/src/compiler/riscv/sap.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/sap.fas ;; Loading file obj/from-host/src/compiler/riscv/system.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/system.fas ;; Loading file obj/from-host/src/compiler/riscv/char.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/char.fas ;; Loading file obj/from-host/src/compiler/riscv/memory.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/memory.fas ;; Loading file obj/from-host/src/compiler/riscv/arith.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/arith.fas ;; Loading file obj/from-host/src/compiler/riscv/pred.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/pred.fas ;; Loading file obj/from-host/src/compiler/float-tran.fas ... ;; Loaded file obj/from-host/src/compiler/float-tran.fas ;; Loading file obj/from-host/src/compiler/array-tran.fas ... ;; Loaded file obj/from-host/src/compiler/array-tran.fas ;; Loading file obj/from-host/src/compiler/generic/vm-tran.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-tran.fas ;; Loading file obj/from-host/src/compiler/type-vop-macros.fas ... ;; Loaded file obj/from-host/src/compiler/type-vop-macros.fas ;; Loading file obj/from-host/src/compiler/riscv/type-vops.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/type-vops.fas ;; Loading file obj/from-host/src/compiler/generic/type-vops.fas ... ;; Loaded file obj/from-host/src/compiler/generic/type-vops.fas ;; Loading file obj/from-host/src/compiler/ir1final.fas ... ;; Loaded file obj/from-host/src/compiler/ir1final.fas ;; Loading file obj/from-host/src/compiler/riscv/alloc.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/alloc.fas ;; Loading file obj/from-host/src/compiler/riscv/values.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/values.fas ;; Loading file obj/from-host/src/compiler/srctran.fas ... ;; Loaded file obj/from-host/src/compiler/srctran.fas ;; Loading file obj/from-host/src/compiler/seqtran.fas ... ;; Loaded file obj/from-host/src/compiler/seqtran.fas ;; Loading file obj/from-host/src/compiler/typetran.fas ... ;; Loaded file obj/from-host/src/compiler/typetran.fas ;; Loading file obj/from-host/src/compiler/generic/vm-typetran.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-typetran.fas ;; Loading file obj/from-host/src/code/cross-modular.fas ... ;; Loaded file obj/from-host/src/code/cross-modular.fas ;; Loading file obj/from-host/src/compiler/riscv/subprim.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/subprim.fas ;; Loading file obj/from-host/src/compiler/riscv/debug.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/debug.fas ;; Loading file obj/from-host/src/compiler/riscv/c-call.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/c-call.fas ;; Loading file obj/from-host/src/compiler/riscv/cell.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/cell.fas ;; Loading file obj/from-host/src/compiler/riscv/call.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/call.fas ;; Loading file obj/from-host/src/compiler/riscv/nlx.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/nlx.fas ;; Loading file obj/from-host/src/compiler/generic/late-nlx.fas ... ;; Loaded file obj/from-host/src/compiler/generic/late-nlx.fas ;; Loading file obj/from-host/src/compiler/riscv/show.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/show.fas ;; Loading file obj/from-host/src/compiler/riscv/array.fas ... ;; Loaded file obj/from-host/src/compiler/riscv/array.fas ;; Loading file obj/from-host/src/compiler/generic/type-error.fas ... ;; Loaded file obj/from-host/src/compiler/generic/type-error.fas ;; Loading file obj/from-host/src/compiler/envanal.fas ... ;; Loaded file obj/from-host/src/compiler/envanal.fas ;; Loading file obj/from-host/src/assembly/riscv/assem-rtns.fas ... ;; Loaded file obj/from-host/src/assembly/riscv/assem-rtns.fas ;; Loading file obj/from-host/src/assembly/riscv/array.fas ... ;; Loaded file obj/from-host/src/assembly/riscv/array.fas ;; Loading file obj/from-host/src/assembly/riscv/arith.fas ... ;; Loaded file obj/from-host/src/assembly/riscv/arith.fas ;; Loading file obj/from-host/src/assembly/riscv/alloc.fas ... ;; Loaded file obj/from-host/src/assembly/riscv/alloc.fas ;; Loading file obj/from-host/src/compiler/pseudo-vops.fas ... ;; Loaded file obj/from-host/src/compiler/pseudo-vops.fas ;; Loading file obj/from-host/src/compiler/aliencomp.fas ... ;; Loaded file obj/from-host/src/compiler/aliencomp.fas ;; Loading file obj/from-host/src/compiler/coverage.fas ... ;; Loaded file obj/from-host/src/compiler/coverage.fas ;; Loading file obj/from-host/src/compiler/ltv.fas ... ;; Loaded file obj/from-host/src/compiler/ltv.fas ;; Loading file obj/from-host/src/compiler/gtn.fas ... ;; Loaded file obj/from-host/src/compiler/gtn.fas ;; Loading file obj/from-host/src/compiler/ltn.fas ... ;; Loaded file obj/from-host/src/compiler/ltn.fas ;; Loading file obj/from-host/src/compiler/stack.fas ... ;; Loaded file obj/from-host/src/compiler/stack.fas ;; Loading file obj/from-host/src/compiler/control.fas ... ;; Loaded file obj/from-host/src/compiler/control.fas ;; Loading file obj/from-host/src/compiler/entry.fas ... ;; Loaded file obj/from-host/src/compiler/entry.fas ;; Loading file obj/from-host/src/compiler/ir2tran.fas ... ;; Loaded file obj/from-host/src/compiler/ir2tran.fas ;; Loading file obj/from-host/src/compiler/generic/vm-ir2tran.fas ... ;; Loaded file obj/from-host/src/compiler/generic/vm-ir2tran.fas ;; Loading file obj/from-host/src/compiler/copyprop.fas ... ;; Loaded file obj/from-host/src/compiler/copyprop.fas ;; Loading file obj/from-host/src/compiler/represent.fas ... ;; Loaded file obj/from-host/src/compiler/represent.fas ;; Loading file obj/from-host/src/compiler/ir2opt.fas ... ;; Loaded file obj/from-host/src/compiler/ir2opt.fas ;; Loading file obj/from-host/src/compiler/pack.fas ... ;; Loaded file obj/from-host/src/compiler/pack.fas ;; Loading file obj/from-host/src/compiler/pack-iterative.fas ... ;; Loaded file obj/from-host/src/compiler/pack-iterative.fas ;; Loading file obj/from-host/src/compiler/debug.fas ... ;; Loaded file obj/from-host/src/compiler/debug.fas ;; Loading file obj/from-host/src/code/error.fas ... ;; Loaded file obj/from-host/src/code/error.fas ;; Loading file obj/from-host/src/code/parse-defmacro-errors.fas ... ;; Loaded file obj/from-host/src/code/parse-defmacro-errors.fas ;; Loading file obj/from-host/src/code/macroexpand.fas ... ;; Loaded file obj/from-host/src/code/macroexpand.fas ;; Loading file obj/from-host/src/code/late-extensions.fas ... ;; Loaded file obj/from-host/src/code/late-extensions.fas ;; Loading file obj/from-host/src/code/brothertree.fas ... ;; Loaded file obj/from-host/src/code/brothertree.fas ;; Loading file obj/from-host/src/code/early-step.fas ... ;; Loaded file obj/from-host/src/code/early-step.fas ;; Loading file obj/from-host/src/code/avltree.fas ... ;; Loaded file obj/from-host/src/code/avltree.fas ;; Loading file obj/from-host/src/pcl/walk.fas ... ;; Loaded file obj/from-host/src/pcl/walk.fas ;; Loading file obj/from-host/src/code/setf.fas ... ;; Loaded file obj/from-host/src/code/setf.fas ;; Loading file obj/from-host/src/code/macros.fas ... ;; Loaded file obj/from-host/src/code/macros.fas ;; Loading file obj/from-host/src/code/loop.fas ... ;; Loaded file obj/from-host/src/code/loop.fas ;; Loading file obj/from-host/src/pcl/defclass.fas ... ;; Loaded file obj/from-host/src/pcl/defclass.fas ;; Loading file obj/from-host/src/code/early-defmethod.fas ... ;; Loaded file obj/from-host/src/code/early-defmethod.fas ;; Loading file obj/from-host/src/code/format.fas ... ;; Loaded file obj/from-host/src/code/format.fas ;; Loading file tests/type.before-xc.lisp ... ;; Loaded file tests/type.before-xc.lisp ;; Loading file tests/info.before-xc.lisp ... ;; Loaded file tests/info.before-xc.lisp ;; Loading file tests/vm.before-xc.lisp ... ;; Loaded file tests/vm.before-xc.lisp ;; Compiling file /build/sbcl/src/sbcl-2.4.9/src/compiler/generic/genesis.lisp ... ;; Wrote file /build/sbcl/src/sbcl-2.4.9/obj/from-host/src/compiler/generic/genesis.fas-tmp 0 errors, 0 warnings ;; Loading file obj/from-host/src/compiler/generic/genesis.fas ... ;; Loaded file obj/from-host/src/compiler/generic/genesis.fas beginning GENESIS, creating core "output/cold-sbcl.core" obj/from-xc/src/assembly/master.assem-obj obj/from-xc/src/code/show.lisp-obj obj/from-xc/src/compiler/early-constantp.lisp-obj obj/from-xc/src/compiler/vop-existsp.lisp-obj obj/from-xc/src/code/defsetfs.lisp-obj obj/from-xc/src/code/cl-specials.lisp-obj obj/from-xc/src/code/primordial-extensions.lisp-obj obj/from-xc/src/code/cold-init-helper-macros.lisp-obj obj/from-xc/src/code/backq.lisp-obj obj/from-xc/src/code/globals.lisp-obj obj/from-xc/src/code/cmacros.lisp-obj obj/from-xc/src/code/uncross.lisp-obj obj/from-xc/src/code/defbangtype.lisp-obj obj/from-xc/src/code/early-constants.lisp-obj obj/from-xc/src/code/function-names.lisp-obj obj/from-xc/src/compiler/early-globaldb.lisp-obj obj/from-xc/src/compiler/generic/parms.lisp-obj obj/from-xc/src/compiler/riscv/parms.lisp-obj obj/from-xc/src/compiler/generic/early-vm.lisp-obj obj/from-xc/src/compiler/generic/early-objdef.lisp-obj obj/from-xc/src/code/barrier.lisp-obj obj/from-xc/src/code/parse-body.lisp-obj obj/from-xc/src/compiler/policy.lisp-obj obj/from-xc/src/code/early-extensions.lisp-obj obj/from-xc/src/code/ansi-stream.lisp-obj obj/from-xc/src/code/restart.lisp-obj obj/from-xc/src/code/early-pprint.lisp-obj obj/from-xc/src/code/early-impl.lisp-obj obj/from-xc/src/code/early-package.lisp-obj obj/from-xc/src/code/early-raw-slots.lisp-obj obj/from-xc/src/code/maphash.lisp-obj obj/from-xc/src/code/sysmacs.lisp-obj obj/from-xc/src/code/hashset.lisp-obj obj/from-xc/src/code/string-hash.lisp-obj obj/from-xc/src/code/xset.lisp-obj obj/from-xc/src/code/type-class.lisp-obj obj/from-xc/src/code/cas.lisp-obj obj/from-xc/src/code/thread-structs.lisp-obj obj/from-xc/src/compiler/early-c.lisp-obj obj/from-xc/src/pcl/slot-name.lisp-obj obj/from-xc/src/code/early-classoid.lisp-obj obj/from-xc/src/code/initial-method.lisp-obj obj/from-xc/src/compiler/generic/pinned-objects.lisp-obj obj/from-xc/src/compiler/generic/layout-ids.lisp-obj obj/from-xc/src/code/signal.lisp-obj obj/from-xc/src/code/cold-error.lisp-obj obj/from-xc/src/code/early-full-eval.lisp-obj obj/from-xc/src/code/debug-var-io.lisp-obj obj/from-xc/src/code/number-dispatch.lisp-obj obj/from-xc/src/code/float.lisp-obj obj/from-xc/src/code/early-time.lisp-obj obj/from-xc/src/code/misc.lisp-obj obj/from-xc/src/code/target-error.lisp-obj obj/from-xc/src/code/target-extensions.lisp-obj obj/from-xc/src/compiler/parse-lambda-list.lisp-obj obj/from-xc/src/compiler/macros.lisp-obj obj/from-xc/src/compiler/fun-info.lisp-obj obj/from-xc/src/compiler/generic/vm-macs.lisp-obj obj/from-xc/src/compiler/policies.lisp-obj obj/from-xc/src/code/target-lfhash.lisp-obj obj/from-xc/src/compiler/info-vector.lisp-obj obj/from-xc/src/compiler/globaldb.lisp-obj obj/from-xc/src/compiler/generic/objdef.lisp-obj obj/from-xc/src/code/lockfree-list.lisp-obj obj/from-xc/src/compiler/generic/vm-array.lisp-obj obj/from-xc/src/code/primordial-type.lisp-obj obj/from-xc/src/compiler/sset.lisp-obj obj/from-xc/src/compiler/node.lisp-obj obj/from-xc/src/compiler/early-assem.lisp-obj obj/from-xc/src/compiler/vop.lisp-obj obj/from-xc/src/compiler/backend.lisp-obj obj/from-xc/src/code/sc-offset.lisp-obj obj/from-xc/src/compiler/vmdef.lisp-obj obj/from-xc/src/code/defmacro.lisp-obj obj/from-xc/src/compiler/meta-vmdef.lisp-obj obj/from-xc/src/compiler/riscv/vm.lisp-obj obj/from-xc/src/code/alieneval.lisp-obj obj/from-xc/output/stuff-groveled-from-headers.lisp-obj obj/from-xc/src/code/target-alieneval.lisp-obj obj/from-xc/src/code/target-c-call.lisp-obj obj/from-xc/src/code/misc-aliens.lisp-obj obj/from-xc/src/code/weak.lisp-obj obj/from-xc/src/code/array.lisp-obj obj/from-xc/src/code/list.lisp-obj obj/from-xc/src/code/seq.lisp-obj obj/from-xc/src/code/coerce.lisp-obj obj/from-xc/src/code/thread.lisp-obj obj/from-xc/src/code/target-random.lisp-obj obj/from-xc/src/code/class.lisp-obj obj/from-xc/src/pcl/pre-warm.lisp-obj obj/from-xc/src/code/pathname.lisp-obj obj/from-xc/src/code/target-sxhash.lisp-obj obj/from-xc/src/code/debug-info.lisp-obj obj/from-xc/src/code/source-location.lisp-obj obj/from-xc/src/compiler/proclaim.lisp-obj obj/from-xc/src/compiler/constantp.lisp-obj obj/from-xc/src/code/deftype.lisp-obj obj/from-xc/src/code/type.lisp-obj obj/from-xc/src/compiler/generic/vm-type.lisp-obj obj/from-xc/src/code/pred.lisp-obj obj/from-xc/src/compiler/generic/primtype.lisp-obj obj/from-xc/src/code/deftypes-for-target.lisp-obj obj/from-xc/src/code/type-init.lisp-obj obj/from-xc/src/code/defstruct.lisp-obj obj/from-xc/src/code/alien-type.lisp-obj obj/from-xc/src/compiler/compiler-error.lisp-obj obj/from-xc/src/compiler/fixup-type.lisp-obj obj/from-xc/src/code/package.lisp-obj obj/from-xc/src/code/typep.lisp-obj obj/from-xc/src/code/random.lisp-obj obj/from-xc/src/code/hash-table.lisp-obj obj/from-xc/src/code/readtable.lisp-obj obj/from-xc/src/code/host-pprint.lisp-obj obj/from-xc/src/compiler/knownfun.lisp-obj obj/from-xc/src/compiler/ctype.lisp-obj obj/from-xc/src/compiler/fndb.lisp-obj obj/from-xc/src/compiler/generic/vm-fndb.lisp-obj obj/from-xc/src/compiler/generic/late-objdef.lisp-obj obj/from-xc/src/compiler/generic/interr.lisp-obj obj/from-xc/src/compiler/bit-util.lisp-obj obj/from-xc/src/code/foreign.lisp-obj obj/from-xc/src/code/unix.lisp-obj obj/from-xc/src/code/symbol.lisp-obj obj/from-xc/src/code/bignum.lisp-obj obj/from-xc/src/code/numbers.lisp-obj obj/from-xc/src/code/float-trap.lisp-obj obj/from-xc/src/code/target-float.lisp-obj obj/from-xc/src/code/irrat.lisp-obj obj/from-xc/src/code/alloc.lisp-obj obj/from-xc/src/code/fd-stream.lisp-obj obj/from-xc/src/code/target-char.lisp-obj obj/from-xc/src/code/stream.lisp-obj obj/from-xc/src/code/load.lisp-obj obj/from-xc/src/code/deadline.lisp-obj obj/from-xc/src/code/common-os.lisp-obj obj/from-xc/src/code/format-directive.lisp-obj obj/from-xc/src/code/c-call.lisp-obj obj/from-xc/src/code/foreign-load.lisp-obj obj/from-xc/src/code/unix-foreign-load.lisp-obj obj/from-xc/src/compiler/disassem.lisp-obj obj/from-xc/src/compiler/assem.lisp-obj obj/from-xc/src/compiler/codegen.lisp-obj obj/from-xc/src/compiler/dump.lisp-obj obj/from-xc/src/compiler/generic/core.lisp-obj obj/from-xc/src/compiler/ir1report.lisp-obj obj/from-xc/src/compiler/main.lisp-obj obj/from-xc/src/compiler/xref.lisp-obj obj/from-xc/src/compiler/target-main.lisp-obj obj/from-xc/src/compiler/ir1tran.lisp-obj obj/from-xc/src/compiler/ir1tran-lambda.lisp-obj obj/from-xc/src/compiler/ir1-translators.lisp-obj obj/from-xc/src/compiler/ir1util.lisp-obj obj/from-xc/src/compiler/callable-args.lisp-obj obj/from-xc/src/compiler/locall.lisp-obj obj/from-xc/src/compiler/ir1opt.lisp-obj obj/from-xc/src/compiler/loop.lisp-obj obj/from-xc/src/compiler/constraint.lisp-obj obj/from-xc/src/compiler/equality-constraints.lisp-obj obj/from-xc/src/compiler/constraint-back.lisp-obj obj/from-xc/src/compiler/saptran.lisp-obj obj/from-xc/src/compiler/modarith.lisp-obj obj/from-xc/src/compiler/sxhash.lisp-obj obj/from-xc/src/code/quantifiers.lisp-obj obj/from-xc/src/compiler/bitops-derive-type.lisp-obj obj/from-xc/src/compiler/dfo.lisp-obj obj/from-xc/src/compiler/checkgen.lisp-obj obj/from-xc/src/compiler/tn.lisp-obj obj/from-xc/src/compiler/life.lisp-obj obj/from-xc/src/compiler/debug-dump.lisp-obj obj/from-xc/src/compiler/generic/static-syms.lisp-obj obj/from-xc/src/compiler/generic/utils.lisp-obj obj/from-xc/src/compiler/target-dstate.lisp-obj obj/from-xc/src/compiler/riscv/insts.lisp-obj obj/from-xc/src/compiler/riscv/macros.lisp-obj obj/from-xc/src/assembly/riscv/support.lisp-obj obj/from-xc/src/compiler/riscv/move.lisp-obj obj/from-xc/src/compiler/riscv/float.lisp-obj obj/from-xc/src/compiler/riscv/sap.lisp-obj obj/from-xc/src/compiler/riscv/system.lisp-obj obj/from-xc/src/compiler/riscv/char.lisp-obj obj/from-xc/src/compiler/riscv/memory.lisp-obj obj/from-xc/src/compiler/riscv/arith.lisp-obj obj/from-xc/src/compiler/riscv/pred.lisp-obj obj/from-xc/src/compiler/float-tran.lisp-obj obj/from-xc/src/compiler/array-tran.lisp-obj obj/from-xc/src/compiler/generic/vm-tran.lisp-obj obj/from-xc/src/compiler/type-vop-macros.lisp-obj obj/from-xc/src/compiler/riscv/type-vops.lisp-obj obj/from-xc/src/compiler/generic/type-vops.lisp-obj obj/from-xc/src/compiler/ir1final.lisp-obj obj/from-xc/src/compiler/riscv/alloc.lisp-obj obj/from-xc/src/compiler/riscv/values.lisp-obj obj/from-xc/src/compiler/srctran.lisp-obj obj/from-xc/src/compiler/seqtran.lisp-obj obj/from-xc/src/compiler/typetran.lisp-obj obj/from-xc/src/compiler/generic/vm-typetran.lisp-obj obj/from-xc/src/compiler/riscv/subprim.lisp-obj obj/from-xc/src/compiler/riscv/debug.lisp-obj obj/from-xc/src/compiler/riscv/c-call.lisp-obj obj/from-xc/src/compiler/riscv/cell.lisp-obj obj/from-xc/src/compiler/riscv/call.lisp-obj obj/from-xc/src/compiler/riscv/nlx.lisp-obj obj/from-xc/src/compiler/generic/late-nlx.lisp-obj obj/from-xc/src/compiler/riscv/show.lisp-obj obj/from-xc/src/compiler/riscv/array.lisp-obj obj/from-xc/src/compiler/generic/type-error.lisp-obj obj/from-xc/src/compiler/envanal.lisp-obj obj/from-xc/src/assembly/riscv/assem-rtns.lisp-obj obj/from-xc/src/assembly/riscv/array.lisp-obj obj/from-xc/src/assembly/riscv/arith.lisp-obj obj/from-xc/src/assembly/riscv/alloc.lisp-obj obj/from-xc/src/compiler/pseudo-vops.lisp-obj obj/from-xc/src/compiler/aliencomp.lisp-obj obj/from-xc/src/compiler/coverage.lisp-obj obj/from-xc/src/compiler/ltv.lisp-obj obj/from-xc/src/compiler/gtn.lisp-obj obj/from-xc/src/compiler/ltn.lisp-obj obj/from-xc/src/compiler/stack.lisp-obj obj/from-xc/src/compiler/control.lisp-obj obj/from-xc/src/compiler/entry.lisp-obj obj/from-xc/src/compiler/ir2tran.lisp-obj obj/from-xc/src/compiler/generic/vm-ir2tran.lisp-obj obj/from-xc/src/compiler/copyprop.lisp-obj obj/from-xc/src/compiler/represent.lisp-obj obj/from-xc/src/compiler/ir2opt.lisp-obj obj/from-xc/src/compiler/pack.lisp-obj obj/from-xc/src/compiler/pack-iterative.lisp-obj obj/from-xc/src/compiler/debug.lisp-obj obj/from-xc/src/code/format-time.lisp-obj obj/from-xc/src/code/error.lisp-obj obj/from-xc/src/code/parse-defmacro-errors.lisp-obj obj/from-xc/src/code/macroexpand.lisp-obj obj/from-xc/src/code/funutils.lisp-obj obj/from-xc/src/code/linux-os.lisp-obj obj/from-xc/src/code/share-vm.lisp-obj obj/from-xc/src/code/riscv-vm.lisp-obj obj/from-xc/src/code/unicode-norm.lisp-obj obj/from-xc/src/code/mipsstrops.lisp-obj obj/from-xc/src/code/string.lisp-obj obj/from-xc/src/code/target-signal-common.lisp-obj obj/from-xc/src/code/target-signal.lisp-obj obj/from-xc/src/code/serve-event.lisp-obj obj/from-xc/src/code/late-extensions.lisp-obj obj/from-xc/src/code/brothertree.lisp-obj obj/from-xc/src/code/simple-fun.lisp-obj obj/from-xc/src/code/eval.lisp-obj obj/from-xc/src/code/toplevel.lisp-obj obj/from-xc/src/code/time.lisp-obj obj/from-xc/src/code/target-package.lisp-obj obj/from-xc/src/code/bignum-random.lisp-obj obj/from-xc/src/code/target-hash-table.lisp-obj obj/from-xc/src/code/fdefinition.lisp-obj obj/from-xc/src/code/sort.lisp-obj obj/from-xc/src/code/target-lflist.lisp-obj obj/from-xc/src/code/solist.lisp-obj obj/from-xc/src/code/final.lisp-obj obj/from-xc/src/code/reader.lisp-obj obj/from-xc/src/code/print.lisp-obj obj/from-xc/src/code/pprint.lisp-obj obj/from-xc/src/code/target-defstruct.lisp-obj obj/from-xc/src/code/target-stream.lisp-obj obj/from-xc/src/code/target-pathname.lisp-obj obj/from-xc/src/code/unix-pathname.lisp-obj obj/from-xc/src/code/filesys.lisp-obj obj/from-xc/src/code/target-misc.lisp-obj obj/from-xc/src/code/sharpm.lisp-obj obj/from-xc/src/code/early-step.lisp-obj obj/from-xc/src/code/avltree.lisp-obj obj/from-xc/src/code/target-thread.lisp-obj obj/from-xc/src/code/error-error.lisp-obj obj/from-xc/src/code/debug-int.lisp-obj obj/from-xc/src/code/gc.lisp-obj obj/from-xc/src/code/interr.lisp-obj obj/from-xc/src/code/target-load.lisp-obj obj/from-xc/src/compiler/target-disassem.lisp-obj obj/from-xc/src/compiler/riscv/target-insts.lisp-obj obj/from-xc/src/code/debug.lisp-obj obj/from-xc/src/code/octets.lisp-obj obj/from-xc/src/code/external-formats/enc-basic.lisp-obj obj/from-xc/src/code/external-formats/enc-ucs.lisp-obj obj/from-xc/src/code/bit-bash.lisp-obj obj/from-xc/src/compiler/generic/sanctify.lisp-obj obj/from-xc/src/pcl/walk.lisp-obj obj/from-xc/src/pcl/low.lisp-obj obj/from-xc/src/pcl/macros.lisp-obj obj/from-xc/src/pcl/ecd.lisp-obj obj/from-xc/src/pcl/compiler-support.lisp-obj obj/from-xc/src/pcl/defs.lisp-obj obj/from-xc/src/pcl/wrapper.lisp-obj obj/from-xc/src/pcl/class-init.lisp-obj obj/from-xc/src/code/cold-init.lisp-obj obj/from-xc/src/code/setf.lisp-obj obj/from-xc/src/code/macros.lisp-obj obj/from-xc/src/code/loop.lisp-obj obj/from-xc/src/pcl/defclass.lisp-obj obj/from-xc/src/code/early-defmethod.lisp-obj obj/from-xc/src/code/format.lisp-obj obj/from-xc/src/code/target-format.lisp-obj obj/from-xc/src/code/late-globaldb.lisp-obj ; SB-Loader: (169+4693) methods/other SB-XC:*FEATURES* = (:RISCV :GENCGC :64-BIT :ANSI-CL :ANSI-COMPLIANT-LOAD-TRUENAME :COMMON-LISP :COMPACT-SYMBOL :COMPARE-AND-SWAP-VOPS :ELF :GENERATIONAL :IEEE-FLOATING-POINT :LINUX :LITTLE-ENDIAN :MEMORY-BARRIER-VOPS :OS-PROVIDES-BLKSIZE-T :OS-PROVIDES-CLOSE-RANGE-WRAPPER :OS-PROVIDES-DLADDR :OS-PROVIDES-DLOPEN :OS-PROVIDES-GETPROTOBY-R :OS-PROVIDES-POLL :OS-PROVIDES-POSIX-SPAWN :OS-PROVIDES-SUSECONDS-T :PACKAGE-LOCAL-NICKNAMES :SB-AFTER-XC-CORE :SB-CORE-COMPRESSION :SB-DOC :SB-EVAL :SB-FUTEX :SB-LDB :SB-PACKAGE-LOCKS :SB-SOURCE-LOCATIONS :SB-THREAD :SB-UNICODE :SB-XREF-FOR-INTERNALS :SBCL :UNIX) [building initial core file in "output/cold-sbcl.core": writing 8192 bytes [2 pages] from # writing 33107968 bytes [8083 pages] from # writing 0 bytes [0 pages] from # movable dynamic space: 787 + 3691 + 3605 cons/code/mixed pages /INITIAL-FUN=#X50E2039B done] //testing for consistency of first and second GENESIS passes //header files match between first and second GENESIS -- good real 116m8.725s user 115m56.098s sys 0m0.741s //entering make-target-2.sh //doing warm init - compilation phase This is SBCL 2.4.9, an implementation of ANSI Common Lisp. More information about SBCL is available at . SBCL is free software, provided as is, with absolutely no warranty. It is mostly in the public domain; some portions are provided under BSD-style licenses. See the CREDITS and COPYING files in the distribution for more information. Initial page table: | Immobile Objects | Gen layout symbol code Boxed Cons Raw Code SmMix Mixed LgRaw LgCode LgMix Waste% Alloc Trig Dirty GCs Mem-age 6 0 0 0 0 787 0 3691 0 3605 0 0 0 0.7 32881680 2000000 3691 0 0.0000 Tot 0 0 0 0 787 0 3691 0 3605 0 0 0 0.7 32881680 [3.1% of 1073741824 max] COLD-INIT... Checking symbol printer: T (Length(TLFs)= 4693) "obj/from-xc/src/code/show.lisp-obj" "obj/from-xc/src/compiler/early-constantp.lisp-obj" "obj/from-xc/src/compiler/vop-existsp.lisp-obj" "obj/from-xc/src/code/defsetfs.lisp-obj" "obj/from-xc/src/code/cl-specials.lisp-obj" "obj/from-xc/src/code/primordial-extensions.lisp-obj" "obj/from-xc/src/code/cold-init-helper-macros.lisp-obj" "obj/from-xc/src/code/backq.lisp-obj" "obj/from-xc/src/code/globals.lisp-obj" "obj/from-xc/src/code/cmacros.lisp-obj" "obj/from-xc/src/code/uncross.lisp-obj" "obj/from-xc/src/code/defbangtype.lisp-obj" "obj/from-xc/src/code/early-constants.lisp-obj" "obj/from-xc/src/code/function-names.lisp-obj" "obj/from-xc/src/compiler/early-globaldb.lisp-obj" "obj/from-xc/src/compiler/generic/parms.lisp-obj" "obj/from-xc/src/compiler/riscv/parms.lisp-obj" "obj/from-xc/src/compiler/generic/early-vm.lisp-obj" "obj/from-xc/src/compiler/generic/early-objdef.lisp-obj" "obj/from-xc/src/code/barrier.lisp-obj" "obj/from-xc/src/code/parse-body.lisp-obj" "obj/from-xc/src/compiler/policy.lisp-obj" "obj/from-xc/src/code/early-extensions.lisp-obj" "obj/from-xc/src/code/ansi-stream.lisp-obj" "obj/from-xc/src/code/restart.lisp-obj" "obj/from-xc/src/code/early-pprint.lisp-obj" "obj/from-xc/src/code/early-impl.lisp-obj" "obj/from-xc/src/code/early-package.lisp-obj" "obj/from-xc/src/code/early-raw-slots.lisp-obj" "obj/from-xc/src/code/maphash.lisp-obj" "obj/from-xc/src/code/sysmacs.lisp-obj" "obj/from-xc/src/code/hashset.lisp-obj" "obj/from-xc/src/code/string-hash.lisp-obj" "obj/from-xc/src/code/xset.lisp-obj" "obj/from-xc/src/code/type-class.lisp-obj" "obj/from-xc/src/code/cas.lisp-obj" "obj/from-xc/src/code/thread-structs.lisp-obj" "obj/from-xc/src/compiler/early-c.lisp-obj" "obj/from-xc/src/pcl/slot-name.lisp-obj" "obj/from-xc/src/code/early-classoid.lisp-obj" "obj/from-xc/src/code/initial-method.lisp-obj" "obj/from-xc/src/compiler/generic/pinned-objects.lisp-obj" "obj/from-xc/src/compiler/generic/layout-ids.lisp-obj" "obj/from-xc/src/code/signal.lisp-obj" "obj/from-xc/src/code/cold-error.lisp-obj" "obj/from-xc/src/code/early-full-eval.lisp-obj" "obj/from-xc/src/code/debug-var-io.lisp-obj" "obj/from-xc/src/code/number-dispatch.lisp-obj" "obj/from-xc/src/code/float.lisp-obj" "obj/from-xc/src/code/early-time.lisp-obj" "obj/from-xc/src/code/misc.lisp-obj" "obj/from-xc/src/code/target-error.lisp-obj" "obj/from-xc/src/code/target-extensions.lisp-obj" "obj/from-xc/src/compiler/parse-lambda-list.lisp-obj" "obj/from-xc/src/compiler/macros.lisp-obj" "obj/from-xc/src/compiler/fun-info.lisp-obj" "obj/from-xc/src/compiler/generic/vm-macs.lisp-obj" "obj/from-xc/src/compiler/policies.lisp-obj" "obj/from-xc/src/code/target-lfhash.lisp-obj" "obj/from-xc/src/compiler/info-vector.lisp-obj" "obj/from-xc/src/compiler/globaldb.lisp-obj" "obj/from-xc/src/compiler/generic/objdef.lisp-obj" "obj/from-xc/src/code/lockfree-list.lisp-obj" "obj/from-xc/src/compiler/generic/vm-array.lisp-obj" "obj/from-xc/src/code/primordial-type.lisp-obj" "obj/from-xc/src/compiler/sset.lisp-obj" "obj/from-xc/src/compiler/node.lisp-obj" "obj/from-xc/src/compiler/early-assem.lisp-obj" "obj/from-xc/src/compiler/vop.lisp-obj" "obj/from-xc/src/compiler/backend.lisp-obj" "obj/from-xc/src/code/sc-offset.lisp-obj" "obj/from-xc/src/compiler/vmdef.lisp-obj" "obj/from-xc/src/code/defmacro.lisp-obj" "obj/from-xc/src/compiler/meta-vmdef.lisp-obj" "obj/from-xc/src/compiler/riscv/vm.lisp-obj" "obj/from-xc/src/code/alieneval.lisp-obj" "obj/from-xc/output/stuff-groveled-from-headers.lisp-obj" "obj/from-xc/src/code/target-alieneval.lisp-obj" "obj/from-xc/src/code/target-c-call.lisp-obj" "obj/from-xc/src/code/misc-aliens.lisp-obj" "obj/from-xc/src/code/weak.lisp-obj" "obj/from-xc/src/code/array.lisp-obj" "obj/from-xc/src/code/list.lisp-obj" "obj/from-xc/src/code/seq.lisp-obj" "obj/from-xc/src/code/coerce.lisp-obj" "obj/from-xc/src/code/thread.lisp-obj" "obj/from-xc/src/code/target-random.lisp-obj" "obj/from-xc/src/code/class.lisp-obj" "obj/from-xc/src/pcl/pre-warm.lisp-obj" "obj/from-xc/src/code/pathname.lisp-obj" "obj/from-xc/src/code/target-sxhash.lisp-obj" "obj/from-xc/src/code/debug-info.lisp-obj" "obj/from-xc/src/code/source-location.lisp-obj" "obj/from-xc/src/compiler/proclaim.lisp-obj" "obj/from-xc/src/compiler/constantp.lisp-obj" "obj/from-xc/src/code/deftype.lisp-obj" "obj/from-xc/src/code/type.lisp-obj" "obj/from-xc/src/compiler/generic/vm-type.lisp-obj" "obj/from-xc/src/code/pred.lisp-obj" "obj/from-xc/src/compiler/generic/primtype.lisp-obj" "obj/from-xc/src/code/deftypes-for-target.lisp-obj" "obj/from-xc/src/code/type-init.lisp-obj" "obj/from-xc/src/code/defstruct.lisp-obj" "obj/from-xc/src/code/alien-type.lisp-obj" "obj/from-xc/src/compiler/compiler-error.lisp-obj" "obj/from-xc/src/compiler/fixup-type.lisp-obj" "obj/from-xc/src/code/package.lisp-obj" "obj/from-xc/src/code/typep.lisp-obj" "obj/from-xc/src/code/random.lisp-obj" "obj/from-xc/src/code/hash-table.lisp-obj" "obj/from-xc/src/code/readtable.lisp-obj" "obj/from-xc/src/code/host-pprint.lisp-obj" "obj/from-xc/src/compiler/knownfun.lisp-obj" "obj/from-xc/src/compiler/ctype.lisp-obj" "obj/from-xc/src/compiler/fndb.lisp-obj" "obj/from-xc/src/compiler/generic/vm-fndb.lisp-obj" "obj/from-xc/src/compiler/generic/late-objdef.lisp-obj" "obj/from-xc/src/compiler/generic/interr.lisp-obj" "obj/from-xc/src/compiler/bit-util.lisp-obj" "obj/from-xc/src/code/foreign.lisp-obj" "obj/from-xc/src/code/unix.lisp-obj" "obj/from-xc/src/code/symbol.lisp-obj" "obj/from-xc/src/code/bignum.lisp-obj" "obj/from-xc/src/code/numbers.lisp-obj" "obj/from-xc/src/code/float-trap.lisp-obj" "obj/from-xc/src/code/target-float.lisp-obj" "obj/from-xc/src/code/irrat.lisp-obj" "obj/from-xc/src/code/alloc.lisp-obj" "obj/from-xc/src/code/fd-stream.lisp-obj" "obj/from-xc/src/code/target-char.lisp-obj" "obj/from-xc/src/code/stream.lisp-obj" "obj/from-xc/src/code/load.lisp-obj" "obj/from-xc/src/code/deadline.lisp-obj" "obj/from-xc/src/code/common-os.lisp-obj" "obj/from-xc/src/code/format-directive.lisp-obj" "obj/from-xc/src/code/c-call.lisp-obj" "obj/from-xc/src/code/foreign-load.lisp-obj" "obj/from-xc/src/code/unix-foreign-load.lisp-obj" "obj/from-xc/src/compiler/disassem.lisp-obj" "obj/from-xc/src/compiler/assem.lisp-obj" "obj/from-xc/src/compiler/codegen.lisp-obj" "obj/from-xc/src/compiler/dump.lisp-obj" "obj/from-xc/src/compiler/generic/core.lisp-obj" "obj/from-xc/src/compiler/ir1report.lisp-obj" "obj/from-xc/src/compiler/main.lisp-obj" "obj/from-xc/src/compiler/xref.lisp-obj" "obj/from-xc/src/compiler/target-main.lisp-obj" "obj/from-xc/src/compiler/ir1tran.lisp-obj" "obj/from-xc/src/compiler/ir1tran-lambda.lisp-obj" "obj/from-xc/src/compiler/ir1-translators.lisp-obj" "obj/from-xc/src/compiler/ir1util.lisp-obj" "obj/from-xc/src/compiler/callable-args.lisp-obj" "obj/from-xc/src/compiler/locall.lisp-obj" "obj/from-xc/src/compiler/ir1opt.lisp-obj" "obj/from-xc/src/compiler/loop.lisp-obj" "obj/from-xc/src/compiler/constraint.lisp-obj" "obj/from-xc/src/compiler/equality-constraints.lisp-obj" "obj/from-xc/src/compiler/constraint-back.lisp-obj" "obj/from-xc/src/compiler/saptran.lisp-obj" "obj/from-xc/src/compiler/modarith.lisp-obj" "obj/from-xc/src/compiler/sxhash.lisp-obj" "obj/from-xc/src/code/quantifiers.lisp-obj" "obj/from-xc/src/compiler/bitops-derive-type.lisp-obj" "obj/from-xc/src/compiler/dfo.lisp-obj" "obj/from-xc/src/compiler/checkgen.lisp-obj" "obj/from-xc/src/compiler/tn.lisp-obj" "obj/from-xc/src/compiler/life.lisp-obj" "obj/from-xc/src/compiler/debug-dump.lisp-obj" "obj/from-xc/src/compiler/generic/static-syms.lisp-obj" "obj/from-xc/src/compiler/generic/utils.lisp-obj" "obj/from-xc/src/compiler/target-dstate.lisp-obj" "obj/from-xc/src/compiler/riscv/insts.lisp-obj" "obj/from-xc/src/compiler/riscv/macros.lisp-obj" "obj/from-xc/src/assembly/riscv/support.lisp-obj" "obj/from-xc/src/compiler/riscv/move.lisp-obj" "obj/from-xc/src/compiler/riscv/float.lisp-obj" "obj/from-xc/src/compiler/riscv/sap.lisp-obj" "obj/from-xc/src/compiler/riscv/system.lisp-obj" "obj/from-xc/src/compiler/riscv/char.lisp-obj" "obj/from-xc/src/compiler/riscv/memory.lisp-obj" "obj/from-xc/src/compiler/riscv/arith.lisp-obj" "obj/from-xc/src/compiler/riscv/pred.lisp-obj" "obj/from-xc/src/compiler/float-tran.lisp-obj" "obj/from-xc/src/compiler/array-tran.lisp-obj" "obj/from-xc/src/compiler/generic/vm-tran.lisp-obj" "obj/from-xc/src/compiler/type-vop-macros.lisp-obj" "obj/from-xc/src/compiler/riscv/type-vops.lisp-obj" "obj/from-xc/src/compiler/generic/type-vops.lisp-obj" "obj/from-xc/src/compiler/ir1final.lisp-obj" "obj/from-xc/src/compiler/riscv/alloc.lisp-obj" "obj/from-xc/src/compiler/riscv/values.lisp-obj" "obj/from-xc/src/compiler/srctran.lisp-obj" "obj/from-xc/src/compiler/seqtran.lisp-obj" "obj/from-xc/src/compiler/typetran.lisp-obj" "obj/from-xc/src/compiler/generic/vm-typetran.lisp-obj" "obj/from-xc/src/compiler/riscv/subprim.lisp-obj" "obj/from-xc/src/compiler/riscv/debug.lisp-obj" "obj/from-xc/src/compiler/riscv/c-call.lisp-obj" "obj/from-xc/src/compiler/riscv/cell.lisp-obj" "obj/from-xc/src/compiler/riscv/call.lisp-obj" "obj/from-xc/src/compiler/riscv/nlx.lisp-obj" "obj/from-xc/src/compiler/generic/late-nlx.lisp-obj" "obj/from-xc/src/compiler/riscv/show.lisp-obj" "obj/from-xc/src/compiler/riscv/array.lisp-obj" "obj/from-xc/src/compiler/generic/type-error.lisp-obj" "obj/from-xc/src/compiler/envanal.lisp-obj" "obj/from-xc/src/assembly/riscv/assem-rtns.lisp-obj" "obj/from-xc/src/assembly/riscv/array.lisp-obj" "obj/from-xc/src/assembly/riscv/arith.lisp-obj" "obj/from-xc/src/assembly/riscv/alloc.lisp-obj" "obj/from-xc/src/compiler/pseudo-vops.lisp-obj" "obj/from-xc/src/compiler/aliencomp.lisp-obj" "obj/from-xc/src/compiler/coverage.lisp-obj" "obj/from-xc/src/compiler/ltv.lisp-obj" "obj/from-xc/src/compiler/gtn.lisp-obj" "obj/from-xc/src/compiler/ltn.lisp-obj" "obj/from-xc/src/compiler/stack.lisp-obj" "obj/from-xc/src/compiler/control.lisp-obj" "obj/from-xc/src/compiler/entry.lisp-obj" "obj/from-xc/src/compiler/ir2tran.lisp-obj" "obj/from-xc/src/compiler/generic/vm-ir2tran.lisp-obj" "obj/from-xc/src/compiler/copyprop.lisp-obj" "obj/from-xc/src/compiler/represent.lisp-obj" "obj/from-xc/src/compiler/ir2opt.lisp-obj" "obj/from-xc/src/compiler/pack.lisp-obj" "obj/from-xc/src/compiler/pack-iterative.lisp-obj" "obj/from-xc/src/compiler/debug.lisp-obj" "obj/from-xc/src/code/format-time.lisp-obj" "obj/from-xc/src/code/error.lisp-obj" "obj/from-xc/src/code/parse-defmacro-errors.lisp-obj" "obj/from-xc/src/code/macroexpand.lisp-obj" "obj/from-xc/src/code/funutils.lisp-obj" "obj/from-xc/src/code/linux-os.lisp-obj" "obj/from-xc/src/code/share-vm.lisp-obj" "obj/from-xc/src/code/riscv-vm.lisp-obj" "obj/from-xc/src/code/unicode-norm.lisp-obj" "obj/from-xc/src/code/mipsstrops.lisp-obj" "obj/from-xc/src/code/string.lisp-obj" "obj/from-xc/src/code/target-signal-common.lisp-obj" "obj/from-xc/src/code/target-signal.lisp-obj" "obj/from-xc/src/code/serve-event.lisp-obj" "obj/from-xc/src/code/late-extensions.lisp-obj" "obj/from-xc/src/code/brothertree.lisp-obj" "obj/from-xc/src/code/simple-fun.lisp-obj" "obj/from-xc/src/code/eval.lisp-obj" "obj/from-xc/src/code/toplevel.lisp-obj" "obj/from-xc/src/code/time.lisp-obj" "obj/from-xc/src/code/target-package.lisp-obj" "obj/from-xc/src/code/bignum-random.lisp-obj" "obj/from-xc/src/code/target-hash-table.lisp-obj" "obj/from-xc/src/code/fdefinition.lisp-obj" "obj/from-xc/src/code/sort.lisp-obj" "obj/from-xc/src/code/target-lflist.lisp-obj" "obj/from-xc/src/code/solist.lisp-obj" "obj/from-xc/src/code/final.lisp-obj" "obj/from-xc/src/code/reader.lisp-obj" "obj/from-xc/src/code/print.lisp-obj" "obj/from-xc/src/code/pprint.lisp-obj" "obj/from-xc/src/code/target-defstruct.lisp-obj" "obj/from-xc/src/code/target-stream.lisp-obj" "obj/from-xc/src/code/target-pathname.lisp-obj" "obj/from-xc/src/code/unix-pathname.lisp-obj" "obj/from-xc/src/code/filesys.lisp-obj" "obj/from-xc/src/code/target-misc.lisp-obj" "obj/from-xc/src/code/sharpm.lisp-obj" "obj/from-xc/src/code/early-step.lisp-obj" "obj/from-xc/src/code/avltree.lisp-obj" "obj/from-xc/src/code/target-thread.lisp-obj" "obj/from-xc/src/code/error-error.lisp-obj" "obj/from-xc/src/code/debug-int.lisp-obj" "obj/from-xc/src/code/gc.lisp-obj" "obj/from-xc/src/code/interr.lisp-obj" "obj/from-xc/src/code/target-load.lisp-obj" "obj/from-xc/src/compiler/target-disassem.lisp-obj" "obj/from-xc/src/compiler/riscv/target-insts.lisp-obj" "obj/from-xc/src/code/debug.lisp-obj" "obj/from-xc/src/code/octets.lisp-obj" "obj/from-xc/src/code/external-formats/enc-basic.lisp-obj" "obj/from-xc/src/code/external-formats/enc-ucs.lisp-obj" "obj/from-xc/src/code/bit-bash.lisp-obj" "obj/from-xc/src/compiler/generic/sanctify.lisp-obj" "obj/from-xc/src/pcl/walk.lisp-obj" "obj/from-xc/src/pcl/low.lisp-obj" "obj/from-xc/src/pcl/macros.lisp-obj" "obj/from-xc/src/pcl/ecd.lisp-obj" "obj/from-xc/src/pcl/compiler-support.lisp-obj" "obj/from-xc/src/pcl/defs.lisp-obj" "obj/from-xc/src/pcl/wrapper.lisp-obj" "obj/from-xc/src/pcl/class-init.lisp-obj" "obj/from-xc/src/code/cold-init.lisp-obj" "obj/from-xc/src/code/setf.lisp-obj" "obj/from-xc/src/code/macros.lisp-obj" "obj/from-xc/src/code/loop.lisp-obj" "obj/from-xc/src/pcl/defclass.lisp-obj" "obj/from-xc/src/code/early-defmethod.lisp-obj" "obj/from-xc/src/code/format.lisp-obj" "obj/from-xc/src/code/target-format.lisp-obj" "obj/from-xc/src/code/late-globaldb.lisp-obj" ; in: ; SB-INT:NAMED-LAMBDA (SB-DISASSEM::INST-PRINTER SB-RISCV-ASM::C.BEQZ 1) ; (LET* ((SB-DISASSEM::|.T6| ; (THE (UNSIGNED-BYTE 2) (SB-DISASSEM::LOCAL-EXTRACT '#))) ; (SB-DISASSEM::|.T5| ; (THE (UNSIGNED-BYTE 2) (SB-DISASSEM::LOCAL-EXTRACT '#))) ; (SB-DISASSEM::|.T4| ; (THE (UNSIGNED-BYTE 1) (SB-DISASSEM::LOCAL-EXTRACT '#))) ; (SB-DISASSEM::|.T3| ; (THE (UNSIGNED-BYTE 2) (SB-DISASSEM::LOCAL-EXTRACT '#))) ; (SB-DISASSEM::|.T2| ; (THE (UNSIGNED-BYTE 1) (SB-DISASSEM::LOCAL-EXTRACT '#))) ; (SB-DISASSEM::|.T7| ; (SB-DISASSEM::ADJUST-LABEL ; (LIST SB-DISASSEM::|.T2| SB-DISASSEM::|.T3| SB-DISASSEM::|.T4| ; SB-DISASSEM::|.T5| SB-DISASSEM::|.T6|) ; #)) ; (SB-DISASSEM::|.T8| (SB-DISASSEM::LOOKUP-LABEL SB-DISASSEM::|.T7|)) ; (SB-DISASSEM::|.T1| ; (THE (UNSIGNED-BYTE 3) (SB-DISASSEM::LOCAL-EXTRACT '#)))) ; (SB-DISASSEM::LOCAL-PRINT-NAME) ; (SB-DISASSEM::LOCAL-TAB-TO-ARG-COLUMN) ; (SB-DISASSEM::LOCAL-CALL-ARG-PRINTER SB-DISASSEM::|.T1| ; #) ; (SB-DISASSEM::LOCAL-PRINT-ARG-SEPARATOR) ; (SB-DISASSEM::LOCAL-PRINC16 SB-DISASSEM::|.T8|)) ; ; note: deleting unreachable code ; (GETHASH SB-DISASSEM::LAB ; (SB-DISASSEM::DSTATE-LABEL-HASH SB-DISASSEM::DSTATE)) ; ; note: deleting unreachable code ; (OR ; (GETHASH SB-DISASSEM::LAB ; (SB-DISASSEM::DSTATE-LABEL-HASH SB-DISASSEM::DSTATE)) ; SB-DISASSEM::LAB) ; --> IF ; ==> ; SB-DISASSEM::LAB ; ; note: deleting unreachable code ; (PRINC ", " STREAM) ; ; note: deleting unreachable code ; (SB-DISASSEM::INST-PRINT-NAME SB-DISASSEM::INST) ; ; note: deleting unreachable code ; (LET* ((SB-DISASSEM::|.T6| ; (THE (UNSIGNED-BYTE 2) (SB-DISASSEM::LOCAL-EXTRACT '#))) ; (SB-DISASSEM::|.T5| ; (THE (UNSIGNED-BYTE 2) (SB-DISASSEM::LOCAL-EXTRACT '#))) ; (SB-DISASSEM::|.T4| ; (THE (UNSIGNED-BYTE 1) (SB-DISASSEM::LOCAL-EXTRACT '#))) ; (SB-DISASSEM::|.T3| ; (THE (UNSIGNED-BYTE 2) (SB-DISASSEM::LOCAL-EXTRACT '#))) ; (SB-DISASSEM::|.T2| ; (THE (UNSIGNED-BYTE 1) (SB-DISASSEM::LOCAL-EXTRACT '#))) ; (SB-DISASSEM::|.T7| ; (SB-DISASSEM::ADJUST-LABEL ; (LIST SB-DISASSEM::|.T2| SB-DISASSEM::|.T3| SB-DISASSEM::|.T4| ; SB-DISASSEM::|.T5| SB-DISASSEM::|.T6|) ; #)) ; (SB-DISASSEM::|.T8| (SB-DISASSEM::LOOKUP-LABEL SB-DISASSEM::|.T7|)) ; (SB-DISASSEM::|.T1| ; (THE (UNSIGNED-BYTE 3) (SB-DISASSEM::LOCAL-EXTRACT '#)))) ; (SB-DISASSEM::LOCAL-PRINT-NAME) ; (SB-DISASSEM::LOCAL-TAB-TO-ARG-COLUMN) ; (SB-DISASSEM::LOCAL-CALL-ARG-PRINTER SB-DISASSEM::|.T1| ; #) ; (SB-DISASSEM::LOCAL-PRINT-ARG-SEPARATOR) ; (SB-DISASSEM::LOCAL-PRINC16 SB-DISASSEM::|.T8|)) ; ; note: deleting unreachable code ; (SB-DISASSEM::DSTATE-ARGUMENT-COLUMN SB-DISASSEM::DSTATE) ; ; note: deleting unreachable code ; (SB-DISASSEM:PRINC16 SB-DISASSEM::THING STREAM) ; ; note: deleting unreachable code ; (SB-DISASSEM:OPERAND SB-DISASSEM::THING SB-DISASSEM::DSTATE) ; ; note: deleting unreachable code ; ; compilation unit finished ; printed 9 notes ; in: SB-INT:NAMED-LAMBDA (SB-DISASSEM::INST-PRINTER SB-RISCV-ASM::C.J 1) ; (LET* ((SB-DISASSEM::|.T8| ; (THE (UNSIGNED-BYTE 3) (SB-DISASSEM::LOCAL-EXTRACT '#))) ; (SB-DISASSEM::|.T7| ; (THE (UNSIGNED-BYTE 1) (SB-DISASSEM::LOCAL-EXTRACT '#))) ; (SB-DISASSEM::|.T6| ; (THE (UNSIGNED-BYTE 1) (SB-DISASSEM::LOCAL-EXTRACT '#))) ; (SB-DISASSEM::|.T5| ; (THE (UNSIGNED-BYTE 1) (SB-DISASSEM::LOCAL-EXTRACT '#))) ; (SB-DISASSEM::|.T4| ; (THE (UNSIGNED-BYTE 1) (SB-DISASSEM::LOCAL-EXTRACT '#))) ; (SB-DISASSEM::|.T3| ; (THE (UNSIGNED-BYTE 2) (SB-DISASSEM::LOCAL-EXTRACT '#))) ; (SB-DISASSEM::|.T2| ; (THE (UNSIGNED-BYTE 1) (SB-DISASSEM::LOCAL-EXTRACT '#))) ; (SB-DISASSEM::|.T1| ; (THE (UNSIGNED-BYTE 1) (SB-DISASSEM::LOCAL-EXTRACT '#))) ; (SB-DISASSEM::|.T9| ; (SB-DISASSEM::ADJUST-LABEL ; (LIST SB-DISASSEM::|.T1| SB-DISASSEM::|.T2| SB-DISASSEM::|.T3| ; SB-DISASSEM::|.T4| SB-DISASSEM::|.T5| SB-DISASSEM::|.T6| ; SB-DISASSEM::|.T7| SB-DISASSEM::|.T8|) ; #)) ; (SB-DISASSEM::|.T10| (SB-DISASSEM::LOOKUP-LABEL SB-DISASSEM::|.T9|))) ; (SB-DISASSEM::LOCAL-PRINT-NAME) ; (SB-DISASSEM::LOCAL-TAB-TO-ARG-COLUMN) ; (SB-DISASSEM::LOCAL-PRINC16 SB-DISASSEM::|.T10|)) ; ; note: deleting unreachable code ; (GETHASH SB-DISASSEM::LAB ; (SB-DISASSEM::DSTATE-LABEL-HASH SB-DISASSEM::DSTATE)) ; ; note: deleting unreachable code ; (OR ; (GETHASH SB-DISASSEM::LAB ; (SB-DISASSEM::DSTATE-LABEL-HASH SB-DISASSEM::DSTATE)) ; SB-DISASSEM::LAB) ; --> IF ; ==> ; SB-DISASSEM::LAB ; ; note: deleting unreachable code ; (SB-DISASSEM::INST-PRINT-NAME SB-DISASSEM::INST) ; ; note: deleting unreachable code ; (SB-DISASSEM::DSTATE-ARGUMENT-COLUMN SB-DISASSEM::DSTATE) ; ; note: deleting unreachable code ; (SB-DISASSEM:PRINC16 SB-DISASSEM::THING STREAM) ; ; note: deleting unreachable code ; (SB-DISASSEM:OPERAND SB-DISASSEM::THING SB-DISASSEM::DSTATE) ; ; note: deleting unreachable code ; ; compilation unit finished ; printed 7 notes Disassembler: 28 printers, 1 prefilters, 4 labelers cross-compiler SXHASH tests passed: 3133 cases ; compiling file "src/code/early-ntrace.lisp" (written 12 OCT 2024 02:24:16 AM): ; wrote /build/sbcl/src/sbcl-2.4.9/obj/from-self/src/code/early-ntrace.fasl ; compilation finished in 0:00:00.280 ;; loading #P"/build/sbcl/src/sbcl-2.4.9/obj/from-self/src/code/early-ntrace.fasl" ; compiling file "src/code/room.lisp" (written 12 OCT 2024 02:24:16 AM): fatal error encountered in SBCL pid 4419 tid 4419: blockables unblocked Welcome to LDB, a low-level debugger for the Lisp runtime environment. ldb> real 0m3.796s user 0m0.031s sys 0m0.007s ==> ERROR: A failure occurred in build().  Aborting... ==> ERROR: Build failed, check /var/lib/archbuild/extra-riscv64/felix21/build [?25h[?25hreceiving incremental file list sbcl-2.4.9-1-riscv64-build.log sent 43 bytes received 56,299 bytes 37,561.33 bytes/sec total size is 497,554 speedup is 8.83