starting phase `set-SOURCE-DATE-EPOCH'
phase `set-SOURCE-DATE-EPOCH' succeeded after 0.0 seconds
starting phase `set-paths'
environment variable `PATH' set to `/gnu/store/afssx1p5hr49i0ak3jvnfpdi5sj7z139-sbcl-2.1.4/bin:/gnu/store/3lx5rw6aazp1cskcbmhd3mb842zanj88-tar-1.32/bin:/gnu/store/43y9wjllnr1sczwlfi0vxh27zp28zixh-gzip-1.10/bin:/gnu/store/mhbai8872azipnxr9lw3gr8jqxf6348j-bzip2-1.0.8/bin:/gnu/store/b2m3hnb7gr526jcs8xj0d7fig73qlhv0-xz-5.2.4/bin:/gnu/store/ivj4vx0mc2fz0ipi5knb32r6d992y0b0-file-5.38/bin:/gnu/store/hn05v0h7qiqdq59avr247a3wd8kpsvg0-diffutils-3.7/bin:/gnu/store/4s297bh5gg8dixd9n6xkw2z73cxd1v91-patch-2.7.6/bin:/gnu/store/9gawha19xlpkz9qk6z9lcgfxfq5bj27a-findutils-4.7.0/bin:/gnu/store/3d1n6zsw6zli7agb0ica7x4145haga4z-gawk-5.0.1/bin:/gnu/store/bqcvgh7q4316fynb9wg6akvlk9ikdjj5-sed-4.8/bin:/gnu/store/iqxcm511fivbrlik4i7ly3dxn53qm689-grep-3.4/bin:/gnu/store/x5z9z2d06w4yj4kq18i4b5q2yxg0w9dh-coreutils-8.32/bin:/gnu/store/igqylz2nzjk6x4ax07i6838jdp22yjm6-make-4.3/bin:/gnu/store/6ql2s2z4xnsj89zdf4zj6fch2zic0l7k-bash-minimal-5.0.16/bin:/gnu/store/2nygnpi7zns33k9k1dr3y0md5kg8b876-ld-wrapper-0/bin:/gnu/store/ghy9qhlb3ad9xmxxhfmdia643xfnhysa-binutils-2.34/bin:/gnu/store/h1cy6hq72yxnwi4nh0h1fjz8kxgfp8wy-gcc-7.5.0/bin:/gnu/store/sipyfs2540b48b2sb9j8ypmybja1dvqb-glibc-2.31/bin:/gnu/store/sipyfs2540b48b2sb9j8ypmybja1dvqb-glibc-2.31/sbin'
environment variable `XDG_DATA_DIRS' set to `/gnu/store/afssx1p5hr49i0ak3jvnfpdi5sj7z139-sbcl-2.1.4/share:/gnu/store/bwh8jxbmq7zma26f5mhvz33qrwvnhm8h-sbcl-ptester-2.1.3-1.fe69fde/share:/gnu/store/a3nhb7y6yy8q6phw5da95p401rkl1c77-sbcl-kmrcl-1.111-1.4a27407/share:/gnu/store/3lx5rw6aazp1cskcbmhd3mb842zanj88-tar-1.32/share:/gnu/store/43y9wjllnr1sczwlfi0vxh27zp28zixh-gzip-1.10/share:/gnu/store/mhbai8872azipnxr9lw3gr8jqxf6348j-bzip2-1.0.8/share:/gnu/store/b2m3hnb7gr526jcs8xj0d7fig73qlhv0-xz-5.2.4/share:/gnu/store/ivj4vx0mc2fz0ipi5knb32r6d992y0b0-file-5.38/share:/gnu/store/hn05v0h7qiqdq59avr247a3wd8kpsvg0-diffutils-3.7/share:/gnu/store/4s297bh5gg8dixd9n6xkw2z73cxd1v91-patch-2.7.6/share:/gnu/store/9gawha19xlpkz9qk6z9lcgfxfq5bj27a-findutils-4.7.0/share:/gnu/store/3d1n6zsw6zli7agb0ica7x4145haga4z-gawk-5.0.1/share:/gnu/store/bqcvgh7q4316fynb9wg6akvlk9ikdjj5-sed-4.8/share:/gnu/store/iqxcm511fivbrlik4i7ly3dxn53qm689-grep-3.4/share:/gnu/store/x5z9z2d06w4yj4kq18i4b5q2yxg0w9dh-coreutils-8.32/share:/gnu/store/igqylz2nzjk6x4ax07i6838jdp22yjm6-make-4.3/share:/gnu/store/6ql2s2z4xnsj89zdf4zj6fch2zic0l7k-bash-minimal-5.0.16/share:/gnu/store/ghy9qhlb3ad9xmxxhfmdia643xfnhysa-binutils-2.34/share:/gnu/store/h1cy6hq72yxnwi4nh0h1fjz8kxgfp8wy-gcc-7.5.0/share:/gnu/store/sipyfs2540b48b2sb9j8ypmybja1dvqb-glibc-2.31/share:/gnu/store/q5xs9789fyb5rnnr1nvq3zjd8biif14y-glibc-2.31-static/share:/gnu/store/sg9ks2n9ikj4952zmf2g851g206zb0r9-linux-libre-headers-5.4.20/share'
environment variable `XDG_CONFIG_DIRS' set to `/gnu/store/bwh8jxbmq7zma26f5mhvz33qrwvnhm8h-sbcl-ptester-2.1.3-1.fe69fde/etc:/gnu/store/a3nhb7y6yy8q6phw5da95p401rkl1c77-sbcl-kmrcl-1.111-1.4a27407/etc:/gnu/store/3d1n6zsw6zli7agb0ica7x4145haga4z-gawk-5.0.1/etc:/gnu/store/sipyfs2540b48b2sb9j8ypmybja1dvqb-glibc-2.31/etc'
environment variable `BASH_LOADABLES_PATH' unset
environment variable `C_INCLUDE_PATH' set to `/gnu/store/mhbai8872azipnxr9lw3gr8jqxf6348j-bzip2-1.0.8/include:/gnu/store/b2m3hnb7gr526jcs8xj0d7fig73qlhv0-xz-5.2.4/include:/gnu/store/ivj4vx0mc2fz0ipi5knb32r6d992y0b0-file-5.38/include:/gnu/store/3d1n6zsw6zli7agb0ica7x4145haga4z-gawk-5.0.1/include:/gnu/store/igqylz2nzjk6x4ax07i6838jdp22yjm6-make-4.3/include:/gnu/store/ghy9qhlb3ad9xmxxhfmdia643xfnhysa-binutils-2.34/include:/gnu/store/h1cy6hq72yxnwi4nh0h1fjz8kxgfp8wy-gcc-7.5.0/include:/gnu/store/sipyfs2540b48b2sb9j8ypmybja1dvqb-glibc-2.31/include:/gnu/store/sg9ks2n9ikj4952zmf2g851g206zb0r9-linux-libre-headers-5.4.20/include'
environment variable `CPLUS_INCLUDE_PATH' set to `/gnu/store/mhbai8872azipnxr9lw3gr8jqxf6348j-bzip2-1.0.8/include:/gnu/store/b2m3hnb7gr526jcs8xj0d7fig73qlhv0-xz-5.2.4/include:/gnu/store/ivj4vx0mc2fz0ipi5knb32r6d992y0b0-file-5.38/include:/gnu/store/3d1n6zsw6zli7agb0ica7x4145haga4z-gawk-5.0.1/include:/gnu/store/igqylz2nzjk6x4ax07i6838jdp22yjm6-make-4.3/include:/gnu/store/ghy9qhlb3ad9xmxxhfmdia643xfnhysa-binutils-2.34/include:/gnu/store/h1cy6hq72yxnwi4nh0h1fjz8kxgfp8wy-gcc-7.5.0/include/c++:/gnu/store/h1cy6hq72yxnwi4nh0h1fjz8kxgfp8wy-gcc-7.5.0/include:/gnu/store/sipyfs2540b48b2sb9j8ypmybja1dvqb-glibc-2.31/include:/gnu/store/sg9ks2n9ikj4952zmf2g851g206zb0r9-linux-libre-headers-5.4.20/include'
environment variable `LIBRARY_PATH' set to `/gnu/store/afssx1p5hr49i0ak3jvnfpdi5sj7z139-sbcl-2.1.4/lib:/gnu/store/bwh8jxbmq7zma26f5mhvz33qrwvnhm8h-sbcl-ptester-2.1.3-1.fe69fde/lib:/gnu/store/a3nhb7y6yy8q6phw5da95p401rkl1c77-sbcl-kmrcl-1.111-1.4a27407/lib:/gnu/store/mhbai8872azipnxr9lw3gr8jqxf6348j-bzip2-1.0.8/lib:/gnu/store/b2m3hnb7gr526jcs8xj0d7fig73qlhv0-xz-5.2.4/lib:/gnu/store/ivj4vx0mc2fz0ipi5knb32r6d992y0b0-file-5.38/lib:/gnu/store/3d1n6zsw6zli7agb0ica7x4145haga4z-gawk-5.0.1/lib:/gnu/store/ghy9qhlb3ad9xmxxhfmdia643xfnhysa-binutils-2.34/lib:/gnu/store/sipyfs2540b48b2sb9j8ypmybja1dvqb-glibc-2.31/lib:/gnu/store/q5xs9789fyb5rnnr1nvq3zjd8biif14y-glibc-2.31-static/lib:/gnu/store/aybfkaw4fasp8hk1hzk3npmi952g11a3-glibc-utf8-locales-2.31/lib'
environment variable `GUIX_LOCPATH' set to `/gnu/store/aybfkaw4fasp8hk1hzk3npmi952g11a3-glibc-utf8-locales-2.31/lib/locale'
phase `set-paths' succeeded after 0.0 seconds
starting phase `install-locale'
using 'en_US.utf8' locale for category "LC_ALL"
phase `install-locale' succeeded after 0.0 seconds
starting phase `unpack'
`/gnu/store/mwwb30an0by1kblnh8zj4s9cnp021mwv-sbcl-cl-base64-3.3.4-1.577683b-checkout/tests.lisp' -> `./tests.lisp'
`/gnu/store/mwwb30an0by1kblnh8zj4s9cnp021mwv-sbcl-cl-base64-3.3.4-1.577683b-checkout/COPYING' -> `./COPYING'
`/gnu/store/mwwb30an0by1kblnh8zj4s9cnp021mwv-sbcl-cl-base64-3.3.4-1.577683b-checkout/.gitignore' -> `./.gitignore'
`/gnu/store/mwwb30an0by1kblnh8zj4s9cnp021mwv-sbcl-cl-base64-3.3.4-1.577683b-checkout/package.lisp' -> `./package.lisp'
`/gnu/store/mwwb30an0by1kblnh8zj4s9cnp021mwv-sbcl-cl-base64-3.3.4-1.577683b-checkout/encode.lisp' -> `./encode.lisp'
`/gnu/store/mwwb30an0by1kblnh8zj4s9cnp021mwv-sbcl-cl-base64-3.3.4-1.577683b-checkout/decode.lisp' -> `./decode.lisp'
`/gnu/store/mwwb30an0by1kblnh8zj4s9cnp021mwv-sbcl-cl-base64-3.3.4-1.577683b-checkout/cl-base64.asd' -> `./cl-base64.asd'
`/gnu/store/mwwb30an0by1kblnh8zj4s9cnp021mwv-sbcl-cl-base64-3.3.4-1.577683b-checkout/debian/rules' -> `./debian/rules'
`/gnu/store/mwwb30an0by1kblnh8zj4s9cnp021mwv-sbcl-cl-base64-3.3.4-1.577683b-checkout/debian/compat' -> `./debian/compat'
`/gnu/store/mwwb30an0by1kblnh8zj4s9cnp021mwv-sbcl-cl-base64-3.3.4-1.577683b-checkout/debian/copyright' -> `./debian/copyright'
`/gnu/store/mwwb30an0by1kblnh8zj4s9cnp021mwv-sbcl-cl-base64-3.3.4-1.577683b-checkout/debian/changelog' -> `./debian/changelog'
`/gnu/store/mwwb30an0by1kblnh8zj4s9cnp021mwv-sbcl-cl-base64-3.3.4-1.577683b-checkout/debian/control' -> `./debian/control'
`/gnu/store/mwwb30an0by1kblnh8zj4s9cnp021mwv-sbcl-cl-base64-3.3.4-1.577683b-checkout/debian/watch' -> `./debian/watch'
`/gnu/store/mwwb30an0by1kblnh8zj4s9cnp021mwv-sbcl-cl-base64-3.3.4-1.577683b-checkout/debian/upload.sh' -> `./debian/upload.sh'
`/gnu/store/mwwb30an0by1kblnh8zj4s9cnp021mwv-sbcl-cl-base64-3.3.4-1.577683b-checkout/debian/source/format' -> `./debian/source/format'
phase `unpack' succeeded after 0.0 seconds
starting phase `patch-usr-bin-file'
phase `patch-usr-bin-file' succeeded after 0.0 seconds
starting phase `patch-source-shebangs'
patch-shebang: ./debian/rules: changing `/usr/bin/make' to `/gnu/store/igqylz2nzjk6x4ax07i6838jdp22yjm6-make-4.3/bin/make'
patch-shebang: ./debian/upload.sh: changing `/bin/bash' to `/gnu/store/6ql2s2z4xnsj89zdf4zj6fch2zic0l7k-bash-minimal-5.0.16/bin/bash'
phase `patch-source-shebangs' succeeded after 0.0 seconds
starting phase `copy-source'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/tests.lisp' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/source/cl-base64/tests.lisp'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/COPYING' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/source/cl-base64/COPYING'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/.gitignore' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/source/cl-base64/.gitignore'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/package.lisp' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/source/cl-base64/package.lisp'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/encode.lisp' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/source/cl-base64/encode.lisp'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/decode.lisp' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/source/cl-base64/decode.lisp'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/cl-base64.asd' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/source/cl-base64/cl-base64.asd'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/debian/rules' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/source/cl-base64/debian/rules'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/debian/compat' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/source/cl-base64/debian/compat'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/debian/copyright' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/source/cl-base64/debian/copyright'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/debian/changelog' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/source/cl-base64/debian/changelog'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/debian/control' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/source/cl-base64/debian/control'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/debian/watch' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/source/cl-base64/debian/watch'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/debian/upload.sh' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/source/cl-base64/debian/upload.sh'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/debian/source/format' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/source/cl-base64/debian/source/format'
phase `copy-source' succeeded after 0.0 seconds
starting phase `configure'
warning: collision encountered:
/gnu/store/2nygnpi7zns33k9k1dr3y0md5kg8b876-ld-wrapper-0/bin/ld
/gnu/store/ghy9qhlb3ad9xmxxhfmdia643xfnhysa-binutils-2.34/bin/ld
warning: choosing /gnu/store/2nygnpi7zns33k9k1dr3y0md5kg8b876-ld-wrapper-0/bin/ld
phase `configure' succeeded after 0.8 seconds
starting phase `patch-generated-file-shebangs'
phase `patch-generated-file-shebangs' succeeded after 0.2 seconds
starting phase `build'
Invoking sbcl: "/gnu/store/afssx1p5hr49i0ak3jvnfpdi5sj7z139-sbcl-2.1.4/bin/sbcl" "--non-interactive" "--eval" "(require :asdf)" "--eval" "(asdf:load-asd (truename \"/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/sbcl/cl-base64/cl-base64.asd\"))" "--eval" "(asdf:compile-system \"cl-base64\")"
This is SBCL 2.1.4, an implementation of ANSI Common Lisp.
More information about SBCL is available at .
SBCL is free software, provided as is, with absolutely no warranty.
It is mostly in the public domain; some portions are provided under
BSD-style licenses. See the CREDITS and COPYING files in the
distribution for more information.
; compiling file "/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/sbcl/cl-base64/package.lisp" (written 01 JAN 1970 12:00:01 AM):
; processing (DEFPACKAGE #:CL-BASE64 ...)
; processing (IN-PACKAGE #:CL-BASE64)
; processing (DEFVAR *ENCODE-TABLE* ...)
; processing (DECLAIM (TYPE SIMPLE-STRING ...))
; processing (DEFVAR *URI-ENCODE-TABLE* ...)
; processing (DECLAIM (TYPE SIMPLE-STRING ...))
; processing (DEFVAR *PAD-CHAR* ...)
; processing (DEFVAR *URI-PAD-CHAR* ...)
; processing (DECLAIM (TYPE CHARACTER ...))
; processing (DEFTYPE DECODE-TABLE ...)
; processing (DEFUN MAKE-DECODE-TABLE ...)
; processing (DEFCONSTANT +DECODE-TABLE+ ...)
; processing (DEFVAR *DECODE-TABLE* ...)
; processing (DECLAIM (TYPE DECODE-TABLE ...))
; processing (DEFCONSTANT +URI-DECODE-TABLE+ ...)
; processing (DEFVAR *URI-DECODE-TABLE* ...)
; processing (DECLAIM (TYPE DECODE-TABLE ...))
; wrote /gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/lib/common-lisp/sbcl/cl-base64/package-tmpGHU3ALSV.fasl
; compilation finished in 0:00:00.027
; compiling file "/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/sbcl/cl-base64/encode.lisp" (written 01 JAN 1970 12:00:01 AM):
; processing (IN-PACKAGE #:CL-BASE64)
; processing (DEFUN ROUND-NEXT-MULTIPLE ...)
; file: /gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/sbcl/cl-base64/encode.lisp
; in: DEFUN ROUND-NEXT-MULTIPLE
; (MOD CL-BASE64::X CL-BASE64::N)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR
; (RATIONAL (-1152921504606846976)
; (1152921504606846976))
; DOUBLE-FLOAT SINGLE-FLOAT), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation
; due to type uncertainty:
; The first argument is a (OR
; (RATIONAL (-1152921504606846976)
; (1152921504606846976))
; DOUBLE-FLOAT SINGLE-FLOAT), not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (+ CL-BASE64::X (THE FIXNUM (- CL-BASE64::N CL-BASE64::REMAINDER)))
;
; note: unable to
; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (MOD CL-BASE64::X CL-BASE64::N)
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR
; (RATIONAL (-1152921504606846976)
; (1152921504606846976))
; DOUBLE-FLOAT SINGLE-FLOAT), not a FIXNUM.
; The result is a (VALUES
; (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL (-2305843009213693952)
; (2305843009213693951)))
; &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline signed-word arithmetic (cost 5) because:
; The first argument is a (OR
; (RATIONAL (-1152921504606846976)
; (1152921504606846976))
; DOUBLE-FLOAT SINGLE-FLOAT), not a (SIGNED-BYTE
; 64).
; The result is a (VALUES
; (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL (-2305843009213693952)
; (2305843009213693951)))
; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T).
; etc.
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (RATIONAL (-2305843009213693952)
; (2305843009213693951)), not a FIXNUM.
; (+ CL-BASE64::X (THE FIXNUM (- CL-BASE64::N CL-BASE64::REMAINDER)))
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline signed-word arithmetic (cost 5) because:
; The first argument is a REAL, not a (SIGNED-BYTE 64).
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES (SIGNED-BYTE 64)
; &REST T).
; etc.
; (- CL-BASE64::N CL-BASE64::REMAINDER)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline signed-word arithmetic
; processing (DEFMACRO DEF-*-TO-BASE64-* ...)
; processing (DEF-*-TO-BASE64-* :STRING ...)
; file: /gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/sbcl/cl-base64/encode.lisp
; in: DEF-*-TO-BASE64-* :STRING
; (CL-BASE64::DEF-*-TO-BASE64-* :STRING :STRING)
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF
; --> CL-BASE64::OUTPUT-GROUP THE + THE ASH CHAR-CODE THE
; ==>
; (CHAR CL-BASE64::INPUT CL-BASE64::ISOURCE)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; ==>
; (CHAR CL-BASE64::INPUT (THE FIXNUM (1+ CL-BASE64::ISOURCE)))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF IF
; --> CL-BASE64::OUTPUT-GROUP THE ASH CHAR-CODE THE
; ==>
; (CHAR CL-BASE64::INPUT CL-BASE64::ISOURCE)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY TAGBODY
; --> CL-BASE64::OUTPUT-GROUP THE
; ==>
; (+ (THE FIXNUM (ASH (THE FIXNUM (CHAR-CODE #)) 16))
; (THE FIXNUM (ASH (THE FIXNUM (CHAR-CODE #)) 8))
; (THE FIXNUM (CHAR-CODE (THE CHARACTER (CHAR CL-BASE64::INPUT #)))))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET* IF
; ==>
; (TRUNCATE (+ CL-BASE64::PADDED-LENGTH (1- CL-BASE64::COLUMNS))
; CL-BASE64::COLUMNS)
;
; note: forced to do (signed-byte 64) truncate (cost 60)
; unable to do unsigned fixnum truncate (cost 45) because:
; The first argument is a (MOD 2305843009213693950), not a (UNSIGNED-BYTE
; 60).
; The result is a (VALUES (MOD 2305843009213693950)
; (MOD 1152921504606846975) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 60)
; (UNSIGNED-BYTE
; 60)
; &REST
; T).
; unable to do fixnum truncate (cost 50) because:
; The first argument is a (MOD 2305843009213693950), not a FIXNUM.
; The result is a (VALUES (MOD 2305843009213693950)
; (MOD 1152921504606846975) &OPTIONAL), not a (VALUES
; FIXNUM
; FIXNUM
; &REST
; T).
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET* MULTIPLE-VALUE-BIND LET UNLESS IF
; ==>
; (SB-INT:FIXNUMP #:G75)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first argument of FIXNUMP
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET*
; ==>
; (+ CL-BASE64::PADDED-LENGTH CL-BASE64::NUM-BREAKS)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline signed-word arithmetic
; processing (DEF-*-TO-BASE64-* :STRING ...)
; file: /gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/sbcl/cl-base64/encode.lisp
; in: DEF-*-TO-BASE64-* :STRING
; (CL-BASE64::DEF-*-TO-BASE64-* :STRING :STREAM)
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF
; --> CL-BASE64::OUTPUT-GROUP THE + THE ASH CHAR-CODE THE
; ==>
; (CHAR CL-BASE64::INPUT CL-BASE64::ISOURCE)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; ==>
; (CHAR CL-BASE64::INPUT (THE FIXNUM (1+ CL-BASE64::ISOURCE)))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF IF
; --> CL-BASE64::OUTPUT-GROUP THE ASH CHAR-CODE THE
; ==>
; (CHAR CL-BASE64::INPUT CL-BASE64::ISOURCE)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY TAGBODY
; --> CL-BASE64::OUTPUT-GROUP THE
; ==>
; (+ (THE FIXNUM (ASH (THE FIXNUM (CHAR-CODE #)) 16))
; (THE FIXNUM (ASH (THE FIXNUM (CHAR-CODE #)) 8))
; (THE FIXNUM (CHAR-CODE (THE CHARACTER (CHAR CL-BASE64::INPUT #)))))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET* MULTIPLE-VALUE-BIND LET UNLESS IF
; ==>
; (SB-INT:FIXNUMP #:G48)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first argument of FIXNUMP
; processing (DEF-*-TO-BASE64-* :USB8-ARRAY ...)
; file: /gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/sbcl/cl-base64/encode.lisp
; in: DEF-*-TO-BASE64-* :USB8-ARRAY
; (CL-BASE64::DEF-*-TO-BASE64-* :USB8-ARRAY :STRING)
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF
; --> CL-BASE64::OUTPUT-GROUP THE + THE ASH THE
; ==>
; (AREF CL-BASE64::INPUT CL-BASE64::ISOURCE)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; ==>
; (AREF CL-BASE64::INPUT (THE FIXNUM (1+ CL-BASE64::ISOURCE)))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF IF
; --> CL-BASE64::OUTPUT-GROUP THE ASH THE
; ==>
; (AREF CL-BASE64::INPUT CL-BASE64::ISOURCE)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY TAGBODY
; --> CL-BASE64::OUTPUT-GROUP THE
; ==>
; (+
; (THE FIXNUM
; (ASH (THE FIXNUM (AREF CL-BASE64::INPUT CL-BASE64::ISOURCE)) 16))
; (THE FIXNUM (ASH (THE FIXNUM (AREF CL-BASE64::INPUT #)) 8))
; (THE FIXNUM (AREF CL-BASE64::INPUT (+ 2 CL-BASE64::ISOURCE))))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET* IF
; ==>
; (TRUNCATE (+ CL-BASE64::PADDED-LENGTH (1- CL-BASE64::COLUMNS))
; CL-BASE64::COLUMNS)
;
; note: forced to do (signed-byte 64) truncate (cost 60)
; unable to do unsigned fixnum truncate (cost 45) because:
; The first argument is a (MOD 2305843009213693950), not a (UNSIGNED-BYTE
; 60).
; The result is a (VALUES (MOD 2305843009213693950)
; (MOD 1152921504606846975) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 60)
; (UNSIGNED-BYTE
; 60)
; &REST
; T).
; unable to do fixnum truncate (cost 50) because:
; The first argument is a (MOD 2305843009213693950), not a FIXNUM.
; The result is a (VALUES (MOD 2305843009213693950)
; (MOD 1152921504606846975) &OPTIONAL), not a (VALUES
; FIXNUM
; FIXNUM
; &REST
; T).
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET* MULTIPLE-VALUE-BIND LET UNLESS IF
; ==>
; (SB-INT:FIXNUMP #:G75)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first argument of FIXNUMP
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET*
; ==>
; (+ CL-BASE64::PADDED-LENGTH CL-BASE64::NUM-BREAKS)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline signed-word arithmetic
; processing (DEF-*-TO-BASE64-* :USB8-ARRAY ...)
; file: /gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/sbcl/cl-base64/encode.lisp
; in: DEF-*-TO-BASE64-* :USB8-ARRAY
; (CL-BASE64::DEF-*-TO-BASE64-* :USB8-ARRAY :STREAM)
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF
; --> CL-BASE64::OUTPUT-GROUP THE + THE ASH THE
; ==>
; (AREF CL-BASE64::INPUT CL-BASE64::ISOURCE)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; ==>
; (AREF CL-BASE64::INPUT (THE FIXNUM (1+ CL-BASE64::ISOURCE)))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY RETURN-FROM PROGN COND IF IF
; --> CL-BASE64::OUTPUT-GROUP THE ASH THE
; ==>
; (AREF CL-BASE64::INPUT CL-BASE64::ISOURCE)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET* LABELS DO BLOCK LET TAGBODY TAGBODY
; --> CL-BASE64::OUTPUT-GROUP THE
; ==>
; (+
; (THE FIXNUM
; (ASH (THE FIXNUM (AREF CL-BASE64::INPUT CL-BASE64::ISOURCE)) 16))
; (THE FIXNUM (ASH (THE FIXNUM (AREF CL-BASE64::INPUT #)) 8))
; (THE FIXNUM (AREF CL-BASE64::INPUT (+ 2 CL-BASE64::ISOURCE))))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a (SIMPLE-ARRAY *
; (*)).
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (VECTOR (UNSIGNED-BYTE 8)), not a SIMPLE-ARRAY.
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK LET LET* MULTIPLE-VALUE-BIND LET UNLESS IF
; ==>
; (SB-INT:FIXNUMP #:G48)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first argument of FIXNUMP
; processing (DEFUN INTEGER-TO-BASE64-STRING ...)
; file: /gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/sbcl/cl-base64/encode.lisp
; in: DEFUN INTEGER-TO-BASE64-STRING
; (MOD CL-BASE64::PADDED-BITS 24)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; convert division by 2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; convert integer division to multiplication
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 64).
; (ZEROP CL-BASE64::REMAINDER-PADDING)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (RATIONAL 0 (24)) DOUBLE-FLOAT
; SINGLE-FLOAT), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
; (MOD CL-BASE64::PADDED-BITS 24)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (RATIONAL (-24) (24)) DOUBLE-FLOAT
; SINGLE-FLOAT), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation
; due to type uncertainty:
; The first argument is a (OR (RATIONAL (-24) (24)) DOUBLE-FLOAT
; SINGLE-FLOAT), not a FLOAT.
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a (OR (RATIONAL (-24) (24)) DOUBLE-FLOAT
; SINGLE-FLOAT), not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (- 24 CL-BASE64::REMAINDER-PADDING)
;
; note: unable to
; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation
; due to type uncertainty:
; The second argument is a (OR (RATIONAL 0 (24)) DOUBLE-FLOAT
; SINGLE-FLOAT), not a FLOAT.
; (/ CL-BASE64::PADDING-BITS 6)
;
; note: unable to
; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation
; due to type uncertainty:
; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL 0 24)), not a FLOAT.
;
; note: unable to
; convert x/2^k to shift
; due to type uncertainty:
; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL 0 24)), not a INTEGER.
; (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS)
;
; note: unable to
; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL 0 24)), not a FLOAT.
;
; note: unable to
; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL 0 24)), not a RATIONAL.
;
; note: unable to
; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL 0 24)), not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL 0 24)), not a SINGLE-FLOAT.
; (/ (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS) 6)
;
; note: unable to
; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; convert x/2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (/ CL-BASE64::PADDING-BITS 3)
;
; note: unable to
; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation
; due to type uncertainty:
; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL 0 24)), not a FLOAT.
;
; note: unable to
; convert x/2^k to shift
; due to type uncertainty:
; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL 0 24)), not a INTEGER.
; (INTEGER-LENGTH CL-BASE64::INPUT)
;
; note: forced to do full call
; unable to do inline (unsigned-byte 64) integer-length (cost 4) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; unable to do inline (signed-byte 64) integer-length (cost 6) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 64).
; (MOD CL-BASE64::PADDED-BITS 24)
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (OR (RATIONAL (-24) (24)) DOUBLE-FLOAT
; SINGLE-FLOAT), not a FIXNUM.
; The result is a (VALUES
; (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL (0) (48)))
; &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (RATIONAL (-24) (24)) DOUBLE-FLOAT
; SINGLE-FLOAT), not a FIXNUM.
; The result is a (VALUES
; (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL (0) (48)))
; &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a (RATIONAL (-24) (48)), not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (RATIONAL (-24) (48)), not a FIXNUM.
; etc.
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a (RATIONAL 0 (48)), not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (RATIONAL 0 (48)), not a FIXNUM.
; etc.
; (- 24 CL-BASE64::REMAINDER-PADDING)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a (OR (RATIONAL 0 (24)) DOUBLE-FLOAT SINGLE-FLOAT), not a FIXNUM.
; The result is a (VALUES (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL (0) 24))
; &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline signed-word arithmetic (cost 5) because:
; The second argument is a (OR (RATIONAL 0 (24)) DOUBLE-FLOAT SINGLE-FLOAT), not a (SIGNED-BYTE
; 64).
; The result is a (VALUES (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL (0) 24))
; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST
; T).
; etc.
; (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS)
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL 0 24)), not a DOUBLE-FLOAT.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES DOUBLE-FLOAT &REST
; T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL 0 24)), not a SINGLE-FLOAT.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT &REST
; T).
; etc.
; (TRUNCATE CL-BASE64::PADDED-LENGTH CL-BASE64::COLUMNS)
;
; note: forced to do fixnum truncate (cost 50)
; unable to do unsigned fixnum truncate (cost 45) because:
; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 60).
; The result is a (VALUES FIXNUM
; (INTEGER -1152921504606846974
; 1152921504606846974)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 60)
; (UNSIGNED-BYTE 60)
; &REST T).
; (* CL-BASE64::COLUMNS (TRUNCATE CL-BASE64::PADDED-LENGTH CL-BASE64::COLUMNS))
;
; note: forced to do GENERIC-* (cost 50)
; unable to do inline fixnum arithmetic (cost 2) because:
; The result is a (VALUES
; (INTEGER -1329227995784915871750885555673497600
; 1329227995784915870597964051066650625)
; &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline word arithmetic (cost 4) because:
; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES
; (INTEGER -1329227995784915871750885555673497600
; 1329227995784915870597964051066650625)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &REST T).
; etc.
; (- CL-BASE64::PADDED-LENGTH
; (* CL-BASE64::COLUMNS
; (TRUNCATE CL-BASE64::PADDED-LENGTH CL-BASE64::COLUMNS)))
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a (INTEGER -1329227995784915871750885555673497600
; 1329227995784915870597964051066650625), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -1329227995784915871750885555673497601
; 1329227995784915872903807060280344575)
; &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline signed-word arithmetic (cost 5) because:
; The second argument is a (INTEGER -1329227995784915871750885555673497600
; 1329227995784915870597964051066650625), not a (SIGNED-BYTE
; 64).
; The result is a (VALUES
; (INTEGER -1329227995784915871750885555673497601
; 1329227995784915872903807060280344575)
; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T).
; etc.
; (TRUNCATE (+ CL-BASE64::PADDED-LENGTH (1- CL-BASE64::COLUMNS))
; CL-BASE64::COLUMNS)
;
; note: forced to do (signed-byte 64) truncate (cost 60)
; unable to do unsigned fixnum truncate (cost 45) because:
; The first argument is a (INTEGER -1152921504606846976 2305843009213693949), not a (UNSIGNED-BYTE
; 60).
; The result is a (VALUES
; (INTEGER -1152921504606846976 2305843009213693949)
; (INTEGER -1152921504606846974 1152921504606846974)
; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 60)
; (UNSIGNED-BYTE 60) &REST T).
; unable to do fixnum truncate (cost 50) because:
; The first argument is a (INTEGER -1152921504606846976 2305843009213693949), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -1152921504606846976 2305843009213693949)
; (INTEGER -1152921504606846974 1152921504606846974)
; &OPTIONAL), not a (VALUES FIXNUM FIXNUM &REST T).
; (ASH CL-BASE64::INPUT (/ CL-BASE64::PADDING-BITS 3))
;
; note: forced to do full call
; unable to do inline ASH (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a (OR (RATIONAL 0 8) DOUBLE-FLOAT SINGLE-FLOAT), not a (UNSIGNED-BYTE
; 60).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 64).
; The second argument is a (OR (RATIONAL 0 8) DOUBLE-FLOAT SINGLE-FLOAT), not a (SIGNED-BYTE
; 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 64) &REST
; T).
; etc.
; (ASH CL-BASE64::INT -6)
;
; note: forced to do full call
; unable to do inline ASH (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 64) &REST
; T).
; unable to do inline constant ASH (cost 4) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &REST T).
; etc.
; (LET* ((CL-BASE64::INPUT-BITS (INTEGER-LENGTH CL-BASE64::INPUT))
; (CL-BASE64::BYTE-BITS
; (CL-BASE64::ROUND-NEXT-MULTIPLE CL-BASE64::INPUT-BITS 8))
; (CL-BASE64::PADDED-BITS
; (CL-BASE64::ROUND-NEXT-MULTIPLE CL-BASE64::BYTE-BITS 6))
; (CL-BASE64::REMAINDER-PADDING (MOD CL-BASE64::PADDED-BITS 24))
; (CL-BASE64::PADDING-BITS
; (IF (ZEROP CL-BASE64::REMAINDER-PADDING)
; 0
; (- 24 CL-BASE64::REMAINDER-PADDING)))
; (CL-BASE64::PADDING-CHARS (/ CL-BASE64::PADDING-BITS 6))
; (CL-BASE64::PADDED-LENGTH
; (/ (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS) 6))
; (CL-BASE64::LAST-LINE-LEN
; (IF (PLUSP CL-BASE64::COLUMNS)
; (- CL-BASE64::PADDED-LENGTH #)
; 0))
; (CL-BASE64::NUM-LINES
; (IF (PLUSP CL-BASE64::COLUMNS)
; (TRUNCATE # CL-BASE64::COLUMNS)
; 0))
; (CL-BASE64::NUM-BREAKS
; (IF (PLUSP CL-BASE64::NUM-LINES)
; (1- CL-BASE64::NUM-LINES)
; 0))
; (CL-BASE64::STRLEN (+ CL-BASE64::PADDED-LENGTH CL-BASE64::NUM-BREAKS))
; (CL-BASE64::LAST-CHAR (1- CL-BASE64::STRLEN))
; ...)
; (DECLARE
; (FIXNUM CL-BASE64::PADDED-LENGTH CL-BASE64::NUM-LINES CL-BASE64::COL
; CL-BASE64::LAST-CHAR CL-BASE64::PADDING-CHARS CL-BASE64::LAST-LINE-LEN))
; (UNLESS (PLUSP CL-BASE64::COLUMNS) (SETQ CL-BASE64::COL -1))
; (DOTIMES (CL-BASE64::I CL-BASE64::PADDING-CHARS)
; (DECLARE (FIXNUM CL-BASE64::I))
; (SETF (SCHAR CL-BASE64::STR #) CL-BASE64::PAD))
; (DO* ((CL-BASE64::STRPOS (- CL-BASE64::LAST-CHAR CL-BASE64::PADDING-CHARS)
; (1- CL-BASE64::STRPOS))
; (CL-BASE64::INT (ASH CL-BASE64::INPUT #)))
; ((MINUSP CL-BASE64::STRPOS) CL-BASE64::STR)
; (DECLARE (FIXNUM CL-BASE64::STRPOS)
; (INTEGER CL-BASE64::INT))
; (COND ((ZEROP CL-BASE64::COL) (SETF #) (SETQ #))
; (T (SETF #) (SETQ #) (DECF CL-BASE64::COL)))))
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION UNLESS IF
; ==>
; (SB-INT:FIXNUMP #:G84)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first argument of FIXNUMP
; --> MULTIPLE-VALUE-BIND LET UNLESS IF
; ==>
; (SB-INT:FIXNUMP #:G92)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first argument of FIXNUMP
; (MAKE-STRING CL-BASE64::STRLEN)
; --> MULTIPLE-VALUE-BIND LET UNLESS IF AND IF
; ==>
; (TYPEP #:G89 'FIXNUM)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first argument of FIXNUMP
; (- CL-BASE64::LAST-CHAR CL-BASE64::I)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline signed-word arithmetic
; (- CL-BASE64::LAST-CHAR CL-BASE64::PADDING-CHARS)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline signed-word arithmetic
; processing (DEFUN INTEGER-TO-BASE64-STREAM ...)
; file: /gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/sbcl/cl-base64/encode.lisp
; in: DEFUN INTEGER-TO-BASE64-STREAM
; (MOD CL-BASE64::PADDED-BITS 24)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; convert division by 2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; convert integer division to multiplication
; due to type uncertainty:
; The first argument is a REAL, not a (UNSIGNED-BYTE 64).
; (ZEROP CL-BASE64::REMAINDER-PADDING)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (RATIONAL 0 (24)) DOUBLE-FLOAT
; SINGLE-FLOAT), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
; (MOD CL-BASE64::PADDED-BITS 24)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (RATIONAL (-24) (24)) DOUBLE-FLOAT
; SINGLE-FLOAT), not a FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation
; due to type uncertainty:
; The first argument is a (OR (RATIONAL (-24) (24)) DOUBLE-FLOAT
; SINGLE-FLOAT), not a FLOAT.
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a (OR (RATIONAL (-24) (24)) DOUBLE-FLOAT
; SINGLE-FLOAT), not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; (- 24 CL-BASE64::REMAINDER-PADDING)
;
; note: unable to
; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation
; due to type uncertainty:
; The second argument is a (OR (RATIONAL 0 (24)) DOUBLE-FLOAT
; SINGLE-FLOAT), not a FLOAT.
; (/ CL-BASE64::PADDING-BITS 6)
;
; note: unable to
; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation
; due to type uncertainty:
; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL 0 24)), not a FLOAT.
;
; note: unable to
; convert x/2^k to shift
; due to type uncertainty:
; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL 0 24)), not a INTEGER.
; (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS)
;
; note: unable to
; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL 0 24)), not a FLOAT.
;
; note: unable to
; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL 0 24)), not a RATIONAL.
;
; note: unable to
; open-code float conversion of first argument in mixed SINGLE-FLOAT-DOUBLE-FLOAT numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL 0 24)), not a DOUBLE-FLOAT.
;
; note: unable to
; open-code float conversion of second argument in mixed DOUBLE-FLOAT-SINGLE-FLOAT numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL 0 24)), not a SINGLE-FLOAT.
; (/ (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS) 6)
;
; note: unable to
; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation
; due to type uncertainty:
; The first argument is a REAL, not a FLOAT.
;
; note: unable to
; convert x/2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (- CL-BASE64::STRLEN CL-BASE64::PADDING-CHARS)
;
; note: unable to
; open-code float conversion of first argument in mixed RATIONAL-FLOAT numeric operation
; due to type uncertainty:
; The second argument is a (OR (RATIONAL 0 4) DOUBLE-FLOAT
; SINGLE-FLOAT), not a FLOAT.
; (1- CL-BASE64::NONPAD-CHARS)
;
; note: unable to
; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation
; due to type uncertainty:
; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL -1152921504606846980
; 1152921504606846975)), not a FLOAT.
; (/ CL-BASE64::PADDING-BITS 3)
;
; note: unable to
; open-code float conversion of second argument in mixed FLOAT-RATIONAL numeric operation
; due to type uncertainty:
; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL 0 24)), not a FLOAT.
;
; note: unable to
; convert x/2^k to shift
; due to type uncertainty:
; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL 0 24)), not a INTEGER.
; (= CL-BASE64::STRPOS CL-BASE64::NONPAD-CHARS)
;
; note: unable to open code because: The operands might not be the same type.
; (INTEGER-LENGTH CL-BASE64::INPUT)
;
; note: forced to do full call
; unable to do inline (unsigned-byte 64) integer-length (cost 4) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; unable to do inline (signed-byte 64) integer-length (cost 6) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 64).
; (MOD CL-BASE64::PADDED-BITS 24)
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (OR (RATIONAL (-24) (24)) DOUBLE-FLOAT
; SINGLE-FLOAT), not a FIXNUM.
; The result is a (VALUES
; (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL (0) (48)))
; &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (RATIONAL (-24) (24)) DOUBLE-FLOAT
; SINGLE-FLOAT), not a FIXNUM.
; The result is a (VALUES
; (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL (0) (48)))
; &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a (RATIONAL (-24) (48)), not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (RATIONAL (-24) (48)), not a FIXNUM.
; etc.
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a (RATIONAL 0 (48)), not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (RATIONAL 0 (48)), not a FIXNUM.
; etc.
; (- 24 CL-BASE64::REMAINDER-PADDING)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a (OR (RATIONAL 0 (24)) DOUBLE-FLOAT SINGLE-FLOAT), not a FIXNUM.
; The result is a (VALUES (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL (0) 24))
; &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline signed-word arithmetic (cost 5) because:
; The second argument is a (OR (RATIONAL 0 (24)) DOUBLE-FLOAT SINGLE-FLOAT), not a (SIGNED-BYTE
; 64).
; The result is a (VALUES (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL (0) 24))
; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST
; T).
; etc.
; (+ CL-BASE64::PADDED-BITS CL-BASE64::PADDING-BITS)
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL 0 24)), not a DOUBLE-FLOAT.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES DOUBLE-FLOAT &REST
; T).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT (RATIONAL 0 24)), not a SINGLE-FLOAT.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT &REST
; T).
; etc.
; (- CL-BASE64::STRLEN CL-BASE64::PADDING-CHARS)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a (OR (RATIONAL 0 4) DOUBLE-FLOAT SINGLE-FLOAT), not a FIXNUM.
; The result is a (VALUES
; (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL -1152921504606846980 1152921504606846975))
; &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline signed-word arithmetic (cost 5) because:
; The second argument is a (OR (RATIONAL 0 4) DOUBLE-FLOAT SINGLE-FLOAT), not a (SIGNED-BYTE
; 64).
; The result is a (VALUES
; (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL -1152921504606846980 1152921504606846975))
; &OPTIONAL), not a (VALUES (SIGNED-BYTE 64) &REST T).
; etc.
; (1- CL-BASE64::NONPAD-CHARS)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL -1152921504606846980
; 1152921504606846975)), not a FIXNUM.
; The result is a (VALUES
; (OR (RATIONAL -1152921504606846981 1152921504606846974)
; DOUBLE-FLOAT SINGLE-FLOAT)
; &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR SINGLE-FLOAT DOUBLE-FLOAT
; (RATIONAL -1152921504606846980
; 1152921504606846975)), not a FIXNUM.
; The result is a (VALUES
; (OR (RATIONAL -1152921504606846981 1152921504606846974)
; DOUBLE-FLOAT SINGLE-FLOAT)
; &OPTIONAL), not a (VALUES FIXNUM &REST T).
; etc.
; (ASH CL-BASE64::INPUT (/ CL-BASE64::PADDING-BITS 3))
;
; note: forced to do full call
; unable to do inline ASH (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a (OR (RATIONAL 0 8) DOUBLE-FLOAT SINGLE-FLOAT), not a (UNSIGNED-BYTE
; 60).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 64).
; The second argument is a (OR (RATIONAL 0 8) DOUBLE-FLOAT SINGLE-FLOAT), not a (SIGNED-BYTE
; 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 64) &REST
; T).
; etc.
; (ASH CL-BASE64::INT -6)
;
; note: forced to do full call
; unable to do inline ASH (cost 3) because:
; The first argument is a INTEGER, not a (SIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 64) &REST
; T).
; unable to do inline constant ASH (cost 4) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &REST T).
; etc.
; (- CL-BASE64::LAST-NONPAD-CHAR CL-BASE64::STRPOS)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline signed-word arithmetic
; wrote /gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/lib/common-lisp/sbcl/cl-base64/encode-tmpAAURSO1.fasl
; compilation finished in 0:00:00.239
; compiling file "/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/sbcl/cl-base64/decode.lisp" (written 01 JAN 1970 12:00:01 AM):
; processing (IN-PACKAGE #:CL-BASE64)
; processing (DEFINE-CONDITION BASE64-ERROR ...)
; processing (DEFINE-CONDITION BAD-BASE64-CHARACTER ...)
; processing (DEFINE-CONDITION INCOMPLETE-BASE64-DATA ...)
; processing (DEFTYPE ARRAY-INDEX ...)
; processing (DEFTYPE ARRAY-LENGTH ...)
; processing (DEFTYPE CHARACTER-CODE ...)
; processing (DEFMACRO ETYPECASE/UNROLL ...)
; processing (DEFMACRO LET/TYPED ...)
; processing (DEFMACRO DEFINE-BASE64-DECODER ...)
; processing (DEFINE-BASE64-DECODER :STRING ...)
; file: /gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/sbcl/cl-base64/decode.lisp
; in: DEFINE-BASE64-DECODER :STRING
; (CL-BASE64::DEFINE-BASE64-DECODER :STRING :USB8-ARRAY)
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL
; --> ETYPECASE LET COND IF IF IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK
; --> TAGBODY PROGN IF SETQ THE CHAR-CODE
; ==>
; (AREF CL-BASE64::INPUT CL-BASE64::IPOS)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; processing (DEFINE-BASE64-DECODER :STRING ...)
; file: /gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/sbcl/cl-base64/decode.lisp
; in: DEFINE-BASE64-DECODER :STRING
; (CL-BASE64::DEFINE-BASE64-DECODER :STRING :STRING)
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL
; --> ETYPECASE LET COND IF IF IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK
; --> TAGBODY PROGN IF SETQ THE CHAR-CODE
; ==>
; (AREF CL-BASE64::INPUT CL-BASE64::IPOS)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; processing (DEFINE-BASE64-DECODER :STRING ...)
; file: /gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/sbcl/cl-base64/decode.lisp
; in: DEFINE-BASE64-DECODER :STRING
; (CL-BASE64::DEFINE-BASE64-DECODER :STRING :INTEGER)
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL
; --> ETYPECASE LET COND IF IF IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK
; --> TAGBODY PROGN IF SETQ THE CHAR-CODE
; ==>
; (AREF CL-BASE64::INPUT CL-BASE64::IPOS)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL
; --> ETYPECASE LET COND IF IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK
; --> TAGBODY PROGN COND IF IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE
; --> LOGIOR
; ==>
; (ASH CL-BASE64::RESULT 8)
;
; note: forced to do full call
; unable to do inline ASH (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 64)
; &REST T).
; etc.
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL
; --> ETYPECASE LET COND IF IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK
; --> TAGBODY PROGN COND IF IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE
; ==>
; (LOGIOR (ASH CL-BASE64::RESULT 8) BYTE)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline word arithmetic (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &REST T).
; etc.
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL
; --> ETYPECASE LET COND IF IF IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK
; --> TAGBODY PROGN COND IF IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE
; --> LOGIOR
; ==>
; (ASH CL-BASE64::RESULT 8)
;
; note: forced to do full call
; unable to do inline ASH (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 64)
; &REST T).
; etc.
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL
; --> ETYPECASE LET COND IF IF IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK
; --> TAGBODY PROGN COND IF IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE
; ==>
; (LOGIOR (ASH CL-BASE64::RESULT 8) BYTE)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline word arithmetic (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &REST T).
; etc.
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL
; --> ETYPECASE LET COND IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK TAGBODY
; --> PROGN COND IF IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE LOGIOR
; ==>
; (ASH CL-BASE64::RESULT 8)
;
; note: forced to do full call
; unable to do inline ASH (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 64)
; &REST T).
; etc.
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL
; --> ETYPECASE LET COND IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK TAGBODY
; --> PROGN COND IF IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE
; ==>
; (LOGIOR (ASH CL-BASE64::RESULT 8) BYTE)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline word arithmetic (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &REST T).
; etc.
; processing (DEFINE-BASE64-DECODER :STRING ...)
; file: /gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/sbcl/cl-base64/decode.lisp
; in: DEFINE-BASE64-DECODER :STRING
; (CL-BASE64::DEFINE-BASE64-DECODER :STRING :STREAM)
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK CL-BASE64::LET/TYPED LET FLET LET CL-BASE64::ETYPECASE/UNROLL
; --> ETYPECASE LET COND IF IF IF PROGN CL-BASE64::LET/TYPED LET LOOP BLOCK
; --> TAGBODY PROGN IF SETQ THE CHAR-CODE
; ==>
; (AREF CL-BASE64::INPUT CL-BASE64::IPOS)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; processing (DEFINE-BASE64-DECODER :STREAM ...)
; processing (DEFINE-BASE64-DECODER :STREAM ...)
; processing (DEFINE-BASE64-DECODER :STREAM ...)
; file: /gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/sbcl/cl-base64/decode.lisp
; in: DEFINE-BASE64-DECODER :STREAM
; (CL-BASE64::DEFINE-BASE64-DECODER :STREAM :INTEGER)
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK CL-BASE64::LET/TYPED LET FLET CL-BASE64::LET/TYPED LET LOOP BLOCK
; --> TAGBODY PROGN COND IF IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE
; --> LOGIOR
; ==>
; (ASH CL-BASE64::RESULT 8)
;
; note: forced to do full call
; unable to do inline ASH (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline ASH (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (SIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (SIGNED-BYTE 64)
; &REST T).
; etc.
; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> BLOCK CL-BASE64::LET/TYPED LET FLET CL-BASE64::LET/TYPED LET LOOP BLOCK
; --> TAGBODY PROGN COND IF IF IF IF THE PROGN WHEN IF PROGN LET SETQ THE
; ==>
; (LOGIOR (ASH CL-BASE64::RESULT 8) BYTE)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &REST T).
; unable to do inline word arithmetic (cost 3) because:
; The first argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &REST T).
; etc.
; processing (DEFINE-BASE64-DECODER :STREAM ...)
; wrote /gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/lib/common-lisp/sbcl/cl-base64/decode-tmp5GEXGEG5.fasl
; compilation finished in 0:00:00.387
;
; compilation unit finished
; printed 147 notes
phase `build' succeeded after 1.2 seconds
starting phase `check'
Invoking sbcl: "/gnu/store/afssx1p5hr49i0ak3jvnfpdi5sj7z139-sbcl-2.1.4/bin/sbcl" "--non-interactive" "--eval" "(require :asdf)" "--eval" "(asdf:load-asd (truename \"/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/sbcl/cl-base64/cl-base64.asd\"))" "--eval" "(when (uiop:file-exists-p \"cl-base64-tests.asd\") (asdf:load-asd (truename \"cl-base64-tests.asd\")))" "--eval" "(when (uiop:file-exists-p \"cl-base64-test.asd\") (asdf:load-asd (truename \"cl-base64-test.asd\")))" "--eval" "(when (uiop:file-exists-p \"tests.asd\") (asdf:load-asd (truename \"tests.asd\")))" "--eval" "(when (uiop:file-exists-p \"test.asd\") (asdf:load-asd (truename \"test.asd\")))" "--eval" "(asdf:test-system \"cl-base64\")"
This is SBCL 2.1.4, an implementation of ANSI Common Lisp.
More information about SBCL is available at .
SBCL is free software, provided as is, with absolutely no warranty.
It is mostly in the public domain; some portions are provided under
BSD-style licenses. See the CREDITS and COPYING files in the
distribution for more information.
; compiling file "/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/share/common-lisp/sbcl/cl-base64/tests.lisp" (written 01 JAN 1970 12:00:01 AM):
; processing (IN-PACKAGE #:CL-USER)
; processing (DEFPACKAGE #:CL-BASE64/TEST ...)
; processing (IN-PACKAGE #:CL-BASE64/TEST)
; processing (DEFUN TEST-VALID-INPUT ...)
; processing (DEFUN TEST-BROKEN-INPUT ...)
; processing (DEFUN TEST-VALID ...)
; processing (DEFUN TEST-BROKEN-1 ...)
; processing (DEFUN TEST-BROKEN-2 ...)
; processing (DEFUN DO-TESTS ...)
; processing (DEFUN TIME-ROUTINES ...)
; wrote /gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/lib/common-lisp/sbcl/cl-base64/tests-tmpGHU3ALSV.fasl
; compilation finished in 0:00:00.143
Begin cl-base64 tests test
**********************************
End cl-base64 tests test
Errors detected in this test: 0
Successes this test:11603
phase `check' succeeded after 1.2 seconds
starting phase `create-asdf-configuration'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/.cl-union/etc/common-lisp/source-registry.conf.d/50-kmrcl.conf' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/etc/common-lisp/source-registry.conf.d/50-kmrcl.conf'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/.cl-union/etc/common-lisp/source-registry.conf.d/50-rt.conf' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/etc/common-lisp/source-registry.conf.d/50-rt.conf'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/.cl-union/etc/common-lisp/source-registry.conf.d/50-ptester.conf' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/etc/common-lisp/source-registry.conf.d/50-ptester.conf'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/.cl-union/etc/common-lisp/asdf-output-translations.conf.d/50-kmrcl.conf' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/etc/common-lisp/asdf-output-translations.conf.d/50-kmrcl.conf'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/.cl-union/etc/common-lisp/asdf-output-translations.conf.d/50-rt.conf' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/etc/common-lisp/asdf-output-translations.conf.d/50-rt.conf'
`/tmp/guix-build-sbcl-cl-base64-3.3.4-1.577683b.drv-0/source/.cl-union/etc/common-lisp/asdf-output-translations.conf.d/50-ptester.conf' -> `/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/etc/common-lisp/asdf-output-translations.conf.d/50-ptester.conf'
phase `create-asdf-configuration' succeeded after 0.0 seconds
starting phase `cleanup'
phase `cleanup' succeeded after 0.0 seconds
starting phase `patch-shebangs'
phase `patch-shebangs' succeeded after 0.0 seconds
starting phase `strip'
phase `strip' succeeded after 0.0 seconds
starting phase `validate-runpath'
validating RUNPATH of 0 binaries in "/gnu/store/jxxpk667brampqvdgzdcr4jbpqvl45jg-sbcl-cl-base64-3.3.4-1.577683b/lib"...
phase `validate-runpath' succeeded after 0.0 seconds
starting phase `validate-documentation-location'
phase `validate-documentation-location' succeeded after 0.0 seconds
starting phase `delete-info-dir-file'
phase `delete-info-dir-file' succeeded after 0.0 seconds
starting phase `patch-dot-desktop-files'
phase `patch-dot-desktop-files' succeeded after 0.0 seconds
starting phase `install-license-files'
installing 1 license files from '.'
phase `install-license-files' succeeded after 0.0 seconds
starting phase `reset-gzip-timestamps'
phase `reset-gzip-timestamps' succeeded after 0.0 seconds
starting phase `compress-documentation'
phase `compress-documentation' succeeded after 0.0 seconds