Diff of the two buildlogs: -- --- b1/build.log 2025-02-20 20:41:09.551398444 +0000 +++ b2/build.log 2025-02-20 21:13:15.616245713 +0000 @@ -1,7 +1,6 @@ -W: cgroups are not available on the host, not using them. I: pbuilder: network access will be disabled during build -I: Current time: Wed Mar 25 14:48:09 -12 2026 -I: pbuilder-time-stamp: 1774493289 +I: Current time: Fri Feb 21 10:41:13 +14 2025 +I: pbuilder-time-stamp: 1740084073 I: Building the build Environment I: extracting base tarball [/var/cache/pbuilder/trixie-reproducible-base.tgz] I: copying local configuration @@ -37,51 +36,84 @@ dpkg-source: info: applying Version_2_6_15pre15 I: using fakeroot in build. I: Installing the build-deps -I: user script /srv/workspace/pbuilder/2573272/tmp/hooks/D02_print_environment starting +I: user script /srv/workspace/pbuilder/2786852/tmp/hooks/D01_modify_environment starting +debug: Running on codethink04-arm64. +I: Changing host+domainname to test build reproducibility +I: Adding a custom variable just for the fun of it... +I: Changing /bin/sh to bash +'/bin/sh' -> '/bin/bash' +lrwxrwxrwx 1 root root 9 Feb 20 20:41 /bin/sh -> /bin/bash +I: Setting pbuilder2's login shell to /bin/bash +I: Setting pbuilder2's GECOS to second user,second room,second work-phone,second home-phone,second other +I: user script /srv/workspace/pbuilder/2786852/tmp/hooks/D01_modify_environment finished +I: user script /srv/workspace/pbuilder/2786852/tmp/hooks/D02_print_environment starting I: set - BUILDDIR='/build/reproducible-path' - BUILDUSERGECOS='first user,first room,first work-phone,first home-phone,first other' - BUILDUSERNAME='pbuilder1' - BUILD_ARCH='arm64' - DEBIAN_FRONTEND='noninteractive' + BASH=/bin/sh + BASHOPTS=checkwinsize:cmdhist:complete_fullquote:extquote:force_fignore:globasciiranges:globskipdots:hostcomplete:interactive_comments:patsub_replacement:progcomp:promptvars:sourcepath + BASH_ALIASES=() + BASH_ARGC=() + BASH_ARGV=() + BASH_CMDS=() + BASH_LINENO=([0]="12" [1]="0") + BASH_LOADABLES_PATH=/usr/local/lib/bash:/usr/lib/bash:/opt/local/lib/bash:/usr/pkg/lib/bash:/opt/pkg/lib/bash:. + BASH_SOURCE=([0]="/tmp/hooks/D02_print_environment" [1]="/tmp/hooks/D02_print_environment") + BASH_VERSINFO=([0]="5" [1]="2" [2]="37" [3]="1" [4]="release" [5]="aarch64-unknown-linux-gnu") + BASH_VERSION='5.2.37(1)-release' + BUILDDIR=/build/reproducible-path + BUILDUSERGECOS='second user,second room,second work-phone,second home-phone,second other' + BUILDUSERNAME=pbuilder2 + BUILD_ARCH=arm64 + DEBIAN_FRONTEND=noninteractive DEB_BUILD_OPTIONS='buildinfo=+all reproducible=+all parallel=12 ' - DISTRIBUTION='trixie' - HOME='/root' - HOST_ARCH='arm64' + DIRSTACK=() + DISTRIBUTION=trixie + EUID=0 + FUNCNAME=([0]="Echo" [1]="main") + GROUPS=() + HOME=/root + HOSTNAME=i-capture-the-hostname + HOSTTYPE=aarch64 + HOST_ARCH=arm64 IFS=' ' - LANG='C' - LANGUAGE='en_US:en' - LC_ALL='C' - MAIL='/var/mail/root' - OPTIND='1' - PATH='/usr/sbin:/usr/bin:/sbin:/bin:/usr/games' - PBCURRENTCOMMANDLINEOPERATION='build' - PBUILDER_OPERATION='build' - PBUILDER_PKGDATADIR='/usr/share/pbuilder' - PBUILDER_PKGLIBDIR='/usr/lib/pbuilder' - PBUILDER_SYSCONFDIR='/etc' - PPID='2573272' - PS1='# ' - PS2='> ' + INVOCATION_ID=75e2660b1f314e928689ce1e28e103c7 + LANG=C + LANGUAGE=nl_BE:nl + LC_ALL=C + MACHTYPE=aarch64-unknown-linux-gnu + MAIL=/var/mail/root + OPTERR=1 + OPTIND=1 + OSTYPE=linux-gnu + PATH=/usr/sbin:/usr/bin:/sbin:/bin:/usr/games:/i/capture/the/path + PBCURRENTCOMMANDLINEOPERATION=build + PBUILDER_OPERATION=build + PBUILDER_PKGDATADIR=/usr/share/pbuilder + PBUILDER_PKGLIBDIR=/usr/lib/pbuilder + PBUILDER_SYSCONFDIR=/etc + PIPESTATUS=([0]="0") + POSIXLY_CORRECT=y + PPID=2786852 PS4='+ ' - PWD='/' - SHELL='/bin/bash' - SHLVL='2' - SUDO_COMMAND='/usr/bin/timeout -k 18.1h 18h /usr/bin/ionice -c 3 /usr/bin/nice /usr/sbin/pbuilder --build --configfile /srv/reproducible-results/rbuild-debian/r-b-build.9tpLtq8w/pbuilderrc_gOgC --distribution trixie --hookdir /etc/pbuilder/first-build-hooks --debbuildopts -b --basetgz /var/cache/pbuilder/trixie-reproducible-base.tgz --buildresult /srv/reproducible-results/rbuild-debian/r-b-build.9tpLtq8w/b1 --logfile b1/build.log gcl_2.6.14-16.dsc' - SUDO_GID='109' - SUDO_UID='104' - SUDO_USER='jenkins' - TERM='unknown' - TZ='/usr/share/zoneinfo/Etc/GMT+12' - USER='root' - _='/usr/sbin/chroot' - http_proxy='http://192.168.101.4:3128' + PWD=/ + SHELL=/bin/bash + SHELLOPTS=braceexpand:errexit:hashall:interactive-comments:posix + SHLVL=3 + SUDO_COMMAND='/usr/bin/timeout -k 24.1h 24h /usr/bin/ionice -c 3 /usr/bin/nice -n 11 /usr/bin/unshare --uts -- /usr/sbin/pbuilder --build --configfile /srv/reproducible-results/rbuild-debian/r-b-build.9tpLtq8w/pbuilderrc_IkwP --distribution trixie --hookdir /etc/pbuilder/rebuild-hooks --debbuildopts -b --basetgz /var/cache/pbuilder/trixie-reproducible-base.tgz --buildresult /srv/reproducible-results/rbuild-debian/r-b-build.9tpLtq8w/b2 --logfile b2/build.log gcl_2.6.14-16.dsc' + SUDO_GID=109 + SUDO_UID=104 + SUDO_USER=jenkins + TERM=unknown + TZ=/usr/share/zoneinfo/Etc/GMT-14 + UID=0 + USER=root + _='I: set' + http_proxy=http://192.168.101.4:3128 I: uname -a - Linux codethink03-arm64 6.1.0-31-cloud-arm64 #1 SMP Debian 6.1.128-1 (2025-02-07) aarch64 GNU/Linux + Linux i-capture-the-hostname 6.1.0-31-cloud-arm64 #1 SMP Debian 6.1.128-1 (2025-02-07) aarch64 GNU/Linux I: ls -l /bin - lrwxrwxrwx 1 root root 7 Nov 22 2024 /bin -> usr/bin -I: user script /srv/workspace/pbuilder/2573272/tmp/hooks/D02_print_environment finished + lrwxrwxrwx 1 root root 7 Nov 22 14:40 /bin -> usr/bin +I: user script /srv/workspace/pbuilder/2786852/tmp/hooks/D02_print_environment finished -> Attempting to satisfy build-dependencies -> Creating pbuilder-satisfydepends-dummy package Package: pbuilder-satisfydepends-dummy @@ -251,7 +283,7 @@ Get: 110 http://deb.debian.org/debian trixie/main arm64 tcl8.6-dev arm64 8.6.16+dfsg-1 [1012 kB] Get: 111 http://deb.debian.org/debian trixie/main arm64 tk8.6 arm64 8.6.16-1 [69.7 kB] Get: 112 http://deb.debian.org/debian trixie/main arm64 tk8.6-dev arm64 8.6.16-1 [763 kB] -Fetched 50.5 MB in 1s (87.3 MB/s) +Fetched 50.5 MB in 0s (103 MB/s) Preconfiguring packages ... Selecting previously unselected package tzdata. (Reading database ... (Reading database ... 5% (Reading database ... 10% (Reading database ... 15% (Reading database ... 20% (Reading database ... 25% (Reading database ... 30% (Reading database ... 35% (Reading database ... 40% (Reading database ... 45% (Reading database ... 50% (Reading database ... 55% (Reading database ... 60% (Reading database ... 65% (Reading database ... 70% (Reading database ... 75% (Reading database ... 80% (Reading database ... 85% (Reading database ... 90% (Reading database ... 95% (Reading database ... 100% (Reading database ... 19923 files and directories currently installed.) @@ -620,8 +652,8 @@ Setting up tzdata (2025a-2) ... Current default time zone: 'Etc/UTC' -Local time is now: Thu Mar 26 02:48:29 UTC 2026. -Universal Time is now: Thu Mar 26 02:48:29 UTC 2026. +Local time is now: Thu Feb 20 20:42:01 UTC 2025. +Universal Time is now: Thu Feb 20 20:42:01 UTC 2025. Run 'dpkg-reconfigure tzdata' if you wish to change it. Setting up xtrans-dev (1.4.0-1) ... @@ -729,7 +761,11 @@ fakeroot is already the newest version (1.37-1). 0 upgraded, 0 newly installed, 0 to remove and 0 not upgraded. I: Building the package -I: Running cd /build/reproducible-path/gcl-2.6.14/ && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games" HOME="/nonexistent/first-build" dpkg-buildpackage -us -uc -b && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games" HOME="/nonexistent/first-build" dpkg-genchanges -S > ../gcl_2.6.14-16_source.changes +I: user script /srv/workspace/pbuilder/2786852/tmp/hooks/A99_set_merged_usr starting +Not re-configuring usrmerge for trixie +I: user script /srv/workspace/pbuilder/2786852/tmp/hooks/A99_set_merged_usr finished +hostname: Name or service not known +I: Running cd /build/reproducible-path/gcl-2.6.14/ && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games:/i/capture/the/path" HOME="/nonexistent/second-build" dpkg-buildpackage -us -uc -b && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games:/i/capture/the/path" HOME="/nonexistent/second-build" dpkg-genchanges -S > ../gcl_2.6.14-16_source.changes dpkg-buildpackage: info: source package gcl dpkg-buildpackage: info: source version 2.6.14-16 dpkg-buildpackage: info: source distribution unstable @@ -3226,13 +3262,13 @@ cd info && /usr/bin/make make[2]: Entering directory '/build/reproducible-path/gcl-2.6.14/info' TEXINPUTS=.:$TEXINPUTS tex --interaction nonstopmode gcl-si.texi || true -/bin/sh: 1: tex: not found +/bin/sh: line 1: tex: command not found rm -f *.cp *.ky *.vr *.tp *.pg *.toc *.aux *.log *.fn dvipdfm gcl-si.dvi make[2]: dvipdfm: No such file or directory make[2]: [makefile:36: gcl-si.pdf] Error 127 (ignored) TEXINPUTS=.:$TEXINPUTS tex --interaction nonstopmode gcl.texi || true -/bin/sh: 1: tex: not found +/bin/sh: line 1: tex: command not found rm -f *.cp *.ky *.vr *.tp *.pg *.toc *.aux *.log *.fn dvipdfm gcl.dvi make[2]: dvipdfm: No such file or directory @@ -6122,20 +6158,20 @@ Finished compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_fixup.o. Loading binary of GCL_PCL_FIXUP... ;; Loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_fixup.o" -Compiling gazonk_2802319_0.lsp. +Compiling gazonk_2895691_0.lsp. End of Pass 1. End of Pass 2. OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3 -Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_0.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_0.o" -start address -T 0xef9b50 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_0.o" -Compiling gazonk_2802319_1.lsp. +Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_0.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_0.o" +start address -T 0xef9b50 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_0.o" +Compiling gazonk_2895691_1.lsp. End of Pass 1. End of Pass 2. OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3 -Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_1.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_1.o" -start address -T 0xefa160 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_1.o" +Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_1.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_1.o" +start address -T 0xefa160 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_1.o" start address -T 0xef9990 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_fixup.o" Compiling GCL_PCL_DEFCOMBIN... Compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_defcombin.lisp. @@ -6145,34 +6181,34 @@ Finished compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_defcombin.o. Loading binary of GCL_PCL_DEFCOMBIN... ;; Loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_defcombin.o" -Compiling gazonk_2802319_2.lsp. +Compiling gazonk_2895691_2.lsp. End of Pass 1. End of Pass 2. OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3 -Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_2.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_2.o" -start address -T 0xefe780 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_2.o" -Compiling gazonk_2802319_3.lsp. +Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_2.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_2.o" +start address -T 0xefe780 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_2.o" +Compiling gazonk_2895691_3.lsp. End of Pass 1. End of Pass 2. OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3 -Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_3.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_3.o" -start address -T 0xeff8b0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_3.o" -Compiling gazonk_2802319_4.lsp. +Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_3.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_3.o" +start address -T 0xeff8b0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_3.o" +Compiling gazonk_2895691_4.lsp. End of Pass 1. End of Pass 2. OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3 -Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_4.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_4.o" -start address -T 0xf00630 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_4.o" -Compiling gazonk_2802319_5.lsp. +Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_4.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_4.o" +start address -T 0xf00630 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_4.o" +Compiling gazonk_2895691_5.lsp. End of Pass 1. End of Pass 2. OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3 -Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_5.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_5.o" -start address -T 0xf00ed0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_5.o" +Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_5.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_5.o" +start address -T 0xf00ed0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_5.o" start address -T 0xefa770 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_defcombin.o" Compiling GCL_PCL_CTYPES... Compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_ctypes.lisp. @@ -6182,13 +6218,13 @@ Finished compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_ctypes.o. Loading binary of GCL_PCL_CTYPES... ;; Loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_ctypes.o" -Compiling gazonk_2802319_6.lsp. +Compiling gazonk_2895691_6.lsp. End of Pass 1. End of Pass 2. OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3 -Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_6.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_6.o" -start address -T 0xf020c0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_6.o" +Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_6.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_6.o" +start address -T 0xf020c0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_6.o" start address -T 0xf01910 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_ctypes.o" Compiling GCL_PCL_ENV... Compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_env.lisp. @@ -6201,13 +6237,13 @@ Finished compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_env.o. Loading binary of GCL_PCL_ENV... ;; Loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_env.o" -Compiling gazonk_2802319_7.lsp. +Compiling gazonk_2895691_7.lsp. End of Pass 1. End of Pass 2. OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3 -Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_7.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_7.o" -start address -T 0xf089f0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2802319_7.o" +Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_7.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_7.o" +start address -T 0xf089f0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2895691_7.o" Warning: DESCRIBE is being redefined. start address -T 0xf02960 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_env.o" Compiling GCL_PCL_COMPAT... @@ -7084,7 +7120,7 @@ /tmp/ >;; Loading "../tkl.o" -start address -T 0x1095950 ;; Finished loading "../tkl.o" +start address -T 0x109a900 ;; Finished loading "../tkl.o" 82958 > @@ -7094,13 +7130,13 @@ cd info && /usr/bin/make make[2]: Entering directory '/build/reproducible-path/gcl-2.6.14/info' TEXINPUTS=.:$TEXINPUTS tex --interaction nonstopmode gcl-si.texi || true -/bin/sh: 1: tex: not found +/bin/sh: line 1: tex: command not found rm -f *.cp *.ky *.vr *.tp *.pg *.toc *.aux *.log *.fn dvipdfm gcl-si.dvi make[2]: dvipdfm: No such file or directory make[2]: [makefile:36: gcl-si.pdf] Error 127 (ignored) TEXINPUTS=.:$TEXINPUTS tex --interaction nonstopmode gcl.texi || true -/bin/sh: 1: tex: not found +/bin/sh: line 1: tex: command not found rm -f *.cp *.ky *.vr *.tp *.pg *.toc *.aux *.log *.fn dvipdfm gcl.dvi make[2]: dvipdfm: No such file or directory @@ -9710,13 +9746,13 @@ cd info && /usr/bin/make make[2]: Entering directory '/build/reproducible-path/gcl-2.6.14/info' TEXINPUTS=.:$TEXINPUTS tex --interaction nonstopmode gcl-si.texi || true -/bin/sh: 1: tex: not found +/bin/sh: line 1: tex: command not found rm -f *.cp *.ky *.vr *.tp *.pg *.toc *.aux *.log *.fn dvipdfm gcl-si.dvi make[2]: dvipdfm: No such file or directory make[2]: [makefile:36: gcl-si.pdf] Error 127 (ignored) TEXINPUTS=.:$TEXINPUTS tex --interaction nonstopmode gcl.texi || true -/bin/sh: 1: tex: not found +/bin/sh: line 1: tex: command not found rm -f *.cp *.ky *.vr *.tp *.pg *.toc *.aux *.log *.fn dvipdfm gcl.dvi make[2]: dvipdfm: No such file or directory @@ -12592,20 +12628,20 @@ Finished compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_fixup.o. Loading binary of GCL_PCL_FIXUP... ;; Loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_fixup.o" -Compiling gazonk_2918011_0.lsp. +Compiling gazonk_3082324_0.lsp. End of Pass 1. End of Pass 2. OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3 -Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_0.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_0.o" -start address -T 0xef9b50 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_0.o" -Compiling gazonk_2918011_1.lsp. +Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_0.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_0.o" +start address -T 0xef9b50 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_0.o" +Compiling gazonk_3082324_1.lsp. End of Pass 1. End of Pass 2. OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3 -Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_1.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_1.o" -start address -T 0xefa160 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_1.o" +Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_1.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_1.o" +start address -T 0xefa160 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_1.o" start address -T 0xef9990 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_fixup.o" Compiling GCL_PCL_DEFCOMBIN... Compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_defcombin.lisp. @@ -12615,34 +12651,34 @@ Finished compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_defcombin.o. Loading binary of GCL_PCL_DEFCOMBIN... ;; Loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_defcombin.o" -Compiling gazonk_2918011_2.lsp. +Compiling gazonk_3082324_2.lsp. End of Pass 1. End of Pass 2. OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3 -Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_2.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_2.o" -start address -T 0xefe780 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_2.o" -Compiling gazonk_2918011_3.lsp. +Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_2.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_2.o" +start address -T 0xefe780 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_2.o" +Compiling gazonk_3082324_3.lsp. End of Pass 1. End of Pass 2. OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3 -Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_3.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_3.o" -start address -T 0xeff8b0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_3.o" -Compiling gazonk_2918011_4.lsp. +Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_3.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_3.o" +start address -T 0xeff8b0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_3.o" +Compiling gazonk_3082324_4.lsp. End of Pass 1. End of Pass 2. OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3 -Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_4.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_4.o" -start address -T 0xf00630 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_4.o" -Compiling gazonk_2918011_5.lsp. +Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_4.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_4.o" +start address -T 0xf00630 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_4.o" +Compiling gazonk_3082324_5.lsp. End of Pass 1. End of Pass 2. OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3 -Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_5.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_5.o" -start address -T 0xf00ed0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_5.o" +Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_5.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_5.o" +start address -T 0xf00ed0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_5.o" start address -T 0xefa770 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_defcombin.o" Compiling GCL_PCL_CTYPES... Compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_ctypes.lisp. @@ -12652,13 +12688,13 @@ Finished compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_ctypes.o. Loading binary of GCL_PCL_CTYPES... ;; Loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_ctypes.o" -Compiling gazonk_2918011_6.lsp. +Compiling gazonk_3082324_6.lsp. End of Pass 1. End of Pass 2. OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3 -Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_6.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_6.o" -start address -T 0xf020c0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_6.o" +Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_6.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_6.o" +start address -T 0xf020c0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_6.o" start address -T 0xf01910 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_ctypes.o" Compiling GCL_PCL_ENV... Compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_env.lisp. @@ -12671,13 +12707,13 @@ Finished compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_env.o. Loading binary of GCL_PCL_ENV... ;; Loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_env.o" -Compiling gazonk_2918011_7.lsp. +Compiling gazonk_3082324_7.lsp. End of Pass 1. End of Pass 2. OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3 -Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_7.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_7.o" -start address -T 0xf089f0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2918011_7.o" +Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_7.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_7.o" +start address -T 0xf089f0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_3082324_7.o" Warning: DESCRIBE is being redefined. start address -T 0xf02960 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_env.o" Compiling GCL_PCL_COMPAT... @@ -13554,7 +13590,7 @@ /tmp/ >;; Loading "../tkl.o" -start address -T 0x109e700 ;; Finished loading "../tkl.o" +start address -T 0x10a2ce0 ;; Finished loading "../tkl.o" 82958 > @@ -13564,13 +13600,13 @@ cd info && /usr/bin/make make[2]: Entering directory '/build/reproducible-path/gcl-2.6.14/info' TEXINPUTS=.:$TEXINPUTS tex --interaction nonstopmode gcl-si.texi || true -/bin/sh: 1: tex: not found +/bin/sh: line 1: tex: command not found rm -f *.cp *.ky *.vr *.tp *.pg *.toc *.aux *.log *.fn dvipdfm gcl-si.dvi make[2]: dvipdfm: No such file or directory make[2]: [makefile:36: gcl-si.pdf] Error 127 (ignored) TEXINPUTS=.:$TEXINPUTS tex --interaction nonstopmode gcl.texi || true -/bin/sh: 1: tex: not found +/bin/sh: line 1: tex: command not found rm -f *.cp *.ky *.vr *.tp *.pg *.toc *.aux *.log *.fn dvipdfm gcl.dvi make[2]: dvipdfm: No such file or directory @@ -13727,28 +13763,6 @@ ;; Note: Tail-recursive call of EQUALP-WITH-CASE was replaced by iteration. End of Pass 2. tail: 'ansi-tests/test_results' has appeared; following new file -OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3 -Finished compiling /build/reproducible-path/gcl-2.6.14/ansi-tests/rt.o. -;; Loading #p"rt.o" -start address -T 0x10187c0 ;; Finished loading #p"rt.o" -;; Loading "cl-test-package.lsp" -;; Finished loading "cl-test-package.lsp" -;; Loading "universe.lsp" -;; Finished loading "universe.lsp" -Compiling random-aux.lsp. -End of Pass 1. -End of Pass 2. -OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3 -Finished compiling /build/reproducible-path/gcl-2.6.14/ansi-tests/random-aux.o. -;; Loading #p"random-aux.o" -start address -T 0xc12280 ;; Finished loading #p"random-aux.o" -Compiling ansi-aux.lsp. -; (DEFUN CHECK-VALUES-LENGTH ...) is being compiled. -;; Warning: The ignored variable E is used. -; (DEFUN PRINTABLE-P ...) is being compiled. -;; Warning: The variable *READ-EVAL* is not used. -End of Pass 1. -End of Pass 2. GCL (GNU Common Lisp) 2.6.14 Fri Jan 13 10:47:56 AM EST 2023 ANSI git: Version_2_6_15pre15 Source License: LGPL(gcl,gmp), GPL(unexec,bfd,xgcl) Binary License: GPL due to GPL'ed components: (XGCL UNEXEC) @@ -13774,7 +13788,18 @@ OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3 Finished compiling /build/reproducible-path/gcl-2.6.14/ansi-tests/rt.o. ;; Loading #p"rt.o" -start address -T 0x10187c0 ;; Finished loading #p"rt.o" +start address -T 0x102e900 ;; Finished loading #p"rt.o" +;; Loading "cl-test-package.lsp" +;; Finished loading "cl-test-package.lsp" +;; Loading "universe.lsp" +;; Finished loading "universe.lsp" +Compiling random-aux.lsp. +End of Pass 1. +End of Pass 2. +OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3 +Finished compiling /build/reproducible-path/gcl-2.6.14/ansi-tests/rt.o. +;; Loading #p"rt.o" +start address -T 0x102e900 ;; Finished loading #p"rt.o" ;; Loading "cl-test-package.lsp" ;; Finished loading "cl-test-package.lsp" ;; Loading "universe.lsp" @@ -13792,18 +13817,29 @@ ; (DEFUN PRINTABLE-P ...) is being compiled. ;; Warning: The variable *READ-EVAL* is not used. End of Pass 1. +OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3 +Finished compiling /build/reproducible-path/gcl-2.6.14/ansi-tests/random-aux.o. +;; Loading #p"random-aux.o" +start address -T 0xc12280 ;; Finished loading #p"random-aux.o" +Compiling ansi-aux.lsp. +; (DEFUN CHECK-VALUES-LENGTH ...) is being compiled. +;; Warning: The ignored variable E is used. +; (DEFUN PRINTABLE-P ...) is being compiled. +;; Warning: The variable *READ-EVAL* is not used. +End of Pass 1. +End of Pass 2. End of Pass 2. OPTIMIZE levels: Safety=3, Space=0, Speed=3 Finished compiling /build/reproducible-path/gcl-2.6.14/ansi-tests/ansi-aux.o. ;; Loading #p"ansi-aux.o" -start address -T 0x18fd010 ;; Finished loading #p"ansi-aux.o" +start address -T 0x18cb010 ;; Finished loading #p"ansi-aux.o" ;; Loading "cl-symbol-names.lsp" ;; Finished loading "cl-symbol-names.lsp" ;; Finished loading "gclload1.lsp" OPTIMIZE levels: Safety=3, Space=0, Speed=3 Finished compiling /build/reproducible-path/gcl-2.6.14/ansi-tests/ansi-aux.o. ;; Loading #p"ansi-aux.o" -start address -T 0x18fd010 ;; Finished loading #p"ansi-aux.o" +start address -T 0x18cb010 ;; Finished loading #p"ansi-aux.o" ;; Loading "cl-symbol-names.lsp" ;; Finished loading "cl-symbol-names.lsp" ;; Finished loading "gclload1.lsp" @@ -14297,6 +14333,496 @@ Form: (REMOVE-IF #'MACRO-FUNCTION *EVAL-AND-COMPILE-MACROS*) Expected value: NIL Actual value: (DEFINE-SYMBOL-MACRO). + COMPILE.1 COMPILE.2 COMPILE.3Doing 11799 pending tests of 11799 tests total. + SYMBOL-&ALLOW-OTHER-KEYS SYMBOL-&AUX SYMBOL-&BODY SYMBOL-&ENVIRONMENT + SYMBOL-&KEY SYMBOL-&OPTIONAL SYMBOL-&REST SYMBOL-&WHOLE SYMBOL-* + SYMBOL-** SYMBOL-*** SYMBOL-*BREAK-ON-SIGNALS* + SYMBOL-*COMPILE-FILE-PATHNAME* SYMBOL-*COMPILE-FILE-TRUENAME* + SYMBOL-*COMPILE-PRINT* SYMBOL-*COMPILE-VERBOSE* SYMBOL-*DEBUG-IO* + SYMBOL-*DEBUGGER-HOOK* SYMBOL-*DEFAULT-PATHNAME-DEFAULTS* + SYMBOL-*ERROR-OUTPUT* SYMBOL-*FEATURES* SYMBOL-*GENSYM-COUNTER* + SYMBOL-*LOAD-PATHNAME* SYMBOL-*LOAD-PRINT* SYMBOL-*LOAD-TRUENAME* + SYMBOL-*LOAD-VERBOSE* SYMBOL-*MACROEXPAND-HOOK* SYMBOL-*MODULES* + SYMBOL-*PACKAGE* SYMBOL-*PRINT-ARRAY* SYMBOL-*PRINT-BASE* + SYMBOL-*PRINT-CASE* SYMBOL-*PRINT-CIRCLE* SYMBOL-*PRINT-ESCAPE* + SYMBOL-*PRINT-GENSYM* SYMBOL-*PRINT-LENGTH* SYMBOL-*PRINT-LEVEL* + SYMBOL-*PRINT-LINES* SYMBOL-*PRINT-MISER-WIDTH* + SYMBOL-*PRINT-PPRINT-DISPATCH* SYMBOL-*PRINT-PRETTY* + SYMBOL-*PRINT-RADIX* SYMBOL-*PRINT-READABLY* + SYMBOL-*PRINT-RIGHT-MARGIN* SYMBOL-*QUERY-IO* SYMBOL-*RANDOM-STATE* + SYMBOL-*READ-BASE* SYMBOL-*READ-DEFAULT-FLOAT-FORMAT* + SYMBOL-*READ-EVAL* SYMBOL-*READ-SUPPRESS* SYMBOL-*READTABLE* + SYMBOL-*STANDARD-INPUT* SYMBOL-*STANDARD-OUTPUT* SYMBOL-*TERMINAL-IO* + SYMBOL-*TRACE-OUTPUT* SYMBOL-+ SYMBOL-++ SYMBOL-+++ SYMBOL-- SYMBOL-/ + SYMBOL-// SYMBOL-/// SYMBOL-/= SYMBOL-1+ SYMBOL-1- SYMBOL-< SYMBOL-<= + SYMBOL-= SYMBOL-> SYMBOL->= SYMBOL-ABORT SYMBOL-ABS SYMBOL-ACONS + SYMBOL-ACOS SYMBOL-ACOSH SYMBOL-ADD-METHOD SYMBOL-ADJOIN + SYMBOL-ADJUST-ARRAY SYMBOL-ADJUSTABLE-ARRAY-P SYMBOL-ALLOCATE-INSTANCE + SYMBOL-ALPHA-CHAR-P SYMBOL-ALPHANUMERICP SYMBOL-AND SYMBOL-APPEND + SYMBOL-APPLY SYMBOL-APROPOS SYMBOL-APROPOS-LIST SYMBOL-AREF + SYMBOL-ARITHMETIC-ERROR SYMBOL-ARITHMETIC-ERROR-OPERANDS + SYMBOL-ARITHMETIC-ERROR-OPERATION SYMBOL-ARRAY SYMBOL-ARRAY-DIMENSION + SYMBOL-ARRAY-DIMENSION-LIMIT SYMBOL-ARRAY-DIMENSIONS + SYMBOL-ARRAY-DISPLACEMENT SYMBOL-ARRAY-ELEMENT-TYPE + SYMBOL-ARRAY-HAS-FILL-POINTER-P SYMBOL-ARRAY-IN-BOUNDS-P + SYMBOL-ARRAY-RANK SYMBOL-ARRAY-RANK-LIMIT SYMBOL-ARRAY-ROW-MAJOR-INDEX + SYMBOL-ARRAY-TOTAL-SIZE SYMBOL-ARRAY-TOTAL-SIZE-LIMIT SYMBOL-ARRAYP + SYMBOL-ASH SYMBOL-ASIN SYMBOL-ASINH SYMBOL-ASSERT SYMBOL-ASSOC + SYMBOL-ASSOC-IF SYMBOL-ASSOC-IF-NOT SYMBOL-ATAN SYMBOL-ATANH + SYMBOL-ATOM SYMBOL-BASE-CHAR SYMBOL-BASE-STRING SYMBOL-BIGNUM + SYMBOL-BIT SYMBOL-BIT-AND SYMBOL-BIT-ANDC1 SYMBOL-BIT-ANDC2 + SYMBOL-BIT-EQV SYMBOL-BIT-IOR SYMBOL-BIT-NAND SYMBOL-BIT-NOR + SYMBOL-BIT-NOT SYMBOL-BIT-ORC1 SYMBOL-BIT-ORC2 SYMBOL-BIT-VECTOR + SYMBOL-BIT-VECTOR-P SYMBOL-BIT-XOR SYMBOL-BLOCK SYMBOL-BOOLE + SYMBOL-BOOLE-1 SYMBOL-BOOLE-2 SYMBOL-BOOLE-AND SYMBOL-BOOLE-ANDC1 + SYMBOL-BOOLE-ANDC2 SYMBOL-BOOLE-C1 SYMBOL-BOOLE-C2 SYMBOL-BOOLE-CLR + SYMBOL-BOOLE-EQV SYMBOL-BOOLE-IOR SYMBOL-BOOLE-NAND SYMBOL-BOOLE-NOR + SYMBOL-BOOLE-ORC1 SYMBOL-BOOLE-ORC2 SYMBOL-BOOLE-SET SYMBOL-BOOLE-XOR + SYMBOL-BOOLEAN SYMBOL-BOTH-CASE-P SYMBOL-BOUNDP SYMBOL-BREAK + SYMBOL-BROADCAST-STREAM SYMBOL-BROADCAST-STREAM-STREAMS + SYMBOL-BUILT-IN-CLASS SYMBOL-BUTLAST SYMBOL-BYTE SYMBOL-BYTE-POSITION + SYMBOL-BYTE-SIZE SYMBOL-CAAAAR SYMBOL-CAAADR SYMBOL-CAAAR + SYMBOL-CAADAR SYMBOL-CAADDR SYMBOL-CAADR SYMBOL-CAAR SYMBOL-CADAAR + SYMBOL-CADADR SYMBOL-CADAR SYMBOL-CADDAR SYMBOL-CADDDR SYMBOL-CADDR + SYMBOL-CADR SYMBOL-CALL-ARGUMENTS-LIMIT SYMBOL-CALL-METHOD + SYMBOL-CALL-NEXT-METHOD SYMBOL-CAR SYMBOL-CASE SYMBOL-CATCH + SYMBOL-CCASE SYMBOL-CDAAAR SYMBOL-CDAADR SYMBOL-CDAAR SYMBOL-CDADAR + SYMBOL-CDADDR SYMBOL-CDADR SYMBOL-CDAR SYMBOL-CDDAAR SYMBOL-CDDADR + SYMBOL-CDDAR SYMBOL-CDDDAR SYMBOL-CDDDDR SYMBOL-CDDDR SYMBOL-CDDR + SYMBOL-CDR SYMBOL-CEILING SYMBOL-CELL-ERROR SYMBOL-CELL-ERROR-NAME + SYMBOL-CERROR SYMBOL-CHANGE-CLASS SYMBOL-CHAR SYMBOL-CHAR-CODE + SYMBOL-CHAR-CODE-LIMIT SYMBOL-CHAR-DOWNCASE SYMBOL-CHAR-EQUAL + SYMBOL-CHAR-GREATERP SYMBOL-CHAR-INT SYMBOL-CHAR-LESSP + SYMBOL-CHAR-NAME SYMBOL-CHAR-NOT-EQUAL SYMBOL-CHAR-NOT-GREATERP + SYMBOL-CHAR-NOT-LESSP SYMBOL-CHAR-UPCASE SYMBOL-CHAR/= SYMBOL-CHAR< + SYMBOL-CHAR<= SYMBOL-CHAR= SYMBOL-CHAR> SYMBOL-CHAR>= SYMBOL-CHARACTER + SYMBOL-CHARACTERP SYMBOL-CHECK-TYPE SYMBOL-CIS SYMBOL-CLASS + SYMBOL-CLASS-NAME SYMBOL-CLASS-OF SYMBOL-CLEAR-INPUT + SYMBOL-CLEAR-OUTPUT SYMBOL-CLOSE SYMBOL-CLRHASH SYMBOL-CODE-CHAR + SYMBOL-COERCE SYMBOL-COMPILATION-SPEED SYMBOL-COMPILE + SYMBOL-COMPILE-FILE SYMBOL-COMPILE-FILE-PATHNAME + SYMBOL-COMPILED-FUNCTION SYMBOL-COMPILED-FUNCTION-P + SYMBOL-COMPILER-MACRO SYMBOL-COMPILER-MACRO-FUNCTION SYMBOL-COMPLEMENT + SYMBOL-COMPLEX SYMBOL-COMPLEXP SYMBOL-COMPUTE-APPLICABLE-METHODS + SYMBOL-COMPUTE-RESTARTS SYMBOL-CONCATENATE SYMBOL-CONCATENATED-STREAM + SYMBOL-CONCATENATED-STREAM-STREAMS SYMBOL-COND SYMBOL-CONDITION + SYMBOL-CONJUGATE SYMBOL-CONS SYMBOL-CONSP SYMBOL-CONSTANTLY + SYMBOL-CONSTANTP SYMBOL-CONTINUE SYMBOL-CONTROL-ERROR + SYMBOL-COPY-ALIST SYMBOL-COPY-LIST SYMBOL-COPY-PPRINT-DISPATCH + SYMBOL-COPY-READTABLE SYMBOL-COPY-SEQ SYMBOL-COPY-STRUCTURE + SYMBOL-COPY-SYMBOL SYMBOL-COPY-TREE SYMBOL-COS SYMBOL-COSH + SYMBOL-COUNT SYMBOL-COUNT-IF SYMBOL-COUNT-IF-NOT SYMBOL-CTYPECASE + SYMBOL-DEBUG SYMBOL-DECF SYMBOL-DECLAIM SYMBOL-DECLARATION + SYMBOL-DECLARE SYMBOL-DECODE-FLOAT SYMBOL-DECODE-UNIVERSAL-TIME + SYMBOL-DEFCLASS SYMBOL-DEFCONSTANT SYMBOL-DEFGENERIC + SYMBOL-DEFINE-COMPILER-MACRO SYMBOL-DEFINE-CONDITION + SYMBOL-DEFINE-METHOD-COMBINATION SYMBOL-DEFINE-MODIFY-MACRO + SYMBOL-DEFINE-SETF-EXPANDER SYMBOL-DEFINE-SYMBOL-MACRO SYMBOL-DEFMACRO + SYMBOL-DEFMETHOD SYMBOL-DEFPACKAGE SYMBOL-DEFPARAMETER SYMBOL-DEFSETF + SYMBOL-DEFSTRUCT SYMBOL-DEFTYPE SYMBOL-DEFUN SYMBOL-DEFVAR + SYMBOL-DELETE SYMBOL-DELETE-DUPLICATES SYMBOL-DELETE-FILE + SYMBOL-DELETE-IF SYMBOL-DELETE-IF-NOT SYMBOL-DELETE-PACKAGE + SYMBOL-DENOMINATOR SYMBOL-DEPOSIT-FIELD SYMBOL-DESCRIBE + SYMBOL-DESCRIBE-OBJECT SYMBOL-DESTRUCTURING-BIND SYMBOL-DIGIT-CHAR + SYMBOL-DIGIT-CHAR-P SYMBOL-DIRECTORY SYMBOL-DIRECTORY-NAMESTRING + SYMBOL-DISASSEMBLE SYMBOL-DIVISION-BY-ZERO SYMBOL-DO SYMBOL-DO* + SYMBOL-DO-ALL-SYMBOLS SYMBOL-DO-EXTERNAL-SYMBOLS SYMBOL-DO-SYMBOLS + SYMBOL-DOCUMENTATION SYMBOL-DOLIST SYMBOL-DOTIMES SYMBOL-DOUBLE-FLOAT + SYMBOL-DOUBLE-FLOAT-EPSILON SYMBOL-DOUBLE-FLOAT-NEGATIVE-EPSILON + SYMBOL-DPB SYMBOL-DRIBBLE SYMBOL-DYNAMIC-EXTENT SYMBOL-ECASE + SYMBOL-ECHO-STREAM SYMBOL-ECHO-STREAM-INPUT-STREAM + SYMBOL-ECHO-STREAM-OUTPUT-STREAM SYMBOL-ED SYMBOL-EIGHTH SYMBOL-ELT + SYMBOL-ENCODE-UNIVERSAL-TIME SYMBOL-END-OF-FILE SYMBOL-ENDP + SYMBOL-ENOUGH-NAMESTRING SYMBOL-ENSURE-DIRECTORIES-EXIST + SYMBOL-ENSURE-GENERIC-FUNCTION SYMBOL-EQ SYMBOL-EQL SYMBOL-EQUAL + SYMBOL-EQUALP SYMBOL-ERROR SYMBOL-ETYPECASE SYMBOL-EVAL + SYMBOL-EVAL-WHEN SYMBOL-EVENP SYMBOL-EVERY SYMBOL-EXP SYMBOL-EXPORT + SYMBOL-EXPT SYMBOL-EXTENDED-CHAR SYMBOL-FBOUNDP SYMBOL-FCEILING + SYMBOL-FDEFINITION SYMBOL-FFLOOR SYMBOL-FIFTH SYMBOL-FILE-AUTHOR + SYMBOL-FILE-ERROR SYMBOL-FILE-ERROR-PATHNAME SYMBOL-FILE-LENGTH + SYMBOL-FILE-NAMESTRING SYMBOL-FILE-POSITION SYMBOL-FILE-STREAM + SYMBOL-FILE-STRING-LENGTH SYMBOL-FILE-WRITE-DATE SYMBOL-FILL + SYMBOL-FILL-POINTER SYMBOL-FIND SYMBOL-FIND-ALL-SYMBOLS + SYMBOL-FIND-CLASS SYMBOL-FIND-IF SYMBOL-FIND-IF-NOT SYMBOL-FIND-METHOD + SYMBOL-FIND-PACKAGE SYMBOL-FIND-RESTART SYMBOL-FIND-SYMBOL + SYMBOL-FINISH-OUTPUT SYMBOL-FIRST SYMBOL-FIXNUM SYMBOL-FLET + SYMBOL-FLOAT SYMBOL-FLOAT-DIGITS SYMBOL-FLOAT-PRECISION + SYMBOL-FLOAT-RADIX SYMBOL-FLOAT-SIGN SYMBOL-FLOATING-POINT-INEXACT + SYMBOL-FLOATING-POINT-INVALID-OPERATION SYMBOL-FLOATING-POINT-OVERFLOW + SYMBOL-FLOATING-POINT-UNDERFLOW SYMBOL-FLOATP SYMBOL-FLOOR + SYMBOL-FMAKUNBOUND SYMBOL-FORCE-OUTPUT SYMBOL-FORMAT SYMBOL-FORMATTER + SYMBOL-FOURTH SYMBOL-FRESH-LINE SYMBOL-FROUND SYMBOL-FTRUNCATE + SYMBOL-FTYPE SYMBOL-FUNCALL SYMBOL-FUNCTION SYMBOL-FUNCTION-KEYWORDS + SYMBOL-FUNCTION-LAMBDA-EXPRESSION SYMBOL-FUNCTIONP SYMBOL-GCD + SYMBOL-GENERIC-FUNCTION SYMBOL-GENSYM SYMBOL-GENTEMP SYMBOL-GET + SYMBOL-GET-DECODED-TIME SYMBOL-GET-DISPATCH-MACRO-CHARACTER + SYMBOL-GET-INTERNAL-REAL-TIME SYMBOL-GET-INTERNAL-RUN-TIME + SYMBOL-GET-MACRO-CHARACTER SYMBOL-GET-OUTPUT-STREAM-STRING + SYMBOL-GET-PROPERTIES SYMBOL-GET-SETF-EXPANSION + SYMBOL-GET-UNIVERSAL-TIME SYMBOL-GETF SYMBOL-GETHASH SYMBOL-GO + SYMBOL-GRAPHIC-CHAR-P SYMBOL-HANDLER-BIND SYMBOL-HANDLER-CASE + SYMBOL-HASH-TABLE SYMBOL-HASH-TABLE-COUNT SYMBOL-HASH-TABLE-P + SYMBOL-HASH-TABLE-REHASH-SIZE SYMBOL-HASH-TABLE-REHASH-THRESHOLD + SYMBOL-HASH-TABLE-SIZE SYMBOL-HASH-TABLE-TEST SYMBOL-HOST-NAMESTRING + SYMBOL-IDENTITY SYMBOL-IF SYMBOL-IGNORABLE SYMBOL-IGNORE + SYMBOL-IGNORE-ERRORS SYMBOL-IMAGPART SYMBOL-IMPORT SYMBOL-IN-PACKAGE + SYMBOL-INCF SYMBOL-INITIALIZE-INSTANCE SYMBOL-INLINE + SYMBOL-INPUT-STREAM-P SYMBOL-INSPECT SYMBOL-INTEGER + SYMBOL-INTEGER-DECODE-FLOAT SYMBOL-INTEGER-LENGTH SYMBOL-INTEGERP + SYMBOL-INTERACTIVE-STREAM-P SYMBOL-INTERN + SYMBOL-INTERNAL-TIME-UNITS-PER-SECOND SYMBOL-INTERSECTION + SYMBOL-INVALID-METHOD-ERROR SYMBOL-INVOKE-DEBUGGER + SYMBOL-INVOKE-RESTART SYMBOL-INVOKE-RESTART-INTERACTIVELY SYMBOL-ISQRT + SYMBOL-KEYWORD SYMBOL-KEYWORDP SYMBOL-LABELS SYMBOL-LAMBDA + SYMBOL-LAMBDA-LIST-KEYWORDS SYMBOL-LAMBDA-PARAMETERS-LIMIT SYMBOL-LAST + SYMBOL-LCM SYMBOL-LDB SYMBOL-LDB-TEST SYMBOL-LDIFF + SYMBOL-LEAST-NEGATIVE-DOUBLE-FLOAT SYMBOL-LEAST-NEGATIVE-LONG-FLOAT + SYMBOL-LEAST-NEGATIVE-NORMALIZED-DOUBLE-FLOAT + SYMBOL-LEAST-NEGATIVE-NORMALIZED-LONG-FLOAT + SYMBOL-LEAST-NEGATIVE-NORMALIZED-SHORT-FLOAT + SYMBOL-LEAST-NEGATIVE-NORMALIZED-SINGLE-FLOAT + SYMBOL-LEAST-NEGATIVE-SHORT-FLOAT SYMBOL-LEAST-NEGATIVE-SINGLE-FLOAT + SYMBOL-LEAST-POSITIVE-DOUBLE-FLOAT SYMBOL-LEAST-POSITIVE-LONG-FLOAT + SYMBOL-LEAST-POSITIVE-NORMALIZED-DOUBLE-FLOAT + SYMBOL-LEAST-POSITIVE-NORMALIZED-LONG-FLOAT + SYMBOL-LEAST-POSITIVE-NORMALIZED-SHORT-FLOAT + SYMBOL-LEAST-POSITIVE-NORMALIZED-SINGLE-FLOAT + SYMBOL-LEAST-POSITIVE-SHORT-FLOAT SYMBOL-LEAST-POSITIVE-SINGLE-FLOAT + SYMBOL-LENGTH SYMBOL-LET SYMBOL-LET* SYMBOL-LISP-IMPLEMENTATION-TYPE + SYMBOL-LISP-IMPLEMENTATION-VERSION SYMBOL-LIST SYMBOL-LIST* + SYMBOL-LIST-ALL-PACKAGES SYMBOL-LIST-LENGTH SYMBOL-LISTEN SYMBOL-LISTP + SYMBOL-LOAD SYMBOL-LOAD-LOGICAL-PATHNAME-TRANSLATIONS + SYMBOL-LOAD-TIME-VALUE SYMBOL-LOCALLY SYMBOL-LOG SYMBOL-LOGAND + SYMBOL-LOGANDC1 SYMBOL-LOGANDC2 SYMBOL-LOGBITP SYMBOL-LOGCOUNT + SYMBOL-LOGEQV SYMBOL-LOGICAL-PATHNAME + SYMBOL-LOGICAL-PATHNAME-TRANSLATIONS SYMBOL-LOGIOR SYMBOL-LOGNAND + SYMBOL-LOGNOR SYMBOL-LOGNOT SYMBOL-LOGORC1 SYMBOL-LOGORC2 + SYMBOL-LOGTEST SYMBOL-LOGXOR SYMBOL-LONG-FLOAT + SYMBOL-LONG-FLOAT-EPSILON SYMBOL-LONG-FLOAT-NEGATIVE-EPSILON + SYMBOL-LONG-SITE-NAME SYMBOL-LOOP SYMBOL-LOOP-FINISH + SYMBOL-LOWER-CASE-P SYMBOL-MACHINE-INSTANCE SYMBOL-MACHINE-TYPE + SYMBOL-MACHINE-VERSION SYMBOL-MACRO-FUNCTION SYMBOL-MACROEXPAND + SYMBOL-MACROEXPAND-1 SYMBOL-MACROLET SYMBOL-MAKE-ARRAY + SYMBOL-MAKE-BROADCAST-STREAM SYMBOL-MAKE-CONCATENATED-STREAM + SYMBOL-MAKE-CONDITION SYMBOL-MAKE-DISPATCH-MACRO-CHARACTER + SYMBOL-MAKE-ECHO-STREAM SYMBOL-MAKE-HASH-TABLE SYMBOL-MAKE-INSTANCE + SYMBOL-MAKE-INSTANCES-OBSOLETE SYMBOL-MAKE-LIST SYMBOL-MAKE-LOAD-FORM + SYMBOL-MAKE-LOAD-FORM-SAVING-SLOTS SYMBOL-MAKE-METHOD + SYMBOL-MAKE-PACKAGE SYMBOL-MAKE-PATHNAME SYMBOL-MAKE-RANDOM-STATE + SYMBOL-MAKE-SEQUENCE SYMBOL-MAKE-STRING + SYMBOL-MAKE-STRING-INPUT-STREAM SYMBOL-MAKE-STRING-OUTPUT-STREAM + SYMBOL-MAKE-SYMBOL SYMBOL-MAKE-SYNONYM-STREAM + SYMBOL-MAKE-TWO-WAY-STREAM SYMBOL-MAKUNBOUND SYMBOL-MAP + SYMBOL-MAP-INTO SYMBOL-MAPC SYMBOL-MAPCAN SYMBOL-MAPCAR SYMBOL-MAPCON + SYMBOL-MAPHASH SYMBOL-MAPL SYMBOL-MAPLIST SYMBOL-MASK-FIELD SYMBOL-MAX + SYMBOL-MEMBER SYMBOL-MEMBER-IF SYMBOL-MEMBER-IF-NOT SYMBOL-MERGE + SYMBOL-MERGE-PATHNAMES SYMBOL-METHOD SYMBOL-METHOD-COMBINATION + SYMBOL-METHOD-COMBINATION-ERROR SYMBOL-METHOD-QUALIFIERS SYMBOL-MIN + SYMBOL-MINUSP SYMBOL-MISMATCH SYMBOL-MOD + SYMBOL-MOST-NEGATIVE-DOUBLE-FLOAT SYMBOL-MOST-NEGATIVE-FIXNUM + SYMBOL-MOST-NEGATIVE-LONG-FLOAT SYMBOL-MOST-NEGATIVE-SHORT-FLOAT + SYMBOL-MOST-NEGATIVE-SINGLE-FLOAT SYMBOL-MOST-POSITIVE-DOUBLE-FLOAT + SYMBOL-MOST-POSITIVE-FIXNUM SYMBOL-MOST-POSITIVE-LONG-FLOAT + SYMBOL-MOST-POSITIVE-SHORT-FLOAT SYMBOL-MOST-POSITIVE-SINGLE-FLOAT + SYMBOL-MUFFLE-WARNING SYMBOL-MULTIPLE-VALUE-BIND + SYMBOL-MULTIPLE-VALUE-CALL SYMBOL-MULTIPLE-VALUE-LIST + SYMBOL-MULTIPLE-VALUE-PROG1 SYMBOL-MULTIPLE-VALUE-SETQ + SYMBOL-MULTIPLE-VALUES-LIMIT SYMBOL-NAME-CHAR SYMBOL-NAMESTRING + SYMBOL-NBUTLAST SYMBOL-NCONC SYMBOL-NEXT-METHOD-P SYMBOL-NIL + SYMBOL-NINTERSECTION SYMBOL-NINTH SYMBOL-NO-APPLICABLE-METHOD + SYMBOL-NO-NEXT-METHOD SYMBOL-NOT SYMBOL-NOTANY SYMBOL-NOTEVERY + SYMBOL-NOTINLINE SYMBOL-NRECONC SYMBOL-NREVERSE SYMBOL-NSET-DIFFERENCE + SYMBOL-NSET-EXCLUSIVE-OR SYMBOL-NSTRING-CAPITALIZE + SYMBOL-NSTRING-DOWNCASE SYMBOL-NSTRING-UPCASE SYMBOL-NSUBLIS + SYMBOL-NSUBST SYMBOL-NSUBST-IF SYMBOL-NSUBST-IF-NOT SYMBOL-NSUBSTITUTE + SYMBOL-NSUBSTITUTE-IF SYMBOL-NSUBSTITUTE-IF-NOT SYMBOL-NTH + SYMBOL-NTH-VALUE SYMBOL-NTHCDR SYMBOL-NULL SYMBOL-NUMBER + SYMBOL-NUMBERP SYMBOL-NUMERATOR SYMBOL-NUNION SYMBOL-ODDP SYMBOL-OPEN + SYMBOL-OPEN-STREAM-P SYMBOL-OPTIMIZE SYMBOL-OR SYMBOL-OTHERWISE + SYMBOL-OUTPUT-STREAM-P SYMBOL-PACKAGE SYMBOL-PACKAGE-ERROR + SYMBOL-PACKAGE-ERROR-PACKAGE SYMBOL-PACKAGE-NAME + SYMBOL-PACKAGE-NICKNAMES SYMBOL-PACKAGE-SHADOWING-SYMBOLS + SYMBOL-PACKAGE-USE-LIST SYMBOL-PACKAGE-USED-BY-LIST SYMBOL-PACKAGEP + SYMBOL-PAIRLIS SYMBOL-PARSE-ERROR SYMBOL-PARSE-INTEGER + SYMBOL-PARSE-NAMESTRING SYMBOL-PATHNAME SYMBOL-PATHNAME-DEVICE + SYMBOL-PATHNAME-DIRECTORY SYMBOL-PATHNAME-HOST SYMBOL-PATHNAME-MATCH-P + SYMBOL-PATHNAME-NAME SYMBOL-PATHNAME-TYPE SYMBOL-PATHNAME-VERSION + SYMBOL-PATHNAMEP SYMBOL-PEEK-CHAR SYMBOL-PHASE SYMBOL-PI SYMBOL-PLUSP + SYMBOL-POP SYMBOL-POSITION SYMBOL-POSITION-IF SYMBOL-POSITION-IF-NOT + SYMBOL-PPRINT SYMBOL-PPRINT-DISPATCH + SYMBOL-PPRINT-EXIT-IF-LIST-EXHAUSTED SYMBOL-PPRINT-FILL + SYMBOL-PPRINT-INDENT SYMBOL-PPRINT-LINEAR SYMBOL-PPRINT-LOGICAL-BLOCK + SYMBOL-PPRINT-NEWLINE SYMBOL-PPRINT-POP SYMBOL-PPRINT-TAB + SYMBOL-PPRINT-TABULAR SYMBOL-PRIN1 SYMBOL-PRIN1-TO-STRING SYMBOL-PRINC + SYMBOL-PRINC-TO-STRING SYMBOL-PRINT SYMBOL-PRINT-NOT-READABLE + SYMBOL-PRINT-NOT-READABLE-OBJECT SYMBOL-PRINT-OBJECT + SYMBOL-PRINT-UNREADABLE-OBJECT SYMBOL-PROBE-FILE SYMBOL-PROCLAIM + SYMBOL-PROG SYMBOL-PROG* SYMBOL-PROG1 SYMBOL-PROG2 SYMBOL-PROGN + SYMBOL-PROGRAM-ERROR SYMBOL-PROGV SYMBOL-PROVIDE SYMBOL-PSETF + SYMBOL-PSETQ SYMBOL-PUSH SYMBOL-PUSHNEW SYMBOL-QUOTE SYMBOL-RANDOM + SYMBOL-RANDOM-STATE SYMBOL-RANDOM-STATE-P SYMBOL-RASSOC + SYMBOL-RASSOC-IF SYMBOL-RASSOC-IF-NOT SYMBOL-RATIO SYMBOL-RATIONAL + SYMBOL-RATIONALIZE SYMBOL-RATIONALP SYMBOL-READ SYMBOL-READ-BYTE + SYMBOL-READ-CHAR SYMBOL-READ-CHAR-NO-HANG SYMBOL-READ-DELIMITED-LIST + SYMBOL-READ-FROM-STRING SYMBOL-READ-LINE + SYMBOL-READ-PRESERVING-WHITESPACE SYMBOL-READ-SEQUENCE + SYMBOL-READER-ERROR SYMBOL-READTABLE SYMBOL-READTABLE-CASE + SYMBOL-READTABLEP SYMBOL-REAL SYMBOL-REALP SYMBOL-REALPART + SYMBOL-REDUCE SYMBOL-REINITIALIZE-INSTANCE SYMBOL-REM SYMBOL-REMF + SYMBOL-REMHASH SYMBOL-REMOVE SYMBOL-REMOVE-DUPLICATES SYMBOL-REMOVE-IF + SYMBOL-REMOVE-IF-NOT SYMBOL-REMOVE-METHOD SYMBOL-REMPROP + SYMBOL-RENAME-FILE SYMBOL-RENAME-PACKAGE SYMBOL-REPLACE SYMBOL-REQUIRE + SYMBOL-REST SYMBOL-RESTART SYMBOL-RESTART-BIND SYMBOL-RESTART-CASE + SYMBOL-RESTART-NAME SYMBOL-RETURN SYMBOL-RETURN-FROM SYMBOL-REVAPPEND + SYMBOL-REVERSE SYMBOL-ROOM SYMBOL-ROTATEF SYMBOL-ROUND + SYMBOL-ROW-MAJOR-AREF SYMBOL-RPLACA SYMBOL-RPLACD SYMBOL-SAFETY + SYMBOL-SATISFIES SYMBOL-SBIT SYMBOL-SCALE-FLOAT SYMBOL-SCHAR + SYMBOL-SEARCH SYMBOL-SECOND SYMBOL-SEQUENCE SYMBOL-SERIOUS-CONDITION + SYMBOL-SET SYMBOL-SET-DIFFERENCE SYMBOL-SET-DISPATCH-MACRO-CHARACTER + SYMBOL-SET-EXCLUSIVE-OR SYMBOL-SET-MACRO-CHARACTER + SYMBOL-SET-PPRINT-DISPATCH SYMBOL-SET-SYNTAX-FROM-CHAR SYMBOL-SETF + SYMBOL-SETQ SYMBOL-SEVENTH SYMBOL-SHADOW SYMBOL-SHADOWING-IMPORT + SYMBOL-SHARED-INITIALIZE SYMBOL-SHIFTF SYMBOL-SHORT-FLOAT + SYMBOL-SHORT-FLOAT-EPSILON SYMBOL-SHORT-FLOAT-NEGATIVE-EPSILON + SYMBOL-SHORT-SITE-NAME SYMBOL-SIGNAL SYMBOL-SIGNED-BYTE SYMBOL-SIGNUM + SYMBOL-SIMPLE-ARRAY SYMBOL-SIMPLE-BASE-STRING SYMBOL-SIMPLE-BIT-VECTOR + SYMBOL-SIMPLE-BIT-VECTOR-P SYMBOL-SIMPLE-CONDITION + SYMBOL-SIMPLE-CONDITION-FORMAT-ARGUMENTS + SYMBOL-SIMPLE-CONDITION-FORMAT-CONTROL SYMBOL-SIMPLE-ERROR + SYMBOL-SIMPLE-STRING SYMBOL-SIMPLE-STRING-P SYMBOL-SIMPLE-TYPE-ERROR + SYMBOL-SIMPLE-VECTOR SYMBOL-SIMPLE-VECTOR-P SYMBOL-SIMPLE-WARNING + SYMBOL-SIN SYMBOL-SINGLE-FLOAT SYMBOL-SINGLE-FLOAT-EPSILON + SYMBOL-SINGLE-FLOAT-NEGATIVE-EPSILON SYMBOL-SINH SYMBOL-SIXTH + SYMBOL-SLEEP +Test SYMBOL-SLOT-BOUNDP failed +Form: (TEST-IF-NOT-IN-CL-PACKAGE "slot-boundp") +Expected value: NIL +Actual value: (COMPILER-MACRO). + SYMBOL-SLOT-EXISTS-P SYMBOL-SLOT-MAKUNBOUND SYMBOL-SLOT-MISSING + SYMBOL-SLOT-UNBOUND +Test SYMBOL-SLOT-VALUE failed +Form: (TEST-IF-NOT-IN-CL-PACKAGE "slot-value") +Expected value: NIL +Actual value: (COMPILER-MACRO). + SYMBOL-SOFTWARE-TYPE SYMBOL-SOFTWARE-VERSION SYMBOL-SOME SYMBOL-SORT + SYMBOL-SPACE SYMBOL-SPECIAL SYMBOL-SPECIAL-OPERATOR-P SYMBOL-SPEED + SYMBOL-SQRT SYMBOL-STABLE-SORT SYMBOL-STANDARD SYMBOL-STANDARD-CHAR + SYMBOL-STANDARD-CHAR-P SYMBOL-STANDARD-CLASS + SYMBOL-STANDARD-GENERIC-FUNCTION SYMBOL-STANDARD-METHOD + SYMBOL-STANDARD-OBJECT SYMBOL-STEP SYMBOL-STORAGE-CONDITION + SYMBOL-STORE-VALUE SYMBOL-STREAM SYMBOL-STREAM-ELEMENT-TYPE + SYMBOL-STREAM-ERROR SYMBOL-STREAM-ERROR-STREAM + SYMBOL-STREAM-EXTERNAL-FORMAT SYMBOL-STREAMP SYMBOL-STRING + SYMBOL-STRING-CAPITALIZE SYMBOL-STRING-DOWNCASE SYMBOL-STRING-EQUAL + SYMBOL-STRING-GREATERP SYMBOL-STRING-LEFT-TRIM SYMBOL-STRING-LESSP + SYMBOL-STRING-NOT-EQUAL SYMBOL-STRING-NOT-GREATERP + SYMBOL-STRING-NOT-LESSP SYMBOL-STRING-RIGHT-TRIM SYMBOL-STRING-STREAM + SYMBOL-STRING-TRIM SYMBOL-STRING-UPCASE SYMBOL-STRING/= SYMBOL-STRING< + SYMBOL-STRING<= SYMBOL-STRING= SYMBOL-STRING> SYMBOL-STRING>= + SYMBOL-STRINGP SYMBOL-STRUCTURE SYMBOL-STRUCTURE-CLASS + SYMBOL-STRUCTURE-OBJECT SYMBOL-STYLE-WARNING SYMBOL-SUBLIS + SYMBOL-SUBSEQ SYMBOL-SUBSETP SYMBOL-SUBST SYMBOL-SUBST-IF + SYMBOL-SUBST-IF-NOT SYMBOL-SUBSTITUTE SYMBOL-SUBSTITUTE-IF + SYMBOL-SUBSTITUTE-IF-NOT SYMBOL-SUBTYPEP SYMBOL-SVREF SYMBOL-SXHASH + SYMBOL-SYMBOL SYMBOL-SYMBOL-FUNCTION SYMBOL-SYMBOL-MACROLET + SYMBOL-SYMBOL-NAME SYMBOL-SYMBOL-PACKAGE SYMBOL-SYMBOL-PLIST + SYMBOL-SYMBOL-VALUE SYMBOL-SYMBOLP SYMBOL-SYNONYM-STREAM + SYMBOL-SYNONYM-STREAM-SYMBOL SYMBOL-T SYMBOL-TAGBODY SYMBOL-TAILP + SYMBOL-TAN SYMBOL-TANH SYMBOL-TENTH SYMBOL-TERPRI SYMBOL-THE + SYMBOL-THIRD SYMBOL-THROW SYMBOL-TIME SYMBOL-TRACE + SYMBOL-TRANSLATE-LOGICAL-PATHNAME SYMBOL-TRANSLATE-PATHNAME + SYMBOL-TREE-EQUAL SYMBOL-TRUENAME SYMBOL-TRUNCATE + SYMBOL-TWO-WAY-STREAM SYMBOL-TWO-WAY-STREAM-INPUT-STREAM + SYMBOL-TWO-WAY-STREAM-OUTPUT-STREAM SYMBOL-TYPE SYMBOL-TYPE-ERROR + SYMBOL-TYPE-ERROR-DATUM SYMBOL-TYPE-ERROR-EXPECTED-TYPE SYMBOL-TYPE-OF + SYMBOL-TYPECASE SYMBOL-TYPEP SYMBOL-UNBOUND-SLOT + SYMBOL-UNBOUND-SLOT-INSTANCE SYMBOL-UNBOUND-VARIABLE + SYMBOL-UNDEFINED-FUNCTION SYMBOL-UNEXPORT SYMBOL-UNINTERN SYMBOL-UNION + SYMBOL-UNLESS SYMBOL-UNREAD-CHAR SYMBOL-UNSIGNED-BYTE SYMBOL-UNTRACE + SYMBOL-UNUSE-PACKAGE SYMBOL-UNWIND-PROTECT + SYMBOL-UPDATE-INSTANCE-FOR-DIFFERENT-CLASS + SYMBOL-UPDATE-INSTANCE-FOR-REDEFINED-CLASS + SYMBOL-UPGRADED-ARRAY-ELEMENT-TYPE SYMBOL-UPGRADED-COMPLEX-PART-TYPE + SYMBOL-UPPER-CASE-P SYMBOL-USE-PACKAGE SYMBOL-USE-VALUE + SYMBOL-USER-HOMEDIR-PATHNAME SYMBOL-VALUES SYMBOL-VALUES-LIST + SYMBOL-VARIABLE SYMBOL-VECTOR SYMBOL-VECTOR-POP SYMBOL-VECTOR-PUSH + SYMBOL-VECTOR-PUSH-EXTEND SYMBOL-VECTORP SYMBOL-WARN SYMBOL-WARNING + SYMBOL-WHEN SYMBOL-WILD-PATHNAME-P SYMBOL-WITH-ACCESSORS + SYMBOL-WITH-COMPILATION-UNIT SYMBOL-WITH-CONDITION-RESTARTS + SYMBOL-WITH-HASH-TABLE-ITERATOR SYMBOL-WITH-INPUT-FROM-STRING + SYMBOL-WITH-OPEN-FILE SYMBOL-WITH-OPEN-STREAM + SYMBOL-WITH-OUTPUT-TO-STRING SYMBOL-WITH-PACKAGE-ITERATOR + SYMBOL-WITH-SIMPLE-RESTART SYMBOL-WITH-SLOTS + SYMBOL-WITH-STANDARD-IO-SYNTAX SYMBOL-WRITE SYMBOL-WRITE-BYTE + SYMBOL-WRITE-CHAR SYMBOL-WRITE-LINE SYMBOL-WRITE-SEQUENCE + SYMBOL-WRITE-STRING SYMBOL-WRITE-TO-STRING SYMBOL-Y-OR-N-P + SYMBOL-YES-OR-NO-P SYMBOL-ZEROP KEYWORD-BEHAVIOR +Test SPECIAL-OPERATOR-P.1 failed +Form: (LOOP + FOR + S + IN + +SPECIAL-OPERATORS+ + UNLESS + (SPECIAL-OPERATOR-P S) + COLLECT + S) +Expected value: NIL +Actual value: (SYMBOL-MACROLET). +Test SPECIAL-OPERATOR-P.2 failed +Form: (LET ((P (FIND-PACKAGE "CL"))) + (LOOP + FOR + NAME + IN + *CL-SYMBOL-NAMES* + UNLESS + (OR (MEMBER NAME +SPECIAL-OPERATORS+ :TEST #'STRING=) + (LET ((SYM (FIND-SYMBOL NAME P))) + (OR (NOT (SPECIAL-OPERATOR-P SYM)) + (MACRO-FUNCTION SYM)))) + COLLECT + NAME)) +Expected value: NIL +Actual value: ("DECLARE"). + SPECIAL-OPERATOR-P.ORDER.1 SPECIAL-OPERATOR-P.ERROR.1 + SPECIAL-OPERATOR-P.ERROR.2 SPECIAL-OPERATOR-P.ERROR.3 KEYWORDP.1 + KEYWORDP.2 KEYWORDP.3 KEYWORDP.4 KEYWORDP.5 KEYWORDP.6 KEYWORDP.7 + KEYWORDP.8 KEYWORDP.9 KEYWORDP.10 KEYWORDP.12 KEYWORDP.ORDER.1 + KEYWORDP.ERROR.1 KEYWORDP.ERROR.2 KEYWORDP.ERROR.3 KEYWORDP.ERROR.4 + SYMBOL-NAME.1 SYMBOL-NAME.2 SYMBOL-NAME.3 SYMBOL-NAME.4 SYMBOL-NAME.5 + SYMBOL-NAME.6 SYMBOL-NAME.7 SYMBOL-NAME.ERROR.1 SYMBOL-NAME.ERROR.2 + MAKE-SYMBOL.1 MAKE-SYMBOL.2 MAKE-SYMBOL.3 MAKE-SYMBOL.4 MAKE-SYMBOL.5 + MAKE-SYMBOL.6 MAKE-SYMBOL.7 MAKE-SYMBOL.8 MAKE-SYMBOL.9 MAKE-SYMBOL.10 + MAKE-SYMBOL.ORDER.1 MAKE-SYMBOL.ERROR.1 MAKE-SYMBOL.ERROR.2 + MAKE-SYMBOL.ERROR.3 MAKE-SYMBOL.ERROR.4 MAKE-SYMBOL.ERROR.5 + MAKE-SYMBOL.ERROR.6 MAKE-SYMBOL.ERROR.7 MAKE-SYMBOL.ERROR.8 + MAKE-SYMBOL.ERROR.9 MAKE-SYMBOL.ERROR.10 MAKE-SYMBOL.ERROR.11 + COPY-SYMBOL.1 COPY-SYMBOL.2 COPY-SYMBOL.3 COPY-SYMBOL.4 COPY-SYMBOL.5 + COPY-SYMBOL.ERROR.1 COPY-SYMBOL.ERROR.2 GENSYM.1 GENSYM.2 GENSYM.3 + GENSYM.4 GENSYM.5 GENSYM.6 GENSYM.7 GENSYM.8 GENSYM.9 GENSYM.10 + GENSYM.11 GENSYM.12 GENSYM.13 GENSYM.ERROR.1 GENSYM.ERROR.2 + GENSYM.ERROR.3 GENSYM.ERROR.4 GENSYM.ERROR.5 GENSYM.ERROR.6 + GENSYM.ERROR.7 GENSYM.ERROR.8 +Test CL-FUNCTION-SYMBOLS.1 failed +Form: (LOOP + FOR + S + IN + (APPEND *CL-FUNCTION-SYMBOLS* *CL-ACCESSOR-SYMBOLS*) + WHEN + (OR (NOT (FBOUNDP S)) (MACRO-FUNCTION S) (SPECIAL-OPERATOR-P S) + (NOT (SYMBOL-FUNCTION S))) + COLLECT + S) +Expected value: NIL +Actual value: (COPY-PPRINT-DISPATCH FUNCTION-LAMBDA-EXPRESSION + MAKE-LOAD-FORM-SAVING-SLOTS PPRINT-DISPATCH + PPRINT-FILL PPRINT-INDENT PPRINT-LINEAR + PPRINT-NEWLINE PPRINT-TAB PPRINT-TABULAR + SET-PPRINT-DISPATCH UPGRADED-COMPLEX-PART-TYPE + FDEFINITION MASK-FIELD). +Test CL-MACRO-SYMBOLS.1 failed +Form: (LOOP + FOR + S + IN + *CL-MACRO-SYMBOLS* + WHEN + (OR (NOT (FBOUNDP S)) (NOT (MACRO-FUNCTION S))) + COLLECT + S) +Expected value: NIL +Actual value: (DEFINE-SETF-EXPANDER DEFINE-SYMBOL-MACRO FORMATTER + PPRINT-LOGICAL-BLOCK PRINT-UNREADABLE-OBJECT). + CL-CONSTANT-SYMBOLS.1 +Test CL-VARIABLE-SYMBOLS.1 failed +Form: (LOOP + FOR + S + IN + *CL-VARIABLE-SYMBOLS* + WHEN + (NOT (BOUNDP S)) + COLLECT + S) +Expected value: NIL +Actual value: (*COMPILE-FILE-PATHNAME* *COMPILE-FILE-TRUENAME* + *READ-EVAL*). +Test CL-TYPES-THAT-ARE-CLASSES.1 failed +Form: (LOOP + FOR + S + IN + *CL-TYPES-THAT-ARE-CLASSES-SYMBOLS* + FOR + C + = + (FIND-CLASS S NIL) + UNLESS + (AND C (EQ (CLASS-NAME C) S) (TYPEP C 'CLASS)) + COLLECT + S) +Expected value: NIL +Actual value: (BROADCAST-STREAM CONCATENATED-STREAM ECHO-STREAM + FILE-STREAM FUNCTION HASH-TABLE LOGICAL-PATHNAME + PACKAGE PATHNAME RANDOM-STATE READTABLE STREAM + STRING-STREAM SYNONYM-STREAM TWO-WAY-STREAM). +Test CL-TYPES-THAT-ARE-CLASSES.2 failed +Form: (LOOP + FOR + S + IN + *CL-TYPES-THAT-ARE-CLASSES-SYMBOLS* + FOR + C + = + (FIND-CLASS S NIL NIL) + UNLESS + (AND C (EQ (CLASS-NAME C) S) (TYPEP C 'CLASS)) + COLLECT + S) +Expected value: NIL +Actual value: (BROADCAST-STREAM CONCATENATED-STREAM ECHO-STREAM + FILE-STREAM FUNCTION HASH-TABLE LOGICAL-PATHNAME + PACKAGE PATHNAME RANDOM-STATE READTABLE STREAM + STRING-STREAM SYNONYM-STREAM TWO-WAY-STREAM). +Test CL-TYPES-THAT-ARE-CLASSES.3 failed +Form: (LOOP + FOR + S + IN + *CL-TYPES-THAT-ARE-CLASSES-SYMBOLS* + FOR + C + = + (EVAL (LIST 'MACROLET + (LIST (LIST '%FOO '(&ENVIRONMENT ENV) + (LIST 'LIST ''QUOTE + (LIST* 'FIND-CLASS + (LIST 'QUOTE S) '(NIL ENV))))) + '(%FOO))) + UNLESS + (AND C (EQ (CLASS-NAME C) S) (TYPEP C 'CLASS)) + COLLECT + S) +Expected value: NIL +Actual value: (BROADCAST-STREAM CONCATENATED-STREAM ECHO-STREAM + FILE-STREAM FUNCTION HASH-TABLE LOGICAL-PATHNAME + PACKAGE PATHNAME RANDOM-STATE READTABLE STREAM + STRING-STREAM SYNONYM-STREAM TWO-WAY-STREAM). + SYMBOLP.ERROR.1 SYMBOLP.ERROR.2 SYMBOL-FUNCTION.ERROR.1 + SYMBOL-FUNCTION.ERROR.2 SYMBOL-PACKAGE.ERROR.1 SYMBOL-PACKAGE.ERROR.2 + SYMBOL-PLIST.ERROR.1 SYMBOL-PLIST.ERROR.2 SYMBOL-VALUE.ERROR.1 + SYMBOL-VALUE.ERROR.2 BOUNDP.ERROR.1 BOUNDP.ERROR.2 BOUNDP.ERROR.3 + BOUNDP.ERROR.4 BOUNDP.ERROR.5 BOUNDP.ERROR.6 BOUNDP.1 BOUNDP.2 + BOUNDP.3 BOUNDP.4 BOUNDP.ORDER.1 EVAL.1 EVAL.2 EVAL.3 EVAL.4 EVAL.5 + EVAL.6 EVAL.ORDER.1 EVAL.ERROR.1 EVAL.ERROR.2 EVAL.ERROR.3 + EVAL-AND-COMPILE-FNS +Test EVAL-AND-COMPILE-MACROS failed +Form: (REMOVE-IF #'MACRO-FUNCTION *EVAL-AND-COMPILE-MACROS*) +Expected value: NIL +Actual value: (DEFINE-SYMBOL-MACRO). COMPILE.1 COMPILE.2 COMPILE.3 COMPILE.4 COMPILE.5 COMPILE.6 COMPILE.7 COMPILE.8 COMPILE.9 Test COMPILE.ERROR.1 failed @@ -14736,6 +15262,445 @@ Expected value: (A 2) Actual value: #. LABELS.7B LABELS.18 LABELS.19 LABELS.20 LABELS.21 LABELS.22 LABELS.23 + LABELS.24 COMPILE.4 COMPILE.5 COMPILE.6 COMPILE.7 + COMPILE.8 COMPILE.9 +Test COMPILE.ERROR.1 failed +Form: (CLASSIFY-ERROR (COMPILE)) +Expected value: PROGRAM-ERROR +Actual value: ERROR. +Test COMPILE.ERROR.2 failed +Form: (CLASSIFY-ERROR (COMPILE NIL '(LAMBDA () NIL) 'GARBAGE)) +Expected value: PROGRAM-ERROR +Actual values: # + NIL + NIL. + CONSTANTP.ERROR.1 CONSTANTP.ERROR.2 CONSTANTP.1 CONSTANTP.2 + CONSTANTP.3 CONSTANTP.4 CONSTANTP.5 +Test CONSTANTP.6 failed +Form: (CONSTANTP-MACRO CONSTANTP-TEST-SYMBOL) +Expected value: T +Actual value: #. + CONSTANTP.7 +Test CONSTANTP.8 failed +Form: (NOTNOT-MV (CONSTANTP 1 NIL)) +Expected value: T +Actual value: #. + CONSTANTP.9 CONSTANTP.10 CONSTANTP.ORDER.1 +Test CONSTANTP.ORDER.2 failed +Form: (LET ((I 0) X Y) + (VALUES (NOTNOT (CONSTANTP (PROGN (SETF X (INCF I)) 1) + (PROGN (SETF Y (INCF I)) NIL))) + I X Y)) +Expected values: T + 2 + 1 + 2 +Actual value: #. + LAMBDA.1 LAMBDA.2 LAMBDA.3 LAMBDA.4 LAMBDA.5 LAMBDA.6 LAMBDA.7 + LAMBDA.8 LAMBDA.9 LAMBDA.10 LAMBDA.MACRO.1 LAMBDA.MACRO.2 +Test DCF-FUNS failed +Form: (REMOVE-IF #'FBOUNDP *DCF-FNS*) +Expected value: NIL +Actual value: (FUNCTION-LAMBDA-EXPRESSION). +Test DCF-MACROS failed +Form: (REMOVE-IF #'MACRO-FUNCTION *DCF-MACROS*) +Expected value: NIL +Actual value: (DEFINE-SETF-EXPANDER). + SETF-ORDER SETF-ORDER.2 PUSH-ORDER PUSHNEW-ORDER PUSHNEW-ORDER.2 + REMF-ORDER INCF-ORDER DECF-ORDER SHIFTF-ORDER.1 SHIFTF-ORDER.2 + ROTATEF-ORDER.1 ROTATEF-ORDER.2 PSETF-ORDER PSETF-ORDER.2 POP-ORDER + SETF-VAR SETF-VALUES.1 SETF-VALUES.2 SETF-VALUES.3 SETF-VALUES.4 +Test SETF-VALUES.5 failed +Form: (LET ((A (VECTOR NIL NIL)) (I 0) X Y Z) + (SETF (VALUES (AREF A (PROGN (SETF X (INCF I)) 0)) + (AREF A (PROGN (SETF Y (INCF I)) 1))) + (PROGN (SETF Z (INCF I)) (VALUES 'FOO 'BAR))) + (VALUES A I X Y Z)) +Expected values: #(FOO BAR) + 3 + 1 + 2 + 3 +Actual values: #(FOO BAR) + 3 + 2 + 3 + 1. + SETF-VALUES.6 SETF-THE.1 SETF-THE.2 SETF-APPLY.1 SETF-APPLY.2 + SETF-APPLY.3 SETF-APPLY.4 SETF-EXPANDER.1 SETF-MACRO.1 SETF-MACRO.2 + SETF-MACRO.3 SETF-MACRO.4 SETF-SYMBOL-MACRO.1 SETF-SYMBOL-MACRO.2 + SETF-SYMBOL-MACRO.3 SETQ.1 SETQ.2 SETQ.3 SETQ.4 SETF.1 SETF.2 SETF.3 + SETF.4 PSETQ.1 PSETQ.2 PSETQ.3 PSETQ.4 PSETQ.5 PSETQ.6 +Test PSETQ.7 failed +Form: (SYMBOL-MACROLET ((X (AREF A (INCF I))) (Y (AREF A (INCF I)))) + (LET ((A (COPY-SEQ #(0 1 2 3 4 5 6 7 8 9))) (I 0)) + (PSETQ X (AREF A (INCF I)) Y (AREF A (INCF I))) + (VALUES A I))) +Expected values: #(0 2 2 4 4 5 6 7 8 9) + 4 +Actual values: #(0 1 2 1 2 5 6 7 8 9) + 4. + PSETF.1 PSETF.2 PSETF.3 PSETF.4 PSETF.5 PSETF.6 +Test PSETF.7 failed +Form: (SYMBOL-MACROLET ((X (AREF A (INCF I))) (Y (AREF A (INCF I)))) + (LET ((A (COPY-SEQ #(0 1 2 3 4 5 6 7 8 9))) (I 0)) + (PSETF X (AREF A (INCF I)) Y (AREF A (INCF I))) + (VALUES A I))) +Expected values: #(0 2 2 4 4 5 6 7 8 9) + 4 +Actual values: #(0 1 2 1 2 5 6 7 8 9) + 4. + PSETF.8 PSETF.9 AND.1 AND.2 AND.3 AND.4 AND.5 AND.6 AND.7 AND.8 AND.9 + AND.ORDER.1 AND.ORDER.2 APPLY.ERROR.1 APPLY.ERROR.2 APPLY.ERROR.3 + APPLY.ERROR.4 APPLY.1 APPLY.2 APPLY.3 APPLY.4 APPLY.5 APPLY.ORDER.1 + BLOCK.1 BLOCK.2 BLOCK.3 BLOCK.4 BLOCK.5 BLOCK.6 BLOCK.7 BLOCK.8 + BLOCK.9 BLOCK.10 CALL-ARGUMENTS-LIMIT.1 CALL-ARGUMENTS-LIMIT.2 + CALL-ARGUMENTS-LIMIT.3 CALL-ARGUMENTS-LIMIT.4 CALL-ARGUMENTS-LIMIT.5 + CASE.1 CASE.2 CASE.3 CASE.4 CASE.5 CASE.6 CASE.7 CASE.8 CASE.9 CASE.10 + CASE.11 CASE.12 CASE.13 CASE.14 CASE.15 CASE.16 CASE.17 CASE.18 + CASE.19 CASE.20 CASE.21 CASE.22 CASE.23 CASE.24 CASE.25 CASE.26 + CASE.27 CASE.28 CASE.29 CASE.30 CASE.31 CASE.32 CASE.33 CASE.34 + CATCH.1 CATCH.2 CATCH.3 CATCH.4 CATCH.5 CATCH.6 CATCH.7 CATCH.8 + CATCH.9 CATCH.10 CATCH.11 CATCH.12 +Test THROW-ERROR failed +Form: (CLASSIFY-ERROR (THROW (GENSYM) NIL)) +Expected value: CONTROL-ERROR +Actual value: ERROR. + CCASE.1 CCASE.2 CCASE.3 CCASE.4 CCASE.5 CCASE.6 CCASE.7 CCASE.8 + CCASE.9 CCASE.10 CCASE.11 CCASE.12 CCASE.13 CCASE.14 CCASE.15 CCASE.16 + CCASE.17 CCASE.19 CCASE.20 CCASE.21 CCASE.23 CCASE.25 CCASE.26 + CCASE.27 CCASE.28 CCASE.29 CCASE.30 CCASE.31 COMPILED-FUNCTION-P.1 + COMPILED-FUNCTION-P.2 COMPILED-FUNCTION-P.3 + COMPILED-FUNCTION-P.ORDER.1 COMPILED-FUNCTION-P.ERROR.1 + COMPILED-FUNCTION-P.ERROR.2 COMPLEMENT.1 COMPLEMENT.2 COMPLEMENT.3 + COMPLEMENT.4 COMPLEMENT.5 COMPLEMENT.ORDER.1 COMPLEMENT.ERROR.1 + COMPLEMENT.ERROR.2 COMPLEMENT.ERROR.3 COMPLEMENT.ERROR.4 COND.1 COND.2 + COND.3 COND.4 COND.5 COND.6 COND.7 COND.8 COND.9 COND.10 COND.11 + COND.12 COND.13 COND.14 CONSTANTLY.1 CONSTANTLY.2 CONSTANTLY.3 + CONSTANTLY.ERROR.1 CONSTANTLY.ERROR.2 CTYPECASE.1 CTYPECASE.2 + CTYPECASE.3 CTYPECASE.4 CTYPECASE.5 CTYPECASE.6 CTYPECASE.7 + CTYPECASE.8 CTYPECASE.9 CTYPECASE.10 CTYPECASE.11 CTYPECASE.12 + CTYPECASE.13 DEFCONSTANT.1 DEFCONSTANT.2 DEFCONSTANT.3 DEFCONSTANT.4 + DEFCONSTANT.5 DEFINE-MODIFY-MACRO.1 DEFINE-MODIFY-MACRO.2 + DEFINE-MODIFY-MACRO.3 DEFINE-MODIFY-MACRO.4 DEFPARAMETER.1 + DEFPARAMETER.2 DEFPARAMETER.3 DEFPARAMETER.4 DEFPARAMETER.5 DEFVAR.1 + DEFVAR.2 DEFVAR.3 DEFVAR.4 DEFVAR.5 DESTRUCTURING-BIND.1 + DESTRUCTURING-BIND.2 DESTRUCTURING-BIND.3 DESTRUCTURING-BIND.4 + DESTRUCTURING-BIND.5 DESTRUCTURING-BIND.6 DESTRUCTURING-BIND.7 + DESTRUCTURING-BIND.8 DESTRUCTURING-BIND.9 DESTRUCTURING-BIND.10 + DESTRUCTURING-BIND.11 DESTRUCTURING-BIND.12 DESTRUCTURING-BIND.13 + DESTRUCTURING-BIND.14 DESTRUCTURING-BIND.15 DESTRUCTURING-BIND.16 + DESTRUCTURING-BIND.17 DESTRUCTURING-BIND.18 ECASE.1 ECASE.2 ECASE.3 + ECASE.4 ECASE.5 ECASE.6 ECASE.7 ECASE.8 ECASE.9 ECASE.10 ECASE.11 + ECASE.12 ECASE.13 ECASE.14 ECASE.15 ECASE.16 ECASE.17 ECASE.18 + ECASE.19 ECASE.20 ECASE.21 ECASE.23 ECASE.25 ECASE.26 ECASE.27 + ECASE.28 ECASE.29 ECASE.31 ECASE.32 EQL.1 EQL.2 EQL.3 EQL.4 EQL.5 + EQL.7 EQL.8 EQL.9 EQL.10 EQL.11 EQL.ORDER.1 EQL.ERROR.1 EQL.ERROR.2 + EQL.ERROR.3 EQ.ERROR.1 EQ.ERROR.2 EQ.ERROR.3 EQUAL.1 EQUAL.2 EQUAL.3 + EQUAL.4 EQUAL.5 EQUAL.6 EQUAL.7 EQUAL.8 EQUAL.9 EQUAL.10 EQUAL.11 + EQUAL.12 EQUAL.ORDER.1 EQUAL.ERROR.1 EQUAL.ERROR.2 EQUAL.ERROR.3 + EQUALP.1 EQUALP.2 EQUALP.3 EQUALP.4 EQUALP.ORDER.1 EQUALP.ERROR.1 + EQUALP.ERROR.2 EQUALP.ERROR.3 ETYPECASE.1 ETYPECASE.2 ETYPECASE.3 + ETYPECASE.4 ETYPECASE.5 ETYPECASE.6 ETYPECASE.7 ETYPECASE.8 + ETYPECASE.9 ETYPECASE.10 ETYPECASE.11 ETYPECASE.12 EVERY.1 EVERY.2 + EVERY.3 EVERY.4 EVERY.5 EVERY.6 EVERY.7 EVERY.8 EVERY.9 EVERY.10 + EVERY.11 EVERY.12 EVERY.13 EVERY.14 EVERY.15 EVERY.16 EVERY.ORDER.1 + EVERY.ORDER.2 EVERY.ERROR.1 EVERY.ERROR.2 EVERY.ERROR.3 EVERY.ERROR.4 + EVERY.ERROR.5 EVERY.ERROR.6 EVERY.ERROR.7 EVERY.ERROR.9 EVERY.ERROR.10 + EVERY.ERROR.11 EVERY.ERROR.12 EVERY.ERROR.13 FBOUNDP.1 FBOUNDP.2 + FBOUNDP.3 FBOUNDP.4 FBOUNDP.5 +Test FBOUNDP.6 failed +Form: (NOT-MV (FBOUNDP '(SETF FBOUNDP-6-ACCESSOR))) +Expected value: NIL +Actual value: #. +Test FBOUNDP.7 failed +Form: (LET ((G (GENSYM))) (FBOUNDP (LIST 'SETF G))) +Expected value: NIL +Actual value: #. + FBOUNDP.ORDER.1 FBOUNDP.ERROR.1 FBOUNDP.ERROR.2 FBOUNDP.ERROR.3 + FBOUNDP.ERROR.4 FBOUNDP.ERROR.5 FBOUNDP.ERROR.6 +Test FDEFINITION.ERROR.1 failed +Form: (CLASSIFY-ERROR (FDEFINITION)) +Expected value: PROGRAM-ERROR +Actual value: UNDEFINED-FUNCTION. +Test FDEFINITION.ERROR.2 failed +Form: (CLASSIFY-ERROR (FDEFINITION 'CONS NIL)) +Expected value: PROGRAM-ERROR +Actual value: UNDEFINED-FUNCTION. + FDEFINITION.ERROR.3 +Test FDEFINITION.ERROR.4 failed +Form: (CLASSIFY-ERROR (FDEFINITION 10)) +Expected value: TYPE-ERROR +Actual value: UNDEFINED-FUNCTION. + FDEFINITION.ERROR.5 +Test FDEFINITION.ERROR.6 failed +Form: (CLASSIFY-ERROR (LOCALLY (FDEFINITION 10) T)) +Expected value: TYPE-ERROR +Actual value: UNDEFINED-FUNCTION. +Test FDEFINITION.1 failed +Form: (LET ((FUN (FDEFINITION 'CONS))) (FUNCALL FUN 'A 'B)) +Expected value: (A . B) +Actual value: #. +Test FDEFINITION.2 failed +Form: (PROGN (FDEFINITION 'COND) :GOOD) +Expected value: :GOOD +Actual value: #. +Test FDEFINITION.3 failed +Form: (PROGN (FDEFINITION 'SETQ) :GOOD) +Expected value: :GOOD +Actual value: #. +Test FDEFINITION.4 failed +Form: (LET ((SYM (GENSYM))) + (VALUES (FBOUNDP SYM) + (PROGN + (SETF (FDEFINITION SYM) (FDEFINITION 'CONS)) + (FUNCALL (SYMBOL-FUNCTION SYM) 'A 'B)) + (NOTNOT (FBOUNDP SYM)))) +Expected values: NIL + (A . B) + T +Actual value: #. +Test FDEFINITION.5 failed +Form: (LET* ((SYM (GENSYM)) (FNAME (LIST 'SETF SYM))) + (VALUES (FBOUNDP FNAME) + (PROGN + (SETF (FDEFINITION FNAME) (FDEFINITION 'CONS)) + (EVAL (LIST 'SETF (LIST SYM ''A) ''B))) + (NOTNOT (FBOUNDP FNAME)))) +Expected values: NIL + (B . A) + T +Actual value: #. +Test FDEFINITION.ORDER.1 failed +Form: (LET ((I 0)) (FDEFINITION (PROGN (INCF I) 'SETQ)) I) +Expected value: 1 +Actual value: #. + FLET.1 FLET.2 FLET.3 FLET.4 FLET.5 FLET.6 FLET.7 FLET.8 FLET.9 FLET.10 + FLET.11 FLET.12 FLET.13 FLET.14 FLET.15 FLET.16 +Test FLET.17 failed +Form: (FLET (((SETF %F) (X Y) (SETF (CAR Y) X))) + (LET ((Z (LIST 1 2))) (SETF (%F Z) 'A) Z)) +Expected value: (A 2) +Actual value: #. + FLET.18 FLET.19 FLET.20 FLET.21 FLET.22 FLET.23 FLET.24 FLET.25 + FLET.26 FLET.27 FLET.28 FLET.29 FLET.30 FLET.31 FLET.32 FLET.33 + FLET.34 FLET.35 FLET.36 FLET.37 FLET.38 FLET.39 FLET.40 FLET.45 + FLET.46 FLET.47 FLET.48 FLET.49 FLET.50 +Test FLET.51 failed +Form: (LOOP + FOR + S + IN + *CL-NON-FUNCTION-MACRO-SPECIAL-OPERATOR-SYMBOLS* + FOR + FORM + = + (LIST 'CLASSIFY-ERROR + (LIST 'FLET + (LIST (LIST* (LIST 'SETF S) + '((&REST ARGS) (DECLARE (IGNORE ARGS)) + 'A))) + (LIST 'SETF (LIST S) 10))) + UNLESS + (EQ (EVAL FORM) 'A) + COLLECT + S) +Expected value: NIL +Actual value: (&ALLOW-OTHER-KEYS &AUX &BODY &ENVIRONMENT &KEY &OPTIONAL + &REST &WHOLE ** *** *BREAK-ON-SIGNALS* + *COMPILE-FILE-PATHNAME* *COMPILE-FILE-TRUENAME* + *COMPILE-PRINT* *COMPILE-VERBOSE* *DEBUG-IO* + *DEBUGGER-HOOK* *DEFAULT-PATHNAME-DEFAULTS* + *ERROR-OUTPUT* *FEATURES* *GENSYM-COUNTER* + *LOAD-PATHNAME* *LOAD-PRINT* *LOAD-TRUENAME* + *LOAD-VERBOSE* *MACROEXPAND-HOOK* *MODULES* *PACKAGE* + *PRINT-ARRAY* *PRINT-BASE* *PRINT-CASE* + *PRINT-CIRCLE* *PRINT-ESCAPE* *PRINT-GENSYM* + *PRINT-LENGTH* *PRINT-LEVEL* *PRINT-LINES* + *PRINT-MISER-WIDTH* *PRINT-PPRINT-DISPATCH* + *PRINT-PRETTY* *PRINT-RADIX* *PRINT-READABLY* + *PRINT-RIGHT-MARGIN* *QUERY-IO* *RANDOM-STATE* + *READ-BASE* *READ-DEFAULT-FLOAT-FORMAT* *READ-EVAL* + *READ-SUPPRESS* *READTABLE* *STANDARD-INPUT* + *STANDARD-OUTPUT* *TERMINAL-IO* *TRACE-OUTPUT* ++ +++ + // /// ARITHMETIC-ERROR ARRAY ARRAY-DIMENSION-LIMIT + ARRAY-RANK-LIMIT ARRAY-TOTAL-SIZE-LIMIT BASE-CHAR + BASE-STRING BIGNUM BIT-VECTOR BOOLE-1 BOOLE-2 + BOOLE-AND BOOLE-ANDC1 BOOLE-ANDC2 BOOLE-C1 BOOLE-C2 + BOOLE-CLR BOOLE-EQV BOOLE-IOR BOOLE-NAND BOOLE-NOR + BOOLE-ORC1 BOOLE-ORC2 BOOLE-SET BOOLE-XOR BOOLEAN + BROADCAST-STREAM BUILT-IN-CLASS CALL-ARGUMENTS-LIMIT + CELL-ERROR CHAR-CODE-LIMIT CLASS COMPILATION-SPEED + COMPILED-FUNCTION COMPILER-MACRO CONCATENATED-STREAM + CONDITION CONTROL-ERROR DEBUG DECLARATION + DIVISION-BY-ZERO DOUBLE-FLOAT DOUBLE-FLOAT-EPSILON + DOUBLE-FLOAT-NEGATIVE-EPSILON DYNAMIC-EXTENT + ECHO-STREAM ED END-OF-FILE EXTENDED-CHAR FILE-ERROR + FILE-STREAM FILE-STRING-LENGTH FILL FIXNUM + FLOATING-POINT-INEXACT + FLOATING-POINT-INVALID-OPERATION + FLOATING-POINT-OVERFLOW FLOATING-POINT-UNDERFLOW + FTYPE GENERIC-FUNCTION HASH-TABLE IGNORABLE IGNORE + INLINE INTEGER INTERNAL-TIME-UNITS-PER-SECOND KEYWORD + LAMBDA-LIST-KEYWORDS LAMBDA-PARAMETERS-LIMIT + LEAST-NEGATIVE-DOUBLE-FLOAT LEAST-NEGATIVE-LONG-FLOAT + LEAST-NEGATIVE-NORMALIZED-DOUBLE-FLOAT + LEAST-NEGATIVE-NORMALIZED-LONG-FLOAT + LEAST-NEGATIVE-NORMALIZED-SHORT-FLOAT + LEAST-NEGATIVE-NORMALIZED-SINGLE-FLOAT + LEAST-NEGATIVE-SHORT-FLOAT + LEAST-NEGATIVE-SINGLE-FLOAT + LEAST-POSITIVE-DOUBLE-FLOAT LEAST-POSITIVE-LONG-FLOAT + LEAST-POSITIVE-NORMALIZED-DOUBLE-FLOAT + LEAST-POSITIVE-NORMALIZED-LONG-FLOAT + LEAST-POSITIVE-NORMALIZED-SHORT-FLOAT + LEAST-POSITIVE-NORMALIZED-SINGLE-FLOAT + LEAST-POSITIVE-SHORT-FLOAT + LEAST-POSITIVE-SINGLE-FLOAT LONG-FLOAT + LONG-FLOAT-EPSILON LONG-FLOAT-NEGATIVE-EPSILON METHOD + METHOD-COMBINATION MOST-NEGATIVE-DOUBLE-FLOAT + MOST-NEGATIVE-FIXNUM MOST-NEGATIVE-LONG-FLOAT + MOST-NEGATIVE-SHORT-FLOAT MOST-NEGATIVE-SINGLE-FLOAT + MOST-POSITIVE-DOUBLE-FLOAT MOST-POSITIVE-FIXNUM + MOST-POSITIVE-LONG-FLOAT MOST-POSITIVE-SHORT-FLOAT + MOST-POSITIVE-SINGLE-FLOAT MULTIPLE-VALUES-LIMIT NIL + NOTINLINE NUMBER OPTIMIZE OTHERWISE PACKAGE + PACKAGE-ERROR PARSE-ERROR PI PRINT-NOT-READABLE + PROGRAM-ERROR RANDOM RANDOM-STATE RATIO READER-ERROR + READTABLE REAL RESTART SAFETY SATISFIES SEQUENCE + SERIOUS-CONDITION SHORT-FLOAT SHORT-FLOAT-EPSILON + SHORT-FLOAT-NEGATIVE-EPSILON SIGNED-BYTE SIMPLE-ARRAY + SIMPLE-BASE-STRING SIMPLE-BIT-VECTOR SIMPLE-CONDITION + SIMPLE-ERROR SIMPLE-STRING SIMPLE-TYPE-ERROR + SIMPLE-VECTOR SIMPLE-WARNING SINGLE-FLOAT + SINGLE-FLOAT-EPSILON SINGLE-FLOAT-NEGATIVE-EPSILON + SPACE SPECIAL SPEED STANDARD STANDARD-CHAR + STANDARD-CLASS STANDARD-GENERIC-FUNCTION + STANDARD-METHOD STANDARD-OBJECT STORAGE-CONDITION + STREAM STREAM-ERROR STRING-STREAM STRUCTURE + STRUCTURE-CLASS STRUCTURE-OBJECT STYLE-WARNING SYMBOL + SYNONYM-STREAM T TWO-WAY-STREAM TYPE TYPE-ERROR + UNBOUND-SLOT UNBOUND-VARIABLE UNDEFINED-FUNCTION + UNSIGNED-BYTE VARIABLE WARNING). + FMAKUNBOUND.1 FMAKUNBOUND.2 FMAKUNBOUND.3 +Test FMAKUNBOUND.4 failed +Form: (LET* ((G (GENSYM)) (N (LIST 'SETF G))) + (AND (NOT (FBOUNDP N)) (EVAL (LIST* 'DEFUN N '(NIL NIL))) + (FBOUNDP N) + (VALUES (EQUAL (CHECK-VALUES (FMAKUNBOUND N)) N) + (FBOUNDP N)))) +Expected values: T + NIL +Actual value: #. + FMAKUNBOUND.ERROR.1 FMAKUNBOUND.ERROR.2 FMAKUNBOUND.ERROR.3 + FMAKUNBOUND.ERROR.4 FMAKUNBOUND.ERROR.5 FMAKUNBOUND.ERROR.6 FUNCALL.1 + FUNCALL.2 FUNCALL.3 FUNCALL.4 FUNCALL.5 FUNCALL.6 FUNCALL.7 FUNCALL.8 + FUNCALL.9 FUNCALL.ORDER.1 FUNCALL.ORDER.2 FUNCALL.ERROR.1 + FUNCALL.ERROR.2 +Test FUNCALL.ERROR.3 failed +Form: (CLASSIFY-ERROR (FUNCALL 'DEFCONSTANT '(DEFCONSTANT X 10))) +Expected value: UNDEFINED-FUNCTION +Actual value: PROGRAM-ERROR. + FUNCALL.ERROR.4 FUNCALL.ERROR.5 FUNCALL.ERROR.6 FUNCALL.ERROR.7 +Test FUNCTION-LAMBDA-EXPRESSION.1 failed +Form: (LENGTH (MULTIPLE-VALUE-LIST (FUNCTION-LAMBDA-EXPRESSION #'CONS))) +Expected value: 3 +Actual value: #. +Test FUNCTION-LAMBDA-EXPRESSION.2 failed +Form: (LET ((X NIL)) + (FLET ((%F NIL X)) + (LET ((RET-VALS + (MULTIPLE-VALUE-LIST + (FUNCTION-LAMBDA-EXPRESSION #'%F)))) + (VALUES (LENGTH RET-VALS) (NOTNOT (SECOND RET-VALS)))))) +Expected values: 3 + T +Actual value: #. +Test FUNCTION-LAMBDA-EXPRESSION.ORDER.1 failed +Form: (LET ((I 0)) + (FUNCTION-LAMBDA-EXPRESSION (PROGN (INCF I) #'CONS)) + I) +Expected value: 1 +Actual value: #. +Test FUNCTION-LAMBDA-EXPRESSION.ERROR.1 failed +Form: (CLASSIFY-ERROR (FUNCTION-LAMBDA-EXPRESSION)) +Expected value: PROGRAM-ERROR +Actual value: UNDEFINED-FUNCTION. +Test FUNCTION-LAMBDA-EXPRESSION.ERROR.2 failed +Form: (CLASSIFY-ERROR (FUNCTION-LAMBDA-EXPRESSION #'CONS NIL)) +Expected value: PROGRAM-ERROR +Actual value: UNDEFINED-FUNCTION. + FUNCTION.1 +Test FUNCTION.2 failed +Form: (TYPEP 'IDENTITY 'FUNCTION) +Expected value: NIL +Actual value: T. + FUNCTION.3 FUNCTION.4 FUNCTION.5 +Test FUNCTION.6 failed +Form: (TYPEP '(LAMBDA (X) X) 'FUNCTION) +Expected value: NIL +Actual value: T. +Test FUNCTION.7 failed +Form: (NOT-MV (TYPEP #'(SETF FUNCTION-7-ACCESSOR) 'FUNCTION)) +Expected value: NIL +Actual value: #. + FUNCTION.8 FUNCTION.9 +Test FUNCTION.10 failed +Form: (LOOP + FOR + X + IN + *UNIVERSE* + WHEN + (AND (OR (NUMBERP X) (CHARACTERP X) (SYMBOLP X) (CONSP X) + (TYPEP X 'ARRAY)) + (TYPEP X 'FUNCTION)) + COLLECT + X) +Expected value: NIL +Actual value: (CONS (SYSTEM:LAMBDA-CLOSURE () () () (X) X)). + FUNCTION.11 FUNCTION.12 FUNCTION.13 FUNCTIONP.1 +Test FUNCTIONP.2 failed +Form: (FUNCTIONP 'IDENTITY) +Expected value: NIL +Actual value: T. + FUNCTIONP.3 FUNCTIONP.4 FUNCTIONP.5 +Test FUNCTIONP.6 failed +Form: (FUNCTIONP '(LAMBDA (X) X)) +Expected value: NIL +Actual value: T. +Test FUNCTIONP.7 failed +Form: (NOT-MV (FUNCTIONP #'(SETF FUNCTIONP-7-ACCESSOR))) +Expected value: NIL +Actual value: #. + FUNCTIONP.8 FUNCTIONP.9 +Test FUNCTIONP.10 failed +Form: (LOOP + FOR + X + IN + *UNIVERSE* + WHEN + (AND (OR (NUMBERP X) (CHARACTERP X) (SYMBOLP X) (CONSP X) + (TYPEP X 'ARRAY)) + (FUNCTIONP X)) + COLLECT + X) +Expected value: NIL +Actual value: (CONS (SYSTEM:LAMBDA-CLOSURE () () () (X) X)). + FUNCTIONP.11 FUNCTIONP.12 FUNCTIONP.ORDER.1 FUNCTIONP.ERROR.1 + FUNCTIONP.ERROR.2 GET-SETF-EXPANSION.ERROR.1 + GET-SETF-EXPANSION.ERROR.2 IDENTITY.1 IDENTITY.2 IDENTITY.3 + IDENTITY.ORDER.1 IDENTITY.ERROR.1 IDENTITY.ERROR.2 IF.1 IF.2 IF.3 IF.4 + IF.5 IF.6 IF.7 IF.ORDER.1 LABELS.1 LABELS.2 LABELS.3 LABELS.4 LABELS.5 + LABELS.6 LABELS.7 LABELS.8 LABELS.9 LABELS.10 LABELS.11 LABELS.12 + LABELS.13 LABELS.14 LABELS.15 LABELS.16 +Test LABELS.17 failed +Form: (LABELS (((SETF %F) (X Y) (SETF (CAR Y) X))) + (LET ((Z (LIST 1 2))) (SETF (%F Z) 'A) Z)) +Expected value: (A 2) +Actual value: #. + LABELS.7B LABELS.18 LABELS.19 LABELS.20 LABELS.21 LABELS.22 LABELS.23 LABELS.24 LABELS.25 Test LABELS.26 failed Form: (LOOP @@ -15947,936 +16912,21 @@ INTERSECTION.2 INTERSECTION.3 INTERSECTION.4 INTERSECTION.5 INTERSECTION.6 INTERSECTION.7 INTERSECTION.8 INTERSECTION.9 INTERSECTION.9-A INTERSECTION.9-B INTERSECTION.10 INTERSECTION.11 - INTERSECTION.11-ADoing 11799 pending tests of 11799 tests total. - SYMBOL-&ALLOW-OTHER-KEYS SYMBOL-&AUX SYMBOL-&BODY SYMBOL-&ENVIRONMENT - SYMBOL-&KEY SYMBOL-&OPTIONAL SYMBOL-&REST SYMBOL-&WHOLE SYMBOL-* - SYMBOL-** SYMBOL-*** SYMBOL-*BREAK-ON-SIGNALS* - SYMBOL-*COMPILE-FILE-PATHNAME* SYMBOL-*COMPILE-FILE-TRUENAME* - SYMBOL-*COMPILE-PRINT* SYMBOL-*COMPILE-VERBOSE* SYMBOL-*DEBUG-IO* - SYMBOL-*DEBUGGER-HOOK* SYMBOL-*DEFAULT-PATHNAME-DEFAULTS* - SYMBOL-*ERROR-OUTPUT* SYMBOL-*FEATURES* SYMBOL-*GENSYM-COUNTER* - SYMBOL-*LOAD-PATHNAME* SYMBOL-*LOAD-PRINT* SYMBOL-*LOAD-TRUENAME* - SYMBOL-*LOAD-VERBOSE* SYMBOL-*MACROEXPAND-HOOK* SYMBOL-*MODULES* - SYMBOL-*PACKAGE* SYMBOL-*PRINT-ARRAY* SYMBOL-*PRINT-BASE* - SYMBOL-*PRINT-CASE* SYMBOL-*PRINT-CIRCLE* SYMBOL-*PRINT-ESCAPE* - SYMBOL-*PRINT-GENSYM* SYMBOL-*PRINT-LENGTH* SYMBOL-*PRINT-LEVEL* - SYMBOL-*PRINT-LINES* SYMBOL-*PRINT-MISER-WIDTH* - SYMBOL-*PRINT-PPRINT-DISPATCH* SYMBOL-*PRINT-PRETTY* - SYMBOL-*PRINT-RADIX* SYMBOL-*PRINT-READABLY* - SYMBOL-*PRINT-RIGHT-MARGIN* SYMBOL-*QUERY-IO* SYMBOL-*RANDOM-STATE* - SYMBOL-*READ-BASE* SYMBOL-*READ-DEFAULT-FLOAT-FORMAT* - SYMBOL-*READ-EVAL* SYMBOL-*READ-SUPPRESS* SYMBOL-*READTABLE* - SYMBOL-*STANDARD-INPUT* SYMBOL-*STANDARD-OUTPUT* SYMBOL-*TERMINAL-IO* - SYMBOL-*TRACE-OUTPUT* SYMBOL-+ SYMBOL-++ SYMBOL-+++ SYMBOL-- SYMBOL-/ - SYMBOL-// SYMBOL-/// SYMBOL-/= SYMBOL-1+ SYMBOL-1- SYMBOL-< SYMBOL-<= - SYMBOL-= SYMBOL-> SYMBOL->= SYMBOL-ABORT SYMBOL-ABS SYMBOL-ACONS - SYMBOL-ACOS SYMBOL-ACOSH SYMBOL-ADD-METHOD SYMBOL-ADJOIN - SYMBOL-ADJUST-ARRAY SYMBOL-ADJUSTABLE-ARRAY-P SYMBOL-ALLOCATE-INSTANCE - SYMBOL-ALPHA-CHAR-P SYMBOL-ALPHANUMERICP SYMBOL-AND SYMBOL-APPEND - SYMBOL-APPLY SYMBOL-APROPOS SYMBOL-APROPOS-LIST SYMBOL-AREF - SYMBOL-ARITHMETIC-ERROR SYMBOL-ARITHMETIC-ERROR-OPERANDS - SYMBOL-ARITHMETIC-ERROR-OPERATION SYMBOL-ARRAY SYMBOL-ARRAY-DIMENSION - SYMBOL-ARRAY-DIMENSION-LIMIT SYMBOL-ARRAY-DIMENSIONS - SYMBOL-ARRAY-DISPLACEMENT SYMBOL-ARRAY-ELEMENT-TYPE - SYMBOL-ARRAY-HAS-FILL-POINTER-P SYMBOL-ARRAY-IN-BOUNDS-P - SYMBOL-ARRAY-RANK SYMBOL-ARRAY-RANK-LIMIT SYMBOL-ARRAY-ROW-MAJOR-INDEX - SYMBOL-ARRAY-TOTAL-SIZE SYMBOL-ARRAY-TOTAL-SIZE-LIMIT SYMBOL-ARRAYP - SYMBOL-ASH SYMBOL-ASIN SYMBOL-ASINH SYMBOL-ASSERT SYMBOL-ASSOC - SYMBOL-ASSOC-IF SYMBOL-ASSOC-IF-NOT SYMBOL-ATAN SYMBOL-ATANH - SYMBOL-ATOM SYMBOL-BASE-CHAR SYMBOL-BASE-STRING SYMBOL-BIGNUM - SYMBOL-BIT SYMBOL-BIT-AND SYMBOL-BIT-ANDC1 SYMBOL-BIT-ANDC2 - SYMBOL-BIT-EQV SYMBOL-BIT-IOR SYMBOL-BIT-NAND SYMBOL-BIT-NOR - SYMBOL-BIT-NOT SYMBOL-BIT-ORC1 SYMBOL-BIT-ORC2 SYMBOL-BIT-VECTOR - SYMBOL-BIT-VECTOR-P SYMBOL-BIT-XOR SYMBOL-BLOCK SYMBOL-BOOLE - SYMBOL-BOOLE-1 SYMBOL-BOOLE-2 SYMBOL-BOOLE-AND SYMBOL-BOOLE-ANDC1 - SYMBOL-BOOLE-ANDC2 SYMBOL-BOOLE-C1 SYMBOL-BOOLE-C2 SYMBOL-BOOLE-CLR - SYMBOL-BOOLE-EQV SYMBOL-BOOLE-IOR SYMBOL-BOOLE-NAND SYMBOL-BOOLE-NOR - SYMBOL-BOOLE-ORC1 SYMBOL-BOOLE-ORC2 SYMBOL-BOOLE-SET SYMBOL-BOOLE-XOR - SYMBOL-BOOLEAN SYMBOL-BOTH-CASE-P SYMBOL-BOUNDP SYMBOL-BREAK - SYMBOL-BROADCAST-STREAM SYMBOL-BROADCAST-STREAM-STREAMS - SYMBOL-BUILT-IN-CLASS SYMBOL-BUTLAST SYMBOL-BYTE SYMBOL-BYTE-POSITION - SYMBOL-BYTE-SIZE SYMBOL-CAAAAR SYMBOL-CAAADR SYMBOL-CAAAR - SYMBOL-CAADAR SYMBOL-CAADDR SYMBOL-CAADR SYMBOL-CAAR SYMBOL-CADAAR - SYMBOL-CADADR SYMBOL-CADAR SYMBOL-CADDAR SYMBOL-CADDDR SYMBOL-CADDR - SYMBOL-CADR SYMBOL-CALL-ARGUMENTS-LIMIT SYMBOL-CALL-METHOD - SYMBOL-CALL-NEXT-METHOD SYMBOL-CAR SYMBOL-CASE SYMBOL-CATCH - SYMBOL-CCASE SYMBOL-CDAAAR SYMBOL-CDAADR SYMBOL-CDAAR SYMBOL-CDADAR - SYMBOL-CDADDR SYMBOL-CDADR SYMBOL-CDAR SYMBOL-CDDAAR SYMBOL-CDDADR - SYMBOL-CDDAR SYMBOL-CDDDAR SYMBOL-CDDDDR SYMBOL-CDDDR SYMBOL-CDDR - SYMBOL-CDR SYMBOL-CEILING SYMBOL-CELL-ERROR SYMBOL-CELL-ERROR-NAME - SYMBOL-CERROR SYMBOL-CHANGE-CLASS SYMBOL-CHAR SYMBOL-CHAR-CODE - SYMBOL-CHAR-CODE-LIMIT SYMBOL-CHAR-DOWNCASE SYMBOL-CHAR-EQUAL - SYMBOL-CHAR-GREATERP SYMBOL-CHAR-INT SYMBOL-CHAR-LESSP - SYMBOL-CHAR-NAME SYMBOL-CHAR-NOT-EQUAL SYMBOL-CHAR-NOT-GREATERP - SYMBOL-CHAR-NOT-LESSP SYMBOL-CHAR-UPCASE SYMBOL-CHAR/= SYMBOL-CHAR< - SYMBOL-CHAR<= SYMBOL-CHAR= SYMBOL-CHAR> SYMBOL-CHAR>= SYMBOL-CHARACTER - SYMBOL-CHARACTERP SYMBOL-CHECK-TYPE SYMBOL-CIS SYMBOL-CLASS - SYMBOL-CLASS-NAME SYMBOL-CLASS-OF SYMBOL-CLEAR-INPUT - SYMBOL-CLEAR-OUTPUT SYMBOL-CLOSE SYMBOL-CLRHASH SYMBOL-CODE-CHAR - SYMBOL-COERCE SYMBOL-COMPILATION-SPEED SYMBOL-COMPILE - SYMBOL-COMPILE-FILE SYMBOL-COMPILE-FILE-PATHNAME - SYMBOL-COMPILED-FUNCTION SYMBOL-COMPILED-FUNCTION-P - SYMBOL-COMPILER-MACRO SYMBOL-COMPILER-MACRO-FUNCTION SYMBOL-COMPLEMENT - SYMBOL-COMPLEX SYMBOL-COMPLEXP SYMBOL-COMPUTE-APPLICABLE-METHODS - SYMBOL-COMPUTE-RESTARTS SYMBOL-CONCATENATE SYMBOL-CONCATENATED-STREAM - SYMBOL-CONCATENATED-STREAM-STREAMS SYMBOL-COND SYMBOL-CONDITION - SYMBOL-CONJUGATE SYMBOL-CONS SYMBOL-CONSP SYMBOL-CONSTANTLY - SYMBOL-CONSTANTP SYMBOL-CONTINUE SYMBOL-CONTROL-ERROR - SYMBOL-COPY-ALIST SYMBOL-COPY-LIST SYMBOL-COPY-PPRINT-DISPATCH - SYMBOL-COPY-READTABLE SYMBOL-COPY-SEQ SYMBOL-COPY-STRUCTURE - SYMBOL-COPY-SYMBOL SYMBOL-COPY-TREE SYMBOL-COS SYMBOL-COSH - SYMBOL-COUNT SYMBOL-COUNT-IF SYMBOL-COUNT-IF-NOT SYMBOL-CTYPECASE - SYMBOL-DEBUG SYMBOL-DECF SYMBOL-DECLAIM SYMBOL-DECLARATION - SYMBOL-DECLARE SYMBOL-DECODE-FLOAT SYMBOL-DECODE-UNIVERSAL-TIME - SYMBOL-DEFCLASS SYMBOL-DEFCONSTANT SYMBOL-DEFGENERIC - SYMBOL-DEFINE-COMPILER-MACRO SYMBOL-DEFINE-CONDITION - SYMBOL-DEFINE-METHOD-COMBINATION SYMBOL-DEFINE-MODIFY-MACRO - SYMBOL-DEFINE-SETF-EXPANDER SYMBOL-DEFINE-SYMBOL-MACRO SYMBOL-DEFMACRO - SYMBOL-DEFMETHOD SYMBOL-DEFPACKAGE SYMBOL-DEFPARAMETER SYMBOL-DEFSETF - SYMBOL-DEFSTRUCT SYMBOL-DEFTYPE SYMBOL-DEFUN SYMBOL-DEFVAR - SYMBOL-DELETE SYMBOL-DELETE-DUPLICATES SYMBOL-DELETE-FILE - SYMBOL-DELETE-IF SYMBOL-DELETE-IF-NOT SYMBOL-DELETE-PACKAGE - SYMBOL-DENOMINATOR SYMBOL-DEPOSIT-FIELD SYMBOL-DESCRIBE - SYMBOL-DESCRIBE-OBJECT SYMBOL-DESTRUCTURING-BIND SYMBOL-DIGIT-CHAR - SYMBOL-DIGIT-CHAR-P SYMBOL-DIRECTORY SYMBOL-DIRECTORY-NAMESTRING - SYMBOL-DISASSEMBLE SYMBOL-DIVISION-BY-ZERO SYMBOL-DO SYMBOL-DO* - SYMBOL-DO-ALL-SYMBOLS SYMBOL-DO-EXTERNAL-SYMBOLS SYMBOL-DO-SYMBOLS - SYMBOL-DOCUMENTATION SYMBOL-DOLIST SYMBOL-DOTIMES SYMBOL-DOUBLE-FLOAT - SYMBOL-DOUBLE-FLOAT-EPSILON SYMBOL-DOUBLE-FLOAT-NEGATIVE-EPSILON - SYMBOL-DPB SYMBOL-DRIBBLE SYMBOL-DYNAMIC-EXTENT SYMBOL-ECASE - SYMBOL-ECHO-STREAM SYMBOL-ECHO-STREAM-INPUT-STREAM - SYMBOL-ECHO-STREAM-OUTPUT-STREAM SYMBOL-ED SYMBOL-EIGHTH SYMBOL-ELT - SYMBOL-ENCODE-UNIVERSAL-TIME SYMBOL-END-OF-FILE SYMBOL-ENDP - SYMBOL-ENOUGH-NAMESTRING SYMBOL-ENSURE-DIRECTORIES-EXIST - SYMBOL-ENSURE-GENERIC-FUNCTION SYMBOL-EQ SYMBOL-EQL SYMBOL-EQUAL - SYMBOL-EQUALP SYMBOL-ERROR SYMBOL-ETYPECASE SYMBOL-EVAL - SYMBOL-EVAL-WHEN SYMBOL-EVENP SYMBOL-EVERY SYMBOL-EXP SYMBOL-EXPORT - SYMBOL-EXPT SYMBOL-EXTENDED-CHAR SYMBOL-FBOUNDP SYMBOL-FCEILING - SYMBOL-FDEFINITION SYMBOL-FFLOOR SYMBOL-FIFTH SYMBOL-FILE-AUTHOR - SYMBOL-FILE-ERROR SYMBOL-FILE-ERROR-PATHNAME SYMBOL-FILE-LENGTH - SYMBOL-FILE-NAMESTRING SYMBOL-FILE-POSITION SYMBOL-FILE-STREAM - SYMBOL-FILE-STRING-LENGTH SYMBOL-FILE-WRITE-DATE SYMBOL-FILL - SYMBOL-FILL-POINTER SYMBOL-FIND SYMBOL-FIND-ALL-SYMBOLS - SYMBOL-FIND-CLASS SYMBOL-FIND-IF SYMBOL-FIND-IF-NOT SYMBOL-FIND-METHOD - SYMBOL-FIND-PACKAGE SYMBOL-FIND-RESTART SYMBOL-FIND-SYMBOL - SYMBOL-FINISH-OUTPUT SYMBOL-FIRST SYMBOL-FIXNUM SYMBOL-FLET - SYMBOL-FLOAT SYMBOL-FLOAT-DIGITS SYMBOL-FLOAT-PRECISION - SYMBOL-FLOAT-RADIX SYMBOL-FLOAT-SIGN SYMBOL-FLOATING-POINT-INEXACT - SYMBOL-FLOATING-POINT-INVALID-OPERATION SYMBOL-FLOATING-POINT-OVERFLOW - SYMBOL-FLOATING-POINT-UNDERFLOW SYMBOL-FLOATP SYMBOL-FLOOR - SYMBOL-FMAKUNBOUND SYMBOL-FORCE-OUTPUT SYMBOL-FORMAT SYMBOL-FORMATTER - SYMBOL-FOURTH SYMBOL-FRESH-LINE SYMBOL-FROUND SYMBOL-FTRUNCATE - SYMBOL-FTYPE SYMBOL-FUNCALL SYMBOL-FUNCTION SYMBOL-FUNCTION-KEYWORDS - SYMBOL-FUNCTION-LAMBDA-EXPRESSION SYMBOL-FUNCTIONP SYMBOL-GCD - SYMBOL-GENERIC-FUNCTION SYMBOL-GENSYM SYMBOL-GENTEMP SYMBOL-GET - SYMBOL-GET-DECODED-TIME SYMBOL-GET-DISPATCH-MACRO-CHARACTER - SYMBOL-GET-INTERNAL-REAL-TIME SYMBOL-GET-INTERNAL-RUN-TIME - SYMBOL-GET-MACRO-CHARACTER SYMBOL-GET-OUTPUT-STREAM-STRING - SYMBOL-GET-PROPERTIES SYMBOL-GET-SETF-EXPANSION - SYMBOL-GET-UNIVERSAL-TIME SYMBOL-GETF SYMBOL-GETHASH SYMBOL-GO - SYMBOL-GRAPHIC-CHAR-P SYMBOL-HANDLER-BIND SYMBOL-HANDLER-CASE - SYMBOL-HASH-TABLE SYMBOL-HASH-TABLE-COUNT SYMBOL-HASH-TABLE-P - SYMBOL-HASH-TABLE-REHASH-SIZE SYMBOL-HASH-TABLE-REHASH-THRESHOLD - SYMBOL-HASH-TABLE-SIZE SYMBOL-HASH-TABLE-TEST SYMBOL-HOST-NAMESTRING - SYMBOL-IDENTITY SYMBOL-IF SYMBOL-IGNORABLE SYMBOL-IGNORE - SYMBOL-IGNORE-ERRORS SYMBOL-IMAGPART SYMBOL-IMPORT SYMBOL-IN-PACKAGE - SYMBOL-INCF SYMBOL-INITIALIZE-INSTANCE SYMBOL-INLINE - SYMBOL-INPUT-STREAM-P SYMBOL-INSPECT SYMBOL-INTEGER - SYMBOL-INTEGER-DECODE-FLOAT SYMBOL-INTEGER-LENGTH SYMBOL-INTEGERP - SYMBOL-INTERACTIVE-STREAM-P SYMBOL-INTERN - SYMBOL-INTERNAL-TIME-UNITS-PER-SECOND SYMBOL-INTERSECTION - SYMBOL-INVALID-METHOD-ERROR SYMBOL-INVOKE-DEBUGGER - SYMBOL-INVOKE-RESTART SYMBOL-INVOKE-RESTART-INTERACTIVELY SYMBOL-ISQRT - SYMBOL-KEYWORD SYMBOL-KEYWORDP SYMBOL-LABELS SYMBOL-LAMBDA - SYMBOL-LAMBDA-LIST-KEYWORDS SYMBOL-LAMBDA-PARAMETERS-LIMIT SYMBOL-LAST - SYMBOL-LCM SYMBOL-LDB SYMBOL-LDB-TEST SYMBOL-LDIFF - SYMBOL-LEAST-NEGATIVE-DOUBLE-FLOAT SYMBOL-LEAST-NEGATIVE-LONG-FLOAT - SYMBOL-LEAST-NEGATIVE-NORMALIZED-DOUBLE-FLOAT - SYMBOL-LEAST-NEGATIVE-NORMALIZED-LONG-FLOAT - SYMBOL-LEAST-NEGATIVE-NORMALIZED-SHORT-FLOAT - SYMBOL-LEAST-NEGATIVE-NORMALIZED-SINGLE-FLOAT - SYMBOL-LEAST-NEGATIVE-SHORT-FLOAT SYMBOL-LEAST-NEGATIVE-SINGLE-FLOAT - SYMBOL-LEAST-POSITIVE-DOUBLE-FLOAT SYMBOL-LEAST-POSITIVE-LONG-FLOAT - SYMBOL-LEAST-POSITIVE-NORMALIZED-DOUBLE-FLOAT - SYMBOL-LEAST-POSITIVE-NORMALIZED-LONG-FLOAT - SYMBOL-LEAST-POSITIVE-NORMALIZED-SHORT-FLOAT - SYMBOL-LEAST-POSITIVE-NORMALIZED-SINGLE-FLOAT - SYMBOL-LEAST-POSITIVE-SHORT-FLOAT SYMBOL-LEAST-POSITIVE-SINGLE-FLOAT - SYMBOL-LENGTH SYMBOL-LET SYMBOL-LET* SYMBOL-LISP-IMPLEMENTATION-TYPE - SYMBOL-LISP-IMPLEMENTATION-VERSION SYMBOL-LIST SYMBOL-LIST* - SYMBOL-LIST-ALL-PACKAGES SYMBOL-LIST-LENGTH SYMBOL-LISTEN SYMBOL-LISTP - SYMBOL-LOAD SYMBOL-LOAD-LOGICAL-PATHNAME-TRANSLATIONS - SYMBOL-LOAD-TIME-VALUE SYMBOL-LOCALLY SYMBOL-LOG SYMBOL-LOGAND - SYMBOL-LOGANDC1 SYMBOL-LOGANDC2 SYMBOL-LOGBITP SYMBOL-LOGCOUNT - SYMBOL-LOGEQV SYMBOL-LOGICAL-PATHNAME - SYMBOL-LOGICAL-PATHNAME-TRANSLATIONS SYMBOL-LOGIOR SYMBOL-LOGNAND - SYMBOL-LOGNOR SYMBOL-LOGNOT SYMBOL-LOGORC1 SYMBOL-LOGORC2 - SYMBOL-LOGTEST SYMBOL-LOGXOR SYMBOL-LONG-FLOAT - SYMBOL-LONG-FLOAT-EPSILON SYMBOL-LONG-FLOAT-NEGATIVE-EPSILON - SYMBOL-LONG-SITE-NAME SYMBOL-LOOP SYMBOL-LOOP-FINISH - SYMBOL-LOWER-CASE-P SYMBOL-MACHINE-INSTANCE SYMBOL-MACHINE-TYPE - SYMBOL-MACHINE-VERSION SYMBOL-MACRO-FUNCTION SYMBOL-MACROEXPAND - SYMBOL-MACROEXPAND-1 SYMBOL-MACROLET SYMBOL-MAKE-ARRAY - SYMBOL-MAKE-BROADCAST-STREAM SYMBOL-MAKE-CONCATENATED-STREAM - SYMBOL-MAKE-CONDITION SYMBOL-MAKE-DISPATCH-MACRO-CHARACTER - SYMBOL-MAKE-ECHO-STREAM SYMBOL-MAKE-HASH-TABLE SYMBOL-MAKE-INSTANCE - SYMBOL-MAKE-INSTANCES-OBSOLETE SYMBOL-MAKE-LIST SYMBOL-MAKE-LOAD-FORM - SYMBOL-MAKE-LOAD-FORM-SAVING-SLOTS SYMBOL-MAKE-METHOD - SYMBOL-MAKE-PACKAGE SYMBOL-MAKE-PATHNAME SYMBOL-MAKE-RANDOM-STATE - SYMBOL-MAKE-SEQUENCE SYMBOL-MAKE-STRING - SYMBOL-MAKE-STRING-INPUT-STREAM SYMBOL-MAKE-STRING-OUTPUT-STREAM - SYMBOL-MAKE-SYMBOL SYMBOL-MAKE-SYNONYM-STREAM - SYMBOL-MAKE-TWO-WAY-STREAM SYMBOL-MAKUNBOUND SYMBOL-MAP - SYMBOL-MAP-INTO SYMBOL-MAPC SYMBOL-MAPCAN SYMBOL-MAPCAR SYMBOL-MAPCON - SYMBOL-MAPHASH SYMBOL-MAPL SYMBOL-MAPLIST SYMBOL-MASK-FIELD SYMBOL-MAX - SYMBOL-MEMBER SYMBOL-MEMBER-IF SYMBOL-MEMBER-IF-NOT SYMBOL-MERGE - SYMBOL-MERGE-PATHNAMES SYMBOL-METHOD SYMBOL-METHOD-COMBINATION - SYMBOL-METHOD-COMBINATION-ERROR SYMBOL-METHOD-QUALIFIERS SYMBOL-MIN - SYMBOL-MINUSP SYMBOL-MISMATCH SYMBOL-MOD - SYMBOL-MOST-NEGATIVE-DOUBLE-FLOAT SYMBOL-MOST-NEGATIVE-FIXNUM - SYMBOL-MOST-NEGATIVE-LONG-FLOAT SYMBOL-MOST-NEGATIVE-SHORT-FLOAT - SYMBOL-MOST-NEGATIVE-SINGLE-FLOAT SYMBOL-MOST-POSITIVE-DOUBLE-FLOAT - SYMBOL-MOST-POSITIVE-FIXNUM SYMBOL-MOST-POSITIVE-LONG-FLOAT - SYMBOL-MOST-POSITIVE-SHORT-FLOAT SYMBOL-MOST-POSITIVE-SINGLE-FLOAT - SYMBOL-MUFFLE-WARNING SYMBOL-MULTIPLE-VALUE-BIND - SYMBOL-MULTIPLE-VALUE-CALL SYMBOL-MULTIPLE-VALUE-LIST - SYMBOL-MULTIPLE-VALUE-PROG1 SYMBOL-MULTIPLE-VALUE-SETQ - SYMBOL-MULTIPLE-VALUES-LIMIT SYMBOL-NAME-CHAR SYMBOL-NAMESTRING - SYMBOL-NBUTLAST SYMBOL-NCONC SYMBOL-NEXT-METHOD-P SYMBOL-NIL - SYMBOL-NINTERSECTION SYMBOL-NINTH SYMBOL-NO-APPLICABLE-METHOD - SYMBOL-NO-NEXT-METHOD SYMBOL-NOT SYMBOL-NOTANY SYMBOL-NOTEVERY - SYMBOL-NOTINLINE SYMBOL-NRECONC SYMBOL-NREVERSE SYMBOL-NSET-DIFFERENCE - SYMBOL-NSET-EXCLUSIVE-OR SYMBOL-NSTRING-CAPITALIZE - SYMBOL-NSTRING-DOWNCASE SYMBOL-NSTRING-UPCASE SYMBOL-NSUBLIS - SYMBOL-NSUBST SYMBOL-NSUBST-IF SYMBOL-NSUBST-IF-NOT SYMBOL-NSUBSTITUTE - SYMBOL-NSUBSTITUTE-IF SYMBOL-NSUBSTITUTE-IF-NOT SYMBOL-NTH - SYMBOL-NTH-VALUE SYMBOL-NTHCDR SYMBOL-NULL SYMBOL-NUMBER - SYMBOL-NUMBERP SYMBOL-NUMERATOR SYMBOL-NUNION SYMBOL-ODDP SYMBOL-OPEN - SYMBOL-OPEN-STREAM-P SYMBOL-OPTIMIZE SYMBOL-OR SYMBOL-OTHERWISE - SYMBOL-OUTPUT-STREAM-P SYMBOL-PACKAGE SYMBOL-PACKAGE-ERROR - SYMBOL-PACKAGE-ERROR-PACKAGE SYMBOL-PACKAGE-NAME - SYMBOL-PACKAGE-NICKNAMES SYMBOL-PACKAGE-SHADOWING-SYMBOLS - SYMBOL-PACKAGE-USE-LIST SYMBOL-PACKAGE-USED-BY-LIST SYMBOL-PACKAGEP - SYMBOL-PAIRLIS SYMBOL-PARSE-ERROR SYMBOL-PARSE-INTEGER - SYMBOL-PARSE-NAMESTRING SYMBOL-PATHNAME SYMBOL-PATHNAME-DEVICE - SYMBOL-PATHNAME-DIRECTORY SYMBOL-PATHNAME-HOST SYMBOL-PATHNAME-MATCH-P - SYMBOL-PATHNAME-NAME SYMBOL-PATHNAME-TYPE SYMBOL-PATHNAME-VERSION - SYMBOL-PATHNAMEP SYMBOL-PEEK-CHAR SYMBOL-PHASE SYMBOL-PI SYMBOL-PLUSP - SYMBOL-POP SYMBOL-POSITION SYMBOL-POSITION-IF SYMBOL-POSITION-IF-NOT - SYMBOL-PPRINT SYMBOL-PPRINT-DISPATCH - SYMBOL-PPRINT-EXIT-IF-LIST-EXHAUSTED SYMBOL-PPRINT-FILL - SYMBOL-PPRINT-INDENT SYMBOL-PPRINT-LINEAR SYMBOL-PPRINT-LOGICAL-BLOCK - SYMBOL-PPRINT-NEWLINE SYMBOL-PPRINT-POP SYMBOL-PPRINT-TAB - SYMBOL-PPRINT-TABULAR SYMBOL-PRIN1 SYMBOL-PRIN1-TO-STRING SYMBOL-PRINC - SYMBOL-PRINC-TO-STRING SYMBOL-PRINT SYMBOL-PRINT-NOT-READABLE - SYMBOL-PRINT-NOT-READABLE-OBJECT SYMBOL-PRINT-OBJECT - SYMBOL-PRINT-UNREADABLE-OBJECT SYMBOL-PROBE-FILE SYMBOL-PROCLAIM - SYMBOL-PROG SYMBOL-PROG* SYMBOL-PROG1 SYMBOL-PROG2 SYMBOL-PROGN - SYMBOL-PROGRAM-ERROR SYMBOL-PROGV SYMBOL-PROVIDE SYMBOL-PSETF - SYMBOL-PSETQ SYMBOL-PUSH SYMBOL-PUSHNEW SYMBOL-QUOTE SYMBOL-RANDOM - SYMBOL-RANDOM-STATE SYMBOL-RANDOM-STATE-P SYMBOL-RASSOC - SYMBOL-RASSOC-IF SYMBOL-RASSOC-IF-NOT SYMBOL-RATIO SYMBOL-RATIONAL - SYMBOL-RATIONALIZE SYMBOL-RATIONALP SYMBOL-READ SYMBOL-READ-BYTE - SYMBOL-READ-CHAR SYMBOL-READ-CHAR-NO-HANG SYMBOL-READ-DELIMITED-LIST - SYMBOL-READ-FROM-STRING SYMBOL-READ-LINE - SYMBOL-READ-PRESERVING-WHITESPACE SYMBOL-READ-SEQUENCE - SYMBOL-READER-ERROR SYMBOL-READTABLE SYMBOL-READTABLE-CASE - SYMBOL-READTABLEP SYMBOL-REAL SYMBOL-REALP SYMBOL-REALPART - SYMBOL-REDUCE SYMBOL-REINITIALIZE-INSTANCE SYMBOL-REM SYMBOL-REMF - SYMBOL-REMHASH SYMBOL-REMOVE SYMBOL-REMOVE-DUPLICATES SYMBOL-REMOVE-IF - SYMBOL-REMOVE-IF-NOT SYMBOL-REMOVE-METHOD SYMBOL-REMPROP - SYMBOL-RENAME-FILE SYMBOL-RENAME-PACKAGE SYMBOL-REPLACE SYMBOL-REQUIRE - SYMBOL-REST SYMBOL-RESTART SYMBOL-RESTART-BIND SYMBOL-RESTART-CASE - SYMBOL-RESTART-NAME SYMBOL-RETURN SYMBOL-RETURN-FROM SYMBOL-REVAPPEND - SYMBOL-REVERSE SYMBOL-ROOM SYMBOL-ROTATEF SYMBOL-ROUND - SYMBOL-ROW-MAJOR-AREF SYMBOL-RPLACA SYMBOL-RPLACD SYMBOL-SAFETY - SYMBOL-SATISFIES SYMBOL-SBIT SYMBOL-SCALE-FLOAT SYMBOL-SCHAR - SYMBOL-SEARCH SYMBOL-SECOND SYMBOL-SEQUENCE SYMBOL-SERIOUS-CONDITION - SYMBOL-SET SYMBOL-SET-DIFFERENCE SYMBOL-SET-DISPATCH-MACRO-CHARACTER - SYMBOL-SET-EXCLUSIVE-OR SYMBOL-SET-MACRO-CHARACTER - SYMBOL-SET-PPRINT-DISPATCH SYMBOL-SET-SYNTAX-FROM-CHAR SYMBOL-SETF - SYMBOL-SETQ SYMBOL-SEVENTH SYMBOL-SHADOW SYMBOL-SHADOWING-IMPORT - SYMBOL-SHARED-INITIALIZE SYMBOL-SHIFTF SYMBOL-SHORT-FLOAT - SYMBOL-SHORT-FLOAT-EPSILON SYMBOL-SHORT-FLOAT-NEGATIVE-EPSILON - SYMBOL-SHORT-SITE-NAME SYMBOL-SIGNAL SYMBOL-SIGNED-BYTE SYMBOL-SIGNUM - SYMBOL-SIMPLE-ARRAY SYMBOL-SIMPLE-BASE-STRING SYMBOL-SIMPLE-BIT-VECTOR - SYMBOL-SIMPLE-BIT-VECTOR-P SYMBOL-SIMPLE-CONDITION - SYMBOL-SIMPLE-CONDITION-FORMAT-ARGUMENTS - SYMBOL-SIMPLE-CONDITION-FORMAT-CONTROL SYMBOL-SIMPLE-ERROR - SYMBOL-SIMPLE-STRING SYMBOL-SIMPLE-STRING-P SYMBOL-SIMPLE-TYPE-ERROR - SYMBOL-SIMPLE-VECTOR SYMBOL-SIMPLE-VECTOR-P SYMBOL-SIMPLE-WARNING - SYMBOL-SIN SYMBOL-SINGLE-FLOAT SYMBOL-SINGLE-FLOAT-EPSILON - SYMBOL-SINGLE-FLOAT-NEGATIVE-EPSILON SYMBOL-SINH SYMBOL-SIXTH - SYMBOL-SLEEP -Test SYMBOL-SLOT-BOUNDP failed -Form: (TEST-IF-NOT-IN-CL-PACKAGE "slot-boundp") -Expected value: NIL -Actual value: (COMPILER-MACRO). - SYMBOL-SLOT-EXISTS-P SYMBOL-SLOT-MAKUNBOUND SYMBOL-SLOT-MISSING - SYMBOL-SLOT-UNBOUND -Test SYMBOL-SLOT-VALUE failed -Form: (TEST-IF-NOT-IN-CL-PACKAGE "slot-value") -Expected value: NIL -Actual value: (COMPILER-MACRO). - SYMBOL-SOFTWARE-TYPE SYMBOL-SOFTWARE-VERSION SYMBOL-SOME SYMBOL-SORT - SYMBOL-SPACE SYMBOL-SPECIAL SYMBOL-SPECIAL-OPERATOR-P SYMBOL-SPEED - SYMBOL-SQRT SYMBOL-STABLE-SORT SYMBOL-STANDARD SYMBOL-STANDARD-CHAR - SYMBOL-STANDARD-CHAR-P SYMBOL-STANDARD-CLASS - SYMBOL-STANDARD-GENERIC-FUNCTION SYMBOL-STANDARD-METHOD - SYMBOL-STANDARD-OBJECT SYMBOL-STEP SYMBOL-STORAGE-CONDITION - SYMBOL-STORE-VALUE SYMBOL-STREAM SYMBOL-STREAM-ELEMENT-TYPE - SYMBOL-STREAM-ERROR SYMBOL-STREAM-ERROR-STREAM - SYMBOL-STREAM-EXTERNAL-FORMAT SYMBOL-STREAMP SYMBOL-STRING - SYMBOL-STRING-CAPITALIZE SYMBOL-STRING-DOWNCASE SYMBOL-STRING-EQUAL - SYMBOL-STRING-GREATERP SYMBOL-STRING-LEFT-TRIM SYMBOL-STRING-LESSP - SYMBOL-STRING-NOT-EQUAL SYMBOL-STRING-NOT-GREATERP - SYMBOL-STRING-NOT-LESSP SYMBOL-STRING-RIGHT-TRIM SYMBOL-STRING-STREAM - SYMBOL-STRING-TRIM SYMBOL-STRING-UPCASE SYMBOL-STRING/= SYMBOL-STRING< - SYMBOL-STRING<= SYMBOL-STRING= SYMBOL-STRING> SYMBOL-STRING>= - SYMBOL-STRINGP SYMBOL-STRUCTURE SYMBOL-STRUCTURE-CLASS - SYMBOL-STRUCTURE-OBJECT SYMBOL-STYLE-WARNING SYMBOL-SUBLIS - SYMBOL-SUBSEQ SYMBOL-SUBSETP SYMBOL-SUBST SYMBOL-SUBST-IF - SYMBOL-SUBST-IF-NOT SYMBOL-SUBSTITUTE SYMBOL-SUBSTITUTE-IF - SYMBOL-SUBSTITUTE-IF-NOT SYMBOL-SUBTYPEP SYMBOL-SVREF SYMBOL-SXHASH - SYMBOL-SYMBOL SYMBOL-SYMBOL-FUNCTION SYMBOL-SYMBOL-MACROLET - SYMBOL-SYMBOL-NAME SYMBOL-SYMBOL-PACKAGE SYMBOL-SYMBOL-PLIST - SYMBOL-SYMBOL-VALUE SYMBOL-SYMBOLP SYMBOL-SYNONYM-STREAM - SYMBOL-SYNONYM-STREAM-SYMBOL SYMBOL-T SYMBOL-TAGBODY SYMBOL-TAILP - SYMBOL-TAN SYMBOL-TANH SYMBOL-TENTH SYMBOL-TERPRI SYMBOL-THE - SYMBOL-THIRD SYMBOL-THROW SYMBOL-TIME SYMBOL-TRACE - SYMBOL-TRANSLATE-LOGICAL-PATHNAME SYMBOL-TRANSLATE-PATHNAME - SYMBOL-TREE-EQUAL SYMBOL-TRUENAME SYMBOL-TRUNCATE - SYMBOL-TWO-WAY-STREAM SYMBOL-TWO-WAY-STREAM-INPUT-STREAM - SYMBOL-TWO-WAY-STREAM-OUTPUT-STREAM SYMBOL-TYPE SYMBOL-TYPE-ERROR - SYMBOL-TYPE-ERROR-DATUM SYMBOL-TYPE-ERROR-EXPECTED-TYPE SYMBOL-TYPE-OF - SYMBOL-TYPECASE SYMBOL-TYPEP SYMBOL-UNBOUND-SLOT - SYMBOL-UNBOUND-SLOT-INSTANCE SYMBOL-UNBOUND-VARIABLE - SYMBOL-UNDEFINED-FUNCTION SYMBOL-UNEXPORT SYMBOL-UNINTERN SYMBOL-UNION - SYMBOL-UNLESS SYMBOL-UNREAD-CHAR SYMBOL-UNSIGNED-BYTE SYMBOL-UNTRACE - SYMBOL-UNUSE-PACKAGE SYMBOL-UNWIND-PROTECT - SYMBOL-UPDATE-INSTANCE-FOR-DIFFERENT-CLASS - SYMBOL-UPDATE-INSTANCE-FOR-REDEFINED-CLASS - SYMBOL-UPGRADED-ARRAY-ELEMENT-TYPE SYMBOL-UPGRADED-COMPLEX-PART-TYPE - SYMBOL-UPPER-CASE-P SYMBOL-USE-PACKAGE SYMBOL-USE-VALUE - SYMBOL-USER-HOMEDIR-PATHNAME SYMBOL-VALUES SYMBOL-VALUES-LIST - SYMBOL-VARIABLE SYMBOL-VECTOR SYMBOL-VECTOR-POP SYMBOL-VECTOR-PUSH - SYMBOL-VECTOR-PUSH-EXTEND SYMBOL-VECTORP SYMBOL-WARN SYMBOL-WARNING - SYMBOL-WHEN SYMBOL-WILD-PATHNAME-P SYMBOL-WITH-ACCESSORS - SYMBOL-WITH-COMPILATION-UNIT SYMBOL-WITH-CONDITION-RESTARTS - SYMBOL-WITH-HASH-TABLE-ITERATOR SYMBOL-WITH-INPUT-FROM-STRING - SYMBOL-WITH-OPEN-FILE SYMBOL-WITH-OPEN-STREAM - SYMBOL-WITH-OUTPUT-TO-STRING SYMBOL-WITH-PACKAGE-ITERATOR - SYMBOL-WITH-SIMPLE-RESTART SYMBOL-WITH-SLOTS - SYMBOL-WITH-STANDARD-IO-SYNTAX SYMBOL-WRITE SYMBOL-WRITE-BYTE - SYMBOL-WRITE-CHAR SYMBOL-WRITE-LINE SYMBOL-WRITE-SEQUENCE - SYMBOL-WRITE-STRING SYMBOL-WRITE-TO-STRING SYMBOL-Y-OR-N-P - SYMBOL-YES-OR-NO-P SYMBOL-ZEROP KEYWORD-BEHAVIOR -Test SPECIAL-OPERATOR-P.1 failed -Form: (LOOP - FOR - S - IN - +SPECIAL-OPERATORS+ - UNLESS - (SPECIAL-OPERATOR-P S) - COLLECT - S) -Expected value: NIL -Actual value: (SYMBOL-MACROLET). -Test SPECIAL-OPERATOR-P.2 failed -Form: (LET ((P (FIND-PACKAGE "CL"))) - (LOOP - FOR - NAME - IN - *CL-SYMBOL-NAMES* - UNLESS - (OR (MEMBER NAME +SPECIAL-OPERATORS+ :TEST #'STRING=) - (LET ((SYM (FIND-SYMBOL NAME P))) - (OR (NOT (SPECIAL-OPERATOR-P SYM)) - (MACRO-FUNCTION SYM)))) - COLLECT - NAME)) -Expected value: NIL -Actual value: ("DECLARE"). - SPECIAL-OPERATOR-P.ORDER.1 SPECIAL-OPERATOR-P.ERROR.1 - SPECIAL-OPERATOR-P.ERROR.2 SPECIAL-OPERATOR-P.ERROR.3 KEYWORDP.1 - KEYWORDP.2 KEYWORDP.3 KEYWORDP.4 KEYWORDP.5 KEYWORDP.6 KEYWORDP.7 - KEYWORDP.8 KEYWORDP.9 KEYWORDP.10 KEYWORDP.12 KEYWORDP.ORDER.1 - KEYWORDP.ERROR.1 KEYWORDP.ERROR.2 KEYWORDP.ERROR.3 KEYWORDP.ERROR.4 - SYMBOL-NAME.1 SYMBOL-NAME.2 SYMBOL-NAME.3 SYMBOL-NAME.4 SYMBOL-NAME.5 - SYMBOL-NAME.6 SYMBOL-NAME.7 SYMBOL-NAME.ERROR.1 SYMBOL-NAME.ERROR.2 - MAKE-SYMBOL.1 MAKE-SYMBOL.2 MAKE-SYMBOL.3 MAKE-SYMBOL.4 MAKE-SYMBOL.5 - MAKE-SYMBOL.6 MAKE-SYMBOL.7 MAKE-SYMBOL.8 MAKE-SYMBOL.9 MAKE-SYMBOL.10 - MAKE-SYMBOL.ORDER.1 MAKE-SYMBOL.ERROR.1 MAKE-SYMBOL.ERROR.2 - MAKE-SYMBOL.ERROR.3 MAKE-SYMBOL.ERROR.4 MAKE-SYMBOL.ERROR.5 - MAKE-SYMBOL.ERROR.6 MAKE-SYMBOL.ERROR.7 MAKE-SYMBOL.ERROR.8 - MAKE-SYMBOL.ERROR.9 MAKE-SYMBOL.ERROR.10 MAKE-SYMBOL.ERROR.11 - COPY-SYMBOL.1 COPY-SYMBOL.2 COPY-SYMBOL.3 COPY-SYMBOL.4 COPY-SYMBOL.5 - COPY-SYMBOL.ERROR.1 COPY-SYMBOL.ERROR.2 GENSYM.1 GENSYM.2 GENSYM.3 - GENSYM.4 GENSYM.5 GENSYM.6 GENSYM.7 GENSYM.8 GENSYM.9 GENSYM.10 - GENSYM.11 GENSYM.12 GENSYM.13 GENSYM.ERROR.1 GENSYM.ERROR.2 - GENSYM.ERROR.3 GENSYM.ERROR.4 GENSYM.ERROR.5 GENSYM.ERROR.6 - GENSYM.ERROR.7 GENSYM.ERROR.8 -Test CL-FUNCTION-SYMBOLS.1 failed -Form: (LOOP - FOR - S - IN - (APPEND *CL-FUNCTION-SYMBOLS* *CL-ACCESSOR-SYMBOLS*) - WHEN - (OR (NOT (FBOUNDP S)) (MACRO-FUNCTION S) (SPECIAL-OPERATOR-P S) - (NOT (SYMBOL-FUNCTION S))) - COLLECT - S) -Expected value: NIL -Actual value: (COPY-PPRINT-DISPATCH FUNCTION-LAMBDA-EXPRESSION - MAKE-LOAD-FORM-SAVING-SLOTS PPRINT-DISPATCH - PPRINT-FILL PPRINT-INDENT PPRINT-LINEAR - PPRINT-NEWLINE PPRINT-TAB PPRINT-TABULAR - SET-PPRINT-DISPATCH UPGRADED-COMPLEX-PART-TYPE - FDEFINITION MASK-FIELD). -Test CL-MACRO-SYMBOLS.1 failed -Form: (LOOP - FOR - S - IN - *CL-MACRO-SYMBOLS* - WHEN - (OR (NOT (FBOUNDP S)) (NOT (MACRO-FUNCTION S))) - COLLECT - S) -Expected value: NIL -Actual value: (DEFINE-SETF-EXPANDER DEFINE-SYMBOL-MACRO FORMATTER - PPRINT-LOGICAL-BLOCK PRINT-UNREADABLE-OBJECT). - CL-CONSTANT-SYMBOLS.1 -Test CL-VARIABLE-SYMBOLS.1 failed -Form: (LOOP - FOR - S - IN - *CL-VARIABLE-SYMBOLS* - WHEN - (NOT (BOUNDP S)) - COLLECT - S) -Expected value: NIL -Actual value: (*COMPILE-FILE-PATHNAME* *COMPILE-FILE-TRUENAME* - *READ-EVAL*). -Test CL-TYPES-THAT-ARE-CLASSES.1 failed -Form: (LOOP - FOR - S - IN - *CL-TYPES-THAT-ARE-CLASSES-SYMBOLS* - FOR - C - = - (FIND-CLASS S NIL) - UNLESS - (AND C (EQ (CLASS-NAME C) S) (TYPEP C 'CLASS)) - COLLECT - S) -Expected value: NIL -Actual value: (BROADCAST-STREAM CONCATENATED-STREAM ECHO-STREAM - FILE-STREAM FUNCTION HASH-TABLE LOGICAL-PATHNAME - PACKAGE PATHNAME RANDOM-STATE READTABLE STREAM - STRING-STREAM SYNONYM-STREAM TWO-WAY-STREAM). -Test CL-TYPES-THAT-ARE-CLASSES.2 failed -Form: (LOOP - FOR - S - IN - *CL-TYPES-THAT-ARE-CLASSES-SYMBOLS* - FOR - C - = - (FIND-CLASS S NIL NIL) - UNLESS - (AND C (EQ (CLASS-NAME C) S) (TYPEP C 'CLASS)) - COLLECT - S) -Expected value: NIL -Actual value: (BROADCAST-STREAM CONCATENATED-STREAM ECHO-STREAM - FILE-STREAM FUNCTION HASH-TABLE LOGICAL-PATHNAME - PACKAGE PATHNAME RANDOM-STATE READTABLE STREAM - STRING-STREAM SYNONYM-STREAM TWO-WAY-STREAM). -Test CL-TYPES-THAT-ARE-CLASSES.3 failed -Form: (LOOP - FOR - S - IN - *CL-TYPES-THAT-ARE-CLASSES-SYMBOLS* - FOR - C - = - (EVAL (LIST 'MACROLET - (LIST (LIST '%FOO '(&ENVIRONMENT ENV) - (LIST 'LIST ''QUOTE - (LIST* 'FIND-CLASS - (LIST 'QUOTE S) '(NIL ENV))))) - '(%FOO))) - UNLESS - (AND C (EQ (CLASS-NAME C) S) (TYPEP C 'CLASS)) - COLLECT - S) -Expected value: NIL -Actual value: (BROADCAST-STREAM CONCATENATED-STREAM ECHO-STREAM - FILE-STREAM FUNCTION HASH-TABLE LOGICAL-PATHNAME - PACKAGE PATHNAME RANDOM-STATE READTABLE STREAM - STRING-STREAM SYNONYM-STREAM TWO-WAY-STREAM). - SYMBOLP.ERROR.1 SYMBOLP.ERROR.2 SYMBOL-FUNCTION.ERROR.1 - SYMBOL-FUNCTION.ERROR.2 SYMBOL-PACKAGE.ERROR.1 SYMBOL-PACKAGE.ERROR.2 - SYMBOL-PLIST.ERROR.1 SYMBOL-PLIST.ERROR.2 SYMBOL-VALUE.ERROR.1 - SYMBOL-VALUE.ERROR.2 BOUNDP.ERROR.1 BOUNDP.ERROR.2 BOUNDP.ERROR.3 - BOUNDP.ERROR.4 BOUNDP.ERROR.5 BOUNDP.ERROR.6 BOUNDP.1 BOUNDP.2 - BOUNDP.3 BOUNDP.4 BOUNDP.ORDER.1 EVAL.1 EVAL.2 EVAL.3 EVAL.4 EVAL.5 - EVAL.6 EVAL.ORDER.1 EVAL.ERROR.1 EVAL.ERROR.2 EVAL.ERROR.3 - EVAL-AND-COMPILE-FNS -Test EVAL-AND-COMPILE-MACROS failed -Form: (REMOVE-IF #'MACRO-FUNCTION *EVAL-AND-COMPILE-MACROS*) -Expected value: NIL -Actual value: (DEFINE-SYMBOL-MACRO). - COMPILE.1 COMPILE.2 COMPILE.3 COMPILE.4 COMPILE.5 COMPILE.6 COMPILE.7 - COMPILE.8 COMPILE.9 -Test COMPILE.ERROR.1 failed -Form: (CLASSIFY-ERROR (COMPILE)) -Expected value: PROGRAM-ERROR -Actual value: ERROR. -Test COMPILE.ERROR.2 failed -Form: (CLASSIFY-ERROR (COMPILE NIL '(LAMBDA () NIL) 'GARBAGE)) -Expected value: PROGRAM-ERROR -Actual values: # - NIL - NIL. - CONSTANTP.ERROR.1 CONSTANTP.ERROR.2 CONSTANTP.1 CONSTANTP.2 - CONSTANTP.3 CONSTANTP.4 CONSTANTP.5 -Test CONSTANTP.6 failed -Form: (CONSTANTP-MACRO CONSTANTP-TEST-SYMBOL) -Expected value: T -Actual value: #. - CONSTANTP.7 -Test CONSTANTP.8 failed -Form: (NOTNOT-MV (CONSTANTP 1 NIL)) -Expected value: T -Actual value: #. - CONSTANTP.9 CONSTANTP.10 CONSTANTP.ORDER.1 -Test CONSTANTP.ORDER.2 failed -Form: (LET ((I 0) X Y) - (VALUES (NOTNOT (CONSTANTP (PROGN (SETF X (INCF I)) 1) - (PROGN (SETF Y (INCF I)) NIL))) - I X Y)) -Expected values: T - 2 - 1 - 2 -Actual value: #. - LAMBDA.1 LAMBDA.2 LAMBDA.3 LAMBDA.4 LAMBDA.5 LAMBDA.6 LAMBDA.7 - LAMBDA.8 LAMBDA.9 LAMBDA.10 LAMBDA.MACRO.1 LAMBDA.MACRO.2 -Test DCF-FUNS failed -Form: (REMOVE-IF #'FBOUNDP *DCF-FNS*) -Expected value: NIL -Actual value: (FUNCTION-LAMBDA-EXPRESSION). -Test DCF-MACROS failed -Form: (REMOVE-IF #'MACRO-FUNCTION *DCF-MACROS*) -Expected value: NIL -Actual value: (DEFINE-SETF-EXPANDER). - SETF-ORDER SETF-ORDER.2 PUSH-ORDER PUSHNEW-ORDER PUSHNEW-ORDER.2 - REMF-ORDER INCF-ORDER DECF-ORDER SHIFTF-ORDER.1 SHIFTF-ORDER.2 - ROTATEF-ORDER.1 ROTATEF-ORDER.2 PSETF-ORDER PSETF-ORDER.2 POP-ORDER - SETF-VAR SETF-VALUES.1 SETF-VALUES.2 SETF-VALUES.3 SETF-VALUES.4 -Test SETF-VALUES.5 failed -Form: (LET ((A (VECTOR NIL NIL)) (I 0) X Y Z) - (SETF (VALUES (AREF A (PROGN (SETF X (INCF I)) 0)) - (AREF A (PROGN (SETF Y (INCF I)) 1))) - (PROGN (SETF Z (INCF I)) (VALUES 'FOO 'BAR))) - (VALUES A I X Y Z)) -Expected values: #(FOO BAR) - 3 - 1 - 2 - 3 -Actual values: #(FOO BAR) - 3 - 2 - 3 - 1. - SETF-VALUES.6 SETF-THE.1 SETF-THE.2 SETF-APPLY.1 SETF-APPLY.2 - SETF-APPLY.3 SETF-APPLY.4 SETF-EXPANDER.1 SETF-MACRO.1 SETF-MACRO.2 - SETF-MACRO.3 SETF-MACRO.4 SETF-SYMBOL-MACRO.1 SETF-SYMBOL-MACRO.2 - SETF-SYMBOL-MACRO.3 SETQ.1 SETQ.2 SETQ.3 SETQ.4 SETF.1 SETF.2 SETF.3 - SETF.4 PSETQ.1 PSETQ.2 PSETQ.3 PSETQ.4 PSETQ.5 PSETQ.6 -Test PSETQ.7 failed -Form: (SYMBOL-MACROLET ((X (AREF A (INCF I))) (Y (AREF A (INCF I)))) - (LET ((A (COPY-SEQ #(0 1 2 3 4 5 6 7 8 9))) (I 0)) - (PSETQ X (AREF A (INCF I)) Y (AREF A (INCF I))) - (VALUES A I))) -Expected values: #(0 2 2 4 4 5 6 7 8 9) - 4 -Actual values: #(0 1 2 1 2 5 6 7 8 9) - 4. - PSETF.1 PSETF.2 PSETF.3 PSETF.4 PSETF.5 PSETF.6 -Test PSETF.7 failed -Form: (SYMBOL-MACROLET ((X (AREF A (INCF I))) (Y (AREF A (INCF I)))) - (LET ((A (COPY-SEQ #(0 1 2 3 4 5 6 7 8 9))) (I 0)) - (PSETF X (AREF A (INCF I)) Y (AREF A (INCF I))) - (VALUES A I))) -Expected values: #(0 2 2 4 4 5 6 7 8 9) - 4 -Actual values: #(0 1 2 1 2 5 6 7 8 9) - 4. - PSETF.8 PSETF.9 AND.1 AND.2 AND.3 AND.4 AND.5 AND.6 AND.7 AND.8 AND.9 - AND.ORDER.1 AND.ORDER.2 APPLY.ERROR.1 APPLY.ERROR.2 APPLY.ERROR.3 - APPLY.ERROR.4 APPLY.1 APPLY.2 APPLY.3 APPLY.4 APPLY.5 APPLY.ORDER.1 - BLOCK.1 BLOCK.2 BLOCK.3 BLOCK.4 BLOCK.5 BLOCK.6 BLOCK.7 BLOCK.8 - BLOCK.9 BLOCK.10 CALL-ARGUMENTS-LIMIT.1 CALL-ARGUMENTS-LIMIT.2 - CALL-ARGUMENTS-LIMIT.3 CALL-ARGUMENTS-LIMIT.4 CALL-ARGUMENTS-LIMIT.5 - CASE.1 CASE.2 CASE.3 CASE.4 CASE.5 CASE.6 CASE.7 CASE.8 CASE.9 CASE.10 - CASE.11 CASE.12 CASE.13 CASE.14 CASE.15 CASE.16 CASE.17 CASE.18 - CASE.19 CASE.20 CASE.21 CASE.22 CASE.23 CASE.24 CASE.25 CASE.26 - CASE.27 CASE.28 CASE.29 CASE.30 CASE.31 CASE.32 CASE.33 CASE.34 - CATCH.1 CATCH.2 CATCH.3 CATCH.4 CATCH.5 CATCH.6 CATCH.7 CATCH.8 - CATCH.9 CATCH.10 CATCH.11 CATCH.12 -Test THROW-ERROR failed -Form: (CLASSIFY-ERROR (THROW (GENSYM) NIL)) -Expected value: CONTROL-ERROR -Actual value: ERROR. - CCASE.1 CCASE.2 CCASE.3 CCASE.4 CCASE.5 CCASE.6 CCASE.7 CCASE.8 - CCASE.9 CCASE.10 CCASE.11 CCASE.12 CCASE.13 CCASE.14 CCASE.15 CCASE.16 - CCASE.17 CCASE.19 CCASE.20 CCASE.21 CCASE.23 CCASE.25 CCASE.26 - CCASE.27 CCASE.28 CCASE.29 CCASE.30 CCASE.31 COMPILED-FUNCTION-P.1 - COMPILED-FUNCTION-P.2 COMPILED-FUNCTION-P.3 - COMPILED-FUNCTION-P.ORDER.1 COMPILED-FUNCTION-P.ERROR.1 - COMPILED-FUNCTION-P.ERROR.2 COMPLEMENT.1 COMPLEMENT.2 COMPLEMENT.3 - COMPLEMENT.4 COMPLEMENT.5 COMPLEMENT.ORDER.1 COMPLEMENT.ERROR.1 - COMPLEMENT.ERROR.2 COMPLEMENT.ERROR.3 COMPLEMENT.ERROR.4 COND.1 COND.2 - COND.3 COND.4 COND.5 COND.6 COND.7 COND.8 COND.9 COND.10 COND.11 - COND.12 COND.13 COND.14 CONSTANTLY.1 CONSTANTLY.2 CONSTANTLY.3 - CONSTANTLY.ERROR.1 CONSTANTLY.ERROR.2 CTYPECASE.1 CTYPECASE.2 - CTYPECASE.3 CTYPECASE.4 CTYPECASE.5 CTYPECASE.6 CTYPECASE.7 - CTYPECASE.8 CTYPECASE.9 CTYPECASE.10 CTYPECASE.11 CTYPECASE.12 - CTYPECASE.13 DEFCONSTANT.1 DEFCONSTANT.2 DEFCONSTANT.3 DEFCONSTANT.4 - DEFCONSTANT.5 DEFINE-MODIFY-MACRO.1 DEFINE-MODIFY-MACRO.2 - DEFINE-MODIFY-MACRO.3 DEFINE-MODIFY-MACRO.4 DEFPARAMETER.1 - DEFPARAMETER.2 DEFPARAMETER.3 DEFPARAMETER.4 DEFPARAMETER.5 DEFVAR.1 - DEFVAR.2 DEFVAR.3 DEFVAR.4 DEFVAR.5 DESTRUCTURING-BIND.1 - DESTRUCTURING-BIND.2 DESTRUCTURING-BIND.3 DESTRUCTURING-BIND.4 - DESTRUCTURING-BIND.5 DESTRUCTURING-BIND.6 DESTRUCTURING-BIND.7 - DESTRUCTURING-BIND.8 DESTRUCTURING-BIND.9 DESTRUCTURING-BIND.10 - DESTRUCTURING-BIND.11 DESTRUCTURING-BIND.12 DESTRUCTURING-BIND.13 - DESTRUCTURING-BIND.14 DESTRUCTURING-BIND.15 DESTRUCTURING-BIND.16 - DESTRUCTURING-BIND.17 DESTRUCTURING-BIND.18 ECASE.1 ECASE.2 ECASE.3 - ECASE.4 ECASE.5 ECASE.6 ECASE.7 ECASE.8 ECASE.9 ECASE.10 ECASE.11 - ECASE.12 ECASE.13 ECASE.14 ECASE.15 ECASE.16 ECASE.17 ECASE.18 - ECASE.19 ECASE.20 ECASE.21 ECASE.23 ECASE.25 ECASE.26 ECASE.27 - ECASE.28 ECASE.29 ECASE.31 ECASE.32 EQL.1 EQL.2 EQL.3 EQL.4 EQL.5 - EQL.7 EQL.8 EQL.9 EQL.10 EQL.11 EQL.ORDER.1 EQL.ERROR.1 EQL.ERROR.2 - EQL.ERROR.3 EQ.ERROR.1 EQ.ERROR.2 EQ.ERROR.3 EQUAL.1 EQUAL.2 EQUAL.3 - EQUAL.4 EQUAL.5 EQUAL.6 EQUAL.7 EQUAL.8 EQUAL.9 EQUAL.10 EQUAL.11 - EQUAL.12 EQUAL.ORDER.1 EQUAL.ERROR.1 EQUAL.ERROR.2 EQUAL.ERROR.3 - EQUALP.1 EQUALP.2 EQUALP.3 EQUALP.4 EQUALP.ORDER.1 EQUALP.ERROR.1 - EQUALP.ERROR.2 EQUALP.ERROR.3 ETYPECASE.1 ETYPECASE.2 ETYPECASE.3 - ETYPECASE.4 ETYPECASE.5 ETYPECASE.6 ETYPECASE.7 ETYPECASE.8 - ETYPECASE.9 ETYPECASE.10 ETYPECASE.11 ETYPECASE.12 EVERY.1 EVERY.2 - EVERY.3 EVERY.4 EVERY.5 EVERY.6 EVERY.7 EVERY.8 EVERY.9 EVERY.10 - EVERY.11 EVERY.12 EVERY.13 EVERY.14 EVERY.15 EVERY.16 EVERY.ORDER.1 - EVERY.ORDER.2 EVERY.ERROR.1 EVERY.ERROR.2 EVERY.ERROR.3 EVERY.ERROR.4 - EVERY.ERROR.5 EVERY.ERROR.6 EVERY.ERROR.7 EVERY.ERROR.9 EVERY.ERROR.10 - EVERY.ERROR.11 EVERY.ERROR.12 EVERY.ERROR.13 FBOUNDP.1 FBOUNDP.2 - FBOUNDP.3 FBOUNDP.4 FBOUNDP.5 -Test FBOUNDP.6 failed -Form: (NOT-MV (FBOUNDP '(SETF FBOUNDP-6-ACCESSOR))) -Expected value: NIL -Actual value: #. -Test FBOUNDP.7 failed -Form: (LET ((G (GENSYM))) (FBOUNDP (LIST 'SETF G))) -Expected value: NIL -Actual value: #. - FBOUNDP.ORDER.1 FBOUNDP.ERROR.1 FBOUNDP.ERROR.2 FBOUNDP.ERROR.3 - FBOUNDP.ERROR.4 FBOUNDP.ERROR.5 FBOUNDP.ERROR.6 -Test FDEFINITION.ERROR.1 failed -Form: (CLASSIFY-ERROR (FDEFINITION)) -Expected value: PROGRAM-ERROR -Actual value: UNDEFINED-FUNCTION. -Test FDEFINITION.ERROR.2 failed -Form: (CLASSIFY-ERROR (FDEFINITION 'CONS NIL)) -Expected value: PROGRAM-ERROR -Actual value: UNDEFINED-FUNCTION. - FDEFINITION.ERROR.3 -Test FDEFINITION.ERROR.4 failed -Form: (CLASSIFY-ERROR (FDEFINITION 10)) -Expected value: TYPE-ERROR -Actual value: UNDEFINED-FUNCTION. - FDEFINITION.ERROR.5 -Test FDEFINITION.ERROR.6 failed -Form: (CLASSIFY-ERROR (LOCALLY (FDEFINITION 10) T)) -Expected value: TYPE-ERROR -Actual value: UNDEFINED-FUNCTION. -Test FDEFINITION.1 failed -Form: (LET ((FUN (FDEFINITION 'CONS))) (FUNCALL FUN 'A 'B)) -Expected value: (A . B) -Actual value: #. -Test FDEFINITION.2 failed -Form: (PROGN (FDEFINITION 'COND) :GOOD) -Expected value: :GOOD -Actual value: #. -Test FDEFINITION.3 failed -Form: (PROGN (FDEFINITION 'SETQ) :GOOD) -Expected value: :GOOD -Actual value: #. -Test FDEFINITION.4 failed -Form: (LET ((SYM (GENSYM))) - (VALUES (FBOUNDP SYM) - (PROGN - (SETF (FDEFINITION SYM) (FDEFINITION 'CONS)) - (FUNCALL (SYMBOL-FUNCTION SYM) 'A 'B)) - (NOTNOT (FBOUNDP SYM)))) -Expected values: NIL - (A . B) - T -Actual value: #. -Test FDEFINITION.5 failed -Form: (LET* ((SYM (GENSYM)) (FNAME (LIST 'SETF SYM))) - (VALUES (FBOUNDP FNAME) - (PROGN - (SETF (FDEFINITION FNAME) (FDEFINITION 'CONS)) - (EVAL (LIST 'SETF (LIST SYM ''A) ''B))) - (NOTNOT (FBOUNDP FNAME)))) -Expected values: NIL - (B . A) - T -Actual value: #. -Test FDEFINITION.ORDER.1 failed -Form: (LET ((I 0)) (FDEFINITION (PROGN (INCF I) 'SETQ)) I) -Expected value: 1 -Actual value: #. - FLET.1 FLET.2 FLET.3 FLET.4 FLET.5 FLET.6 FLET.7 FLET.8 FLET.9 FLET.10 - FLET.11 FLET.12 FLET.13 FLET.14 FLET.15 FLET.16 -Test FLET.17 failed -Form: (FLET (((SETF %F) (X Y) (SETF (CAR Y) X))) - (LET ((Z (LIST 1 2))) (SETF (%F Z) 'A) Z)) -Expected value: (A 2) -Actual value: #. - FLET.18 FLET.19 FLET.20 FLET.21 FLET.22 FLET.23 FLET.24 FLET.25 - FLET.26 FLET.27 FLET.28 FLET.29 FLET.30 FLET.31 FLET.32 FLET.33 - FLET.34 FLET.35 FLET.36 FLET.37 FLET.38 FLET.39 FLET.40 FLET.45 - FLET.46 FLET.47 FLET.48 FLET.49 FLET.50 -Test FLET.51 failed -Form: (LOOP - FOR - S - IN - *CL-NON-FUNCTION-MACRO-SPECIAL-OPERATOR-SYMBOLS* - FOR - FORM - = - (LIST 'CLASSIFY-ERROR - (LIST 'FLET - (LIST (LIST* (LIST 'SETF S) - '((&REST ARGS) (DECLARE (IGNORE ARGS)) - 'A))) - (LIST 'SETF (LIST S) 10))) - UNLESS - (EQ (EVAL FORM) 'A) - COLLECT - S) -Expected value: NIL -Actual value: (&ALLOW-OTHER-KEYS &AUX &BODY &ENVIRONMENT &KEY &OPTIONAL - &REST &WHOLE ** *** *BREAK-ON-SIGNALS* - *COMPILE-FILE-PATHNAME* *COMPILE-FILE-TRUENAME* - *COMPILE-PRINT* *COMPILE-VERBOSE* *DEBUG-IO* - *DEBUGGER-HOOK* *DEFAULT-PATHNAME-DEFAULTS* - *ERROR-OUTPUT* *FEATURES* *GENSYM-COUNTER* - *LOAD-PATHNAME* *LOAD-PRINT* *LOAD-TRUENAME* - *LOAD-VERBOSE* *MACROEXPAND-HOOK* *MODULES* *PACKAGE* - *PRINT-ARRAY* *PRINT-BASE* *PRINT-CASE* - *PRINT-CIRCLE* *PRINT-ESCAPE* *PRINT-GENSYM* - *PRINT-LENGTH* *PRINT-LEVEL* *PRINT-LINES* - *PRINT-MISER-WIDTH* *PRINT-PPRINT-DISPATCH* - *PRINT-PRETTY* *PRINT-RADIX* *PRINT-READABLY* - *PRINT-RIGHT-MARGIN* *QUERY-IO* *RANDOM-STATE* - *READ-BASE* *READ-DEFAULT-FLOAT-FORMAT* *READ-EVAL* - *READ-SUPPRESS* *READTABLE* *STANDARD-INPUT* - *STANDARD-OUTPUT* *TERMINAL-IO* *TRACE-OUTPUT* ++ +++ - // /// ARITHMETIC-ERROR ARRAY ARRAY-DIMENSION-LIMIT - ARRAY-RANK-LIMIT ARRAY-TOTAL-SIZE-LIMIT BASE-CHAR - BASE-STRING BIGNUM BIT-VECTOR BOOLE-1 BOOLE-2 - BOOLE-AND BOOLE-ANDC1 BOOLE-ANDC2 BOOLE-C1 BOOLE-C2 - BOOLE-CLR BOOLE-EQV BOOLE-IOR BOOLE-NAND BOOLE-NOR - BOOLE-ORC1 BOOLE-ORC2 BOOLE-SET BOOLE-XOR BOOLEAN - BROADCAST-STREAM BUILT-IN-CLASS CALL-ARGUMENTS-LIMIT - CELL-ERROR CHAR-CODE-LIMIT CLASS COMPILATION-SPEED - COMPILED-FUNCTION COMPILER-MACRO CONCATENATED-STREAM - CONDITION CONTROL-ERROR DEBUG DECLARATION - DIVISION-BY-ZERO DOUBLE-FLOAT DOUBLE-FLOAT-EPSILON - DOUBLE-FLOAT-NEGATIVE-EPSILON DYNAMIC-EXTENT - ECHO-STREAM ED END-OF-FILE EXTENDED-CHAR FILE-ERROR - FILE-STREAM FILE-STRING-LENGTH FILL FIXNUM - FLOATING-POINT-INEXACT - FLOATING-POINT-INVALID-OPERATION - FLOATING-POINT-OVERFLOW FLOATING-POINT-UNDERFLOW - FTYPE GENERIC-FUNCTION HASH-TABLE IGNORABLE IGNORE - INLINE INTEGER INTERNAL-TIME-UNITS-PER-SECOND KEYWORD - LAMBDA-LIST-KEYWORDS LAMBDA-PARAMETERS-LIMIT - LEAST-NEGATIVE-DOUBLE-FLOAT LEAST-NEGATIVE-LONG-FLOAT - LEAST-NEGATIVE-NORMALIZED-DOUBLE-FLOAT - LEAST-NEGATIVE-NORMALIZED-LONG-FLOAT - LEAST-NEGATIVE-NORMALIZED-SHORT-FLOAT - LEAST-NEGATIVE-NORMALIZED-SINGLE-FLOAT - LEAST-NEGATIVE-SHORT-FLOAT - LEAST-NEGATIVE-SINGLE-FLOAT - LEAST-POSITIVE-DOUBLE-FLOAT LEAST-POSITIVE-LONG-FLOAT - LEAST-POSITIVE-NORMALIZED-DOUBLE-FLOAT - LEAST-POSITIVE-NORMALIZED-LONG-FLOAT - LEAST-POSITIVE-NORMALIZED-SHORT-FLOAT - LEAST-POSITIVE-NORMALIZED-SINGLE-FLOAT - LEAST-POSITIVE-SHORT-FLOAT - LEAST-POSITIVE-SINGLE-FLOAT LONG-FLOAT - LONG-FLOAT-EPSILON LONG-FLOAT-NEGATIVE-EPSILON METHOD - METHOD-COMBINATION MOST-NEGATIVE-DOUBLE-FLOAT - MOST-NEGATIVE-FIXNUM MOST-NEGATIVE-LONG-FLOAT - MOST-NEGATIVE-SHORT-FLOAT MOST-NEGATIVE-SINGLE-FLOAT - MOST-POSITIVE-DOUBLE-FLOAT MOST-POSITIVE-FIXNUM - MOST-POSITIVE-LONG-FLOAT MOST-POSITIVE-SHORT-FLOAT - MOST-POSITIVE-SINGLE-FLOAT MULTIPLE-VALUES-LIMIT NIL - NOTINLINE NUMBER OPTIMIZE OTHERWISE PACKAGE - PACKAGE-ERROR PARSE-ERROR PI PRINT-NOT-READABLE - PROGRAM-ERROR RANDOM RANDOM-STATE RATIO READER-ERROR - READTABLE REAL RESTART SAFETY SATISFIES SEQUENCE - SERIOUS-CONDITION SHORT-FLOAT SHORT-FLOAT-EPSILON - SHORT-FLOAT-NEGATIVE-EPSILON SIGNED-BYTE SIMPLE-ARRAY - SIMPLE-BASE-STRING SIMPLE-BIT-VECTOR SIMPLE-CONDITION - SIMPLE-ERROR SIMPLE-STRING SIMPLE-TYPE-ERROR - SIMPLE-VECTOR SIMPLE-WARNING SINGLE-FLOAT - SINGLE-FLOAT-EPSILON SINGLE-FLOAT-NEGATIVE-EPSILON - SPACE SPECIAL SPEED STANDARD STANDARD-CHAR - STANDARD-CLASS STANDARD-GENERIC-FUNCTION - STANDARD-METHOD STANDARD-OBJECT STORAGE-CONDITION - STREAM STREAM-ERROR STRING-STREAM STRUCTURE - STRUCTURE-CLASS STRUCTURE-OBJECT STYLE-WARNING SYMBOL - SYNONYM-STREAM T TWO-WAY-STREAM TYPE TYPE-ERROR - UNBOUND-SLOT UNBOUND-VARIABLE UNDEFINED-FUNCTION - UNSIGNED-BYTE VARIABLE WARNING). - FMAKUNBOUND.1 FMAKUNBOUND.2 FMAKUNBOUND.3 -Test FMAKUNBOUND.4 failed -Form: (LET* ((G (GENSYM)) (N (LIST 'SETF G))) - (AND (NOT (FBOUNDP N)) (EVAL (LIST* 'DEFUN N '(NIL NIL))) - (FBOUNDP N) - (VALUES (EQUAL (CHECK-VALUES (FMAKUNBOUND N)) N) - (FBOUNDP N)))) -Expected values: T - NIL -Actual value: #. - FMAKUNBOUND.ERROR.1 FMAKUNBOUND.ERROR.2 FMAKUNBOUND.ERROR.3 - FMAKUNBOUND.ERROR.4 FMAKUNBOUND.ERROR.5 FMAKUNBOUND.ERROR.6 FUNCALL.1 - FUNCALL.2 FUNCALL.3 FUNCALL.4 FUNCALL.5 FUNCALL.6 FUNCALL.7 FUNCALL.8 - FUNCALL.9 FUNCALL.ORDER.1 FUNCALL.ORDER.2 FUNCALL.ERROR.1 - FUNCALL.ERROR.2 -Test FUNCALL.ERROR.3 failed -Form: (CLASSIFY-ERROR (FUNCALL 'DEFCONSTANT '(DEFCONSTANT X 10))) -Expected value: UNDEFINED-FUNCTION -Actual value: PROGRAM-ERROR. - FUNCALL.ERROR.4 FUNCALL.ERROR.5 FUNCALL.ERROR.6 FUNCALL.ERROR.7 -Test FUNCTION-LAMBDA-EXPRESSION.1 failed -Form: (LENGTH (MULTIPLE-VALUE-LIST (FUNCTION-LAMBDA-EXPRESSION #'CONS))) -Expected value: 3 -Actual value: #. -Test FUNCTION-LAMBDA-EXPRESSION.2 failed -Form: (LET ((X NIL)) - (FLET ((%F NIL X)) - (LET ((RET-VALS - (MULTIPLE-VALUE-LIST - (FUNCTION-LAMBDA-EXPRESSION #'%F)))) - (VALUES (LENGTH RET-VALS) (NOTNOT (SECOND RET-VALS)))))) -Expected values: 3 - T -Actual value: #. -Test FUNCTION-LAMBDA-EXPRESSION.ORDER.1 failed -Form: (LET ((I 0)) - (FUNCTION-LAMBDA-EXPRESSION (PROGN (INCF I) #'CONS)) - I) -Expected value: 1 -Actual value: #. -Test FUNCTION-LAMBDA-EXPRESSION.ERROR.1 failed -Form: (CLASSIFY-ERROR (FUNCTION-LAMBDA-EXPRESSION)) -Expected value: PROGRAM-ERROR -Actual value: UNDEFINED-FUNCTION. -Test FUNCTION-LAMBDA-EXPRESSION.ERROR.2 failed -Form: (CLASSIFY-ERROR (FUNCTION-LAMBDA-EXPRESSION #'CONS NIL)) -Expected value: PROGRAM-ERROR -Actual value: UNDEFINED-FUNCTION. - FUNCTION.1 -Test FUNCTION.2 failed -Form: (TYPEP 'IDENTITY 'FUNCTION) -Expected value: NIL -Actual value: T. - FUNCTION.3 FUNCTION.4 FUNCTION.5 -Test FUNCTION.6 failed -Form: (TYPEP '(LAMBDA (X) X) 'FUNCTION) -Expected value: NIL -Actual value: T. -Test FUNCTION.7 failed -Form: (NOT-MV (TYPEP #'(SETF FUNCTION-7-ACCESSOR) 'FUNCTION)) -Expected value: NIL -Actual value: #. - FUNCTION.8 FUNCTION.9 -Test FUNCTION.10 failed -Form: (LOOP - FOR - X - IN - *UNIVERSE* - WHEN - (AND (OR (NUMBERP X) (CHARACTERP X) (SYMBOLP X) (CONSP X) - (TYPEP X 'ARRAY)) - (TYPEP X 'FUNCTION)) - COLLECT - X) -Expected value: NIL -Actual value: (CONS (SYSTEM:LAMBDA-CLOSURE () () () (X) X)). - FUNCTION.11 FUNCTION.12 FUNCTION.13 FUNCTIONP.1 -Test FUNCTIONP.2 failed -Form: (FUNCTIONP 'IDENTITY) -Expected value: NIL -Actual value: T. - FUNCTIONP.3 FUNCTIONP.4 FUNCTIONP.5 -Test FUNCTIONP.6 failed -Form: (FUNCTIONP '(LAMBDA (X) X)) -Expected value: NIL -Actual value: T. -Test FUNCTIONP.7 failed -Form: (NOT-MV (FUNCTIONP #'(SETF FUNCTIONP-7-ACCESSOR))) -Expected value: NIL -Actual value: #. - FUNCTIONP.8 FUNCTIONP.9 -Test FUNCTIONP.10 failed -Form: (LOOP - FOR - X - IN - *UNIVERSE* - WHEN - (AND (OR (NUMBERP X) (CHARACTERP X) (SYMBOLP X) (CONSP X) - (TYPEP X 'ARRAY)) - (FUNCTIONP X)) - COLLECT - X) -Expected value: NIL -Actual value: (CONS (SYSTEM:LAMBDA-CLOSURE () () () (X) X)). - FUNCTIONP.11 FUNCTIONP.12 FUNCTIONP.ORDER.1 FUNCTIONP.ERROR.1 - FUNCTIONP.ERROR.2 GET-SETF-EXPANSION.ERROR.1 - GET-SETF-EXPANSION.ERROR.2 IDENTITY.1 IDENTITY.2 IDENTITY.3 - IDENTITY.ORDER.1 IDENTITY.ERROR.1 IDENTITY.ERROR.2 IF.1 IF.2 IF.3 IF.4 - IF.5 IF.6 IF.7 IF.ORDER.1 LABELS.1 LABELS.2 LABELS.3 LABELS.4 LABELS.5 - LABELS.6 LABELS.7 LABELS.8 LABELS.9 LABELS.10 LABELS.11 LABELS.12 - LABELS.13 LABELS.14 LABELS.15 LABELS.16 -Test LABELS.17 failed -Form: (LABELS (((SETF %F) (X Y) (SETF (CAR Y) X))) - (LET ((Z (LIST 1 2))) (SETF (%F Z) 'A) Z)) -Expected value: (A 2) -Actual value: #. - LABELS.7B LABELS.18 LABELS.19 LABELS.20 LABELS.21 LABELS.22 LABELS.23 - LABELS.24 LABELS.25 + INTERSECTION.11-A INTERSECTION.12 INTERSECTION.13 INTERSECTION.13-A + INTERSECTION.14 INTERSECTION.15 INTERSECTION.16 INTERSECTION.17 + INTERSECTION.18 INTERSECTION.ORDER.1 INTERSECTION.ORDER.2 + INTERSECTION.ORDER.3 INTERSECTION.ORDER.4 INTERSECTION.ORDER.5 + INTERSECTION.ALLOW-OTHER-KEYS.1 INTERSECTION.ALLOW-OTHER-KEYS.2 + INTERSECTIONALLOW-OTHER-KEYS.3 INTERSECTION.ALLOW-OTHER-KEYS.4 + INTERSECTION.ALLOW-OTHER-KEYS.5 INTERSECTION.ALLOW-OTHER-KEYS.6 + INTERSECTION.ALLOW-OTHER-KEYS.7 INTERSECTION.KEYWORDS.8 + INTERSECTION.ERROR.1 INTERSECTION.ERROR.2 INTERSECTION.ERROR.3 + INTERSECTION.ERROR.4 INTERSECTION.ERROR.5 INTERSECTION.ERROR.6 + INTERSECTION.ERROR.7 INTERSECTION.ERROR.8 INTERSECTION.ERROR.9 + INTERSECTION.ERROR.10 NINTERSECTION.1 NINTERSECTION.2 NINTERSECTION.3 + NINTERSECTION.4 NINTERSECTION.5 NINTERSECTION.6 NINTERSECTION.7 + NINTERSECTION.8 NINTERSECTION.9 NINTERSECTION.9-A NINTERSECTION.9-B + NINTERSECTION.10 NINTERSECTION.11 LABELS.25 Test LABELS.26 failed Form: (LOOP FOR @@ -18138,74 +18188,7 @@ NUNION.ERROR.10 SET-DIFFERENCE.1 SET-DIFFERENCE.2 SET-DIFFERENCE.3 SET-DIFFERENCE.4 SET-DIFFERENCE.5 SET-DIFFERENCE.6 SET-DIFFERENCE.7 SET-DIFFERENCE.8 SET-DIFFERENCE.9 SET-DIFFERENCE.10 SET-DIFFERENCE.11 - SET-DIFFERENCE.12 SET-DIFFERENCE.13 SET-DIFFERENCE.14 - SET-DIFFERENCE.15 SET-DIFFERENCE.16 SET-DIFFERENCE.17 - SET-DIFFERENCE.18 SET-DIFFERENCE.19 SET-DIFFERENCE.ORDER.1 - SET-DIFFERENCE.ORDER.2 SET-DIFFERENCE.ORDER.3 - SET-DIFFERENCE.ALLOW-OTHER-KEYS.1 SET-DIFFERENCE.ALLOW-OTHER-KEYS.2 - SET-DIFFERENCE.ALLOW-OTHER-KEYS.3 SET-DIFFERENCE.ALLOW-OTHER-KEYS.4 - SET-DIFFERENCE.ALLOW-OTHER-KEYS.5 SET-DIFFERENCE.ALLOW-OTHER-KEYS.6 - SET-DIFFERENCE.ALLOW-OTHER-KEYS.7 SET-DIFFERENCE.KEYWORDS.8 - SET-DIFFERENCE.KEYWORDS.9 SET-DIFFERENCE.ERROR.1 - SET-DIFFERENCE.ERROR.2 SET-DIFFERENCE.ERROR.3 SET-DIFFERENCE.ERROR.4 - SET-DIFFERENCE.ERROR.5 SET-DIFFERENCE.ERROR.6 SET-DIFFERENCE.ERROR.7 - SET-DIFFERENCE.ERROR.8 SET-DIFFERENCE.ERROR.9 SET-DIFFERENCE.ERROR.10 - NSET-DIFFERENCE.1 NSET-DIFFERENCE.2 NSET-DIFFERENCE.3 - NSET-DIFFERENCE.4 NSET-DIFFERENCE.5 NSET-DIFFERENCE.6 - NSET-DIFFERENCE.7 NSET-DIFFERENCE.8 NSET-DIFFERENCE.9 - NSET-DIFFERENCE.10 NSET-DIFFERENCE.11 NSET-DIFFERENCE.12 - NSET-DIFFERENCE.13 NSET-DIFFERENCE.14 NSET-DIFFERENCE.15 - NSET-DIFFERENCE.16 NSET-DIFFERENCE.17 NSET-DIFFERENCE.18 - NSET-DIFFERENCE.19 NSET-DIFFERENCE.ORDER.1 NSET-DIFFERENCE.ORDER.2 - NSET-DIFFERENCE.ORDER.3 NSET-DIFFERENCE.ALLOW-OTHER-KEYS.1 - NSET-DIFFERENCE.ALLOW-OTHER-KEYS.2 NSET-DIFFERENCE.ALLOW-OTHER-KEYS.3 - NSET-DIFFERENCE.ALLOW-OTHER-KEYS.4 NSET-DIFFERENCE.ALLOW-OTHER-KEYS.5 - NSET-DIFFERENCE.ALLOW-OTHER-KEYS.6 NSET-DIFFERENCE.ALLOW-OTHER-KEYS.7 - NSET-DIFFERENCE.KEYWORDS.8 NSET-DIFFERENCE.KEYWORDS.9 - NSET-DIFFERENCE.ERROR.1 NSET-DIFFERENCE.ERROR.2 - NSET-DIFFERENCE.ERROR.3 NSET-DIFFERENCE.ERROR.4 - NSET-DIFFERENCE.ERROR.5 NSET-DIFFERENCE.ERROR.6 - NSET-DIFFERENCE.ERROR.7 NSET-DIFFERENCE.ERROR.8 - NSET-DIFFERENCE.ERROR.9 NSET-DIFFERENCE.ERROR.10 SET-EXCLUSIVE-OR.1 - SET-EXCLUSIVE-OR.2 SET-EXCLUSIVE-OR.3 SET-EXCLUSIVE-OR.4 - SET-EXCLUSIVE-OR.5 SET-EXCLUSIVE-OR.6 SET-EXCLUSIVE-OR.7 - SET-EXCLUSIVE-OR.7-A SET-EXCLUSIVE-OR.8 SET-EXCLUSIVE-OR.8-A - SET-EXCLUSIVE-OR.8-B SET-EXCLUSIVE-OR.9 SET-EXCLUSIVE-OR.10 - SET-EXCLUSIVE-OR.11 SET-EXCLUSIVE-OR.12 SET-EXCLUSIVE-OR.13 - SET-EXCLUSIVE-OR.14 SET-EXCLUSIVE-OR.15 SET-EXCLUSIVE-OR.16 - SET-EXCLUSIVE-OR.17 SET-EXCLUSIVE-OR.17-A SET-EXCLUSIVE-OR.18 - SET-EXCLUSIVE-OR.18-A SET-EXCLUSIVE-OR.ORDER.1 - SET-EXCLUSIVE-OR.ORDER.2 SET-EXCLUSIVE-OR.ORDER.3 - SET-EXCLUSIVE-OR.ORDER.4 SET-EXCLUSIVE-OR.ORDER.5 - SET-EXCLUSIVE.ALLOW-OTHER-KEYS.1 SET-EXCLUSIVE.ALLOW-OTHER-KEYS.2 - SET-EXCLUSIVE.ALLOW-OTHER-KEYS.3 SET-EXCLUSIVE.ALLOW-OTHER-KEYS.4 - SET-EXCLUSIVE.ALLOW-OTHER-KEYS.5 SET-EXCLUSIVE.ALLOW-OTHER-KEYS.6 - SET-EXCLUSIVE.ALLOW-OTHER-KEYS.7 SET-EXCLUSIVE.KEYWORDS.8 - SET-EXCLUSIVE.KEYWORDS.9 SET-EXCLUSIVE-OR.ERROR.1 - SET-EXCLUSIVE-OR.ERROR.2 SET-EXCLUSIVE-OR.ERROR.3 - SET-EXCLUSIVE-OR.ERROR.4 SET-EXCLUSIVE-OR.ERROR.5 - SET-EXCLUSIVE-OR.ERROR.6 SET-EXCLUSIVE-OR.ERROR.7 - SET-EXCLUSIVE-OR.ERROR.8 SET-EXCLUSIVE-OR.ERROR.9 - SET-EXCLUSIVE-OR.ERROR.10 NSET-EXCLUSIVE-OR.1 NSET-EXCLUSIVE-OR.2 - NSET-EXCLUSIVE-OR.3 NSET-EXCLUSIVE-OR.4 NSET-EXCLUSIVE-OR.5 - NSET-EXCLUSIVE-OR.6 NSET-EXCLUSIVE-OR.7 NSET-EXCLUSIVE-OR.7-A - NSET-EXCLUSIVE-OR.8 NSET-EXCLUSIVE-OR.8-A NSET-EXCLUSIVE-OR.8-B - NSET-EXCLUSIVE-OR.9 NSET-EXCLUSIVE-OR.10 NSET-EXCLUSIVE-OR.11 - NSET-EXCLUSIVE-OR.12 INTERSECTION.12 INTERSECTION.13 INTERSECTION.13-A - INTERSECTION.14 INTERSECTION.15 INTERSECTION.16 INTERSECTION.17 - INTERSECTION.18 INTERSECTION.ORDER.1 INTERSECTION.ORDER.2 - INTERSECTION.ORDER.3 INTERSECTION.ORDER.4 INTERSECTION.ORDER.5 - INTERSECTION.ALLOW-OTHER-KEYS.1 INTERSECTION.ALLOW-OTHER-KEYS.2 - INTERSECTIONALLOW-OTHER-KEYS.3 INTERSECTION.ALLOW-OTHER-KEYS.4 - INTERSECTION.ALLOW-OTHER-KEYS.5 INTERSECTION.ALLOW-OTHER-KEYS.6 - INTERSECTION.ALLOW-OTHER-KEYS.7 INTERSECTION.KEYWORDS.8 - INTERSECTION.ERROR.1 INTERSECTION.ERROR.2 INTERSECTION.ERROR.3 - INTERSECTION.ERROR.4 INTERSECTION.ERROR.5 INTERSECTION.ERROR.6 - INTERSECTION.ERROR.7 INTERSECTION.ERROR.8 INTERSECTION.ERROR.9 - INTERSECTION.ERROR.10 NINTERSECTION.1 NINTERSECTION.2 NINTERSECTION.3 - NINTERSECTION.4 NINTERSECTION.5 NINTERSECTION.6 NINTERSECTION.7 - NINTERSECTION.8 NINTERSECTION.9 NINTERSECTION.9-A NINTERSECTION.9-B - NINTERSECTION.10 NINTERSECTION.11 NINTERSECTION.12 NINTERSECTION.13 + SET-DIFFERENCE.12 NINTERSECTION.12 NINTERSECTION.13 NINTERSECTION.14 NINTERSECTION.15 NINTERSECTION.16 NINTERSECTION.17 NINTERSECTION.18 NINTERSECTION.ORDER.1 NINTERSECTION.ORDER.2 NINTERSECTION.ORDER.3 NINTERSECTION.ORDER.4 NINTERSECTION.ORDER.5 @@ -18275,6 +18258,39 @@ SET-EXCLUSIVE-OR.5 SET-EXCLUSIVE-OR.6 SET-EXCLUSIVE-OR.7 SET-EXCLUSIVE-OR.7-A SET-EXCLUSIVE-OR.8 SET-EXCLUSIVE-OR.8-A SET-EXCLUSIVE-OR.8-B SET-EXCLUSIVE-OR.9 SET-EXCLUSIVE-OR.10 + SET-EXCLUSIVE-OR.11 SET-EXCLUSIVE-OR.12 SET-DIFFERENCE.13 SET-DIFFERENCE.14 + SET-DIFFERENCE.15 SET-DIFFERENCE.16 SET-DIFFERENCE.17 + SET-DIFFERENCE.18 SET-DIFFERENCE.19 SET-DIFFERENCE.ORDER.1 + SET-DIFFERENCE.ORDER.2 SET-DIFFERENCE.ORDER.3 + SET-DIFFERENCE.ALLOW-OTHER-KEYS.1 SET-DIFFERENCE.ALLOW-OTHER-KEYS.2 + SET-DIFFERENCE.ALLOW-OTHER-KEYS.3 SET-DIFFERENCE.ALLOW-OTHER-KEYS.4 + SET-DIFFERENCE.ALLOW-OTHER-KEYS.5 SET-DIFFERENCE.ALLOW-OTHER-KEYS.6 + SET-DIFFERENCE.ALLOW-OTHER-KEYS.7 SET-DIFFERENCE.KEYWORDS.8 + SET-DIFFERENCE.KEYWORDS.9 SET-DIFFERENCE.ERROR.1 + SET-DIFFERENCE.ERROR.2 SET-DIFFERENCE.ERROR.3 SET-DIFFERENCE.ERROR.4 + SET-DIFFERENCE.ERROR.5 SET-DIFFERENCE.ERROR.6 SET-DIFFERENCE.ERROR.7 + SET-DIFFERENCE.ERROR.8 SET-DIFFERENCE.ERROR.9 SET-DIFFERENCE.ERROR.10 + NSET-DIFFERENCE.1 NSET-DIFFERENCE.2 NSET-DIFFERENCE.3 + NSET-DIFFERENCE.4 NSET-DIFFERENCE.5 NSET-DIFFERENCE.6 + NSET-DIFFERENCE.7 NSET-DIFFERENCE.8 NSET-DIFFERENCE.9 + NSET-DIFFERENCE.10 NSET-DIFFERENCE.11 NSET-DIFFERENCE.12 + NSET-DIFFERENCE.13 NSET-DIFFERENCE.14 NSET-DIFFERENCE.15 + NSET-DIFFERENCE.16 NSET-DIFFERENCE.17 NSET-DIFFERENCE.18 + NSET-DIFFERENCE.19 NSET-DIFFERENCE.ORDER.1 NSET-DIFFERENCE.ORDER.2 + NSET-DIFFERENCE.ORDER.3 NSET-DIFFERENCE.ALLOW-OTHER-KEYS.1 + NSET-DIFFERENCE.ALLOW-OTHER-KEYS.2 NSET-DIFFERENCE.ALLOW-OTHER-KEYS.3 + NSET-DIFFERENCE.ALLOW-OTHER-KEYS.4 NSET-DIFFERENCE.ALLOW-OTHER-KEYS.5 + NSET-DIFFERENCE.ALLOW-OTHER-KEYS.6 NSET-DIFFERENCE.ALLOW-OTHER-KEYS.7 + NSET-DIFFERENCE.KEYWORDS.8 NSET-DIFFERENCE.KEYWORDS.9 + NSET-DIFFERENCE.ERROR.1 NSET-DIFFERENCE.ERROR.2 + NSET-DIFFERENCE.ERROR.3 NSET-DIFFERENCE.ERROR.4 + NSET-DIFFERENCE.ERROR.5 NSET-DIFFERENCE.ERROR.6 + NSET-DIFFERENCE.ERROR.7 NSET-DIFFERENCE.ERROR.8 + NSET-DIFFERENCE.ERROR.9 NSET-DIFFERENCE.ERROR.10 SET-EXCLUSIVE-OR.1 + SET-EXCLUSIVE-OR.2 SET-EXCLUSIVE-OR.3 SET-EXCLUSIVE-OR.4 + SET-EXCLUSIVE-OR.5 SET-EXCLUSIVE-OR.6 SET-EXCLUSIVE-OR.7 + SET-EXCLUSIVE-OR.7-A SET-EXCLUSIVE-OR.8 SET-EXCLUSIVE-OR.8-A + SET-EXCLUSIVE-OR.8-B SET-EXCLUSIVE-OR.9 SET-EXCLUSIVE-OR.10 SET-EXCLUSIVE-OR.11 SET-EXCLUSIVE-OR.12 SET-EXCLUSIVE-OR.13 SET-EXCLUSIVE-OR.14 SET-EXCLUSIVE-OR.15 SET-EXCLUSIVE-OR.16 SET-EXCLUSIVE-OR.17 SET-EXCLUSIVE-OR.17-A SET-EXCLUSIVE-OR.18 @@ -19617,10 +19633,10 @@ #(1.0S0 2.0S0 3.0S0 4.0S0 5.0S0) #(1.0 2.0 3.0 4.0 5.0) #(1.0 2.0 3.0 4.0 5.0) #(1.0 2.0 3.0 4.0 5.0) - # - # - # - # #p"foo" #p"foo" + # + # + # + # #p"foo" #p"foo" #p"bar" #p"foo.txt" #p"bar.txt" #p"xyz.txt" #p"" #p"*" #p".txt" #p"*.txt" #p"*.txt" #p"*.ABC" #p"/**/" #p".*" #p"" #p"" # @@ -19628,7 +19644,7 @@ # # # - # + # #S(FOO-STRUCTURE X 1 Y A Z NIL) #S(FOO-STRUCTURE X 1 Y A Z NIL) #S(BAR-STRUCTURE X 1 Y A Z NIL) @@ -19637,7 +19653,7 @@ # # (SYSTEM:LAMBDA-CLOSURE () () () (X) X) - #$29176404137732472914482755064436119949901022861949863354487104115542831301816877224716868628239579211938054306631983568024981862666611809341625851599338142481189922237126149420820651863593943674663237137973673386602609653058390330165029103182018820877745392805844492457746337173846085035110448806788668024716995441437318488135372148325046973438386334148830852569686525914313170679854396809291584178691434459919748999200131637334343074176174696701320823824304068498099685091743493789239103487889116310651099878026914570503406886010280398235814665737821171431805083458093275589702358183479757384554441737154864598523616204329161807489058497043671189951266337186360081554710106403568876967274841360410828926605095432265860688439687341013028577758115853114321801462973911277178560766247770387061714477475310568180405374724881987736315901479436213406833564347974720100701532300644864628916537076049825334102581595905842247931732521700315260535250758474860544798968272411174675236480768545213698075973373777375049967899609999433316555503532244866534349876618451525584740615834057107576142509252163325543353261300582017278216842772265644931307481661297526663322205212150185548173325245326687006350471085906474424139214665894309014843232664580071648762970141939325934391461603988349238406371891899764015331607157764820501119859517842817263154144296529217744822336222713126177026660948536196380671291417716445879792833421808170519968276572051729552893703273805485452634604874023335630291855374040917815813579153451113897582343438984070631839576435987567938122511357628737757752466885746823647238308016138817160260882469913582764095375057038376431677065980310898526545604899284277903345433337475073505927351135841580998628593315591233102177419043876529005976627144706962548728624346366620314613883944112274466067716221566331310847730297839267227758383581417619708227770307157701015499662648837015760016403490434662267340166149600711234238649382227683023575106619793652973520852561975513130832347638434591447254593870230868992579692423804051591231941102274995499547872590306236750772910484499658707986231527889667439755818544587568671511704041552947741765012407005468426925382856450631293338167006849070174965841980824108504138055884305334634504972792072357981421920529778454782274238837712317682728583077417401310757286053162501316869801695344659305405891714756295408818074842286559590761824129600312978354796042091895556512170218768603155987271860951665761324578631906577765794794750140647664492666263719257314522356039610887093633970719700554697488399378627619208028811821813910864995808299033494558337898330342990498307814118879423310970145254782757690048081112784251033646595974199717223975889479812518269299167130326616332598173334275646063252307035552666478835197256620185003866264336541532798278960342875145684274259105651399634034570327742164038945451782032773651511125969908212743306978117442939724764520786289769650671526094748449835146258514511486393852329192854364578518986423702526093320864721097811163795373305278414493868253427704660949261429426556545457722244277304495602230322490878872481434622303841879625938793251842124896862086185538826843626437462904285704800039520491148349738537752662820097821359318638357457398542703954245807177417680924462041466860855077520352234029444335408718833291523274660069756555198642865761420704097355446129442836460960346047244807071279736580666551818588258887341089226407146324431418927663710232609460847448789831295211592694477452248169283833866902004308081724662081804832442833819195649269397898108881144137975674127105223795874020709751458917436988811682303860093985314638544501867761931103989225118704607075566444506758900574437529325518651684120565562172746701627938286629343246236782886317888219747195209036678260399073301329194002270339512860573818510954218055448516071397294201898352812879896438547152105876753308931456531659380201228157866429633461749526648735581583253915895593786313013690045291634056149548970680386821563715481488658405024976872049591380206990615559789287185079636877766256443979088203384092288635349018796052509337329496091677531131114482418916709433759057531822101328279038110451033120810387955274071546033033925307992412161958325719825234803995202280054251635272711132302311226586252668777405738852921786505657697025167762863925524091648667236040832383589551876871794581426955871352793404494435805416440593579018163182041509070943148395153266866301284651698600712375689989632818305717576264514160184428475793244108893546412178896943436525335411342944803741126765826718105376006165110299767987286762765986860813145905449220797075083373003994784858789463452193882495977608956077012275839430960320019414849450431548279502942169215853085238172068908959183048860196764368783277552622879280695692367132363069121294984879106237801030651874197199007985681743954729370135182941199237083838683022881281865067784888629196503976506645028772359126315048509741384566206457774861494784875608150544872396133044896719697226661992908055377678079724100786458585225933941989643636337476373400784962516077514394952639097183278087424384655141222841621107816440810148764301454715916582099546804815846535080978652847221624580972630672434752043092304677414021326911467870964727798696080509209068682693383376693737589344765903637511004681455094031498012237231495158463996175277807367343814670733147352577539963515326320756067723162569590837557313083211779865003152877035528938614631114840880624572530284565212400915070707646659493817533333717037843058257143071118184157649916019674153090833873144900912422182393717011264194105036808525286279222808334383480449485088350771601212416124272038651131112860750011652862937196384089632568812211633387012020648002658199328076027092123766558507559960104669640023669935201702291766079275943674666676369000495572602105533655688032996354230541299543624287700971281386141437516949343858293394389170175751962820093162395149596771933971049730962853332793240086422933222867582777018853003015049935918491444813583043221896716289690113). + #$14123344600715962023739883023381359267419384418556983742654472755048670175517607443774381335712778257267524175124262695317133160120031965541064851374970978625475024321502579901943638609379899512505370953447459046540573536373438061107636670291720353519503531207142656284206624511188029924355208649167114153287743608646582675697448678892761005294442011553961552283403643121394896818551583185062574074404896792936320510477542273120097086870357453641388606139735301335108047031266345717678353903674894232385548698066072174745632310359063725574080625382617026228775288813827371868644388955835273083002188358093582098864434418741298399514078732209344108075318991260071230776663519851796843412159349584896557933313330631475331207728204797920630096546971401990209193139224823345750411706727610271444543309632891031296562071925006114837760365399237875158893785371591179747241560826481982240588831924245137677078928353964910537362916428163626211892220460552684585108694752859413716892864157880419914544530873773141738328533098891482547122155313477912007257255616230457907318837417878413877220833983197319447217210108096282895023579244935472961505819499109842607746680289029552871797356839040285835622682696963113818296098028841718126793384300132829663859857965162174800403813557877492522026133595553686863186971044558154550933768790783350437451783141122450703668835308229371009163185206567141293583425658724700400811582673209644623173088508040928241700868671976756421813603042639956644076867289253776523587443987876583111015198748356635567695529566765299729741289599314520492121915163081750772083577171025397559751341724109131195283124299752691911442747299044999983958294609468433807055952765810931522228397518205161901226964591085176624000827536978873686532189983634366340622629398234614062998750274091430915522896496152215318773280492226150116582015172274451757731930391375991572426713102886697990163552047436876177156029108807920518584538917697335254425422979597011931712730869029229815274368321841607532983507935452438435274600359824175135007936140516895945416720482997081955503162391240693333736611578403067292413614787514855842710380697684264467650017640365427212172429871280731879610358540376883952956246588007758459519391427922013364683645266286737467524742344145764162522763078046755775302075210729690199605186160304677438982731921428920832730859511972736933630703514045599183106837831589663338632363535039789452609763515936689380610968474658162162306393223730141176868956373836907821067093335261193148818958215466484209973057397290146425496427713314548102993923936145630353580887855151215876761735943096147493107075371840025404846997460912779744972683491154606878772023804043538637393091987910060565775047607711312971921232699441918211760693065006078998436568239545485464648331491167174532889604846260968702372321101872384941356075280043708325469596188698170260720514432281023064662353411943816930650961347188305604833891886569739589940745444489926750026971713440901981528165580123358057464901237501825072692342271641640679848374145262694121761372217718169242758317735814680942368537187064332406626904256106435322490576537236225576741336988454948722300706552585687198950410802377272455238551258583186847906496909580017199879280704983616127181608652468787262826931145967950971839249617312951323476101426147036238088374978881220313057828094196181488562250369084123438261386222014454687839373530764315965548199882087994377102793673006420412711017295621874210634051933378961034536728958477623573765050034949140044994618104279978712886357525541326712350648037877366412182049476810200181632572643798975410940270083416438586989177715207275547445911179009086982006963129251911198613601003589380199140324964109755605746186807803831691920036745787088461961245147103794428089322747736167727411608188952894163004499923665789679632392697424325473972767815280590957996854995996565975352176893253917120458436353545808660022150813278809735195149400344570245291132967741325213582542437994404324094367752550408712263374425159841663086870763518362624882354023172186711279774352188759283664373633696208800225678883369572634532809061149111274282347011650638699693154148416225304794477283083848817329687009774401454685496725632384654250376974786732390370867545505247724389115622051233724919858873543883909611964515562220015894579599335181426604476263046015999444759327959583254430083809780588862414935680584984016408226503348832013806463445891346961345345595985586959141234105167506513286722940925932919488651095059697977061194812626816867999761235877375766300856619030582650880375781241984665341919860354921269428949758450300242479692259660037503524481579576327930368989238788141770787764095014342642781405987204640908883715669951693505155219527585015619579191505162136991289773089926687292489726177261166939659868756413457805883748663042349596037033521048922615393503059387292716578457666656971494536051019654498934636162325459053406735880645605248855032201631060338232551614293798873705720343963297543903091926603181808220163956464390944932829117318373333283566723025884584575943027344284645605728474620063076190048729214282374669460913890595312586876080495264949824112472292496577313729938559344000441461651107954411956926078707571522516776428982399515926613736406141086913388618566875226357350055921903214486360697178067587598130732662955833654155497529041244103610359986438716238742246807656052271272395672351327927021961538044244142689734075704383045254762073552004370852541433656499586130628036514535975574836374255961689125041028974824539745792030555840786505794742809207594862163604179602449576554360593178548149506401830960970992715118671986371778964466873220714296828507670267287997151172977978649324238855824103067372718162578224802743170171894024735836745321435901926902982341038180251889753175961981133381585700845765286191658251803780844795340597517128429875446889345924600597455399215095738988010628386447776148794974927072038712664597724987105294854177028662682234691071260325063688581162604387967628229443540529979121). UPGRADED-ARRAY-ELEMENT-TYPE.ERROR.1 UPGRADED-ARRAY-ELEMENT-TYPE.ERROR.2 VECTOR.TYPE.1 VECTOR.TYPE.2 VECTOR.TYPE.3 VECTOR.TYPE.4 VECTOR.TYPE.5 VECTOR.TYPE.6 VECTOR.TYPE.7 @@ -19915,546 +19931,27 @@ Expected value: PROGRAM-ERROR Actual value: #<"MPE11" package>. WITH-PACKAGE-ITERATOR.1 WITH-PACKAGE-ITERATOR.2 - WITH-PACKAGE-ITERATOR.3 WITH-PACKAGE-ITERATOR.4 - WITH-PACKAGE-ITERATOR.5 WITH-PACKAGE-ITERATOR.6 - WITH-PACKAGE-ITERATOR.7 WITH-PACKAGE-ITERATOR.8 - WITH-PACKAGE-ITERATOR.9 WITH-PACKAGE-ITERATOR.10 - WITH-PACKAGE-ITERATOR.11Package #<"MPE11" package> -Package #<"TEST-DPE2" package> -Package #<"LOOP.16.PACKAGE" package> -Package #<"LOOP.15.PACKAGE" package> -Package #<"STRUCT-TEST-PACKAGE" package> -Package #<"DS4" package> -Package #<"DS3" package> -Package #<"DS2" package> -Package #<"DS1" package> -Package #<"B" package> -Package #<"A" package> -Package #<"LOOP.CL-TEST.2" package> -Package #<"LOOP.CL-TEST.1" package> -Package #<"CL-TEST" package> -Package #<"REGRESSION-TEST" package> -Package #<"CONDITIONS" package> -Package #<"SLOT-ACCESSOR-NAME" package> -Package #<"PCL" package> -Package #<"ITERATE" package> -Package #<"WALKER" package> -Package #<"XLIB" package> -Package #<"CLTL1-COMPAT" package> -Package #<"FPE" package> -Package #<"TK" package> -Package #<"DEFPACKAGE" package> -Package #<"ANSI-LOOP" package> -Package #<"SLOOP" package> -Package #<"COMPILER" package> -Package #<"SYSTEM" package> -Package #<"KEYWORD" package> -Package #<"COMMON-LISP-USER" package> -Package #<"COMMON-LISP" package> - WITH-PACKAGE-ITERATOR.12Package #<"MPE11" package> -Package #<"TEST-DPE2" package> -Package #<"LOOP.16.PACKAGE" package> -Package #<"LOOP.15.PACKAGE" package> -Package #<"STRUCT-TEST-PACKAGE" package> -Package #<"DS4" package> -Package #<"DS3" package> -Package #<"DS2" package> -Package #<"DS1" package> -Package #<"B" package> -Package #<"A" package> -Package #<"LOOP.CL-TEST.2" package> -Package #<"LOOP.CL-TEST.1" package> -Package #<"CL-TEST" package> -Package #<"REGRESSION-TEST" package> -Package #<"CONDITIONS" package> -Package #<"SLOT-ACCESSOR-NAME" package> -Package #<"PCL" package> -Package #<"ITERATE" package> -Package #<"WALKER" package> -Package #<"XLIB" package> -Package #<"CLTL1-COMPAT" package> -Package #<"FPE" package> -Package #<"TK" package> -Package #<"DEFPACKAGE" package> -Package #<"ANSI-LOOP" package> -Package #<"SLOOP" package> -Package #<"COMPILER" package> -Package #<"SYSTEM" package> -Package #<"KEYWORD" package> -Package #<"COMMON-LISP-USER" package> -Package #<"COMMON-LISP" package> - WITH-PACKAGE-ITERATOR.13Package #<"MPE11" package> -Package #<"TEST-DPE2" package> -Package #<"LOOP.16.PACKAGE" package> -Package #<"LOOP.15.PACKAGE" package> -Package #<"STRUCT-TEST-PACKAGE" package> -Package #<"DS4" package> -Package #<"DS3" package> -Package #<"DS2" package> -Package #<"DS1" package> -Package #<"B" package> -Package #<"A" package> -Package #<"LOOP.CL-TEST.2" package> -Package #<"LOOP.CL-TEST.1" package> -Package #<"CL-TEST" package> -Package #<"REGRESSION-TEST" package> -Package #<"CONDITIONS" package> -Package #<"SLOT-ACCESSOR-NAME" package> -Package #<"PCL" package> -Package #<"ITERATE" package> -Package #<"WALKER" package> -Package #<"XLIB" package> -Package #<"CLTL1-COMPAT" package> -Package #<"FPE" package> -Package #<"TK" package> -Package #<"DEFPACKAGE" package> -Package #<"ANSI-LOOP" package> -Package #<"SLOOP" package> -Package #<"COMPILER" package> -Package #<"SYSTEM" package> -Package #<"KEYWORD" package> -Package #<"COMMON-LISP-USER" package> -Package #<"COMMON-LISP" package> - WITH-PACKAGE-ITERATOR.14 UNEXPORT.1 UNEXPORT.2 UNEXPORT.3 UNEXPORT.4 - UNEXPORT.5 UNEXPORT.6 UNEXPORT.ERROR.1 UNEXPORT.ERROR.2 UNINTERN.1 - UNINTERN.2 UNINTERN.3 UNINTERN.4 UNINTERN.5 UNINTERN.6 UNINTERN.7Properly threw an error: # - UNINTERN.8 UNINTERN.9 UNINTERN.ERROR.1 UNINTERN.ERROR.2 IN-PACKAGE.1 - IN-PACKAGE.2 IN-PACKAGE.3 IN-PACKAGE.4 IN-PACKAGE.5 UNUSE-PACKAGE.1 - UNUSE-PACKAGE.2 UNUSE-PACKAGE.3 UNUSE-PACKAGE.4 UNUSE-PACKAGE.5 - UNUSE-PACKAGE.6 UNUSE-PACKAGE.7 UNUSE-PACKAGE.8 UNUSE-PACKAGE.9 - UNUSE-PACKAGE.ERROR.1 UNUSE-PACKAGE.ERROR.2 USE-PACKAGE.1 - USE-PACKAGE.2 USE-PACKAGE.3 USE-PACKAGE.4 USE-PACKAGE.5 USE-PACKAGE.6 - USE-PACKAGE.ERROR.1 USE-PACKAGE.ERROR.2 DEFPACKAGE.1 DEFPACKAGE.2 - DEFPACKAGE.3 DEFPACKAGE.4 DEFPACKAGE.5 DEFPACKAGE.6 DEFPACKAGE.7 - DEFPACKAGE.8 DEFPACKAGE.9 DEFPACKAGE.10 DEFPACKAGE.11 DEFPACKAGE.12 - DEFPACKAGE.13 DEFPACKAGE.14 DEFPACKAGE.15 DEFPACKAGE.16 DEFPACKAGE.17 - DEFPACKAGE.18 DEFPACKAGE.19 DEFPACKAGE.20 DEFPACKAGE.21 DEFPACKAGE.22 - DEFPACKAGE.23 DEFPACKAGE.24 DEFPACKAGE.25Making G1... -Making G2... -Making G3... -Making G1... -Making G2... -Making G3... - DEFPACKAGE.26 DO-SYMBOLS.1 DO-SYMBOLS.2 DO-SYMBOLS.3 DO-SYMBOLS.4 - DO-SYMBOLS.5 DO-EXTERNAL-SYMBOLS.1 DO-EXTERNAL-SYMBOLS.2 - DO-EXTERNAL-SYMBOLS.3 DO-EXTERNAL-SYMBOLS.4 DO-EXTERNAL-SYMBOLS.5 - DO-SYMBOLS.6 DO-EXTERNAL-SYMBOLS.6 DO-SYMBOLS.7 DO-EXTERNAL-SYMBOLS.7 - DO-SYMBOLS.8 DO-EXTERNAL-SYMBOLS.8 PACKAGEP.1 PACKAGEP.2 - PACKAGEP.ERROR.1 PACKAGEP.ERROR.2 PACKAGE-ERROR.1 PACKAGE-ERROR.2 -Test PACKAGE-ERROR.3 failed -Form: (SUBTYPEP* 'PACKAGE-ERROR 'ERROR) -Expected values: T - T -Actual values: NIL - NIL. - PACKAGE-ERROR.4 PACKAGE-ERROR-PACKAGE.1 PACKAGE-ERROR-PACKAGE.2 - PACKAGE-ERROR-PACKAGE.3 PACKAGE-ERROR-PACKAGE.4 - PACKAGE-ERROR-PACKAGE.ERROR.1 PACKAGE-ERROR-PACKAGE.ERROR.2 KEYWORD.1 - KEYWORD.2 KEYWORD.3 PACKAGE-SHADOWING-SYMBOLS.ERROR.1 - PACKAGE-SHADOWING-SYMBOLS.ERROR.2 PACKAGE-USE-LIST.ERROR.1 - PACKAGE-USE-LIST.ERROR.2 PACKAGE-USED-BY-LIST.ERROR.1 - PACKAGE-USED-BY-LIST.ERROR.2 COPY-SEQ.1 COPY-SEQ.2 COPY-SEQ.3 - COPY-SEQ.4 COPY-SEQ.5 COPY-SEQ.6 COPY-SEQ.7 COPY-SEQ.8 COPY-SEQ.9 - COPY-SEQ.10 COPY-SEQ.11 COPY-SEQ.12 COPY-SEQ.13 COPY-SEQ.14 - COPY-SEQ.15 COPY-SEQ.16 COPY-SEQ.17 COPY-SEQ.18 COPY-SEQ.ORDER.1 - COPY-SEQ.ERROR.1 COPY-SEQ.ERROR.2 COPY-SEQ.ERROR.3 COPY-SEQ.ERROR.4 - COPY-SEQ.ERROR.5 COPY-SEQ.ERROR.6 ELT.1 ELT.1A ELT.1B ELT.2 ELT.3 - ELT.4 ELT.5 ELT.5A ELT.6 ELT.7 ELT.8 ELT.9 ELT.10 ELT.11 ELT.12 ELT.13 - ELT.14 ELT.15 ELT.16 ELT.17 ELT.18 ELT.19 ELT.ORDER.1 ELT.ORDER.2 - ELT-V.1 ELT-V.3 ELT-V.4 ELT-V.5 ELT-V.6 ELT-V.7 ELT-V.8 ELT-V.9 - ELT-V.10 ELT-V.11 ELT-V.12 ELT-V.13 ELT-ADJ-ARRAY.1 ELT-ADJ-ARRAY.3 - ELT-ADJ-ARRAY.4 ELT-ADJ-ARRAY.5 ELT-ADJ-ARRAY.6 ELT-ADJ-ARRAY.7 - ELT-ADJ-ARRAY.8 ELT-ADJ-ARRAY.9 ELT-ADJ-ARRAY.10 ELT-ADJ-ARRAY.11 - ELT-ADJ-ARRAY.12 ELT-ADJ-ARRAY.13 ELT-DISPLACED-ARRAY.1 - ELT-DISPLACED-ARRAY.2 ELT-DISPLACED-ARRAY.3 ELT-FILL-POINTER.1 - ELT-FILL-POINTER.2 ELT-FILL-POINTER.3 ELT-FILL-POINTER.4 - ELT-FILL-POINTER.5 ELT-FILL-POINTER.6 ELT-FILL-POINTER.7 - ELT-FILL-POINTER.8 ELT.ERROR.1 ELT.ERROR.2 ELT.ERROR.3 FILL.ERROR.1 - FILL.ERROR.2 FILL.ERROR.3 FILL.ERROR.4 FILL.ERROR.5 FILL.ERROR.6 - FILL.ERROR.7 FILL.ERROR.8 FILL.ERROR.10 FILL.ERROR.11 ARRAY-FILL-1 - ARRAY-FILL-2 ARRAY-FILL-3 ARRAY-FILL-4 ARRAY-FILL-5 ARRAY-FILL-6 - ARRAY-FILL-7 ARRAY-FILL-8 ARRAY-FILL-9 ARRAY-FILL-10 - ARRAY-FIXNUM-FILL-1 ARRAY-FIXNUM-FILL-2 ARRAY-FIXNUM-FILL-3 - ARRAY-FIXNUM-FILL-4 ARRAY-FIXNUM-FILL-5 ARRAY-FIXNUM-FILL-6 - ARRAY-FIXNUM-FILL-7 ARRAY-FIXNUM-FILL-8 ARRAY-FIXNUM-FILL-9 - ARRAY-FIXNUM-FILL-10 ARRAY-UNSIGNED-BYTE8-FILL-1 - ARRAY-UNSIGNED-BYTE8-FILL-2 ARRAY-UNSIGNED-BYTE8-FILL-3 - ARRAY-UNSIGNED-BYTE8-FILL-4 ARRAY-UNSIGNED-BYTE8-FILL-5 - ARRAY-UNSIGNED-BYTE8-FILL-6 ARRAY-UNSIGNED-BYTE8-FILL-7 - ARRAY-UNSIGNED-BYTE8-FILL-8 ARRAY-UNSIGNED-BYTE8-FILL-9 - ARRAY-UNSIGNED-BYTE8-FILL-10 ARRAY-FILL-POINTER-FILL.1 - ARRAY-FILL-POINTER-FILL.2 FILL.STRING.1 FILL.STRING.2 FILL.STRING.3 - FILL.STRING.4 FILL.STRING.5 FILL.STRING.6 FILL.STRING.7 FILL.STRING.8 - FILL.STRING.9 FILL.STRING.10 FILL.BIT-VECTOR.1 FILL.BIT-VECTOR.2 - FILL.BIT-VECTOR.3 FILL.BIT-VECTOR.4 FILL.BIT-VECTOR.5 - FILL.BIT-VECTOR.6 FILL.BIT-VECTOR.7 FILL.BIT-VECTOR.8 - FILL.BIT-VECTOR.9 FILL.ALLOW-OTHER-KEYS.1 FILL.ALLOW-OTHER-KEYS.2 - FILL.ALLOW-OTHER-KEYS.3 FILL.ALLOW-OTHER-KEYS.4 - FILL.ALLOW-OTHER-KEYS.5 FILL.ALLOW-OTHER-KEYS.6 - FILL.ALLOW-OTHER-KEYS.7 FILL.ORDER.1 FILL.ORDER.2 FILL.ORDER.3 - FILL.ORDER.4 ARRAY-STRING-FILL.1 ARRAY-STRING-FILL.2 - ARRAY-STRING-FILL.3 ARRAY-STRING-FILL.4 ARRAY-STRING-FILL.5 - MAKE-SEQUENCE.1 MAKE-SEQUENCE.2 MAKE-SEQUENCE.3 MAKE-SEQUENCE.4 - MAKE-SEQUENCE.5 MAKE-SEQUENCE.6 MAKE-SEQUENCE.7 MAKE-SEQUENCE.8 - MAKE-SEQUENCE.9 MAKE-SEQUENCE.10 MAKE-SEQUENCE.11 MAKE-SEQUENCE.12 - MAKE-SEQUENCE.13 MAKE-SEQUENCE.14 MAKE-SEQUENCE.15 MAKE-SEQUENCE.16 - MAKE-SEQUENCE.17 MAKE-SEQUENCE.18 MAKE-SEQUENCE.19 MAKE-SEQUENCE.20 - MAKE-SEQUENCE.21 MAKE-SEQUENCE.22 MAKE-SEQUENCE.23 MAKE-SEQUENCE.24 - MAKE-SEQUENCE.25 MAKE-SEQUENCE.26 MAKE-SEQUENCE.ALLOW-OTHER-KEYS.1 - MAKE-SEQUENCE.ALLOW-OTHER-KEYS.2 MAKE-SEQUENCE.ALLOW-OTHER-KEYS.3 - MAKE-SEQUENCE.ALLOW-OTHER-KEYS.4 MAKE-SEQUENCE.ALLOW-OTHER-KEYS.5 - MAKE-SEQUENCE.KEYWORDS.6 MAKE-SEQUENCE.ERROR.1 -Test MAKE-SEQUENCE.ERROR.2 failed -Form: (CLASSIFY-ERROR (MAKE-SEQUENCE 'NULL 1)) -Expected value: TYPE-ERROR -Actual value: (NIL). - MAKE-SEQUENCE.ERROR.3 MAKE-SEQUENCE.ERROR.4 MAKE-SEQUENCE.ERROR.5 - MAKE-SEQUENCE.ERROR.6 MAKE-SEQUENCE.ERROR.7 MAKE-SEQUENCE.ERROR.8 - MAKE-SEQUENCE.ERROR.9 MAKE-SEQUENCE.ERROR.10 MAKE-SEQUENCE.ERROR.11 - MAKE-SEQUENCE.ERROR.12 MAKE-SEQUENCE.ERROR.13 MAKE-SEQUENCE.ERROR.14 - MAKE-SEQUENCE.ORDER.1 MAKE-SEQUENCE.ORDER.2 MAP-ARRAY.1 MAP-ARRAY.2 - MAP-ARRAY.3 MAP-ARRAY.4 MAP-ARRAY.5 MAP-ARRAY.6 MAP-ARRAY.9 - MAP-ARRAY.10 MAP-ARRAY.11 MAP-ARRAY.12 MAP-ARRAY.13 MAP-ARRAY.14 - MAP-BIT-VECTOR.15 MAP-BIT-VECTOR.16 MAP-BIT-VECTOR.17 - MAP-BIT-VECTOR.18 MAP-BIT-VECTOR.19 MAP-BIT-VECTOR.20 - MAP-BIT-VECTOR.21 MAP-BIT-VECTOR.22 MAP-BIT-VECTOR.23 - MAP-BIT-VECTOR.24 MAP-BIT-VECTOR.25 MAP-STRING.26 MAP-STRING.27 - MAP-STRING.28 MAP-STRING.29 MAP-STRING.30 MAP-NIL.33 MAP-NIL.34 - MAP-NIL.35 MAP-NIL.36 MAP-NULL.1 MAP-CONS.1 MAP.ERROR.1 MAP.ERROR.2 - MAP.ERROR.3 MAP.ERROR.4 MAP.ERROR.5 MAP.ERROR.6 MAP.ERROR.7 - MAP.ERROR.8 MAP.ERROR.9 MAP.FILL.1 MAP.FILL.2 MAP.FILL.3 MAP.FILL.4 - MAP.FILL.5 MAP.FILL.6 MAP.ORDER.1 MAP-INTO-LIST.1 MAP-INTO-LIST.2 - MAP-INTO-LIST.3 MAP-INTO-LIST.4 MAP-INTO-LIST.5 MAP-INTO-LIST.6 - MAP-INTO-LIST.7 MAP-INTO-LIST.8 MAP-INTO-ARRAY.1 MAP-INTO-ARRAY.2 - MAP-INTO-ARRAY.3 MAP-INTO-ARRAY.4 MAP-INTO-ARRAY.5 MAP-INTO-ARRAY.6 - MAP-INTO-ARRAY.7 MAP-INTO-ARRAY.8 MAP-INTO-ARRAY.9 MAP-INTO-ARRAY.10 - MAP-INTO-ARRAY.11 MAP-INTO-STRING.1 MAP-INTO-STRING.2 - MAP-INTO-STRING.3 MAP-INTO-STRING.4 MAP-INTO-STRING.5 - MAP-INTO-STRING.6 MAP-INTO-STRING.7 MAP-INTO-STRING.8 - MAP-INTO-STRING.9 MAP-INTO-STRING.10 MAP-INTO-STRING.11 - MAP-INTO-STRING.12 MAP-INTO.BIT-VECTOR.1 MAP-INTO.BIT-VECTOR.2 - MAP-INTO.BIT-VECTOR.3 MAP-INTO.BIT-VECTOR.4 MAP-INTO.BIT-VECTOR.5 - MAP-INTO.BIT-VECTOR.6 MAP-INTO.BIT-VECTOR.7 MAP-INTO.BIT-VECTOR.8 - MAP-INTO.BIT-VECTOR.9 MAP-INTO.ERROR.1 MAP-INTO.ERROR.2 - MAP-INTO.ERROR.3 MAP-INTO.ERROR.4 MAP-INTO.ERROR.5 MAP-INTO.ERROR.6 - MAP-INTO.ERROR.7 MAP-INTO.ERROR.8 MAP-INTO.ORDER.1 MAP-INTO.ORDER.2 - REDUCE-LIST.1 REDUCE-LIST.2 REDUCE-LIST.3 REDUCE-LIST.4 REDUCE-LIST.5 - REDUCE-LIST.6 REDUCE-LIST.7 REDUCE-LIST.8 REDUCE-LIST.9 REDUCE-LIST.10 - REDUCE-LIST.11 REDUCE-LIST.12 REDUCE-LIST.13 REDUCE-LIST.14 - REDUCE-LIST.15 REDUCE-LIST.16 REDUCE-LIST.17 REDUCE-ARRAY.1 - REDUCE-ARRAY.2 REDUCE-ARRAY.3 REDUCE-ARRAY.4 REDUCE-ARRAY.5 - REDUCE-ARRAY.6 REDUCE-ARRAY.7 REDUCE-ARRAY.8 REDUCE-ARRAY.9 - REDUCE-ARRAY.10 REDUCE-ARRAY.11 REDUCE-ARRAY.12 REDUCE-ARRAY.13 - REDUCE-ARRAY.14 REDUCE-ARRAY.15 REDUCE-ARRAY.16 REDUCE-ARRAY.17 - REDUCE-ARRAY.18 REDUCE-ARRAY.19 REDUCE.ERROR.1 -Test REDUCE.ERROR.2 failed -Form: (CLASSIFY-ERROR (REDUCE)) -Expected value: PROGRAM-ERROR -Actual value: TYPE-ERROR. - REDUCE.ERROR.3 REDUCE.ERROR.4 -Test REDUCE.ERROR.5 failed -Form: (CLASSIFY-ERROR (REDUCE #'LIST NIL 'BAD T :ALLOW-OTHER-KEYS NIL)) -Expected value: PROGRAM-ERROR -Actual value: NIL. - REDUCE.ERROR.6 REDUCE.ERROR.7 REDUCE.ERROR.8 REDUCE.ERROR.9 - REDUCE.ERROR.10 REDUCE-STRING.1 REDUCE-STRING.2 REDUCE-STRING.3 - REDUCE-STRING.4 REDUCE-STRING.5 REDUCE-STRING.6 REDUCE-STRING.7 - REDUCE-STRING.8 REDUCE-STRING.9 REDUCE-STRING.10 REDUCE-STRING.11 - REDUCE-STRING.12 REDUCE-STRING.13 REDUCE-STRING.14 REDUCE-STRING.15 - REDUCE-STRING.16 REDUCE-STRING.17 REDUCE-BITSTRING.1 - REDUCE-BITSTRING.2 REDUCE-BITSTRING.3 REDUCE-BITSTRING.4 - REDUCE-BITSTRING.5 REDUCE-BITSTRING.6 REDUCE-BITSTRING.7 - REDUCE-BITSTRING.8 REDUCE-BITSTRING.9 REDUCE-BITSTRING.10 - REDUCE-BITSTRING.11 REDUCE-BITSTRING.12 REDUCE-BITSTRING.13 - REDUCE-BITSTRING.14 REDUCE-BITSTRING.15 REDUCE-BITSTRING.16 - REDUCE-BITSTRING.17 REDUCE-BITSTRING.18 REDUCE.ORDER.1 REDUCE.ORDER.2 - REDUCE.ORDER.3 REDUCE.ALLOW-OTHER-KEYS.1 REDUCE.ALLOW-OTHER-KEYS.2 - REDUCE.ALLOW-OTHER-KEYS.3 REDUCE.ALLOW-OTHER-KEYS.4 - REDUCE.ALLOW-OTHER-KEYS.5 REDUCE.ALLOW-OTHER-KEYS.6 - REDUCE.ALLOW-OTHER-KEYS.7 REDUCE.ALLOW-OTHER-KEYS.8 REDUCE.KEYWORDS.9 - COUNT-LIST.1 COUNT-LIST.2 COUNT-LIST.3 COUNT-LIST.4 COUNT-LIST.5 - COUNT-LIST.6 COUNT-LIST.7 COUNT-LIST.8 COUNT-LIST.9 COUNT-LIST.10 - COUNT-LIST.11 COUNT-LIST.12 COUNT-LIST.13 COUNT-LIST.14 COUNT-LIST.15 - COUNT-LIST.16 COUNT-VECTOR.1 COUNT-VECTOR.2 COUNT-VECTOR.3 - COUNT-VECTOR.4 COUNT-VECTOR.5 COUNT-VECTOR.6 COUNT-VECTOR.7 - COUNT-VECTOR.8 COUNT-VECTOR.9 COUNT-VECTOR.10 COUNT-VECTOR.11 - COUNT-VECTOR.12 COUNT-VECTOR.13 COUNT-VECTOR.14 COUNT-VECTOR.15 - COUNT-VECTOR16 COUNT-FILLED-VECTOR.1 COUNT-FILLED-VECTOR.2 - COUNT-FILLED-VECTOR.3 COUNT-FILLED-VECTOR.4 COUNT-FILLED-VECTOR.5 - COUNT-FILLED-VECTOR.6 COUNT-FILLED-VECTOR.7 COUNT-FILLED-VECTOR.8 - COUNT-FILLED-VECTOR.9 COUNT-FILLED-VECTOR.10 COUNT-FILLED-VECTOR.11 - COUNT-FILLED-VECTOR.12 COUNT-FILLED-VECTOR.13 COUNT-FILLED-VECTOR.14 - COUNT-FILLED-VECTOR.15 COUNT-FILLED-VECTOR.16 COUNT-FILLED-VECTOR.17 - COUNT-FILLED-VECTOR.18 COUNT-FILLED-VECTOR.19 COUNT-FILLED-VECTOR.20 - COUNT-BIT-VECTOR.1 COUNT-BIT-VECTOR.2 COUNT-BIT-VECTOR.3 - COUNT-BIT-VECTOR.4 COUNT-BIT-VECTOR.5 COUNT-BIT-VECTOR.6 - COUNT-BIT-VECTOR.7 COUNT-BIT-VECTOR.8 COUNT-BIT-VECTOR.9 - COUNT-BIT-VECTOR.10 COUNT-BIT-VECTOR.11 COUNT-BIT-VECTOR.12 - COUNT-BIT-VECTOR.13 COUNT-BIT-VECTOR.14 COUNT-BIT-VECTOR.15 - COUNT-BIT-VECTOR.16 COUNT-BIT-VECTOR.17 COUNT-BIT-VECTOR.18 - COUNT-BIT-VECTOR.19 COUNT-BIT-VECTOR.20 COUNT-STRING.1 COUNT-STRING.2 - COUNT-STRING.3 COUNT-STRING.4 COUNT-STRING.5 COUNT-STRING.6 - COUNT-STRING.7 COUNT-STRING.8 COUNT-STRING.9 COUNT-STRING.10 - COUNT-STRING.11 COUNT-STRING.12 COUNT-STRING.13 COUNT-STRING.14 - COUNT-STRING.15 COUNT-STRING.16 COUNT-STRING.17 COUNT-STRING.18 - COUNT-STRING.19 COUNT-STRING.20 COUNT.ORDER.1 COUNT.ORDER.2 - COUNT.ALLOW-OTHER-KEYS.1 COUNT.ALLOW-OTHER-KEYS.2 - COUNT.ALLOW-OTHER-KEYS.3 COUNT.KEYWORDS.4 COUNT.ALLOW-OTHER-KEYS.5 - COUNT.ERROR.1 COUNT.ERROR.2 COUNT.ERROR.3 COUNT.ERROR.4 COUNT.ERROR.5 - COUNT.ERROR.6 COUNT.ERROR.7 COUNT.ERROR.8 COUNT.ERROR.9 COUNT.ERROR.10 - COUNT.ERROR.11 COUNT.ERROR.12 COUNT.ERROR.13 COUNT.ERROR.14 - COUNT.ERROR.15 COUNT-IF-LIST.1 COUNT-IF-LIST.2 COUNT-IF-LIST.3 - COUNT-IF-LIST.4 COUNT-IF-LIST.5 COUNT-IF-LIST.6 COUNT-IF-LIST.8 - COUNT-IF-LIST.9 COUNT-IF-LIST.10 COUNT-IF-LIST.11 COUNT-IF-LIST.12 - COUNT-IF-LIST.13 COUNT-IF-LIST.14 COUNT-IF-LIST.15 COUNT-IF-LIST.16 - COUNT-IF-VECTOR.1 COUNT-IF-VECTOR.2 COUNT-IF-VECTOR.3 - COUNT-IF-VECTOR.4 COUNT-IF-VECTOR.5 COUNT-IF-VECTOR.6 - COUNT-IF-VECTOR.8 COUNT-IF-VECTOR.9 COUNT-IF-VECTOR.10 - COUNT-IF-VECTOR.11 COUNT-IF-VECTOR.12 COUNT-IF-VECTOR.13 - COUNT-IF-VECTOR.14 COUNT-IF-VECTOR.15 COUNT-IF-VECTOR.16 - COUNT-IF-NONSIMPLE-VECTOR.1 COUNT-IF-NONSIMPLE-VECTOR.2 - COUNT-IF-NONSIMPLE-VECTOR.3 COUNT-IF-NONSIMPLE-VECTOR.4 - COUNT-IF-NONSIMPLE-VECTOR.5 COUNT-IF-NONSIMPLE-VECTOR.6 - COUNT-IF-NONSIMPLE-VECTOR.8 COUNT-IF-NONSIMPLE-VECTOR.9 - COUNT-IF-NONSIMPLE-VECTOR.10 COUNT-IF-NONSIMPLE-VECTOR.11 - COUNT-IF-NONSIMPLE-VECTOR.12 COUNT-IF-NONSIMPLE-VECTOR.13 - COUNT-IF-NONSIMPLE-VECTOR.14 COUNT-IF-NONSIMPLE-VECTOR.15 - COUNT-IF-NONSIMPLE-VECTOR.16 COUNT-IF-NONSIMPLE-VECTOR.17 - COUNT-IF-BIT-VECTOR.1 COUNT-IF-BIT-VECTOR.2 COUNT-IF-BIT-VECTOR.3 - COUNT-IF-BIT-VECTOR.4 COUNT-IF-BIT-VECTOR.5 COUNT-IF-BIT-VECTOR.6 - COUNT-IF-BIT-VECTOR.8 COUNT-IF-BIT-VECTOR.10 COUNT-IF-BIT-VECTOR.11 - COUNT-IF-BIT-VECTOR.12 COUNT-IF-BIT-VECTOR.13 COUNT-IF-BIT-VECTOR.14 - COUNT-IF-BIT-VECTOR.15 COUNT-IF-BIT-VECTOR.16 COUNT-IF-BIT-VECTOR.17 - COUNT-IF-STRING.1 COUNT-IF-STRING.2 COUNT-IF-STRING.3 - COUNT-IF-STRING.4 COUNT-IF-STRING.5 COUNT-IF-STRING.6 - COUNT-IF-STRING.8 COUNT-IF-STRING.11 COUNT-IF-STRING.12 - COUNT-IF-STRING.13 COUNT-IF-STRING.14 COUNT-IF-STRING.15 - COUNT-IF-STRING.16 COUNT-IF-STRING.17 COUNT-IF.ORDER.1 - COUNT-IF.ORDER.2 COUNT-IF.ALLOW-OTHER-KEYS.1 - COUNT-IF.ALLOW-OTHER-KEYS.2 COUNT-IF.ALLOW-OTHER-KEYS.3 - COUNT-IF.KEYWORDS.4 COUNT-IF.ALLOW-OTHER-KEYS.5 COUNT-IF.ERROR.1 - COUNT-IF.ERROR.2 COUNT-IF.ERROR.3 COUNT-IF.ERROR.4 COUNT-IF.ERROR.5 - COUNT-IF.ERROR.6 COUNT-IF.ERROR.7 COUNT-IF.ERROR.8 COUNT-IF.ERROR.9 - COUNT-IF.ERROR.10 COUNT-IF.ERROR.11 COUNT-IF.ERROR.12 - COUNT-IF.ERROR.13 COUNT-IF.ERROR.14 COUNT-IF.ERROR.15 - COUNT-IF-NOT-LIST.1 COUNT-IF-NOT-LIST.2 COUNT-IF-NOT-LIST.3 - COUNT-IF-NOT-LIST.4 COUNT-IF-NOT-LIST.5 COUNT-IF-NOT-LIST.6 - COUNT-IF-NOT-LIST.8 COUNT-IF-NOT-LIST.9 COUNT-IF-NOT-LIST.10 - COUNT-IF-NOT-LIST.11 COUNT-IF-NOT-LIST.12 COUNT-IF-NOT-LIST.13 - COUNT-IF-NOT-LIST.14 COUNT-IF-NOT-LIST.15 COUNT-IF-NOT-LIST.16 - COUNT-IF-NOT-VECTOR.1 COUNT-IF-NOT-VECTOR.2 COUNT-IF-NOT-VECTOR.3 - COUNT-IF-NOT-VECTOR.4 COUNT-IF-NOT-VECTOR.5 COUNT-IF-NOT-VECTOR.6 - COUNT-IF-NOT-VECTOR.8 COUNT-IF-NOT-VECTOR.9 COUNT-IF-NOT-VECTOR.10 - COUNT-IF-NOT-VECTOR.11 COUNT-IF-NOT-VECTOR.12 COUNT-IF-NOT-VECTOR.13 - COUNT-IF-NOT-VECTOR.14 COUNT-IF-NOT-VECTOR.15 COUNT-IF-NOT-VECTOR.16 - COUNT-IF-NOT-NONSIMPLE-VECTOR.1 COUNT-IF-NOT-NONSIMPLE-VECTOR.2 - COUNT-IF-NOT-NONSIMPLE-VECTOR.3 COUNT-IF-NOT-NONSIMPLE-VECTOR.4 - COUNT-IF-NOT-NONSIMPLE-VECTOR.5 COUNT-IF-NOT-NONSIMPLE-VECTOR.6 - COUNT-IF-NOT-NONSIMPLE-VECTOR.8 COUNT-IF-NOT-NONSIMPLE-VECTOR.9 - COUNT-IF-NOT-NONSIMPLE-VECTOR.10 COUNT-IF-NOT-NONSIMPLE-VECTOR.11 - COUNT-IF-NOT-NONSIMPLE-VECTOR.12 COUNT-IF-NOT-NONSIMPLE-VECTOR.13 - COUNT-IF-NOT-NONSIMPLE-VECTOR.14 COUNT-IF-NOT-NONSIMPLE-VECTOR.15 - COUNT-IF-NOT-NONSIMPLE-VECTOR.16 COUNT-IF-NOT-NONSIMPLE-VECTOR.17 - COUNT-IF-NOT-BIT-VECTOR.1 COUNT-IF-NOT-BIT-VECTOR.2 - COUNT-IF-NOT-BIT-VECTOR.3 COUNT-IF-NOT-BIT-VECTOR.4 - COUNT-IF-NOT-BIT-VECTOR.5 COUNT-IF-NOT-BIT-VECTOR.6 - COUNT-IF-NOT-BIT-VECTOR.8 COUNT-IF-NOT-BIT-VECTOR.10 - COUNT-IF-NOT-BIT-VECTOR.11 COUNT-IF-NOT-BIT-VECTOR.12 - COUNT-IF-NOT-BIT-VECTOR.13 COUNT-IF-NOT-BIT-VECTOR.14 - COUNT-IF-NOT-BIT-VECTOR.15 COUNT-IF-NOT-BIT-VECTOR.16 - COUNT-IF-NOT-BIT-VECTOR.17 COUNT-IF-NOT-STRING.1 COUNT-IF-NOT-STRING.2 - COUNT-IF-NOT-STRING.3 COUNT-IF-NOT-STRING.4 COUNT-IF-NOT-STRING.5 - COUNT-IF-NOT-STRING.6 COUNT-IF-NOT-STRING.8 COUNT-IF-NOT-STRING.11 - COUNT-IF-NOT-STRING.12 COUNT-IF-NOT-STRING.13 COUNT-IF-NOT-STRING.14 - COUNT-IF-NOT-STRING.15 COUNT-IF-NOT-STRING.16 COUNT-IF-NOT-STRING.17 - COUNT-IF-NOT.ORDER.1 COUNT-IF-NOT.ORDER.2 COUNT-IF-NOT.KEYWORDS.1 - COUNT-IF-NOT.KEYWORDS.2 COUNT-IF-NOT.KEYWORDS.3 - COUNT-IF-NOT.KEYWORDS.4 COUNT-IF-NOT.ALLOW-OTHER-KEYS.5 - COUNT-IF-NOT.ERROR.1 COUNT-IF-NOT.ERROR.2 COUNT-IF-NOT.ERROR.3 - COUNT-IF-NOT.ERROR.4 COUNT-IF-NOT.ERROR.5 COUNT-IF-NOT.ERROR.6 - COUNT-IF-NOT.ERROR.7 COUNT-IF-NOT.ERROR.8 COUNT-IF-NOT.ERROR.9 - COUNT-IF-NOT.ERROR.10 COUNT-IF-NOT.ERROR.11 COUNT-IF-NOT.ERROR.12 - COUNT-IF-NOT.ERROR.13 COUNT-IF-NOT.ERROR.14 COUNT-IF-NOT.ERROR.15 - REVERSE-LIST.1 REVERSE-LIST.2 REVERSE-VECTOR.1 REVERSE-VECTOR.2 - REVERSE-NONSIMPLE-VECTOR.1 REVERSE-NONSIMPLE-VECTOR.2 - REVERSE-NONSIMPLE-VECTOR.3 REVERSE-BIT-VECTOR.1 REVERSE-BIT-VECTOR.2 - REVERSE-BIT-VECTOR.3 REVERSE-STRING.1 REVERSE-STRING.2 - REVERSE-STRING.3 REVERSE-STRING.4 REVERSE.ORDER.1 REVERSE.ERROR.1 - REVERSE.ERROR.2 REVERSE.ERROR.3 REVERSE.ERROR.4 REVERSE.ERROR.5 - REVERSE.ERROR.6 REVERSE.ERROR.7 REVERSE.ERROR.8 NREVERSE-LIST.1 - NREVERSE-LIST.2 NREVERSE-VECTOR.1 NREVERSE-VECTOR.2 - NREVERSE-NONSIMPLE-VECTOR.1 NREVERSE-NONSIMPLE-VECTOR.2 - NREVERSE-NONSIMPLE-VECTOR.3 NREVERSE-BIT-VECTOR.1 - NREVERSE-BIT-VECTOR.2 NREVERSE-BIT-VECTOR.3 NREVERSE-STRING.1 - NREVERSE-STRING.2 NREVERSE-STRING.3 NREVERSE-STRING.4 NREVERSE.ORDER.1 - NREVERSE.ERROR.1 NREVERSE.ERROR.2 NREVERSE.ERROR.3 NREVERSE.ERROR.4 - NREVERSE.ERROR.5 NREVERSE.ERROR.6 NREVERSE.ERROR.7 NREVERSE.ERROR.8 - SORT-LIST.1 SORT-LIST.2 SORT-LIST.3 SORT-VECTOR.1 SORT-VECTOR.2 - SORT-VECTOR.3 SORT-VECTOR.4 SORT-BIT-VECTOR.1 SORT-BIT-VECTOR.2 - SORT-BIT-VECTOR.3 SORT-STRING.1 SORT-STRING.2 SORT-STRING.3 - SORT.ORDER.1 SORT.ORDER.2 -Test SORT.ERROR.1 failed -Form: (CLASSIFY-ERROR (SORT)) -Expected value: PROGRAM-ERROR -Actual value: TYPE-ERROR. -Test SORT.ERROR.2 failed -Form: (CLASSIFY-ERROR (SORT NIL)) -Expected value: PROGRAM-ERROR -Actual value: NIL. - SORT.ERROR.3 SORT.ERROR.4 -Test SORT.ERROR.5 failed -Form: (CLASSIFY-ERROR (SORT NIL #'< 'BAD T :ALLOW-OTHER-KEYS NIL)) -Expected value: PROGRAM-ERROR -Actual value: NIL. - SORT.ERROR.6 SORT.ERROR.7 SORT.ERROR.8 SORT.ERROR.9 SORT.ERROR.10 - FIND-LIST.1 FIND-LIST.2 FIND-LIST.3 FIND-LIST.4 FIND-LIST.5 - FIND-LIST.6 FIND-LIST.7 FIND-LIST.8 FIND-LIST.9 FIND-LIST.10 - FIND-LIST.11 FIND-LIST.12 FIND-LIST.13 FIND-LIST.14 FIND-LIST.15 - FIND-LIST.16 FIND-LIST.17 FIND-LIST.18 FIND-LIST.19 FIND-LIST.20 - FIND-LIST.21 FIND-LIST.22 FIND-LIST.23 FIND-LIST.24 FIND-LIST.25 - FIND-LIST.26 FIND-LIST.27 FIND-LIST.28 FIND-VECTOR.1 FIND-VECTOR.1A - FIND-VECTOR.2 FIND-VECTOR.2A FIND-VECTOR.3 FIND-VECTOR.4 FIND-VECTOR.5 - FIND-VECTOR.6 FIND-VECTOR.7 FIND-VECTOR.8 FIND-VECTOR.9 FIND-VECTOR.10 - FIND-VECTOR.11 FIND-VECTOR.12 FIND-VECTOR.13 FIND-VECTOR.14 - FIND-VECTOR.15 FIND-VECTOR.16 FIND-VECTOR.17 FIND-VECTOR.18 - FIND-VECTOR.19 FIND-VECTOR.20 FIND-VECTOR.21 FIND-VECTOR.22 - FIND-VECTOR.23 FIND-VECTOR.24 FIND-VECTOR.25 FIND-VECTOR.26 - FIND-VECTOR.27 FIND-VECTOR.28 FIND-VECTOR.29 FIND-VECTOR.30 - FIND-BIT-VECTOR.1 FIND-BIT-VECTOR.1A FIND-BIT-VECTOR.1B - FIND-BIT-VECTOR.1C FIND-BIT-VECTOR.1D FIND-BIT-VECTOR.2 - FIND-BIT-VECTOR.2A FIND-BIT-VECTOR.2B FIND-BIT-VECTOR.2C - FIND-BIT-VECTOR.2D FIND-BIT-VECTOR.2E FIND-BIT-VECTOR.3 - FIND-BIT-VECTOR.4 FIND-BIT-VECTOR.5 FIND-BIT-VECTOR.6 - FIND-BIT-VECTOR.7 FIND-BIT-VECTOR.8 FIND-BIT-VECTOR.9 - FIND-BIT-VECTOR.10 FIND-BIT-VECTOR.11 FIND-BIT-VECTOR.12 - FIND-BIT-VECTOR.13 FIND-BIT-VECTOR.14 FIND-BIT-VECTOR.15 - FIND-BIT-VECTOR.16 FIND-BIT-VECTOR.16A FIND-BIT-VECTOR.16B - FIND-BIT-VECTOR.17 FIND-BIT-VECTOR.17A FIND-BIT-VECTOR.17B - FIND-BIT-VECTOR.18 FIND-BIT-VECTOR.18A FIND-BIT-VECTOR.19 - FIND-BIT-VECTOR.19A FIND-BIT-VECTOR.20 FIND-BIT-VECTOR.21 - FIND-BIT-VECTOR.21A FIND-BIT-VECTOR.21B FIND-BIT-VECTOR.22 - FIND-BIT-VECTOR.22A FIND-BIT-VECTOR.22B FIND-BIT-VECTOR.23 - FIND-BIT-VECTOR.23A FIND-BIT-VECTOR.23B FIND-BIT-VECTOR.24 - FIND-BIT-VECTOR.24A FIND-BIT-VECTOR.24B FIND-BIT-VECTOR.25 - FIND-BIT-VECTOR.26 FIND-BIT-VECTOR.26A FIND-BIT-VECTOR.27 - FIND-BIT-VECTOR.28 FIND-BIT-VECTOR.29 FIND-BIT-VECTOR.30 FIND-STRING.1 - FIND-STRING.1A FIND-STRING.2 FIND-STRING.2A FIND-STRING.3 - FIND-STRING.4 FIND-STRING.5 FIND-STRING.6 FIND-STRING.7 FIND-STRING.8 - FIND-STRING.9 FIND-STRING.10 FIND-STRING.11 FIND-STRING.13 - FIND-STRING.14 FIND-STRING.15 FIND-STRING.16 FIND-STRING.17 - FIND-STRING.18 FIND-STRING.19 FIND-STRING.20 FIND-STRING.21 - FIND-STRING.22 FIND-STRING.23 FIND-STRING.24 FIND-STRING.25 - FIND.ALLOW-OTHER-KEYS.1 FIND.ALLOW-OTHER-KEYS.2 - FIND.ALLOW-OTHER-KEYS.3 FIND.KEYWORDS.4 FIND.ALLOW-OTHER-KEYS.5 - FIND.ERROR.1 FIND.ERROR.2 FIND.ERROR.3 FIND.ERROR.4 FIND.ERROR.5 - FIND.ERROR.6 FIND.ERROR.7 FIND.ERROR.8 FIND.ERROR.9 FIND.ERROR.10 - FIND.ERROR.11 FIND.ERROR.12 FIND.ERROR.13 FIND.ERROR.14 FIND.ERROR.15 - FIND.ORDER.1 FIND.ORDER.2 FIND.ORDER.3 FIND-IF-LIST.1 FIND-IF-LIST.2 - FIND-IF-LIST.2A FIND-IF-LIST.3 FIND-IF-LIST.4 FIND-IF-LIST.5 - FIND-IF-LIST.6 FIND-IF-LIST.7 FIND-IF-LIST.8 FIND-IF-LIST.9 - FIND-IF-LIST.10 FIND-IF-LIST.11 FIND-IF-LIST.12 FIND-IF-LIST.13 - FIND-IF-LIST.14 FIND-IF-LIST.15 FIND-IF-LIST.16 FIND-IF-LIST.17 - FIND-IF-LIST.18 FIND-IF-VECTOR.1 FIND-IF-VECTOR.2 FIND-IF-VECTOR.2A - FIND-IF-VECTOR.3 FIND-IF-VECTOR.4 FIND-IF-VECTOR.5 FIND-IF-VECTOR.6 - FIND-IF-VECTOR.7 FIND-IF-VECTOR.8 FIND-IF-VECTOR.9 FIND-IF-VECTOR.10 - FIND-IF-VECTOR.11 FIND-IF-VECTOR.12 FIND-IF-VECTOR.13 - FIND-IF-VECTOR.14 FIND-IF-VECTOR.15 FIND-IF-VECTOR.16 - FIND-IF-VECTOR.17 FIND-IF-VECTOR.18 FIND-IF-VECTOR.19 - FIND-IF-BIT-VECTOR.1 FIND-IF-BIT-VECTOR.2 FIND-IF-BIT-VECTOR.3 - FIND-IF-BIT-VECTOR.4 FIND-IF-BIT-VECTOR.5 FIND-IF-BIT-VECTOR.6 - FIND-IF-BIT-VECTOR.7 FIND-IF-STRING.1 FIND-IF-STRING.2 - FIND-IF-STRING.2A FIND-IF-STRING.3 FIND-IF-STRING.3A FIND-IF-STRING.4 - FIND-IF-STRING.5 FIND-IF-STRING.6 FIND-IF-STRING.7 FIND-IF-STRING.8 - FIND-IF-STRING.9 FIND-IF-STRING.10 FIND-IF-STRING.11 FIND-IF-STRING.12 - FIND-IF-STRING.13 FIND-IF-STRING.14 FIND-IF-STRING.15 - FIND-IF-STRING.16 FIND-IF-STRING.17 FIND-IF-STRING.18 - FIND-IF-STRING.19 FIND-IF.ALLOW-OTHER-KEYS.1 - FIND-IF.ALLOW-OTHER-KEYS.2 FIND-IF.ALLOW-OTHER-KEYS.3 - FIND-IF.KEYWORDS.4 FIND-IF.ALLOW-OTHER-KEYS.5 FIND-IF.ERROR.1 - FIND-IF.ERROR.2 FIND-IF.ERROR.3 FIND-IF.ERROR.4 FIND-IF.ERROR.5 - FIND-IF.ERROR.6 FIND-IF.ERROR.7 FIND-IF.ERROR.8 FIND-IF.ERROR.9 - FIND-IF.ERROR.10 FIND-IF.ERROR.11 FIND-IF.ERROR.12 FIND-IF.ERROR.13 - FIND-IF.ERROR.14 FIND-IF.ERROR.15 FIND-IF.ORDER.1 FIND-IF.ORDER.2 - FIND-IF.ORDER.3 FIND-IF-NOT-LIST.1 FIND-IF-NOT-LIST.2 - FIND-IF-NOT-LIST.2A FIND-IF-NOT-LIST.3 FIND-IF-NOT-LIST.4 - FIND-IF-NOT-LIST.5 FIND-IF-NOT-LIST.6 FIND-IF-NOT-LIST.7 - FIND-IF-NOT-LIST.8 FIND-IF-NOT-LIST.9 FIND-IF-NOT-LIST.10 - FIND-IF-NOT-LIST.11 FIND-IF-NOT-LIST.12 FIND-IF-NOT-LIST.13 - FIND-IF-NOT-LIST.14 FIND-IF-NOT-LIST.15 FIND-IF-NOT-LIST.16 - FIND-IF-NOT-LIST.17 FIND-IF-NOT-LIST.18 FIND-IF-NOT-VECTOR.1 - FIND-IF-NOT-VECTOR.2 FIND-IF-NOT-VECTOR.2A FIND-IF-NOT-VECTOR.3 - FIND-IF-NOT-VECTOR.4 FIND-IF-NOT-VECTOR.5 FIND-IF-NOT-VECTOR.6 - FIND-IF-NOT-VECTOR.7 FIND-IF-NOT-VECTOR.8 FIND-IF-NOT-VECTOR.9 - FIND-IF-NOT-VECTOR.10 FIND-IF-NOT-VECTOR.11 FIND-IF-NOT-VECTOR.12 - FIND-IF-NOT-VECTOR.13 FIND-IF-NOT-VECTOR.14 FIND-IF-NOT-VECTOR.15 - FIND-IF-NOT-VECTOR.16 FIND-IF-NOT-VECTOR.17 FIND-IF-NOT-VECTOR.18 - FIND-IF-NOT-BIT-VECTOR.1 FIND-IF-NOT-BIT-VECTOR.2 - FIND-IF-NOT-BIT-VECTOR.3 FIND-IF-NOT-BIT-VECTOR.4 - FIND-IF-NOT-BIT-VECTOR.5 FIND-IF-NOT-BIT-VECTOR.6 - FIND-IF-NOT-BIT-VECTOR.7 FIND-IF-NOT-STRING.1 FIND-IF-NOT-STRING.2 - FIND-IF-NOT-STRING.2A FIND-IF-NOT-STRING.3 FIND-IF-NOT-STRING.3A - FIND-IF-NOT-STRING.4 FIND-IF-NOT-STRING.5 FIND-IF-NOT-STRING.6 - FIND-IF-NOT-STRING.7 FIND-IF-NOT-STRING.8 FIND-IF-NOT-STRING.9 - FIND-IF-NOT-STRING.10 FIND-IF-NOT-STRING.11 FIND-IF-NOT-STRING.12 - FIND-IF-NOT-STRING.13 FIND-IF-NOT-STRING.14 FIND-IF-NOT-STRING.15 - FIND-IF-NOT-STRING.16 FIND-IF-NOT-STRING.17 FIND-IF-NOT-STRING.18 - FIND-IF-NOT.ALLOW-OTHER-KEYS.1 FIND-IF-NOT.ALLOW-OTHER-KEYS.2 - FIND-IF-NOT.ALLOW-OTHER-KEYS.3 FIND-IF-NOT.KEYWORDS.4 - FIND-IF-NOT.ALLOW-OTHER-KEYS.5 FIND-IF-NOT.ERROR.1 FIND-IF-NOT.ERROR.2 - FIND-IF-NOT.ERROR.3 FIND-IF-NOT.ERROR.4 FIND-IF-NOT.ERROR.5 - FIND-IF-NOT.ERROR.6 FIND-IF-NOT.ERROR.7 FIND-IF-NOT.ERROR.8 - FIND-IF-NOT.ERROR.9 FIND-IF-NOT.ERROR.10 FIND-IF-NOT.ERROR.11 - FIND-IF-NOT.ERROR.12 FIND-IF-NOT.ERROR.13 FIND-IF-NOT.ERROR.14 - FIND-IF-NOT.ERROR.15 FIND-IF-NOT.ORDER.1 FIND-IF-NOT.ORDER.2 - FIND-IF-NOT.ORDER.3 POSITION-LIST.1 POSITION-LIST.2 POSITION-LIST.3 - POSITION-LIST.4 POSITION-LIST.5 POSITION-LIST.6 POSITION-LIST.7 - POSITION-LIST.8 POSITION-LIST.9 POSITION-LIST.10 POSITION-LIST.11 - POSITION-LIST.12 POSITION-LIST.13 POSITION-LIST.14 POSITION-LIST.15 - POSITION-LIST.16 POSITION-LIST.17 POSITION-LIST.18 POSITION-LIST.19 - POSITION-LIST.20 POSITION-LIST.21 POSITION-LIST.22 POSITION-LIST.23 - POSITION-LIST.24 POSITION-LIST.25 POSITION-LIST.26 POSITION-LIST.27 - POSITION-LIST.28 POSITION-VECTOR.1 POSITION-VECTOR.2 POSITION-VECTOR.3 - POSITION-VECTOR.4 POSITION-VECTOR.5 POSITION-VECTOR.6 - POSITION-VECTOR.7 POSITION-VECTOR.8 POSITION-VECTOR.9 - POSITION-VECTOR.10 POSITION-VECTOR.11 POSITION-VECTOR.12 - POSITION-VECTOR.13 POSITION-VECTOR.14 POSITION-VECTOR.15 - POSITION-VECTOR.16 POSITION-VECTOR.17 POSITION-VECTOR.18 - POSITION-VECTOR.19 POSITION-VECTOR.20 POSITION-VECTOR.21 - POSITION-VECTOR.22 POSITION-VECTOR.23 POSITION-VECTOR.24 - POSITION-VECTOR.25 POSITION-VECTOR.26 POSITION-VECTOR.27 - POSITION-VECTOR.28 POSITION-VECTOR.29 POSITION-VECTOR.30 - POSITION-VECTOR.31 POSITION-BIT-VECTOR.1 POSITION-BIT-VECTOR.2 - POSITION-BIT-VECTOR.3 POSITION-BIT-VECTOR.4 POSITION-BIT-VECTOR.5 - POSITION-BIT-VECTOR.6 POSITION-BIT-VECTOR.7 POSITION-BIT-VECTOR.8 - POSITION-BIT-VECTOR.9 POSITION-BIT-VECTOR.10 POSITION-BIT-VECTOR.11 - POSITION-BIT-VECTOR.12 POSITION-BIT-VECTOR.13 POSITION-BIT-VECTOR.14 - POSITION-BIT-VECTOR.15 POSITION-BIT-VECTOR.16 POSITION-BIT-VECTOR.17 - POSITION-BIT-VECTOR.18 POSITION-BIT-VECTOR.19 POSITION-BIT-VECTOR.20 - POSITION-BIT-VECTOR.21 POSITION-BIT-VECTOR.22 POSITION-BIT-VECTOR.23 - POSITION-BIT-VECTOR.24 POSITION-BIT-VECTOR.25 POSITION-BIT-VECTOR.27 - POSITION-BIT-VECTOR.28 POSITION-BIT-VECTOR.29 POSITION-BIT-VECTOR.30 - POSITION-BIT-VECTOR.31 POSITION-BIT-VECTOR.32 POSITION-STRING.1 - POSITION-STRING.2 POSITION-STRING.3 POSITION-STRING.4 - POSITION-STRING.5 POSITION-STRING.6 POSITION-STRING.7 - POSITION-STRING.8 POSITION-STRING.9 POSITION-STRING.10 - POSITION-STRING.11 POSITION-STRING.13 POSITION-STRING.14 - POSITION-STRING.15 POSITION-STRING.16 POSITION-STRING.17 - POSITION-STRING.18 POSITION-STRING.19 POSITION-STRING.20 - POSITION-STRING.21 POSITION-STRING.22 POSITION-STRING.23 - POSITION-STRING.24 POSITION-STRING.25 POSITION-STRING.26 - POSITION-STRING.27 POSITION-STRING.28 POSITION.ORDER.1 - POSITION.ORDER.2 POSITION.ALLOW-OTHER-KEYS.1 - POSITION.ALLOW-OTHER-KEYS.2 POSITION.ALLOW-OTHER-KEYS.3 - POSITION.ALLOW-OTHER-KEYS.4 POSITION.ALLOW-OTHER-KEYS.5 - POSITION.KEYWORDS.6 POSITION.ALLOW-OTHER-KEYS.7 - POSITION.ALLOW-OTHER-KEYS.8 POSITION.ALLOW-OTHER-KEYS.9 - POSITION.ERROR.1 POSITION.ERROR.2 POSITION.ERROR.3 POSITION.ERROR.4 - POSITION.ERROR.5 POSITION.ERROR.6 POSITION.ERROR.7 POSITION.ERROR.8 - POSITION.ERROR.9 POSITION.ERROR.10 POSITION.ERROR.11 POSITION.ERROR.12 - POSITION.ERROR.13 POSITION.ERROR.14 POSITION.ERROR.15 SEARCH-LIST.1 - SEARCH-LIST.2 SEARCH-LIST.3 SEARCH-LIST.4 SEARCH-LIST.5 SEARCH-LIST.6 - SEARCH-LIST.7 SEARCH-LIST.8 SEARCH-LIST.9 SEARCH-LIST.10 - SEARCH-LIST.11 NSET-EXCLUSIVE-OR.13 NSET-EXCLUSIVE-OR.14 + WITH-PACKAGE-ITERATOR.3 SET-EXCLUSIVE-OR.13 + SET-EXCLUSIVE-OR.14 SET-EXCLUSIVE-OR.15 SET-EXCLUSIVE-OR.16 + SET-EXCLUSIVE-OR.17 SET-EXCLUSIVE-OR.17-A SET-EXCLUSIVE-OR.18 + SET-EXCLUSIVE-OR.18-A SET-EXCLUSIVE-OR.ORDER.1 + SET-EXCLUSIVE-OR.ORDER.2 SET-EXCLUSIVE-OR.ORDER.3 + SET-EXCLUSIVE-OR.ORDER.4 SET-EXCLUSIVE-OR.ORDER.5 + SET-EXCLUSIVE.ALLOW-OTHER-KEYS.1 SET-EXCLUSIVE.ALLOW-OTHER-KEYS.2 + SET-EXCLUSIVE.ALLOW-OTHER-KEYS.3 SET-EXCLUSIVE.ALLOW-OTHER-KEYS.4 + SET-EXCLUSIVE.ALLOW-OTHER-KEYS.5 SET-EXCLUSIVE.ALLOW-OTHER-KEYS.6 + SET-EXCLUSIVE.ALLOW-OTHER-KEYS.7 SET-EXCLUSIVE.KEYWORDS.8 + SET-EXCLUSIVE.KEYWORDS.9 SET-EXCLUSIVE-OR.ERROR.1 + SET-EXCLUSIVE-OR.ERROR.2 SET-EXCLUSIVE-OR.ERROR.3 + SET-EXCLUSIVE-OR.ERROR.4 SET-EXCLUSIVE-OR.ERROR.5 + SET-EXCLUSIVE-OR.ERROR.6 SET-EXCLUSIVE-OR.ERROR.7 + SET-EXCLUSIVE-OR.ERROR.8 SET-EXCLUSIVE-OR.ERROR.9 + SET-EXCLUSIVE-OR.ERROR.10 NSET-EXCLUSIVE-OR.1 NSET-EXCLUSIVE-OR.2 + NSET-EXCLUSIVE-OR.3 NSET-EXCLUSIVE-OR.4 NSET-EXCLUSIVE-OR.5 + NSET-EXCLUSIVE-OR.6 NSET-EXCLUSIVE-OR.7 NSET-EXCLUSIVE-OR.7-A + NSET-EXCLUSIVE-OR.8 NSET-EXCLUSIVE-OR.8-A NSET-EXCLUSIVE-OR.8-B + NSET-EXCLUSIVE-OR.9 NSET-EXCLUSIVE-OR.10 NSET-EXCLUSIVE-OR.11 + NSET-EXCLUSIVE-OR.12 NSET-EXCLUSIVE-OR.13 NSET-EXCLUSIVE-OR.14 NSET-EXCLUSIVE-OR.15 NSET-EXCLUSIVE-OR.16 NSET-EXCLUSIVE-OR.17 NSET-EXCLUSIVE-OR.17-A NSET-EXCLUSIVE-OR.18 NSET-EXCLUSIVE-OR.18-A NSET-EXCLUSIVE-OR.ORDER.1 NSET-EXCLUSIVE-OR.ORDER.2 @@ -21315,7 +20812,8 @@ ((#\Space #\Space) (#\Space #\Space))) (((#\Space #\Space) (#\Space #\Space)) ((#\Space #\Space) (#\Space #\Space)))) - ((((#\Space #\Space) (#\Space #\Space)) + WITH-PACKAGE-ITERATOR.4 + WITH-PACKAGE-ITERATOR.5 WITH-PACKAGE-ITERATOR.6 ((((#\Space #\Space) (#\Space #\Space)) ((#\Space #\Space) (#\Space #\Space))) (((#\Space #\Space) (#\Space #\Space)) ((#\Space #\Space) (#\Space #\Space)))))))) @@ -21776,10 +21274,10 @@ #(1.0S0 2.0S0 3.0S0 4.0S0 5.0S0) #(1.0 2.0 3.0 4.0 5.0) #(1.0 2.0 3.0 4.0 5.0) #(1.0 2.0 3.0 4.0 5.0) - # - # - # - # #p"foo" #p"foo" + # + # + # + # #p"foo" #p"foo" #p"bar" #p"foo.txt" #p"bar.txt" #p"xyz.txt" #p"" #p"*" #p".txt" #p"*.txt" #p"*.txt" #p"*.ABC" #p"/**/" #p".*" #p"" #p"" # @@ -21787,7 +21285,7 @@ # # # - # + # #S(FOO-STRUCTURE X 1 Y A Z NIL) #S(FOO-STRUCTURE X 1 Y A Z NIL) #S(BAR-STRUCTURE X 1 Y A Z NIL) @@ -21796,7 +21294,7 @@ # # (SYSTEM:LAMBDA-CLOSURE () () () (X) X) - #$29176404137732472914482755064436119949901022861949863354487104115542831301816877224716868628239579211938054306631983568024981862666611809341625851599338142481189922237126149420820651863593943674663237137973673386602609653058390330165029103182018820877745392805844492457746337173846085035110448806788668024716995441437318488135372148325046973438386334148830852569686525914313170679854396809291584178691434459919748999200131637334343074176174696701320823824304068498099685091743493789239103487889116310651099878026914570503406886010280398235814665737821171431805083458093275589702358183479757384554441737154864598523616204329161807489058497043671189951266337186360081554710106403568876967274841360410828926605095432265860688439687341013028577758115853114321801462973911277178560766247770387061714477475310568180405374724881987736315901479436213406833564347974720100701532300644864628916537076049825334102581595905842247931732521700315260535250758474860544798968272411174675236480768545213698075973373777375049967899609999433316555503532244866534349876618451525584740615834057107576142509252163325543353261300582017278216842772265644931307481661297526663322205212150185548173325245326687006350471085906474424139214665894309014843232664580071648762970141939325934391461603988349238406371891899764015331607157764820501119859517842817263154144296529217744822336222713126177026660948536196380671291417716445879792833421808170519968276572051729552893703273805485452634604874023335630291855374040917815813579153451113897582343438984070631839576435987567938122511357628737757752466885746823647238308016138817160260882469913582764095375057038376431677065980310898526545604899284277903345433337475073505927351135841580998628593315591233102177419043876529005976627144706962548728624346366620314613883944112274466067716221566331310847730297839267227758383581417619708227770307157701015499662648837015760016403490434662267340166149600711234238649382227683023575106619793652973520852561975513130832347638434591447254593870230868992579692423804051591231941102274995499547872590306236750772910484499658707986231527889667439755818544587568671511704041552947741765012407005468426925382856450631293338167006849070174965841980824108504138055884305334634504972792072357981421920529778454782274238837712317682728583077417401310757286053162501316869801695344659305405891714756295408818074842286559590761824129600312978354796042091895556512170218768603155987271860951665761324578631906577765794794750140647664492666263719257314522356039610887093633970719700554697488399378627619208028811821813910864995808299033494558337898330342990498307814118879423310970145254782757690048081112784251033646595974199717223975889479812518269299167130326616332598173334275646063252307035552666478835197256620185003866264336541532798278960342875145684274259105651399634034570327742164038945451782032773651511125969908212743306978117442939724764520786289769650671526094748449835146258514511486393852329192854364578518986423702526093320864721097811163795373305278414493868253427704660949261429426556545457722244277304495602230322490878872481434622303841879625938793251842124896862086185538826843626437462904285704800039520491148349738537752662820097821359318638357457398542703954245807177417680924462041466860855077520352234029444335408718833291523274660069756555198642865761420704097355446129442836460960346047244807071279736580666551818588258887341089226407146324431418927663710232609460847448789831295211592694477452248169283833866902004308081724662081804832442833819195649269397898108881144137975674127105223795874020709751458917436988811682303860093985314638544501867761931103989225118704607075566444506758900574437529325518651684120565562172746701627938286629343246236782886317888219747195209036678260399073301329194002270339512860573818510954218055448516071397294201898352812879896438547152105876753308931456531659380201228157866429633461749526648735581583253915895593786313013690045291634056149548970680386821563715481488658405024976872049591380206990615559789287185079636877766256443979088203384092288635349018796052509337329496091677531131114482418916709433759057531822101328279038110451033120810387955274071546033033925307992412161958325719825234803995202280054251635272711132302311226586252668777405738852921786505657697025167762863925524091648667236040832383589551876871794581426955871352793404494435805416440593579018163182041509070943148395153266866301284651698600712375689989632818305717576264514160184428475793244108893546412178896943436525335411342944803741126765826718105376006165110299767987286762765986860813145905449220797075083373003994784858789463452193882495977608956077012275839430960320019414849450431548279502942169215853085238172068908959183048860196764368783277552622879280695692367132363069121294984879106237801030651874197199007985681743954729370135182941199237083838683022881281865067784888629196503976506645028772359126315048509741384566206457774861494784875608150544872396133044896719697226661992908055377678079724100786458585225933941989643636337476373400784962516077514394952639097183278087424384655141222841621107816440810148764301454715916582099546804815846535080978652847221624580972630672434752043092304677414021326911467870964727798696080509209068682693383376693737589344765903637511004681455094031498012237231495158463996175277807367343814670733147352577539963515326320756067723162569590837557313083211779865003152877035528938614631114840880624572530284565212400915070707646659493817533333717037843058257143071118184157649916019674153090833873144900912422182393717011264194105036808525286279222808334383480449485088350771601212416124272038651131112860750011652862937196384089632568812211633387012020648002658199328076027092123766558507559960104669640023669935201702291766079275943674666676369000495572602105533655688032996354230541299543624287700971281386141437516949343858293394389170175751962820093162395149596771933971049730962853332793240086422933222867582777018853003015049935918491444813583043221896716289690113). + #$14123344600715962023739883023381359267419384418556983742654472755048670175517607443774381335712778257267524175124262695317133160120031965541064851374970978625475024321502579901943638609379899512505370953447459046540573536373438061107636670291720353519503531207142656284206624511188029924355208649167114153287743608646582675697448678892761005294442011553961552283403643121394896818551583185062574074404896792936320510477542273120097086870357453641388606139735301335108047031266345717678353903674894232385548698066072174745632310359063725574080625382617026228775288813827371868644388955835273083002188358093582098864434418741298399514078732209344108075318991260071230776663519851796843412159349584896557933313330631475331207728204797920630096546971401990209193139224823345750411706727610271444543309632891031296562071925006114837760365399237875158893785371591179747241560826481982240588831924245137677078928353964910537362916428163626211892220460552684585108694752859413716892864157880419914544530873773141738328533098891482547122155313477912007257255616230457907318837417878413877220833983197319447217210108096282895023579244935472961505819499109842607746680289029552871797356839040285835622682696963113818296098028841718126793384300132829663859857965162174800403813557877492522026133595553686863186971044558154550933768790783350437451783141122450703668835308229371009163185206567141293583425658724700400811582673209644623173088508040928241700868671976756421813603042639956644076867289253776523587443987876583111015198748356635567695529566765299729741289599314520492121915163081750772083577171025397559751341724109131195283124299752691911442747299044999983958294609468433807055952765810931522228397518205161901226964591085176624000827536978873686532189983634366340622629398234614062998750274091430915522896496152215318773280492226150116582015172274451757731930391375991572426713102886697990163552047436876177156029108807920518584538917697335254425422979597011931712730869029229815274368321841607532983507935452438435274600359824175135007936140516895945416720482997081955503162391240693333736611578403067292413614787514855842710380697684264467650017640365427212172429871280731879610358540376883952956246588007758459519391427922013364683645266286737467524742344145764162522763078046755775302075210729690199605186160304677438982731921428920832730859511972736933630703514045599183106837831589663338632363535039789452609763515936689380610968474658162162306393223730141176868956373836907821067093335261193148818958215466484209973057397290146425496427713314548102993923936145630353580887855151215876761735943096147493107075371840025404846997460912779744972683491154606878772023804043538637393091987910060565775047607711312971921232699441918211760693065006078998436568239545485464648331491167174532889604846260968702372321101872384941356075280043708325469596188698170260720514432281023064662353411943816930650961347188305604833891886569739589940745444489926750026971713440901981528165580123358057464901237501825072692342271641640679848374145262694121761372217718169242758317735814680942368537187064332406626904256106435322490576537236225576741336988454948722300706552585687198950410802377272455238551258583186847906496909580017199879280704983616127181608652468787262826931145967950971839249617312951323476101426147036238088374978881220313057828094196181488562250369084123438261386222014454687839373530764315965548199882087994377102793673006420412711017295621874210634051933378961034536728958477623573765050034949140044994618104279978712886357525541326712350648037877366412182049476810200181632572643798975410940270083416438586989177715207275547445911179009086982006963129251911198613601003589380199140324964109755605746186807803831691920036745787088461961245147103794428089322747736167727411608188952894163004499923665789679632392697424325473972767815280590957996854995996565975352176893253917120458436353545808660022150813278809735195149400344570245291132967741325213582542437994404324094367752550408712263374425159841663086870763518362624882354023172186711279774352188759283664373633696208800225678883369572634532809061149111274282347011650638699693154148416225304794477283083848817329687009774401454685496725632384654250376974786732390370867545505247724389115622051233724919858873543883909611964515562220015894579599335181426604476263046015999444759327959583254430083809780588862414935680584984016408226503348832013806463445891346961345345595985586959141234105167506513286722940925932919488651095059697977061194812626816867999761235877375766300856619030582650880375781241984665341919860354921269428949758450300242479692259660037503524481579576327930368989238788141770787764095014342642781405987204640908883715669951693505155219527585015619579191505162136991289773089926687292489726177261166939659868756413457805883748663042349596037033521048922615393503059387292716578457666656971494536051019654498934636162325459053406735880645605248855032201631060338232551614293798873705720343963297543903091926603181808220163956464390944932829117318373333283566723025884584575943027344284645605728474620063076190048729214282374669460913890595312586876080495264949824112472292496577313729938559344000441461651107954411956926078707571522516776428982399515926613736406141086913388618566875226357350055921903214486360697178067587598130732662955833654155497529041244103610359986438716238742246807656052271272395672351327927021961538044244142689734075704383045254762073552004370852541433656499586130628036514535975574836374255961689125041028974824539745792030555840786505794742809207594862163604179602449576554360593178548149506401830960970992715118671986371778964466873220714296828507670267287997151172977978649324238855824103067372718162578224802743170171894024735836745321435901926902982341038180251889753175961981133381585700845765286191658251803780844795340597517128429875446889345924600597455399215095738988010628386447776148794974927072038712664597724987105294854177028662682234691071260325063688581162604387967628229443540529979121). UPGRADED-ARRAY-ELEMENT-TYPE.ERROR.1 UPGRADED-ARRAY-ELEMENT-TYPE.ERROR.2 VECTOR.TYPE.1 VECTOR.TYPE.2 VECTOR.TYPE.3 VECTOR.TYPE.4 VECTOR.TYPE.5 VECTOR.TYPE.6 VECTOR.TYPE.7 @@ -22218,6 +21716,149 @@ COPY-SEQ.15 COPY-SEQ.16 COPY-SEQ.17 COPY-SEQ.18 COPY-SEQ.ORDER.1 COPY-SEQ.ERROR.1 COPY-SEQ.ERROR.2 COPY-SEQ.ERROR.3 COPY-SEQ.ERROR.4 COPY-SEQ.ERROR.5 COPY-SEQ.ERROR.6 ELT.1 ELT.1A ELT.1B ELT.2 ELT.3 + ELT.4 ELT.5 ELT.5A ELT.6 ELT.7 ELT.8 ELT.9 ELT.10 ELT.11 + WITH-PACKAGE-ITERATOR.7 WITH-PACKAGE-ITERATOR.8 + WITH-PACKAGE-ITERATOR.9 WITH-PACKAGE-ITERATOR.10 + WITH-PACKAGE-ITERATOR.11Package #<"MPE11" package> +Package #<"TEST-DPE2" package> +Package #<"LOOP.16.PACKAGE" package> +Package #<"LOOP.15.PACKAGE" package> +Package #<"STRUCT-TEST-PACKAGE" package> +Package #<"DS4" package> +Package #<"DS3" package> +Package #<"DS2" package> +Package #<"DS1" package> +Package #<"B" package> +Package #<"A" package> +Package #<"LOOP.CL-TEST.2" package> +Package #<"LOOP.CL-TEST.1" package> +Package #<"CL-TEST" package> +Package #<"REGRESSION-TEST" package> +Package #<"CONDITIONS" package> +Package #<"SLOT-ACCESSOR-NAME" package> +Package #<"PCL" package> +Package #<"ITERATE" package> +Package #<"WALKER" package> +Package #<"XLIB" package> +Package #<"CLTL1-COMPAT" package> +Package #<"FPE" package> +Package #<"TK" package> +Package #<"DEFPACKAGE" package> +Package #<"ANSI-LOOP" package> +Package #<"SLOOP" package> +Package #<"COMPILER" package> +Package #<"SYSTEM" package> +Package #<"KEYWORD" package> +Package #<"COMMON-LISP-USER" package> +Package #<"COMMON-LISP" package> + WITH-PACKAGE-ITERATOR.12Package #<"MPE11" package> +Package #<"TEST-DPE2" package> +Package #<"LOOP.16.PACKAGE" package> +Package #<"LOOP.15.PACKAGE" package> +Package #<"STRUCT-TEST-PACKAGE" package> +Package #<"DS4" package> +Package #<"DS3" package> +Package #<"DS2" package> +Package #<"DS1" package> +Package #<"B" package> +Package #<"A" package> +Package #<"LOOP.CL-TEST.2" package> +Package #<"LOOP.CL-TEST.1" package> +Package #<"CL-TEST" package> +Package #<"REGRESSION-TEST" package> +Package #<"CONDITIONS" package> +Package #<"SLOT-ACCESSOR-NAME" package> +Package #<"PCL" package> +Package #<"ITERATE" package> +Package #<"WALKER" package> +Package #<"XLIB" package> +Package #<"CLTL1-COMPAT" package> +Package #<"FPE" package> +Package #<"TK" package> +Package #<"DEFPACKAGE" package> +Package #<"ANSI-LOOP" package> +Package #<"SLOOP" package> +Package #<"COMPILER" package> +Package #<"SYSTEM" package> +Package #<"KEYWORD" package> +Package #<"COMMON-LISP-USER" package> +Package #<"COMMON-LISP" package> + WITH-PACKAGE-ITERATOR.13Package #<"MPE11" package> +Package #<"TEST-DPE2" package> +Package #<"LOOP.16.PACKAGE" package> +Package #<"LOOP.15.PACKAGE" package> +Package #<"STRUCT-TEST-PACKAGE" package> +Package #<"DS4" package> +Package #<"DS3" package> +Package #<"DS2" package> +Package #<"DS1" package> +Package #<"B" package> +Package #<"A" package> +Package #<"LOOP.CL-TEST.2" package> +Package #<"LOOP.CL-TEST.1" package> +Package #<"CL-TEST" package> +Package #<"REGRESSION-TEST" package> +Package #<"CONDITIONS" package> +Package #<"SLOT-ACCESSOR-NAME" package> +Package #<"PCL" package> +Package #<"ITERATE" package> +Package #<"WALKER" package> +Package #<"XLIB" package> +Package #<"CLTL1-COMPAT" package> +Package #<"FPE" package> +Package #<"TK" package> +Package #<"DEFPACKAGE" package> +Package #<"ANSI-LOOP" package> +Package #<"SLOOP" package> +Package #<"COMPILER" package> +Package #<"SYSTEM" package> +Package #<"KEYWORD" package> +Package #<"COMMON-LISP-USER" package> +Package #<"COMMON-LISP" package> + WITH-PACKAGE-ITERATOR.14 UNEXPORT.1 UNEXPORT.2 UNEXPORT.3 UNEXPORT.4 + UNEXPORT.5 UNEXPORT.6 UNEXPORT.ERROR.1 UNEXPORT.ERROR.2 UNINTERN.1 + UNINTERN.2 UNINTERN.3 UNINTERN.4 UNINTERN.5 UNINTERN.6 UNINTERN.7Properly threw an error: # + UNINTERN.8 UNINTERN.9 UNINTERN.ERROR.1 UNINTERN.ERROR.2 IN-PACKAGE.1 + IN-PACKAGE.2 IN-PACKAGE.3 IN-PACKAGE.4 IN-PACKAGE.5 UNUSE-PACKAGE.1 + UNUSE-PACKAGE.2 UNUSE-PACKAGE.3 UNUSE-PACKAGE.4 UNUSE-PACKAGE.5 + UNUSE-PACKAGE.6 UNUSE-PACKAGE.7 UNUSE-PACKAGE.8 UNUSE-PACKAGE.9 + UNUSE-PACKAGE.ERROR.1 UNUSE-PACKAGE.ERROR.2 USE-PACKAGE.1 + USE-PACKAGE.2 USE-PACKAGE.3 USE-PACKAGE.4 USE-PACKAGE.5 USE-PACKAGE.6 + USE-PACKAGE.ERROR.1 USE-PACKAGE.ERROR.2 DEFPACKAGE.1 DEFPACKAGE.2 + DEFPACKAGE.3 DEFPACKAGE.4 DEFPACKAGE.5 DEFPACKAGE.6 DEFPACKAGE.7 + DEFPACKAGE.8 DEFPACKAGE.9 DEFPACKAGE.10 DEFPACKAGE.11 DEFPACKAGE.12 + DEFPACKAGE.13 DEFPACKAGE.14 DEFPACKAGE.15 DEFPACKAGE.16 DEFPACKAGE.17 + DEFPACKAGE.18 DEFPACKAGE.19 DEFPACKAGE.20 DEFPACKAGE.21 DEFPACKAGE.22 + DEFPACKAGE.23 DEFPACKAGE.24 DEFPACKAGE.25Making G1... +Making G2... +Making G3... +Making G1... +Making G2... +Making G3... + DEFPACKAGE.26 DO-SYMBOLS.1 DO-SYMBOLS.2 DO-SYMBOLS.3 DO-SYMBOLS.4 + DO-SYMBOLS.5 DO-EXTERNAL-SYMBOLS.1 DO-EXTERNAL-SYMBOLS.2 + DO-EXTERNAL-SYMBOLS.3 DO-EXTERNAL-SYMBOLS.4 DO-EXTERNAL-SYMBOLS.5 + DO-SYMBOLS.6 DO-EXTERNAL-SYMBOLS.6 DO-SYMBOLS.7 DO-EXTERNAL-SYMBOLS.7 + DO-SYMBOLS.8 DO-EXTERNAL-SYMBOLS.8 PACKAGEP.1 PACKAGEP.2 + PACKAGEP.ERROR.1 PACKAGEP.ERROR.2 PACKAGE-ERROR.1 PACKAGE-ERROR.2 +Test PACKAGE-ERROR.3 failed +Form: (SUBTYPEP* 'PACKAGE-ERROR 'ERROR) +Expected values: T + T +Actual values: NIL + NIL. + PACKAGE-ERROR.4 PACKAGE-ERROR-PACKAGE.1 PACKAGE-ERROR-PACKAGE.2 + PACKAGE-ERROR-PACKAGE.3 PACKAGE-ERROR-PACKAGE.4 + PACKAGE-ERROR-PACKAGE.ERROR.1 PACKAGE-ERROR-PACKAGE.ERROR.2 KEYWORD.1 + KEYWORD.2 KEYWORD.3 PACKAGE-SHADOWING-SYMBOLS.ERROR.1 + PACKAGE-SHADOWING-SYMBOLS.ERROR.2 PACKAGE-USE-LIST.ERROR.1 + PACKAGE-USE-LIST.ERROR.2 PACKAGE-USED-BY-LIST.ERROR.1 + PACKAGE-USED-BY-LIST.ERROR.2 COPY-SEQ.1 COPY-SEQ.2 COPY-SEQ.3 + COPY-SEQ.4 COPY-SEQ.5 COPY-SEQ.6 COPY-SEQ.7 COPY-SEQ.8 COPY-SEQ.9 + COPY-SEQ.10 COPY-SEQ.11 COPY-SEQ.12 COPY-SEQ.13 COPY-SEQ.14 + COPY-SEQ.15 COPY-SEQ.16 COPY-SEQ.17 COPY-SEQ.18 COPY-SEQ.ORDER.1 + COPY-SEQ.ERROR.1 COPY-SEQ.ERROR.2 COPY-SEQ.ERROR.3 COPY-SEQ.ERROR.4 + COPY-SEQ.ERROR.5 COPY-SEQ.ERROR.6 ELT.1 ELT.1A ELT.1B ELT.2 ELT.3 ELT.4 ELT.5 ELT.5A ELT.6 ELT.7 ELT.8 ELT.9 ELT.10 ELT.11 ELT.12 ELT.13 ELT.14 ELT.15 ELT.16 ELT.17 ELT.18 ELT.19 ELT.ORDER.1 ELT.ORDER.2 ELT-V.1 ELT-V.3 ELT-V.4 ELT-V.5 ELT-V.6 ELT-V.7 ELT-V.8 ELT-V.9 @@ -22613,6 +22254,401 @@ POSITION.ERROR.13 POSITION.ERROR.14 POSITION.ERROR.15 SEARCH-LIST.1 SEARCH-LIST.2 SEARCH-LIST.3 SEARCH-LIST.4 SEARCH-LIST.5 SEARCH-LIST.6 SEARCH-LIST.7 SEARCH-LIST.8 SEARCH-LIST.9 SEARCH-LIST.10 + SEARCH-LIST.11 SEARCH-LIST.12 SEARCH-LIST.13 ELT.12 ELT.13 + ELT.14 ELT.15 ELT.16 ELT.17 ELT.18 ELT.19 ELT.ORDER.1 ELT.ORDER.2 + ELT-V.1 ELT-V.3 ELT-V.4 ELT-V.5 ELT-V.6 ELT-V.7 ELT-V.8 ELT-V.9 + ELT-V.10 ELT-V.11 ELT-V.12 ELT-V.13 ELT-ADJ-ARRAY.1 ELT-ADJ-ARRAY.3 + ELT-ADJ-ARRAY.4 ELT-ADJ-ARRAY.5 ELT-ADJ-ARRAY.6 ELT-ADJ-ARRAY.7 + ELT-ADJ-ARRAY.8 ELT-ADJ-ARRAY.9 ELT-ADJ-ARRAY.10 ELT-ADJ-ARRAY.11 + ELT-ADJ-ARRAY.12 ELT-ADJ-ARRAY.13 ELT-DISPLACED-ARRAY.1 + ELT-DISPLACED-ARRAY.2 ELT-DISPLACED-ARRAY.3 ELT-FILL-POINTER.1 + ELT-FILL-POINTER.2 ELT-FILL-POINTER.3 ELT-FILL-POINTER.4 + ELT-FILL-POINTER.5 ELT-FILL-POINTER.6 ELT-FILL-POINTER.7 + ELT-FILL-POINTER.8 ELT.ERROR.1 ELT.ERROR.2 ELT.ERROR.3 FILL.ERROR.1 + FILL.ERROR.2 FILL.ERROR.3 FILL.ERROR.4 FILL.ERROR.5 FILL.ERROR.6 + FILL.ERROR.7 FILL.ERROR.8 FILL.ERROR.10 FILL.ERROR.11 ARRAY-FILL-1 + ARRAY-FILL-2 ARRAY-FILL-3 ARRAY-FILL-4 ARRAY-FILL-5 ARRAY-FILL-6 + ARRAY-FILL-7 ARRAY-FILL-8 ARRAY-FILL-9 ARRAY-FILL-10 + ARRAY-FIXNUM-FILL-1 ARRAY-FIXNUM-FILL-2 ARRAY-FIXNUM-FILL-3 + ARRAY-FIXNUM-FILL-4 ARRAY-FIXNUM-FILL-5 ARRAY-FIXNUM-FILL-6 + ARRAY-FIXNUM-FILL-7 ARRAY-FIXNUM-FILL-8 ARRAY-FIXNUM-FILL-9 + ARRAY-FIXNUM-FILL-10 ARRAY-UNSIGNED-BYTE8-FILL-1 + ARRAY-UNSIGNED-BYTE8-FILL-2 ARRAY-UNSIGNED-BYTE8-FILL-3 + ARRAY-UNSIGNED-BYTE8-FILL-4 ARRAY-UNSIGNED-BYTE8-FILL-5 + ARRAY-UNSIGNED-BYTE8-FILL-6 ARRAY-UNSIGNED-BYTE8-FILL-7 + ARRAY-UNSIGNED-BYTE8-FILL-8 ARRAY-UNSIGNED-BYTE8-FILL-9 + ARRAY-UNSIGNED-BYTE8-FILL-10 ARRAY-FILL-POINTER-FILL.1 + ARRAY-FILL-POINTER-FILL.2 FILL.STRING.1 FILL.STRING.2 FILL.STRING.3 + FILL.STRING.4 FILL.STRING.5 FILL.STRING.6 FILL.STRING.7 FILL.STRING.8 + FILL.STRING.9 FILL.STRING.10 FILL.BIT-VECTOR.1 FILL.BIT-VECTOR.2 + FILL.BIT-VECTOR.3 FILL.BIT-VECTOR.4 FILL.BIT-VECTOR.5 + FILL.BIT-VECTOR.6 FILL.BIT-VECTOR.7 FILL.BIT-VECTOR.8 + FILL.BIT-VECTOR.9 FILL.ALLOW-OTHER-KEYS.1 FILL.ALLOW-OTHER-KEYS.2 + FILL.ALLOW-OTHER-KEYS.3 FILL.ALLOW-OTHER-KEYS.4 + FILL.ALLOW-OTHER-KEYS.5 FILL.ALLOW-OTHER-KEYS.6 + FILL.ALLOW-OTHER-KEYS.7 FILL.ORDER.1 FILL.ORDER.2 FILL.ORDER.3 + FILL.ORDER.4 ARRAY-STRING-FILL.1 ARRAY-STRING-FILL.2 + ARRAY-STRING-FILL.3 ARRAY-STRING-FILL.4 ARRAY-STRING-FILL.5 + MAKE-SEQUENCE.1 MAKE-SEQUENCE.2 MAKE-SEQUENCE.3 MAKE-SEQUENCE.4 + MAKE-SEQUENCE.5 MAKE-SEQUENCE.6 MAKE-SEQUENCE.7 MAKE-SEQUENCE.8 + MAKE-SEQUENCE.9 MAKE-SEQUENCE.10 MAKE-SEQUENCE.11 MAKE-SEQUENCE.12 + MAKE-SEQUENCE.13 MAKE-SEQUENCE.14 MAKE-SEQUENCE.15 MAKE-SEQUENCE.16 + MAKE-SEQUENCE.17 MAKE-SEQUENCE.18 MAKE-SEQUENCE.19 MAKE-SEQUENCE.20 + MAKE-SEQUENCE.21 MAKE-SEQUENCE.22 MAKE-SEQUENCE.23 MAKE-SEQUENCE.24 + MAKE-SEQUENCE.25 MAKE-SEQUENCE.26 MAKE-SEQUENCE.ALLOW-OTHER-KEYS.1 + MAKE-SEQUENCE.ALLOW-OTHER-KEYS.2 MAKE-SEQUENCE.ALLOW-OTHER-KEYS.3 + MAKE-SEQUENCE.ALLOW-OTHER-KEYS.4 MAKE-SEQUENCE.ALLOW-OTHER-KEYS.5 + MAKE-SEQUENCE.KEYWORDS.6 MAKE-SEQUENCE.ERROR.1 +Test MAKE-SEQUENCE.ERROR.2 failed +Form: (CLASSIFY-ERROR (MAKE-SEQUENCE 'NULL 1)) +Expected value: TYPE-ERROR +Actual value: (NIL). + MAKE-SEQUENCE.ERROR.3 MAKE-SEQUENCE.ERROR.4 MAKE-SEQUENCE.ERROR.5 + MAKE-SEQUENCE.ERROR.6 MAKE-SEQUENCE.ERROR.7 MAKE-SEQUENCE.ERROR.8 + MAKE-SEQUENCE.ERROR.9 MAKE-SEQUENCE.ERROR.10 MAKE-SEQUENCE.ERROR.11 + MAKE-SEQUENCE.ERROR.12 MAKE-SEQUENCE.ERROR.13 MAKE-SEQUENCE.ERROR.14 + MAKE-SEQUENCE.ORDER.1 MAKE-SEQUENCE.ORDER.2 MAP-ARRAY.1 MAP-ARRAY.2 + MAP-ARRAY.3 MAP-ARRAY.4 MAP-ARRAY.5 MAP-ARRAY.6 MAP-ARRAY.9 + MAP-ARRAY.10 MAP-ARRAY.11 MAP-ARRAY.12 MAP-ARRAY.13 MAP-ARRAY.14 + MAP-BIT-VECTOR.15 MAP-BIT-VECTOR.16 MAP-BIT-VECTOR.17 + MAP-BIT-VECTOR.18 MAP-BIT-VECTOR.19 MAP-BIT-VECTOR.20 + MAP-BIT-VECTOR.21 MAP-BIT-VECTOR.22 MAP-BIT-VECTOR.23 + MAP-BIT-VECTOR.24 MAP-BIT-VECTOR.25 MAP-STRING.26 MAP-STRING.27 + MAP-STRING.28 MAP-STRING.29 MAP-STRING.30 MAP-NIL.33 MAP-NIL.34 + MAP-NIL.35 MAP-NIL.36 MAP-NULL.1 MAP-CONS.1 MAP.ERROR.1 MAP.ERROR.2 + MAP.ERROR.3 MAP.ERROR.4 MAP.ERROR.5 MAP.ERROR.6 MAP.ERROR.7 + MAP.ERROR.8 MAP.ERROR.9 MAP.FILL.1 MAP.FILL.2 MAP.FILL.3 MAP.FILL.4 + MAP.FILL.5 MAP.FILL.6 MAP.ORDER.1 MAP-INTO-LIST.1 MAP-INTO-LIST.2 + MAP-INTO-LIST.3 MAP-INTO-LIST.4 MAP-INTO-LIST.5 MAP-INTO-LIST.6 + MAP-INTO-LIST.7 MAP-INTO-LIST.8 MAP-INTO-ARRAY.1 MAP-INTO-ARRAY.2 + MAP-INTO-ARRAY.3 MAP-INTO-ARRAY.4 MAP-INTO-ARRAY.5 MAP-INTO-ARRAY.6 + MAP-INTO-ARRAY.7 MAP-INTO-ARRAY.8 MAP-INTO-ARRAY.9 MAP-INTO-ARRAY.10 + MAP-INTO-ARRAY.11 MAP-INTO-STRING.1 MAP-INTO-STRING.2 + MAP-INTO-STRING.3 MAP-INTO-STRING.4 MAP-INTO-STRING.5 + MAP-INTO-STRING.6 MAP-INTO-STRING.7 MAP-INTO-STRING.8 + MAP-INTO-STRING.9 MAP-INTO-STRING.10 MAP-INTO-STRING.11 + MAP-INTO-STRING.12 MAP-INTO.BIT-VECTOR.1 MAP-INTO.BIT-VECTOR.2 + MAP-INTO.BIT-VECTOR.3 MAP-INTO.BIT-VECTOR.4 MAP-INTO.BIT-VECTOR.5 + MAP-INTO.BIT-VECTOR.6 MAP-INTO.BIT-VECTOR.7 MAP-INTO.BIT-VECTOR.8 + MAP-INTO.BIT-VECTOR.9 MAP-INTO.ERROR.1 MAP-INTO.ERROR.2 + MAP-INTO.ERROR.3 MAP-INTO.ERROR.4 MAP-INTO.ERROR.5 MAP-INTO.ERROR.6 + MAP-INTO.ERROR.7 MAP-INTO.ERROR.8 MAP-INTO.ORDER.1 MAP-INTO.ORDER.2 + REDUCE-LIST.1 REDUCE-LIST.2 REDUCE-LIST.3 REDUCE-LIST.4 REDUCE-LIST.5 + REDUCE-LIST.6 REDUCE-LIST.7 REDUCE-LIST.8 REDUCE-LIST.9 REDUCE-LIST.10 + REDUCE-LIST.11 REDUCE-LIST.12 REDUCE-LIST.13 REDUCE-LIST.14 + REDUCE-LIST.15 REDUCE-LIST.16 REDUCE-LIST.17 REDUCE-ARRAY.1 + REDUCE-ARRAY.2 REDUCE-ARRAY.3 REDUCE-ARRAY.4 REDUCE-ARRAY.5 + REDUCE-ARRAY.6 REDUCE-ARRAY.7 REDUCE-ARRAY.8 REDUCE-ARRAY.9 + REDUCE-ARRAY.10 REDUCE-ARRAY.11 REDUCE-ARRAY.12 REDUCE-ARRAY.13 + REDUCE-ARRAY.14 REDUCE-ARRAY.15 REDUCE-ARRAY.16 REDUCE-ARRAY.17 + REDUCE-ARRAY.18 REDUCE-ARRAY.19 REDUCE.ERROR.1 +Test REDUCE.ERROR.2 failed +Form: (CLASSIFY-ERROR (REDUCE)) +Expected value: PROGRAM-ERROR +Actual value: TYPE-ERROR. + REDUCE.ERROR.3 REDUCE.ERROR.4 +Test REDUCE.ERROR.5 failed +Form: (CLASSIFY-ERROR (REDUCE #'LIST NIL 'BAD T :ALLOW-OTHER-KEYS NIL)) +Expected value: PROGRAM-ERROR +Actual value: NIL. + REDUCE.ERROR.6 REDUCE.ERROR.7 REDUCE.ERROR.8 REDUCE.ERROR.9 + REDUCE.ERROR.10 REDUCE-STRING.1 REDUCE-STRING.2 REDUCE-STRING.3 + REDUCE-STRING.4 REDUCE-STRING.5 REDUCE-STRING.6 REDUCE-STRING.7 + REDUCE-STRING.8 REDUCE-STRING.9 REDUCE-STRING.10 REDUCE-STRING.11 + REDUCE-STRING.12 REDUCE-STRING.13 REDUCE-STRING.14 REDUCE-STRING.15 + REDUCE-STRING.16 REDUCE-STRING.17 REDUCE-BITSTRING.1 + REDUCE-BITSTRING.2 REDUCE-BITSTRING.3 REDUCE-BITSTRING.4 + REDUCE-BITSTRING.5 REDUCE-BITSTRING.6 REDUCE-BITSTRING.7 + REDUCE-BITSTRING.8 REDUCE-BITSTRING.9 REDUCE-BITSTRING.10 + REDUCE-BITSTRING.11 REDUCE-BITSTRING.12 REDUCE-BITSTRING.13 + REDUCE-BITSTRING.14 REDUCE-BITSTRING.15 REDUCE-BITSTRING.16 + REDUCE-BITSTRING.17 REDUCE-BITSTRING.18 REDUCE.ORDER.1 REDUCE.ORDER.2 + REDUCE.ORDER.3 REDUCE.ALLOW-OTHER-KEYS.1 REDUCE.ALLOW-OTHER-KEYS.2 + REDUCE.ALLOW-OTHER-KEYS.3 REDUCE.ALLOW-OTHER-KEYS.4 + REDUCE.ALLOW-OTHER-KEYS.5 REDUCE.ALLOW-OTHER-KEYS.6 + REDUCE.ALLOW-OTHER-KEYS.7 REDUCE.ALLOW-OTHER-KEYS.8 REDUCE.KEYWORDS.9 + COUNT-LIST.1 COUNT-LIST.2 COUNT-LIST.3 COUNT-LIST.4 COUNT-LIST.5 + COUNT-LIST.6 COUNT-LIST.7 COUNT-LIST.8 COUNT-LIST.9 COUNT-LIST.10 + COUNT-LIST.11 COUNT-LIST.12 COUNT-LIST.13 COUNT-LIST.14 COUNT-LIST.15 + COUNT-LIST.16 COUNT-VECTOR.1 COUNT-VECTOR.2 COUNT-VECTOR.3 + COUNT-VECTOR.4 COUNT-VECTOR.5 COUNT-VECTOR.6 COUNT-VECTOR.7 + COUNT-VECTOR.8 COUNT-VECTOR.9 COUNT-VECTOR.10 COUNT-VECTOR.11 + COUNT-VECTOR.12 COUNT-VECTOR.13 COUNT-VECTOR.14 COUNT-VECTOR.15 + COUNT-VECTOR16 COUNT-FILLED-VECTOR.1 COUNT-FILLED-VECTOR.2 + COUNT-FILLED-VECTOR.3 COUNT-FILLED-VECTOR.4 COUNT-FILLED-VECTOR.5 + COUNT-FILLED-VECTOR.6 COUNT-FILLED-VECTOR.7 COUNT-FILLED-VECTOR.8 + COUNT-FILLED-VECTOR.9 COUNT-FILLED-VECTOR.10 COUNT-FILLED-VECTOR.11 + COUNT-FILLED-VECTOR.12 COUNT-FILLED-VECTOR.13 COUNT-FILLED-VECTOR.14 + COUNT-FILLED-VECTOR.15 COUNT-FILLED-VECTOR.16 COUNT-FILLED-VECTOR.17 + COUNT-FILLED-VECTOR.18 COUNT-FILLED-VECTOR.19 COUNT-FILLED-VECTOR.20 + COUNT-BIT-VECTOR.1 COUNT-BIT-VECTOR.2 COUNT-BIT-VECTOR.3 + COUNT-BIT-VECTOR.4 COUNT-BIT-VECTOR.5 COUNT-BIT-VECTOR.6 + COUNT-BIT-VECTOR.7 COUNT-BIT-VECTOR.8 COUNT-BIT-VECTOR.9 + COUNT-BIT-VECTOR.10 COUNT-BIT-VECTOR.11 COUNT-BIT-VECTOR.12 + COUNT-BIT-VECTOR.13 COUNT-BIT-VECTOR.14 COUNT-BIT-VECTOR.15 + COUNT-BIT-VECTOR.16 COUNT-BIT-VECTOR.17 COUNT-BIT-VECTOR.18 + COUNT-BIT-VECTOR.19 COUNT-BIT-VECTOR.20 COUNT-STRING.1 COUNT-STRING.2 + COUNT-STRING.3 COUNT-STRING.4 COUNT-STRING.5 COUNT-STRING.6 + COUNT-STRING.7 COUNT-STRING.8 COUNT-STRING.9 COUNT-STRING.10 + COUNT-STRING.11 COUNT-STRING.12 COUNT-STRING.13 COUNT-STRING.14 + COUNT-STRING.15 COUNT-STRING.16 COUNT-STRING.17 COUNT-STRING.18 + COUNT-STRING.19 COUNT-STRING.20 COUNT.ORDER.1 COUNT.ORDER.2 + COUNT.ALLOW-OTHER-KEYS.1 COUNT.ALLOW-OTHER-KEYS.2 + COUNT.ALLOW-OTHER-KEYS.3 COUNT.KEYWORDS.4 COUNT.ALLOW-OTHER-KEYS.5 + COUNT.ERROR.1 COUNT.ERROR.2 COUNT.ERROR.3 COUNT.ERROR.4 COUNT.ERROR.5 + COUNT.ERROR.6 COUNT.ERROR.7 COUNT.ERROR.8 COUNT.ERROR.9 COUNT.ERROR.10 + COUNT.ERROR.11 COUNT.ERROR.12 COUNT.ERROR.13 COUNT.ERROR.14 + COUNT.ERROR.15 COUNT-IF-LIST.1 COUNT-IF-LIST.2 COUNT-IF-LIST.3 + COUNT-IF-LIST.4 COUNT-IF-LIST.5 COUNT-IF-LIST.6 COUNT-IF-LIST.8 + COUNT-IF-LIST.9 COUNT-IF-LIST.10 COUNT-IF-LIST.11 COUNT-IF-LIST.12 + COUNT-IF-LIST.13 COUNT-IF-LIST.14 COUNT-IF-LIST.15 COUNT-IF-LIST.16 + COUNT-IF-VECTOR.1 COUNT-IF-VECTOR.2 COUNT-IF-VECTOR.3 + COUNT-IF-VECTOR.4 COUNT-IF-VECTOR.5 COUNT-IF-VECTOR.6 + COUNT-IF-VECTOR.8 COUNT-IF-VECTOR.9 COUNT-IF-VECTOR.10 + COUNT-IF-VECTOR.11 COUNT-IF-VECTOR.12 COUNT-IF-VECTOR.13 + COUNT-IF-VECTOR.14 COUNT-IF-VECTOR.15 COUNT-IF-VECTOR.16 + COUNT-IF-NONSIMPLE-VECTOR.1 COUNT-IF-NONSIMPLE-VECTOR.2 + COUNT-IF-NONSIMPLE-VECTOR.3 COUNT-IF-NONSIMPLE-VECTOR.4 + COUNT-IF-NONSIMPLE-VECTOR.5 COUNT-IF-NONSIMPLE-VECTOR.6 + COUNT-IF-NONSIMPLE-VECTOR.8 COUNT-IF-NONSIMPLE-VECTOR.9 + COUNT-IF-NONSIMPLE-VECTOR.10 COUNT-IF-NONSIMPLE-VECTOR.11 + COUNT-IF-NONSIMPLE-VECTOR.12 COUNT-IF-NONSIMPLE-VECTOR.13 + COUNT-IF-NONSIMPLE-VECTOR.14 COUNT-IF-NONSIMPLE-VECTOR.15 + COUNT-IF-NONSIMPLE-VECTOR.16 COUNT-IF-NONSIMPLE-VECTOR.17 + COUNT-IF-BIT-VECTOR.1 COUNT-IF-BIT-VECTOR.2 COUNT-IF-BIT-VECTOR.3 + COUNT-IF-BIT-VECTOR.4 COUNT-IF-BIT-VECTOR.5 COUNT-IF-BIT-VECTOR.6 + COUNT-IF-BIT-VECTOR.8 COUNT-IF-BIT-VECTOR.10 COUNT-IF-BIT-VECTOR.11 + COUNT-IF-BIT-VECTOR.12 COUNT-IF-BIT-VECTOR.13 COUNT-IF-BIT-VECTOR.14 + COUNT-IF-BIT-VECTOR.15 COUNT-IF-BIT-VECTOR.16 COUNT-IF-BIT-VECTOR.17 + COUNT-IF-STRING.1 COUNT-IF-STRING.2 COUNT-IF-STRING.3 + COUNT-IF-STRING.4 COUNT-IF-STRING.5 COUNT-IF-STRING.6 + COUNT-IF-STRING.8 COUNT-IF-STRING.11 COUNT-IF-STRING.12 + COUNT-IF-STRING.13 COUNT-IF-STRING.14 COUNT-IF-STRING.15 + COUNT-IF-STRING.16 COUNT-IF-STRING.17 COUNT-IF.ORDER.1 + COUNT-IF.ORDER.2 COUNT-IF.ALLOW-OTHER-KEYS.1 + COUNT-IF.ALLOW-OTHER-KEYS.2 COUNT-IF.ALLOW-OTHER-KEYS.3 + COUNT-IF.KEYWORDS.4 COUNT-IF.ALLOW-OTHER-KEYS.5 COUNT-IF.ERROR.1 + COUNT-IF.ERROR.2 COUNT-IF.ERROR.3 COUNT-IF.ERROR.4 COUNT-IF.ERROR.5 + COUNT-IF.ERROR.6 COUNT-IF.ERROR.7 COUNT-IF.ERROR.8 COUNT-IF.ERROR.9 + COUNT-IF.ERROR.10 COUNT-IF.ERROR.11 COUNT-IF.ERROR.12 + COUNT-IF.ERROR.13 COUNT-IF.ERROR.14 COUNT-IF.ERROR.15 + COUNT-IF-NOT-LIST.1 COUNT-IF-NOT-LIST.2 COUNT-IF-NOT-LIST.3 + COUNT-IF-NOT-LIST.4 COUNT-IF-NOT-LIST.5 COUNT-IF-NOT-LIST.6 + COUNT-IF-NOT-LIST.8 COUNT-IF-NOT-LIST.9 COUNT-IF-NOT-LIST.10 + COUNT-IF-NOT-LIST.11 COUNT-IF-NOT-LIST.12 COUNT-IF-NOT-LIST.13 + COUNT-IF-NOT-LIST.14 COUNT-IF-NOT-LIST.15 COUNT-IF-NOT-LIST.16 + COUNT-IF-NOT-VECTOR.1 COUNT-IF-NOT-VECTOR.2 COUNT-IF-NOT-VECTOR.3 + COUNT-IF-NOT-VECTOR.4 COUNT-IF-NOT-VECTOR.5 COUNT-IF-NOT-VECTOR.6 + COUNT-IF-NOT-VECTOR.8 COUNT-IF-NOT-VECTOR.9 COUNT-IF-NOT-VECTOR.10 + COUNT-IF-NOT-VECTOR.11 COUNT-IF-NOT-VECTOR.12 COUNT-IF-NOT-VECTOR.13 + COUNT-IF-NOT-VECTOR.14 COUNT-IF-NOT-VECTOR.15 COUNT-IF-NOT-VECTOR.16 + COUNT-IF-NOT-NONSIMPLE-VECTOR.1 COUNT-IF-NOT-NONSIMPLE-VECTOR.2 + COUNT-IF-NOT-NONSIMPLE-VECTOR.3 COUNT-IF-NOT-NONSIMPLE-VECTOR.4 + COUNT-IF-NOT-NONSIMPLE-VECTOR.5 COUNT-IF-NOT-NONSIMPLE-VECTOR.6 + COUNT-IF-NOT-NONSIMPLE-VECTOR.8 COUNT-IF-NOT-NONSIMPLE-VECTOR.9 + COUNT-IF-NOT-NONSIMPLE-VECTOR.10 COUNT-IF-NOT-NONSIMPLE-VECTOR.11 + COUNT-IF-NOT-NONSIMPLE-VECTOR.12 COUNT-IF-NOT-NONSIMPLE-VECTOR.13 + COUNT-IF-NOT-NONSIMPLE-VECTOR.14 COUNT-IF-NOT-NONSIMPLE-VECTOR.15 + COUNT-IF-NOT-NONSIMPLE-VECTOR.16 COUNT-IF-NOT-NONSIMPLE-VECTOR.17 + COUNT-IF-NOT-BIT-VECTOR.1 COUNT-IF-NOT-BIT-VECTOR.2 + COUNT-IF-NOT-BIT-VECTOR.3 COUNT-IF-NOT-BIT-VECTOR.4 + COUNT-IF-NOT-BIT-VECTOR.5 COUNT-IF-NOT-BIT-VECTOR.6 + COUNT-IF-NOT-BIT-VECTOR.8 COUNT-IF-NOT-BIT-VECTOR.10 + COUNT-IF-NOT-BIT-VECTOR.11 COUNT-IF-NOT-BIT-VECTOR.12 + COUNT-IF-NOT-BIT-VECTOR.13 COUNT-IF-NOT-BIT-VECTOR.14 + COUNT-IF-NOT-BIT-VECTOR.15 COUNT-IF-NOT-BIT-VECTOR.16 + COUNT-IF-NOT-BIT-VECTOR.17 COUNT-IF-NOT-STRING.1 COUNT-IF-NOT-STRING.2 + COUNT-IF-NOT-STRING.3 COUNT-IF-NOT-STRING.4 COUNT-IF-NOT-STRING.5 + COUNT-IF-NOT-STRING.6 COUNT-IF-NOT-STRING.8 COUNT-IF-NOT-STRING.11 + COUNT-IF-NOT-STRING.12 COUNT-IF-NOT-STRING.13 COUNT-IF-NOT-STRING.14 + COUNT-IF-NOT-STRING.15 COUNT-IF-NOT-STRING.16 COUNT-IF-NOT-STRING.17 + COUNT-IF-NOT.ORDER.1 COUNT-IF-NOT.ORDER.2 COUNT-IF-NOT.KEYWORDS.1 + COUNT-IF-NOT.KEYWORDS.2 COUNT-IF-NOT.KEYWORDS.3 + COUNT-IF-NOT.KEYWORDS.4 COUNT-IF-NOT.ALLOW-OTHER-KEYS.5 + COUNT-IF-NOT.ERROR.1 COUNT-IF-NOT.ERROR.2 COUNT-IF-NOT.ERROR.3 + COUNT-IF-NOT.ERROR.4 COUNT-IF-NOT.ERROR.5 COUNT-IF-NOT.ERROR.6 + COUNT-IF-NOT.ERROR.7 COUNT-IF-NOT.ERROR.8 COUNT-IF-NOT.ERROR.9 + COUNT-IF-NOT.ERROR.10 COUNT-IF-NOT.ERROR.11 COUNT-IF-NOT.ERROR.12 + COUNT-IF-NOT.ERROR.13 COUNT-IF-NOT.ERROR.14 COUNT-IF-NOT.ERROR.15 + REVERSE-LIST.1 REVERSE-LIST.2 REVERSE-VECTOR.1 REVERSE-VECTOR.2 + REVERSE-NONSIMPLE-VECTOR.1 REVERSE-NONSIMPLE-VECTOR.2 + REVERSE-NONSIMPLE-VECTOR.3 REVERSE-BIT-VECTOR.1 REVERSE-BIT-VECTOR.2 + REVERSE-BIT-VECTOR.3 REVERSE-STRING.1 REVERSE-STRING.2 + REVERSE-STRING.3 REVERSE-STRING.4 REVERSE.ORDER.1 REVERSE.ERROR.1 + REVERSE.ERROR.2 REVERSE.ERROR.3 REVERSE.ERROR.4 REVERSE.ERROR.5 + REVERSE.ERROR.6 REVERSE.ERROR.7 REVERSE.ERROR.8 NREVERSE-LIST.1 + NREVERSE-LIST.2 NREVERSE-VECTOR.1 NREVERSE-VECTOR.2 + NREVERSE-NONSIMPLE-VECTOR.1 NREVERSE-NONSIMPLE-VECTOR.2 + NREVERSE-NONSIMPLE-VECTOR.3 NREVERSE-BIT-VECTOR.1 + NREVERSE-BIT-VECTOR.2 NREVERSE-BIT-VECTOR.3 NREVERSE-STRING.1 + NREVERSE-STRING.2 NREVERSE-STRING.3 NREVERSE-STRING.4 NREVERSE.ORDER.1 + NREVERSE.ERROR.1 NREVERSE.ERROR.2 NREVERSE.ERROR.3 NREVERSE.ERROR.4 + NREVERSE.ERROR.5 NREVERSE.ERROR.6 NREVERSE.ERROR.7 NREVERSE.ERROR.8 + SORT-LIST.1 SORT-LIST.2 SORT-LIST.3 SORT-VECTOR.1 SORT-VECTOR.2 + SORT-VECTOR.3 SORT-VECTOR.4 SORT-BIT-VECTOR.1 SORT-BIT-VECTOR.2 + SORT-BIT-VECTOR.3 SORT-STRING.1 SORT-STRING.2 SORT-STRING.3 + SORT.ORDER.1 SORT.ORDER.2 +Test SORT.ERROR.1 failed +Form: (CLASSIFY-ERROR (SORT)) +Expected value: PROGRAM-ERROR +Actual value: TYPE-ERROR. +Test SORT.ERROR.2 failed +Form: (CLASSIFY-ERROR (SORT NIL)) +Expected value: PROGRAM-ERROR +Actual value: NIL. + SORT.ERROR.3 SORT.ERROR.4 +Test SORT.ERROR.5 failed +Form: (CLASSIFY-ERROR (SORT NIL #'< 'BAD T :ALLOW-OTHER-KEYS NIL)) +Expected value: PROGRAM-ERROR +Actual value: NIL. + SORT.ERROR.6 SORT.ERROR.7 SORT.ERROR.8 SORT.ERROR.9 SORT.ERROR.10 + FIND-LIST.1 FIND-LIST.2 FIND-LIST.3 FIND-LIST.4 FIND-LIST.5 + FIND-LIST.6 FIND-LIST.7 FIND-LIST.8 FIND-LIST.9 FIND-LIST.10 + FIND-LIST.11 FIND-LIST.12 FIND-LIST.13 FIND-LIST.14 FIND-LIST.15 + FIND-LIST.16 FIND-LIST.17 FIND-LIST.18 FIND-LIST.19 FIND-LIST.20 + FIND-LIST.21 FIND-LIST.22 FIND-LIST.23 FIND-LIST.24 FIND-LIST.25 + FIND-LIST.26 FIND-LIST.27 FIND-LIST.28 FIND-VECTOR.1 FIND-VECTOR.1A + FIND-VECTOR.2 FIND-VECTOR.2A FIND-VECTOR.3 FIND-VECTOR.4 FIND-VECTOR.5 + FIND-VECTOR.6 FIND-VECTOR.7 FIND-VECTOR.8 FIND-VECTOR.9 FIND-VECTOR.10 + FIND-VECTOR.11 FIND-VECTOR.12 FIND-VECTOR.13 FIND-VECTOR.14 + FIND-VECTOR.15 FIND-VECTOR.16 FIND-VECTOR.17 FIND-VECTOR.18 + FIND-VECTOR.19 FIND-VECTOR.20 FIND-VECTOR.21 FIND-VECTOR.22 + FIND-VECTOR.23 FIND-VECTOR.24 FIND-VECTOR.25 FIND-VECTOR.26 + FIND-VECTOR.27 FIND-VECTOR.28 FIND-VECTOR.29 FIND-VECTOR.30 + FIND-BIT-VECTOR.1 FIND-BIT-VECTOR.1A FIND-BIT-VECTOR.1B + FIND-BIT-VECTOR.1C FIND-BIT-VECTOR.1D FIND-BIT-VECTOR.2 + FIND-BIT-VECTOR.2A FIND-BIT-VECTOR.2B FIND-BIT-VECTOR.2C + FIND-BIT-VECTOR.2D FIND-BIT-VECTOR.2E FIND-BIT-VECTOR.3 + FIND-BIT-VECTOR.4 FIND-BIT-VECTOR.5 FIND-BIT-VECTOR.6 + FIND-BIT-VECTOR.7 FIND-BIT-VECTOR.8 FIND-BIT-VECTOR.9 + FIND-BIT-VECTOR.10 FIND-BIT-VECTOR.11 FIND-BIT-VECTOR.12 + FIND-BIT-VECTOR.13 FIND-BIT-VECTOR.14 FIND-BIT-VECTOR.15 + FIND-BIT-VECTOR.16 FIND-BIT-VECTOR.16A FIND-BIT-VECTOR.16B + FIND-BIT-VECTOR.17 FIND-BIT-VECTOR.17A FIND-BIT-VECTOR.17B + FIND-BIT-VECTOR.18 FIND-BIT-VECTOR.18A FIND-BIT-VECTOR.19 + FIND-BIT-VECTOR.19A FIND-BIT-VECTOR.20 FIND-BIT-VECTOR.21 + FIND-BIT-VECTOR.21A FIND-BIT-VECTOR.21B FIND-BIT-VECTOR.22 + FIND-BIT-VECTOR.22A FIND-BIT-VECTOR.22B FIND-BIT-VECTOR.23 + FIND-BIT-VECTOR.23A FIND-BIT-VECTOR.23B FIND-BIT-VECTOR.24 + FIND-BIT-VECTOR.24A FIND-BIT-VECTOR.24B FIND-BIT-VECTOR.25 + FIND-BIT-VECTOR.26 FIND-BIT-VECTOR.26A FIND-BIT-VECTOR.27 + FIND-BIT-VECTOR.28 FIND-BIT-VECTOR.29 FIND-BIT-VECTOR.30 FIND-STRING.1 + FIND-STRING.1A FIND-STRING.2 FIND-STRING.2A FIND-STRING.3 + FIND-STRING.4 FIND-STRING.5 FIND-STRING.6 FIND-STRING.7 FIND-STRING.8 + FIND-STRING.9 FIND-STRING.10 FIND-STRING.11 FIND-STRING.13 + FIND-STRING.14 FIND-STRING.15 FIND-STRING.16 FIND-STRING.17 + FIND-STRING.18 FIND-STRING.19 FIND-STRING.20 FIND-STRING.21 + FIND-STRING.22 FIND-STRING.23 FIND-STRING.24 FIND-STRING.25 + FIND.ALLOW-OTHER-KEYS.1 FIND.ALLOW-OTHER-KEYS.2 + FIND.ALLOW-OTHER-KEYS.3 FIND.KEYWORDS.4 FIND.ALLOW-OTHER-KEYS.5 + FIND.ERROR.1 FIND.ERROR.2 FIND.ERROR.3 FIND.ERROR.4 FIND.ERROR.5 + FIND.ERROR.6 FIND.ERROR.7 FIND.ERROR.8 FIND.ERROR.9 FIND.ERROR.10 + FIND.ERROR.11 FIND.ERROR.12 FIND.ERROR.13 FIND.ERROR.14 FIND.ERROR.15 + FIND.ORDER.1 FIND.ORDER.2 FIND.ORDER.3 FIND-IF-LIST.1 FIND-IF-LIST.2 + FIND-IF-LIST.2A FIND-IF-LIST.3 FIND-IF-LIST.4 FIND-IF-LIST.5 + FIND-IF-LIST.6 FIND-IF-LIST.7 FIND-IF-LIST.8 FIND-IF-LIST.9 + FIND-IF-LIST.10 FIND-IF-LIST.11 FIND-IF-LIST.12 FIND-IF-LIST.13 + FIND-IF-LIST.14 FIND-IF-LIST.15 FIND-IF-LIST.16 FIND-IF-LIST.17 + FIND-IF-LIST.18 FIND-IF-VECTOR.1 FIND-IF-VECTOR.2 FIND-IF-VECTOR.2A + FIND-IF-VECTOR.3 FIND-IF-VECTOR.4 FIND-IF-VECTOR.5 FIND-IF-VECTOR.6 + FIND-IF-VECTOR.7 FIND-IF-VECTOR.8 FIND-IF-VECTOR.9 FIND-IF-VECTOR.10 + FIND-IF-VECTOR.11 FIND-IF-VECTOR.12 FIND-IF-VECTOR.13 + FIND-IF-VECTOR.14 FIND-IF-VECTOR.15 FIND-IF-VECTOR.16 + FIND-IF-VECTOR.17 FIND-IF-VECTOR.18 FIND-IF-VECTOR.19 + FIND-IF-BIT-VECTOR.1 FIND-IF-BIT-VECTOR.2 FIND-IF-BIT-VECTOR.3 + FIND-IF-BIT-VECTOR.4 FIND-IF-BIT-VECTOR.5 FIND-IF-BIT-VECTOR.6 + FIND-IF-BIT-VECTOR.7 FIND-IF-STRING.1 FIND-IF-STRING.2 + FIND-IF-STRING.2A FIND-IF-STRING.3 FIND-IF-STRING.3A FIND-IF-STRING.4 + FIND-IF-STRING.5 FIND-IF-STRING.6 FIND-IF-STRING.7 FIND-IF-STRING.8 + FIND-IF-STRING.9 FIND-IF-STRING.10 FIND-IF-STRING.11 FIND-IF-STRING.12 + FIND-IF-STRING.13 FIND-IF-STRING.14 FIND-IF-STRING.15 + FIND-IF-STRING.16 FIND-IF-STRING.17 FIND-IF-STRING.18 + FIND-IF-STRING.19 FIND-IF.ALLOW-OTHER-KEYS.1 + FIND-IF.ALLOW-OTHER-KEYS.2 FIND-IF.ALLOW-OTHER-KEYS.3 + FIND-IF.KEYWORDS.4 FIND-IF.ALLOW-OTHER-KEYS.5 FIND-IF.ERROR.1 + FIND-IF.ERROR.2 FIND-IF.ERROR.3 FIND-IF.ERROR.4 FIND-IF.ERROR.5 + FIND-IF.ERROR.6 FIND-IF.ERROR.7 FIND-IF.ERROR.8 FIND-IF.ERROR.9 + FIND-IF.ERROR.10 FIND-IF.ERROR.11 FIND-IF.ERROR.12 FIND-IF.ERROR.13 + FIND-IF.ERROR.14 FIND-IF.ERROR.15 FIND-IF.ORDER.1 FIND-IF.ORDER.2 + FIND-IF.ORDER.3 FIND-IF-NOT-LIST.1 FIND-IF-NOT-LIST.2 + FIND-IF-NOT-LIST.2A FIND-IF-NOT-LIST.3 FIND-IF-NOT-LIST.4 + FIND-IF-NOT-LIST.5 FIND-IF-NOT-LIST.6 FIND-IF-NOT-LIST.7 + FIND-IF-NOT-LIST.8 FIND-IF-NOT-LIST.9 FIND-IF-NOT-LIST.10 + FIND-IF-NOT-LIST.11 FIND-IF-NOT-LIST.12 FIND-IF-NOT-LIST.13 + FIND-IF-NOT-LIST.14 FIND-IF-NOT-LIST.15 FIND-IF-NOT-LIST.16 + FIND-IF-NOT-LIST.17 FIND-IF-NOT-LIST.18 FIND-IF-NOT-VECTOR.1 + FIND-IF-NOT-VECTOR.2 FIND-IF-NOT-VECTOR.2A FIND-IF-NOT-VECTOR.3 + FIND-IF-NOT-VECTOR.4 FIND-IF-NOT-VECTOR.5 FIND-IF-NOT-VECTOR.6 + FIND-IF-NOT-VECTOR.7 FIND-IF-NOT-VECTOR.8 FIND-IF-NOT-VECTOR.9 + FIND-IF-NOT-VECTOR.10 FIND-IF-NOT-VECTOR.11 FIND-IF-NOT-VECTOR.12 + FIND-IF-NOT-VECTOR.13 FIND-IF-NOT-VECTOR.14 FIND-IF-NOT-VECTOR.15 + FIND-IF-NOT-VECTOR.16 FIND-IF-NOT-VECTOR.17 FIND-IF-NOT-VECTOR.18 + FIND-IF-NOT-BIT-VECTOR.1 FIND-IF-NOT-BIT-VECTOR.2 + FIND-IF-NOT-BIT-VECTOR.3 FIND-IF-NOT-BIT-VECTOR.4 + FIND-IF-NOT-BIT-VECTOR.5 FIND-IF-NOT-BIT-VECTOR.6 + FIND-IF-NOT-BIT-VECTOR.7 FIND-IF-NOT-STRING.1 FIND-IF-NOT-STRING.2 + FIND-IF-NOT-STRING.2A FIND-IF-NOT-STRING.3 FIND-IF-NOT-STRING.3A + FIND-IF-NOT-STRING.4 FIND-IF-NOT-STRING.5 FIND-IF-NOT-STRING.6 + FIND-IF-NOT-STRING.7 FIND-IF-NOT-STRING.8 FIND-IF-NOT-STRING.9 + FIND-IF-NOT-STRING.10 FIND-IF-NOT-STRING.11 FIND-IF-NOT-STRING.12 + FIND-IF-NOT-STRING.13 FIND-IF-NOT-STRING.14 FIND-IF-NOT-STRING.15 + FIND-IF-NOT-STRING.16 FIND-IF-NOT-STRING.17 FIND-IF-NOT-STRING.18 + FIND-IF-NOT.ALLOW-OTHER-KEYS.1 FIND-IF-NOT.ALLOW-OTHER-KEYS.2 + FIND-IF-NOT.ALLOW-OTHER-KEYS.3 FIND-IF-NOT.KEYWORDS.4 + FIND-IF-NOT.ALLOW-OTHER-KEYS.5 FIND-IF-NOT.ERROR.1 FIND-IF-NOT.ERROR.2 + FIND-IF-NOT.ERROR.3 FIND-IF-NOT.ERROR.4 FIND-IF-NOT.ERROR.5 + FIND-IF-NOT.ERROR.6 FIND-IF-NOT.ERROR.7 FIND-IF-NOT.ERROR.8 + FIND-IF-NOT.ERROR.9 FIND-IF-NOT.ERROR.10 FIND-IF-NOT.ERROR.11 + FIND-IF-NOT.ERROR.12 FIND-IF-NOT.ERROR.13 FIND-IF-NOT.ERROR.14 + FIND-IF-NOT.ERROR.15 FIND-IF-NOT.ORDER.1 FIND-IF-NOT.ORDER.2 + FIND-IF-NOT.ORDER.3 POSITION-LIST.1 POSITION-LIST.2 POSITION-LIST.3 + POSITION-LIST.4 POSITION-LIST.5 POSITION-LIST.6 POSITION-LIST.7 + POSITION-LIST.8 POSITION-LIST.9 POSITION-LIST.10 POSITION-LIST.11 + POSITION-LIST.12 POSITION-LIST.13 POSITION-LIST.14 POSITION-LIST.15 + POSITION-LIST.16 POSITION-LIST.17 POSITION-LIST.18 POSITION-LIST.19 + POSITION-LIST.20 POSITION-LIST.21 POSITION-LIST.22 POSITION-LIST.23 + POSITION-LIST.24 POSITION-LIST.25 POSITION-LIST.26 POSITION-LIST.27 + POSITION-LIST.28 POSITION-VECTOR.1 POSITION-VECTOR.2 POSITION-VECTOR.3 + POSITION-VECTOR.4 POSITION-VECTOR.5 POSITION-VECTOR.6 + POSITION-VECTOR.7 POSITION-VECTOR.8 POSITION-VECTOR.9 + POSITION-VECTOR.10 POSITION-VECTOR.11 POSITION-VECTOR.12 + POSITION-VECTOR.13 POSITION-VECTOR.14 POSITION-VECTOR.15 + POSITION-VECTOR.16 POSITION-VECTOR.17 POSITION-VECTOR.18 + POSITION-VECTOR.19 POSITION-VECTOR.20 POSITION-VECTOR.21 + POSITION-VECTOR.22 POSITION-VECTOR.23 POSITION-VECTOR.24 + POSITION-VECTOR.25 POSITION-VECTOR.26 POSITION-VECTOR.27 + POSITION-VECTOR.28 POSITION-VECTOR.29 POSITION-VECTOR.30 + POSITION-VECTOR.31 POSITION-BIT-VECTOR.1 POSITION-BIT-VECTOR.2 + POSITION-BIT-VECTOR.3 POSITION-BIT-VECTOR.4 POSITION-BIT-VECTOR.5 + POSITION-BIT-VECTOR.6 POSITION-BIT-VECTOR.7 POSITION-BIT-VECTOR.8 + POSITION-BIT-VECTOR.9 POSITION-BIT-VECTOR.10 POSITION-BIT-VECTOR.11 + POSITION-BIT-VECTOR.12 POSITION-BIT-VECTOR.13 POSITION-BIT-VECTOR.14 + POSITION-BIT-VECTOR.15 POSITION-BIT-VECTOR.16 POSITION-BIT-VECTOR.17 + POSITION-BIT-VECTOR.18 POSITION-BIT-VECTOR.19 POSITION-BIT-VECTOR.20 + POSITION-BIT-VECTOR.21 POSITION-BIT-VECTOR.22 POSITION-BIT-VECTOR.23 + POSITION-BIT-VECTOR.24 POSITION-BIT-VECTOR.25 POSITION-BIT-VECTOR.27 + POSITION-BIT-VECTOR.28 POSITION-BIT-VECTOR.29 POSITION-BIT-VECTOR.30 + POSITION-BIT-VECTOR.31 POSITION-BIT-VECTOR.32 POSITION-STRING.1 + POSITION-STRING.2 POSITION-STRING.3 POSITION-STRING.4 + POSITION-STRING.5 POSITION-STRING.6 POSITION-STRING.7 + POSITION-STRING.8 POSITION-STRING.9 POSITION-STRING.10 + POSITION-STRING.11 POSITION-STRING.13 POSITION-STRING.14 + POSITION-STRING.15 POSITION-STRING.16 POSITION-STRING.17 + POSITION-STRING.18 POSITION-STRING.19 POSITION-STRING.20 + POSITION-STRING.21 POSITION-STRING.22 POSITION-STRING.23 + POSITION-STRING.24 POSITION-STRING.25 POSITION-STRING.26 + POSITION-STRING.27 POSITION-STRING.28 POSITION.ORDER.1 + POSITION.ORDER.2 POSITION.ALLOW-OTHER-KEYS.1 + POSITION.ALLOW-OTHER-KEYS.2 POSITION.ALLOW-OTHER-KEYS.3 + POSITION.ALLOW-OTHER-KEYS.4 POSITION.ALLOW-OTHER-KEYS.5 + POSITION.KEYWORDS.6 POSITION.ALLOW-OTHER-KEYS.7 + POSITION.ALLOW-OTHER-KEYS.8 POSITION.ALLOW-OTHER-KEYS.9 + POSITION.ERROR.1 POSITION.ERROR.2 POSITION.ERROR.3 POSITION.ERROR.4 + POSITION.ERROR.5 POSITION.ERROR.6 POSITION.ERROR.7 POSITION.ERROR.8 + POSITION.ERROR.9 POSITION.ERROR.10 POSITION.ERROR.11 POSITION.ERROR.12 + POSITION.ERROR.13 POSITION.ERROR.14 POSITION.ERROR.15 SEARCH-LIST.1 + SEARCH-LIST.2 SEARCH-LIST.3 SEARCH-LIST.4 SEARCH-LIST.5 SEARCH-LIST.6 + SEARCH-LIST.7 SEARCH-LIST.8 SEARCH-LIST.9 SEARCH-LIST.10 SEARCH-LIST.11 SEARCH-LIST.12 SEARCH-LIST.13 SEARCH-LIST.14 SEARCH.ALLOW-OTHER-KEYS.1 SEARCH.ALLOW-OTHER-KEYS.2 SEARCH.ALLOW-OTHER-KEYS.3 SEARCH.ALLOW-OTHER-KEYS.4 @@ -22627,11 +22663,30 @@ SEARCH-VECTOR.14 SEARCH-VECTOR.15 SEARCH-VECTOR.16 SEARCH-BITVECTOR.1 SEARCH-BITVECTOR.2 SEARCH-BITVECTOR.3 SEARCH-BITVECTOR.4 SEARCH-BITVECTOR.5 SEARCH-BITVECTOR.6 SEARCH-BITVECTOR.7 + SEARCH-BITVECTOR.8 SEARCH-BITVECTOR.9 SEARCH-LIST.14 + SEARCH.ALLOW-OTHER-KEYS.1 SEARCH.ALLOW-OTHER-KEYS.2 + SEARCH.ALLOW-OTHER-KEYS.3 SEARCH.ALLOW-OTHER-KEYS.4 + SEARCH.ALLOW-OTHER-KEYS.5 SEARCH.ALLOW-OTHER-KEYS.6 + SEARCH.ALLOW-OTHER-KEYS.7 SEARCH.KEYWORDS.8 SEARCH.ERROR.1 + SEARCH.ERROR.2 SEARCH.ERROR.3 SEARCH.ERROR.4 SEARCH.ERROR.5 + SEARCH.ERROR.6 SEARCH.ERROR.7 SEARCH.ERROR.8 SEARCH.ERROR.9 + SEARCH.ERROR.10 SEARCH.ORDER.1 SEARCH.ORDER.2 SEARCH-VECTOR.1 + SEARCH-VECTOR.2 SEARCH-VECTOR.3 SEARCH-VECTOR.4 SEARCH-VECTOR.5 + SEARCH-VECTOR.6 SEARCH-VECTOR.7 SEARCH-VECTOR.8 SEARCH-VECTOR.9 + SEARCH-VECTOR.10 SEARCH-VECTOR.11 SEARCH-VECTOR.12 SEARCH-VECTOR.13 + SEARCH-VECTOR.14 SEARCH-VECTOR.15 SEARCH-VECTOR.16 SEARCH-BITVECTOR.1 + SEARCH-BITVECTOR.2 SEARCH-BITVECTOR.3 SEARCH-BITVECTOR.4 + SEARCH-BITVECTOR.5 SEARCH-BITVECTOR.6 SEARCH-BITVECTOR.7 SEARCH-BITVECTOR.8 SEARCH-BITVECTOR.9 SEARCH-BITVECTOR.10 SEARCH-BITVECTOR.11 SEARCH-BITVECTOR.12 SEARCH-BITVECTOR.13 SEARCH-BITVECTOR.14 SEARCH-BITVECTOR.15 SEARCH-BITVECTOR.16 SEARCH-STRING.2 SEARCH-STRING.3 SEARCH-STRING.4 SEARCH-STRING.5 SEARCH-STRING.6 SEARCH-STRING.7 SEARCH-STRING.8 SEARCH-STRING.9 + SEARCH-STRING.10 SEARCH-STRING.11 SEARCH-BITVECTOR.10 + SEARCH-BITVECTOR.11 SEARCH-BITVECTOR.12 SEARCH-BITVECTOR.13 + SEARCH-BITVECTOR.14 SEARCH-BITVECTOR.15 SEARCH-BITVECTOR.16 + SEARCH-STRING.2 SEARCH-STRING.3 SEARCH-STRING.4 SEARCH-STRING.5 + SEARCH-STRING.6 SEARCH-STRING.7 SEARCH-STRING.8 SEARCH-STRING.9 SEARCH-STRING.10 SEARCH-STRING.11 SEARCH-STRING.13 SEARCH-STRING.14 SEARCH-STRING.15 SEARCH-STRING.16 MISMATCH-LIST.1 MISMATCH-LIST.2 MISMATCH-LIST.3 MISMATCH-LIST.4 MISMATCH-LIST.5 MISMATCH-LIST.6 @@ -23153,26 +23208,8 @@ DELETE-BIT-VECTOR.2 DELETE-BIT-VECTOR.3 REMOVE.ORDER.1 REMOVE.ORDER.2 DELETE.ORDER.1 DELETE.ORDER.2 REMOVE-IF.ORDER.1 REMOVE-IF.ORDER.2 DELETE-IF.ORDER.1 DELETE-IF.ORDER.2 REMOVE-IF-NOT.ORDER.1 - REMOVE-IF-NOT.ORDER.2 DELETE-IF-NOT.ORDER.1 DELETE-IF-NOT.ORDER.2 SEARCH-LIST.12 SEARCH-LIST.13 SEARCH-LIST.14 - SEARCH.ALLOW-OTHER-KEYS.1 SEARCH.ALLOW-OTHER-KEYS.2 - SEARCH.ALLOW-OTHER-KEYS.3 SEARCH.ALLOW-OTHER-KEYS.4 - SEARCH.ALLOW-OTHER-KEYS.5 SEARCH.ALLOW-OTHER-KEYS.6 - SEARCH.ALLOW-OTHER-KEYS.7 SEARCH.KEYWORDS.8 SEARCH.ERROR.1 - SEARCH.ERROR.2 SEARCH.ERROR.3 SEARCH.ERROR.4 SEARCH.ERROR.5 - SEARCH.ERROR.6 SEARCH.ERROR.7 SEARCH.ERROR.8 SEARCH.ERROR.9 - SEARCH.ERROR.10 SEARCH.ORDER.1 SEARCH.ORDER.2 SEARCH-VECTOR.1 - SEARCH-VECTOR.2 SEARCH-VECTOR.3 SEARCH-VECTOR.4 SEARCH-VECTOR.5 - SEARCH-VECTOR.6 SEARCH-VECTOR.7 SEARCH-VECTOR.8 SEARCH-VECTOR.9 - SEARCH-VECTOR.10 SEARCH-VECTOR.11 SEARCH-VECTOR.12 SEARCH-VECTOR.13 - SEARCH-VECTOR.14 SEARCH-VECTOR.15 SEARCH-VECTOR.16 SEARCH-BITVECTOR.1 - SEARCH-BITVECTOR.2 SEARCH-BITVECTOR.3 SEARCH-BITVECTOR.4 - SEARCH-BITVECTOR.5 SEARCH-BITVECTOR.6 SEARCH-BITVECTOR.7 - SEARCH-BITVECTOR.8 SEARCH-BITVECTOR.9 SEARCH-BITVECTOR.10 - SEARCH-BITVECTOR.11 SEARCH-BITVECTOR.12 SEARCH-BITVECTOR.13 - SEARCH-BITVECTOR.14 SEARCH-BITVECTOR.15 SEARCH-BITVECTOR.16 - SEARCH-STRING.2 SEARCH-STRING.3 SEARCH-STRING.4 SEARCH-STRING.5 - SEARCH-STRING.6 SEARCH-STRING.7 SEARCH-STRING.8 SEARCH-STRING.9 - SEARCH-STRING.10 SEARCH-STRING.11 SEARCH-STRING.13 SEARCH-STRING.14 + REMOVE-IF-NOT.ORDER.2 DELETE-IF-NOT.ORDER.1 DELETE-IF-NOT.ORDER.2 + REMOVE-RANDOM SEARCH-STRING.13 SEARCH-STRING.14 SEARCH-STRING.15 SEARCH-STRING.16 MISMATCH-LIST.1 MISMATCH-LIST.2 MISMATCH-LIST.3 MISMATCH-LIST.4 MISMATCH-LIST.5 MISMATCH-LIST.6 MISMATCH-LIST.7 MISMATCH-LIST.8 MISMATCH-LIST.9 MISMATCH-LIST.10 @@ -23694,7 +23731,7 @@ DELETE.ORDER.1 DELETE.ORDER.2 REMOVE-IF.ORDER.1 REMOVE-IF.ORDER.2 DELETE-IF.ORDER.1 DELETE-IF.ORDER.2 REMOVE-IF-NOT.ORDER.1 REMOVE-IF-NOT.ORDER.2 DELETE-IF-NOT.ORDER.1 DELETE-IF-NOT.ORDER.2 - REMOVE-RANDOM REMOVE-IF-RANDOM REMOVE-IF-NOT-RANDOM DELETE-RANDOM + REMOVE-RANDOM REMOVE-IF-RANDOM REMOVE-IF-NOT-RANDOM DELETE-RANDOM REMOVE-IF-RANDOM REMOVE-IF-NOT-RANDOM DELETE-IF-RANDOM DELETE-IF-NOT-RANDOM REMOVE-IF-LIST.1 REMOVE-IF-LIST.2 REMOVE-IF-NOT-LIST.1 REMOVE-IF-NOT-LIST.2 DELETE-IF-LIST.1 DELETE-IF-LIST.2 DELETE-IF-NOT-LIST.1 @@ -23709,8 +23746,7 @@ REMOVE.ERROR.5 REMOVE.ERROR.6 REMOVE.ERROR.7 REMOVE.ERROR.8 REMOVE.ERROR.9 REMOVE.ERROR.10 DELETE.ERROR.1 DELETE.ERROR.2 DELETE.ERROR.3 DELETE.ERROR.4 DELETE.ERROR.5 DELETE.ERROR.6 - DELETE.ERROR.7 DELETE.ERROR.8 DELETE.ERROR.9 DELETE.ERROR.10 - REMOVE-RANDOM REMOVE-IF-RANDOM REMOVE-IF-NOT-RANDOM DELETE-RANDOM + DELETE.ERROR.7 DELETE.ERROR.8 DELETE.ERROR.9 DELETE.ERROR.10 DELETE-RANDOM DELETE-IF-RANDOM DELETE-IF-NOT-RANDOM REMOVE-IF-LIST.1 REMOVE-IF-LIST.2 REMOVE-IF-NOT-LIST.1 REMOVE-IF-NOT-LIST.2 DELETE-IF-LIST.1 DELETE-IF-LIST.2 DELETE-IF-NOT-LIST.1 @@ -23726,6 +23762,7 @@ REMOVE.ERROR.9 REMOVE.ERROR.10 DELETE.ERROR.1 DELETE.ERROR.2 DELETE.ERROR.3 DELETE.ERROR.4 DELETE.ERROR.5 DELETE.ERROR.6 DELETE.ERROR.7 DELETE.ERROR.8 DELETE.ERROR.9 DELETE.ERROR.10 + RANDOM-REMOVE-DUPLICATES RANDOM-REMOVE-DUPLICATES RANDOM-DELETE-DUPLICATES REMOVE-DUPLICATES.1 DELETE-DUPLICATES.1 REMOVE-DUPLICATES.ORDER.1 REMOVE-DUPLICATES.ORDER.2 REMOVE-DUPLICATES.ALLOW-OTHER-KEYS.1 @@ -24810,7 +24847,1044 @@ Expected value: NIL Actual value: (CONDITION). STRUCT-TEST-59/17 STRUCT-TEST-59/15A STRUCT-TEST-59/15B - STRUCT-TEST-59/18 STRUCT-TEST-59/19 STRUCT-TEST-59/20 STRUCT-TEST-60/1 + STRUCT-TEST-59/18 STRUCT-TEST-59/19 RANDOM-DELETE-DUPLICATES REMOVE-DUPLICATES.1 + DELETE-DUPLICATES.1 REMOVE-DUPLICATES.ORDER.1 + REMOVE-DUPLICATES.ORDER.2 REMOVE-DUPLICATES.ALLOW-OTHER-KEYS.1 + REMOVE-DUPLICATES.ALLOW-OTHER-KEYS.2 + REMOVE-DUPLICATES.ALLOW-OTHER-KEYS.3 + REMOVE-DUPLICATES.ALLOW-OTHER-KEYS.4 + REMOVE-DUPLICATES.ALLOW-OTHER-KEYS.5 + REMOVE-DUPLICATES.ALLOW-OTHER-KEYS.6 + REMOVE-DUPLICATES.ALLOW-OTHER-KEYS.7 + REMOVE-DUPLICATES.ALLOW-OTHER-KEYS.8 REMOVE-DUPLICATES.KEYWORDS.1 + DELETE-DUPLICATES.ALLOW-OTHER-KEYS.1 + DELETE-DUPLICATES.ALLOW-OTHER-KEYS.2 + DELETE-DUPLICATES.ALLOW-OTHER-KEYS.3 + DELETE-DUPLICATES.ALLOW-OTHER-KEYS.4 + DELETE-DUPLICATES.ALLOW-OTHER-KEYS.5 + DELETE-DUPLICATES.ALLOW-OTHER-KEYS.6 + DELETE-DUPLICATES.ALLOW-OTHER-KEYS.7 + DELETE-DUPLICATES.ALLOW-OTHER-KEYS.8 DELETE-DUPLICATES.KEYWORDS.1 + DELETE-DUPLICATES.ORDER.1 DELETE-DUPLICATES.ORDER.2 + REMOVE-DUPLICATES.ERROR.1 REMOVE-DUPLICATES.ERROR.2 + REMOVE-DUPLICATES.ERROR.3 REMOVE-DUPLICATES.ERROR.4 + REMOVE-DUPLICATES.ERROR.5 REMOVE-DUPLICATES.ERROR.6 + REMOVE-DUPLICATES.ERROR.7 REMOVE-DUPLICATES.ERROR.8 + REMOVE-DUPLICATES.ERROR.9 DELETE-DUPLICATES.ERROR.1 + DELETE-DUPLICATES.ERROR.2 DELETE-DUPLICATES.ERROR.3 + DELETE-DUPLICATES.ERROR.4 DELETE-DUPLICATES.ERROR.5 + DELETE-DUPLICATES.ERROR.6 DELETE-DUPLICATES.ERROR.7 + DELETE-DUPLICATES.ERROR.8 DELETE-DUPLICATES.ERROR.9 STRUCTURE-1-1 + STRUCTURE-1-2 STRUCTURE-1-3 STRUCTURE-1-4 STRUCTURE-1-5 STRUCTURE-1-6 + STRUCTURE-1-7 STRUCTURE-1-8 STRUCTURE-1-9 STRUCTURE-1-10 + STRUCTURE-1-11 STRUCTURE-1-12 STRUCTURE-1-13 STRUCTURE-1-14 + STRUCTURE-1-15 STRUCTURE-2-1 STRUCTURE-2-2 STRUCTURE-2-3 STRUCTURE-2-4 + STRUCTURE-2-5 STRUCTURE-2-6 STRUCTURE-2-7 STRUCTURE-2-8 + STRUCT-TEST-03/1 STRUCT-TEST-03/2 STRUCT-TEST-03/ERROR.1 + STRUCT-TEST-03/ERROR.2 STRUCT-TEST-03/3 STRUCT-TEST-03/4 + STRUCT-TEST-03/5 STRUCT-TEST-03/ERROR.3 STRUCT-TEST-03/ERROR.4 + STRUCT-TEST-03/6 STRUCT-TEST-03/7 STRUCT-TEST-03/8 + STRUCT-TEST-03/ERROR.5 STRUCT-TEST-03/ERROR.6 STRUCT-TEST-03/9 + STRUCT-TEST-03/13 STRUCT-TEST-03/14 STRUCT-TEST-03/15 +Test STRUCT-TEST-03/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-03)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-03 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-03/17 STRUCT-TEST-03/15A STRUCT-TEST-03/15B + STRUCT-TEST-03/20 STRUCT-TEST-04/1 STRUCT-TEST-04/2 + STRUCT-TEST-04/ERROR.1 STRUCT-TEST-04/ERROR.2 STRUCT-TEST-04/3 + STRUCT-TEST-04/4 STRUCT-TEST-04/5 STRUCT-TEST-04/ERROR.3 + STRUCT-TEST-04/ERROR.4 STRUCT-TEST-04/6 STRUCT-TEST-04/7 + STRUCT-TEST-04/8 STRUCT-TEST-04/ERROR.5 STRUCT-TEST-04/ERROR.6 + STRUCT-TEST-04/9 STRUCT-TEST-04/13 STRUCT-TEST-04/14 STRUCT-TEST-04/15 +Test STRUCT-TEST-04/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-04)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-04 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-04/17 STRUCT-TEST-04/15A STRUCT-TEST-04/15B + STRUCT-TEST-04/20 STRUCT-TEST-05/1 STRUCT-TEST-05/2 + STRUCT-TEST-05/ERROR.1 STRUCT-TEST-05/ERROR.2 STRUCT-TEST-05/3 + STRUCT-TEST-05/4 STRUCT-TEST-05/5 STRUCT-TEST-05/ERROR.3 + STRUCT-TEST-05/ERROR.4 STRUCT-TEST-05/6 STRUCT-TEST-05/7 + STRUCT-TEST-05/8 STRUCT-TEST-05/ERROR.5 STRUCT-TEST-05/ERROR.6 + STRUCT-TEST-05/9 STRUCT-TEST-05/13 STRUCT-TEST-05/14 STRUCT-TEST-05/15 +Test STRUCT-TEST-05/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-05)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-05 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-05/17 STRUCT-TEST-05/15A STRUCT-TEST-05/15B + STRUCT-TEST-05/20 STRUCT-TEST-06/1 STRUCT-TEST-06/2 + STRUCT-TEST-06/ERROR.1 STRUCT-TEST-06/ERROR.2 STRUCT-TEST-06/3 + STRUCT-TEST-06/4 STRUCT-TEST-06/5 STRUCT-TEST-06/ERROR.3 + STRUCT-TEST-06/ERROR.4 STRUCT-TEST-06/6 STRUCT-TEST-06/7 + STRUCT-TEST-06/8 STRUCT-TEST-06/ERROR.5 STRUCT-TEST-06/ERROR.6 + STRUCT-TEST-06/9 STRUCT-TEST-06/13 STRUCT-TEST-06/14 STRUCT-TEST-06/15 +Test STRUCT-TEST-06/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-06)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-06 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-06/17 STRUCT-TEST-06/15A STRUCT-TEST-06/15B + STRUCT-TEST-06/20 STRUCT-TEST-07/1 STRUCT-TEST-07/2 + STRUCT-TEST-07/ERROR.1 STRUCT-TEST-07/ERROR.2 STRUCT-TEST-07/3 + STRUCT-TEST-07/4 STRUCT-TEST-07/5 STRUCT-TEST-07/ERROR.3 + STRUCT-TEST-07/ERROR.4 STRUCT-TEST-07/6 STRUCT-TEST-07/7 + STRUCT-TEST-07/8 STRUCT-TEST-07/ERROR.5 STRUCT-TEST-07/ERROR.6 + STRUCT-TEST-07/9 STRUCT-TEST-07/13 STRUCT-TEST-07/14 STRUCT-TEST-07/15 +Test STRUCT-TEST-07/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-07)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-07 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-07/17 STRUCT-TEST-07/15A STRUCT-TEST-07/15B + STRUCT-TEST-07/20 STRUCT-TEST-08/1 STRUCT-TEST-08/2 + STRUCT-TEST-08/ERROR.1 STRUCT-TEST-08/ERROR.2 STRUCT-TEST-08/3 + STRUCT-TEST-08/4 STRUCT-TEST-08/5 STRUCT-TEST-08/ERROR.3 + STRUCT-TEST-08/ERROR.4 STRUCT-TEST-08/6 STRUCT-TEST-08/7 + STRUCT-TEST-08/8 STRUCT-TEST-08/ERROR.5 STRUCT-TEST-08/ERROR.6 + STRUCT-TEST-08/9 STRUCT-TEST-08/13 STRUCT-TEST-08/14 STRUCT-TEST-08/15 +Test STRUCT-TEST-08/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-08)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-08 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-08/17 STRUCT-TEST-08/15A STRUCT-TEST-08/15B + STRUCT-TEST-08/20 STRUCT-TEST-09/1 STRUCT-TEST-09/2 + STRUCT-TEST-09/ERROR.1 STRUCT-TEST-09/ERROR.2 STRUCT-TEST-09/3 + STRUCT-TEST-09/4 STRUCT-TEST-09/5 STRUCT-TEST-09/ERROR.3 + STRUCT-TEST-09/ERROR.4 STRUCT-TEST-09/6 STRUCT-TEST-09/7 + STRUCT-TEST-09/8 STRUCT-TEST-09/ERROR.5 STRUCT-TEST-09/ERROR.6 + STRUCT-TEST-09/9 STRUCT-TEST-09/13 STRUCT-TEST-09/14 STRUCT-TEST-09/15 +Test STRUCT-TEST-09/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-09)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-09 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-09/17 STRUCT-TEST-09/15A STRUCT-TEST-09/15B + STRUCT-TEST-09/20 STRUCT-TEST-10/1 STRUCT-TEST-10/2 + STRUCT-TEST-10/ERROR.1 STRUCT-TEST-10/ERROR.2 STRUCT-TEST-10/3 + STRUCT-TEST-10/4 STRUCT-TEST-10/5 STRUCT-TEST-10/ERROR.3 + STRUCT-TEST-10/ERROR.4 STRUCT-TEST-10/6 STRUCT-TEST-10/7 + STRUCT-TEST-10/8 STRUCT-TEST-10/ERROR.5 STRUCT-TEST-10/ERROR.6 + STRUCT-TEST-10/9 STRUCT-TEST-10/13 STRUCT-TEST-10/14 STRUCT-TEST-10/15 +Test STRUCT-TEST-10/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-10)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-10 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-10/17 STRUCT-TEST-10/15A STRUCT-TEST-10/15B + STRUCT-TEST-10/20 STRUCT-TEST-11/1 STRUCT-TEST-11/2 + STRUCT-TEST-11/ERROR.1 STRUCT-TEST-11/ERROR.2 STRUCT-TEST-11/3 + STRUCT-TEST-11/4 STRUCT-TEST-11/5 STRUCT-TEST-11/ERROR.3 + STRUCT-TEST-11/ERROR.4 STRUCT-TEST-11/6 STRUCT-TEST-11/7 + STRUCT-TEST-11/8 STRUCT-TEST-11/ERROR.5 STRUCT-TEST-11/ERROR.6 + STRUCT-TEST-11/9 STRUCT-TEST-11/13 STRUCT-TEST-11/14 STRUCT-TEST-11/15 +Test STRUCT-TEST-11/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-11)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-11 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-11/17 STRUCT-TEST-11/15A STRUCT-TEST-11/15B + STRUCT-TEST-11/20 STRUCT-TEST-12/1 STRUCT-TEST-12/2 + STRUCT-TEST-12/ERROR.1 STRUCT-TEST-12/ERROR.2 STRUCT-TEST-12/3 + STRUCT-TEST-12/4 STRUCT-TEST-12/5 STRUCT-TEST-12/ERROR.3 + STRUCT-TEST-12/ERROR.4 STRUCT-TEST-12/6 STRUCT-TEST-12/7 + STRUCT-TEST-12/8 STRUCT-TEST-12/ERROR.5 STRUCT-TEST-12/ERROR.6 + STRUCT-TEST-12/9 STRUCT-TEST-12/13 STRUCT-TEST-12/14 STRUCT-TEST-12/15 +Test STRUCT-TEST-12/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-12)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-12 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-12/17 STRUCT-TEST-12/15A STRUCT-TEST-12/15B + STRUCT-TEST-12/20 STRUCT-TEST-13/1 STRUCT-TEST-13/2 + STRUCT-TEST-13/ERROR.1 STRUCT-TEST-13/ERROR.2 STRUCT-TEST-13/3 + STRUCT-TEST-13/4 STRUCT-TEST-13/5 STRUCT-TEST-13/ERROR.3 + STRUCT-TEST-13/ERROR.4 STRUCT-TEST-13/6 STRUCT-TEST-13/7 + STRUCT-TEST-13/8 STRUCT-TEST-13/ERROR.5 STRUCT-TEST-13/ERROR.6 + STRUCT-TEST-13/9 STRUCT-TEST-13/13 STRUCT-TEST-13/14 STRUCT-TEST-13/15 +Test STRUCT-TEST-13/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-13)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-13 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-13/17 STRUCT-TEST-13/15A STRUCT-TEST-13/15B + STRUCT-TEST-13/20 STRUCT-TEST-14/1 STRUCT-TEST-14/2 + STRUCT-TEST-14/ERROR.1 STRUCT-TEST-14/ERROR.2 STRUCT-TEST-14/3 + STRUCT-TEST-14/4 STRUCT-TEST-14/5 STRUCT-TEST-14/ERROR.3 + STRUCT-TEST-14/ERROR.4 STRUCT-TEST-14/6 STRUCT-TEST-14/7 + STRUCT-TEST-14/8 STRUCT-TEST-14/ERROR.5 STRUCT-TEST-14/ERROR.6 + STRUCT-TEST-14/9 STRUCT-TEST-14/13 STRUCT-TEST-14/14 STRUCT-TEST-14/15 +Test STRUCT-TEST-14/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-14)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-14 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-14/17 STRUCT-TEST-14/15A STRUCT-TEST-14/15B + STRUCT-TEST-14/20 STRUCT-TEST-15/1 STRUCT-TEST-15/4 STRUCT-TEST-15/5 + STRUCT-TEST-15/ERROR.3 STRUCT-TEST-15/ERROR.4 STRUCT-TEST-15/6 + STRUCT-TEST-15/7 STRUCT-TEST-15/8 STRUCT-TEST-15/ERROR.5 + STRUCT-TEST-15/ERROR.6 STRUCT-TEST-15/9 STRUCT-TEST-15/10 + STRUCT-TEST-15/13 STRUCT-TEST-15/14 STRUCT-TEST-15/15 +Test STRUCT-TEST-15/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-15)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-15 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-15/17 STRUCT-TEST-15/15A STRUCT-TEST-15/15B + STRUCT-TEST-15/20 STRUCT-TEST-16/1 STRUCT-TEST-16/2 + STRUCT-TEST-16/ERROR.1 STRUCT-TEST-16/ERROR.2 STRUCT-TEST-16/3 + STRUCT-TEST-16/4 STRUCT-TEST-16/5 STRUCT-TEST-16/ERROR.3 + STRUCT-TEST-16/ERROR.4 STRUCT-TEST-16/6 STRUCT-TEST-16/7 + STRUCT-TEST-16/8 STRUCT-TEST-16/ERROR.5 STRUCT-TEST-16/ERROR.6 + STRUCT-TEST-16/9 STRUCT-TEST-16/13 STRUCT-TEST-16/14 STRUCT-TEST-16/15 +Test STRUCT-TEST-16/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-16)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-16 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-16/17 STRUCT-TEST-16/15A STRUCT-TEST-16/15B + STRUCT-TEST-16/20 STRUCT-TEST-17/1 STRUCT-TEST-17/2 + STRUCT-TEST-17/ERROR.1 STRUCT-TEST-17/ERROR.2 STRUCT-TEST-17/3 + STRUCT-TEST-17/4 STRUCT-TEST-17/5 STRUCT-TEST-17/ERROR.3 + STRUCT-TEST-17/ERROR.4 STRUCT-TEST-17/6 STRUCT-TEST-17/7 + STRUCT-TEST-17/8 STRUCT-TEST-17/ERROR.5 STRUCT-TEST-17/ERROR.6 + STRUCT-TEST-17/9 STRUCT-TEST-17/10 STRUCT-TEST-17/13 STRUCT-TEST-17/14 + STRUCT-TEST-17/15 +Test STRUCT-TEST-17/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-17)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-17 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-17/17 STRUCT-TEST-17/15A STRUCT-TEST-17/15B + STRUCT-TEST-17/20 STRUCT-TEST-18/1 STRUCT-TEST-18/2 + STRUCT-TEST-18/ERROR.1 STRUCT-TEST-18/ERROR.2 STRUCT-TEST-18/3 + STRUCT-TEST-18/4 STRUCT-TEST-18/5 STRUCT-TEST-18/ERROR.3 + STRUCT-TEST-18/ERROR.4 STRUCT-TEST-18/6 STRUCT-TEST-18/7 + STRUCT-TEST-18/8 STRUCT-TEST-18/ERROR.5 STRUCT-TEST-18/ERROR.6 + STRUCT-TEST-18/9 STRUCT-TEST-18/13 STRUCT-TEST-18/14 STRUCT-TEST-18/15 +Test STRUCT-TEST-18/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-18)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-18 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-18/17 STRUCT-TEST-18/15A STRUCT-TEST-18/15B + STRUCT-TEST-18/20 STRUCT-TEST-19/1 STRUCT-TEST-19/2 + STRUCT-TEST-19/ERROR.1 STRUCT-TEST-19/ERROR.2 STRUCT-TEST-19/3 + STRUCT-TEST-19/4 STRUCT-TEST-19/5 STRUCT-TEST-19/ERROR.3 + STRUCT-TEST-19/ERROR.4 STRUCT-TEST-19/6 STRUCT-TEST-19/7 + STRUCT-TEST-19/8 STRUCT-TEST-19/ERROR.5 STRUCT-TEST-19/ERROR.6 + STRUCT-TEST-19/9 STRUCT-TEST-19/13 STRUCT-TEST-19/14 STRUCT-TEST-19/15 +Test STRUCT-TEST-19/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-19)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-19 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-19/17 STRUCT-TEST-19/15A STRUCT-TEST-19/15B + STRUCT-TEST-19/20 STRUCT-TEST-20/1 STRUCT-TEST-20/2 + STRUCT-TEST-20/ERROR.1 STRUCT-TEST-20/ERROR.2 STRUCT-TEST-20/3 + STRUCT-TEST-20/4 STRUCT-TEST-20/5 STRUCT-TEST-20/ERROR.3 + STRUCT-TEST-20/ERROR.4 STRUCT-TEST-20/6 STRUCT-TEST-20/7 + STRUCT-TEST-20/11 STRUCT-TEST-20/13 STRUCT-TEST-20/14 + STRUCT-TEST-20/15 +Test STRUCT-TEST-20/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-20)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-20 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-20/17 STRUCT-TEST-20/15A STRUCT-TEST-20/15B + STRUCT-TEST-20/20 STRUCT-TEST-21/1 STRUCT-TEST-21/2 + STRUCT-TEST-21/ERROR.1 STRUCT-TEST-21/ERROR.2 STRUCT-TEST-21/3 + STRUCT-TEST-21/4 STRUCT-TEST-21/5 STRUCT-TEST-21/ERROR.3 + STRUCT-TEST-21/ERROR.4 STRUCT-TEST-21/6 STRUCT-TEST-21/7 + STRUCT-TEST-21/8 STRUCT-TEST-21/ERROR.5 STRUCT-TEST-21/ERROR.6 + STRUCT-TEST-21/9 STRUCT-TEST-21/11 STRUCT-TEST-21/13 STRUCT-TEST-21/14 + STRUCT-TEST-21/15 +Test STRUCT-TEST-21/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-21)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-21 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-21/17 STRUCT-TEST-21/15A STRUCT-TEST-21/15B + STRUCT-TEST-21/20 STRUCT-TEST-22/1 STRUCT-TEST-22/2 + STRUCT-TEST-22/ERROR.1 STRUCT-TEST-22/ERROR.2 STRUCT-TEST-22/3 + STRUCT-TEST-22/4 STRUCT-TEST-22/5 STRUCT-TEST-22/ERROR.3 + STRUCT-TEST-22/ERROR.4 STRUCT-TEST-22/6 STRUCT-TEST-22/7 + STRUCT-TEST-22/8 STRUCT-TEST-22/ERROR.5 STRUCT-TEST-22/ERROR.6 + STRUCT-TEST-22/9 STRUCT-TEST-22/13 STRUCT-TEST-22/14 STRUCT-TEST-22/15 +Test STRUCT-TEST-22/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-22)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-22 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-22/17 STRUCT-TEST-22/15A STRUCT-TEST-22/15B + STRUCT-TEST-22/20 STRUCT-TEST-23/1 STRUCT-TEST-23/2 + STRUCT-TEST-23/ERROR.1 STRUCT-TEST-23/ERROR.2 STRUCT-TEST-23/3 + STRUCT-TEST-23/4 STRUCT-TEST-23/5 STRUCT-TEST-23/ERROR.3 + STRUCT-TEST-23/ERROR.4 STRUCT-TEST-23/6 STRUCT-TEST-23/7 + STRUCT-TEST-23/8 STRUCT-TEST-23/ERROR.5 STRUCT-TEST-23/ERROR.6 + STRUCT-TEST-23/9 STRUCT-TEST-23/13 STRUCT-TEST-23/14 STRUCT-TEST-23/15 +Test STRUCT-TEST-23/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-23)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-23 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-23/17 STRUCT-TEST-23/15A STRUCT-TEST-23/15B + STRUCT-TEST-23/20 STRUCT-TEST-24/1 STRUCT-TEST-24/2 + STRUCT-TEST-24/ERROR.1 STRUCT-TEST-24/ERROR.2 STRUCT-TEST-24/3 + STRUCT-TEST-24/4 STRUCT-TEST-24/5 STRUCT-TEST-24/ERROR.3 + STRUCT-TEST-24/ERROR.4 STRUCT-TEST-24/6 STRUCT-TEST-24/7 + STRUCT-TEST-24/8 STRUCT-TEST-24/ERROR.5 STRUCT-TEST-24/ERROR.6 + STRUCT-TEST-24/9 STRUCT-TEST-24/13 STRUCT-TEST-24/14 STRUCT-TEST-24/15 +Test STRUCT-TEST-24/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-24)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-24 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-24/17 STRUCT-TEST-24/15A STRUCT-TEST-24/15B + STRUCT-TEST-24/20 STRUCT-TEST-25/1 STRUCT-TEST-25/2 + STRUCT-TEST-25/ERROR.1 STRUCT-TEST-25/ERROR.2 STRUCT-TEST-25/3 + STRUCT-TEST-25/4 STRUCT-TEST-25/5 STRUCT-TEST-25/ERROR.3 + STRUCT-TEST-25/ERROR.4 STRUCT-TEST-25/6 STRUCT-TEST-25/7 + STRUCT-TEST-25/8 STRUCT-TEST-25/ERROR.5 STRUCT-TEST-25/ERROR.6 + STRUCT-TEST-25/9 STRUCT-TEST-25/13 STRUCT-TEST-25/14 STRUCT-TEST-25/15 +Test STRUCT-TEST-25/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-25)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-25 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-25/17 STRUCT-TEST-25/15A STRUCT-TEST-25/15B + STRUCT-TEST-25/20 STRUCT-TEST-26/1 STRUCT-TEST-26/2 + STRUCT-TEST-26/ERROR.1 STRUCT-TEST-26/ERROR.2 STRUCT-TEST-26/3 + STRUCT-TEST-26/4 STRUCT-TEST-26/5 STRUCT-TEST-26/ERROR.3 + STRUCT-TEST-26/ERROR.4 STRUCT-TEST-26/6 STRUCT-TEST-26/7 + STRUCT-TEST-26/8 STRUCT-TEST-26/ERROR.5 STRUCT-TEST-26/ERROR.6 + STRUCT-TEST-26/9 STRUCT-TEST-26/13 STRUCT-TEST-26/14 STRUCT-TEST-26/15 +Test STRUCT-TEST-26/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-26)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-26 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-26/17 STRUCT-TEST-26/15A STRUCT-TEST-26/15B + STRUCT-TEST-26/20 STRUCT-TEST-27/1 STRUCT-TEST-27/2 + STRUCT-TEST-27/ERROR.1 STRUCT-TEST-27/ERROR.2 STRUCT-TEST-27/3 + STRUCT-TEST-27/4 STRUCT-TEST-27/5 STRUCT-TEST-27/ERROR.3 + STRUCT-TEST-27/ERROR.4 STRUCT-TEST-27/6 STRUCT-TEST-27/7 + STRUCT-TEST-27/8 STRUCT-TEST-27/ERROR.5 STRUCT-TEST-27/ERROR.6 + STRUCT-TEST-27/9 +Test STRUCT-TEST-27/12 failed +Form: (AND (NOT-MV (FBOUNDP '(SETF STRUCT-TEST-27-A27))) + (NOT-MV (FBOUNDP '(SETF STRUCT-TEST-27-B27))) T) +Expected value: T +Actual value: #. + STRUCT-TEST-27/13 STRUCT-TEST-27/14 STRUCT-TEST-27/15 +Test STRUCT-TEST-27/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-27)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-27 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-27/17 STRUCT-TEST-27/15A STRUCT-TEST-27/15B + STRUCT-TEST-27/20 STRUCT-TEST-28/1 STRUCT-TEST-28/2 + STRUCT-TEST-28/ERROR.1 STRUCT-TEST-28/ERROR.2 STRUCT-TEST-28/3 + STRUCT-TEST-28/4 STRUCT-TEST-28/5 STRUCT-TEST-28/ERROR.3 + STRUCT-TEST-28/ERROR.4 STRUCT-TEST-28/6 STRUCT-TEST-28/7 + STRUCT-TEST-28/8 STRUCT-TEST-28/ERROR.5 STRUCT-TEST-28/ERROR.6 + STRUCT-TEST-28/9 +Test STRUCT-TEST-28/12 failed +Form: (AND (NOT-MV (FBOUNDP '(SETF STRUCT-TEST-28-A28))) + (NOT-MV (FBOUNDP '(SETF STRUCT-TEST-28-B28))) T) +Expected value: T +Actual value: #. + STRUCT-TEST-28/13 STRUCT-TEST-28/14 STRUCT-TEST-28/15 +Test STRUCT-TEST-28/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-28)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-28 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-28/17 STRUCT-TEST-28/15A STRUCT-TEST-28/15B + STRUCT-TEST-28/20 STRUCT-TEST-29/1 STRUCT-TEST-29/2 + STRUCT-TEST-29/ERROR.1 STRUCT-TEST-29/ERROR.2 STRUCT-TEST-29/3 + STRUCT-TEST-29/4 STRUCT-TEST-29/5 STRUCT-TEST-29/ERROR.3 + STRUCT-TEST-29/ERROR.4 STRUCT-TEST-29/6 STRUCT-TEST-29/7 + STRUCT-TEST-29/8 STRUCT-TEST-29/ERROR.5 STRUCT-TEST-29/ERROR.6 + STRUCT-TEST-29/9 +Test STRUCT-TEST-29/12 failed +Form: (AND (NOT-MV (FBOUNDP '(SETF STRUCT-TEST-29-B29))) T) +Expected value: T +Actual value: #. + STRUCT-TEST-29/13 STRUCT-TEST-29/14 STRUCT-TEST-29/15 +Test STRUCT-TEST-29/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-29)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-29 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-29/17 STRUCT-TEST-29/15A STRUCT-TEST-29/15B + STRUCT-TEST-29/20 STRUCT-TEST-30/1 STRUCT-TEST-30/2 + STRUCT-TEST-30/ERROR.1 STRUCT-TEST-30/ERROR.2 STRUCT-TEST-30/3 + STRUCT-TEST-30/4 STRUCT-TEST-30/5 STRUCT-TEST-30/ERROR.3 + STRUCT-TEST-30/ERROR.4 STRUCT-TEST-30/6 STRUCT-TEST-30/7 + STRUCT-TEST-30/8 STRUCT-TEST-30/ERROR.5 STRUCT-TEST-30/ERROR.6 + STRUCT-TEST-30/9 STRUCT-TEST-30/13 STRUCT-TEST-30/14 STRUCT-TEST-30/15 +Test STRUCT-TEST-30/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-30)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-30 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-30/17 STRUCT-TEST-30/15A STRUCT-TEST-30/15B + STRUCT-TEST-30/20 STRUCT-TEST-31/1 STRUCT-TEST-31/2 + STRUCT-TEST-31/ERROR.1 STRUCT-TEST-31/ERROR.2 STRUCT-TEST-31/3 + STRUCT-TEST-31/4 STRUCT-TEST-31/5 STRUCT-TEST-31/ERROR.3 + STRUCT-TEST-31/ERROR.4 STRUCT-TEST-31/6 STRUCT-TEST-31/7 + STRUCT-TEST-31/8 STRUCT-TEST-31/ERROR.5 STRUCT-TEST-31/ERROR.6 + STRUCT-TEST-31/9 +Test STRUCT-TEST-31/13 failed +Form: (NOTNOT-MV + (TYPEP (MAKE-STRUCT-TEST-31) (FIND-CLASS '#:STRUCT-TEST-31))) +Expected value: T +Actual value: #. +Test STRUCT-TEST-31/14 failed +Form: (LET ((CLASS (FIND-CLASS '#:STRUCT-TEST-31))) + (NOTNOT-MV (TYPEP CLASS 'STRUCTURE-CLASS))) +Expected value: T +Actual value: #. + STRUCT-TEST-31/15 +Test STRUCT-TEST-31/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE '#:STRUCT-TEST-31)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* '#:STRUCT-TEST-31 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). +Test STRUCT-TEST-31/17 failed +Form: (LET ((CLASS (FIND-CLASS '#:STRUCT-TEST-31))) + (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST (SUBTYPEP* TYPE CLASS)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST (SUBTYPEP* CLASS TYPE)) + '(NIL T))) + COLLECT + TYPE)) +Expected value: NIL +Actual value: #. +Test STRUCT-TEST-31/15A failed +Form: (LET ((CLASS (FIND-CLASS '#:STRUCT-TEST-31))) + (NOTNOT-MV (SUBTYPEP CLASS 'STRUCTURE-OBJECT))) +Expected values: T + T +Actual value: #. + STRUCT-TEST-31/15B STRUCT-TEST-31/20 STRUCT-TEST-32/1 STRUCT-TEST-32/2 + STRUCT-TEST-32/ERROR.1 STRUCT-TEST-32/ERROR.2 STRUCT-TEST-32/3 + STRUCT-TEST-32/4 STRUCT-TEST-32/5 STRUCT-TEST-32/ERROR.3 + STRUCT-TEST-32/ERROR.4 STRUCT-TEST-32/6 STRUCT-TEST-32/7 + STRUCT-TEST-32/8 STRUCT-TEST-32/ERROR.5 STRUCT-TEST-32/ERROR.6 + STRUCT-TEST-32/9 STRUCT-TEST-32/13 STRUCT-TEST-32/14 STRUCT-TEST-32/15 +Test STRUCT-TEST-32/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-32)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-32 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-32/17 STRUCT-TEST-32/15A STRUCT-TEST-32/15B + STRUCT-TEST-32/20 STRUCT-TEST-33/1 STRUCT-TEST-33/2 + STRUCT-TEST-33/ERROR.1 STRUCT-TEST-33/ERROR.2 STRUCT-TEST-33/3 + STRUCT-TEST-33/4 STRUCT-TEST-33/5 STRUCT-TEST-33/ERROR.3 + STRUCT-TEST-33/ERROR.4 STRUCT-TEST-33/6 STRUCT-TEST-33/7 + STRUCT-TEST-33/8 STRUCT-TEST-33/ERROR.5 STRUCT-TEST-33/ERROR.6 + STRUCT-TEST-33/9 STRUCT-TEST-33/13 STRUCT-TEST-33/14 STRUCT-TEST-33/15 +Test STRUCT-TEST-33/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-33)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-33 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-33/17 STRUCT-TEST-33/15A STRUCT-TEST-33/15B + STRUCT-TEST-33/20 STRUCT-TEST-34/1 STRUCT-TEST-34/2 + STRUCT-TEST-34/ERROR.1 STRUCT-TEST-34/ERROR.2 STRUCT-TEST-34/3 + STRUCT-TEST-34/4 STRUCT-TEST-34/5 STRUCT-TEST-34/ERROR.3 + STRUCT-TEST-34/ERROR.4 STRUCT-TEST-34/6 STRUCT-TEST-34/7 + STRUCT-TEST-34/8 STRUCT-TEST-34/ERROR.5 STRUCT-TEST-34/ERROR.6 + STRUCT-TEST-34/9 STRUCT-TEST-34/13 STRUCT-TEST-34/14 STRUCT-TEST-34/15 +Test STRUCT-TEST-34/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-34)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-34 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-34/17 STRUCT-TEST-34/15A STRUCT-TEST-34/15B + STRUCT-TEST-34/20 STRUCT-TEST-35/1 STRUCT-TEST-35/2 + STRUCT-TEST-35/ERROR.1 STRUCT-TEST-35/ERROR.2 STRUCT-TEST-35/3 + STRUCT-TEST-35/4 STRUCT-TEST-35/5 STRUCT-TEST-35/ERROR.3 + STRUCT-TEST-35/ERROR.4 STRUCT-TEST-35/6 STRUCT-TEST-35/7 + STRUCT-TEST-35/8 STRUCT-TEST-35/ERROR.5 STRUCT-TEST-35/ERROR.6 + STRUCT-TEST-35/9 STRUCT-TEST-35/13 STRUCT-TEST-35/14 STRUCT-TEST-35/15 +Test STRUCT-TEST-35/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-35)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-35 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-35/17 STRUCT-TEST-35/15A STRUCT-TEST-35/15B + STRUCT-TEST-35/20 STRUCT-TEST-36/1 STRUCT-TEST-36/2 + STRUCT-TEST-36/ERROR.1 STRUCT-TEST-36/ERROR.2 STRUCT-TEST-36/3 + STRUCT-TEST-36/4 STRUCT-TEST-36/5 STRUCT-TEST-36/ERROR.3 + STRUCT-TEST-36/ERROR.4 STRUCT-TEST-36/6 STRUCT-TEST-36/7 + STRUCT-TEST-36/8 STRUCT-TEST-36/ERROR.5 STRUCT-TEST-36/ERROR.6 + STRUCT-TEST-36/9 STRUCT-TEST-36/13 STRUCT-TEST-36/14 STRUCT-TEST-36/15 +Test STRUCT-TEST-36/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-36)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-36 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-36/17 STRUCT-TEST-36/15A STRUCT-TEST-36/15B + STRUCT-TEST-36/20 STRUCT-TEST-37/1 STRUCT-TEST-37/5 + STRUCT-TEST-37/ERROR.3 STRUCT-TEST-37/ERROR.4 STRUCT-TEST-37/6 + STRUCT-TEST-37/7 STRUCT-TEST-37/8 STRUCT-TEST-37/ERROR.5 + STRUCT-TEST-37/ERROR.6 STRUCT-TEST-37/9 STRUCT-TEST-37/10 + STRUCTURE-37-1 STRUCT-TEST-38/1 STRUCT-TEST-38/2 + STRUCT-TEST-38/ERROR.1 STRUCT-TEST-38/ERROR.2 STRUCT-TEST-38/3 + STRUCT-TEST-38/5 STRUCT-TEST-38/ERROR.3 STRUCT-TEST-38/ERROR.4 + STRUCT-TEST-38/6 STRUCT-TEST-38/7 STRUCT-TEST-38/8 + STRUCT-TEST-38/ERROR.5 STRUCT-TEST-38/ERROR.6 STRUCT-TEST-38/9 + STRUCTURE-38-1 STRUCT-TEST-39/1 STRUCT-TEST-39/5 + STRUCT-TEST-39/ERROR.3 STRUCT-TEST-39/ERROR.4 STRUCT-TEST-39/6 + STRUCT-TEST-39/7 STRUCT-TEST-39/8 STRUCT-TEST-39/ERROR.5 + STRUCT-TEST-39/ERROR.6 STRUCT-TEST-39/9 STRUCT-TEST-39/10 + STRUCTURE-39-1 STRUCT-TEST-40/1 STRUCT-TEST-40/5 + STRUCT-TEST-40/ERROR.3 STRUCT-TEST-40/ERROR.4 STRUCT-TEST-40/6 + STRUCT-TEST-40/7 STRUCT-TEST-40/8 STRUCT-TEST-40/ERROR.5 + STRUCT-TEST-40/ERROR.6 STRUCT-TEST-40/9 STRUCT-TEST-40/10 + STRUCT-TEST-41/1 STRUCT-TEST-41/2 STRUCT-TEST-41/ERROR.1 + STRUCT-TEST-41/ERROR.2 +Test STRUCT-TEST-41/3 failed +Form: (COUNT-IF #'STRUCT-TEST-41-P *UNIVERSE*) +Expected value: 0 +Actual value: #. + STRUCT-TEST-41/5 STRUCT-TEST-41/ERROR.3 STRUCT-TEST-41/ERROR.4 + STRUCT-TEST-41/6 STRUCT-TEST-41/7 STRUCT-TEST-41/8 + STRUCT-TEST-41/ERROR.5 STRUCT-TEST-41/ERROR.6 STRUCT-TEST-41/9 + STRUCT-TEST-42/1 STRUCT-TEST-42/5 STRUCT-TEST-42/ERROR.3 + STRUCT-TEST-42/ERROR.4 STRUCT-TEST-42/6 STRUCT-TEST-42/7 + STRUCT-TEST-42/8 STRUCT-TEST-42/ERROR.5 STRUCT-TEST-42/ERROR.6 + STRUCT-TEST-42/9 STRUCT-TEST-42/10 STRUCT-TEST-43/1 STRUCT-TEST-43/2 + STRUCT-TEST-43/ERROR.1 STRUCT-TEST-43/ERROR.2 +Test STRUCT-TEST-43/3 failed +Form: (COUNT-IF #'STRUCT-TEST-43-P *UNIVERSE*) +Expected value: 0 +Actual value: #. + STRUCT-TEST-43/5 STRUCT-TEST-43/ERROR.3 STRUCT-TEST-43/ERROR.4 + STRUCT-TEST-43/6 STRUCT-TEST-43/7 STRUCT-TEST-43/8 + STRUCT-TEST-43/ERROR.5 STRUCT-TEST-43/ERROR.6 STRUCT-TEST-43/9 + STRUCT-TEST-44/1 STRUCT-TEST-44/5 STRUCT-TEST-44/ERROR.3 + STRUCT-TEST-44/ERROR.4 STRUCT-TEST-44/6 STRUCT-TEST-44/7 + STRUCT-TEST-44/8 STRUCT-TEST-44/ERROR.5 STRUCT-TEST-44/ERROR.6 + STRUCT-TEST-44/9 STRUCT-TEST-44/10 STRUCTS-ARE-DISJOINT + STRUCT-TEST-45/1 STRUCT-TEST-45/5 STRUCT-TEST-45/ERROR.3 + STRUCT-TEST-45/ERROR.4 STRUCT-TEST-45/6 STRUCT-TEST-45/7 + STRUCT-TEST-45/8 STRUCT-TEST-45/ERROR.5 STRUCT-TEST-45/ERROR.6 + STRUCT-TEST-45/9 STRUCT-TEST-45/10 STRUCTURE-45-1 STRUCT-TEST-46/1 + STRUCT-TEST-46/5 STRUCT-TEST-46/ERROR.3 STRUCT-TEST-46/ERROR.4 + STRUCT-TEST-46/6 STRUCT-TEST-46/7 STRUCT-TEST-46/8 + STRUCT-TEST-46/ERROR.5 STRUCT-TEST-46/ERROR.6 STRUCT-TEST-46/9 + STRUCT-TEST-46/10 STRUCTURE-46-1 STRUCT-TEST-47/1 STRUCT-TEST-47/5 + STRUCT-TEST-47/ERROR.3 STRUCT-TEST-47/ERROR.4 STRUCT-TEST-47/6 + STRUCT-TEST-47/7 STRUCT-TEST-47/8 STRUCT-TEST-47/ERROR.5 + STRUCT-TEST-47/ERROR.6 STRUCT-TEST-47/9 STRUCT-TEST-47/10 + STRUCTURE-47-1 STRUCT-TEST-48/1 STRUCT-TEST-48/5 + STRUCT-TEST-48/ERROR.3 STRUCT-TEST-48/ERROR.4 STRUCT-TEST-48/6 + STRUCT-TEST-48/7 STRUCT-TEST-48/8 STRUCT-TEST-48/ERROR.5 + STRUCT-TEST-48/ERROR.6 STRUCT-TEST-48/9 STRUCT-TEST-48/10 + STRUCTURE-48-1 +Test STRUCT-TEST-49/1 failed +Form: (AND (FBOUNDP 'MAKE-STRUCT-TEST-49) + (FUNCTIONP #'MAKE-STRUCT-TEST-49) + (SYMBOL-FUNCTION 'MAKE-STRUCT-TEST-49) + (TYPEP (MAKE-STRUCT-TEST-49) '(VECTOR BIT)) T) +Expected value: T +Actual value: NIL. + STRUCT-TEST-49/5 STRUCT-TEST-49/ERROR.3 STRUCT-TEST-49/ERROR.4 + STRUCT-TEST-49/6 STRUCT-TEST-49/7 STRUCT-TEST-49/8 + STRUCT-TEST-49/ERROR.5 STRUCT-TEST-49/ERROR.6 STRUCT-TEST-49/9 + STRUCT-TEST-49/10 +Test STRUCT-TEST-50/1 failed +Form: (AND (FBOUNDP 'MAKE-STRUCT-TEST-50) + (FUNCTIONP #'MAKE-STRUCT-TEST-50) + (SYMBOL-FUNCTION 'MAKE-STRUCT-TEST-50) + (TYPEP (MAKE-STRUCT-TEST-50) '(VECTOR CHARACTER)) T) +Expected value: T +Actual value: NIL. + STRUCT-TEST-50/5 STRUCT-TEST-50/ERROR.3 STRUCT-TEST-50/ERROR.4 + STRUCT-TEST-50/6 STRUCT-TEST-50/7 STRUCT-TEST-50/8 + STRUCT-TEST-50/ERROR.5 STRUCT-TEST-50/ERROR.6 STRUCT-TEST-50/9 + STRUCT-TEST-50/10 +Test STRUCT-TEST-51/1 failed +Form: (AND (FBOUNDP 'MAKE-STRUCT-TEST-51) + (FUNCTIONP #'MAKE-STRUCT-TEST-51) + (SYMBOL-FUNCTION 'MAKE-STRUCT-TEST-51) + (TYPEP (MAKE-STRUCT-TEST-51) '(VECTOR (INTEGER 0 255))) T) +Expected value: T +Actual value: NIL. + STRUCT-TEST-51/5 STRUCT-TEST-51/ERROR.3 STRUCT-TEST-51/ERROR.4 + STRUCT-TEST-51/6 STRUCT-TEST-51/7 STRUCT-TEST-51/8 + STRUCT-TEST-51/ERROR.5 STRUCT-TEST-51/ERROR.6 STRUCT-TEST-51/9 + STRUCT-TEST-51/10 STRUCT-TEST-52/1 STRUCT-TEST-52/5 + STRUCT-TEST-52/ERROR.3 STRUCT-TEST-52/ERROR.4 STRUCT-TEST-52/6 + STRUCT-TEST-52/7 STRUCT-TEST-52/8 STRUCT-TEST-52/ERROR.5 + STRUCT-TEST-52/ERROR.6 STRUCT-TEST-52/9 STRUCT-TEST-52/10 + STRUCT-TEST-53/1 STRUCT-TEST-53/5 STRUCT-TEST-53/ERROR.3 + STRUCT-TEST-53/ERROR.4 STRUCT-TEST-53/6 STRUCT-TEST-53/7 + STRUCT-TEST-53/8 STRUCT-TEST-53/ERROR.5 STRUCT-TEST-53/ERROR.6 + STRUCT-TEST-53/9 STRUCT-TEST-53/10 STRUCT-TEST-53/18 STRUCTURE-53-1 + STRUCT-TEST-54/1 STRUCT-TEST-54/5 STRUCT-TEST-54/ERROR.3 + STRUCT-TEST-54/ERROR.4 STRUCT-TEST-54/6 STRUCT-TEST-54/7 + STRUCT-TEST-54/8 STRUCT-TEST-54/ERROR.5 STRUCT-TEST-54/ERROR.6 + STRUCT-TEST-54/9 STRUCT-TEST-54/10 STRUCT-TEST-54/18 STRUCTURE-54-1 + STRUCT-TEST-55/1 STRUCT-TEST-55/2 STRUCT-TEST-55/ERROR.1 + STRUCT-TEST-55/ERROR.2 STRUCT-TEST-55/3 STRUCT-TEST-55/5 + STRUCT-TEST-55/ERROR.3 STRUCT-TEST-55/ERROR.4 STRUCT-TEST-55/6 + STRUCT-TEST-55/7 STRUCT-TEST-55/8 STRUCT-TEST-55/ERROR.5 + STRUCT-TEST-55/ERROR.6 STRUCT-TEST-55/9 STRUCTURE-55-1 + STRUCT-TEST-56/1 STRUCT-TEST-56/2 STRUCT-TEST-56/ERROR.1 + STRUCT-TEST-56/ERROR.2 STRUCT-TEST-56/3 STRUCT-TEST-56/5 + STRUCT-TEST-56/ERROR.3 STRUCT-TEST-56/ERROR.4 STRUCT-TEST-56/6 + STRUCT-TEST-56/7 STRUCT-TEST-56/8 STRUCT-TEST-56/ERROR.5 + STRUCT-TEST-56/ERROR.6 STRUCT-TEST-56/9 STRUCTURE-56-1 + STRUCT-TEST-57/1 STRUCT-TEST-57/2 STRUCT-TEST-57/ERROR.1 + STRUCT-TEST-57/ERROR.2 STRUCT-TEST-57/3 STRUCT-TEST-57/4 + STRUCT-TEST-57/5 STRUCT-TEST-57/ERROR.3 STRUCT-TEST-57/ERROR.4 + STRUCT-TEST-57/6 STRUCT-TEST-57/7 STRUCT-TEST-57/8 + STRUCT-TEST-57/ERROR.5 STRUCT-TEST-57/ERROR.6 STRUCT-TEST-57/9 + STRUCT-TEST-57/13 STRUCT-TEST-57/14 STRUCT-TEST-57/15 +Test STRUCT-TEST-57/16 failed +Form: (LOOP + FOR + TYPE + IN + *DISJOINT-TYPES-LIST* + UNLESS + (AND (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* TYPE 'STRUCT-TEST-57)) + '(NIL T)) + (EQUALT (MULTIPLE-VALUE-LIST + (SUBTYPEP* 'STRUCT-TEST-57 TYPE)) + '(NIL T))) + COLLECT + TYPE) +Expected value: NIL +Actual value: (CONDITION). + STRUCT-TEST-57/17 STRUCT-TEST-57/15A STRUCT-TEST-57/15B + STRUCT-TEST-57/20 STRUCT-TEST-58/1 STRUCT-TEST-58/2 + STRUCT-TEST-58/ERROR.1 STRUCT-TEST-58/ERROR.2 STRUCT-TEST-58/3 + STRUCT-TEST-58/4 STRUCT-TEST-58/5 STRUCT-TEST-58/ERROR.3 STRUCT-TEST-59/20 STRUCT-TEST-60/1 STRUCT-TEST-60/2 STRUCT-TEST-60/ERROR.1 STRUCT-TEST-60/ERROR.2 STRUCT-TEST-60/3 STRUCT-TEST-60/4 STRUCT-TEST-60/5 STRUCT-TEST-60/ERROR.3 STRUCT-TEST-60/ERROR.4 STRUCT-TEST-60/6 @@ -25637,17 +26711,17 @@ '(NOT STRUCTURE-OBJECT)) ==> NIL T) ((SUBTYPEP 'ARITHMETIC-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'ARITHMETIC-ERROR) ==> NIL T) ((SUBTYPEP '(NOT ARITHMETIC-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT ARITHMETIC-ERROR)) ==> NIL T) ((SUBTYPEP 'SYMBOL @@ -25664,17 +26738,17 @@ '(NOT SYMBOL)) ==> NIL T) ((SUBTYPEP 'CONTROL-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'CONTROL-ERROR) ==> NIL T) ((SUBTYPEP '(NOT CONTROL-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT CONTROL-ERROR)) ==> NIL T) ((SUBTYPEP 'CLASS @@ -25743,17 +26817,17 @@ '(NOT ARRAY)) ==> NIL T) ((SUBTYPEP 'FLOATING-POINT-INEXACT - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'FLOATING-POINT-INEXACT) ==> NIL T) ((SUBTYPEP '(NOT FLOATING-POINT-INEXACT) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT FLOATING-POINT-INEXACT)) ==> NIL T) ((SUBTYPEP 'NUMBER @@ -25782,31 +26856,31 @@ '(NOT #) '(NOT NULL)) ==> NIL T) ((SUBTYPEP 'FLOATING-POINT-UNDERFLOW - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'FLOATING-POINT-UNDERFLOW) ==> NIL T) ((SUBTYPEP '(NOT FLOATING-POINT-UNDERFLOW) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT FLOATING-POINT-UNDERFLOW)) ==> NIL T) ((SUBTYPEP 'FLOATING-POINT-OVERFLOW - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'FLOATING-POINT-OVERFLOW) ==> NIL T) ((SUBTYPEP '(NOT FLOATING-POINT-OVERFLOW) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT FLOATING-POINT-OVERFLOW)) ==> NIL T) ((SUBTYPEP 'RATIONAL @@ -25892,16 +26966,16 @@ '(NOT UNBOUND-SLOT)) ==> NIL T) ((SUBTYPEP 'ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # 'ERROR) + # 'ERROR) ==> NIL T) ((SUBTYPEP '(NOT ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT ERROR)) ==> NIL T) ((SUBTYPEP 'STANDARD-GENERIC-FUNCTION @@ -25932,17 +27006,17 @@ '(NOT CHARACTER)) ==> NIL T) ((SUBTYPEP 'DIVISION-BY-ZERO - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'DIVISION-BY-ZERO) ==> NIL T) ((SUBTYPEP '(NOT DIVISION-BY-ZERO) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT DIVISION-BY-ZERO)) ==> NIL T) ((SUBTYPEP 'SEQUENCE @@ -25959,45 +27033,45 @@ '(NOT SEQUENCE)) ==> NIL T) ((SUBTYPEP 'PRINT-NOT-READABLE - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'PRINT-NOT-READABLE) ==> NIL T) ((SUBTYPEP '(NOT PRINT-NOT-READABLE) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT PRINT-NOT-READABLE)) ==> NIL T) ((SUBTYPEP 'UNDEFINED-FUNCTION - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'UNDEFINED-FUNCTION) ==> NIL T) ((SUBTYPEP '(NOT UNDEFINED-FUNCTION) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT UNDEFINED-FUNCTION)) ==> NIL T) ((SUBTYPEP 'END-OF-FILE - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'END-OF-FILE) ==> NIL T) ((SUBTYPEP '(NOT END-OF-FILE) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT END-OF-FILE)) ==> NIL T) ((SUBTYPEP 'INTEGER @@ -26040,31 +27114,31 @@ '(NOT BIT-VECTOR)) ==> NIL T) ((SUBTYPEP 'STYLE-WARNING - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'STYLE-WARNING) ==> NIL T) ((SUBTYPEP '(NOT STYLE-WARNING) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT STYLE-WARNING)) ==> NIL T) ((SUBTYPEP 'SIMPLE-TYPE-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'SIMPLE-TYPE-ERROR) ==> NIL T) ((SUBTYPEP '(NOT SIMPLE-TYPE-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT SIMPLE-TYPE-ERROR)) ==> NIL T) ((SUBTYPEP 'CELL-ERROR @@ -26081,42 +27155,42 @@ '(NOT CELL-ERROR)) ==> NIL T) ((SUBTYPEP 'FILE-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # 'FILE-ERROR) + # 'FILE-ERROR) ==> NIL T) ((SUBTYPEP '(NOT FILE-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT FILE-ERROR)) ==> NIL T) ((SUBTYPEP 'RESTART - #) + #) ==> NIL T) ((SUBTYPEP - # 'RESTART) + # 'RESTART) ==> NIL T) ((SUBTYPEP '(NOT RESTART) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT RESTART)) ==> NIL T) ((SUBTYPEP 'TYPE-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # 'TYPE-ERROR) + # 'TYPE-ERROR) ==> NIL T) ((SUBTYPEP '(NOT TYPE-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT TYPE-ERROR)) ==> NIL T) ((SUBTYPEP 'LIST @@ -26178,17 +27252,17 @@ '(NOT #) '(NOT CONS)) ==> NIL T) ((SUBTYPEP 'SIMPLE-CONDITION - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'SIMPLE-CONDITION) ==> NIL T) ((SUBTYPEP '(NOT SIMPLE-CONDITION) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT SIMPLE-CONDITION)) ==> NIL T) ((SUBTYPEP 'SIMPLE-WARNING @@ -26220,17 +27294,17 @@ '(NOT PACKAGE-ERROR)) ==> NIL T) ((SUBTYPEP 'PARSE-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'PARSE-ERROR) ==> NIL T) ((SUBTYPEP '(NOT PARSE-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT PARSE-ERROR)) ==> NIL T) ((SUBTYPEP 'WARNING @@ -26247,45 +27321,45 @@ '(NOT WARNING)) ==> NIL T) ((SUBTYPEP 'STORAGE-CONDITION - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'STORAGE-CONDITION) ==> NIL T) ((SUBTYPEP '(NOT STORAGE-CONDITION) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT STORAGE-CONDITION)) ==> NIL T) ((SUBTYPEP 'FLOATING-POINT-INVALID-OPERATION - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'FLOATING-POINT-INVALID-OPERATION) ==> NIL T) ((SUBTYPEP '(NOT FLOATING-POINT-INVALID-OPERATION) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT FLOATING-POINT-INVALID-OPERATION)) ==> NIL T) ((SUBTYPEP 'PROGRAM-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'PROGRAM-ERROR) ==> NIL T) ((SUBTYPEP '(NOT PROGRAM-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT PROGRAM-ERROR)) ==> NIL T) ((SUBTYPEP 'METHOD @@ -26330,45 +27404,45 @@ '(NOT GENERIC-FUNCTION)) ==> NIL T) ((SUBTYPEP 'STREAM-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'STREAM-ERROR) ==> NIL T) ((SUBTYPEP '(NOT STREAM-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT STREAM-ERROR)) ==> NIL T) ((SUBTYPEP 'SERIOUS-CONDITION - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'SERIOUS-CONDITION) ==> NIL T) ((SUBTYPEP '(NOT SERIOUS-CONDITION) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT SERIOUS-CONDITION)) ==> NIL T) ((SUBTYPEP 'READER-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'READER-ERROR) ==> NIL T) ((SUBTYPEP '(NOT READER-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT READER-ERROR)) ==> NIL T) ((SUBTYPEP 'REAL @@ -26397,30 +27471,30 @@ '(NOT VECTOR)) ==> NIL T) ((SUBTYPEP 'CONDITION - #) + #) ==> NIL T) ((SUBTYPEP - # 'CONDITION) + # 'CONDITION) ==> NIL T) ((SUBTYPEP '(NOT CONDITION) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT CONDITION)) ==> NIL T) ((SUBTYPEP 'UNBOUND-VARIABLE - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'UNBOUND-VARIABLE) ==> NIL T) ((SUBTYPEP '(NOT UNBOUND-VARIABLE) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT UNBOUND-VARIABLE)) ==> NIL T)). Test ALL-STANDARD-CLASSES-ARE-SUBTYPES-OF-STANDARD-OBJECT failed @@ -26616,1045 +27690,63 @@ SIMPLE-BASE-STRING-IS-NOT-SIMPLE-VECTOR BIT-VECTOR-IS-NOT-SIMPLE-VECTOR SIMPLE-BIT-VECTOR-IS-NOT-SIMPLE-VECTOR SUBTYPEP.EXTENDED-CHAR.1 SUBTYPEP.AND/OR.1 SUBTYPEP.AND/OR.2 - SUBTYPEP.AND.1 - RANDOM-REMOVE-DUPLICATES RANDOM-DELETE-DUPLICATES REMOVE-DUPLICATES.1 - DELETE-DUPLICATES.1 REMOVE-DUPLICATES.ORDER.1 - REMOVE-DUPLICATES.ORDER.2 REMOVE-DUPLICATES.ALLOW-OTHER-KEYS.1 - REMOVE-DUPLICATES.ALLOW-OTHER-KEYS.2 - REMOVE-DUPLICATES.ALLOW-OTHER-KEYS.3 - REMOVE-DUPLICATES.ALLOW-OTHER-KEYS.4 - REMOVE-DUPLICATES.ALLOW-OTHER-KEYS.5 - REMOVE-DUPLICATES.ALLOW-OTHER-KEYS.6 - REMOVE-DUPLICATES.ALLOW-OTHER-KEYS.7 - REMOVE-DUPLICATES.ALLOW-OTHER-KEYS.8 REMOVE-DUPLICATES.KEYWORDS.1 - DELETE-DUPLICATES.ALLOW-OTHER-KEYS.1 - DELETE-DUPLICATES.ALLOW-OTHER-KEYS.2 - DELETE-DUPLICATES.ALLOW-OTHER-KEYS.3 - DELETE-DUPLICATES.ALLOW-OTHER-KEYS.4 - DELETE-DUPLICATES.ALLOW-OTHER-KEYS.5 - DELETE-DUPLICATES.ALLOW-OTHER-KEYS.6 - DELETE-DUPLICATES.ALLOW-OTHER-KEYS.7 - DELETE-DUPLICATES.ALLOW-OTHER-KEYS.8 DELETE-DUPLICATES.KEYWORDS.1 - DELETE-DUPLICATES.ORDER.1 DELETE-DUPLICATES.ORDER.2 - REMOVE-DUPLICATES.ERROR.1 REMOVE-DUPLICATES.ERROR.2 - REMOVE-DUPLICATES.ERROR.3 REMOVE-DUPLICATES.ERROR.4 - REMOVE-DUPLICATES.ERROR.5 REMOVE-DUPLICATES.ERROR.6 - REMOVE-DUPLICATES.ERROR.7 REMOVE-DUPLICATES.ERROR.8 - REMOVE-DUPLICATES.ERROR.9 DELETE-DUPLICATES.ERROR.1 - DELETE-DUPLICATES.ERROR.2 DELETE-DUPLICATES.ERROR.3 - DELETE-DUPLICATES.ERROR.4 DELETE-DUPLICATES.ERROR.5 - DELETE-DUPLICATES.ERROR.6 DELETE-DUPLICATES.ERROR.7 - DELETE-DUPLICATES.ERROR.8 DELETE-DUPLICATES.ERROR.9 STRUCTURE-1-1 - STRUCTURE-1-2 STRUCTURE-1-3 STRUCTURE-1-4 STRUCTURE-1-5 STRUCTURE-1-6 - STRUCTURE-1-7 STRUCTURE-1-8 STRUCTURE-1-9 STRUCTURE-1-10 - STRUCTURE-1-11 STRUCTURE-1-12 STRUCTURE-1-13 STRUCTURE-1-14 - STRUCTURE-1-15 STRUCTURE-2-1 STRUCTURE-2-2 STRUCTURE-2-3 STRUCTURE-2-4 - STRUCTURE-2-5 STRUCTURE-2-6 STRUCTURE-2-7 STRUCTURE-2-8 - STRUCT-TEST-03/1 STRUCT-TEST-03/2 STRUCT-TEST-03/ERROR.1 - STRUCT-TEST-03/ERROR.2 STRUCT-TEST-03/3 STRUCT-TEST-03/4 - STRUCT-TEST-03/5 STRUCT-TEST-03/ERROR.3 STRUCT-TEST-03/ERROR.4 - STRUCT-TEST-03/6 STRUCT-TEST-03/7 STRUCT-TEST-03/8 - STRUCT-TEST-03/ERROR.5 STRUCT-TEST-03/ERROR.6 STRUCT-TEST-03/9 - STRUCT-TEST-03/13 STRUCT-TEST-03/14 STRUCT-TEST-03/15 -Test STRUCT-TEST-03/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-03)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-03 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-03/17 STRUCT-TEST-03/15A STRUCT-TEST-03/15B - STRUCT-TEST-03/20 STRUCT-TEST-04/1 STRUCT-TEST-04/2 - STRUCT-TEST-04/ERROR.1 STRUCT-TEST-04/ERROR.2 STRUCT-TEST-04/3 - STRUCT-TEST-04/4 STRUCT-TEST-04/5 STRUCT-TEST-04/ERROR.3 - STRUCT-TEST-04/ERROR.4 STRUCT-TEST-04/6 STRUCT-TEST-04/7 - STRUCT-TEST-04/8 STRUCT-TEST-04/ERROR.5 STRUCT-TEST-04/ERROR.6 - STRUCT-TEST-04/9 STRUCT-TEST-04/13 STRUCT-TEST-04/14 STRUCT-TEST-04/15 -Test STRUCT-TEST-04/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-04)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-04 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-04/17 STRUCT-TEST-04/15A STRUCT-TEST-04/15B - STRUCT-TEST-04/20 STRUCT-TEST-05/1 STRUCT-TEST-05/2 - STRUCT-TEST-05/ERROR.1 STRUCT-TEST-05/ERROR.2 STRUCT-TEST-05/3 - STRUCT-TEST-05/4 STRUCT-TEST-05/5 STRUCT-TEST-05/ERROR.3 - STRUCT-TEST-05/ERROR.4 STRUCT-TEST-05/6 STRUCT-TEST-05/7 - STRUCT-TEST-05/8 STRUCT-TEST-05/ERROR.5 STRUCT-TEST-05/ERROR.6 - STRUCT-TEST-05/9 STRUCT-TEST-05/13 STRUCT-TEST-05/14 STRUCT-TEST-05/15 -Test STRUCT-TEST-05/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-05)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-05 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-05/17 STRUCT-TEST-05/15A STRUCT-TEST-05/15B - STRUCT-TEST-05/20 STRUCT-TEST-06/1 STRUCT-TEST-06/2 - STRUCT-TEST-06/ERROR.1 STRUCT-TEST-06/ERROR.2 STRUCT-TEST-06/3 - STRUCT-TEST-06/4 STRUCT-TEST-06/5 STRUCT-TEST-06/ERROR.3 - STRUCT-TEST-06/ERROR.4 STRUCT-TEST-06/6 STRUCT-TEST-06/7 - STRUCT-TEST-06/8 STRUCT-TEST-06/ERROR.5 STRUCT-TEST-06/ERROR.6 - STRUCT-TEST-06/9 STRUCT-TEST-06/13 STRUCT-TEST-06/14 STRUCT-TEST-06/15 -Test STRUCT-TEST-06/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-06)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-06 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-06/17 STRUCT-TEST-06/15A STRUCT-TEST-06/15B - STRUCT-TEST-06/20 STRUCT-TEST-07/1 STRUCT-TEST-07/2 - STRUCT-TEST-07/ERROR.1 STRUCT-TEST-07/ERROR.2 STRUCT-TEST-07/3 - STRUCT-TEST-07/4 STRUCT-TEST-07/5 STRUCT-TEST-07/ERROR.3 - STRUCT-TEST-07/ERROR.4 STRUCT-TEST-07/6 STRUCT-TEST-07/7 - STRUCT-TEST-07/8 STRUCT-TEST-07/ERROR.5 STRUCT-TEST-07/ERROR.6 - STRUCT-TEST-07/9 STRUCT-TEST-07/13 STRUCT-TEST-07/14 STRUCT-TEST-07/15 -Test STRUCT-TEST-07/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-07)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-07 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-07/17 STRUCT-TEST-07/15A STRUCT-TEST-07/15B - STRUCT-TEST-07/20 STRUCT-TEST-08/1 STRUCT-TEST-08/2 - STRUCT-TEST-08/ERROR.1 STRUCT-TEST-08/ERROR.2 STRUCT-TEST-08/3 - STRUCT-TEST-08/4 STRUCT-TEST-08/5 STRUCT-TEST-08/ERROR.3 - STRUCT-TEST-08/ERROR.4 STRUCT-TEST-08/6 STRUCT-TEST-08/7 - STRUCT-TEST-08/8 STRUCT-TEST-08/ERROR.5 STRUCT-TEST-08/ERROR.6 - STRUCT-TEST-08/9 STRUCT-TEST-08/13 STRUCT-TEST-08/14 STRUCT-TEST-08/15 -Test STRUCT-TEST-08/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-08)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-08 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-08/17 STRUCT-TEST-08/15A STRUCT-TEST-08/15B - STRUCT-TEST-08/20 STRUCT-TEST-09/1 STRUCT-TEST-09/2 - STRUCT-TEST-09/ERROR.1 STRUCT-TEST-09/ERROR.2 STRUCT-TEST-09/3 - STRUCT-TEST-09/4 STRUCT-TEST-09/5 STRUCT-TEST-09/ERROR.3 - STRUCT-TEST-09/ERROR.4 STRUCT-TEST-09/6 STRUCT-TEST-09/7 - STRUCT-TEST-09/8 STRUCT-TEST-09/ERROR.5 STRUCT-TEST-09/ERROR.6 - STRUCT-TEST-09/9 STRUCT-TEST-09/13 STRUCT-TEST-09/14 STRUCT-TEST-09/15 -Test STRUCT-TEST-09/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-09)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-09 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-09/17 STRUCT-TEST-09/15A STRUCT-TEST-09/15B - STRUCT-TEST-09/20 STRUCT-TEST-10/1 STRUCT-TEST-10/2 - STRUCT-TEST-10/ERROR.1 STRUCT-TEST-10/ERROR.2 STRUCT-TEST-10/3 - STRUCT-TEST-10/4 STRUCT-TEST-10/5 STRUCT-TEST-10/ERROR.3 - STRUCT-TEST-10/ERROR.4 STRUCT-TEST-10/6 STRUCT-TEST-10/7 - STRUCT-TEST-10/8 STRUCT-TEST-10/ERROR.5 STRUCT-TEST-10/ERROR.6 - STRUCT-TEST-10/9 STRUCT-TEST-10/13 STRUCT-TEST-10/14 STRUCT-TEST-10/15 -Test STRUCT-TEST-10/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-10)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-10 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-10/17 STRUCT-TEST-10/15A STRUCT-TEST-10/15B - STRUCT-TEST-10/20 STRUCT-TEST-11/1 STRUCT-TEST-11/2 - STRUCT-TEST-11/ERROR.1 STRUCT-TEST-11/ERROR.2 STRUCT-TEST-11/3 - STRUCT-TEST-11/4 STRUCT-TEST-11/5 STRUCT-TEST-11/ERROR.3 - STRUCT-TEST-11/ERROR.4 STRUCT-TEST-11/6 STRUCT-TEST-11/7 - STRUCT-TEST-11/8 STRUCT-TEST-11/ERROR.5 STRUCT-TEST-11/ERROR.6 - STRUCT-TEST-11/9 STRUCT-TEST-11/13 STRUCT-TEST-11/14 STRUCT-TEST-11/15 -Test STRUCT-TEST-11/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-11)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-11 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-11/17 STRUCT-TEST-11/15A STRUCT-TEST-11/15B - STRUCT-TEST-11/20 STRUCT-TEST-12/1 STRUCT-TEST-12/2 - STRUCT-TEST-12/ERROR.1 STRUCT-TEST-12/ERROR.2 STRUCT-TEST-12/3 - STRUCT-TEST-12/4 STRUCT-TEST-12/5 STRUCT-TEST-12/ERROR.3 - STRUCT-TEST-12/ERROR.4 STRUCT-TEST-12/6 STRUCT-TEST-12/7 - STRUCT-TEST-12/8 STRUCT-TEST-12/ERROR.5 STRUCT-TEST-12/ERROR.6 - STRUCT-TEST-12/9 STRUCT-TEST-12/13 STRUCT-TEST-12/14 STRUCT-TEST-12/15 -Test STRUCT-TEST-12/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-12)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-12 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-12/17 STRUCT-TEST-12/15A STRUCT-TEST-12/15B - STRUCT-TEST-12/20 STRUCT-TEST-13/1 STRUCT-TEST-13/2 - STRUCT-TEST-13/ERROR.1 STRUCT-TEST-13/ERROR.2 STRUCT-TEST-13/3 - STRUCT-TEST-13/4 STRUCT-TEST-13/5 STRUCT-TEST-13/ERROR.3 - STRUCT-TEST-13/ERROR.4 STRUCT-TEST-13/6 STRUCT-TEST-13/7 - STRUCT-TEST-13/8 STRUCT-TEST-13/ERROR.5 STRUCT-TEST-13/ERROR.6 - STRUCT-TEST-13/9 STRUCT-TEST-13/13 STRUCT-TEST-13/14 STRUCT-TEST-13/15 -Test STRUCT-TEST-13/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-13)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-13 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-13/17 STRUCT-TEST-13/15A STRUCT-TEST-13/15B - STRUCT-TEST-13/20 STRUCT-TEST-14/1 STRUCT-TEST-14/2 - STRUCT-TEST-14/ERROR.1 STRUCT-TEST-14/ERROR.2 STRUCT-TEST-14/3 - STRUCT-TEST-14/4 STRUCT-TEST-14/5 STRUCT-TEST-14/ERROR.3 - STRUCT-TEST-14/ERROR.4 STRUCT-TEST-14/6 STRUCT-TEST-14/7 - STRUCT-TEST-14/8 STRUCT-TEST-14/ERROR.5 STRUCT-TEST-14/ERROR.6 - STRUCT-TEST-14/9 STRUCT-TEST-14/13 STRUCT-TEST-14/14 STRUCT-TEST-14/15 -Test STRUCT-TEST-14/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-14)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-14 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-14/17 STRUCT-TEST-14/15A STRUCT-TEST-14/15B - STRUCT-TEST-14/20 STRUCT-TEST-15/1 STRUCT-TEST-15/4 STRUCT-TEST-15/5 - STRUCT-TEST-15/ERROR.3 STRUCT-TEST-15/ERROR.4 STRUCT-TEST-15/6 - STRUCT-TEST-15/7 STRUCT-TEST-15/8 STRUCT-TEST-15/ERROR.5 - STRUCT-TEST-15/ERROR.6 STRUCT-TEST-15/9 STRUCT-TEST-15/10 - STRUCT-TEST-15/13 STRUCT-TEST-15/14 STRUCT-TEST-15/15 -Test STRUCT-TEST-15/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-15)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-15 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-15/17 STRUCT-TEST-15/15A STRUCT-TEST-15/15B - STRUCT-TEST-15/20 STRUCT-TEST-16/1 STRUCT-TEST-16/2 - STRUCT-TEST-16/ERROR.1 STRUCT-TEST-16/ERROR.2 STRUCT-TEST-16/3 - STRUCT-TEST-16/4 STRUCT-TEST-16/5 STRUCT-TEST-16/ERROR.3 - STRUCT-TEST-16/ERROR.4 STRUCT-TEST-16/6 STRUCT-TEST-16/7 - STRUCT-TEST-16/8 STRUCT-TEST-16/ERROR.5 STRUCT-TEST-16/ERROR.6 - STRUCT-TEST-16/9 STRUCT-TEST-16/13 STRUCT-TEST-16/14 STRUCT-TEST-16/15 -Test STRUCT-TEST-16/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-16)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-16 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-16/17 STRUCT-TEST-16/15A STRUCT-TEST-16/15B - STRUCT-TEST-16/20 STRUCT-TEST-17/1 STRUCT-TEST-17/2 - STRUCT-TEST-17/ERROR.1 STRUCT-TEST-17/ERROR.2 STRUCT-TEST-17/3 - STRUCT-TEST-17/4 STRUCT-TEST-17/5 STRUCT-TEST-17/ERROR.3 - STRUCT-TEST-17/ERROR.4 STRUCT-TEST-17/6 STRUCT-TEST-17/7 - STRUCT-TEST-17/8 STRUCT-TEST-17/ERROR.5 STRUCT-TEST-17/ERROR.6 - STRUCT-TEST-17/9 STRUCT-TEST-17/10 STRUCT-TEST-17/13 STRUCT-TEST-17/14 - STRUCT-TEST-17/15 -Test STRUCT-TEST-17/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-17)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-17 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-17/17 STRUCT-TEST-17/15A STRUCT-TEST-17/15B - STRUCT-TEST-17/20 STRUCT-TEST-18/1 STRUCT-TEST-18/2 - STRUCT-TEST-18/ERROR.1 STRUCT-TEST-18/ERROR.2 STRUCT-TEST-18/3 - STRUCT-TEST-18/4 STRUCT-TEST-18/5 STRUCT-TEST-18/ERROR.3 - STRUCT-TEST-18/ERROR.4 STRUCT-TEST-18/6 STRUCT-TEST-18/7 - STRUCT-TEST-18/8 STRUCT-TEST-18/ERROR.5 STRUCT-TEST-18/ERROR.6 - STRUCT-TEST-18/9 STRUCT-TEST-18/13 STRUCT-TEST-18/14 STRUCT-TEST-18/15 -Test STRUCT-TEST-18/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-18)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-18 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-18/17 STRUCT-TEST-18/15A STRUCT-TEST-18/15B - STRUCT-TEST-18/20 STRUCT-TEST-19/1 STRUCT-TEST-19/2 - STRUCT-TEST-19/ERROR.1 STRUCT-TEST-19/ERROR.2 STRUCT-TEST-19/3 - STRUCT-TEST-19/4 STRUCT-TEST-19/5 STRUCT-TEST-19/ERROR.3 - STRUCT-TEST-19/ERROR.4 STRUCT-TEST-19/6 STRUCT-TEST-19/7 - STRUCT-TEST-19/8 STRUCT-TEST-19/ERROR.5 STRUCT-TEST-19/ERROR.6 - STRUCT-TEST-19/9 STRUCT-TEST-19/13 STRUCT-TEST-19/14 STRUCT-TEST-19/15 -Test STRUCT-TEST-19/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-19)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-19 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-19/17 STRUCT-TEST-19/15A STRUCT-TEST-19/15B - STRUCT-TEST-19/20 STRUCT-TEST-20/1 STRUCT-TEST-20/2 - STRUCT-TEST-20/ERROR.1 STRUCT-TEST-20/ERROR.2 STRUCT-TEST-20/3 - STRUCT-TEST-20/4 STRUCT-TEST-20/5 STRUCT-TEST-20/ERROR.3 - STRUCT-TEST-20/ERROR.4 STRUCT-TEST-20/6 STRUCT-TEST-20/7 - STRUCT-TEST-20/11 STRUCT-TEST-20/13 STRUCT-TEST-20/14 - STRUCT-TEST-20/15 -Test STRUCT-TEST-20/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-20)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-20 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-20/17 STRUCT-TEST-20/15A STRUCT-TEST-20/15B - STRUCT-TEST-20/20 STRUCT-TEST-21/1 STRUCT-TEST-21/2 - STRUCT-TEST-21/ERROR.1 STRUCT-TEST-21/ERROR.2 STRUCT-TEST-21/3 - STRUCT-TEST-21/4 STRUCT-TEST-21/5 STRUCT-TEST-21/ERROR.3 - STRUCT-TEST-21/ERROR.4 STRUCT-TEST-21/6 STRUCT-TEST-21/7 - STRUCT-TEST-21/8 STRUCT-TEST-21/ERROR.5 STRUCT-TEST-21/ERROR.6 - STRUCT-TEST-21/9 STRUCT-TEST-21/11 STRUCT-TEST-21/13 STRUCT-TEST-21/14 - STRUCT-TEST-21/15 -Test STRUCT-TEST-21/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-21)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-21 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-21/17 STRUCT-TEST-21/15A STRUCT-TEST-21/15B - STRUCT-TEST-21/20 STRUCT-TEST-22/1 STRUCT-TEST-22/2 - STRUCT-TEST-22/ERROR.1 STRUCT-TEST-22/ERROR.2 STRUCT-TEST-22/3 - STRUCT-TEST-22/4 STRUCT-TEST-22/5 STRUCT-TEST-22/ERROR.3 - STRUCT-TEST-22/ERROR.4 STRUCT-TEST-22/6 STRUCT-TEST-22/7 - STRUCT-TEST-22/8 STRUCT-TEST-22/ERROR.5 STRUCT-TEST-22/ERROR.6 - STRUCT-TEST-22/9 STRUCT-TEST-22/13 STRUCT-TEST-22/14 STRUCT-TEST-22/15 -Test STRUCT-TEST-22/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-22)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-22 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-22/17 STRUCT-TEST-22/15A STRUCT-TEST-22/15B - STRUCT-TEST-22/20 STRUCT-TEST-23/1 STRUCT-TEST-23/2 - STRUCT-TEST-23/ERROR.1 STRUCT-TEST-23/ERROR.2 STRUCT-TEST-23/3 - STRUCT-TEST-23/4 STRUCT-TEST-23/5 STRUCT-TEST-23/ERROR.3 - STRUCT-TEST-23/ERROR.4 STRUCT-TEST-23/6 STRUCT-TEST-23/7 - STRUCT-TEST-23/8 STRUCT-TEST-23/ERROR.5 STRUCT-TEST-23/ERROR.6 - STRUCT-TEST-23/9 STRUCT-TEST-23/13 STRUCT-TEST-23/14 STRUCT-TEST-23/15 -Test STRUCT-TEST-23/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-23)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-23 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-23/17 STRUCT-TEST-23/15A STRUCT-TEST-23/15B - STRUCT-TEST-23/20 STRUCT-TEST-24/1 STRUCT-TEST-24/2 - STRUCT-TEST-24/ERROR.1 STRUCT-TEST-24/ERROR.2 STRUCT-TEST-24/3 - STRUCT-TEST-24/4 STRUCT-TEST-24/5 STRUCT-TEST-24/ERROR.3 - STRUCT-TEST-24/ERROR.4 STRUCT-TEST-24/6 STRUCT-TEST-24/7 - STRUCT-TEST-24/8 STRUCT-TEST-24/ERROR.5 STRUCT-TEST-24/ERROR.6 - STRUCT-TEST-24/9 STRUCT-TEST-24/13 STRUCT-TEST-24/14 STRUCT-TEST-24/15 -Test STRUCT-TEST-24/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-24)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-24 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-24/17 STRUCT-TEST-24/15A STRUCT-TEST-24/15B - STRUCT-TEST-24/20 STRUCT-TEST-25/1 STRUCT-TEST-25/2 - STRUCT-TEST-25/ERROR.1 STRUCT-TEST-25/ERROR.2 STRUCT-TEST-25/3 - STRUCT-TEST-25/4 STRUCT-TEST-25/5 STRUCT-TEST-25/ERROR.3 - STRUCT-TEST-25/ERROR.4 STRUCT-TEST-25/6 STRUCT-TEST-25/7 - STRUCT-TEST-25/8 STRUCT-TEST-25/ERROR.5 STRUCT-TEST-25/ERROR.6 - STRUCT-TEST-25/9 STRUCT-TEST-25/13 STRUCT-TEST-25/14 STRUCT-TEST-25/15 -Test STRUCT-TEST-25/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-25)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-25 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-25/17 STRUCT-TEST-25/15A STRUCT-TEST-25/15B - STRUCT-TEST-25/20 STRUCT-TEST-26/1 STRUCT-TEST-26/2 - STRUCT-TEST-26/ERROR.1 STRUCT-TEST-26/ERROR.2 STRUCT-TEST-26/3 - STRUCT-TEST-26/4 STRUCT-TEST-26/5 STRUCT-TEST-26/ERROR.3 - STRUCT-TEST-26/ERROR.4 STRUCT-TEST-26/6 STRUCT-TEST-26/7 - STRUCT-TEST-26/8 STRUCT-TEST-26/ERROR.5 STRUCT-TEST-26/ERROR.6 - STRUCT-TEST-26/9 STRUCT-TEST-26/13 STRUCT-TEST-26/14 STRUCT-TEST-26/15 -Test STRUCT-TEST-26/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-26)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-26 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-26/17 STRUCT-TEST-26/15A STRUCT-TEST-26/15B - STRUCT-TEST-26/20 STRUCT-TEST-27/1 STRUCT-TEST-27/2 - STRUCT-TEST-27/ERROR.1 STRUCT-TEST-27/ERROR.2 STRUCT-TEST-27/3 - STRUCT-TEST-27/4 STRUCT-TEST-27/5 STRUCT-TEST-27/ERROR.3 - STRUCT-TEST-27/ERROR.4 STRUCT-TEST-27/6 STRUCT-TEST-27/7 - STRUCT-TEST-27/8 STRUCT-TEST-27/ERROR.5 STRUCT-TEST-27/ERROR.6 - STRUCT-TEST-27/9 -Test STRUCT-TEST-27/12 failed -Form: (AND (NOT-MV (FBOUNDP '(SETF STRUCT-TEST-27-A27))) - (NOT-MV (FBOUNDP '(SETF STRUCT-TEST-27-B27))) T) -Expected value: T -Actual value: #. - STRUCT-TEST-27/13 STRUCT-TEST-27/14 STRUCT-TEST-27/15 -Test STRUCT-TEST-27/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-27)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-27 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-27/17 STRUCT-TEST-27/15A STRUCT-TEST-27/15B - STRUCT-TEST-27/20 STRUCT-TEST-28/1 STRUCT-TEST-28/2 - STRUCT-TEST-28/ERROR.1 STRUCT-TEST-28/ERROR.2 STRUCT-TEST-28/3 - STRUCT-TEST-28/4 STRUCT-TEST-28/5 STRUCT-TEST-28/ERROR.3 - STRUCT-TEST-28/ERROR.4 STRUCT-TEST-28/6 STRUCT-TEST-28/7 - STRUCT-TEST-28/8 STRUCT-TEST-28/ERROR.5 STRUCT-TEST-28/ERROR.6 - STRUCT-TEST-28/9 -Test STRUCT-TEST-28/12 failed -Form: (AND (NOT-MV (FBOUNDP '(SETF STRUCT-TEST-28-A28))) - (NOT-MV (FBOUNDP '(SETF STRUCT-TEST-28-B28))) T) -Expected value: T -Actual value: #. - STRUCT-TEST-28/13 STRUCT-TEST-28/14 STRUCT-TEST-28/15 -Test STRUCT-TEST-28/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-28)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-28 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-28/17 STRUCT-TEST-28/15A STRUCT-TEST-28/15B - STRUCT-TEST-28/20 STRUCT-TEST-29/1 STRUCT-TEST-29/2 - STRUCT-TEST-29/ERROR.1 STRUCT-TEST-29/ERROR.2 STRUCT-TEST-29/3 - STRUCT-TEST-29/4 STRUCT-TEST-29/5 STRUCT-TEST-29/ERROR.3 - STRUCT-TEST-29/ERROR.4 STRUCT-TEST-29/6 STRUCT-TEST-29/7 - STRUCT-TEST-29/8 STRUCT-TEST-29/ERROR.5 STRUCT-TEST-29/ERROR.6 - STRUCT-TEST-29/9 -Test STRUCT-TEST-29/12 failed -Form: (AND (NOT-MV (FBOUNDP '(SETF STRUCT-TEST-29-B29))) T) -Expected value: T -Actual value: #. - STRUCT-TEST-29/13 STRUCT-TEST-29/14 STRUCT-TEST-29/15 -Test STRUCT-TEST-29/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-29)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-29 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-29/17 STRUCT-TEST-29/15A STRUCT-TEST-29/15B - STRUCT-TEST-29/20 STRUCT-TEST-30/1 STRUCT-TEST-30/2 - STRUCT-TEST-30/ERROR.1 STRUCT-TEST-30/ERROR.2 STRUCT-TEST-30/3 - STRUCT-TEST-30/4 STRUCT-TEST-30/5 STRUCT-TEST-30/ERROR.3 - STRUCT-TEST-30/ERROR.4 STRUCT-TEST-30/6 STRUCT-TEST-30/7 - STRUCT-TEST-30/8 STRUCT-TEST-30/ERROR.5 STRUCT-TEST-30/ERROR.6 - STRUCT-TEST-30/9 STRUCT-TEST-30/13 STRUCT-TEST-30/14 STRUCT-TEST-30/15 -Test STRUCT-TEST-30/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-30)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-30 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-30/17 STRUCT-TEST-30/15A STRUCT-TEST-30/15B - STRUCT-TEST-30/20 STRUCT-TEST-31/1 STRUCT-TEST-31/2 - STRUCT-TEST-31/ERROR.1 STRUCT-TEST-31/ERROR.2 STRUCT-TEST-31/3 - STRUCT-TEST-31/4 STRUCT-TEST-31/5 STRUCT-TEST-31/ERROR.3 - STRUCT-TEST-31/ERROR.4 STRUCT-TEST-31/6 STRUCT-TEST-31/7 - STRUCT-TEST-31/8 STRUCT-TEST-31/ERROR.5 STRUCT-TEST-31/ERROR.6 - STRUCT-TEST-31/9 -Test STRUCT-TEST-31/13 failed -Form: (NOTNOT-MV - (TYPEP (MAKE-STRUCT-TEST-31) (FIND-CLASS '#:STRUCT-TEST-31))) -Expected value: T -Actual value: #. -Test STRUCT-TEST-31/14 failed -Form: (LET ((CLASS (FIND-CLASS '#:STRUCT-TEST-31))) - (NOTNOT-MV (TYPEP CLASS 'STRUCTURE-CLASS))) -Expected value: T -Actual value: #. - STRUCT-TEST-31/15 -Test STRUCT-TEST-31/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE '#:STRUCT-TEST-31)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* '#:STRUCT-TEST-31 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). -Test STRUCT-TEST-31/17 failed -Form: (LET ((CLASS (FIND-CLASS '#:STRUCT-TEST-31))) - (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST (SUBTYPEP* TYPE CLASS)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST (SUBTYPEP* CLASS TYPE)) - '(NIL T))) - COLLECT - TYPE)) -Expected value: NIL -Actual value: #. -Test STRUCT-TEST-31/15A failed -Form: (LET ((CLASS (FIND-CLASS '#:STRUCT-TEST-31))) - (NOTNOT-MV (SUBTYPEP CLASS 'STRUCTURE-OBJECT))) -Expected values: T - T -Actual value: #. - STRUCT-TEST-31/15B STRUCT-TEST-31/20 STRUCT-TEST-32/1 STRUCT-TEST-32/2 - STRUCT-TEST-32/ERROR.1 STRUCT-TEST-32/ERROR.2 STRUCT-TEST-32/3 - STRUCT-TEST-32/4 STRUCT-TEST-32/5 STRUCT-TEST-32/ERROR.3 - STRUCT-TEST-32/ERROR.4 STRUCT-TEST-32/6 STRUCT-TEST-32/7 - STRUCT-TEST-32/8 STRUCT-TEST-32/ERROR.5 STRUCT-TEST-32/ERROR.6 - STRUCT-TEST-32/9 STRUCT-TEST-32/13 STRUCT-TEST-32/14 STRUCT-TEST-32/15 -Test STRUCT-TEST-32/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-32)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-32 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-32/17 STRUCT-TEST-32/15A STRUCT-TEST-32/15B - STRUCT-TEST-32/20 STRUCT-TEST-33/1 STRUCT-TEST-33/2 - STRUCT-TEST-33/ERROR.1 STRUCT-TEST-33/ERROR.2 STRUCT-TEST-33/3 - STRUCT-TEST-33/4 STRUCT-TEST-33/5 STRUCT-TEST-33/ERROR.3 - STRUCT-TEST-33/ERROR.4 STRUCT-TEST-33/6 STRUCT-TEST-33/7 - STRUCT-TEST-33/8 STRUCT-TEST-33/ERROR.5 STRUCT-TEST-33/ERROR.6 - STRUCT-TEST-33/9 STRUCT-TEST-33/13 STRUCT-TEST-33/14 STRUCT-TEST-33/15 -Test STRUCT-TEST-33/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-33)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-33 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-33/17 STRUCT-TEST-33/15A STRUCT-TEST-33/15B - STRUCT-TEST-33/20 STRUCT-TEST-34/1 STRUCT-TEST-34/2 - STRUCT-TEST-34/ERROR.1 STRUCT-TEST-34/ERROR.2 STRUCT-TEST-34/3 - STRUCT-TEST-34/4 STRUCT-TEST-34/5 STRUCT-TEST-34/ERROR.3 - STRUCT-TEST-34/ERROR.4 STRUCT-TEST-34/6 STRUCT-TEST-34/7 - STRUCT-TEST-34/8 STRUCT-TEST-34/ERROR.5 STRUCT-TEST-34/ERROR.6 - STRUCT-TEST-34/9 STRUCT-TEST-34/13 STRUCT-TEST-34/14 STRUCT-TEST-34/15 -Test STRUCT-TEST-34/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-34)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-34 TYPE)) - '(NIL T))) - COLLECT - TYPE) -Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-34/17 STRUCT-TEST-34/15A STRUCT-TEST-34/15B - STRUCT-TEST-34/20 STRUCT-TEST-35/1 STRUCT-TEST-35/2 - STRUCT-TEST-35/ERROR.1 STRUCT-TEST-35/ERROR.2 STRUCT-TEST-35/3 - STRUCT-TEST-35/4 STRUCT-TEST-35/5 STRUCT-TEST-35/ERROR.3 - STRUCT-TEST-35/ERROR.4 STRUCT-TEST-35/6 STRUCT-TEST-35/7 - STRUCT-TEST-35/8 STRUCT-TEST-35/ERROR.5 STRUCT-TEST-35/ERROR.6 - STRUCT-TEST-35/9 STRUCT-TEST-35/13 STRUCT-TEST-35/14 STRUCT-TEST-35/15 -Test STRUCT-TEST-35/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-35)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-35 TYPE)) - '(NIL T))) - COLLECT - TYPE) + SUBTYPEP.AND.1 SUBTYPEP.OR.1 SUBTYPEP.AND.2 SUBTYPEP.OR.2 + SUBTYPEP.AND.3 SUBTYPEP.OR.3 SUBTYPEP.AND.4 SUBTYPEP.OR.4 + SUBTYPEP.NIL.1 SUBTYPEP.NIL.2 SUBTYPEP.FIXNUM-OR-BIGNUM + SUBTYPEP.FIXNUM.INTEGER +Test SUBTYPEP.BIGNUM.INTEGER failed +Form: (CHECK-EQUIVALENCE + (LIST 'OR (LIST 'INTEGER '* (LIST MOST-NEGATIVE-FIXNUM)) + (LIST 'INTEGER (LIST MOST-POSITIVE-FIXNUM) '*)) + 'BIGNUM) Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-35/17 STRUCT-TEST-35/15A STRUCT-TEST-35/15B - STRUCT-TEST-35/20 STRUCT-TEST-36/1 STRUCT-TEST-36/2 - STRUCT-TEST-36/ERROR.1 STRUCT-TEST-36/ERROR.2 STRUCT-TEST-36/3 - STRUCT-TEST-36/4 STRUCT-TEST-36/5 STRUCT-TEST-36/ERROR.3 - STRUCT-TEST-36/ERROR.4 STRUCT-TEST-36/6 STRUCT-TEST-36/7 - STRUCT-TEST-36/8 STRUCT-TEST-36/ERROR.5 STRUCT-TEST-36/ERROR.6 - STRUCT-TEST-36/9 STRUCT-TEST-36/13 STRUCT-TEST-36/14 STRUCT-TEST-36/15 -Test STRUCT-TEST-36/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-36)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-36 TYPE)) - '(NIL T))) - COLLECT - TYPE) +Actual value: (((SUBTYPEP + '(OR (INTEGER * (-9223372036854775808)) + (INTEGER (9223372036854775807) *)) + 'BIGNUM) + ==> NIL T) + ((SUBTYPEP '(NOT BIGNUM) + '(NOT (OR (INTEGER * (-9223372036854775808)) + (INTEGER (9223372036854775807) *)))) + ==> NIL T)). + SUBTYPEP.INTEGER.1 SUBTYPEP.INTEGER.2 SUBTYPEP.INTEGER.3 + SUBTYPEP.INTEGER.3A SUBTYPEP.INTEGER.3B SUBTYPEP.INTEGER.3C + SUBTYPEP.INTEGER.4 SUBTYPEP.INTEGER.4A SUBTYPEP.INTEGER.4B + SUBTYPEP.INTEGER.4C SUBTYPEP.INTEGER.5 SUBTYPEP.INTEGER.5A + SUBTYPEP.INTEGER.5B SUBTYPEP.INTEGER.5C SUBTYPEP.INTEGER.6 + SUBTYPEP.INTEGER.6A SUBTYPEP.INTEGER.6B SUBTYPEP.INTEGER.6C + SUBTYPEP.INTEGER.7 SUBTYPEP.INTEGER.7A SUBTYPEP.INTEGER.7B + SUBTYPEP.INTEGER.7C SUBTYPEP.INTEGER.8 SUBTYPEP.INTEGER.8A + SUBTYPEP.INTEGER.8B SUBTYPEP.INTEGER.8C SUBTYPEP.INTEGER.9 + SUBTYPEP.INTEGER.9A SUBTYPEP.INTEGER.9B SUBTYPEP.INTEGER.9C + SUBTYPEP.INTEGER.10 SUBTYPEP.INTEGER.10A SUBTYPEP.INTEGER.10B + SUBTYPEP.INTEGER.10C SUBTYPEP.INTEGER.11 SUBTYPEP.INTEGER.12 + SUBTYPEP.INTEGER.13 SUBTYPEP.INTEGER.14 SUBTYPEP.INTEGER.15 + SUBTYPEP.INTEGER.16 SUBTYPEP.INTEGER.17 SUBTYPEP.INTEGER.18 + SUBTYPEP.INTEGER.19 SUBTYPEP.INTEGER.20 SUBTYPEP.INTEGER.21 + SUBTYPEP.INTEGER.22 +Test SUBTYPEP.INTEGER.23 failed +Form: (CHECK-EQUIVALENCE '(INTEGER (9)) '(INTEGER 10)) Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-36/17 STRUCT-TEST-36/15A STRUCT-TEST-36/15B - STRUCT-TEST-36/20 STRUCT-TEST-37/1 STRUCT-TEST-37/5 - STRUCT-TEST-37/ERROR.3 STRUCT-TEST-37/ERROR.4 STRUCT-TEST-37/6 - STRUCT-TEST-37/7 STRUCT-TEST-37/8 STRUCT-TEST-37/ERROR.5 - STRUCT-TEST-37/ERROR.6 STRUCT-TEST-37/9 STRUCT-TEST-37/10 - STRUCTURE-37-1 STRUCT-TEST-38/1 STRUCT-TEST-38/2 - STRUCT-TEST-38/ERROR.1 STRUCT-TEST-38/ERROR.2 STRUCT-TEST-38/3 - STRUCT-TEST-38/5 STRUCT-TEST-38/ERROR.3 STRUCT-TEST-38/ERROR.4 - STRUCT-TEST-38/6 STRUCT-TEST-38/7 STRUCT-TEST-38/8 - STRUCT-TEST-38/ERROR.5 STRUCT-TEST-38/ERROR.6 STRUCT-TEST-38/9 - STRUCTURE-38-1 STRUCT-TEST-39/1 STRUCT-TEST-39/5 - STRUCT-TEST-39/ERROR.3 STRUCT-TEST-39/ERROR.4 STRUCT-TEST-39/6 - STRUCT-TEST-39/7 STRUCT-TEST-39/8 STRUCT-TEST-39/ERROR.5 - STRUCT-TEST-39/ERROR.6 STRUCT-TEST-39/9 STRUCT-TEST-39/10 - STRUCTURE-39-1 STRUCT-TEST-40/1 STRUCT-TEST-40/5 - STRUCT-TEST-40/ERROR.3 STRUCT-TEST-40/ERROR.4 STRUCT-TEST-40/6 - STRUCT-TEST-40/7 STRUCT-TEST-40/8 STRUCT-TEST-40/ERROR.5 - STRUCT-TEST-40/ERROR.6 STRUCT-TEST-40/9 STRUCT-TEST-40/10 - STRUCT-TEST-41/1 STRUCT-TEST-41/2 STRUCT-TEST-41/ERROR.1 - STRUCT-TEST-41/ERROR.2 -Test STRUCT-TEST-41/3 failed -Form: (COUNT-IF #'STRUCT-TEST-41-P *UNIVERSE*) -Expected value: 0 -Actual value: #. - STRUCT-TEST-41/5 STRUCT-TEST-41/ERROR.3 STRUCT-TEST-41/ERROR.4 - STRUCT-TEST-41/6 STRUCT-TEST-41/7 STRUCT-TEST-41/8 - STRUCT-TEST-41/ERROR.5 STRUCT-TEST-41/ERROR.6 STRUCT-TEST-41/9 - STRUCT-TEST-42/1 STRUCT-TEST-42/5 STRUCT-TEST-42/ERROR.3 - STRUCT-TEST-42/ERROR.4 STRUCT-TEST-42/6 STRUCT-TEST-42/7 - STRUCT-TEST-42/8 STRUCT-TEST-42/ERROR.5 STRUCT-TEST-42/ERROR.6 - STRUCT-TEST-42/9 STRUCT-TEST-42/10 STRUCT-TEST-43/1 STRUCT-TEST-43/2 - STRUCT-TEST-43/ERROR.1 STRUCT-TEST-43/ERROR.2 -Test STRUCT-TEST-43/3 failed -Form: (COUNT-IF #'STRUCT-TEST-43-P *UNIVERSE*) -Expected value: 0 -Actual value: #. - STRUCT-TEST-43/5 STRUCT-TEST-43/ERROR.3 STRUCT-TEST-43/ERROR.4 - STRUCT-TEST-43/6 STRUCT-TEST-43/7 STRUCT-TEST-43/8 - STRUCT-TEST-43/ERROR.5 STRUCT-TEST-43/ERROR.6 STRUCT-TEST-43/9 - STRUCT-TEST-44/1 STRUCT-TEST-44/5 STRUCT-TEST-44/ERROR.3 - STRUCT-TEST-44/ERROR.4 STRUCT-TEST-44/6 STRUCT-TEST-44/7 - STRUCT-TEST-44/8 STRUCT-TEST-44/ERROR.5 STRUCT-TEST-44/ERROR.6 - STRUCT-TEST-44/9 STRUCT-TEST-44/10 STRUCTS-ARE-DISJOINT - STRUCT-TEST-45/1 STRUCT-TEST-45/5 STRUCT-TEST-45/ERROR.3 - STRUCT-TEST-45/ERROR.4 STRUCT-TEST-45/6 STRUCT-TEST-45/7 - STRUCT-TEST-45/8 STRUCT-TEST-45/ERROR.5 STRUCT-TEST-45/ERROR.6 - STRUCT-TEST-45/9 STRUCT-TEST-45/10 STRUCTURE-45-1 STRUCT-TEST-46/1 - STRUCT-TEST-46/5 STRUCT-TEST-46/ERROR.3 STRUCT-TEST-46/ERROR.4 - STRUCT-TEST-46/6 STRUCT-TEST-46/7 STRUCT-TEST-46/8 - STRUCT-TEST-46/ERROR.5 STRUCT-TEST-46/ERROR.6 STRUCT-TEST-46/9 - STRUCT-TEST-46/10 STRUCTURE-46-1 STRUCT-TEST-47/1 STRUCT-TEST-47/5 - STRUCT-TEST-47/ERROR.3 STRUCT-TEST-47/ERROR.4 STRUCT-TEST-47/6 - STRUCT-TEST-47/7 STRUCT-TEST-47/8 STRUCT-TEST-47/ERROR.5 - STRUCT-TEST-47/ERROR.6 STRUCT-TEST-47/9 STRUCT-TEST-47/10 - STRUCTURE-47-1 STRUCT-TEST-48/1 STRUCT-TEST-48/5 - STRUCT-TEST-48/ERROR.3 STRUCT-TEST-48/ERROR.4 STRUCT-TEST-48/6 - STRUCT-TEST-48/7 STRUCT-TEST-48/8 STRUCT-TEST-48/ERROR.5 - STRUCT-TEST-48/ERROR.6 STRUCT-TEST-48/9 STRUCT-TEST-48/10 - STRUCTURE-48-1 -Test STRUCT-TEST-49/1 failed -Form: (AND (FBOUNDP 'MAKE-STRUCT-TEST-49) - (FUNCTIONP #'MAKE-STRUCT-TEST-49) - (SYMBOL-FUNCTION 'MAKE-STRUCT-TEST-49) - (TYPEP (MAKE-STRUCT-TEST-49) '(VECTOR BIT)) T) -Expected value: T -Actual value: NIL. - STRUCT-TEST-49/5 STRUCT-TEST-49/ERROR.3 STRUCT-TEST-49/ERROR.4 - STRUCT-TEST-49/6 STRUCT-TEST-49/7 STRUCT-TEST-49/8 - STRUCT-TEST-49/ERROR.5 STRUCT-TEST-49/ERROR.6 STRUCT-TEST-49/9 - STRUCT-TEST-49/10 -Test STRUCT-TEST-50/1 failed -Form: (AND (FBOUNDP 'MAKE-STRUCT-TEST-50) - (FUNCTIONP #'MAKE-STRUCT-TEST-50) - (SYMBOL-FUNCTION 'MAKE-STRUCT-TEST-50) - (TYPEP (MAKE-STRUCT-TEST-50) '(VECTOR CHARACTER)) T) -Expected value: T -Actual value: NIL. - STRUCT-TEST-50/5 STRUCT-TEST-50/ERROR.3 STRUCT-TEST-50/ERROR.4 - STRUCT-TEST-50/6 STRUCT-TEST-50/7 STRUCT-TEST-50/8 - STRUCT-TEST-50/ERROR.5 STRUCT-TEST-50/ERROR.6 STRUCT-TEST-50/9 - STRUCT-TEST-50/10 -Test STRUCT-TEST-51/1 failed -Form: (AND (FBOUNDP 'MAKE-STRUCT-TEST-51) - (FUNCTIONP #'MAKE-STRUCT-TEST-51) - (SYMBOL-FUNCTION 'MAKE-STRUCT-TEST-51) - (TYPEP (MAKE-STRUCT-TEST-51) '(VECTOR (INTEGER 0 255))) T) -Expected value: T -Actual value: NIL. - STRUCT-TEST-51/5 STRUCT-TEST-51/ERROR.3 STRUCT-TEST-51/ERROR.4 - STRUCT-TEST-51/6 STRUCT-TEST-51/7 STRUCT-TEST-51/8 - STRUCT-TEST-51/ERROR.5 STRUCT-TEST-51/ERROR.6 STRUCT-TEST-51/9 - STRUCT-TEST-51/10 STRUCT-TEST-52/1 STRUCT-TEST-52/5 - STRUCT-TEST-52/ERROR.3 STRUCT-TEST-52/ERROR.4 STRUCT-TEST-52/6 - STRUCT-TEST-52/7 STRUCT-TEST-52/8 STRUCT-TEST-52/ERROR.5 - STRUCT-TEST-52/ERROR.6 STRUCT-TEST-52/9 STRUCT-TEST-52/10 - STRUCT-TEST-53/1 STRUCT-TEST-53/5 STRUCT-TEST-53/ERROR.3 - STRUCT-TEST-53/ERROR.4 STRUCT-TEST-53/6 STRUCT-TEST-53/7 - STRUCT-TEST-53/8 STRUCT-TEST-53/ERROR.5 STRUCT-TEST-53/ERROR.6 - STRUCT-TEST-53/9 STRUCT-TEST-53/10 STRUCT-TEST-53/18 STRUCTURE-53-1 - STRUCT-TEST-54/1 STRUCT-TEST-54/5 STRUCT-TEST-54/ERROR.3 - STRUCT-TEST-54/ERROR.4 STRUCT-TEST-54/6 STRUCT-TEST-54/7 - STRUCT-TEST-54/8 STRUCT-TEST-54/ERROR.5 STRUCT-TEST-54/ERROR.6 - STRUCT-TEST-54/9 STRUCT-TEST-54/10 STRUCT-TEST-54/18 STRUCTURE-54-1 - STRUCT-TEST-55/1 STRUCT-TEST-55/2 STRUCT-TEST-55/ERROR.1 - STRUCT-TEST-55/ERROR.2 STRUCT-TEST-55/3 STRUCT-TEST-55/5 - STRUCT-TEST-55/ERROR.3 STRUCT-TEST-55/ERROR.4 STRUCT-TEST-55/6 - STRUCT-TEST-55/7 STRUCT-TEST-55/8 STRUCT-TEST-55/ERROR.5 - STRUCT-TEST-55/ERROR.6 STRUCT-TEST-55/9 STRUCTURE-55-1 - STRUCT-TEST-56/1 STRUCT-TEST-56/2 STRUCT-TEST-56/ERROR.1 - STRUCT-TEST-56/ERROR.2 STRUCT-TEST-56/3 STRUCT-TEST-56/5 - STRUCT-TEST-56/ERROR.3 STRUCT-TEST-56/ERROR.4 STRUCT-TEST-56/6 - STRUCT-TEST-56/7 STRUCT-TEST-56/8 STRUCT-TEST-56/ERROR.5 - STRUCT-TEST-56/ERROR.6 STRUCT-TEST-56/9 STRUCTURE-56-1 - STRUCT-TEST-57/1 STRUCT-TEST-57/2 STRUCT-TEST-57/ERROR.1 - STRUCT-TEST-57/ERROR.2 STRUCT-TEST-57/3 STRUCT-TEST-57/4 - STRUCT-TEST-57/5 STRUCT-TEST-57/ERROR.3 STRUCT-TEST-57/ERROR.4 - STRUCT-TEST-57/6 STRUCT-TEST-57/7 STRUCT-TEST-57/8 - STRUCT-TEST-57/ERROR.5 STRUCT-TEST-57/ERROR.6 STRUCT-TEST-57/9 - STRUCT-TEST-57/13 STRUCT-TEST-57/14 STRUCT-TEST-57/15 -Test STRUCT-TEST-57/16 failed -Form: (LOOP - FOR - TYPE - IN - *DISJOINT-TYPES-LIST* - UNLESS - (AND (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* TYPE 'STRUCT-TEST-57)) - '(NIL T)) - (EQUALT (MULTIPLE-VALUE-LIST - (SUBTYPEP* 'STRUCT-TEST-57 TYPE)) - '(NIL T))) - COLLECT - TYPE) +Actual value: (((SUBTYPEP '(INTEGER (9)) '(INTEGER 10)) ==> NIL T) + ((SUBTYPEP '(NOT (INTEGER 10)) '(NOT (INTEGER (9)))) ==> + NIL T)). +Test SUBTYPEP.INTEGER.24 failed +Form: (CHECK-EQUIVALENCE '(INTEGER * (11)) '(INTEGER * 10)) Expected value: NIL -Actual value: (CONDITION). - STRUCT-TEST-57/17 STRUCT-TEST-57/15A STRUCT-TEST-57/15B - STRUCT-TEST-57/20 STRUCT-TEST-58/1 STRUCT-TEST-58/2 - STRUCT-TEST-58/ERROR.1 STRUCT-TEST-58/ERROR.2 STRUCT-TEST-58/3 - STRUCT-TEST-58/4 STRUCT-TEST-58/5 STRUCT-TEST-58/ERROR.3 +Actual value: (((SUBTYPEP '(INTEGER * (11)) '(INTEGER * 10)) ==> NIL T) + ((SUBTYPEP '(NOT (INTEGER * 10)) + '(NOT (INTEGER * (11)))) + ==> NIL T)). + SUBTYPEP.INTEGER.25 SUBTYPEP.INTEGER.26 SUBTYPEP.INTEGER.27 + SUBTYPEP.INTEGER.28 SUBTYPEP.INTEGER.29 SUBTYPEP.INTEGER.30 + SUBTYPEP.INTEGER.REAL.1 SUBTYPEP.INTEGER.REAL.2 + SUBTYPEP.INTEGER.REAL.3 SUBTYPEP.INTEGER.REAL.4 + SUBTYPEP.INTEGER.REAL.5 SUBTYPEP.INTEGER.REAL.6 + SUBTYPEP.INTEGER.REAL.7 SUBTYPEP.INTEGER.REAL.8 + SUBTYPEP.INTEGER.REAL.9 SUBTYPEP.INTEGER.REAL.10 + SUBTYPEP.INTEGER.REAL.11 SUBTYPEP.INTEGER.RATIONAL.1 + SUBTYPEP.INTEGER.RATIONAL.2 SUBTYPEP.INTEGER.RATIONAL.3 STRUCT-TEST-58/ERROR.4 STRUCT-TEST-58/6 STRUCT-TEST-58/7 STRUCT-TEST-58/8 STRUCT-TEST-58/ERROR.5 STRUCT-TEST-58/ERROR.6 STRUCT-TEST-58/9 STRUCT-TEST-58/13 STRUCT-TEST-58/14 STRUCT-TEST-58/15 @@ -28528,17 +28620,17 @@ '(NOT STRUCTURE-OBJECT)) ==> NIL T) ((SUBTYPEP 'ARITHMETIC-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'ARITHMETIC-ERROR) ==> NIL T) ((SUBTYPEP '(NOT ARITHMETIC-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT ARITHMETIC-ERROR)) ==> NIL T) ((SUBTYPEP 'SYMBOL @@ -28555,17 +28647,17 @@ '(NOT SYMBOL)) ==> NIL T) ((SUBTYPEP 'CONTROL-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'CONTROL-ERROR) ==> NIL T) ((SUBTYPEP '(NOT CONTROL-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT CONTROL-ERROR)) ==> NIL T) ((SUBTYPEP 'CLASS @@ -28634,17 +28726,17 @@ '(NOT ARRAY)) ==> NIL T) ((SUBTYPEP 'FLOATING-POINT-INEXACT - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'FLOATING-POINT-INEXACT) ==> NIL T) ((SUBTYPEP '(NOT FLOATING-POINT-INEXACT) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT FLOATING-POINT-INEXACT)) ==> NIL T) ((SUBTYPEP 'NUMBER @@ -28673,31 +28765,31 @@ '(NOT #) '(NOT NULL)) ==> NIL T) ((SUBTYPEP 'FLOATING-POINT-UNDERFLOW - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'FLOATING-POINT-UNDERFLOW) ==> NIL T) ((SUBTYPEP '(NOT FLOATING-POINT-UNDERFLOW) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT FLOATING-POINT-UNDERFLOW)) ==> NIL T) ((SUBTYPEP 'FLOATING-POINT-OVERFLOW - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'FLOATING-POINT-OVERFLOW) ==> NIL T) ((SUBTYPEP '(NOT FLOATING-POINT-OVERFLOW) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT FLOATING-POINT-OVERFLOW)) ==> NIL T) ((SUBTYPEP 'RATIONAL @@ -28783,16 +28875,16 @@ '(NOT UNBOUND-SLOT)) ==> NIL T) ((SUBTYPEP 'ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # 'ERROR) + # 'ERROR) ==> NIL T) ((SUBTYPEP '(NOT ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT ERROR)) ==> NIL T) ((SUBTYPEP 'STANDARD-GENERIC-FUNCTION @@ -28823,17 +28915,17 @@ '(NOT CHARACTER)) ==> NIL T) ((SUBTYPEP 'DIVISION-BY-ZERO - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'DIVISION-BY-ZERO) ==> NIL T) ((SUBTYPEP '(NOT DIVISION-BY-ZERO) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT DIVISION-BY-ZERO)) ==> NIL T) ((SUBTYPEP 'SEQUENCE @@ -28850,45 +28942,45 @@ '(NOT SEQUENCE)) ==> NIL T) ((SUBTYPEP 'PRINT-NOT-READABLE - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'PRINT-NOT-READABLE) ==> NIL T) ((SUBTYPEP '(NOT PRINT-NOT-READABLE) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT PRINT-NOT-READABLE)) ==> NIL T) ((SUBTYPEP 'UNDEFINED-FUNCTION - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'UNDEFINED-FUNCTION) ==> NIL T) ((SUBTYPEP '(NOT UNDEFINED-FUNCTION) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT UNDEFINED-FUNCTION)) ==> NIL T) ((SUBTYPEP 'END-OF-FILE - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'END-OF-FILE) ==> NIL T) ((SUBTYPEP '(NOT END-OF-FILE) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT END-OF-FILE)) ==> NIL T) ((SUBTYPEP 'INTEGER @@ -28931,31 +29023,31 @@ '(NOT BIT-VECTOR)) ==> NIL T) ((SUBTYPEP 'STYLE-WARNING - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'STYLE-WARNING) ==> NIL T) ((SUBTYPEP '(NOT STYLE-WARNING) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT STYLE-WARNING)) ==> NIL T) ((SUBTYPEP 'SIMPLE-TYPE-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'SIMPLE-TYPE-ERROR) ==> NIL T) ((SUBTYPEP '(NOT SIMPLE-TYPE-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT SIMPLE-TYPE-ERROR)) ==> NIL T) ((SUBTYPEP 'CELL-ERROR @@ -28972,42 +29064,42 @@ '(NOT CELL-ERROR)) ==> NIL T) ((SUBTYPEP 'FILE-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # 'FILE-ERROR) + # 'FILE-ERROR) ==> NIL T) ((SUBTYPEP '(NOT FILE-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT FILE-ERROR)) ==> NIL T) ((SUBTYPEP 'RESTART - #) + #) ==> NIL T) ((SUBTYPEP - # 'RESTART) + # 'RESTART) ==> NIL T) ((SUBTYPEP '(NOT RESTART) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT RESTART)) ==> NIL T) ((SUBTYPEP 'TYPE-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # 'TYPE-ERROR) + # 'TYPE-ERROR) ==> NIL T) ((SUBTYPEP '(NOT TYPE-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT TYPE-ERROR)) ==> NIL T) ((SUBTYPEP 'LIST @@ -29069,17 +29161,17 @@ '(NOT #) '(NOT CONS)) ==> NIL T) ((SUBTYPEP 'SIMPLE-CONDITION - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'SIMPLE-CONDITION) ==> NIL T) ((SUBTYPEP '(NOT SIMPLE-CONDITION) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT SIMPLE-CONDITION)) ==> NIL T) ((SUBTYPEP 'SIMPLE-WARNING @@ -29111,17 +29203,17 @@ '(NOT PACKAGE-ERROR)) ==> NIL T) ((SUBTYPEP 'PARSE-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'PARSE-ERROR) ==> NIL T) ((SUBTYPEP '(NOT PARSE-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT PARSE-ERROR)) ==> NIL T) ((SUBTYPEP 'WARNING @@ -29138,45 +29230,45 @@ '(NOT WARNING)) ==> NIL T) ((SUBTYPEP 'STORAGE-CONDITION - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'STORAGE-CONDITION) ==> NIL T) ((SUBTYPEP '(NOT STORAGE-CONDITION) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT STORAGE-CONDITION)) ==> NIL T) ((SUBTYPEP 'FLOATING-POINT-INVALID-OPERATION - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'FLOATING-POINT-INVALID-OPERATION) ==> NIL T) ((SUBTYPEP '(NOT FLOATING-POINT-INVALID-OPERATION) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT FLOATING-POINT-INVALID-OPERATION)) ==> NIL T) ((SUBTYPEP 'PROGRAM-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'PROGRAM-ERROR) ==> NIL T) ((SUBTYPEP '(NOT PROGRAM-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT PROGRAM-ERROR)) ==> NIL T) ((SUBTYPEP 'METHOD @@ -29221,45 +29313,45 @@ '(NOT GENERIC-FUNCTION)) ==> NIL T) ((SUBTYPEP 'STREAM-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'STREAM-ERROR) ==> NIL T) ((SUBTYPEP '(NOT STREAM-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT STREAM-ERROR)) ==> NIL T) ((SUBTYPEP 'SERIOUS-CONDITION - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'SERIOUS-CONDITION) ==> NIL T) ((SUBTYPEP '(NOT SERIOUS-CONDITION) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT SERIOUS-CONDITION)) ==> NIL T) ((SUBTYPEP 'READER-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'READER-ERROR) ==> NIL T) ((SUBTYPEP '(NOT READER-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT READER-ERROR)) ==> NIL T) ((SUBTYPEP 'REAL @@ -29288,30 +29380,30 @@ '(NOT VECTOR)) ==> NIL T) ((SUBTYPEP 'CONDITION - #) + #) ==> NIL T) ((SUBTYPEP - # 'CONDITION) + # 'CONDITION) ==> NIL T) ((SUBTYPEP '(NOT CONDITION) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT CONDITION)) ==> NIL T) ((SUBTYPEP 'UNBOUND-VARIABLE - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'UNBOUND-VARIABLE) ==> NIL T) ((SUBTYPEP '(NOT UNBOUND-VARIABLE) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT UNBOUND-VARIABLE)) ==> NIL T)). Test ALL-STANDARD-CLASSES-ARE-SUBTYPES-OF-STANDARD-OBJECT failed @@ -29935,146 +30027,6 @@ MAKE-PATHNAME.REBUILD MAKE-PATHNAME-ERROR-ABSOLUTE-UP MAKE-PATHNAME-ERROR-ABSOLUTE-BACK MAKE-PATHNAME-ERROR-ABSOLUTE-WILD-INFERIORS-UP - MAKE-PATHNAME-ERROR-RELATIVE-WILD-INFERIORS-UP - MAKE-PATHNAME-ERROR-ABSOLUTE-WILD-INFERIORS-BACK - MAKE-PATHNAME-ERROR-RELATIVE-WILD-INFERIORS-BACK PATHNAME-HOST.1 - PATHNAME-HOST.2 PATHNAME-HOST.3 PATHNAME-HOST.4 PATHNAME-HOST.5 - PATHNAME-HOST.6 PATHNAME-HOST.7 PATHNAME-HOST.8 PATHNAME-HOST.ERROR.1 - PATHNAME-HOST.ERROR.2 PATHNAME-HOST.ERROR.3 PATHNAME-DEVICE.1 - PATHNAME-DEVICE.2 PATHNAME-DEVICE.3 PATHNAME-DEVICE.4 - PATHNAME-DEVICE.5 PATHNAME-DEVICE.6 PATHNAME-DEVICE.7 - PATHNAME-DEVICE.8 PATHNAME-DEVICE.ERROR.1 PATHNAME-DEVICE.ERROR.2 - PATHNAME-DIRECTORY.1 PATHNAME-DIRECTORY.2 PATHNAME-DIRECTORY.3 - PATHNAME-DIRECTORY.4 PATHNAME-DIRECTORY.5 PATHNAME-DIRECTORY.6 - PATHNAME-DIRECTORY.7 PATHNAME-DIRECTORY.8 PATHNAME-DIRECTORY.ERROR.1 - PATHNAME-DIRECTORY.ERROR.2 PATHNAME-NAME.1 PATHNAME-NAME.2 - PATHNAME-NAME.3 PATHNAME-NAME.4 PATHNAME-NAME.5 PATHNAME-NAME.6 - PATHNAME-NAME.7 PATHNAME-NAME.8 PATHNAME-NAME.ERROR.1 - PATHNAME-NAME.ERROR.2 PATHNAME-TYPE.1 PATHNAME-TYPE.2 PATHNAME-TYPE.3 - PATHNAME-TYPE.4 PATHNAME-TYPE.5 PATHNAME-TYPE.6 PATHNAME-TYPE.7 - PATHNAME-TYPE.8 PATHNAME-TYPE.ERROR.1 PATHNAME-TYPE.ERROR.2 - PATHNAME-VERSION.1 PATHNAME-VERSION.2 PATHNAME-VERSION.3 - PATHNAME-VERSION.ERROR.1 PATHNAME-VERSION.ERROR.2 - PATHNAME-VERSION.ERROR.3 LOAD-LOGICAL-PATHNAME-TRANSLATIONS.1 - LOAD-LOGICAL-PATHNAME-TRANSLATIONS.ERROR.1 - LOAD-LOGICAL-PATHNAME-TRANSLATIONS.ERROR.2 - LOAD-LOGICAL-PATHNAME-TRANSLATIONS.ERROR.3 LOGICAL-PATHNAME.1 - LOGICAL-PATHNAME.2 LOGICAL-PATHNAME.3 LOGICAL-PATHNAME.ERROR.1 - LOGICAL-PATHNAME.ERROR.2 LOGICAL-PATHNAME.ERROR.3 - LOGICAL-PATHNAME.ERROR.4 LOGICAL-PATHNAME.ERROR.5 - LOGICAL-PATHNAME.ERROR.6 LOGICAL-PATHNAME.ERROR.7 - LOGICAL-PATHNAME.ERROR.8 LOGICAL-PATHNAME.ERROR.9 - LOGICAL-PATHNAME.ERROR.10 TRANSLATE-LOGICAL-PATHNAME.1 - TRANSLATE-LOGICAL-PATHNAME.2 TRANSLATE-LOGICAL-PATHNAME.3 - TRANSLATE-LOGICAL-PATHNAME.4 TRANSLATE-LOGICAL-PATHNAME.ERROR.1 - NAMESTRING.1 NAMESTRING.2 NAMESTRING.ERROR.1 NAMESTRING.ERROR.2 - FILE-NAMESTRING.1 FILE-NAMESTRING.2 FILE-NAMESTRING.3 - FILE-NAMESTRING.ERROR.1 FILE-NAMESTRING.ERROR.2 DIRECTORY-NAMESTRING.1 - DIRECTORY-NAMESTRING.2 DIRECTORY-NAMESTRING.3 - DIRECTORY-NAMESTRING.ERROR.1 DIRECTORY-NAMESTRING.ERROR.2 - HOST-NAMESTRING.1 HOST-NAMESTRING.2 HOST-NAMESTRING.3 - HOST-NAMESTRING.ERROR.1 HOST-NAMESTRING.ERROR.2 ENOUGH-NAMESTRING.1 - ENOUGH-NAMESTRING.2 ENOUGH-NAMESTRING.3 ENOUGH-NAMESTRING.4 - ENOUGH-NAMESTRING.5 ENOUGH-NAMESTRING.6 ENOUGH-NAMESTRING.7 - ENOUGH-NAMESTRING.ERROR.1 ENOUGH-NAMESTRING.ERROR.2 WILD-PATHNAME-P.1 - WILD-PATHNAME-P.2 WILD-PATHNAME-P.3 WILD-PATHNAME-P.4 - WILD-PATHNAME-P.5 WILD-PATHNAME-P.6 WILD-PATHNAME-P.7 - WILD-PATHNAME-P.8 WILD-PATHNAME-P.9 WILD-PATHNAME-P.10 - WILD-PATHNAME-P.11 WILD-PATHNAME-P.12 WILD-PATHNAME-P.13 - WILD-PATHNAME-P.14 WILD-PATHNAME-P.15 WILD-PATHNAME-P.16 - WILD-PATHNAME-P.17 WILD-PATHNAME-P.18 WILD-PATHNAME-P.19 - WILD-PATHNAME-P.20 WILD-PATHNAME-P.21 WILD-PATHNAME-P.22 - WILD-PATHNAME-P.23 WILD-PATHNAME-P.24 WILD-PATHNAME-P.25 - WILD-PATHNAME-P.26 WILD-PATHNAME-P.27 WILD-PATHNAME-P.28 - WILD-PATHNAME-P.29 WILD-PATHNAME-P.30 WILD-PATHNAME-P.31 - WILD-PATHNAME-P.32 WILD-PATHNAME-P.ERROR.1 WILD-PATHNAME-P.ERROR.2 - WILD-PATHNAME-P.ERROR.3 WILD-PATHNAME-P.ERROR.4 MERGE-PATHNAMES.1 - MERGE-PATHNAMES.2 MERGE-PATHNAMES.3 MERGE-PATHNAMES.4 - MERGE-PATHNAMES.5 MERGE-PATHNAMES.6 MERGE-PATHNAMES.7 - PATHNAME-MATCH-P.1 PATHNAME-MATCH-P.2 PATHNAME-MATCH-P.3 - PATHNAME-MATCH-P.4 PATHNAME-MATCH-P.5 PATHNAME-MATCH-P.6 - PATHNAME-MATCH-P.7 PATHNAME-MATCH-P.8 PATHNAME-MATCH-P.ERROR.1 - PATHNAME-MATCH-P.ERROR.2 PATHNAME-MATCH-P.ERROR.3 - PATHNAME-MATCH-P.ERROR.4 PATHNAME-MATCH-P.ERROR.5 - PATHNAME-MATCH-P.ERROR.6 PATHNAME-MATCH-P.ERROR.7 PARSE-NAMESTRING.1 - PARSE-NAMESTRING.2 PARSE-NAMESTRING.3 PARSE-NAMESTRING.4 - PARSE-NAMESTRING.ERROR.1 PARSE-NAME-STRING.ERROR.2 - PARSE-NAME-STRING.ERROR.3 DIRECTORY.1 DIRECTORY.2 DIRECTORY.3 - DIRECTORY.4 DIRECTORY.5 DIRECTORY.6 DIRECTORY.7 DIRECTORY.8 - DIRECTORY.9 DIRECTORY.ERROR.1 PROBE-FILE.1 PROBE-FILE.2 PROBE-FILE.3 - PROBE-FILE.4 PROBE-FILE.5 PROBE-FILE.ERROR.1 PROBE-FILE.ERROR.2 - PROBE-FILE.ERROR.3 PROBE-FILE.ERROR.4 ENSURE-DIRECTORIES-EXIST.1 - ENSURE-DIRECTORIES-EXIST.2 ENSURE-DIRECTORIES-EXIST.3 - ENSURE-DIRECTORIES-EXIST.4 ENSURE-DIRECTORIES-EXIST.5 - ENSURE-DIRECTORIES-EXIST.6 ENSURE-DIRECTORIES-EXIST.7 - ENSURE-DIRECTORIES-EXIST.8 ENSURE-DIRECTORIES-EXIST.9 - ENSURE-DIRECTORIES-EXIST.ERROR.1 ENSURE-DIRECTORIES-EXIST.ERROR.2 - TRUENAME.1 TRUENAME.2 TRUENAME.3 TRUENAME.4 TRUENAME.5 TRUENAME.6 - TRUENAME.ERROR.1 TRUENAME.ERROR.2 TRUENAME.ERROR.3 TRUENAME.ERROR.4 - TRUENAME.ERROR.5 TRUENAME.ERROR.6 FILE-AUTHOR.1 FILE-AUTHOR.2 - FILE-AUTHOR.3 FILE-AUTHOR.4 FILE-AUTHOR.5 FILE-AUTHOR.6 FILE-AUTHOR.7 - FILE-AUTHOR.ERROR.1 FILE-AUTHOR.ERROR.2 FILE-AUTHOR.ERROR.3 - FILE-AUTHOR.ERROR.4 FILE-WRITE-DATE.1 FILE-WRITE-DATE.2 - FILE-WRITE-DATE.3 FILE-WRITE-DATE.4 FILE-WRITE-DATE.5 - FILE-WRITE-DATE.6 FILE-WRITE-DATE.ERROR.1 FILE-WRITE-DATE.ERROR.2 - FILE-WRITE-DATE.ERROR.3 FILE-WRITE-DATE.ERROR.4 RENAME-FILE.1 - RENAME-FILE.2 RENAME-FILE.3 RENAME-FILE.4 SUBTYPEP.OR.1 SUBTYPEP.AND.2 SUBTYPEP.OR.2 - SUBTYPEP.AND.3 SUBTYPEP.OR.3 SUBTYPEP.AND.4 SUBTYPEP.OR.4 - SUBTYPEP.NIL.1 SUBTYPEP.NIL.2 SUBTYPEP.FIXNUM-OR-BIGNUM - SUBTYPEP.FIXNUM.INTEGER -Test SUBTYPEP.BIGNUM.INTEGER failed -Form: (CHECK-EQUIVALENCE - (LIST 'OR (LIST 'INTEGER '* (LIST MOST-NEGATIVE-FIXNUM)) - (LIST 'INTEGER (LIST MOST-POSITIVE-FIXNUM) '*)) - 'BIGNUM) -Expected value: NIL -Actual value: (((SUBTYPEP - '(OR (INTEGER * (-9223372036854775808)) - (INTEGER (9223372036854775807) *)) - 'BIGNUM) - ==> NIL T) - ((SUBTYPEP '(NOT BIGNUM) - '(NOT (OR (INTEGER * (-9223372036854775808)) - (INTEGER (9223372036854775807) *)))) - ==> NIL T)). - SUBTYPEP.INTEGER.1 SUBTYPEP.INTEGER.2 SUBTYPEP.INTEGER.3 - SUBTYPEP.INTEGER.3A SUBTYPEP.INTEGER.3B SUBTYPEP.INTEGER.3C - SUBTYPEP.INTEGER.4 SUBTYPEP.INTEGER.4A SUBTYPEP.INTEGER.4B - SUBTYPEP.INTEGER.4C SUBTYPEP.INTEGER.5 SUBTYPEP.INTEGER.5A - SUBTYPEP.INTEGER.5B SUBTYPEP.INTEGER.5C SUBTYPEP.INTEGER.6 - SUBTYPEP.INTEGER.6A SUBTYPEP.INTEGER.6B SUBTYPEP.INTEGER.6C - SUBTYPEP.INTEGER.7 SUBTYPEP.INTEGER.7A SUBTYPEP.INTEGER.7B - SUBTYPEP.INTEGER.7C SUBTYPEP.INTEGER.8 SUBTYPEP.INTEGER.8A - SUBTYPEP.INTEGER.8B SUBTYPEP.INTEGER.8C SUBTYPEP.INTEGER.9 - SUBTYPEP.INTEGER.9A SUBTYPEP.INTEGER.9B SUBTYPEP.INTEGER.9C - SUBTYPEP.INTEGER.10 SUBTYPEP.INTEGER.10A SUBTYPEP.INTEGER.10B - SUBTYPEP.INTEGER.10C SUBTYPEP.INTEGER.11 SUBTYPEP.INTEGER.12 - SUBTYPEP.INTEGER.13 SUBTYPEP.INTEGER.14 SUBTYPEP.INTEGER.15 - SUBTYPEP.INTEGER.16 SUBTYPEP.INTEGER.17 SUBTYPEP.INTEGER.18 - SUBTYPEP.INTEGER.19 SUBTYPEP.INTEGER.20 SUBTYPEP.INTEGER.21 - SUBTYPEP.INTEGER.22 -Test SUBTYPEP.INTEGER.23 failed -Form: (CHECK-EQUIVALENCE '(INTEGER (9)) '(INTEGER 10)) -Expected value: NIL -Actual value: (((SUBTYPEP '(INTEGER (9)) '(INTEGER 10)) ==> NIL T) - ((SUBTYPEP '(NOT (INTEGER 10)) '(NOT (INTEGER (9)))) ==> - NIL T)). -Test SUBTYPEP.INTEGER.24 failed -Form: (CHECK-EQUIVALENCE '(INTEGER * (11)) '(INTEGER * 10)) -Expected value: NIL -Actual value: (((SUBTYPEP '(INTEGER * (11)) '(INTEGER * 10)) ==> NIL T) - ((SUBTYPEP '(NOT (INTEGER * 10)) - '(NOT (INTEGER * (11)))) - ==> NIL T)). - SUBTYPEP.INTEGER.25 SUBTYPEP.INTEGER.26 SUBTYPEP.INTEGER.27 - SUBTYPEP.INTEGER.28 SUBTYPEP.INTEGER.29 SUBTYPEP.INTEGER.30 - SUBTYPEP.INTEGER.REAL.1 SUBTYPEP.INTEGER.REAL.2 - SUBTYPEP.INTEGER.REAL.3 SUBTYPEP.INTEGER.REAL.4 - SUBTYPEP.INTEGER.REAL.5 SUBTYPEP.INTEGER.REAL.6 - SUBTYPEP.INTEGER.REAL.7 SUBTYPEP.INTEGER.REAL.8 - SUBTYPEP.INTEGER.REAL.9 SUBTYPEP.INTEGER.REAL.10 - SUBTYPEP.INTEGER.REAL.11 SUBTYPEP.INTEGER.RATIONAL.1 - SUBTYPEP.INTEGER.RATIONAL.2 SUBTYPEP.INTEGER.RATIONAL.3 SUBTYPEP.INTEGER.RATIONAL.4 SUBTYPEP.INTEGER.RATIONAL.5 SUBTYPEP.INTEGER.RATIONAL.6 SUBTYPEP.INTEGER.RATIONAL.7 SUBTYPEP.INTEGER.RATIONAL.8 SUBTYPEP.INTEGER.RATIONAL.9 @@ -30529,7 +30481,107 @@ FILE-WRITE-DATE.3 FILE-WRITE-DATE.4 FILE-WRITE-DATE.5 FILE-WRITE-DATE.6 FILE-WRITE-DATE.ERROR.1 FILE-WRITE-DATE.ERROR.2 FILE-WRITE-DATE.ERROR.3 FILE-WRITE-DATE.ERROR.4 RENAME-FILE.1 - RENAME-FILE.2 RENAME-FILE.3 RENAME-FILE.4 RENAME-FILE.5 RENAME-FILE.6 + RENAME-FILE.2 RENAME-FILE.3 RENAME-FILE.4 + MAKE-PATHNAME-ERROR-RELATIVE-WILD-INFERIORS-UP + MAKE-PATHNAME-ERROR-ABSOLUTE-WILD-INFERIORS-BACK + MAKE-PATHNAME-ERROR-RELATIVE-WILD-INFERIORS-BACK PATHNAME-HOST.1 + PATHNAME-HOST.2 PATHNAME-HOST.3 PATHNAME-HOST.4 PATHNAME-HOST.5 + PATHNAME-HOST.6 PATHNAME-HOST.7 PATHNAME-HOST.8 PATHNAME-HOST.ERROR.1 + PATHNAME-HOST.ERROR.2 PATHNAME-HOST.ERROR.3 PATHNAME-DEVICE.1 + PATHNAME-DEVICE.2 PATHNAME-DEVICE.3 PATHNAME-DEVICE.4 + PATHNAME-DEVICE.5 PATHNAME-DEVICE.6 PATHNAME-DEVICE.7 + PATHNAME-DEVICE.8 PATHNAME-DEVICE.ERROR.1 PATHNAME-DEVICE.ERROR.2 + PATHNAME-DIRECTORY.1 PATHNAME-DIRECTORY.2 PATHNAME-DIRECTORY.3 + PATHNAME-DIRECTORY.4 PATHNAME-DIRECTORY.5 PATHNAME-DIRECTORY.6 + PATHNAME-DIRECTORY.7 PATHNAME-DIRECTORY.8 PATHNAME-DIRECTORY.ERROR.1 + PATHNAME-DIRECTORY.ERROR.2 PATHNAME-NAME.1 PATHNAME-NAME.2 + PATHNAME-NAME.3 PATHNAME-NAME.4 PATHNAME-NAME.5 PATHNAME-NAME.6 + PATHNAME-NAME.7 PATHNAME-NAME.8 PATHNAME-NAME.ERROR.1 + PATHNAME-NAME.ERROR.2 PATHNAME-TYPE.1 PATHNAME-TYPE.2 PATHNAME-TYPE.3 + PATHNAME-TYPE.4 PATHNAME-TYPE.5 PATHNAME-TYPE.6 PATHNAME-TYPE.7 + PATHNAME-TYPE.8 PATHNAME-TYPE.ERROR.1 PATHNAME-TYPE.ERROR.2 + PATHNAME-VERSION.1 PATHNAME-VERSION.2 PATHNAME-VERSION.3 + PATHNAME-VERSION.ERROR.1 PATHNAME-VERSION.ERROR.2 + PATHNAME-VERSION.ERROR.3 LOAD-LOGICAL-PATHNAME-TRANSLATIONS.1 + LOAD-LOGICAL-PATHNAME-TRANSLATIONS.ERROR.1 + LOAD-LOGICAL-PATHNAME-TRANSLATIONS.ERROR.2 + LOAD-LOGICAL-PATHNAME-TRANSLATIONS.ERROR.3 LOGICAL-PATHNAME.1 + LOGICAL-PATHNAME.2 LOGICAL-PATHNAME.3 LOGICAL-PATHNAME.ERROR.1 + LOGICAL-PATHNAME.ERROR.2 LOGICAL-PATHNAME.ERROR.3 + LOGICAL-PATHNAME.ERROR.4 LOGICAL-PATHNAME.ERROR.5 + LOGICAL-PATHNAME.ERROR.6 LOGICAL-PATHNAME.ERROR.7 + LOGICAL-PATHNAME.ERROR.8 LOGICAL-PATHNAME.ERROR.9 + LOGICAL-PATHNAME.ERROR.10 TRANSLATE-LOGICAL-PATHNAME.1 + TRANSLATE-LOGICAL-PATHNAME.2 TRANSLATE-LOGICAL-PATHNAME.3 + TRANSLATE-LOGICAL-PATHNAME.4 TRANSLATE-LOGICAL-PATHNAME.ERROR.1 + NAMESTRING.1 NAMESTRING.2 NAMESTRING.ERROR.1 NAMESTRING.ERROR.2 + FILE-NAMESTRING.1 FILE-NAMESTRING.2 FILE-NAMESTRING.3 + FILE-NAMESTRING.ERROR.1 FILE-NAMESTRING.ERROR.2 DIRECTORY-NAMESTRING.1 + DIRECTORY-NAMESTRING.2 DIRECTORY-NAMESTRING.3 + DIRECTORY-NAMESTRING.ERROR.1 DIRECTORY-NAMESTRING.ERROR.2 + HOST-NAMESTRING.1 HOST-NAMESTRING.2 HOST-NAMESTRING.3 + HOST-NAMESTRING.ERROR.1 HOST-NAMESTRING.ERROR.2 ENOUGH-NAMESTRING.1 + ENOUGH-NAMESTRING.2 ENOUGH-NAMESTRING.3 ENOUGH-NAMESTRING.4 + ENOUGH-NAMESTRING.5 ENOUGH-NAMESTRING.6 ENOUGH-NAMESTRING.7 + ENOUGH-NAMESTRING.ERROR.1 ENOUGH-NAMESTRING.ERROR.2 WILD-PATHNAME-P.1 + WILD-PATHNAME-P.2 WILD-PATHNAME-P.3 WILD-PATHNAME-P.4 + WILD-PATHNAME-P.5 WILD-PATHNAME-P.6 WILD-PATHNAME-P.7 + WILD-PATHNAME-P.8 WILD-PATHNAME-P.9 WILD-PATHNAME-P.10 + WILD-PATHNAME-P.11 WILD-PATHNAME-P.12 WILD-PATHNAME-P.13 + WILD-PATHNAME-P.14 WILD-PATHNAME-P.15 WILD-PATHNAME-P.16 + WILD-PATHNAME-P.17 WILD-PATHNAME-P.18 WILD-PATHNAME-P.19 + WILD-PATHNAME-P.20 WILD-PATHNAME-P.21 WILD-PATHNAME-P.22 + WILD-PATHNAME-P.23 WILD-PATHNAME-P.24 WILD-PATHNAME-P.25 + WILD-PATHNAME-P.26 WILD-PATHNAME-P.27 WILD-PATHNAME-P.28 + WILD-PATHNAME-P.29 WILD-PATHNAME-P.30 WILD-PATHNAME-P.31 + WILD-PATHNAME-P.32 WILD-PATHNAME-P.ERROR.1 WILD-PATHNAME-P.ERROR.2 + WILD-PATHNAME-P.ERROR.3 WILD-PATHNAME-P.ERROR.4 MERGE-PATHNAMES.1 + MERGE-PATHNAMES.2 MERGE-PATHNAMES.3 MERGE-PATHNAMES.4 + MERGE-PATHNAMES.5 MERGE-PATHNAMES.6 MERGE-PATHNAMES.7 + PATHNAME-MATCH-P.1 PATHNAME-MATCH-P.2 PATHNAME-MATCH-P.3 + PATHNAME-MATCH-P.4 PATHNAME-MATCH-P.5 PATHNAME-MATCH-P.6 + PATHNAME-MATCH-P.7 PATHNAME-MATCH-P.8 PATHNAME-MATCH-P.ERROR.1 + PATHNAME-MATCH-P.ERROR.2 PATHNAME-MATCH-P.ERROR.3 + PATHNAME-MATCH-P.ERROR.4 PATHNAME-MATCH-P.ERROR.5 + PATHNAME-MATCH-P.ERROR.6 PATHNAME-MATCH-P.ERROR.7 PARSE-NAMESTRING.1 + PARSE-NAMESTRING.2 PARSE-NAMESTRING.3 PARSE-NAMESTRING.4 + PARSE-NAMESTRING.ERROR.1 PARSE-NAME-STRING.ERROR.2 + PARSE-NAME-STRING.ERROR.3 DIRECTORY.1 DIRECTORY.2 DIRECTORY.3 + DIRECTORY.4 DIRECTORY.5 DIRECTORY.6 DIRECTORY.7 DIRECTORY.8 + DIRECTORY.9 DIRECTORY.ERROR.1 PROBE-FILE.1 PROBE-FILE.2 PROBE-FILE.3 + PROBE-FILE.4 PROBE-FILE.5 PROBE-FILE.ERROR.1 PROBE-FILE.ERROR.2 + PROBE-FILE.ERROR.3 PROBE-FILE.ERROR.4 ENSURE-DIRECTORIES-EXIST.1 + ENSURE-DIRECTORIES-EXIST.2 ENSURE-DIRECTORIES-EXIST.3 + ENSURE-DIRECTORIES-EXIST.4 ENSURE-DIRECTORIES-EXIST.5 + ENSURE-DIRECTORIES-EXIST.6 ENSURE-DIRECTORIES-EXIST.7 + ENSURE-DIRECTORIES-EXIST.8 ENSURE-DIRECTORIES-EXIST.9 + ENSURE-DIRECTORIES-EXIST.ERROR.1 ENSURE-DIRECTORIES-EXIST.ERROR.2 + TRUENAME.1 TRUENAME.2 TRUENAME.3 TRUENAME.4 TRUENAME.5 TRUENAME.6 + TRUENAME.ERROR.1 TRUENAME.ERROR.2 TRUENAME.ERROR.3 TRUENAME.ERROR.4 + TRUENAME.ERROR.5 TRUENAME.ERROR.6 FILE-AUTHOR.1 FILE-AUTHOR.2 + FILE-AUTHOR.3 FILE-AUTHOR.4 FILE-AUTHOR.5 FILE-AUTHOR.6 FILE-AUTHOR.7 + FILE-AUTHOR.ERROR.1 FILE-AUTHOR.ERROR.2 FILE-AUTHOR.ERROR.3 + FILE-AUTHOR.ERROR.4 FILE-WRITE-DATE.1 FILE-WRITE-DATE.2 + FILE-WRITE-DATE.3 FILE-WRITE-DATE.4 FILE-WRITE-DATE.5 + FILE-WRITE-DATE.6 FILE-WRITE-DATE.ERROR.1 FILE-WRITE-DATE.ERROR.2 + FILE-WRITE-DATE.ERROR.3 FILE-WRITE-DATE.ERROR.4 RENAME-FILE.1 + RENAME-FILE.2 RENAME-FILE.3 RENAME-FILE.4 RENAME-FILE.5 RENAME-FILE.6 RENAME-FILE.5 RENAME-FILE.6 + RENAME-FILE.7 RENAME-FILE.ERROR.1 DELETE-FILE.1 DELETE-FILE.2 + DELETE-FILE.3 DELETE-FILE.4 DELETE-FILE.5 DELETE-FILE.ERROR.1 + DELETE-FILE.ERROR.2 FILE-ERROR.1 FILE-ERROR-PATHNAME.1 + FILE-ERROR-PATHNAME.2 FILE-ERROR-PATHNAME.3 FILE-ERROR-PATHNAME.4 + FILE-ERROR-PATHNAME.5 FILE-ERROR-PATHNAME.6 + FILE-ERROR-PATHNAME.ERROR.1 FILE-ERROR-PATHNAME.ERROR.2 + INPUT-STREAM-P.1 INPUT-STREAM-P.2 INPUT-STREAM-P.3 INPUT-STREAM-P.4 + INPUT-STREAM-P.ERROR.1 INPUT-STREAM-P.ERROR.2 INPUT-STREAM-P.ERROR.3 + OUTPUT-STREAM-P.1 OUTPUT-STREAM-P.2 OUTPUT-STREAM-P.3 + OUTPUT-STREAM-P.4 OUTPUT-STREAM-P.ERROR.1 OUTPUT-STREAM-P.ERROR.2 + OUTPUT-STREAM-P.ERROR.3 INTERACTIVE-STREAM-P.1 + INTERACTIVE-STREAM-P.ERROR.1 INTERACTIVE-STREAM-P.ERROR.2 + INTERACTIVE-STREAM-P.ERROR.3 OPEN-STREAM-P.1 OPEN-STREAM-P.2 + OPEN-STREAM-P.3 OPEN-STREAM-P.4 OPEN-STREAM-P.5 OPEN-STREAM-P.ERROR.1 + OPEN-STREAM-P.ERROR.2 OPEN-STREAM-P.ERROR.3 STREAM-ELEMENT-TYPE.1 + STREAM-ELEMENT-TYPE.2 STREAM-ELEMENT-TYPE.3 RENAME-FILE.7 RENAME-FILE.ERROR.1 DELETE-FILE.1 DELETE-FILE.2 DELETE-FILE.3 DELETE-FILE.4 DELETE-FILE.5 DELETE-FILE.ERROR.1 DELETE-FILE.ERROR.2 FILE-ERROR.1 FILE-ERROR-PATHNAME.1 @@ -30699,23 +30751,140 @@ OPEN.3 OPEN.4 OPEN.5 OPEN.6 OPEN.7 OPEN.8 OPEN.9 OPEN.10 OPEN.11 OPEN.12 OPEN.13 OPEN.14 OPEN.15 OPEN.16 OPEN.17 OPEN.18 OPEN.19 OPEN.20 OPEN.21 OPEN.22 OPEN.23 OPEN.24 OPEN.25 OPEN.26 OPEN.27 - OPEN.28 OPEN.29 OPEN.30 OPEN.31 OPEN.32 RENAME-FILE.5 RENAME-FILE.6 - RENAME-FILE.7 RENAME-FILE.ERROR.1 DELETE-FILE.1 DELETE-FILE.2 - DELETE-FILE.3 DELETE-FILE.4 DELETE-FILE.5 DELETE-FILE.ERROR.1 - DELETE-FILE.ERROR.2 FILE-ERROR.1 FILE-ERROR-PATHNAME.1 - FILE-ERROR-PATHNAME.2 FILE-ERROR-PATHNAME.3 FILE-ERROR-PATHNAME.4 - FILE-ERROR-PATHNAME.5 FILE-ERROR-PATHNAME.6 - FILE-ERROR-PATHNAME.ERROR.1 FILE-ERROR-PATHNAME.ERROR.2 - INPUT-STREAM-P.1 INPUT-STREAM-P.2 INPUT-STREAM-P.3 INPUT-STREAM-P.4 - INPUT-STREAM-P.ERROR.1 INPUT-STREAM-P.ERROR.2 INPUT-STREAM-P.ERROR.3 - OUTPUT-STREAM-P.1 OUTPUT-STREAM-P.2 OUTPUT-STREAM-P.3 - OUTPUT-STREAM-P.4 OUTPUT-STREAM-P.ERROR.1 OUTPUT-STREAM-P.ERROR.2 - OUTPUT-STREAM-P.ERROR.3 INTERACTIVE-STREAM-P.1 - INTERACTIVE-STREAM-P.ERROR.1 INTERACTIVE-STREAM-P.ERROR.2 - INTERACTIVE-STREAM-P.ERROR.3 OPEN-STREAM-P.1 OPEN-STREAM-P.2 - OPEN-STREAM-P.3 OPEN-STREAM-P.4 OPEN-STREAM-P.5 OPEN-STREAM-P.ERROR.1 - OPEN-STREAM-P.ERROR.2 OPEN-STREAM-P.ERROR.3 STREAM-ELEMENT-TYPE.1 - STREAM-ELEMENT-TYPE.2 STREAM-ELEMENT-TYPE.3 STREAM-ELEMENT-TYPE.4 + OPEN.28 OPEN.29 OPEN.30 OPEN.31 OPEN.32 OPEN.33 OPEN.34 OPEN.35 + OPEN.36 OPEN.37 OPEN.38 OPEN.39 OPEN.40 OPEN.41 OPEN.42 OPEN.43 + OPEN.44 OPEN.45 OPEN.46 OPEN.47 OPEN.48 OPEN.49 OPEN.50 OPEN.51 + OPEN.52 OPEN.53 OPEN.54 OPEN.55 OPEN.56 OPEN.57 OPEN.58 OPEN.59 + OPEN.60 OPEN.61 OPEN.62 OPEN.63 OPEN.64 OPEN.65 OPEN.66 OPEN.67 + OPEN.OUTPUT.1 OPEN.OUTPUT.2 OPEN.OUTPUT.3 OPEN.OUTPUT.4 OPEN.OUTPUT.5 + OPEN.OUTPUT.6 OPEN.OUTPUT.7 OPEN.OUTPUT.8 OPEN.OUTPUT.9 OPEN.OUTPUT.10 + OPEN.OUTPUT.11 OPEN.OUTPUT.12 OPEN.OUTPUT.13 OPEN.OUTPUT.14 + OPEN.OUTPUT.15 OPEN.OUTPUT.16 OPEN.OUTPUT.17 OPEN.OUTPUT.18 + OPEN.OUTPUT.19 OPEN.OUTPUT.20 OPEN.OUTPUT.21 +Test OPEN.OUTPUT.22 failed +Form: (LET ((PN #p"tmp.dat")) + (DELETE-ALL-VERSIONS PN) + (WITH-OPEN-FILE + (OS PN :DIRECTION :OUTPUT :IF-EXISTS :SUPERSEDE) + (ASSERT (OPEN-STREAM-P OS)) + (DOTIMES (I 10) + (WRITE-CHAR + (FUNCALL (THE FUNCTION + (GENERATOR-FOR-ELEMENT-TYPE 'CHARACTER)) + I) + OS)) + (FINISH-OUTPUT OS)) + (LET ((S (OPEN PN :IF-EXISTS :RENAME :DIRECTION :OUTPUT))) + (UNWIND-PROTECT + (PROGN + (ASSERT (OPEN-STREAM-P S)) + (ASSERT (TYPEP S 'FILE-STREAM)) + (ASSERT (SUBTYPEP 'CHARACTER (STREAM-ELEMENT-TYPE S))) + (PROGN + (WRITE-SEQUENCE "wxyz" S) + (CLOSE S) + (WITH-OPEN-FILE (S PN :DIRECTION :INPUT) + (VALUES (READ-LINE S NIL))))) + (CLOSE S)))) +Expected value: "wxyz" +Actual value: #. + OPEN.OUTPUT.23 OPEN.OUTPUT.24 OPEN.OUTPUT.25 OPEN.OUTPUT.26 + OPEN.OUTPUT.27 OPEN.OUTPUT.28 OPEN.OUTPUT.28A OPEN.OUTPUT.29 + OPEN.OUTPUT.30 OPEN.OUTPUT.31 OPEN.OUTPUT.32 OPEN.OUTPUT.33 + OPEN.OUTPUT.34 OPEN.OUTPUT.35 OPEN.IO.1 OPEN.IO.2 OPEN.IO.3 OPEN.IO.4 + OPEN.IO.5 OPEN.IO.6 OPEN.IO.7 OPEN.IO.8 OPEN.IO.9 OPEN.IO.10 + OPEN.IO.11 OPEN.IO.12 OPEN.IO.13 OPEN.IO.14 OPEN.IO.15 OPEN.IO.16 + OPEN.IO.17 OPEN.IO.18 OPEN.IO.19 OPEN.IO.20 OPEN.IO.21 +Test OPEN.IO.22 failed +Form: (LET ((PN #p"tmp.dat")) + (DELETE-ALL-VERSIONS PN) + (WITH-OPEN-FILE + (OS PN :DIRECTION :OUTPUT :IF-EXISTS :SUPERSEDE) + (ASSERT (OPEN-STREAM-P OS)) + (DOTIMES (I 10) + (WRITE-CHAR + (FUNCALL (THE FUNCTION + (GENERATOR-FOR-ELEMENT-TYPE 'CHARACTER)) + I) + OS)) + (FINISH-OUTPUT OS)) + (LET ((S (OPEN PN :IF-EXISTS :RENAME :DIRECTION :IO))) + (UNWIND-PROTECT + (PROGN + (ASSERT (OPEN-STREAM-P S)) + (ASSERT (TYPEP S 'FILE-STREAM)) + (ASSERT (SUBTYPEP 'CHARACTER (STREAM-ELEMENT-TYPE S))) + (PROGN + (WRITE-SEQUENCE "wxyz" S) + (FILE-POSITION S :START) + (VALUES (READ-LINE S NIL)))) + (CLOSE S)))) +Expected value: "wxyz" +Actual value: #. + OPEN.IO.23 OPEN.IO.24 OPEN.IO.25 OPEN.IO.26 OPEN.IO.27 OPEN.IO.28 + OPEN.IO.28A OPEN.IO.29 OPEN.IO.30 OPEN.IO.31 OPEN.IO.32 OPEN.IO.33 + OPEN.IO.34 OPEN.IO.35 OPEN.PROBE.1 OPEN.PROBE.2 OPEN.PROBE.3 + OPEN.PROBE.4 OPEN.PROBE.5 OPEN.PROBE.6 OPEN.PROBE.7 OPEN.PROBE.8 + OPEN.PROBE.9 OPEN.PROBE.10 OPEN.PROBE.11 OPEN.PROBE.12 OPEN.PROBE.13 + OPEN.PROBE.14 OPEN.PROBE.15 OPEN.PROBE.16 OPEN.PROBE.17 OPEN.PROBE.18 + OPEN.PROBE.19 OPEN.PROBE.20 OPEN.PROBE.21 OPEN.PROBE.22 OPEN.PROBE.23 + OPEN.PROBE.24 OPEN.PROBE.25 OPEN.PROBE.26 OPEN.PROBE.27 OPEN.PROBE.28 + OPEN.PROBE.29 OPEN.PROBE.30 OPEN.PROBE.31 OPEN.PROBE.32 OPEN.PROBE.33 + OPEN.PROBE.34 OPEN.PROBE.35 OPEN.PROBE.36 OPEN.ERROR.1 OPEN.ERROR.2 + OPEN.ERROR.3 OPEN.ERROR.4 OPEN.ERROR.5 OPEN.ERROR.6 OPEN.ERROR.7 + OPEN.ERROR.8 OPEN.ERROR.9 OPEN.ERROR.10 OPEN.ERROR.11 OPEN.ERROR.12 + OPEN.ERROR.13 OPEN.ERROR.14 OPEN.ERROR.15 OPEN.ERROR.16 OPEN.ERROR.17 + OPEN.ERROR.18 STREAM-EXTERNAL-FORMAT.ERROR.1 + STREAM-EXTERNAL-FORMAT.ERROR.2 WITH-OPEN-FILE.1 WITH-OPEN-FILE.2 + WITH-OPEN-FILE.3 WITH-OPEN-FILE.4 WITH-OPEN-FILE.5 WITH-OPEN-FILE.6 + WITH-OPEN-FILE.7 WITH-OPEN-FILE.8 WITH-OPEN-FILE.9 WITH-OPEN-FILE.10 + WITH-OPEN-STREAM.1 WITH-OPEN-STREAM.2 WITH-OPEN-STREAM.3 + WITH-OPEN-STREAM.4 WITH-OPEN-STREAM.5 WITH-OPEN-STREAM.6 + WITH-OPEN-STREAM.7 WITH-OPEN-STREAM.8 WITH-OPEN-STREAM.9 + WITH-OPEN-STREAM.10 LISTEN.1 LISTEN.2 LISTEN.3 LISTEN.4 LISTEN.6 + LISTEN.7 LISTEN.8 LISTEN.9 LISTEN.ERROR.1 LISTEN.ERROR.2 CLEAR-INPUT.1 + CLEAR-INPUT.2 CLEAR-INPUT.3 CLEAR-INPUT.4 CLEAR-INPUT.5 CLEAR-INPUT.6 + CLEAR-INPUT.ERROR.1 CLEAR-INPUT.ERROR.2 CLEAR-INPUT.ERROR.3 + CLEAR-INPUT.ERROR.4 CLEAR-INPUT.ERROR.5 FINISH-OUTPUT.1 + FINISH-OUTPUT.2 FINISH-OUTPUT.3 FINISH-OUTPUT.4 FINISH-OUTPUT.5 + FINISH-OUTPUT.6 FINISH-OUTPUT.ERROR.1 FINISH-OUTPUT.ERROR.2 + FINISH-OUTPUT.ERROR.3 FORCE-OUTPUT.1 FORCE-OUTPUT.2 FORCE-OUTPUT.3 + FORCE-OUTPUT.4 FORCE-OUTPUT.5 FORCE-OUTPUT.6 FORCE-OUTPUT.ERROR.1 + FORCE-OUTPUT.ERROR.2 FORCE-OUTPUT.ERROR.3 CLEAR-OUTPUT.1 + CLEAR-OUTPUT.2 CLEAR-OUTPUT.3 CLEAR-OUTPUT.4 CLEAR-OUTPUT.5 + CLEAR-OUTPUT.6 CLEAR-OUTPUT.ERROR.1 CLEAR-OUTPUT.ERROR.2 + CLEAR-OUTPUT.ERROR.3 MAKE-SYNONYM-STREAM.1 MAKE-SYNONYM-STREAM.3 + MAKE-SYNONYM-STREAM.4 MAKE-SYNONYM-STREAM.ERROR.1 + MAKE-SYNONYM-STREAM.ERROR.2 MAKE-SYNONYM-STREAM.ERROR.3 + SYNONYM-STREAM-SYMBOL.1 SYNONYM-STREAM-SYMBOL.ERROR.1 + SYNONYM-STREAM-SYMBOL.ERROR.2 MAKE-BROADCAST-STREAM.1 + MAKE-BROADCAST-STREAM.2 MAKE-BROADCAST-STREAM.3 +Test MAKE-BROADCAST-STREAM.4 failed +Form: (FRESH-LINE (MAKE-BROADCAST-STREAM)) +Expected value: NIL +Actual value: T. + MAKE-BROADCAST-STREAM.5 MAKE-BROADCAST-STREAM.6 +Test MAKE-BROADCAST-STREAM.7 failed +Form: (FILE-STRING-LENGTH (MAKE-BROADCAST-STREAM) + "antidisestablishmentarianism") +Expected value: 1 +Actual value: 0. + MAKE-BROADCAST-STREAM.8 +Test MAKE-BROADCAST-STREAM.ERROR.1 failed +Form: (CHECK-TYPE-ERROR #'MAKE-BROADCAST-STREAM + #'(LAMBDA (X) (AND (STREAMP X) (OUTPUT-STREAM-P X)))) +Expected value: NIL +Actual value: #. +Test MAKE-BROADCAST-STREAM.ERROR.2 failed +Form: (CHECK-TYPE-ERROR #'MAKE-BROADCAST-STREAM + #'(LAMBDA (X) (AND (STREAMP X) (OUTPUT-STREAM-P X))) + *STREAMS*) +Expected value: NIL +Actual value: #. + BROADCAST-STREAM-STREAMS.1 BROADCAST-STREAM-STREAMS.2 + BROADCAST-STREAM-STREAMS.ERROR.1 BROADCAST-STREAM-STREAMS.ERROR.2 + MAKE-TWO-WAY-STREAM.1 MAKE-TWO-WAY-STREAM.2 MAKE-TWO-WAY-STREAM.3 + MAKE-TWO-WAY-STREAM.4 MAKE-TWO-WAY-STREAM.5 MAKE-TWO-WAY-STREAM.6 STREAM-ELEMENT-TYPE.4 STREAM-ELEMENT-TYPE.5 STREAM-ELEMENT-TYPE.6 STREAM-ELEMENT-TYPE.ERROR.1 STREAM-ELEMENT-TYPE.ERROR.2 STREAM-ELEMENT-TYPE.ERROR.3 STREAMP.1 STREAMP.2 STREAMP.3 STREAMP.4 @@ -31232,260 +31401,7 @@ CHAR-NOT-LESSP.4 CHAR-NOT-LESSP.5 CHAR-NOT-LESSP.6 CHAR-NOT-LESSP.7 CHAR-NOT-LESSP.8 CHAR-NOT-LESSP.ORDER.1 CHAR-NOT-LESSP.ORDER.2 CHAR-NOT-LESSP.ORDER.3 CHAR-NOT-LESSP.ORDER.4 CHAR-GREATERP.1 - CHAR-GREATERP.2 CHAR-GREATERP.3 CHAR-GREATERP.4 CHAR-GREATERP.5 - CHAR-GREATERP.6 CHAR-GREATERP.7 CHAR-GREATERP.8 CHAR-GREATERP.ORDER.1 - CHAR-GREATERP.ORDER.2 CHAR-GREATERP.ORDER.3 CHAR-GREATERP.ORDER.4 - FEATURES.1 FEATURES.2 FEATURES.3 -288 out of 11799 total tests failed: SYMBOL-SLOT-BOUNDP, SYMBOL-SLOT-VALUE, SPECIAL-OPERATOR-P.1, - SPECIAL-OPERATOR-P.2, CL-FUNCTION-SYMBOLS.1, CL-MACRO-SYMBOLS.1, - CL-VARIABLE-SYMBOLS.1, CL-TYPES-THAT-ARE-CLASSES.1, - CL-TYPES-THAT-ARE-CLASSES.2, CL-TYPES-THAT-ARE-CLASSES.3, - EVAL-AND-COMPILE-MACROS, COMPILE.ERROR.1, COMPILE.ERROR.2, - CONSTANTP.6, CONSTANTP.8, CONSTANTP.ORDER.2, DCF-FUNS, DCF-MACROS, - SETF-VALUES.5, PSETQ.7, PSETF.7, THROW-ERROR, FBOUNDP.6, FBOUNDP.7, - FDEFINITION.ERROR.1, FDEFINITION.ERROR.2, FDEFINITION.ERROR.4, - FDEFINITION.ERROR.6, FDEFINITION.1, FDEFINITION.2, FDEFINITION.3, - FDEFINITION.4, FDEFINITION.5, FDEFINITION.ORDER.1, FLET.17, FLET.51, - FMAKUNBOUND.4, FUNCALL.ERROR.3, FUNCTION-LAMBDA-EXPRESSION.1, - FUNCTION-LAMBDA-EXPRESSION.2, FUNCTION-LAMBDA-EXPRESSION.ORDER.1, - FUNCTION-LAMBDA-EXPRESSION.ERROR.1, - FUNCTION-LAMBDA-EXPRESSION.ERROR.2, FUNCTION.2, FUNCTION.6, - FUNCTION.7, FUNCTION.10, FUNCTIONP.2, FUNCTIONP.6, FUNCTIONP.7, - FUNCTIONP.10, LABELS.17, LABELS.26, MACROLET.5, MACROLET.13, - MACROLET.14, MULTIPLE-VALUE-SETQ.5, MULTIPLE-VALUE-SETQ.8, - LOOP.6.19, LOOP.6.20, LOOP.6.37, LOOP.6.38, LOOP.7.15, LOOP.7.16, - LOOP.7.17, LOOP.7.19, LOOP.7.20, LOOP.7.21, LOOP.7.22, LOOP.7.23, - LOOP.8.19, LOOP.8.20, LOOP.8.21, LOOP.8.22, LOOP.8.ERROR.2, - LOOP.9.10, LOOP.9.11, LOOP.9.27, LOOP.9.28, LOOP.9.37, LOOP.9.38, - LOOP.10.9, LOOP.10.10, LOOP.10.37, LOOP.10.38, LOOP.10.57, - LOOP.10.58, LOOP.10.85, LOOP.10.86, LOOP.11.9, LOOP.14.29, - CONDITION.2, ERROR.5, CERROR.5, HANDLER-BIND.9, SUBTYPEP-CONS-NULL, - GET-PROPERTIES.8, SETF-GETF.ORDER.2, ARRAY-AS-CLASS.7, - ARRAY-AS-CLASS.8, MAKE-ARRAY.28, MAKE-ARRAY.DISPLACED.9, - MAKE-ARRAY.DISPLACED.10, ARRAY-DISPLACEMENT.11, - UPGRADED-ARRAY-ELEMENT-TYPE.2, UPGRADED-ARRAY-ELEMENT-TYPE.NIL.1, - HASH-TABLE.1, HASH-TABLE.3, HASH-TABLE.5, RENAME-PACKAGE.5, - DELETE-PACKAGE.6, MAKE-PACKAGE.3, MAKE-PACKAGE.6, MAKE-PACKAGE.9, - MAKE-PACKAGE.9A, MAKE-PACKAGE.9B, MAKE-PACKAGE.13, - MAKE-PACKAGE.ERROR.11, PACKAGE-ERROR.3, MAKE-SEQUENCE.ERROR.2, - REDUCE.ERROR.2, REDUCE.ERROR.5, SORT.ERROR.1, SORT.ERROR.2, - SORT.ERROR.5, SUBSEQ.ORDER.3, SUBSEQ.ORDER.4, CONCATENATE.ERROR.1, - CONCATENATE.ERROR.2, MERGE.ERROR.6, STRUCT-TEST-03/16, - STRUCT-TEST-04/16, STRUCT-TEST-05/16, STRUCT-TEST-06/16, - STRUCT-TEST-07/16, STRUCT-TEST-08/16, STRUCT-TEST-09/16, - STRUCT-TEST-10/16, STRUCT-TEST-11/16, STRUCT-TEST-12/16, - STRUCT-TEST-13/16, STRUCT-TEST-14/16, STRUCT-TEST-15/16, - STRUCT-TEST-16/16, STRUCT-TEST-17/16, STRUCT-TEST-18/16, - STRUCT-TEST-19/16, STRUCT-TEST-20/16, STRUCT-TEST-21/16, - STRUCT-TEST-22/16, STRUCT-TEST-23/16, STRUCT-TEST-24/16, - STRUCT-TEST-25/16, STRUCT-TEST-26/16, STRUCT-TEST-27/12, - STRUCT-TEST-27/16, STRUCT-TEST-28/12, STRUCT-TEST-28/16, - STRUCT-TEST-29/12, STRUCT-TEST-29/16, STRUCT-TEST-30/16, - STRUCT-TEST-31/13, STRUCT-TEST-31/14, STRUCT-TEST-31/16, - STRUCT-TEST-31/17, STRUCT-TEST-31/15A, STRUCT-TEST-32/16, - STRUCT-TEST-33/16, STRUCT-TEST-34/16, STRUCT-TEST-35/16, - STRUCT-TEST-36/16, STRUCT-TEST-41/3, STRUCT-TEST-43/3, - STRUCT-TEST-49/1, STRUCT-TEST-50/1, STRUCT-TEST-51/1, - STRUCT-TEST-57/16, STRUCT-TEST-58/16, STRUCT-TEST-59/16, - STRUCT-TEST-60/16, STRUCTURE-60-1, STRUCT-TEST-63/13, - STRUCT-TEST-63/14, STRUCT-TEST-63/16, STRUCT-TEST-63/17, - STRUCT-TEST-63/15A, STRUCT-TEST-64/1, STRUCT-TEST-64/2, - STRUCT-TEST-64/5, STRUCT-TEST-64/6, STRUCT-TEST-64/7, - STRUCT-TEST-64/9, STRUCT-TEST-64/13, STRUCT-TEST-64/14, - STRUCT-TEST-64/15, STRUCT-TEST-64/16, STRUCT-TEST-64/17, - STRUCT-TEST-64/15A, STRUCT-TEST-64/20, STRUCTURE-BOA-TEST-08/1, - STRUCTURE-BOA-TEST-09/1, STRUCTURE-BOA-TEST-09/2, - STRUCTURE-BOA-TEST-09/3, STRUCTURE-BOA-TEST-09/4, - STRUCTURE-BOA-TEST-09/5, STRUCTURE-BOA-TEST-09/6, - STRUCTURE-BOA-TEST-09/7, STRUCTURE-BOA-TEST-13/1, - STRUCTURE-BOA-TEST-13/2, STRUCTURE-BOA-TEST-13/3, - STRUCTURE-BOA-TEST-13/4, STRUCTURE-BOA-TEST-13/5, - STRUCTURE-BOA-TEST-13/6, STRUCTURE-BOA-TEST-13/7, - STRUCTURE-BOA-TEST-13/8, STRUCTURE-BOA-TEST-14/1, - STRUCTURE-BOA-TEST-14/2, STRUCTURE-BOA-TEST-14/3, - STRUCTURE-BOA-TEST-14/4, STRUCTURE-BOA-TEST-14/5, - STRUCTURE-BOA-TEST-15/1, STRUCTURE-BOA-TEST-15/2, - STRUCTURE-BOA-TEST-15/3, STRUCTURE-BOA-TEST-15/4, - STRUCTURE-BOA-TEST-15/5, STRUCTURE-BOA-TEST-15/6, - STRUCTURE-BOA-TEST-15/7, STRUCTURE-BOA-TEST-15/8, TYPES.3, TYPES.6, - TYPES.8, TYPES.9A, ALL-CLASSES-ARE-TYPE-EQUIVALENT-TO-THEIR-NAMES, - ALL-STANDARD-CLASSES-ARE-SUBTYPES-OF-STANDARD-OBJECT, - ALL-STANDARD-GENERIC-FUNCTIONS-ARE-INSTANCES-OF-THAT-CLASS, TAC-3.1, - TAC-3.2, TAC-3.3, TAC-3.4, TAC-3.5, TAC-3.6, TAC-3.7, TAC-3.8, - TAC-3.9, TAC-3.10, TAC-3.11, TAC-3.12, TAC-3.13, TAC-3.14, TAC-3.15, - UNIVERSE-ELEMENTS-IN-AT-MOST-ONE-DISJOINT-TYPE, - SUBTYPEP.BIGNUM.INTEGER, SUBTYPEP.INTEGER.23, SUBTYPEP.INTEGER.24, - SUBTYPEP.CONS.2, SUBTYPEP.CONS.12, SUBTYPEP.MEMBER.17, - SUBTYPEP.MEMBER.18, SUBTYPEP.EQL.1, SUBTYPEP.EQL.2, - SUBTYPEP.ARRAY.1, SUBTYPEP.ARRAY.3, SUBTYPEP.ARRAY.4, - SUBTYPEP.ARRAY.5, PATHNAMES-PRINT-AND-READ-PROPERLY, PEEK-CHAR.17, - READ-LINE.4, READ-LINE.5, WRITE-STRING.2, WRITE-LINE.2, - OPEN.OUTPUT.22, OPEN.IO.22, MAKE-BROADCAST-STREAM.4, - MAKE-BROADCAST-STREAM.7, MAKE-BROADCAST-STREAM.ERROR.1, - MAKE-BROADCAST-STREAM.ERROR.2, MAKE-TWO-WAY-STREAM.ERROR.4, - MAKE-TWO-WAY-STREAM.ERROR.5, MAKE-TWO-WAY-STREAM.ERROR.6, - MAKE-TWO-WAY-STREAM.ERROR.7, MAKE-CONCATENATED-STREAM.21, - MAKE-CONCATENATED-STREAM.30, MAKE-STRING-INPUT-STREAM.10, - MAKE-STRING-OUTPUT-STREAM.12, WITH-INPUT-FROM-STRING.10, - WITH-OUTPUT-TO-STRING.16, DIGIT-CHAR.ERROR.2, CODE-CHAR.ERROR.2.;; Finished loading "gclload.lsp" -T - ->make[1]: Leaving directory '/build/reproducible-path/gcl-2.6.14' -touch build-stamp -rm -f `echo debian/control.rm | sed 's,\.rm$,,1'` -cp debian/control_ debian/control -cat debian/in.gcl-doc.README.Debian | sed 's,@EXT@,,g' >debian/gcl-doc.README.Debian -cat debian/in.gcl-doc.doc-base.main | sed 's,@EXT@,,g' >debian/gcl-doc.doc-base.main -cat debian/in.gcl-doc.doc-base.si | sed 's,@EXT@,,g' >debian/gcl-doc.doc-base.si -cat debian/in.gcl-doc.doc-base.tk | sed 's,@EXT@,,g' >debian/gcl-doc.doc-base.tk -cat debian/in.gcl-doc.doc-base.xgcl | sed 's,@EXT@,,g' >debian/gcl-doc.doc-base.xgcl -cat debian/in.gcl-doc.docs | sed 's,@EXT@,,g' >debian/gcl-doc.docs -cat debian/in.gcl-doc.info | sed 's,@EXT@,,g' >debian/gcl-doc.info -cat debian/in.gcl-doc.install | sed 's,@EXT@,,g' >debian/gcl-doc.install -cat debian/in.gcl.config | sed 's,@EXT@,,g' >debian/gcl.config -cat debian/in.gcl.docs | sed 's,@EXT@,,g' >debian/gcl.docs -cat debian/in.gcl.emacsen-compat | sed 's,@EXT@,,g' >debian/gcl.emacsen-compat -cat debian/in.gcl.emacsen-install | sed 's,@EXT@,,g' >debian/gcl.emacsen-install -cat debian/in.gcl.emacsen-remove | sed 's,@EXT@,,g' >debian/gcl.emacsen-remove -cat debian/in.gcl.emacsen-startup | sed 's,@EXT@,,g' >debian/gcl.emacsen-startup -cat debian/in.gcl.install | sed 's,@EXT@,,g' >debian/gcl.install -cat debian/in.gcl.manpages | sed 's,@EXT@,,g' >debian/gcl.manpages -cat debian/in.gcl.postinst | sed 's,@EXT@,,g' >debian/gcl.postinst -cat debian/in.gcl.postrm | sed 's,@EXT@,,g' >debian/gcl.postrm - OPEN.33 OPEN.34 OPEN.35 - OPEN.36 OPEN.37 OPEN.38 OPEN.39 OPEN.40 OPEN.41 OPEN.42 OPEN.43 - OPEN.44 OPEN.45 OPEN.46 OPEN.47 OPEN.48 OPEN.49 OPEN.50 OPEN.51 - OPEN.52 OPEN.53 OPEN.54 OPEN.55 OPEN.56 OPEN.57 OPEN.58 OPEN.59 - OPEN.60 OPEN.61 OPEN.62 OPEN.63 OPEN.64 OPEN.65 OPEN.66 OPEN.67 - OPEN.OUTPUT.1 OPEN.OUTPUT.2 OPEN.OUTPUT.3 OPEN.OUTPUT.4 OPEN.OUTPUT.5 - OPEN.OUTPUT.6 OPEN.OUTPUT.7 OPEN.OUTPUT.8 OPEN.OUTPUT.9 OPEN.OUTPUT.10 - OPEN.OUTPUT.11 OPEN.OUTPUT.12 OPEN.OUTPUT.13 OPEN.OUTPUT.14 - OPEN.OUTPUT.15 OPEN.OUTPUT.16 OPEN.OUTPUT.17 OPEN.OUTPUT.18 - OPEN.OUTPUT.19 OPEN.OUTPUT.20 OPEN.OUTPUT.21 -Test OPEN.OUTPUT.22 failed -Form: (LET ((PN #p"tmp.dat")) - (DELETE-ALL-VERSIONS PN) - (WITH-OPEN-FILE - (OS PN :DIRECTION :OUTPUT :IF-EXISTS :SUPERSEDE) - (ASSERT (OPEN-STREAM-P OS)) - (DOTIMES (I 10) - (WRITE-CHAR - (FUNCALL (THE FUNCTION - (GENERATOR-FOR-ELEMENT-TYPE 'CHARACTER)) - I) - OS)) - (FINISH-OUTPUT OS)) - (LET ((S (OPEN PN :IF-EXISTS :RENAME :DIRECTION :OUTPUT))) - (UNWIND-PROTECT - (PROGN - (ASSERT (OPEN-STREAM-P S)) - (ASSERT (TYPEP S 'FILE-STREAM)) - (ASSERT (SUBTYPEP 'CHARACTER (STREAM-ELEMENT-TYPE S))) - (PROGN - (WRITE-SEQUENCE "wxyz" S) - (CLOSE S) - (WITH-OPEN-FILE (S PN :DIRECTION :INPUT) - (VALUES (READ-LINE S NIL))))) - (CLOSE S)))) -Expected value: "wxyz" -Actual value: #. - OPEN.OUTPUT.23 OPEN.OUTPUT.24 OPEN.OUTPUT.25 OPEN.OUTPUT.26 - OPEN.OUTPUT.27 OPEN.OUTPUT.28 OPEN.OUTPUT.28A OPEN.OUTPUT.29 - OPEN.OUTPUT.30 OPEN.OUTPUT.31 OPEN.OUTPUT.32 OPEN.OUTPUT.33 - OPEN.OUTPUT.34 OPEN.OUTPUT.35 OPEN.IO.1 OPEN.IO.2 OPEN.IO.3 OPEN.IO.4 - OPEN.IO.5 OPEN.IO.6 OPEN.IO.7 OPEN.IO.8 OPEN.IO.9 OPEN.IO.10 - OPEN.IO.11 OPEN.IO.12 OPEN.IO.13 OPEN.IO.14 OPEN.IO.15 OPEN.IO.16 - OPEN.IO.17 OPEN.IO.18 OPEN.IO.19 OPEN.IO.20 OPEN.IO.21 -Test OPEN.IO.22 failed -Form: (LET ((PN #p"tmp.dat")) - (DELETE-ALL-VERSIONS PN) - (WITH-OPEN-FILE - (OS PN :DIRECTION :OUTPUT :IF-EXISTS :SUPERSEDE) - (ASSERT (OPEN-STREAM-P OS)) - (DOTIMES (I 10) - (WRITE-CHAR - (FUNCALL (THE FUNCTION - (GENERATOR-FOR-ELEMENT-TYPE 'CHARACTER)) - I) - OS)) - (FINISH-OUTPUT OS)) - (LET ((S (OPEN PN :IF-EXISTS :RENAME :DIRECTION :IO))) - (UNWIND-PROTECT - (PROGN - (ASSERT (OPEN-STREAM-P S)) - (ASSERT (TYPEP S 'FILE-STREAM)) - (ASSERT (SUBTYPEP 'CHARACTER (STREAM-ELEMENT-TYPE S))) - (PROGN - (WRITE-SEQUENCE "wxyz" S) - (FILE-POSITION S :START) - (VALUES (READ-LINE S NIL)))) - (CLOSE S)))) -Expected value: "wxyz" -Actual value: #. - OPEN.IO.23 OPEN.IO.24 OPEN.IO.25 OPEN.IO.26 OPEN.IO.27 OPEN.IO.28 - OPEN.IO.28A OPEN.IO.29 OPEN.IO.30 OPEN.IO.31 OPEN.IO.32 OPEN.IO.33 - OPEN.IO.34 OPEN.IO.35 OPEN.PROBE.1 OPEN.PROBE.2 OPEN.PROBE.3 - OPEN.PROBE.4 OPEN.PROBE.5 OPEN.PROBE.6 OPEN.PROBE.7 OPEN.PROBE.8 - OPEN.PROBE.9 OPEN.PROBE.10 OPEN.PROBE.11 OPEN.PROBE.12 OPEN.PROBE.13 - OPEN.PROBE.14 OPEN.PROBE.15 OPEN.PROBE.16 OPEN.PROBE.17 OPEN.PROBE.18 - OPEN.PROBE.19 OPEN.PROBE.20 OPEN.PROBE.21 OPEN.PROBE.22 OPEN.PROBE.23 - OPEN.PROBE.24 OPEN.PROBE.25 OPEN.PROBE.26 OPEN.PROBE.27 OPEN.PROBE.28 - OPEN.PROBE.29 OPEN.PROBE.30 OPEN.PROBE.31 OPEN.PROBE.32 OPEN.PROBE.33 - OPEN.PROBE.34 OPEN.PROBE.35 OPEN.PROBE.36 OPEN.ERROR.1 OPEN.ERROR.2 - OPEN.ERROR.3 OPEN.ERROR.4 OPEN.ERROR.5 OPEN.ERROR.6 OPEN.ERROR.7 - OPEN.ERROR.8 OPEN.ERROR.9 OPEN.ERROR.10 OPEN.ERROR.11 OPEN.ERROR.12 - OPEN.ERROR.13 OPEN.ERROR.14 OPEN.ERROR.15 OPEN.ERROR.16 OPEN.ERROR.17 - OPEN.ERROR.18 STREAM-EXTERNAL-FORMAT.ERROR.1 - STREAM-EXTERNAL-FORMAT.ERROR.2 WITH-OPEN-FILE.1 WITH-OPEN-FILE.2 - WITH-OPEN-FILE.3 WITH-OPEN-FILE.4 WITH-OPEN-FILE.5 WITH-OPEN-FILE.6 - WITH-OPEN-FILE.7 WITH-OPEN-FILE.8 WITH-OPEN-FILE.9 WITH-OPEN-FILE.10 - WITH-OPEN-STREAM.1 WITH-OPEN-STREAM.2 WITH-OPEN-STREAM.3 - WITH-OPEN-STREAM.4 WITH-OPEN-STREAM.5 WITH-OPEN-STREAM.6 - WITH-OPEN-STREAM.7 WITH-OPEN-STREAM.8 WITH-OPEN-STREAM.9 - WITH-OPEN-STREAM.10 LISTEN.1 LISTEN.2 LISTEN.3 LISTEN.4 LISTEN.6 - LISTEN.7 LISTEN.8 LISTEN.9 LISTEN.ERROR.1 LISTEN.ERROR.2 CLEAR-INPUT.1 - CLEAR-INPUT.2 CLEAR-INPUT.3 CLEAR-INPUT.4 CLEAR-INPUT.5 CLEAR-INPUT.6 - CLEAR-INPUT.ERROR.1 CLEAR-INPUT.ERROR.2 CLEAR-INPUT.ERROR.3 - CLEAR-INPUT.ERROR.4 CLEAR-INPUT.ERROR.5 FINISH-OUTPUT.1 - FINISH-OUTPUT.2 FINISH-OUTPUT.3 FINISH-OUTPUT.4 FINISH-OUTPUT.5 - FINISH-OUTPUT.6 FINISH-OUTPUT.ERROR.1 FINISH-OUTPUT.ERROR.2 - FINISH-OUTPUT.ERROR.3 FORCE-OUTPUT.1 FORCE-OUTPUT.2 FORCE-OUTPUT.3 - FORCE-OUTPUT.4 FORCE-OUTPUT.5 FORCE-OUTPUT.6 FORCE-OUTPUT.ERROR.1 - FORCE-OUTPUT.ERROR.2 FORCE-OUTPUT.ERROR.3 CLEAR-OUTPUT.1 - CLEAR-OUTPUT.2 CLEAR-OUTPUT.3 CLEAR-OUTPUT.4 CLEAR-OUTPUT.5 - CLEAR-OUTPUT.6 CLEAR-OUTPUT.ERROR.1 CLEAR-OUTPUT.ERROR.2 - CLEAR-OUTPUT.ERROR.3 MAKE-SYNONYM-STREAM.1 MAKE-SYNONYM-STREAM.3 - MAKE-SYNONYM-STREAM.4 MAKE-SYNONYM-STREAM.ERROR.1 - MAKE-SYNONYM-STREAM.ERROR.2 MAKE-SYNONYM-STREAM.ERROR.3 - SYNONYM-STREAM-SYMBOL.1 SYNONYM-STREAM-SYMBOL.ERROR.1 - SYNONYM-STREAM-SYMBOL.ERROR.2 MAKE-BROADCAST-STREAM.1 - MAKE-BROADCAST-STREAM.2 MAKE-BROADCAST-STREAM.3 -Test MAKE-BROADCAST-STREAM.4 failed -Form: (FRESH-LINE (MAKE-BROADCAST-STREAM)) -Expected value: NIL -Actual value: T. - MAKE-BROADCAST-STREAM.5 MAKE-BROADCAST-STREAM.6 -Test MAKE-BROADCAST-STREAM.7 failed -Form: (FILE-STRING-LENGTH (MAKE-BROADCAST-STREAM) - "antidisestablishmentarianism") -Expected value: 1 -Actual value: 0. - MAKE-BROADCAST-STREAM.8 -Test MAKE-BROADCAST-STREAM.ERROR.1 failed -Form: (CHECK-TYPE-ERROR #'MAKE-BROADCAST-STREAM - #'(LAMBDA (X) (AND (STREAMP X) (OUTPUT-STREAM-P X)))) -Expected value: NIL -Actual value: #. -Test MAKE-BROADCAST-STREAM.ERROR.2 failed -Form: (CHECK-TYPE-ERROR #'MAKE-BROADCAST-STREAM - #'(LAMBDA (X) (AND (STREAMP X) (OUTPUT-STREAM-P X))) - *STREAMS*) -Expected value: NIL -Actual value: #. - BROADCAST-STREAM-STREAMS.1 BROADCAST-STREAM-STREAMS.2 - BROADCAST-STREAM-STREAMS.ERROR.1 BROADCAST-STREAM-STREAMS.ERROR.2 - MAKE-TWO-WAY-STREAM.1 MAKE-TWO-WAY-STREAM.2 MAKE-TWO-WAY-STREAM.3 - MAKE-TWO-WAY-STREAM.4 MAKE-TWO-WAY-STREAM.5 MAKE-TWO-WAY-STREAM.6 + CHAR-GREATERP.2 MAKE-TWO-WAY-STREAM.7 MAKE-TWO-WAY-STREAM.8 MAKE-TWO-WAY-STREAM.9 MAKE-TWO-WAY-STREAM.10 MAKE-TWO-WAY-STREAM.11 MAKE-TWO-WAY-STREAM.12 MAKE-TWO-WAY-STREAM.13 MAKE-TWO-WAY-STREAM.14 @@ -31813,6 +31729,126 @@ WITH-OUTPUT-TO-STRING.16, DIGIT-CHAR.ERROR.2, CODE-CHAR.ERROR.2.;; Finished loading "gclload.lsp" T +>make[1]: Leaving directory '/build/reproducible-path/gcl-2.6.14' +touch build-stamp +rm -f `echo debian/control.rm | sed 's,\.rm$,,1'` +cp debian/control_ debian/control +cat debian/in.gcl-doc.README.Debian | sed 's,@EXT@,,g' >debian/gcl-doc.README.Debian +cat debian/in.gcl-doc.doc-base.main | sed 's,@EXT@,,g' >debian/gcl-doc.doc-base.main +cat debian/in.gcl-doc.doc-base.si | sed 's,@EXT@,,g' >debian/gcl-doc.doc-base.si +cat debian/in.gcl-doc.doc-base.tk | sed 's,@EXT@,,g' >debian/gcl-doc.doc-base.tk +cat debian/in.gcl-doc.doc-base.xgcl | sed 's,@EXT@,,g' >debian/gcl-doc.doc-base.xgcl +cat debian/in.gcl-doc.docs | sed 's,@EXT@,,g' >debian/gcl-doc.docs +cat debian/in.gcl-doc.info | sed 's,@EXT@,,g' >debian/gcl-doc.info +cat debian/in.gcl-doc.install | sed 's,@EXT@,,g' >debian/gcl-doc.install +cat debian/in.gcl.config | sed 's,@EXT@,,g' >debian/gcl.config +cat debian/in.gcl.docs | sed 's,@EXT@,,g' >debian/gcl.docs +cat debian/in.gcl.emacsen-compat | sed 's,@EXT@,,g' >debian/gcl.emacsen-compat +cat debian/in.gcl.emacsen-install | sed 's,@EXT@,,g' >debian/gcl.emacsen-install +cat debian/in.gcl.emacsen-remove | sed 's,@EXT@,,g' >debian/gcl.emacsen-remove +cat debian/in.gcl.emacsen-startup | sed 's,@EXT@,,g' >debian/gcl.emacsen-startup +cat debian/in.gcl.install | sed 's,@EXT@,,g' >debian/gcl.install +cat debian/in.gcl.manpages | sed 's,@EXT@,,g' >debian/gcl.manpages +cat debian/in.gcl.postinst | sed 's,@EXT@,,g' >debian/gcl.postinst +cat debian/in.gcl.postrm | sed 's,@EXT@,,g' >debian/gcl.postrm + CHAR-GREATERP.3 CHAR-GREATERP.4 CHAR-GREATERP.5 + CHAR-GREATERP.6 CHAR-GREATERP.7 CHAR-GREATERP.8 CHAR-GREATERP.ORDER.1 + CHAR-GREATERP.ORDER.2 CHAR-GREATERP.ORDER.3 CHAR-GREATERP.ORDER.4 + FEATURES.1 FEATURES.2 FEATURES.3 +288 out of 11799 total tests failed: SYMBOL-SLOT-BOUNDP, SYMBOL-SLOT-VALUE, SPECIAL-OPERATOR-P.1, + SPECIAL-OPERATOR-P.2, CL-FUNCTION-SYMBOLS.1, CL-MACRO-SYMBOLS.1, + CL-VARIABLE-SYMBOLS.1, CL-TYPES-THAT-ARE-CLASSES.1, + CL-TYPES-THAT-ARE-CLASSES.2, CL-TYPES-THAT-ARE-CLASSES.3, + EVAL-AND-COMPILE-MACROS, COMPILE.ERROR.1, COMPILE.ERROR.2, + CONSTANTP.6, CONSTANTP.8, CONSTANTP.ORDER.2, DCF-FUNS, DCF-MACROS, + SETF-VALUES.5, PSETQ.7, PSETF.7, THROW-ERROR, FBOUNDP.6, FBOUNDP.7, + FDEFINITION.ERROR.1, FDEFINITION.ERROR.2, FDEFINITION.ERROR.4, + FDEFINITION.ERROR.6, FDEFINITION.1, FDEFINITION.2, FDEFINITION.3, + FDEFINITION.4, FDEFINITION.5, FDEFINITION.ORDER.1, FLET.17, FLET.51, + FMAKUNBOUND.4, FUNCALL.ERROR.3, FUNCTION-LAMBDA-EXPRESSION.1, + FUNCTION-LAMBDA-EXPRESSION.2, FUNCTION-LAMBDA-EXPRESSION.ORDER.1, + FUNCTION-LAMBDA-EXPRESSION.ERROR.1, + FUNCTION-LAMBDA-EXPRESSION.ERROR.2, FUNCTION.2, FUNCTION.6, + FUNCTION.7, FUNCTION.10, FUNCTIONP.2, FUNCTIONP.6, FUNCTIONP.7, + FUNCTIONP.10, LABELS.17, LABELS.26, MACROLET.5, MACROLET.13, + MACROLET.14, MULTIPLE-VALUE-SETQ.5, MULTIPLE-VALUE-SETQ.8, + LOOP.6.19, LOOP.6.20, LOOP.6.37, LOOP.6.38, LOOP.7.15, LOOP.7.16, + LOOP.7.17, LOOP.7.19, LOOP.7.20, LOOP.7.21, LOOP.7.22, LOOP.7.23, + LOOP.8.19, LOOP.8.20, LOOP.8.21, LOOP.8.22, LOOP.8.ERROR.2, + LOOP.9.10, LOOP.9.11, LOOP.9.27, LOOP.9.28, LOOP.9.37, LOOP.9.38, + LOOP.10.9, LOOP.10.10, LOOP.10.37, LOOP.10.38, LOOP.10.57, + LOOP.10.58, LOOP.10.85, LOOP.10.86, LOOP.11.9, LOOP.14.29, + CONDITION.2, ERROR.5, CERROR.5, HANDLER-BIND.9, SUBTYPEP-CONS-NULL, + GET-PROPERTIES.8, SETF-GETF.ORDER.2, ARRAY-AS-CLASS.7, + ARRAY-AS-CLASS.8, MAKE-ARRAY.28, MAKE-ARRAY.DISPLACED.9, + MAKE-ARRAY.DISPLACED.10, ARRAY-DISPLACEMENT.11, + UPGRADED-ARRAY-ELEMENT-TYPE.2, UPGRADED-ARRAY-ELEMENT-TYPE.NIL.1, + HASH-TABLE.1, HASH-TABLE.3, HASH-TABLE.5, RENAME-PACKAGE.5, + DELETE-PACKAGE.6, MAKE-PACKAGE.3, MAKE-PACKAGE.6, MAKE-PACKAGE.9, + MAKE-PACKAGE.9A, MAKE-PACKAGE.9B, MAKE-PACKAGE.13, + MAKE-PACKAGE.ERROR.11, PACKAGE-ERROR.3, MAKE-SEQUENCE.ERROR.2, + REDUCE.ERROR.2, REDUCE.ERROR.5, SORT.ERROR.1, SORT.ERROR.2, + SORT.ERROR.5, SUBSEQ.ORDER.3, SUBSEQ.ORDER.4, CONCATENATE.ERROR.1, + CONCATENATE.ERROR.2, MERGE.ERROR.6, STRUCT-TEST-03/16, + STRUCT-TEST-04/16, STRUCT-TEST-05/16, STRUCT-TEST-06/16, + STRUCT-TEST-07/16, STRUCT-TEST-08/16, STRUCT-TEST-09/16, + STRUCT-TEST-10/16, STRUCT-TEST-11/16, STRUCT-TEST-12/16, + STRUCT-TEST-13/16, STRUCT-TEST-14/16, STRUCT-TEST-15/16, + STRUCT-TEST-16/16, STRUCT-TEST-17/16, STRUCT-TEST-18/16, + STRUCT-TEST-19/16, STRUCT-TEST-20/16, STRUCT-TEST-21/16, + STRUCT-TEST-22/16, STRUCT-TEST-23/16, STRUCT-TEST-24/16, + STRUCT-TEST-25/16, STRUCT-TEST-26/16, STRUCT-TEST-27/12, + STRUCT-TEST-27/16, STRUCT-TEST-28/12, STRUCT-TEST-28/16, + STRUCT-TEST-29/12, STRUCT-TEST-29/16, STRUCT-TEST-30/16, + STRUCT-TEST-31/13, STRUCT-TEST-31/14, STRUCT-TEST-31/16, + STRUCT-TEST-31/17, STRUCT-TEST-31/15A, STRUCT-TEST-32/16, + STRUCT-TEST-33/16, STRUCT-TEST-34/16, STRUCT-TEST-35/16, + STRUCT-TEST-36/16, STRUCT-TEST-41/3, STRUCT-TEST-43/3, + STRUCT-TEST-49/1, STRUCT-TEST-50/1, STRUCT-TEST-51/1, + STRUCT-TEST-57/16, STRUCT-TEST-58/16, STRUCT-TEST-59/16, + STRUCT-TEST-60/16, STRUCTURE-60-1, STRUCT-TEST-63/13, + STRUCT-TEST-63/14, STRUCT-TEST-63/16, STRUCT-TEST-63/17, + STRUCT-TEST-63/15A, STRUCT-TEST-64/1, STRUCT-TEST-64/2, + STRUCT-TEST-64/5, STRUCT-TEST-64/6, STRUCT-TEST-64/7, + STRUCT-TEST-64/9, STRUCT-TEST-64/13, STRUCT-TEST-64/14, + STRUCT-TEST-64/15, STRUCT-TEST-64/16, STRUCT-TEST-64/17, + STRUCT-TEST-64/15A, STRUCT-TEST-64/20, STRUCTURE-BOA-TEST-08/1, + STRUCTURE-BOA-TEST-09/1, STRUCTURE-BOA-TEST-09/2, + STRUCTURE-BOA-TEST-09/3, STRUCTURE-BOA-TEST-09/4, + STRUCTURE-BOA-TEST-09/5, STRUCTURE-BOA-TEST-09/6, + STRUCTURE-BOA-TEST-09/7, STRUCTURE-BOA-TEST-13/1, + STRUCTURE-BOA-TEST-13/2, STRUCTURE-BOA-TEST-13/3, + STRUCTURE-BOA-TEST-13/4, STRUCTURE-BOA-TEST-13/5, + STRUCTURE-BOA-TEST-13/6, STRUCTURE-BOA-TEST-13/7, + STRUCTURE-BOA-TEST-13/8, STRUCTURE-BOA-TEST-14/1, + STRUCTURE-BOA-TEST-14/2, STRUCTURE-BOA-TEST-14/3, + STRUCTURE-BOA-TEST-14/4, STRUCTURE-BOA-TEST-14/5, + STRUCTURE-BOA-TEST-15/1, STRUCTURE-BOA-TEST-15/2, + STRUCTURE-BOA-TEST-15/3, STRUCTURE-BOA-TEST-15/4, + STRUCTURE-BOA-TEST-15/5, STRUCTURE-BOA-TEST-15/6, + STRUCTURE-BOA-TEST-15/7, STRUCTURE-BOA-TEST-15/8, TYPES.3, TYPES.6, + TYPES.8, TYPES.9A, ALL-CLASSES-ARE-TYPE-EQUIVALENT-TO-THEIR-NAMES, + ALL-STANDARD-CLASSES-ARE-SUBTYPES-OF-STANDARD-OBJECT, + ALL-STANDARD-GENERIC-FUNCTIONS-ARE-INSTANCES-OF-THAT-CLASS, TAC-3.1, + TAC-3.2, TAC-3.3, TAC-3.4, TAC-3.5, TAC-3.6, TAC-3.7, TAC-3.8, + TAC-3.9, TAC-3.10, TAC-3.11, TAC-3.12, TAC-3.13, TAC-3.14, TAC-3.15, + UNIVERSE-ELEMENTS-IN-AT-MOST-ONE-DISJOINT-TYPE, + SUBTYPEP.BIGNUM.INTEGER, SUBTYPEP.INTEGER.23, SUBTYPEP.INTEGER.24, + SUBTYPEP.CONS.2, SUBTYPEP.CONS.12, SUBTYPEP.MEMBER.17, + SUBTYPEP.MEMBER.18, SUBTYPEP.EQL.1, SUBTYPEP.EQL.2, + SUBTYPEP.ARRAY.1, SUBTYPEP.ARRAY.3, SUBTYPEP.ARRAY.4, + SUBTYPEP.ARRAY.5, PATHNAMES-PRINT-AND-READ-PROPERLY, PEEK-CHAR.17, + READ-LINE.4, READ-LINE.5, WRITE-STRING.2, WRITE-LINE.2, + OPEN.OUTPUT.22, OPEN.IO.22, MAKE-BROADCAST-STREAM.4, + MAKE-BROADCAST-STREAM.7, MAKE-BROADCAST-STREAM.ERROR.1, + MAKE-BROADCAST-STREAM.ERROR.2, MAKE-TWO-WAY-STREAM.ERROR.4, + MAKE-TWO-WAY-STREAM.ERROR.5, MAKE-TWO-WAY-STREAM.ERROR.6, + MAKE-TWO-WAY-STREAM.ERROR.7, MAKE-CONCATENATED-STREAM.21, + MAKE-CONCATENATED-STREAM.30, MAKE-STRING-INPUT-STREAM.10, + MAKE-STRING-OUTPUT-STREAM.12, WITH-INPUT-FROM-STRING.10, + WITH-OUTPUT-TO-STRING.16, DIGIT-CHAR.ERROR.2, CODE-CHAR.ERROR.2.;; Finished loading "gclload.lsp" +T + >dh_testdir dh_testroot dh_prep @@ -31917,8 +31953,8 @@ dh_gencontrol -a -u"-Vgcc=gcc" dh_md5sums -a dh_builddeb -a -dpkg-deb: building package 'gcl' in '../gcl_2.6.14-16_arm64.deb'. dpkg-deb: building package 'gcl-dbgsym' in '../gcl-dbgsym_2.6.14-16_arm64.deb'. +dpkg-deb: building package 'gcl' in '../gcl_2.6.14-16_arm64.deb'. dpkg-genbuildinfo --build=binary -O../gcl_2.6.14-16_arm64.buildinfo dpkg-genchanges --build=binary -O../gcl_2.6.14-16_arm64.changes dpkg-genchanges: info: binary-only upload (no source code included) @@ -31926,12 +31962,14 @@ dpkg-buildpackage: info: binary-only upload (no source included) dpkg-genchanges: info: not including original source code in upload I: copying local configuration +I: user script /srv/workspace/pbuilder/2786852/tmp/hooks/B01_cleanup starting +I: user script /srv/workspace/pbuilder/2786852/tmp/hooks/B01_cleanup finished I: unmounting dev/ptmx filesystem I: unmounting dev/pts filesystem I: unmounting dev/shm filesystem I: unmounting proc filesystem I: unmounting sys filesystem I: cleaning the build env -I: removing directory /srv/workspace/pbuilder/2573272 and its subdirectories -I: Current time: Wed Mar 25 15:04:08 -12 2026 -I: pbuilder-time-stamp: 1774494248 +I: removing directory /srv/workspace/pbuilder/2786852 and its subdirectories +I: Current time: Fri Feb 21 11:13:14 +14 2025 +I: pbuilder-time-stamp: 1740085994