Diff of the two buildlogs: -- --- b1/build.log 2024-01-06 19:54:38.481960650 +0000 +++ b2/build.log 2024-01-06 20:12:28.530714547 +0000 @@ -1,6 +1,6 @@ I: pbuilder: network access will be disabled during build -I: Current time: Sat Jan 6 07:35:35 -12 2024 -I: pbuilder-time-stamp: 1704569735 +I: Current time: Sun Jan 7 09:54:42 +14 2024 +I: pbuilder-time-stamp: 1704570882 I: Building the build Environment I: extracting base tarball [/var/cache/pbuilder/bullseye-reproducible-base.tgz] I: copying local configuration @@ -18,7 +18,7 @@ I: copying [./gcl_2.6.12-102.debian.tar.xz] I: Extracting source gpgv: unknown type of key resource 'trustedkeys.kbx' -gpgv: keyblock resource '/tmp/dpkg-verify-sig.DsWkJoEp/trustedkeys.kbx': General error +gpgv: keyblock resource '/tmp/dpkg-verify-sig.kuvdffVF/trustedkeys.kbx': General error gpgv: Signature made Sat Jan 30 17:37:27 2021 gpgv: using RSA key FE214F363697773242E816ECB845CE510F9B714D gpgv: Can't check signature: No public key @@ -149,49 +149,80 @@ dpkg-source: info: applying Version_2_6_13pre99 I: using fakeroot in build. I: Installing the build-deps -I: user script /srv/workspace/pbuilder/296566/tmp/hooks/D02_print_environment starting +I: user script /srv/workspace/pbuilder/96213/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 Jan 6 19:54 /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/96213/tmp/hooks/D01_modify_environment finished +I: user script /srv/workspace/pbuilder/96213/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:hostcomplete:interactive_comments:progcomp:promptvars:sourcepath + BASH_ALIASES=() + BASH_ARGC=() + BASH_ARGV=() + BASH_CMDS=() + BASH_LINENO=([0]="12" [1]="0") + BASH_SOURCE=([0]="/tmp/hooks/D02_print_environment" [1]="/tmp/hooks/D02_print_environment") + BASH_VERSINFO=([0]="5" [1]="1" [2]="4" [3]="1" [4]="release" [5]="aarch64-unknown-linux-gnu") + BASH_VERSION='5.1.4(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,-fixfilepath parallel=12 ' - DISTRIBUTION='bullseye' - HOME='/root' - HOST_ARCH='arm64' + DIRSTACK=() + DISTRIBUTION=bullseye + EUID=0 + FUNCNAME=([0]="Echo" [1]="main") + GROUPS=() + HOME=/root + HOSTNAME=i-capture-the-hostname + HOSTTYPE=aarch64 + HOST_ARCH=arm64 IFS=' ' - INVOCATION_ID='05beeb573e8b45098c7f5521f7ec2819' - 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='296566' - PS1='# ' - PS2='> ' + INVOCATION_ID=c770d03b7ec846e8adb8638e0e7b1825 + 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=96213 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.s8zM68LV/pbuilderrc_9rAX --distribution bullseye --hookdir /etc/pbuilder/first-build-hooks --debbuildopts -b --basetgz /var/cache/pbuilder/bullseye-reproducible-base.tgz --buildresult /srv/reproducible-results/rbuild-debian/r-b-build.s8zM68LV/b1 --logfile b1/build.log gcl_2.6.12-102.dsc' - SUDO_GID='109' - SUDO_UID='104' - SUDO_USER='jenkins' - TERM='unknown' - TZ='/usr/share/zoneinfo/Etc/GMT+12' - USER='root' - _='/usr/bin/systemd-run' - http_proxy='http://192.168.101.104: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.s8zM68LV/pbuilderrc_UWKI --distribution bullseye --hookdir /etc/pbuilder/rebuild-hooks --debbuildopts -b --basetgz /var/cache/pbuilder/bullseye-reproducible-base.tgz --buildresult /srv/reproducible-results/rbuild-debian/r-b-build.s8zM68LV/b2 --logfile b2/build.log gcl_2.6.12-102.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.104:3128 I: uname -a - Linux codethink02-arm64 6.1.0-17-cloud-arm64 #1 SMP Debian 6.1.69-1 (2023-12-30) aarch64 GNU/Linux + Linux i-capture-the-hostname 6.1.0-17-cloud-arm64 #1 SMP Debian 6.1.69-1 (2023-12-30) aarch64 GNU/Linux I: ls -l /bin total 5252 -rwxr-xr-x 1 root root 1282512 Mar 27 2022 bash @@ -251,7 +282,7 @@ -rwxr-xr-x 1 root root 43880 Sep 22 2020 rmdir -rwxr-xr-x 1 root root 19208 Sep 27 2020 run-parts -rwxr-xr-x 1 root root 114016 Dec 22 2018 sed - lrwxrwxrwx 1 root root 4 Dec 7 09:24 sh -> dash + lrwxrwxrwx 1 root root 9 Jan 6 19:54 sh -> /bin/bash -rwxr-xr-x 1 root root 35656 Sep 22 2020 sleep -rwxr-xr-x 1 root root 72640 Sep 22 2020 stty -rwsr-xr-x 1 root root 67776 Jan 20 2022 su @@ -277,7 +308,7 @@ -rwxr-xr-x 1 root root 2206 Apr 10 2022 zless -rwxr-xr-x 1 root root 1842 Apr 10 2022 zmore -rwxr-xr-x 1 root root 4577 Apr 10 2022 znew -I: user script /srv/workspace/pbuilder/296566/tmp/hooks/D02_print_environment finished +I: user script /srv/workspace/pbuilder/96213/tmp/hooks/D02_print_environment finished -> Attempting to satisfy build-dependencies -> Creating pbuilder-satisfydepends-dummy package Package: pbuilder-satisfydepends-dummy @@ -436,7 +467,7 @@ Get: 103 http://deb.debian.org/debian bullseye/main arm64 tcl8.6-dev arm64 8.6.11+dfsg-1 [999 kB] Get: 104 http://deb.debian.org/debian bullseye/main arm64 tk8.6 arm64 8.6.11-2 [72.4 kB] Get: 105 http://deb.debian.org/debian bullseye/main arm64 tk8.6-dev arm64 8.6.11-2 [764 kB] -Fetched 35.4 MB in 0s (78.5 MB/s) +Fetched 35.4 MB in 0s (91.6 MB/s) debconf: delaying package configuration, since apt-utils is not installed Selecting previously unselected package bsdextrautils. (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 ... 17734 files and directories currently installed.) @@ -777,8 +808,8 @@ Setting up tzdata (2021a-1+deb11u10) ... Current default time zone: 'Etc/UTC' -Local time is now: Sat Jan 6 19:35:54 UTC 2024. -Universal Time is now: Sat Jan 6 19:35:54 UTC 2024. +Local time is now: Sat Jan 6 19:55:03 UTC 2024. +Universal Time is now: Sat Jan 6 19:55:03 UTC 2024. Run 'dpkg-reconfigure tzdata' if you wish to change it. Setting up xtrans-dev (1.4.0-1) ... @@ -887,7 +918,11 @@ fakeroot is already the newest version (1.25.3-1.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.12/ && 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.12-102_source.changes +I: user script /srv/workspace/pbuilder/96213/tmp/hooks/A99_set_merged_usr starting +Not re-configuring usrmerge for bullseye +I: user script /srv/workspace/pbuilder/96213/tmp/hooks/A99_set_merged_usr finished +hostname: Name or service not known +I: Running cd /build/reproducible-path/gcl-2.6.12/ && 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.12-102_source.changes dpkg-buildpackage: info: source package gcl dpkg-buildpackage: info: source version 2.6.12-102 dpkg-buildpackage: info: source distribution unstable @@ -3356,13 +3391,13 @@ cd info && /usr/bin/make make[2]: Entering directory '/build/reproducible-path/gcl-2.6.12/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 @@ -6242,20 +6277,20 @@ Finished compiling /build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_fixup.o. Loading binary of GCL_PCL_FIXUP... ;; Loading #p"/build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_fixup.o" -Compiling gazonk_335929_0.lsp. +Compiling gazonk_145383_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.12/pcl/gazonk_335929_0.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_335929_0.o" -start address -T 0xecbb50 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_335929_0.o" -Compiling gazonk_335929_1.lsp. +Finished compiling /build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_0.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_0.o" +start address -T 0xecbb50 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_0.o" +Compiling gazonk_145383_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.12/pcl/gazonk_335929_1.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_335929_1.o" -start address -T 0xecc0f0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_335929_1.o" +Finished compiling /build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_1.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_1.o" +start address -T 0xecc0f0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_1.o" start address -T 0xecb9c0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_fixup.o" Compiling GCL_PCL_DEFCOMBIN... Compiling /build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_defcombin.lisp. @@ -6265,34 +6300,34 @@ Finished compiling /build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_defcombin.o. Loading binary of GCL_PCL_DEFCOMBIN... ;; Loading #p"/build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_defcombin.o" -Compiling gazonk_335929_2.lsp. +Compiling gazonk_145383_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.12/pcl/gazonk_335929_2.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_335929_2.o" -start address -T 0xed06b0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_335929_2.o" -Compiling gazonk_335929_3.lsp. +Finished compiling /build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_2.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_2.o" +start address -T 0xed06b0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_2.o" +Compiling gazonk_145383_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.12/pcl/gazonk_335929_3.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_335929_3.o" -start address -T 0xed17b0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_335929_3.o" -Compiling gazonk_335929_4.lsp. +Finished compiling /build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_3.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_3.o" +start address -T 0xed17b0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_3.o" +Compiling gazonk_145383_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.12/pcl/gazonk_335929_4.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_335929_4.o" -start address -T 0xed24e0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_335929_4.o" -Compiling gazonk_335929_5.lsp. +Finished compiling /build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_4.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_4.o" +start address -T 0xed24e0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_4.o" +Compiling gazonk_145383_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.12/pcl/gazonk_335929_5.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_335929_5.o" -start address -T 0xed2d20 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_335929_5.o" +Finished compiling /build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_5.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_5.o" +start address -T 0xed2d20 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_5.o" start address -T 0xecc670 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_defcombin.o" Compiling GCL_PCL_CTYPES... Compiling /build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_ctypes.lisp. @@ -6302,13 +6337,13 @@ Finished compiling /build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_ctypes.o. Loading binary of GCL_PCL_CTYPES... ;; Loading #p"/build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_ctypes.o" -Compiling gazonk_335929_6.lsp. +Compiling gazonk_145383_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.12/pcl/gazonk_335929_6.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_335929_6.o" -start address -T 0xed3e40 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_335929_6.o" +Finished compiling /build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_6.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_6.o" +start address -T 0xed3e40 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_6.o" start address -T 0xed3710 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_ctypes.o" Compiling GCL_PCL_ENV... Compiling /build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_env.lisp. @@ -6321,13 +6356,13 @@ Finished compiling /build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_env.o. Loading binary of GCL_PCL_ENV... ;; Loading #p"/build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_env.o" -Compiling gazonk_335929_7.lsp. +Compiling gazonk_145383_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.12/pcl/gazonk_335929_7.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_335929_7.o" -start address -T 0xeda250 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_335929_7.o" +Finished compiling /build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_7.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_7.o" +start address -T 0xeda250 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_145383_7.o" Warning: DESCRIBE is being redefined. start address -T 0xed46a0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_env.o" Compiling GCL_PCL_COMPAT... @@ -7199,7 +7234,7 @@ /tmp/ >;; Loading "../tkl.o" -start address -T 0x117f0b0 ;; Finished loading "../tkl.o" +start address -T 0x117eb00 ;; Finished loading "../tkl.o" 80871 > @@ -7209,13 +7244,13 @@ cd info && /usr/bin/make make[2]: Entering directory '/build/reproducible-path/gcl-2.6.12/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 @@ -9798,13 +9833,13 @@ cd info && /usr/bin/make make[2]: Entering directory '/build/reproducible-path/gcl-2.6.12/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 @@ -12670,20 +12705,20 @@ Finished compiling /build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_fixup.o. Loading binary of GCL_PCL_FIXUP... ;; Loading #p"/build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_fixup.o" -Compiling gazonk_400607_0.lsp. +Compiling gazonk_196950_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.12/pcl/gazonk_400607_0.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_400607_0.o" -start address -T 0xecbb50 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_400607_0.o" -Compiling gazonk_400607_1.lsp. +Finished compiling /build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_0.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_0.o" +start address -T 0xecbb50 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_0.o" +Compiling gazonk_196950_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.12/pcl/gazonk_400607_1.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_400607_1.o" -start address -T 0xecc0f0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_400607_1.o" +Finished compiling /build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_1.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_1.o" +start address -T 0xecc0f0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_1.o" start address -T 0xecb9c0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_fixup.o" Compiling GCL_PCL_DEFCOMBIN... Compiling /build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_defcombin.lisp. @@ -12693,34 +12728,34 @@ Finished compiling /build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_defcombin.o. Loading binary of GCL_PCL_DEFCOMBIN... ;; Loading #p"/build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_defcombin.o" -Compiling gazonk_400607_2.lsp. +Compiling gazonk_196950_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.12/pcl/gazonk_400607_2.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_400607_2.o" -start address -T 0xed06b0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_400607_2.o" -Compiling gazonk_400607_3.lsp. +Finished compiling /build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_2.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_2.o" +start address -T 0xed06b0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_2.o" +Compiling gazonk_196950_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.12/pcl/gazonk_400607_3.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_400607_3.o" -start address -T 0xed17b0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_400607_3.o" -Compiling gazonk_400607_4.lsp. +Finished compiling /build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_3.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_3.o" +start address -T 0xed17b0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_3.o" +Compiling gazonk_196950_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.12/pcl/gazonk_400607_4.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_400607_4.o" -start address -T 0xed24e0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_400607_4.o" -Compiling gazonk_400607_5.lsp. +Finished compiling /build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_4.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_4.o" +start address -T 0xed24e0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_4.o" +Compiling gazonk_196950_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.12/pcl/gazonk_400607_5.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_400607_5.o" -start address -T 0xed2d20 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_400607_5.o" +Finished compiling /build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_5.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_5.o" +start address -T 0xed2d20 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_5.o" start address -T 0xecc670 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_defcombin.o" Compiling GCL_PCL_CTYPES... Compiling /build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_ctypes.lisp. @@ -12730,13 +12765,13 @@ Finished compiling /build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_ctypes.o. Loading binary of GCL_PCL_CTYPES... ;; Loading #p"/build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_ctypes.o" -Compiling gazonk_400607_6.lsp. +Compiling gazonk_196950_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.12/pcl/gazonk_400607_6.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_400607_6.o" -start address -T 0xed3e40 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_400607_6.o" +Finished compiling /build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_6.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_6.o" +start address -T 0xed3e40 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_6.o" start address -T 0xed3710 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_ctypes.o" Compiling GCL_PCL_ENV... Compiling /build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_env.lisp. @@ -12749,13 +12784,13 @@ Finished compiling /build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_env.o. Loading binary of GCL_PCL_ENV... ;; Loading #p"/build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_env.o" -Compiling gazonk_400607_7.lsp. +Compiling gazonk_196950_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.12/pcl/gazonk_400607_7.o. -;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_400607_7.o" -start address -T 0xeda250 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_400607_7.o" +Finished compiling /build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_7.o. +;; Loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_7.o" +start address -T 0xeda250 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/pcl/gazonk_196950_7.o" Warning: DESCRIBE is being redefined. start address -T 0xed46a0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.12/unixport/../pcl/gcl_pcl_env.o" Compiling GCL_PCL_COMPAT... @@ -13627,7 +13662,7 @@ /tmp/ >;; Loading "../tkl.o" -start address -T 0x117fdf0 ;; Finished loading "../tkl.o" +start address -T 0x1189230 ;; Finished loading "../tkl.o" 80871 > @@ -13637,13 +13672,13 @@ cd info && /usr/bin/make make[2]: Entering directory '/build/reproducible-path/gcl-2.6.12/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 @@ -13799,11 +13834,10 @@ ;; Note: Tail-recursive call of EQUALP-WITH-CASE was replaced by iteration. ;; 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.12/ansi-tests/rt.o. ;; Loading #p"rt.o" -start address -T 0x1187df0 ;; Finished loading #p"rt.o" +start address -T 0x118f230 ;; Finished loading #p"rt.o" ;; Loading "cl-test-package.lsp" ;; Finished loading "cl-test-package.lsp" ;; Loading "universe.lsp" @@ -13811,6 +13845,18 @@ Compiling random-aux.lsp. End of Pass 1. 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.12/ansi-tests/random-aux.o. +;; Loading #p"random-aux.o" +start address -T 0x11a7760 ;; 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.12 ANSI Fri Apr 22 15:51:11 UTC 2016 Source License: LGPL(gcl,gmp), GPL(unexec,bfd,xgcl) Binary License: GPL due to GPL'ed components: (XGCL READLINE UNEXEC) @@ -13836,7 +13882,7 @@ OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3 Finished compiling /build/reproducible-path/gcl-2.6.12/ansi-tests/rt.o. ;; Loading #p"rt.o" -start address -T 0x1187df0 ;; Finished loading #p"rt.o" +start address -T 0x118f230 ;; Finished loading #p"rt.o" ;; Loading "cl-test-package.lsp" ;; Finished loading "cl-test-package.lsp" ;; Loading "universe.lsp" @@ -13847,18 +13893,7 @@ OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3 Finished compiling /build/reproducible-path/gcl-2.6.12/ansi-tests/random-aux.o. ;; Loading #p"random-aux.o" -start address -T 0x11a0320 ;; 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. -OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3 -Finished compiling /build/reproducible-path/gcl-2.6.12/ansi-tests/random-aux.o. -;; Loading #p"random-aux.o" -start address -T 0x11a0320 ;; Finished loading #p"random-aux.o" +start address -T 0x11a7760 ;; Finished loading #p"random-aux.o" Compiling ansi-aux.lsp. ; (DEFUN CHECK-VALUES-LENGTH ...) is being compiled. ;; Warning: The ignored variable E is used. @@ -13869,14 +13904,14 @@ OPTIMIZE levels: Safety=3, Space=0, Speed=3 Finished compiling /build/reproducible-path/gcl-2.6.12/ansi-tests/ansi-aux.o. ;; Loading #p"ansi-aux.o" -start address -T 0x11b05a0 ;; Finished loading #p"ansi-aux.o" +start address -T 0x11b79e0 ;; 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.12/ansi-tests/ansi-aux.o. ;; Loading #p"ansi-aux.o" -start address -T 0x11b05a0 ;; Finished loading #p"ansi-aux.o" +start address -T 0x11b79e0 ;; Finished loading #p"ansi-aux.o" ;; Loading "cl-symbol-names.lsp" ;; Finished loading "cl-symbol-names.lsp" ;; Finished loading "gclload1.lsp" @@ -14371,7 +14406,389 @@ 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.7Doing 11799 pending tests of 11799 tests total. + 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.8Doing 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* @@ -16352,389 +16769,268 @@ CDR-SYMBOL-ERROR.2 LIST-LENGTH.4 LIST-LENGTH-SYMBOL LIST-LENGTH-DOTTED-LIST CAAR.ERROR.1 CAAR.ERROR.2 CADR.ERROR.1 CADR.ERROR.2 CDAR.ERROR.1 CDAR.ERROR.2 CDDR.ERROR.1 CDDR.ERROR.2 - CAAAR.ERROR.1 CAAAR.ERROR.2 - 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)))) + CAAAR.ERROR.1 CAAAR.ERROR.2 CAAAR.ERROR.3 CAADR.ERROR.1 CAADR.ERROR.2 + CAADR.ERROR.3 CADAR.ERROR.1 CADAR.ERROR.2 CADAR.ERROR.3 CADDR.ERROR.1 + CADDR.ERROR.2 CADDR.ERROR.3 CDAAR.ERROR.1 CDAAR.ERROR.2 CDAAR.ERROR.3 + CDADR.ERROR.1 CDADR.ERROR.2 CDADR.ERROR.3 CDDAR.ERROR.1 CDDAR.ERROR.2 + CDDAR.ERROR.3 CDDDR.ERROR.1 CDDDR.ERROR.2 CDDDR.ERROR.3 CAAAAR.ERROR.1 + CAAAAR.ERROR.2 CAAAAR.ERROR.3 CAAAAR.ERROR.4 CAAADR.ERROR.1 + CAAADR.ERROR.2 CAAADR.ERROR.3 CAAADR.ERROR.4 CAADAR.ERROR.1 + CAADAR.ERROR.2 CAADAR.ERROR.3 CAADAR.ERROR.4 CAADDR.ERROR.1 + CAADDR.ERROR.2 CAADDR.ERROR.3 CAADDR.ERROR.4 CADAAR.ERROR.1 + CADAAR.ERROR.2 CADAAR.ERROR.3 CADAAR.ERROR.4 CADADR.ERROR.1 + CADADR.ERROR.2 CADADR.ERROR.3 CADADR.ERROR.4 CADDAR.ERROR.1 + CADDAR.ERROR.2 CADDAR.ERROR.3 CADDAR.ERROR.4 CADDDR.ERROR.1 + CADDDR.ERROR.2 CADDDR.ERROR.3 CADDDR.ERROR.4 CDAAAR.ERROR.1 + CDAAAR.ERROR.2 CDAAAR.ERROR.3 CDAAAR.ERROR.4 CDAADR.ERROR.1 + CDAADR.ERROR.2 CDAADR.ERROR.3 CDAADR.ERROR.4 CDADAR.ERROR.1 + CDADAR.ERROR.2 CDADAR.ERROR.3 CDADAR.ERROR.4 CDADDR.ERROR.1 + CDADDR.ERROR.2 CDADDR.ERROR.3 CDADDR.ERROR.4 CDDAAR.ERROR.1 + CDDAAR.ERROR.2 CDDAAR.ERROR.3 CDDAAR.ERROR.4 CDDADR.ERROR.1 + CDDADR.ERROR.2 CDDADR.ERROR.3 CDDADR.ERROR.4 CDDDAR.ERROR.1 + CDDDAR.ERROR.2 CDDDAR.ERROR.3 CDDDAR.ERROR.4 CDDDDR.ERROR.1 + CDDDDR.ERROR.2 CDDDDR.ERROR.3 CDDDDR.ERROR.4 BUTLAST.1 BUTLAST.2 + BUTLAST.3 BUTLAST.4 BUTLAST.5 BUTLAST.ORDER.1 BUTLAST.ORDER.2 + BUTLAST.ERROR.1 BUTLAST.ERROR.2 BUTLAST.ERROR.3 BUTLAST.ERROR.4 + BUTLAST.ERROR.5 NBUTLAST.1 NBUTLAST.2 NBUTLAST.3 NBUTLAST.4 NBUTLAST.5 + NBUTLAST.6 NBUTLAST.ORDER.1 NBUTLAST.ORDER.2 NBUTLAST.ERROR.1 + NBUTLAST.ERROR.2 NBUTLAST.ERROR.3 NBUTLAST.ERROR.4 NBUTLAST.ERROR.5 + NBUTLAST.ERROR.6 NBUTLAST.ERROR.7 NBUTLAST.ERROR.8 NBUTLAST.ERROR.9 + NBUTLAST.ERROR.10 LAST.1 LAST.2 LAST.3 LAST.4 LAST.5 LAST.6 LAST.7 + LAST.8 LAST.9 LAST.10 LAST.ORDER.1 LAST.ORDER.2 LAST.ERROR.1 + LAST.ERROR.2 LAST.ERROR.3 LAST.ERROR.4 LAST.ERROR.5 LAST.ERROR.6 + LAST.ERROR.7 LAST.ERROR.8 LDIFF.1 LDIFF.2 LDIFF.3 LDIFF.4 LDIFF.5 + LDIFF.6 LDIFF.7 LDIFF.8 LDIFF.ORDER.1 LDIFF.ERROR.1 LDIFF.ERROR.2 + LDIFF.ERROR.3 LDIFF.ERROR.4 LDIFF.ERROR.5 LDIFF.ERROR.6 LDIFF.ERROR.7 + LDIFF.ERROR.8 TAILP.1 TAILP.2 TAILP.3 TAILP.4 TAILP.5 TAILP.ERROR.5 + TAILP.ERROR.6 TAILP.ERROR.7 TAILP.6 TAILP.ORDER.1 NTHCDR.ERROR.1 + NTHCDR.ERROR.2 NTHCDR.ERROR.3 NTHCDR.ERROR.4 NTHCDR.ERROR.5 + NTHCDR.ERROR.6 NTHCDR.ERROR.7 NTHCDR.ERROR.8 NTHCDR.ERROR.9 + NTHCDR.ERROR.10 NTHCDR.ERROR.11 NTHCDR.1 NTHCDR.2 NTHCDR.3 NTHCDR.4 + NTHCDR.5 NTHCDR.ORDER.1 REST.1 REST.ORDER.1 REST.ERROR.1 REST.ERROR.2 + MEMBER.1 MEMBER.2 MEMBER.3 MEMBER.4 MEMBER.5 MEMBER.6 MEMBER.7 + MEMBER.8 MEMBER.9 MEMBER.10 MEMBER.11 MEMBER.12 MEMBER.13 MEMBER.14 + MEMBER.15 MEMBER.16 MEMBER.16-A MEMBER.17 MEMBER.18 MEMBER.19 + MEMBER.ORDER.1 MEMBER.ORDER.2 MEMBER.ORDER.3 MEMBER.ORDER.4 + MEMBER.ORDER.5 MEMBER.ALLOW-OTHER-KEYS.1 MEMBER.ALLOW-OTHER-KEYS.2 + MEMBER.ALLOW-OTHER-KEYS.3 MEMBER.ALLOW-OTHER-KEYS.4 + MEMBER.ALLOW-OTHER-KEYS.5 MEMBER.KEYWORDS.6 MEMBER.ERROR.1 + MEMBER.ERROR.2 MEMBER.ERROR.3 MEMBER.ERROR.4 MEMBER.ERROR.5 + MEMBER.ERROR.6 MEMBER.ERROR.7 MEMBER.ERROR.8 MEMBER.ERROR.9 + MEMBER.ERROR.10 MEMBER.ERROR.11 MEMBER.ERROR.12 MEMBER.ERROR.13 + MEMBER.ERROR.14 MEMBER.ERROR.15 MEMBER.ERROR.16 MEMBER.ERROR.17 + MEMBER-IF.1 MEMBER-IF.2 MEMBER-IF.3 MEMBER-IF.4 MEMBER-IF.5 + MEMBER-IF.ORDER.1 MEMBER-IF.ORDER.2 MEMBER-IF.KEYWORDS.1 + MEMBER-IF.ALLOW-OTHER-KEYS.2 MEMBER-IF.ALLOW-OTHER-KEYS.3 + MEMBER-IF.ALLOW-OTHER-KEYS.4 MEMBER-IF.ALLOW-OTHER-KEYS.5 + MEMBER-IF.ALLOW-OTHER-KEYS.6 MEMBER-IF.ALLOW-OTHER-KEYS.7 + MEMBER-IF-NOT.1 MEMBER-IF-NOT.2 MEMBER-IF-NOT.3 MEMBER-IF-NOT.4 + MEMBER-IF-NOT.5 MEMBER-IF-NOT.ORDER.1 MEMBER-IF-NOT.ORDER.2 + MEMBER-IF-NOT.KEYWORDS.1 MEMBER-IF-NOT.ALLOW-OTHER-KEYS.2 + MEMBER-IF-NOT.ALLOW-OTHER-KEYS.3 MEMBER-IF-NOT.ALLOW-OTHER-KEYS.4 + MEMBER-IF-NOT.ALLOW-OTHER-KEYS.5 MEMBER-IF-NOT.ALLOW-OTHER-KEYS.6 + MEMBER-IF.ERROR.1 MEMBER-IF.ERROR.2 MEMBER-IF.ERROR.3 + MEMBER-IF.ERROR.4 MEMBER-IF.ERROR.5 MEMBER-IF.ERROR.6 + MEMBER-IF.ERROR.7 MEMBER-IF.ERROR.8 MEMBER-IF.ERROR.9 + MEMBER-IF.ERROR.10 MEMBER-IF-NOT.ERROR.1 MEMBER-IF-NOT.ERROR.2 + MEMBER-IF-NOT.ERROR.3 MEMBER-IF-NOT.ERROR.4 MEMBER-IF-NOT.ERROR.5 + MEMBER-IF-NOT.ERROR.6 MEMBER-IF-NOT.ERROR.7 MEMBER-IF-NOT.ERROR.8 + MEMBER-IF-NOT.ERROR.9 MEMBER-IF-NOT.ERROR.10 MAPC.1 MAPC.2 MAPC.3 + MAPC.4 MAPC.5 MAPC.6 MAPC.ORDER.1 MAPC.ERROR.1 MAPC.ERROR.2 + MAPC.ERROR.3 MAPC.ERROR.4 MAPC.ERROR.5 MAPC.ERROR.6 MAPC.ERROR.7 + MAPCAR.1 MAPCAR.2 MAPCAR.3 MAPCAR.4 MAPCAR.5 MAPCAR.6 MAPCAR.ORDER.1 + MAPCAR.ERROR.1 MAPCAR.ERROR.2 MAPCAR.ERROR.3 MAPCAR.ERROR.4 + MAPCAR.ERROR.5 MAPCAR.ERROR.6 MAPCAR.ERROR.7 MAPCAN.1 MAPCAN.2 + MAPCAN.3 MAPCAN.4 MAPCAN.5 MAPCAN.6 MAPCAN.ORDER.1 MAPCAN.8 MAPCAN.9 + MAPCAN.10 MAPCAN.11 MAPCAN.ERROR.1 MAPCAN.ERROR.2 MAPCAN.ERROR.3 + MAPCAN.ERROR.4 MAPCAN.ERROR.5 MAPCAN.ERROR.6 MAPCAN.ERROR.7 MAPL.1 + MAPL.2 MAPL.3 MAPL.4 MAPL.5 MAPL.ORDER.1 MAPL.ERROR.1 MAPL.ERROR.2 + MAPL.ERROR.3 MAPL.ERROR.4 MAPL.ERROR.5 MAPL.ERROR.6 MAPL.ERROR.7 + MAPLIST.1 MAPLIST.2 MAPLIST.3 MAPLIST.4 MAPLIST.5 MAPLIST.6 MAPLIST.7 + MAPLIST.ORDER.1 MAPLIST.ERROR.1 MAPLIST.ERROR.2 MAPLIST.ERROR.3 + MAPLIST.ERROR.4 MAPLIST.ERROR.5 MAPLIST.ERROR.6 MAPLIST.ERROR.7 + MAPLIST.ERROR.8 MAPLIST.ERROR.9 MAPLIST.ERROR.10 MAPCON.1 MAPCON.2 + MAPCON.3 MAPCON.4 MAPCON.ORDER.1 MAPCON.ERROR.1 MAPCON.ERROR.2 + MAPCON.ERROR.3 MAPCON.ERROR.4 MAPCON.ERROR.5 MAPCON.ERROR.6 + MAPCON.ERROR.7 ACONS.1 ACONS.2 ACONS.3 ACONS.4 ACONS.5 ACONS.6 + ACONS.ORDER.1 ACONS.ERROR.1 ACONS.ERROR.2 ACONS.ERROR.3 ACONS.ERROR.4 + ASSOC.1 ASSOC.2 ASSOC.3 ASSOC.4 ASSOC.5 ASSOC.6 ASSOC.7 ASSOC.8 + ASSOC.9 ASSOC.10 ASSOC.11 ASSOC.12 ASSOC.13 ASSOC.14 ASSOC.15 ASSOC.16 + ASSOC.17 ASSOC.18 ASSOC.19 ASSOC.20 ASSOC.21 ASSOC.22 ASSOC.23 + ASSOC.24 ASSOC.25 ASSOC.ORDER.1 ASSOC.ORDER.2 ASSOC.ORDER.3 + ASSOC.ORDER.4 ASSOC.ALLOW-OTHER-KEYS.1 ASSOC.ALLOW-OTHER-KEYS.2 + ASSOC.ALLOW-OTHER-KEYS.3 ASSOC.ALLOW-OTHER-KEYS.4 + ASSOC.ALLOW-OTHER-KEYS.5 ASSOC.KEYWORDS.6 ASSOC.KEYWORDS.7 + ASSOC.ERROR.1 ASSOC.ERROR.2 ASSOC.ERROR.3 ASSOC.ERROR.4 ASSOC.ERROR.5 + ASSOC.ERROR.6 ASSOC.ERROR.7 ASSOC.ERROR.8 ASSOC.ERROR.9 ASSOC-IF.1 + ASSOC-IF.2 ASSOC-IF.3 ASSOC-IF.4 ASSOC-IF.ORDER.1 ASSOC-IF.ORDER.2 + ASSOC-IF.ALLOW-OTHER-KEYS.1 ASSOC-IF.ALLOW-OTHER-KEYS.2 + ASSOC-IF.ALLOW-OTHER-KEYS.3 ASSOC-IF.ALLOW-OTHER-KEYS.4 + ASSOC-IF.ALLOW-OTHER-KEYS.5 ASSOC-IF.KEYWORDS.6 ASSOC-IF.KEYWORDS.7 + ASSOC-IF.ERROR.1 ASSOC-IF.ERROR.2 ASSOC-IF.ERROR.3 ASSOC-IF.ERROR.4 + ASSOC-IF.ERROR.5 ASSOC-IF.ERROR.6 ASSOC-IF.ERROR.7 ASSOC-IF.ERROR.8 + ASSOC-IF.ERROR.9 ASSOC-IF.ERROR.10 ASSOC-IF-NOT.1 ASSOC-IF-NOT.2 + ASSOC-IF-NOT.3 ASSOC-IF-NOT.4 ASSOC-IF-NOT.ORDER.1 + ASSOC-IF-NOT.ORDER.2 ASSOC-IF-NOT.ALLOW-OTHER-KEYS.1 + ASSOC-IF-NOT.ALLOW-OTHER-KEYS.2 ASSOC-IF-NOT.ALLOW-OTHER-KEYS.3 + ASSOC-IF-NOT.ALLOW-OTHER-KEYS.4 ASSOC-IF-NOT.ALLOW-OTHER-KEYS.5 + ASSOC-IF-NOT.KEYWORDS.6 ASSOC-IF-NOT.KEYWORDS.7 ASSOC-IF-NOT.ERROR.1 + ASSOC-IF-NOT.ERROR.2 ASSOC-IF-NOT.ERROR.3 ASSOC-IF-NOT.ERROR.4 + ASSOC-IF-NOT.ERROR.5 ASSOC-IF-NOT.ERROR.6 ASSOC-IF-NOT.ERROR.7 + ASSOC-IF-NOT.ERROR.8 ASSOC-IF-NOT.ERROR.9 ASSOC-IF-NOT.ERROR.10 + COPY-ALIST-1 COPY-ALIST.ERROR.1 COPY-ALIST.ERROR.2 PAIRLIS-1 PAIRLIS-2 + PAIRLIS-3 PAIRLIS-4 PAIRLIS.ERROR.1 PAIRLIS.ERROR.2 PAIRLIS.ERROR.3 + RASSOC.1 RASSOC.2 RASSOC.3 RASSOC.4 RASSOC.5 RASSOC.6 RASSOC.7 + RASSOC.8 RASSOC.9 RASSOC.10 RASSOC.11 RASSOC.12 RASSOC.13 RASSOC.14 + RASSOC.15 RASSOC.16 RASSOC.17 RASSOC.18 RASSOC.19 RASSOC.20 RASSOC.21 + RASSOC.22 RASSOC.23 RASSOC.24 RASSOC.25 RASSOC.ORDER.1 RASSOC.ORDER.2 + RASSOC.ORDER.3 RASSOC.ORDER.4 RASSOC.ALLOW-OTHER-KEYS.1 + RASSOC.ALLOW-OTHER-KEYS.2 RASSOC.ALLOW-OTHER-KEYS.3 + RASSOC.ALLOW-OTHER-KEYS.4 RASSOC.ALLOW-OTHER-KEYS.5 RASSOC.KEYWORDS.6 + RASSOC.ERROR.1 RASSOC.ERROR.2 RASSOC.ERROR.3 RASSOC.ERROR.4 + RASSOC.ERROR.5 RASSOC.ERROR.6 RASSOC.ERROR.7 RASSOC.ERROR.8 + RASSOC.ERROR.9 RASSOC-IF.1 RASSOC-IF.2 RASSOC-IF.3 RASSOC-IF.4 + RASSOC-IF.ORDER.1 RASSOC-IF.ORDER.2 RASSOC-IF.ALLOW-OTHER-KEYS.1 + RASSOC-IF.ALLOW-OTHER-KEYS.2 RASSOC-IF.ALLOW-OTHER-KEYS.3 + RASSOC-IF.ALLOW-OTHER-KEYS.4 RASSOC-IF.ALLOW-OTHER-KEYS.5 + RASSOC-IF.KEYWORDS.6 RASSOC-IF.ERROR.1 RASSOC-IF.ERROR.2 + RASSOC-IF.ERROR.3 RASSOC-IF.ERROR.4 RASSOC-IF.ERROR.5 + RASSOC-IF.ERROR.6 RASSOC-IF.ERROR.7 RASSOC-IF.ERROR.8 + RASSOC-IF.ERROR.9 RASSOC-IF.ERROR.10 RASSOC-IF-NOT.1 RASSOC-IF-NOT.2 + RASSOC-IF-NOT.3 RASSOC-IF-NOT.4 RASSOC-IF-NOT.ORDER.1 + RASSOC-IF-NOT.ORDER.2 RASSOC-IF-NOT.ALLOW-OTHER-KEYS.1 + RASSOC-IF-NOT.ALLOW-OTHER-KEYS.2 RASSOC-IF-NOT.ALLOW-OTHER-KEYS.3 + RASSOC-IF-NOT.ALLOW-OTHER-KEYS.4 RASSOC-IF-NOT.ALLOW-OTHER-KEYS.5 + RASSOC-IF-NOT.ALLOW-OTHER-KEYS.6 RASSOC-IF-NOT.KEYWORDS.7 + RASSOC-IF-NOT.ERROR.1 RASSOC-IF-NOT.ERROR.2 RASSOC-IF-NOT.ERROR.3 + RASSOC-IF-NOT.ERROR.4 RASSOC-IF-NOT.ERROR.5 RASSOC-IF-NOT.ERROR.6 + RASSOC-IF-NOT.ERROR.7 RASSOC-IF-NOT.ERROR.8 RASSOC-IF-NOT.ERROR.9 + RASSOC-IF-NOT.ERROR.10 GET-PROPERTIES.1 GET-PROPERTIES.2 + GET-PROPERTIES.3 GET-PROPERTIES.4 GET-PROPERTIES.5 GET-PROPERTIES.6 + GET-PROPERTIES.7 +Test GET-PROPERTIES.8 failed +Form: (GET-PROPERTIES '(1000000000000 B C D) (LIST (1+ 999999999999))) 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 + NIL +Actual values: 1000000000000 + B + (1000000000000 B C D). + GET-PROPERTIES.9 GET-PROPERTIES.ORDER.1 GET-PROPERTIES.ERROR.1 + GET-PROPERTIES.ERROR.2 GET-PROPERTIES.ERROR.3 GETF.1 GETF.2 GETF.3 + GETF.4 GETF.5 GETF.ORDER.1 GETF.ORDER.2 SETF-GETF.1 SETF-GETF.2 + SETF-GETF.3 SETF-GETF.4 SETF-GETF.5 SETF-GETF.ORDER.1 +Test SETF-GETF.ORDER.2 failed +Form: (LET ((P (LIST (COPY-LIST '(A 1 B 2)))) (I 0) X Y Z W) + (SETF (GETF (CAR (PROGN (SETF X (INCF I)) P)) + (PROGN (SETF Y (INCF I)) 'C) (SETF Z (INCF I))) + (PROGN (SETF W (INCF I)) 3)) + (AND (EQLT I 4) (EQLT X 1) (EQLT Y 2) (EQLT Z 3) (EQLT W 4) + (EQLT (GETF (CAR P) 'A) 1) (EQLT (GETF (CAR P) 'B) 2) + (EQLT (GETF (CAR P) 'C) 3) + (EQLT (LOOP + FOR + PTR + ON + (CAR P) + BY + #'CDDR + COUNT + (NOT (MEMBER (CAR PTR) '(A B C)))) + 0) + T)) +Expected value: T +Actual value: NIL. + INCF-GETF.1 INCF-GETF.2 PUSH-GETF.1 GETF.ERROR.1 GETF.ERROR.2 + GETF.ERROR.3 REMF.1 REMF.2 REMF.3 REMF.4 REMF.ORDER.1 INTERSECTION.1 + 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-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 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 + NINTERSECTION.ALLOW-OTHER-KEYS.1 NINTERSECTION.ALLOW-OTHER-KEYS.2 + NINTERSECTION.ALLOW-OTHER-KEYS.3 NINTERSECTION.ALLOW-OTHER-KEYS.4 + NINTERSECTION.ALLOW-OTHER-KEYS.5 NINTERSECTION.ALLOW-OTHER-KEYS.6 + NINTERSECTION.ALLOW-OTHER-KEYS.7 NINTERSECTION.KEYWORDS.8 + NINTERSECTION.ALLOW-OTHER-KEYS.9 NINTERSECTION.ERROR.1 + NINTERSECTION.ERROR.2 NINTERSECTION.ERROR.3 NINTERSECTION.ERROR.4 + NINTERSECTION.ERROR.5 NINTERSECTION.ERROR.6 NINTERSECTION.ERROR.7 + NINTERSECTION.ERROR.8 NINTERSECTION.ERROR.9 NINTERSECTION.ERROR.10 + UNION.1 UNION.2 UNION.3 UNION-4 UNION.5 UNION.6 UNION.6-A UNION.7 + UNION.8 UNION.9 UNION.10 UNION.11 UNION.12 UNION.13 UNION.14 UNION.15 + UNION.16 UNION.17 UNION.18 UNION.19 UNION.20 UNION.21 UNION.22 + UNION.23 UNION.24 UNION.25 UNION.26 UNION.27 UNION.28 UNION.29 + UNION.30 UNION.31 UNION.ORDER.1 UNION.ORDER.2 UNION.ORDER.3 + UNION.ALLOW-OTHER-KEYS.1 UNION.ALLOW-OTHER-KEYS.2 + UNION.ALLOW-OTHER-KEYS.3 UNION.ALLOW-OTHER-KEYS.4 + UNION.ALLOW-OTHER-KEYS.5 UNION.ALLOW-OTHER-KEYS.6 + UNION.ALLOW-OTHER-KEYS.7 UNION.KEYWORDS.9 UNION.ERROR.1 UNION.ERROR.2 + UNION.ERROR.3 UNION.ERROR.4 UNION.ERROR.5 UNION.ERROR.6 UNION.ERROR.7 + UNION.ERROR.8 UNION.ERROR.9 UNION.ERROR.10 NUNION.1 NUNION.2 NUNION.3 + NUNION.4 NUNION.5 NUNION.6 NUNION.6-A NUNION.7 NUNION.8 NUNION.9 + NUNION.10 NUNION.11 NUNION.12 NUNION.13 NUNION.14 NUNION.15 NUNION.16 + NUNION.17 NUNION.18 NUNION.19 NUNION.20 NUNION.21 NUNION.22 NUNION.23 + NUNION.24 NUNION.25 NUNION.26 NUNION.27 NUNION.28 NUNION.29 NUNION.30 + NUNION.31 NUNION.ORDER.1 NUNION.ORDER.2 NUNION.ORDER.3 + NUNION.ALLOW-OTHER-KEYS.1 NUNION.ALLOW-OTHER-KEYS.2 + NUNION.ALLOW-OTHER-KEYS.3 NUNION.ALLOW-OTHER-KEYS.4 + NUNION.ALLOW-OTHER-KEYS.5 NUNION.ALLOW-OTHER-KEYS.6 + NUNION.ALLOW-OTHER-KEYS.7 NUNION.KEYWORDS.9 NUNION.ERROR.1 + NUNION.ERROR.2 NUNION.ERROR.3 NUNION.ERROR.4 NUNION.ERROR.5 + NUNION.ERROR.6 NUNION.ERROR.7 NUNION.ERROR.8 NUNION.ERROR.9 + 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 FUNCTION.9 Test FUNCTION.10 failed Form: (LOOP FOR @@ -17827,250 +18123,7 @@ CDADAR.ERROR.EXCESS-ARGS CDADDR.ERROR.NO-ARGS CDADDR.ERROR.EXCESS-ARGS CDDAAR.ERROR.NO-ARGS CDDAAR.ERROR.EXCESS-ARGS CDDADR.ERROR.NO-ARGS CDDADR.ERROR.EXCESS-ARGS CDDDAR.ERROR.NO-ARGS CDDDAR.ERROR.EXCESS-ARGS - CDDDDR.ERROR.NO-ARGS CDDDDR.ERROR.EXCESS-ARGS NTH.1 CAAAR.ERROR.3 CAADR.ERROR.1 CAADR.ERROR.2 - CAADR.ERROR.3 CADAR.ERROR.1 CADAR.ERROR.2 CADAR.ERROR.3 CADDR.ERROR.1 - CADDR.ERROR.2 CADDR.ERROR.3 CDAAR.ERROR.1 CDAAR.ERROR.2 CDAAR.ERROR.3 - CDADR.ERROR.1 CDADR.ERROR.2 CDADR.ERROR.3 CDDAR.ERROR.1 CDDAR.ERROR.2 - CDDAR.ERROR.3 CDDDR.ERROR.1 CDDDR.ERROR.2 CDDDR.ERROR.3 CAAAAR.ERROR.1 - CAAAAR.ERROR.2 CAAAAR.ERROR.3 CAAAAR.ERROR.4 CAAADR.ERROR.1 - CAAADR.ERROR.2 CAAADR.ERROR.3 CAAADR.ERROR.4 CAADAR.ERROR.1 - CAADAR.ERROR.2 CAADAR.ERROR.3 CAADAR.ERROR.4 CAADDR.ERROR.1 - CAADDR.ERROR.2 CAADDR.ERROR.3 CAADDR.ERROR.4 CADAAR.ERROR.1 - CADAAR.ERROR.2 CADAAR.ERROR.3 CADAAR.ERROR.4 CADADR.ERROR.1 - CADADR.ERROR.2 CADADR.ERROR.3 CADADR.ERROR.4 CADDAR.ERROR.1 - CADDAR.ERROR.2 CADDAR.ERROR.3 CADDAR.ERROR.4 CADDDR.ERROR.1 - CADDDR.ERROR.2 CADDDR.ERROR.3 CADDDR.ERROR.4 CDAAAR.ERROR.1 - CDAAAR.ERROR.2 CDAAAR.ERROR.3 CDAAAR.ERROR.4 CDAADR.ERROR.1 - CDAADR.ERROR.2 CDAADR.ERROR.3 CDAADR.ERROR.4 CDADAR.ERROR.1 - CDADAR.ERROR.2 CDADAR.ERROR.3 CDADAR.ERROR.4 CDADDR.ERROR.1 - CDADDR.ERROR.2 CDADDR.ERROR.3 CDADDR.ERROR.4 CDDAAR.ERROR.1 - CDDAAR.ERROR.2 CDDAAR.ERROR.3 CDDAAR.ERROR.4 CDDADR.ERROR.1 - CDDADR.ERROR.2 CDDADR.ERROR.3 CDDADR.ERROR.4 CDDDAR.ERROR.1 - CDDDAR.ERROR.2 CDDDAR.ERROR.3 CDDDAR.ERROR.4 CDDDDR.ERROR.1 - CDDDDR.ERROR.2 CDDDDR.ERROR.3 CDDDDR.ERROR.4 BUTLAST.1 BUTLAST.2 - BUTLAST.3 BUTLAST.4 BUTLAST.5 BUTLAST.ORDER.1 BUTLAST.ORDER.2 - BUTLAST.ERROR.1 BUTLAST.ERROR.2 BUTLAST.ERROR.3 BUTLAST.ERROR.4 - BUTLAST.ERROR.5 NBUTLAST.1 NBUTLAST.2 NBUTLAST.3 NBUTLAST.4 NBUTLAST.5 - NBUTLAST.6 NBUTLAST.ORDER.1 NBUTLAST.ORDER.2 NBUTLAST.ERROR.1 - NBUTLAST.ERROR.2 NBUTLAST.ERROR.3 NBUTLAST.ERROR.4 NBUTLAST.ERROR.5 - NBUTLAST.ERROR.6 NBUTLAST.ERROR.7 NBUTLAST.ERROR.8 NBUTLAST.ERROR.9 - NBUTLAST.ERROR.10 LAST.1 LAST.2 LAST.3 LAST.4 LAST.5 LAST.6 LAST.7 - LAST.8 LAST.9 LAST.10 LAST.ORDER.1 LAST.ORDER.2 LAST.ERROR.1 - LAST.ERROR.2 LAST.ERROR.3 LAST.ERROR.4 LAST.ERROR.5 LAST.ERROR.6 - LAST.ERROR.7 LAST.ERROR.8 LDIFF.1 LDIFF.2 LDIFF.3 LDIFF.4 LDIFF.5 - LDIFF.6 LDIFF.7 LDIFF.8 LDIFF.ORDER.1 LDIFF.ERROR.1 LDIFF.ERROR.2 - LDIFF.ERROR.3 LDIFF.ERROR.4 LDIFF.ERROR.5 LDIFF.ERROR.6 LDIFF.ERROR.7 - LDIFF.ERROR.8 TAILP.1 TAILP.2 TAILP.3 TAILP.4 TAILP.5 TAILP.ERROR.5 - TAILP.ERROR.6 TAILP.ERROR.7 TAILP.6 TAILP.ORDER.1 NTHCDR.ERROR.1 - NTHCDR.ERROR.2 NTHCDR.ERROR.3 NTHCDR.ERROR.4 NTHCDR.ERROR.5 - NTHCDR.ERROR.6 NTHCDR.ERROR.7 NTHCDR.ERROR.8 NTHCDR.ERROR.9 - NTHCDR.ERROR.10 NTHCDR.ERROR.11 NTHCDR.1 NTHCDR.2 NTHCDR.3 NTHCDR.4 - NTHCDR.5 NTHCDR.ORDER.1 REST.1 REST.ORDER.1 REST.ERROR.1 REST.ERROR.2 - MEMBER.1 MEMBER.2 MEMBER.3 MEMBER.4 MEMBER.5 MEMBER.6 MEMBER.7 - MEMBER.8 MEMBER.9 MEMBER.10 MEMBER.11 MEMBER.12 MEMBER.13 MEMBER.14 - MEMBER.15 MEMBER.16 MEMBER.16-A MEMBER.17 MEMBER.18 MEMBER.19 - MEMBER.ORDER.1 MEMBER.ORDER.2 MEMBER.ORDER.3 MEMBER.ORDER.4 - MEMBER.ORDER.5 MEMBER.ALLOW-OTHER-KEYS.1 MEMBER.ALLOW-OTHER-KEYS.2 - MEMBER.ALLOW-OTHER-KEYS.3 MEMBER.ALLOW-OTHER-KEYS.4 - MEMBER.ALLOW-OTHER-KEYS.5 MEMBER.KEYWORDS.6 MEMBER.ERROR.1 - MEMBER.ERROR.2 MEMBER.ERROR.3 MEMBER.ERROR.4 MEMBER.ERROR.5 - MEMBER.ERROR.6 MEMBER.ERROR.7 MEMBER.ERROR.8 MEMBER.ERROR.9 - MEMBER.ERROR.10 MEMBER.ERROR.11 MEMBER.ERROR.12 MEMBER.ERROR.13 - MEMBER.ERROR.14 MEMBER.ERROR.15 MEMBER.ERROR.16 MEMBER.ERROR.17 - MEMBER-IF.1 MEMBER-IF.2 MEMBER-IF.3 MEMBER-IF.4 MEMBER-IF.5 - MEMBER-IF.ORDER.1 MEMBER-IF.ORDER.2 MEMBER-IF.KEYWORDS.1 - MEMBER-IF.ALLOW-OTHER-KEYS.2 MEMBER-IF.ALLOW-OTHER-KEYS.3 - MEMBER-IF.ALLOW-OTHER-KEYS.4 MEMBER-IF.ALLOW-OTHER-KEYS.5 - MEMBER-IF.ALLOW-OTHER-KEYS.6 MEMBER-IF.ALLOW-OTHER-KEYS.7 - MEMBER-IF-NOT.1 MEMBER-IF-NOT.2 MEMBER-IF-NOT.3 MEMBER-IF-NOT.4 - MEMBER-IF-NOT.5 MEMBER-IF-NOT.ORDER.1 MEMBER-IF-NOT.ORDER.2 - MEMBER-IF-NOT.KEYWORDS.1 MEMBER-IF-NOT.ALLOW-OTHER-KEYS.2 - MEMBER-IF-NOT.ALLOW-OTHER-KEYS.3 MEMBER-IF-NOT.ALLOW-OTHER-KEYS.4 - MEMBER-IF-NOT.ALLOW-OTHER-KEYS.5 MEMBER-IF-NOT.ALLOW-OTHER-KEYS.6 - MEMBER-IF.ERROR.1 MEMBER-IF.ERROR.2 MEMBER-IF.ERROR.3 - MEMBER-IF.ERROR.4 MEMBER-IF.ERROR.5 MEMBER-IF.ERROR.6 - MEMBER-IF.ERROR.7 MEMBER-IF.ERROR.8 MEMBER-IF.ERROR.9 - MEMBER-IF.ERROR.10 MEMBER-IF-NOT.ERROR.1 MEMBER-IF-NOT.ERROR.2 - MEMBER-IF-NOT.ERROR.3 MEMBER-IF-NOT.ERROR.4 MEMBER-IF-NOT.ERROR.5 - MEMBER-IF-NOT.ERROR.6 MEMBER-IF-NOT.ERROR.7 MEMBER-IF-NOT.ERROR.8 - MEMBER-IF-NOT.ERROR.9 MEMBER-IF-NOT.ERROR.10 MAPC.1 MAPC.2 MAPC.3 - MAPC.4 MAPC.5 MAPC.6 MAPC.ORDER.1 MAPC.ERROR.1 MAPC.ERROR.2 - MAPC.ERROR.3 MAPC.ERROR.4 MAPC.ERROR.5 MAPC.ERROR.6 MAPC.ERROR.7 - MAPCAR.1 MAPCAR.2 MAPCAR.3 MAPCAR.4 MAPCAR.5 MAPCAR.6 MAPCAR.ORDER.1 - MAPCAR.ERROR.1 MAPCAR.ERROR.2 MAPCAR.ERROR.3 MAPCAR.ERROR.4 - MAPCAR.ERROR.5 MAPCAR.ERROR.6 MAPCAR.ERROR.7 MAPCAN.1 MAPCAN.2 - MAPCAN.3 MAPCAN.4 MAPCAN.5 MAPCAN.6 MAPCAN.ORDER.1 MAPCAN.8 MAPCAN.9 - MAPCAN.10 MAPCAN.11 MAPCAN.ERROR.1 MAPCAN.ERROR.2 MAPCAN.ERROR.3 - MAPCAN.ERROR.4 MAPCAN.ERROR.5 MAPCAN.ERROR.6 MAPCAN.ERROR.7 MAPL.1 - MAPL.2 MAPL.3 MAPL.4 MAPL.5 MAPL.ORDER.1 MAPL.ERROR.1 MAPL.ERROR.2 - MAPL.ERROR.3 MAPL.ERROR.4 MAPL.ERROR.5 MAPL.ERROR.6 MAPL.ERROR.7 - MAPLIST.1 MAPLIST.2 MAPLIST.3 MAPLIST.4 MAPLIST.5 MAPLIST.6 MAPLIST.7 - MAPLIST.ORDER.1 MAPLIST.ERROR.1 MAPLIST.ERROR.2 MAPLIST.ERROR.3 - MAPLIST.ERROR.4 MAPLIST.ERROR.5 MAPLIST.ERROR.6 MAPLIST.ERROR.7 - MAPLIST.ERROR.8 MAPLIST.ERROR.9 MAPLIST.ERROR.10 MAPCON.1 MAPCON.2 - MAPCON.3 MAPCON.4 MAPCON.ORDER.1 MAPCON.ERROR.1 MAPCON.ERROR.2 - MAPCON.ERROR.3 MAPCON.ERROR.4 MAPCON.ERROR.5 MAPCON.ERROR.6 - MAPCON.ERROR.7 ACONS.1 ACONS.2 ACONS.3 ACONS.4 ACONS.5 ACONS.6 - ACONS.ORDER.1 ACONS.ERROR.1 ACONS.ERROR.2 ACONS.ERROR.3 ACONS.ERROR.4 - ASSOC.1 ASSOC.2 ASSOC.3 ASSOC.4 ASSOC.5 ASSOC.6 ASSOC.7 ASSOC.8 - ASSOC.9 ASSOC.10 ASSOC.11 ASSOC.12 ASSOC.13 ASSOC.14 ASSOC.15 ASSOC.16 - ASSOC.17 ASSOC.18 ASSOC.19 ASSOC.20 ASSOC.21 ASSOC.22 ASSOC.23 - ASSOC.24 ASSOC.25 ASSOC.ORDER.1 ASSOC.ORDER.2 ASSOC.ORDER.3 - ASSOC.ORDER.4 ASSOC.ALLOW-OTHER-KEYS.1 ASSOC.ALLOW-OTHER-KEYS.2 - ASSOC.ALLOW-OTHER-KEYS.3 ASSOC.ALLOW-OTHER-KEYS.4 - ASSOC.ALLOW-OTHER-KEYS.5 ASSOC.KEYWORDS.6 ASSOC.KEYWORDS.7 - ASSOC.ERROR.1 ASSOC.ERROR.2 ASSOC.ERROR.3 ASSOC.ERROR.4 ASSOC.ERROR.5 - ASSOC.ERROR.6 ASSOC.ERROR.7 ASSOC.ERROR.8 ASSOC.ERROR.9 ASSOC-IF.1 - ASSOC-IF.2 ASSOC-IF.3 ASSOC-IF.4 ASSOC-IF.ORDER.1 ASSOC-IF.ORDER.2 - ASSOC-IF.ALLOW-OTHER-KEYS.1 ASSOC-IF.ALLOW-OTHER-KEYS.2 - ASSOC-IF.ALLOW-OTHER-KEYS.3 ASSOC-IF.ALLOW-OTHER-KEYS.4 - ASSOC-IF.ALLOW-OTHER-KEYS.5 ASSOC-IF.KEYWORDS.6 ASSOC-IF.KEYWORDS.7 - ASSOC-IF.ERROR.1 ASSOC-IF.ERROR.2 ASSOC-IF.ERROR.3 ASSOC-IF.ERROR.4 - ASSOC-IF.ERROR.5 ASSOC-IF.ERROR.6 ASSOC-IF.ERROR.7 ASSOC-IF.ERROR.8 - ASSOC-IF.ERROR.9 ASSOC-IF.ERROR.10 ASSOC-IF-NOT.1 ASSOC-IF-NOT.2 - ASSOC-IF-NOT.3 ASSOC-IF-NOT.4 ASSOC-IF-NOT.ORDER.1 - ASSOC-IF-NOT.ORDER.2 ASSOC-IF-NOT.ALLOW-OTHER-KEYS.1 - ASSOC-IF-NOT.ALLOW-OTHER-KEYS.2 ASSOC-IF-NOT.ALLOW-OTHER-KEYS.3 - ASSOC-IF-NOT.ALLOW-OTHER-KEYS.4 ASSOC-IF-NOT.ALLOW-OTHER-KEYS.5 - ASSOC-IF-NOT.KEYWORDS.6 ASSOC-IF-NOT.KEYWORDS.7 ASSOC-IF-NOT.ERROR.1 - ASSOC-IF-NOT.ERROR.2 ASSOC-IF-NOT.ERROR.3 ASSOC-IF-NOT.ERROR.4 - ASSOC-IF-NOT.ERROR.5 ASSOC-IF-NOT.ERROR.6 ASSOC-IF-NOT.ERROR.7 - ASSOC-IF-NOT.ERROR.8 ASSOC-IF-NOT.ERROR.9 ASSOC-IF-NOT.ERROR.10 - COPY-ALIST-1 COPY-ALIST.ERROR.1 COPY-ALIST.ERROR.2 PAIRLIS-1 PAIRLIS-2 - PAIRLIS-3 PAIRLIS-4 PAIRLIS.ERROR.1 PAIRLIS.ERROR.2 PAIRLIS.ERROR.3 - RASSOC.1 RASSOC.2 RASSOC.3 RASSOC.4 RASSOC.5 RASSOC.6 RASSOC.7 - RASSOC.8 RASSOC.9 RASSOC.10 RASSOC.11 RASSOC.12 RASSOC.13 RASSOC.14 - RASSOC.15 RASSOC.16 RASSOC.17 RASSOC.18 RASSOC.19 RASSOC.20 RASSOC.21 - RASSOC.22 RASSOC.23 RASSOC.24 RASSOC.25 RASSOC.ORDER.1 RASSOC.ORDER.2 - RASSOC.ORDER.3 RASSOC.ORDER.4 RASSOC.ALLOW-OTHER-KEYS.1 - RASSOC.ALLOW-OTHER-KEYS.2 RASSOC.ALLOW-OTHER-KEYS.3 - RASSOC.ALLOW-OTHER-KEYS.4 RASSOC.ALLOW-OTHER-KEYS.5 RASSOC.KEYWORDS.6 - RASSOC.ERROR.1 RASSOC.ERROR.2 RASSOC.ERROR.3 RASSOC.ERROR.4 - RASSOC.ERROR.5 RASSOC.ERROR.6 RASSOC.ERROR.7 RASSOC.ERROR.8 - RASSOC.ERROR.9 RASSOC-IF.1 RASSOC-IF.2 RASSOC-IF.3 RASSOC-IF.4 - RASSOC-IF.ORDER.1 RASSOC-IF.ORDER.2 RASSOC-IF.ALLOW-OTHER-KEYS.1 - RASSOC-IF.ALLOW-OTHER-KEYS.2 RASSOC-IF.ALLOW-OTHER-KEYS.3 - RASSOC-IF.ALLOW-OTHER-KEYS.4 RASSOC-IF.ALLOW-OTHER-KEYS.5 - RASSOC-IF.KEYWORDS.6 RASSOC-IF.ERROR.1 RASSOC-IF.ERROR.2 - RASSOC-IF.ERROR.3 RASSOC-IF.ERROR.4 RASSOC-IF.ERROR.5 - RASSOC-IF.ERROR.6 RASSOC-IF.ERROR.7 RASSOC-IF.ERROR.8 - RASSOC-IF.ERROR.9 RASSOC-IF.ERROR.10 RASSOC-IF-NOT.1 RASSOC-IF-NOT.2 - RASSOC-IF-NOT.3 RASSOC-IF-NOT.4 RASSOC-IF-NOT.ORDER.1 - RASSOC-IF-NOT.ORDER.2 RASSOC-IF-NOT.ALLOW-OTHER-KEYS.1 - RASSOC-IF-NOT.ALLOW-OTHER-KEYS.2 RASSOC-IF-NOT.ALLOW-OTHER-KEYS.3 - RASSOC-IF-NOT.ALLOW-OTHER-KEYS.4 RASSOC-IF-NOT.ALLOW-OTHER-KEYS.5 - RASSOC-IF-NOT.ALLOW-OTHER-KEYS.6 RASSOC-IF-NOT.KEYWORDS.7 - RASSOC-IF-NOT.ERROR.1 RASSOC-IF-NOT.ERROR.2 RASSOC-IF-NOT.ERROR.3 - RASSOC-IF-NOT.ERROR.4 RASSOC-IF-NOT.ERROR.5 RASSOC-IF-NOT.ERROR.6 - RASSOC-IF-NOT.ERROR.7 RASSOC-IF-NOT.ERROR.8 RASSOC-IF-NOT.ERROR.9 - RASSOC-IF-NOT.ERROR.10 GET-PROPERTIES.1 GET-PROPERTIES.2 - GET-PROPERTIES.3 GET-PROPERTIES.4 GET-PROPERTIES.5 GET-PROPERTIES.6 - GET-PROPERTIES.7 -Test GET-PROPERTIES.8 failed -Form: (GET-PROPERTIES '(1000000000000 B C D) (LIST (1+ 999999999999))) -Expected values: NIL - NIL - NIL -Actual values: 1000000000000 - B - (1000000000000 B C D). - GET-PROPERTIES.9 GET-PROPERTIES.ORDER.1 GET-PROPERTIES.ERROR.1 - GET-PROPERTIES.ERROR.2 GET-PROPERTIES.ERROR.3 GETF.1 GETF.2 GETF.3 - GETF.4 GETF.5 GETF.ORDER.1 GETF.ORDER.2 SETF-GETF.1 SETF-GETF.2 - SETF-GETF.3 SETF-GETF.4 SETF-GETF.5 SETF-GETF.ORDER.1 -Test SETF-GETF.ORDER.2 failed -Form: (LET ((P (LIST (COPY-LIST '(A 1 B 2)))) (I 0) X Y Z W) - (SETF (GETF (CAR (PROGN (SETF X (INCF I)) P)) - (PROGN (SETF Y (INCF I)) 'C) (SETF Z (INCF I))) - (PROGN (SETF W (INCF I)) 3)) - (AND (EQLT I 4) (EQLT X 1) (EQLT Y 2) (EQLT Z 3) (EQLT W 4) - (EQLT (GETF (CAR P) 'A) 1) (EQLT (GETF (CAR P) 'B) 2) - (EQLT (GETF (CAR P) 'C) 3) - (EQLT (LOOP - FOR - PTR - ON - (CAR P) - BY - #'CDDR - COUNT - (NOT (MEMBER (CAR PTR) '(A B C)))) - 0) - T)) -Expected value: T -Actual value: NIL. - INCF-GETF.1 INCF-GETF.2 PUSH-GETF.1 GETF.ERROR.1 GETF.ERROR.2 - GETF.ERROR.3 REMF.1 REMF.2 REMF.3 REMF.4 REMF.ORDER.1 INTERSECTION.1 - 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-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 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 - NINTERSECTION.ALLOW-OTHER-KEYS.1 NINTERSECTION.ALLOW-OTHER-KEYS.2 - NINTERSECTION.ALLOW-OTHER-KEYS.3 NINTERSECTION.ALLOW-OTHER-KEYS.4 - NINTERSECTION.ALLOW-OTHER-KEYS.5 NINTERSECTION.ALLOW-OTHER-KEYS.6 - NINTERSECTION.ALLOW-OTHER-KEYS.7 NINTERSECTION.KEYWORDS.8 - NINTERSECTION.ALLOW-OTHER-KEYS.9 NINTERSECTION.ERROR.1 - NINTERSECTION.ERROR.2 NINTERSECTION.ERROR.3 NINTERSECTION.ERROR.4 - NINTERSECTION.ERROR.5 NINTERSECTION.ERROR.6 NINTERSECTION.ERROR.7 - NINTERSECTION.ERROR.8 NINTERSECTION.ERROR.9 NINTERSECTION.ERROR.10 - UNION.1 UNION.2 UNION.3 UNION-4 UNION.5 UNION.6 UNION.6-A UNION.7 - UNION.8 UNION.9 UNION.10 UNION.11 UNION.12 UNION.13 UNION.14 UNION.15 - UNION.16 UNION.17 UNION.18 UNION.19 UNION.20 UNION.21 UNION.22 - UNION.23 UNION.24 UNION.25 UNION.26 UNION.27 UNION.28 UNION.29 - UNION.30 UNION.31 UNION.ORDER.1 UNION.ORDER.2 UNION.ORDER.3 - UNION.ALLOW-OTHER-KEYS.1 UNION.ALLOW-OTHER-KEYS.2 - UNION.ALLOW-OTHER-KEYS.3 UNION.ALLOW-OTHER-KEYS.4 - UNION.ALLOW-OTHER-KEYS.5 UNION.ALLOW-OTHER-KEYS.6 - UNION.ALLOW-OTHER-KEYS.7 UNION.KEYWORDS.9 UNION.ERROR.1 UNION.ERROR.2 - UNION.ERROR.3 UNION.ERROR.4 UNION.ERROR.5 UNION.ERROR.6 UNION.ERROR.7 - UNION.ERROR.8 UNION.ERROR.9 UNION.ERROR.10 NUNION.1 NUNION.2 NUNION.3 - NUNION.4 NUNION.5 NUNION.6 NUNION.6-A NUNION.7 NUNION.8 NUNION.9 - NUNION.10 NUNION.11 NUNION.12 NUNION.13 NUNION.14 NUNION.15 NUNION.16 - NUNION.17 NUNION.18 NUNION.19 NUNION.20 NUNION.21 NUNION.22 NUNION.23 - NUNION.24 NUNION.25 NUNION.26 NUNION.27 NUNION.28 NUNION.29 NUNION.30 - NUNION.31 NUNION.ORDER.1 NUNION.ORDER.2 NUNION.ORDER.3 - NUNION.ALLOW-OTHER-KEYS.1 NUNION.ALLOW-OTHER-KEYS.2 - NUNION.ALLOW-OTHER-KEYS.3 NUNION.ALLOW-OTHER-KEYS.4 - NUNION.ALLOW-OTHER-KEYS.5 NUNION.ALLOW-OTHER-KEYS.6 - NUNION.ALLOW-OTHER-KEYS.7 NUNION.KEYWORDS.9 NUNION.ERROR.1 - NUNION.ERROR.2 NUNION.ERROR.3 NUNION.ERROR.4 NUNION.ERROR.5 - NUNION.ERROR.6 NUNION.ERROR.7 NUNION.ERROR.8 NUNION.ERROR.9 - 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 NTH.2 NTH.ORDER.1 + CDDDDR.ERROR.NO-ARGS CDDDDR.ERROR.EXCESS-ARGS NTH.1 NTH.2 NTH.ORDER.1 NTH.ORDER.2 NTH.ERROR.1 NTH.ERROR.2 NTH.ERROR.3 NTH.ERROR.4 ENDP-NIL ENDP-CONS ENDP-SINGLETON-LIST ENDP.ORDER.1 ENDP-SYMBOL-ERROR ENDP-FIXNUM-ERROR ENDP-FLOAT-ERROR ENDP.ERROR.4 ENDP.ERROR.5 @@ -18366,44 +18419,6 @@ 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-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 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 @@ -19725,10 +19740,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"" @@ -19736,7 +19751,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) @@ -19745,7 +19760,7 @@ # # (SYSTEM:LAMBDA-CLOSURE () () () (X) X) - #$53844700631184120477293851828001416840141653829266131430165654037529971840644359673163102443773915065352127058383938365165223082803860980726410614859997987156111020149968866275960512823235129272646826421356326462765577855472955748326692788106735437135139334812993433603330251505235155540601641562988216777161569816084569996023448798272056733608842706459675957493199403648797589142648814636793686598676944838672397754947279562900379430780121083599837933646880486563093643733565695782727923297044357851425320231046256390265621096231652069942799006141442001068127011464934891996277207925460424603177941193453342334875621861442647187342646632828519713353623621332978784395971739305268200861455014409843902775899615969211966793031265435078887849156139701218374794478483288371132662292548522021612736597096197383721447995436067120829776955315632220874466101282405267863140870837882944016259568897843075916719460717100593053179555148807205690229139074554158075883840165834877753023853344324365083982767239223798726559873064679077640414284555544139288868127343185841245319147474761836508112845872753416214027675763184923957167377358461128690975435094984124063382460601186926381935630288213990827952644876679907331922272843645839473387208450780320530178653930417337648345333552991118092495773318329073870534320629084412819392073684694546980739183731757448355356095715401093167941103826553152612922487194602240596749464550007501193836189980760555796367692430589494273989970551374867699002024049989474831594532629613355430969865150975938267629736170882413406228411177735399378454922417266589468264411779566016206356355583005567787628728823719120721917456170404381440417753866648171273385338753565809172766533122425573632073436515649239151456517095599102122988665925438922787385493593077177756679902429965054117489683085162560026490854241826949624406409531568039684397054806641142370460646584176519823943085602618389617600012838540563060241515478831141094308563452652324742301675998254718967273171472774407758778285507272722697781273697043262506993577473761557254198420209911936656522238520224057855927605958712965168051540006661681209329451076121375602634044375304332214537225043518105534397014374493791061790536759301861447275063315831650608943372107000190739723329418466322257987607582906201506012482163631039815437207263562916731313093229005807440810464475250036590218632891803943751213969266891766231081401604341236734722339184395777194025702375149394328207948286884085822873846049715018225962791716249168401733478089670165356258378087333267439649925153978708774214615604530697595222023927418866406299783659509585983987472488628101410356164443944905605908331062050561158873087391377535852276205083135182926735181454723272730327464703198728767066279297300113194118977096634089193729176812373709134941221486005007668971040272965580231610908947206104773564926189260402872270162026669562446535838162440325987074874584671137670615684904121207981319381143262050529936176798742129062855704384773503654856047210269710691434814394875928615839129111641900595022391138577362391478474136683534172348562939451299866363760287024301717794847183257618453412531642075281339598108894992828865660828692257096725108240813634224584329582358837333831825298004182657065649679594415670790284163798413362034044194657241188481814415183438682242132349594049049537967813341433837543605581996010936582019133023865180614232294010057748093045339521690091156501478460995860434870350473309923639177172380524550461420112460401139813066545964537369787158900358371386615772408434961220517071447355330204394611774924944309964363114198876612817185213756103608828484436593290566013781162758780695418994607561428177389820014256676068676974439689939916204444750565202244700880319947955909517030959608391922571492655226566862524105902574804794338504797273382445305945611748261100300104793389585875092629277380208905100668505339200776162151809084198957880729816132896283966298687794833592524027588607133514947280515299198278344587468402705902503356431268351868577289405662745934186170882074813222059455137133362401335699054437970262022571552643179172160074068598583746961851079261895953269563907151313812631656783013377297127589753588210880963268528733875975613638024098646686414575601041224824297368752543079071247748215148187850798962478966586295480100946075790527130459275454947941788871945122798564591208009236598970173330257201493093993680038982599410144389850543237458745586085071652540951206259989472656983683327445497069402306948043121628643543609524827615850909858367177578794893956526414951925325341617903256493544434986813131759075570714977536528181908597444755885235238226378109350660172895103334621284222591406705108703566603703604790392524966401258630351118820073830889730201905112615121294045872396493669827002258592115052762539047561644953462965734746374592449107977328325340302773153129565747817771659379159140140257616772320483207032741037516246287032011102251363670744467084272178284394334795006461977700540884196165134781370008864736278032162029627448864650888751203334277735472317577778807898422983094412964341113161947691813913898290206736874223001543672086457477708216377822583817700092717759442319246146698207963127134468565020396892983921294636566274075142923300684141257636454677927914800153263322934829901519150698901371380135804855261164194692040927098191376523646667782148398892768401356923532682219726176662984519135317356072408735065934718996985317814544617893616699456060148954974537542958678145820291857935944213265071660528825994406647951453340290422172479957150700833111501665024397449167199781517350265905070461100924660804722861374925942500551529446751620193626310388221708632822774723929241502141862741039785443047760226842739523954762445157571268470480329799940033856894980936783337558847452546638187853740812726757923060610991865624386657919673655933257405225793188728221868193095845255534350277876991761593827176746976123532769219750368729616397952795088615613347586502877362686716667434590977296384873075907458438056920792). + #$25955007767268251188340144741273950822608184252183162137282043977306350808608806536821205197937077805348466205949077201503553486517311372924080793936976793140754147438057664020032409561595159577125719668384365220746222819513795033854999955351067335522057012915321017262285326935914192488445225443273804152569909831578638212144701735807360274870271377570151946207832614887151083752684429295194531515425417482489177918189811076095574234521589819137449815947562999996225210065239351532857787895440311158448094816247121462695072930744457898840007623540388903537389132141412317816096369000642361931437208920232391460607949848670754360909302374027326728576757028951863402281965168686758467214215356528770873391436075405749452618762283002677862716700919530630854918569370273633179680218926029398425792140674330483283059759003343932707015154868170690542269483736244665909000758265255030192041599262471497895567005804431594615998493224732669484663850630174608566394260047619445858743968752920756589919212781981727923802025538044996574278827039038535147041259381362452873728757969692708389101377985818095648234950176076685665041664030029904097572679911846563229097422495462396627613352319671234201755945658967296827054510321586266945668295418030129230805352026212377866073218404663890040533269446126217626124456129883676754113453643791800801572463390716646390693858211491710649753498698715503300882740061307061789157003811079341508569322518903786151009632766646822492667786448599198721865415515281009742957316999348781782106437318328022623884317636506670961370705272428458179812340213528903784826992548656627733084114909387117939117485739811469414141545714461171293997020248587560804648469465850608449749675040376120179653445164340937969247112700110828214677447630165197155652629767870998045513237713083839362552244188843226766588840847538502570296103211472049172733403546012438827764507149704216160012492377542151241103901672263751280777560291389452292853536138708464872835399252469796834687559894261106139968460294847920977218530037510614523629235152543293233667187648810241397970485195032045199165719561381008808192686932884218422629468157853438771875972715866531489733511612597851731177080262906231128977037553228331295808821333711755153107048407559195949751721186618229118634261436870577438243655975534616442805583199739298926051947978735559596467104141031008553505014415942569773559750412035380535967492402077185766637964852387730234553736519253544361824891209346210595405598073025710463797892622746570676722285261765520175885622253454909138127580524639046010528762520728954907570372009912953344080220270254634609851102329487550460731592190701924382828836494093099434497687688321907975111190279429770055178082500125916234525214931920480939067186772159596836766841472125460089431466914298330952996008377674969785327226084565087377447404892827713008156874745346014362371545693737652404081005000462212285246119506195944083277916829775837170335832094548378141092162091859128494498840134542678205148325379333421152461602280283994954858344480158760979493689273770242848663004188778283351043766041614003116092859089107910275687375181328073144612862935579386291983124436570896360149219096258330755466024403984776104616315120107399859484697738582819311082111941804507020812956976413581681287117910452664509244770517260710959143061926570368120781407962235938651477459134489837449946020133862763380101956670661677940569664184608487188034289119239312463423741742581669837702167998411467667717437288615800357670478494352863823254929526338097518432040205797612988187218877586864009264461630927798941191833557872660683614764155820197882591226109617733620133663017041161847356642887766613707503656164527559693451137626214386762916393722246968653402743582370588700649195493291516170041499115631317086905770606947384682163218920764655359569953952975942382864185007389995834232437180166372287623313613592245120898784946393740158272214214752319502314456312419688853343447122083153425374280173795103922991201637748683005286652819142958871968361289736294048699426991432567832475062275000295935588791626263428145449875188704527036485446295693664625759772630793534612903241809104313890121128803269490032690450994530587974555073420255207789151341148395304850846294835965664971750465330148119053298187101787162231812901259451447771912491107274868631498758492051441955414047455667655572749316606020745233589312049218416861168930473834634571983857000045651787804010731237829437562592760674849331520645427539184235253623955192566073065962355699282030188055342454553006139523418049389271555699321529216161613439416945362583248241608312656506212522562962231340141757261915804369622813382560874883329739061477816807200755353858331487307524478453206182141012883678859175889337340333807757949224948227824722109230488534594039030719601569046974674117405059946666929668276991058300622549907889120641336765116537595851486991535130006528014655761481711871577992033282238929464741347261556072124032765848920380049836397209374557464756210292208581967447997775201648177266173196838686424800107759008780442081307337106064960199634401248150212401409146698649097881770061802582730589490132509417206773322038585645951151195936062435427739134150685317293234188317849544818002445021594883759586044524173270457798540487877030083445012538305162531331291555097401667518479956039386978453823547408730847234893758566265663614019156082452203752541401532472470123338868308771987282173037112243356752577905927857150792413428438218160448098414164290032506896649777414279118464726745066253345604230781205625625790977678441850766506454398612135776314550359983947007062101884355104616939280397854198622770730534694957295006472665343924211764308680995216142134416050649649547603422420245028065074606787398623627509915846459808362586923305824623379062969772649995070070100372916925900653807020020197660094989326752280585629886769352557927035062342722072169055109030899523308429084939572356991764454294699004421936417203230485674198741430446969359980304580530364332946878013977956). 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 @@ -20068,7 +20083,104 @@ Package #<"LOOP.CL-TEST.2" package> Package #<"LOOP.CL-TEST.1" package> Package #<"CL-TEST" package> - NSET-EXCLUSIVE-OR.13 NSET-EXCLUSIVE-OR.14 +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 +Test IN-PACKAGE.2 failed +Form: (LET ((*PACKAGE* *PACKAGE*)) + (DECLARE (SPECIAL *PACKAGE*)) + (LET ((P2 (IN-PACKAGE A))) + (AND (EQT P2 (FIND-PACKAGE "A")) (EQT *PACKAGE* P2)))) +Expected value: T +Actual value: #. + IN-PACKAGE.3 IN-PACKAGE.4 +Test IN-PACKAGE.5 failed +Form: (LET ((*PACKAGE* *PACKAGE*)) + (DECLARE (SPECIAL *PACKAGE*)) + (SAFELY-DELETE-PACKAGE "H") + (HANDLER-CASE (EVAL '(IN-PACKAGE "H")) + (PACKAGE-ERROR NIL 'PACKAGE-ERROR) (ERROR (C) C))) +Expected value: PACKAGE-ERROR +Actual value: #<"H" package>. + 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 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 @@ -21389,10 +21501,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"" @@ -21400,7 +21512,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) @@ -21409,7 +21521,7 @@ # # (SYSTEM:LAMBDA-CLOSURE () () () (X) X) - #$53844700631184120477293851828001416840141653829266131430165654037529971840644359673163102443773915065352127058383938365165223082803860980726410614859997987156111020149968866275960512823235129272646826421356326462765577855472955748326692788106735437135139334812993433603330251505235155540601641562988216777161569816084569996023448798272056733608842706459675957493199403648797589142648814636793686598676944838672397754947279562900379430780121083599837933646880486563093643733565695782727923297044357851425320231046256390265621096231652069942799006141442001068127011464934891996277207925460424603177941193453342334875621861442647187342646632828519713353623621332978784395971739305268200861455014409843902775899615969211966793031265435078887849156139701218374794478483288371132662292548522021612736597096197383721447995436067120829776955315632220874466101282405267863140870837882944016259568897843075916719460717100593053179555148807205690229139074554158075883840165834877753023853344324365083982767239223798726559873064679077640414284555544139288868127343185841245319147474761836508112845872753416214027675763184923957167377358461128690975435094984124063382460601186926381935630288213990827952644876679907331922272843645839473387208450780320530178653930417337648345333552991118092495773318329073870534320629084412819392073684694546980739183731757448355356095715401093167941103826553152612922487194602240596749464550007501193836189980760555796367692430589494273989970551374867699002024049989474831594532629613355430969865150975938267629736170882413406228411177735399378454922417266589468264411779566016206356355583005567787628728823719120721917456170404381440417753866648171273385338753565809172766533122425573632073436515649239151456517095599102122988665925438922787385493593077177756679902429965054117489683085162560026490854241826949624406409531568039684397054806641142370460646584176519823943085602618389617600012838540563060241515478831141094308563452652324742301675998254718967273171472774407758778285507272722697781273697043262506993577473761557254198420209911936656522238520224057855927605958712965168051540006661681209329451076121375602634044375304332214537225043518105534397014374493791061790536759301861447275063315831650608943372107000190739723329418466322257987607582906201506012482163631039815437207263562916731313093229005807440810464475250036590218632891803943751213969266891766231081401604341236734722339184395777194025702375149394328207948286884085822873846049715018225962791716249168401733478089670165356258378087333267439649925153978708774214615604530697595222023927418866406299783659509585983987472488628101410356164443944905605908331062050561158873087391377535852276205083135182926735181454723272730327464703198728767066279297300113194118977096634089193729176812373709134941221486005007668971040272965580231610908947206104773564926189260402872270162026669562446535838162440325987074874584671137670615684904121207981319381143262050529936176798742129062855704384773503654856047210269710691434814394875928615839129111641900595022391138577362391478474136683534172348562939451299866363760287024301717794847183257618453412531642075281339598108894992828865660828692257096725108240813634224584329582358837333831825298004182657065649679594415670790284163798413362034044194657241188481814415183438682242132349594049049537967813341433837543605581996010936582019133023865180614232294010057748093045339521690091156501478460995860434870350473309923639177172380524550461420112460401139813066545964537369787158900358371386615772408434961220517071447355330204394611774924944309964363114198876612817185213756103608828484436593290566013781162758780695418994607561428177389820014256676068676974439689939916204444750565202244700880319947955909517030959608391922571492655226566862524105902574804794338504797273382445305945611748261100300104793389585875092629277380208905100668505339200776162151809084198957880729816132896283966298687794833592524027588607133514947280515299198278344587468402705902503356431268351868577289405662745934186170882074813222059455137133362401335699054437970262022571552643179172160074068598583746961851079261895953269563907151313812631656783013377297127589753588210880963268528733875975613638024098646686414575601041224824297368752543079071247748215148187850798962478966586295480100946075790527130459275454947941788871945122798564591208009236598970173330257201493093993680038982599410144389850543237458745586085071652540951206259989472656983683327445497069402306948043121628643543609524827615850909858367177578794893956526414951925325341617903256493544434986813131759075570714977536528181908597444755885235238226378109350660172895103334621284222591406705108703566603703604790392524966401258630351118820073830889730201905112615121294045872396493669827002258592115052762539047561644953462965734746374592449107977328325340302773153129565747817771659379159140140257616772320483207032741037516246287032011102251363670744467084272178284394334795006461977700540884196165134781370008864736278032162029627448864650888751203334277735472317577778807898422983094412964341113161947691813913898290206736874223001543672086457477708216377822583817700092717759442319246146698207963127134468565020396892983921294636566274075142923300684141257636454677927914800153263322934829901519150698901371380135804855261164194692040927098191376523646667782148398892768401356923532682219726176662984519135317356072408735065934718996985317814544617893616699456060148954974537542958678145820291857935944213265071660528825994406647951453340290422172479957150700833111501665024397449167199781517350265905070461100924660804722861374925942500551529446751620193626310388221708632822774723929241502141862741039785443047760226842739523954762445157571268470480329799940033856894980936783337558847452546638187853740812726757923060610991865624386657919673655933257405225793188728221868193095845255534350277876991761593827176746976123532769219750368729616397952795088615613347586502877362686716667434590977296384873075907458438056920792). + #$25955007767268251188340144741273950822608184252183162137282043977306350808608806536821205197937077805348466205949077201503553486517311372924080793936976793140754147438057664020032409561595159577125719668384365220746222819513795033854999955351067335522057012915321017262285326935914192488445225443273804152569909831578638212144701735807360274870271377570151946207832614887151083752684429295194531515425417482489177918189811076095574234521589819137449815947562999996225210065239351532857787895440311158448094816247121462695072930744457898840007623540388903537389132141412317816096369000642361931437208920232391460607949848670754360909302374027326728576757028951863402281965168686758467214215356528770873391436075405749452618762283002677862716700919530630854918569370273633179680218926029398425792140674330483283059759003343932707015154868170690542269483736244665909000758265255030192041599262471497895567005804431594615998493224732669484663850630174608566394260047619445858743968752920756589919212781981727923802025538044996574278827039038535147041259381362452873728757969692708389101377985818095648234950176076685665041664030029904097572679911846563229097422495462396627613352319671234201755945658967296827054510321586266945668295418030129230805352026212377866073218404663890040533269446126217626124456129883676754113453643791800801572463390716646390693858211491710649753498698715503300882740061307061789157003811079341508569322518903786151009632766646822492667786448599198721865415515281009742957316999348781782106437318328022623884317636506670961370705272428458179812340213528903784826992548656627733084114909387117939117485739811469414141545714461171293997020248587560804648469465850608449749675040376120179653445164340937969247112700110828214677447630165197155652629767870998045513237713083839362552244188843226766588840847538502570296103211472049172733403546012438827764507149704216160012492377542151241103901672263751280777560291389452292853536138708464872835399252469796834687559894261106139968460294847920977218530037510614523629235152543293233667187648810241397970485195032045199165719561381008808192686932884218422629468157853438771875972715866531489733511612597851731177080262906231128977037553228331295808821333711755153107048407559195949751721186618229118634261436870577438243655975534616442805583199739298926051947978735559596467104141031008553505014415942569773559750412035380535967492402077185766637964852387730234553736519253544361824891209346210595405598073025710463797892622746570676722285261765520175885622253454909138127580524639046010528762520728954907570372009912953344080220270254634609851102329487550460731592190701924382828836494093099434497687688321907975111190279429770055178082500125916234525214931920480939067186772159596836766841472125460089431466914298330952996008377674969785327226084565087377447404892827713008156874745346014362371545693737652404081005000462212285246119506195944083277916829775837170335832094548378141092162091859128494498840134542678205148325379333421152461602280283994954858344480158760979493689273770242848663004188778283351043766041614003116092859089107910275687375181328073144612862935579386291983124436570896360149219096258330755466024403984776104616315120107399859484697738582819311082111941804507020812956976413581681287117910452664509244770517260710959143061926570368120781407962235938651477459134489837449946020133862763380101956670661677940569664184608487188034289119239312463423741742581669837702167998411467667717437288615800357670478494352863823254929526338097518432040205797612988187218877586864009264461630927798941191833557872660683614764155820197882591226109617733620133663017041161847356642887766613707503656164527559693451137626214386762916393722246968653402743582370588700649195493291516170041499115631317086905770606947384682163218920764655359569953952975942382864185007389995834232437180166372287623313613592245120898784946393740158272214214752319502314456312419688853343447122083153425374280173795103922991201637748683005286652819142958871968361289736294048699426991432567832475062275000295935588791626263428145449875188704527036485446295693664625759772630793534612903241809104313890121128803269490032690450994530587974555073420255207789151341148395304850846294835965664971750465330148119053298187101787162231812901259451447771912491107274868631498758492051441955414047455667655572749316606020745233589312049218416861168930473834634571983857000045651787804010731237829437562592760674849331520645427539184235253623955192566073065962355699282030188055342454553006139523418049389271555699321529216161613439416945362583248241608312656506212522562962231340141757261915804369622813382560874883329739061477816807200755353858331487307524478453206182141012883678859175889337340333807757949224948227824722109230488534594039030719601569046974674117405059946666929668276991058300622549907889120641336765116537595851486991535130006528014655761481711871577992033282238929464741347261556072124032765848920380049836397209374557464756210292208581967447997775201648177266173196838686424800107759008780442081307337106064960199634401248150212401409146698649097881770061802582730589490132509417206773322038585645951151195936062435427739134150685317293234188317849544818002445021594883759586044524173270457798540487877030083445012538305162531331291555097401667518479956039386978453823547408730847234893758566265663614019156082452203752541401532472470123338868308771987282173037112243356752577905927857150792413428438218160448098414164290032506896649777414279118464726745066253345604230781205625625790977678441850766506454398612135776314550359983947007062101884355104616939280397854198622770730534694957295006472665343924211764308680995216142134416050649649547603422420245028065074606787398623627509915846459808362586923305824623379062969772649995070070100372916925900653807020020197660094989326752280585629886769352557927035062342722072169055109030899523308429084939572356991764454294699004421936417203230485674198741430446969359980304580530364332946878013977956). 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 @@ -22203,84 +22315,26 @@ 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.10Package #<"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 -Test IN-PACKAGE.2 failed -Form: (LET ((*PACKAGE* *PACKAGE*)) - (DECLARE (SPECIAL *PACKAGE*)) - (LET ((P2 (IN-PACKAGE A))) - (AND (EQT P2 (FIND-PACKAGE "A")) (EQT *PACKAGE* P2)))) -Expected value: T -Actual value: #. - IN-PACKAGE.3 IN-PACKAGE.4 -Test IN-PACKAGE.5 failed -Form: (LET ((*PACKAGE* *PACKAGE*)) - (DECLARE (SPECIAL *PACKAGE*)) - (SAFELY-DELETE-PACKAGE "H") - (HANDLER-CASE (EVAL '(IN-PACKAGE "H")) - (PACKAGE-ERROR NIL 'PACKAGE-ERROR) (ERROR (C) C))) -Expected value: PACKAGE-ERROR -Actual value: #<"H" package>. - 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 + 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 + 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 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 @@ -22690,21 +22744,6 @@ 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-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 - 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 @@ -23231,10 +23270,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 - 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 + REMOVE-RANDOM REMOVE-IF-RANDOM REMOVE-IF-NOT-RANDOM DELETE-RANDOM 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 @@ -23757,9 +23793,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-RANDOM REMOVE-IF-RANDOM REMOVE-IF-NOT-RANDOM DELETE-RANDOM - DELETE-IF-RANDOM REMOVE-IF-NOT-RANDOM 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 @@ -23775,7 +23809,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 - RANDOM-REMOVE-DUPLICATES DELETE-IF-NOT-RANDOM REMOVE-IF-LIST.1 + RANDOM-REMOVE-DUPLICATES + 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 DELETE-IF-NOT-LIST.2 DELETE-LIST.1 DELETE-LIST.2 @@ -25701,17 +25736,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 @@ -25728,17 +25763,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 @@ -25755,17 +25790,17 @@ '(NOT CLASS)) ==> NIL T) ((SUBTYPEP 'SIMPLE-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'SIMPLE-ERROR) ==> NIL T) ((SUBTYPEP '(NOT SIMPLE-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT SIMPLE-ERROR)) ==> NIL T) ((SUBTYPEP T @@ -25807,17 +25842,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 @@ -25847,31 +25882,31 @@ '(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 @@ -25957,16 +25992,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 @@ -25997,17 +26032,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 @@ -26024,17 +26059,17 @@ '(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 @@ -26052,17 +26087,17 @@ '(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 @@ -26105,44 +26140,44 @@ '(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 - #) + #) ==> NIL T) ((SUBTYPEP - # 'CELL-ERROR) + # 'CELL-ERROR) ==> NIL T) ((SUBTYPEP '(NOT CELL-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT CELL-ERROR)) ==> NIL T) ((SUBTYPEP 'FILE-ERROR @@ -26159,29 +26194,29 @@ '(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 @@ -26245,38 +26280,926 @@ '(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 - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'SIMPLE-WARNING) ==> NIL T) ((SUBTYPEP '(NOT SIMPLE-WARNING) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT SIMPLE-WARNING)) ==> NIL T) ((SUBTYPEP 'PACKAGE-ERROR #) ==> NIL T) ((SUBTYPEP - # + 'PACKAGE-ERROR) + ==> NIL T) + ((SUBTYPEP '(NOT PACKAGE-ERROR) + '(NOT #)) + ==> NIL T) + ((SUBTYPEP + '(NOT #) + '(NOT PACKAGE-ERROR)) + ==> NIL T) + ((SUBTYPEP 'PARSE-ERROR + #) + ==> NIL T) + ((SUBTYPEP + # + 'PARSE-ERROR) + ==> NIL T) + ((SUBTYPEP '(NOT PARSE-ERROR) + '(NOT #)) + ==> NIL T) + ((SUBTYPEP + '(NOT #) + '(NOT PARSE-ERROR)) + ==> NIL T) + ((SUBTYPEP 'WARNING + #) + ==> NIL T) + ((SUBTYPEP + # 'WARNING) + ==> NIL T) + ((SUBTYPEP '(NOT WARNING) + '(NOT #)) + ==> NIL T) + ((SUBTYPEP + '(NOT #) + '(NOT WARNING)) + ==> NIL T) + ((SUBTYPEP 'STORAGE-CONDITION + #) + ==> NIL T) + ((SUBTYPEP + # + 'STORAGE-CONDITION) + ==> NIL T) + ((SUBTYPEP '(NOT STORAGE-CONDITION) + '(NOT #)) + ==> NIL T) + ((SUBTYPEP + '(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 #)) + ==> NIL T) + ((SUBTYPEP + '(NOT #) + '(NOT FLOATING-POINT-INVALID-OPERATION)) + ==> NIL T) + ((SUBTYPEP 'PROGRAM-ERROR + #) + ==> NIL T) + ((SUBTYPEP + # + 'PROGRAM-ERROR) + ==> NIL T) + ((SUBTYPEP '(NOT PROGRAM-ERROR) + '(NOT #)) + ==> NIL T) + ((SUBTYPEP + '(NOT #) + '(NOT PROGRAM-ERROR)) + ==> NIL T) + ((SUBTYPEP 'METHOD + #) + ==> NIL T) + ((SUBTYPEP + # 'METHOD) + ==> NIL T) + ((SUBTYPEP '(NOT METHOD) + '(NOT #)) + ==> NIL T) + ((SUBTYPEP + '(NOT #) + '(NOT METHOD)) + ==> NIL T) + ((SUBTYPEP 'STANDARD-CLASS + #) + ==> NIL T) + ((SUBTYPEP + # + 'STANDARD-CLASS) + ==> NIL T) + ((SUBTYPEP '(NOT STANDARD-CLASS) + '(NOT #)) + ==> NIL T) + ((SUBTYPEP + '(NOT #) + '(NOT STANDARD-CLASS)) + ==> NIL T) + ((SUBTYPEP 'GENERIC-FUNCTION + #) + ==> NIL T) + ((SUBTYPEP + # + 'GENERIC-FUNCTION) + ==> NIL T) + ((SUBTYPEP '(NOT GENERIC-FUNCTION) + '(NOT #)) + ==> NIL T) + ((SUBTYPEP + '(NOT #) + '(NOT GENERIC-FUNCTION)) + ==> NIL T) + ((SUBTYPEP 'STREAM-ERROR + #) + ==> NIL T) + ((SUBTYPEP + # + 'STREAM-ERROR) + ==> NIL T) + ((SUBTYPEP '(NOT STREAM-ERROR) + '(NOT #)) + ==> NIL T) + ((SUBTYPEP + '(NOT #) + '(NOT STREAM-ERROR)) + ==> NIL T) + ((SUBTYPEP 'SERIOUS-CONDITION + #) + ==> NIL T) + ((SUBTYPEP + # + 'SERIOUS-CONDITION) + ==> NIL T) + ((SUBTYPEP '(NOT SERIOUS-CONDITION) + '(NOT #)) + ==> NIL T) + ((SUBTYPEP + '(NOT #) + '(NOT SERIOUS-CONDITION)) + ==> NIL T) + ((SUBTYPEP 'READER-ERROR + #) + ==> NIL T) + ((SUBTYPEP + # + 'READER-ERROR) + ==> NIL T) + ((SUBTYPEP '(NOT READER-ERROR) + '(NOT #)) + ==> NIL T) + ((SUBTYPEP + '(NOT #) + '(NOT READER-ERROR)) + ==> NIL T) + ((SUBTYPEP 'VECTOR + #) + ==> NIL T) + ((SUBTYPEP + # 'VECTOR) + ==> NIL T) + ((SUBTYPEP '(NOT VECTOR) + '(NOT #)) + ==> NIL T) + ((SUBTYPEP + '(NOT #) + '(NOT VECTOR)) + ==> NIL T) + ((SUBTYPEP 'CONDITION + #) + ==> NIL T) + ((SUBTYPEP + # 'CONDITION) + ==> NIL T) + ((SUBTYPEP '(NOT CONDITION) + '(NOT #)) + ==> NIL T) + ((SUBTYPEP + '(NOT #) + '(NOT CONDITION)) + ==> NIL T) + ((SUBTYPEP 'UNBOUND-VARIABLE + #) + ==> NIL T) + ((SUBTYPEP + # + 'UNBOUND-VARIABLE) + ==> NIL T) + ((SUBTYPEP '(NOT UNBOUND-VARIABLE) + '(NOT #)) + ==> NIL T) + ((SUBTYPEP + '(NOT #) + '(NOT UNBOUND-VARIABLE)) + ==> NIL T)). +Test ALL-STANDARD-CLASSES-ARE-SUBTYPES-OF-STANDARD-OBJECT failed +Form: (LOOP + FOR + SYM + BEING + THE + EXTERNAL-SYMBOLS + OF + "COMMON-LISP" + FOR + CLASS + = + (FIND-CLASS SYM NIL) + WHEN + (AND CLASS (TYPEP CLASS 'STANDARD-CLASS) + (OR (NOT (SUBTYPEP SYM 'STANDARD-OBJECT)) + (NOT (SUBTYPEP CLASS 'STANDARD-OBJECT)))) + COLLECT + SYM) +Expected value: NIL +Actual value: (ARITHMETIC-ERROR CONTROL-ERROR CLASS SIMPLE-ERROR + FLOATING-POINT-INEXACT FLOATING-POINT-UNDERFLOW + FLOATING-POINT-OVERFLOW STANDARD-METHOD + STRUCTURE-CLASS BUILT-IN-CLASS UNBOUND-SLOT ERROR + DIVISION-BY-ZERO PRINT-NOT-READABLE + UNDEFINED-FUNCTION END-OF-FILE STYLE-WARNING + SIMPLE-TYPE-ERROR CELL-ERROR FILE-ERROR TYPE-ERROR + METHOD-COMBINATION SIMPLE-CONDITION SIMPLE-WARNING + PACKAGE-ERROR PARSE-ERROR WARNING STORAGE-CONDITION + FLOATING-POINT-INVALID-OPERATION PROGRAM-ERROR METHOD + STANDARD-CLASS STREAM-ERROR SERIOUS-CONDITION + READER-ERROR CONDITION UNBOUND-VARIABLE). + ALL-STRUCTURE-CLASSES-ARE-SUBTYPES-OF-STRUCTURE-OBJECT + ALL-EXPORTED-CL-CLASS-NAMES-ARE-VALID +Test ALL-STANDARD-GENERIC-FUNCTIONS-ARE-INSTANCES-OF-THAT-CLASS failed +Form: (LOOP + FOR + SYM + IN + *CL-STANDARD-GENERIC-FUNCTION-SYMBOLS* + FOR + FUN + = + (AND (FBOUNDP SYM) (SYMBOL-FUNCTION SYM)) + UNLESS + (AND (TYPEP FUN 'GENERIC-FUNCTION) + (TYPEP FUN 'STANDARD-GENERIC-FUNCTION)) + COLLECT + (LIST SYM FUN)) +Expected value: NIL +Actual value: ((DOCUMENTATION #) + (FIND-METHOD NIL) (NO-NEXT-METHOD NIL)). + STRUCTURE-OBJECT-IS-IN-STRUCTURE-CLASS + STANDARD-OBJECT-IS-IN-STANDARD-CLASS DEFTYPE.1 DEFTYPE.2 DEFTYPE.3 + DEFTYPE.4 DEFTYPE.5 DEFTYPE.6 TYPE-AND-CLASS-FNS TYPE-AND-CLASS-MACROS + TYPEP-NIL-NULL TYPEP-T-NULL TYPE-OF.ERROR.1 TYPE-OF.ERROR.2 + TYPEP.ERROR.1 TYPEP.ERROR.2 TYPEP.ERROR.3 TYPE-ERROR-DATUM.ERROR.1 + TYPE-ERROR-DATUM.ERROR.2 TYPE-ERROR-EXPECTED-TYPE.ERROR.1 + TYPE-ERROR-EXPECTED-TYPE.ERROR.2 TYPEP.ENV.1 TYPEP.ENV.2 TYPEP.ENV.3 + TYPEP.1 TYPEP.2 TYPEP.3 TYPEP.4 TYPEP.5 TYPEP.6 TYPEP.7 TYPEP.8 + TYPEP.9 TYPEP.10 TYPEP.11 TYPEP.12 TYPEP.13 TYPEP.14 TYPEP.15 TYPEP.16 + TYPEP.17 TYPE-OR-NOT-TYPE-IS-EVERYTHING USER-CLASS-DISJOINTNESS + USER-CLASS-DISJOINTNESS-2 USER-STRUCT-DISJOINTNESS + USER-STRUCT-DISJOINTNESS-2 +Test TAC-3.1 failed +Form: (SUBTYPEP* 'TAC-3-AB 'TAC-3-A) +Expected values: T + T +Actual values: NIL + NIL. +Test TAC-3.2 failed +Form: (SUBTYPEP* 'TAC-3-AB 'TAC-3-B) +Expected values: T + T +Actual values: NIL + NIL. +Test TAC-3.3 failed +Form: (SUBTYPEP* 'TAC-3-AB 'TAC-3-C) +Expected values: NIL + T +Actual values: NIL + NIL. +Test TAC-3.4 failed +Form: (SUBTYPEP* 'TAC-3-A 'TAC-3-AB) +Expected values: NIL + T +Actual values: NIL + NIL. +Test TAC-3.5 failed +Form: (SUBTYPEP* 'TAC-3-B 'TAC-3-AB) +Expected values: NIL + T +Actual values: NIL + NIL. +Test TAC-3.6 failed +Form: (SUBTYPEP* 'TAC-3-C 'TAC-3-AB) +Expected values: NIL + T +Actual values: NIL + NIL. +Test TAC-3.7 failed +Form: (SUBTYPEP* 'TAC-3-ABC 'TAC-3-A) +Expected values: T + T +Actual values: NIL + NIL. +Test TAC-3.8 failed +Form: (SUBTYPEP* 'TAC-3-ABC 'TAC-3-B) +Expected values: T + T +Actual values: NIL + NIL. +Test TAC-3.9 failed +Form: (SUBTYPEP* 'TAC-3-ABC 'TAC-3-C) +Expected values: T + T +Actual values: NIL + NIL. +Test TAC-3.10 failed +Form: (SUBTYPEP* 'TAC-3-ABC 'TAC-3-AB) +Expected values: T + T +Actual values: NIL + NIL. +Test TAC-3.11 failed +Form: (SUBTYPEP* 'TAC-3-ABC 'TAC-3-AC) +Expected values: T + T +Actual values: NIL + NIL. +Test TAC-3.12 failed +Form: (SUBTYPEP* 'TAC-3-ABC 'TAC-3-BC) +Expected values: T + T +Actual values: NIL + NIL. +Test TAC-3.13 failed +Form: (SUBTYPEP* 'TAC-3-AB 'TAC-3-ABC) +Expected values: NIL + T +Actual values: NIL + NIL. +Test TAC-3.14 failed +Form: (SUBTYPEP* 'TAC-3-AC 'TAC-3-ABC) +Expected values: NIL + T +Actual values: NIL + NIL. +Test TAC-3.15 failed +Form: (SUBTYPEP* 'TAC-3-BC 'TAC-3-ABC) +Expected values: NIL + T +Actual values: NIL + NIL. + TAC-3.16 TAC-3.17 +Test UNIVERSE-ELEMENTS-IN-AT-MOST-ONE-DISJOINT-TYPE failed +Form: (LOOP + FOR + E + IN + *UNIVERSE* + FOR + TYPES + = + (REMOVE-IF-NOT #'(LAMBDA (X) (TYPEP E X)) + *DISJOINT-TYPES-LIST*) + WHEN + (> (LENGTH TYPES) 1) + COLLECT + (LIST E TYPES)) +Expected value: NIL +Actual value: ((CONS (SYMBOL FUNCTION)) + ((SYSTEM:LAMBDA-CLOSURE () () () (X) X) (CONS FUNCTION))). + INTEGER-AND-RATIO-ARE-DISJOINT BIGNUM-AND-RATIO-ARE-DISJOINT + BIGNUM-AND-FIXNUM-ARE-DISJOINT FIXNUM-AND-RATIO-ARE-DISJOINT + BYTE8-AND-RATIO-ARE-DISJOINT BIT-AND-RATIO-ARE-DISJOINT + INTEGER-AND-FLOAT-ARE-DISJOINT RATIO-AND-FLOAT-ARE-DISJOINT + COMPLEX-AND-FLOAT-ARE-DISJOINT INTEGER-SUBRANGES-ARE-DISJOINT + KEYWORD-AND-NULL-ARE-DISJOINT KEYWORD-AND-BOOLEAN-ARE-DISJOINT + COERCE.1 COERCE.2 COERCE.3 COERCE.4 COERCE.5 COERCE.6 COERCE.7 + COERCE.8 COERCE.9 COERCE.10 COERCE.11 COERCE.12 COERCE.13 COERCE.14 + COERCE.15 COERCE.16 COERCE.17 COERCE.18 COERCE.19 COERCE.20 COERCE.21 + COERCE.22 COERCE.ORDER.1 COERCE.ERROR.2 COERCE.ERROR.3 COERCE.ERROR.4 + COERCE.ERROR.5 COERCE.ERROR.6 COERCE.ERROR.7 COERCE.ERROR.8 + COERCE.ERROR.9 SUBTYPEP.ORDER.1 SIMPLE-BASE-STRING-IS-SEQUENCE + SUBTYPE.ENV.1 SUBTYPE.ENV.2 SUBTYPE.ENV.3 SUBTYPE.ENV.4 SUBTYPE.ENV.5 + SUBTYPEP.ERROR.1 SUBTYPEP.ERROR.2 SUBTYPEP.ERROR.3 + KEYWORD-IS-SUBTYPE-OF-ATOM RATIO-IS-SUBTYPE-OF-ATOM + EXTENDED-CHAR-IS-SUBTYPE-OF-ATOM STRING-IS-NOT-SIMPLE-VECTOR + BASE-STRING-IS-NOT-SIMPLE-VECTOR SIMPLE-STRING-IS-NOT-SIMPLE-VECTOR + 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 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 + SUBTYPEP.INTEGER.RATIONAL.10 SUBTYPEP.FLOAT.1 SUBTYPEP.FLOAT.2 + SUBTYPEP.FLOAT.3 SUBTYPEP.FLOAT.4 SUBTYPEP.FLOAT.5 SUBTYPEP.FLOAT.6 + SUBTYPEP.FLOAT.7 SUBTYPEP.FLOAT.8 SUBTYPEP.FLOAT.9 SUBTYPEP.FLOAT.10 + SUBTYPEP.FLOAT.11 SUBTYPEP.FLOAT.12 SUBTYPEP.FLOAT.13 + SUBTYPEP.FLOAT.14 SUBTYPEP.FLOAT.15 SUBTYPEP.FLOAT.16 + SUBTYPEP.FLOAT.17 SUBTYPEP.FLOAT.18 SUBTYPEP.FLOAT.19 + SUBTYPEP.FLOAT.20 SUBTYPEP.FLOAT.21 SUBTYPEP.FLOAT.22 + SUBTYPEP.FLOAT.23 SUBTYPEP.FLOAT.24 SUBTYPEP.FLOAT.25 + SUBTYPEP.FLOAT.26 SUBTYPEP.FLOAT.27 SUBTYPEP.RATIONAL.1 + SUBTYPEP.RATIONAL.2 SUBTYPEP.RATIONAL.3 SUBTYPEP.RATIONAL.4 + SUBTYPEP.RATIONAL.5 SUBTYPEP.RATIONAL.6 SUBTYPEP.RATIONAL.7 + SUBTYPEP.RATIONAL.8 SUBTYPEP.RATIONAL.9 SUBTYPEP.RATIONAL.10 + SUBTYPEP.RATIONAL.11 SUBTYPEP.RATIONAL.12 SUBTYPEP.RATIONAL.13 + SUBTYPEP.RATIONAL.14 SUBTYPEP.RATIONAL.15 SUBTYPEP.RATIONAL.16 + SUBTYPEP.RATIONAL.17 SUBTYPEP.RATIONAL.18 SUBTYPEP.REAL.1 + SUBTYPEP.REAL.2 SUBTYPEP.REAL.3 SUBTYPEP.REAL.4 SUBTYPEP.REAL.5 + SUBTYPEP.REAL.6 SUBTYPEP.REAL.7 SUBTYPEP.REAL.8 SUBTYPEP.REAL.9 + SUBTYPEP.REAL.10 SUBTYPEP.REAL.11 SUBTYPEP.REAL.12 SUBTYPEP.REAL.13 + SUBTYPEP.REAL.14 SUBTYPEP.REAL.15 SUBTYPEP.REAL.16 SUBTYPEP.REAL.17 + SUBTYPEP.REAL.18 SUBTYPEP.REAL.19 SUBTYPEP.REAL.20 SUBTYPEP.REAL.21 + SUBTYPEP.REAL.22 SUBTYPEP.REAL.23 SUBTYPEP.REAL.24 SUBTYPEP.CONS.1 +Test SUBTYPEP.CONS.2 failed +Form: (LOOP + FOR + T1 + IN + '((CONS NIL) (CONS NIL *) (CONS NIL T) (CONS * NIL) + (CONS T NIL) (CONS NIL NIL)) + UNLESS + (SUBTYPEP T1 NIL) + COLLECT + T1) +Expected value: NIL +Actual value: ((CONS NIL) (CONS NIL *) (CONS NIL T) (CONS * NIL) + (CONS T NIL) (CONS NIL NIL)). + SUBTYPEP.CONS.3 SUBTYPEP.CONS.4 SUBTYPEP.CONS.5 SUBTYPEP.CONS.6 + SUBTYPEP.CONS.7 SUBTYPEP.CONS.8 SUBTYPEP.CONS.9 SUBTYPEP.CONS.10 + SUBTYPEP.CONS.11 +Test SUBTYPEP.CONS.12 failed +Form: (CHECK-ALL-NOT-SUBTYPEP + '(CONS (OR INTEGER SYMBOL) (OR INTEGER SYMBOL)) + '(OR (CONS INTEGER SYMBOL) (CONS SYMBOL INTEGER))) +Expected value: NIL +Actual value: (((SUBTYPEP + '(CONS (OR INTEGER SYMBOL) (OR INTEGER SYMBOL)) + '(OR (CONS INTEGER SYMBOL) (CONS SYMBOL INTEGER))) + ==> T T) + ((SUBTYPEP + '(NOT (OR (CONS INTEGER SYMBOL) + (CONS SYMBOL INTEGER))) + '(NOT (CONS (OR INTEGER SYMBOL) + (OR INTEGER SYMBOL)))) + ==> T T)). + SUBTYPEP.CONS.13 SUBTYPEP.CONS.14 SUBTYPEP.CONS.15 SUBTYPEP.CONS.16 + SUBTYPEP.CONS.17 SUBTYPEP.CONS.18 SUBTYPEP.CONS.19 SUBTYPEP.CONS.20 + SUBTYPEP.MEMBER.1 SUBTYPEP.MEMBER.2 SUBTYPEP.MEMBER.3 + SUBTYPEP.MEMBER.4 SUBTYPEP.MEMBER.5 SUBTYPEP.MEMBER.6 + SUBTYPEP.MEMBER.7 SUBTYPEP.MEMBER.8 SUBTYPEP.MEMBER.9 + SUBTYPEP.MEMBER.10 SUBTYPEP.MEMBER.11 SUBTYPEP.MEMBER.12 + SUBTYPEP.MEMBER.13 SUBTYPEP.MEMBER.14 SUBTYPEP.MEMBER.15 + SUBTYPEP.MEMBER.16 +Test SUBTYPEP.MEMBER.17 failed +Form: (LET ((S1 (COPY-SEQ "abc")) (S2 (COPY-SEQ "abc"))) + (LET ((T1 (LIST 'MEMBER S1)) (T2 (LIST 'MEMBER S2))) + (COND + ((SUBTYPEP T1 T2) "T1 is subtype of T2") + ((SUBTYPEP T2 T1) "T2 is subtype of T1") + (T (CHECK-DISJOINTNESS T1 T2))))) +Expected value: NIL +Actual value: "T1 is subtype of T2". +Test SUBTYPEP.MEMBER.18 failed +Form: (LET ((S1 (COPY-SEQ '(A B C))) (S2 (COPY-SEQ '(A B C)))) + (LET ((T1 (LIST 'MEMBER S1)) (T2 (LIST 'MEMBER S2))) + (COND + ((SUBTYPEP T1 T2) "T1 is subtype of T2") + ((SUBTYPEP T2 T1) "T2 is subtype of T1") + (T (CHECK-DISJOINTNESS T1 T2))))) +Expected value: NIL +Actual value: "T1 is subtype of T2". + SUBTYPEP.MEMBER.19 SUBTYPEP.MEMBER.20 SUBTYPEP.MEMBER.21 + SUBTYPEP.MEMBER.22 SUBTYPEP.MEMBER.23 SUBTYPEP.MEMBER.24 + SUBTYPEP.MEMBER.25 SUBTYPEP.MEMBER.26 SUBTYPEP.MEMBER.27 + SUBTYPEP.MEMBER.28 SUBTYPEP.MEMBER.29 SUBTYPEP.MEMBER.30 + SUBTYPEP.MEMBER.31 SUBTYPEP.MEMBER.32 SUBTYPEP.MEMBER.33 + SUBTYPEP.MEMBER.34 SUBTYPEP.MEMBER.35 SUBTYPEP.MEMBER.36 + SUBTYPEP.MEMBER.37 SUBTYPEP.MEMBER.38 SUBTYPEP.MEMBER.39 + SUBTYPEP.MEMBER.40 SUBTYPEP.MEMBER.41 SUBTYPEP.MEMBER.42 + SUBTYPEP.MEMBER.43 SUBTYPEP.MEMBER.44 +Test SUBTYPEP.EQL.1 failed +Form: (LET ((S1 (COPY-SEQ "abc")) (S2 (COPY-SEQ "abc"))) + (LET ((T1 (LIST 'EQL S1)) (T2 (LIST 'EQL S2))) + (COND + ((SUBTYPEP T1 T2) "T1 is subtype of T2") + ((SUBTYPEP T2 T1) "T2 is subtype of T1") + (T (CHECK-DISJOINTNESS T1 T2))))) +Expected value: NIL +Actual value: "T1 is subtype of T2". +Test SUBTYPEP.EQL.2 failed +Form: (LET ((S1 (COPY-SEQ '(A B C))) (S2 (COPY-SEQ '(A B C)))) + (LET ((T1 (LIST 'EQL S1)) (T2 (LIST 'EQL S2))) + (COND + ((SUBTYPEP T1 T2) "T1 is subtype of T2") + ((SUBTYPEP T2 T1) "T2 is subtype of T1") + (T (CHECK-DISJOINTNESS T1 T2))))) +Expected value: NIL +Actual value: "T1 is subtype of T2". + SUBTYPEP.EQL.3 SUBTYPEP.EQL.4 SUBTYPEP.EQL.5 SUBTYPEP.EQL.6 + SUBTYPEP.EQL.7 SUBTYPEP.EQL.8 +Test SUBTYPEP.ARRAY.1 failed +Form: (LET ((ARRAY-TYPES + (CONS (FIND-CLASS 'ARRAY) + '(ARRAY (ARRAY) (ARRAY *) (ARRAY * *))))) + (LOOP + FOR + TP1 + IN + ARRAY-TYPES + APPEND + (LOOP + FOR + TP2 + IN + ARRAY-TYPES + UNLESS + (SUBTYPEP TP1 TP2) + COLLECT + (LIST TP1 TP2)))) +Expected value: NIL +Actual value: ((# ARRAY) + (# (ARRAY)) + (# (ARRAY *)) + (# (ARRAY * *)) + (ARRAY #) + ((ARRAY) + #) + ((ARRAY *) + #) + ((ARRAY * *) + #)). + SUBTYPEP.ARRAY.2 +Test SUBTYPEP.ARRAY.3 failed +Form: (LOOP + FOR + I + FROM + 0 + BELOW + (MIN 16 ARRAY-RANK-LIMIT) + FOR + TYPE + = + (LIST 'ARRAY '* I) + FOR + TYPE2 + = + (LIST 'ARRAY '* (MAKE-LIST I :INITIAL-ELEMENT '*)) + UNLESS + (AND (SUBTYPEP TYPE 'ARRAY) (SUBTYPEP TYPE '(ARRAY)) + (SUBTYPEP TYPE '(ARRAY *)) (SUBTYPEP TYPE '(ARRAY * *)) + (SUBTYPEP TYPE TYPE2)) + COLLECT + TYPE) +Expected value: NIL +Actual value: #. +Test SUBTYPEP.ARRAY.4 failed +Form: (LOOP + FOR + I + FROM + 0 + BELOW + (MIN 16 ARRAY-RANK-LIMIT) + FOR + TYPE + = + (LIST 'ARRAY T I) + FOR + TYPE2 + = + (LIST 'ARRAY T (MAKE-LIST I :INITIAL-ELEMENT '*)) + UNLESS + (AND (SUBTYPEP TYPE '(ARRAY T)) (SUBTYPEP TYPE '(ARRAY T *)) + (SUBTYPEP TYPE TYPE2)) + COLLECT + TYPE) +Expected value: NIL +Actual value: #. +Test SUBTYPEP.ARRAY.5 failed +Form: (LOOP + FOR + ELEMENT-TYPE + IN + (CONS '* *ARRAY-ELEMENT-TYPES*) + NCONC + (LOOP + FOR + I + FROM + 0 + BELOW + (MIN 16 ARRAY-RANK-LIMIT) + FOR + TYPE + = + (LIST 'ARRAY ELEMENT-TYPE I) + FOR + TYPE2 + = + (LIST 'ARRAY ELEMENT-TYPE (MAKE-LIST I :INITIAL-ELEMENT '0)) + FOR + TYPE3 + = + (LIST 'ARRAY ELEMENT-TYPE (MAKE-LIST I :INITIAL-ELEMENT '1)) + UNLESS + (AND (SUBTYPEP TYPE2 TYPE) (SUBTYPEP TYPE3 TYPE) + (LOOP + FOR + J + FROM + 0 + TO + I + ALWAYS + (AND (SUBTYPEP + (LIST 'ARRAY ELEMENT-TYPE + (APPEND (MAKE-LIST J :INITIAL-ELEMENT + '*) + (MAKE-LIST (- I J) + :INITIAL-ELEMENT 2))) + TYPE) + (SUBTYPEP + (LIST 'ARRAY ELEMENT-TYPE + (APPEND (MAKE-LIST J :INITIAL-ELEMENT + 2) + (MAKE-LIST (- I J) + :INITIAL-ELEMENT '*))) + TYPE)))) + COLLECT + TYPE)) +Expected value: NIL +Actual value: #. + SUBTYPEP.ARAY.6 SUBTYPEP.ARAY.7 READTABLE-VALID READTABLEP.1 + READ-SYMBOL.1 READ-SYMBOL.2 READ-SYMBOL.3 READ-SYMBOL.4 READ-SYMBOL.5 + READ-SYMBOL.6 READ-SYMBOL.7 READ-SYMBOL.9 READ-SYMBOL.10 CHAR.1 CHAR.2 + CHAR.3 CHAR.4 CHAR.5 CHAR.6 CHAR.7 CHAR.8 CHAR.9 CHAR.10 CHAR.ORDER.1 + CHAR.ORDER.2 SCHAR.1 SCHAR.2 SCHAR.3 SCHAR.4 SCHAR.5 SCHAR.6 SCHAR.7 + SCHAR.ORDER.1 SCHAR.ORDER.2 STRING.1 STRING.2 STRING.3 STRING.4 + STRING.5 STRING.6 STRING.7 BASE-STRING.1 BASE-STRING.2 BASE-STRING.3 + BASE-STRING.4 SIMPLE-STRING.1 SIMPLE-STRING.2 SIMPLE-STRING.3 + SIMPLE-STRING.4 SIMPLE-STRING.5 SIMPLE-BASE-STRING.1 + SIMPLE-BASE-STRING.2 SIMPLE-BASE-STRING.3 SIMPLE-BASE-STRING.4 + SIMPLE-BASE-STRING.5 SIMPLE-BASE-STRING.6 SIMPLE-BASE-STRING.7 + SIMPLE-BASE-STRING.8 SIMPLE-STRING-P.1 SIMPLE-STRING-P.2 + SIMPLE-STRING-P.3 SIMPLE-STRING-P.4 SIMPLE-STRING-P.5 + SIMPLE-STRING-P.6 SIMPLE-STRING-P.7 STRINGP.1 STRINGP.2 STRINGP.3 + STRINGP.4 STRINGP.5 STRINGP.6 STRINGP.7 STRINGP.8 STRING-UPCASE.1 + STRING-UPCASE.2 STRING-UPCASE.3 STRING-UPCASE.4 STRING-UPCASE.5 + STRING-UPCASE.6 STRING-UPCASE.7 STRING-UPCASE.8 STRING-UPCASE.9 + STRING-UPCASE.10 STRING-UPCASE.ORDER.1 STRING-UPCASE.ORDER.2 + STRING-UPCASE.ERROR.1 STRING-UPCASE.ERROR.2 STRING-UPCASE.ERROR.3 + STRING-UPCASE.ERROR.4 STRING-UPCASE.ERROR.5 STRING-UPCASE.ERROR.6 + STRING-DOWNCASE.1 STRING-DOWNCASE.2 STRING-DOWNCASE.3 + STRING-DOWNCASE.4 STRING-DOWNCASE.5 STRING-DOWNCASE.6 + STRING-DOWNCASE.7 STRING-DOWNCASE.8 STRING-DOWNCASE.9 + STRING-DOWNCASE.10 STRING-DOWNCASE.ORDER.1 STRING-DOWNCASE.ORDER.2 + STRING-DOWNCASE.ERROR.1 STRING-DOWNCASE.ERROR.2 + STRING-DOWNCASE.ERROR.3 STRING-DOWNCASE.ERROR.4 + STRING-DOWNCASE.ERROR.5 STRING-DOWNCASE.ERROR.6 STRING-CAPITALIZE.1 + STRING-CAPITALIZE.2 STRING-CAPITALIZE.3 STRING-CAPITALIZE.4 + STRING-CAPITALIZE.5 STRING-CAPITALIZE.6 STRING-CAPITALIZE.7 + STRING-CAPITALIZE.8 STRING-CAPITALIZE.9 STRING-CAPITALIZE.10 + STRING-CAPITALIZE.ORDER.1 STRING-CAPITALIZE.ORDER.2 + STRING-CAPITALIZE.ERROR.1 STRING-CAPITALIZE.ERROR.2 + STRING-CAPITALIZE.ERROR.3 STRING-CAPITALIZE.ERROR.4 + STRING-CAPITALIZE.ERROR.5 STRING-CAPITALIZE.ERROR.6 NSTRING-UPCASE.1 + NSTRING-UPCASE.2 NSTRING-UPCASE.3 NSTRING-UPCASE.6 NSTRING-UPCASE.7 + NSTRING-UPCASE.8 NSTRING-UPCASE.9 NSTRING-UPCASE.10 + NSTRING-UPCASE.ORDER.1 NSTRING-UPCASE.ORDER.2 NSTRING-UPCASE.ERROR.1 + NSTRING-UPCASE.ERROR.2 NSTRING-UPCASE.ERROR.3 NSTRING-UPCASE.ERROR.4 + NSTRING-UPCASE.ERROR.5 NSTRING-UPCASE.ERROR.6 NSTRING-DOWNCASE.1 + NSTRING-DOWNCASE.2 NSTRING-DOWNCASE.3 NSTRING-DOWNCASE.6 + NSTRING-DOWNCASE.7 NSTRING-DOWNCASE.8 NSTRING-DOWNCASE.9 + NSTRING-DOWNCASE.10 NSTRING-DOWNCASE.ORDER.1 NSTRING-DOWNCASE.ORDER.2 + NSTRING-DOWNCASE.ERROR.1 NSTRING-DOWNCASE.ERROR.2 + NSTRING-DOWNCASE.ERROR.3 NSTRING-DOWNCASE.ERROR.4 + NSTRING-DOWNCASE.ERROR.5 NSTRING-DOWNCASE.ERROR.6 NSTRING-CAPITALIZE.1 + NSTRING-CAPITALIZE.2 NSTRING-CAPITALIZE.3 NSTRING-CAPITALIZE.4 + NSTRING-CAPITALIZE.7 NSTRING-CAPITALIZE.8 NSTRING-CAPITALIZE.9 + NSTRING-CAPITALIZE.10 NSTRING-CAPITALIZE.ORDER.1 + NSTRING-CAPITALIZE.ORDER.2 NSTRING-CAPITALIZE.ERROR.1 + NSTRING-CAPITALIZE.ERROR.2 NSTRING-CAPITALIZE.ERROR.3 + NSTRING-CAPITALIZE.ERROR.4 NSTRING-CAPITALIZE.ERROR.5 + NSTRING-CAPITALIZE.ERROR.6 STRING-TRIM.1 STRING-TRIM.2 STRING-TRIM.3 + STRING-TRIM.4 STRING-TRIM.5 STRING-TRIM.6 STRING-TRIM.7 STRING-TRIM.8 + STRING-TRIM.9 STRING-TRIM.10 STRING-TRIM.11 STRING-TRIM.12 + STRING-TRIM.13 STRING-TRIM.14 STRING-TRIM.15 STRING-TRIM.16 + STRING-TRIM.17 STRING-TRIM.18 STRING-TRIM.19 STRING-TRIM.ORDER.1 + STRING-TRIM.ERROR.1 STRING-TRIM.ERROR.2 STRING-TRIM.ERROR.3 + STRING-LEFT-TRIM.1 STRING-LEFT-TRIM.2 STRING-LEFT-TRIM.3 + STRING-LEFT-TRIM.4 STRING-LEFT-TRIM.5 STRING-LEFT-TRIM.6 + STRING-LEFT-TRIM.7 STRING-LEFT-TRIM.8 STRING-LEFT-TRIM.9 + STRING-LEFT-TRIM.10 STRING-LEFT-TRIM.11 STRING-LEFT-TRIM.12 + STRING-LEFT-TRIM.13 STRING-LEFT-TRIM.14 STRING-LEFT-TRIM.15 + STRING-LEFT-TRIM.16 STRING-LEFT-TRIM.17 STRING-LEFT-TRIM.18 + STRING-LEFT-TRIM.19 STRING-LEFT-TRIM.ORDER.1 STRING-LEFT-TRIM.ERROR.1 + STRING-LEFT-TRIM.ERROR.2 STRING-LEFT-TRIM.ERROR.3 STRING-RIGHT-TRIM.1 + STRING-RIGHT-TRIM.2 STRING-RIGHT-TRIM.3 STRING-RIGHT-TRIM.4 + STRING-RIGHT-TRIM.5 STRING-RIGHT-TRIM.6 STRING-RIGHT-TRIM.7 + STRING-RIGHT-TRIM.8 STRING-RIGHT-TRIM.9 STRING-RIGHT-TRIM.10 + STRING-RIGHT-TRIM.11 STRING-RIGHT-TRIM.12 STRING-RIGHT-TRIM.13 + STRING-RIGHT-TRIM.14 STRING-RIGHT-TRIM.15 STRING-RIGHT-TRIM.16 + STRING-RIGHT-TRIM.17 STRING-RIGHT-TRIM.18 STRING-RIGHT-TRIM.19 + STRING-RIGHT-TRIM.ORDER.1 STRING-RIGHT-TRIM.ERROR.1 + STRING-RIGHT-TRIM.ERROR.2 STRING-RIGHT-TRIM.ERROR.3 STRING=.1 + STRING=.2 STRING=.3 STRING=.4 STRING=.5 STRING=.6 STRING=.7 STRING=.8 + STRING=.9 STRING=.10 STRING=.11 STRING=.12 STRING=.13 STRING=.14 + STRING=.ORDER.1 STRING=.ORDER.2 STRING=.ORDER.3 STRING<=.ORDER.1 + STRING<=.ORDER.2 STRING<=.ORDER.3 STRING<.ORDER.1 STRING<.ORDER.2 + STRING<.ORDER.3 STRING/=.ORDER.1 STRING/=.ORDER.2 STRING/=.ORDER.3 + STRING>=.ORDER.1 STRING>=.ORDER.2 STRING>=.ORDER.3 STRING>.ORDER.1 + STRING>.ORDER.2 STRING>.ORDER.3 STRING-EQUAL.ORDER.1 + STRING-EQUAL.ORDER.2 STRING-EQUAL.ORDER.3 STRING-NOT-GREATERP.ORDER.1 + STRING-NOT-GREATERP.ORDER.2 STRING-NOT-GREATERP.ORDER.3 + STRING-LESSP.ORDER.1 STRING-LESSP.ORDER.2 STRING-LESSP.ORDER.3 + STRING-NOT-EQUAL.ORDER.1 STRING-NOT-EQUAL.ORDER.2 + STRING-NOT-EQUAL.ORDER.3 STRING-NOT-LESSP.ORDER.1 + STRING-NOT-LESSP.ORDER.2 STRING-NOT-LESSP.ORDER.3 + STRING-GREATERP.ORDER.1 STRING-GREATERP.ORDER.2 + STRING-GREATERP.ORDER.3 RANDOM-STRING-COMPARISON-TESTS MAKE-STRING.1 + MAKE-STRING.2 MAKE-STRING.3 MAKE-STRING.4 MAKE-STRING.5 MAKE-STRING.6 + MAKE-STRING.7 MAKE-STRING.8 MAKE-STRING.9 + MAKE-STRING.ALLOW-OTHER-KEYS.1 MAKE-STRING.ALLOW-OTHER-KEYS.2 + MAKE-STRING.ALLOW-OTHER-KEYS.3 MAKE-STRING.ALLOW-OTHER-KEYS.4 + MAKE-STRING.ALLOW-OTHER-KEYS.5 MAKE-STRING.ALLOW-OTHER-KEYS.6 + MAKE-STRING.KEYWORDS.7 MAKE-STRING.ERROR.1 MAKE-STRING.ERROR.2 + MAKE-STRING.ERROR.3 MAKE-STRING.ERROR.4 MAKE-STRING.ERROR.5 + MAKE-STRING.ERROR.6 MAKE-STRING.ORDER.1 MAKE-STRING.ORDER.2 + MAKE-STRING.ORDER.3 +Test PATHNAMES-PRINT-AND-READ-PROPERLY failed +Form: (WITH-STANDARD-IO-SYNTAX + (LOOP + FOR + P1 + IN + *PATHNAMES* + FOR + S + = + (HANDLER-CASE (WRITE-TO-STRING P1 :READABLY T) + (PRINT-NOT-READABLE NIL :UNREADABLE-ERROR)) + UNLESS + (EQL S :UNREADABLE-ERROR) + APPEND + (LET ((P2 (READ-FROM-STRING S))) + (UNLESS (EQUAL P1 P2) (LIST (LIST P1 S P2)))))) +Expected value: NIL +Actual value: ((#p"" "#p\"\"" #p"") (#p"" "#p\"\"" #p"")). + PATHNAME.1 PATHNAME.2 PATHNAME.3 PATHNAME.4 PATHNAME.5 PATHNAME.6 + PATHNAME.7 PATHNAME.8 PATHNAME.9 PATHNAME.10 PATHNAME.11 + PATHNAME.ERROR.1 PATHNAME.ERROR.2 PATHNAMEP.1 PATHNAMEP.2 PATHNAMEP.3 + PATHNAMEP.ERROR.1 PATHNAMEP.ERROR.2 PATHNAMEP.ERROR.3 MAKE-PATHNAME.1 + MAKE-PATHNAME.2 MAKE-PATHNAME.2A MAKE-PATHNAME.3 MAKE-PATHNAME.3A + MAKE-PATHNAME.4 MAKE-PATHNAME.5 MAKE-PATHNAME.6 MAKE-PATHNAME.7 + MAKE-PATHNAME.8 MAKE-PATHNAME.9 MAKE-PATHNAME.10 MAKE-PATHNAME.11 + MAKE-PATHNAME.12 MAKE-PATHNAME.13 MAKE-PATHNAME.14 + 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 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 @@ -28187,17 +29110,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 @@ -28214,17 +29137,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 @@ -28241,17 +29164,17 @@ '(NOT CLASS)) ==> NIL T) ((SUBTYPEP 'SIMPLE-ERROR - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'SIMPLE-ERROR) ==> NIL T) ((SUBTYPEP '(NOT SIMPLE-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT SIMPLE-ERROR)) ==> NIL T) ((SUBTYPEP T @@ -28293,17 +29216,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 @@ -28333,31 +29256,31 @@ '(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 @@ -28443,16 +29366,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 @@ -28483,17 +29406,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 @@ -28510,17 +29433,17 @@ '(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 @@ -28538,17 +29461,17 @@ '(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 @@ -28591,44 +29514,44 @@ '(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 - #) + #) ==> NIL T) ((SUBTYPEP - # 'CELL-ERROR) + # 'CELL-ERROR) ==> NIL T) ((SUBTYPEP '(NOT CELL-ERROR) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT CELL-ERROR)) ==> NIL T) ((SUBTYPEP 'FILE-ERROR @@ -28645,29 +29568,29 @@ '(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 @@ -28731,31 +29654,31 @@ '(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 - #) + #) ==> NIL T) ((SUBTYPEP - # + # 'SIMPLE-WARNING) ==> NIL T) ((SUBTYPEP '(NOT SIMPLE-WARNING) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT SIMPLE-WARNING)) ==> NIL T) ((SUBTYPEP 'PACKAGE-ERROR @@ -28773,72 +29696,72 @@ '(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 - #) + #) ==> NIL T) ((SUBTYPEP - # 'WARNING) + # 'WARNING) ==> NIL T) ((SUBTYPEP '(NOT WARNING) - '(NOT #)) + '(NOT #)) ==> NIL T) ((SUBTYPEP - '(NOT #) + '(NOT #) '(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 @@ -28897,31 +29820,31 @@ '(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 'VECTOR @@ -28938,813 +29861,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 UNBOUND-VARIABLE)) - ==> NIL T)). -Test ALL-STANDARD-CLASSES-ARE-SUBTYPES-OF-STANDARD-OBJECT failed -Form: (LOOP - FOR - SYM - BEING - THE - EXTERNAL-SYMBOLS - OF - "COMMON-LISP" - FOR - CLASS - = - (FIND-CLASS SYM NIL) - WHEN - (AND CLASS (TYPEP CLASS 'STANDARD-CLASS) - (OR (NOT (SUBTYPEP SYM 'STANDARD-OBJECT)) - (NOT (SUBTYPEP CLASS 'STANDARD-OBJECT)))) - COLLECT - SYM) -Expected value: NIL -Actual value: (ARITHMETIC-ERROR CONTROL-ERROR CLASS SIMPLE-ERROR - FLOATING-POINT-INEXACT FLOATING-POINT-UNDERFLOW - FLOATING-POINT-OVERFLOW STANDARD-METHOD - STRUCTURE-CLASS BUILT-IN-CLASS UNBOUND-SLOT ERROR - DIVISION-BY-ZERO PRINT-NOT-READABLE - UNDEFINED-FUNCTION END-OF-FILE STYLE-WARNING - SIMPLE-TYPE-ERROR CELL-ERROR FILE-ERROR TYPE-ERROR - METHOD-COMBINATION SIMPLE-CONDITION SIMPLE-WARNING - PACKAGE-ERROR PARSE-ERROR WARNING STORAGE-CONDITION - FLOATING-POINT-INVALID-OPERATION PROGRAM-ERROR METHOD - STANDARD-CLASS STREAM-ERROR SERIOUS-CONDITION - READER-ERROR CONDITION UNBOUND-VARIABLE). - ALL-STRUCTURE-CLASSES-ARE-SUBTYPES-OF-STRUCTURE-OBJECT - ALL-EXPORTED-CL-CLASS-NAMES-ARE-VALID -Test ALL-STANDARD-GENERIC-FUNCTIONS-ARE-INSTANCES-OF-THAT-CLASS failed -Form: (LOOP - FOR - SYM - IN - *CL-STANDARD-GENERIC-FUNCTION-SYMBOLS* - FOR - FUN - = - (AND (FBOUNDP SYM) (SYMBOL-FUNCTION SYM)) - UNLESS - (AND (TYPEP FUN 'GENERIC-FUNCTION) - (TYPEP FUN 'STANDARD-GENERIC-FUNCTION)) - COLLECT - (LIST SYM FUN)) -Expected value: NIL -Actual value: ((DOCUMENTATION #) - (FIND-METHOD NIL) (NO-NEXT-METHOD NIL)). - STRUCTURE-OBJECT-IS-IN-STRUCTURE-CLASS - STANDARD-OBJECT-IS-IN-STANDARD-CLASS DEFTYPE.1 DEFTYPE.2 DEFTYPE.3 - DEFTYPE.4 DEFTYPE.5 DEFTYPE.6 TYPE-AND-CLASS-FNS TYPE-AND-CLASS-MACROS - TYPEP-NIL-NULL TYPEP-T-NULL TYPE-OF.ERROR.1 TYPE-OF.ERROR.2 - TYPEP.ERROR.1 TYPEP.ERROR.2 TYPEP.ERROR.3 TYPE-ERROR-DATUM.ERROR.1 - TYPE-ERROR-DATUM.ERROR.2 TYPE-ERROR-EXPECTED-TYPE.ERROR.1 - TYPE-ERROR-EXPECTED-TYPE.ERROR.2 TYPEP.ENV.1 TYPEP.ENV.2 TYPEP.ENV.3 - TYPEP.1 TYPEP.2 TYPEP.3 TYPEP.4 TYPEP.5 TYPEP.6 TYPEP.7 TYPEP.8 - TYPEP.9 TYPEP.10 TYPEP.11 TYPEP.12 TYPEP.13 TYPEP.14 TYPEP.15 TYPEP.16 - TYPEP.17 TYPE-OR-NOT-TYPE-IS-EVERYTHING USER-CLASS-DISJOINTNESS - USER-CLASS-DISJOINTNESS-2 USER-STRUCT-DISJOINTNESS - USER-STRUCT-DISJOINTNESS-2 -Test TAC-3.1 failed -Form: (SUBTYPEP* 'TAC-3-AB 'TAC-3-A) -Expected values: T - T -Actual values: NIL - NIL. -Test TAC-3.2 failed -Form: (SUBTYPEP* 'TAC-3-AB 'TAC-3-B) -Expected values: T - T -Actual values: NIL - NIL. -Test TAC-3.3 failed -Form: (SUBTYPEP* 'TAC-3-AB 'TAC-3-C) -Expected values: NIL - T -Actual values: NIL - NIL. -Test TAC-3.4 failed -Form: (SUBTYPEP* 'TAC-3-A 'TAC-3-AB) -Expected values: NIL - T -Actual values: NIL - NIL. -Test TAC-3.5 failed -Form: (SUBTYPEP* 'TAC-3-B 'TAC-3-AB) -Expected values: NIL - T -Actual values: NIL - NIL. -Test TAC-3.6 failed -Form: (SUBTYPEP* 'TAC-3-C 'TAC-3-AB) -Expected values: NIL - T -Actual values: NIL - NIL. -Test TAC-3.7 failed -Form: (SUBTYPEP* 'TAC-3-ABC 'TAC-3-A) -Expected values: T - T -Actual values: NIL - NIL. -Test TAC-3.8 failed -Form: (SUBTYPEP* 'TAC-3-ABC 'TAC-3-B) -Expected values: T - T -Actual values: NIL - NIL. -Test TAC-3.9 failed -Form: (SUBTYPEP* 'TAC-3-ABC 'TAC-3-C) -Expected values: T - T -Actual values: NIL - NIL. -Test TAC-3.10 failed -Form: (SUBTYPEP* 'TAC-3-ABC 'TAC-3-AB) -Expected values: T - T -Actual values: NIL - NIL. -Test TAC-3.11 failed -Form: (SUBTYPEP* 'TAC-3-ABC 'TAC-3-AC) -Expected values: T - T -Actual values: NIL - NIL. -Test TAC-3.12 failed -Form: (SUBTYPEP* 'TAC-3-ABC 'TAC-3-BC) -Expected values: T - T -Actual values: NIL - NIL. -Test TAC-3.13 failed -Form: (SUBTYPEP* 'TAC-3-AB 'TAC-3-ABC) -Expected values: NIL - T -Actual values: NIL - NIL. -Test TAC-3.14 failed -Form: (SUBTYPEP* 'TAC-3-AC 'TAC-3-ABC) -Expected values: NIL - T -Actual values: NIL - NIL. -Test TAC-3.15 failed -Form: (SUBTYPEP* 'TAC-3-BC 'TAC-3-ABC) -Expected values: NIL - T -Actual values: NIL - NIL. - TAC-3.16 TAC-3.17 -Test UNIVERSE-ELEMENTS-IN-AT-MOST-ONE-DISJOINT-TYPE failed -Form: (LOOP - FOR - E - IN - *UNIVERSE* - FOR - TYPES - = - (REMOVE-IF-NOT #'(LAMBDA (X) (TYPEP E X)) - *DISJOINT-TYPES-LIST*) - WHEN - (> (LENGTH TYPES) 1) - COLLECT - (LIST E TYPES)) -Expected value: NIL -Actual value: ((CONS (SYMBOL FUNCTION)) - ((SYSTEM:LAMBDA-CLOSURE () () () (X) X) (CONS FUNCTION))). - INTEGER-AND-RATIO-ARE-DISJOINT BIGNUM-AND-RATIO-ARE-DISJOINT - BIGNUM-AND-FIXNUM-ARE-DISJOINT FIXNUM-AND-RATIO-ARE-DISJOINT - BYTE8-AND-RATIO-ARE-DISJOINT BIT-AND-RATIO-ARE-DISJOINT - INTEGER-AND-FLOAT-ARE-DISJOINT RATIO-AND-FLOAT-ARE-DISJOINT - COMPLEX-AND-FLOAT-ARE-DISJOINT INTEGER-SUBRANGES-ARE-DISJOINT - KEYWORD-AND-NULL-ARE-DISJOINT KEYWORD-AND-BOOLEAN-ARE-DISJOINT - COERCE.1 COERCE.2 COERCE.3 COERCE.4 COERCE.5 COERCE.6 COERCE.7 - COERCE.8 COERCE.9 COERCE.10 COERCE.11 COERCE.12 COERCE.13 COERCE.14 - COERCE.15 COERCE.16 COERCE.17 COERCE.18 COERCE.19 COERCE.20 COERCE.21 - COERCE.22 COERCE.ORDER.1 COERCE.ERROR.2 COERCE.ERROR.3 COERCE.ERROR.4 - COERCE.ERROR.5 COERCE.ERROR.6 COERCE.ERROR.7 COERCE.ERROR.8 - COERCE.ERROR.9 SUBTYPEP.ORDER.1 SIMPLE-BASE-STRING-IS-SEQUENCE - SUBTYPE.ENV.1 SUBTYPE.ENV.2 SUBTYPE.ENV.3 SUBTYPE.ENV.4 SUBTYPE.ENV.5 - SUBTYPEP.ERROR.1 SUBTYPEP.ERROR.2 SUBTYPEP.ERROR.3 - KEYWORD-IS-SUBTYPE-OF-ATOM RATIO-IS-SUBTYPE-OF-ATOM - EXTENDED-CHAR-IS-SUBTYPE-OF-ATOM STRING-IS-NOT-SIMPLE-VECTOR - BASE-STRING-IS-NOT-SIMPLE-VECTOR SIMPLE-STRING-IS-NOT-SIMPLE-VECTOR - 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 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 - SUBTYPEP.INTEGER.RATIONAL.10 SUBTYPEP.FLOAT.1 SUBTYPEP.FLOAT.2 - SUBTYPEP.FLOAT.3 SUBTYPEP.FLOAT.4 SUBTYPEP.FLOAT.5 SUBTYPEP.FLOAT.6 - SUBTYPEP.FLOAT.7 SUBTYPEP.FLOAT.8 SUBTYPEP.FLOAT.9 SUBTYPEP.FLOAT.10 - SUBTYPEP.FLOAT.11 SUBTYPEP.FLOAT.12 SUBTYPEP.FLOAT.13 - SUBTYPEP.FLOAT.14 SUBTYPEP.FLOAT.15 SUBTYPEP.FLOAT.16 - SUBTYPEP.FLOAT.17 SUBTYPEP.FLOAT.18 SUBTYPEP.FLOAT.19 - SUBTYPEP.FLOAT.20 SUBTYPEP.FLOAT.21 SUBTYPEP.FLOAT.22 - SUBTYPEP.FLOAT.23 SUBTYPEP.FLOAT.24 SUBTYPEP.FLOAT.25 - SUBTYPEP.FLOAT.26 SUBTYPEP.FLOAT.27 SUBTYPEP.RATIONAL.1 - SUBTYPEP.RATIONAL.2 SUBTYPEP.RATIONAL.3 SUBTYPEP.RATIONAL.4 - SUBTYPEP.RATIONAL.5 SUBTYPEP.RATIONAL.6 SUBTYPEP.RATIONAL.7 - SUBTYPEP.RATIONAL.8 SUBTYPEP.RATIONAL.9 SUBTYPEP.RATIONAL.10 - SUBTYPEP.RATIONAL.11 SUBTYPEP.RATIONAL.12 SUBTYPEP.RATIONAL.13 - SUBTYPEP.RATIONAL.14 SUBTYPEP.RATIONAL.15 SUBTYPEP.RATIONAL.16 - SUBTYPEP.RATIONAL.17 SUBTYPEP.RATIONAL.18 SUBTYPEP.REAL.1 - SUBTYPEP.REAL.2 SUBTYPEP.REAL.3 SUBTYPEP.REAL.4 SUBTYPEP.REAL.5 - SUBTYPEP.REAL.6 SUBTYPEP.REAL.7 SUBTYPEP.REAL.8 SUBTYPEP.REAL.9 - SUBTYPEP.REAL.10 SUBTYPEP.REAL.11 SUBTYPEP.REAL.12 SUBTYPEP.REAL.13 - SUBTYPEP.REAL.14 SUBTYPEP.REAL.15 SUBTYPEP.REAL.16 SUBTYPEP.REAL.17 - SUBTYPEP.REAL.18 SUBTYPEP.REAL.19 SUBTYPEP.REAL.20 SUBTYPEP.REAL.21 - SUBTYPEP.REAL.22 SUBTYPEP.REAL.23 SUBTYPEP.REAL.24 SUBTYPEP.CONS.1 -Test SUBTYPEP.CONS.2 failed -Form: (LOOP - FOR - T1 - IN - '((CONS NIL) (CONS NIL *) (CONS NIL T) (CONS * NIL) - (CONS T NIL) (CONS NIL NIL)) - UNLESS - (SUBTYPEP T1 NIL) - COLLECT - T1) -Expected value: NIL -Actual value: ((CONS NIL) (CONS NIL *) (CONS NIL T) (CONS * NIL) - (CONS T NIL) (CONS NIL NIL)). - SUBTYPEP.CONS.3 SUBTYPEP.CONS.4 SUBTYPEP.CONS.5 SUBTYPEP.CONS.6 - SUBTYPEP.CONS.7 SUBTYPEP.CONS.8 SUBTYPEP.CONS.9 SUBTYPEP.CONS.10 - SUBTYPEP.CONS.11 -Test SUBTYPEP.CONS.12 failed -Form: (CHECK-ALL-NOT-SUBTYPEP - '(CONS (OR INTEGER SYMBOL) (OR INTEGER SYMBOL)) - '(OR (CONS INTEGER SYMBOL) (CONS SYMBOL INTEGER))) -Expected value: NIL -Actual value: (((SUBTYPEP - '(CONS (OR INTEGER SYMBOL) (OR INTEGER SYMBOL)) - '(OR (CONS INTEGER SYMBOL) (CONS SYMBOL INTEGER))) - ==> T T) - ((SUBTYPEP - '(NOT (OR (CONS INTEGER SYMBOL) - (CONS SYMBOL INTEGER))) - '(NOT (CONS (OR INTEGER SYMBOL) - (OR INTEGER SYMBOL)))) - ==> T T)). - SUBTYPEP.CONS.13 SUBTYPEP.CONS.14 SUBTYPEP.CONS.15 SUBTYPEP.CONS.16 - SUBTYPEP.CONS.17 SUBTYPEP.CONS.18 SUBTYPEP.CONS.19 SUBTYPEP.CONS.20 - SUBTYPEP.MEMBER.1 SUBTYPEP.MEMBER.2 SUBTYPEP.MEMBER.3 - SUBTYPEP.MEMBER.4 SUBTYPEP.MEMBER.5 SUBTYPEP.MEMBER.6 - SUBTYPEP.MEMBER.7 SUBTYPEP.MEMBER.8 SUBTYPEP.MEMBER.9 - SUBTYPEP.MEMBER.10 SUBTYPEP.MEMBER.11 SUBTYPEP.MEMBER.12 - SUBTYPEP.MEMBER.13 SUBTYPEP.MEMBER.14 SUBTYPEP.MEMBER.15 - SUBTYPEP.MEMBER.16 -Test SUBTYPEP.MEMBER.17 failed -Form: (LET ((S1 (COPY-SEQ "abc")) (S2 (COPY-SEQ "abc"))) - (LET ((T1 (LIST 'MEMBER S1)) (T2 (LIST 'MEMBER S2))) - (COND - ((SUBTYPEP T1 T2) "T1 is subtype of T2") - ((SUBTYPEP T2 T1) "T2 is subtype of T1") - (T (CHECK-DISJOINTNESS T1 T2))))) -Expected value: NIL -Actual value: "T1 is subtype of T2". -Test SUBTYPEP.MEMBER.18 failed -Form: (LET ((S1 (COPY-SEQ '(A B C))) (S2 (COPY-SEQ '(A B C)))) - (LET ((T1 (LIST 'MEMBER S1)) (T2 (LIST 'MEMBER S2))) - (COND - ((SUBTYPEP T1 T2) "T1 is subtype of T2") - ((SUBTYPEP T2 T1) "T2 is subtype of T1") - (T (CHECK-DISJOINTNESS T1 T2))))) -Expected value: NIL -Actual value: "T1 is subtype of T2". - SUBTYPEP.MEMBER.19 SUBTYPEP.MEMBER.20 SUBTYPEP.MEMBER.21 - SUBTYPEP.MEMBER.22 SUBTYPEP.MEMBER.23 SUBTYPEP.MEMBER.24 - SUBTYPEP.MEMBER.25 SUBTYPEP.MEMBER.26 SUBTYPEP.MEMBER.27 - SUBTYPEP.MEMBER.28 SUBTYPEP.MEMBER.29 SUBTYPEP.MEMBER.30 - SUBTYPEP.MEMBER.31 SUBTYPEP.MEMBER.32 SUBTYPEP.MEMBER.33 - SUBTYPEP.MEMBER.34 SUBTYPEP.MEMBER.35 SUBTYPEP.MEMBER.36 - SUBTYPEP.MEMBER.37 SUBTYPEP.MEMBER.38 SUBTYPEP.MEMBER.39 - SUBTYPEP.MEMBER.40 SUBTYPEP.MEMBER.41 SUBTYPEP.MEMBER.42 - SUBTYPEP.MEMBER.43 SUBTYPEP.MEMBER.44 -Test SUBTYPEP.EQL.1 failed -Form: (LET ((S1 (COPY-SEQ "abc")) (S2 (COPY-SEQ "abc"))) - (LET ((T1 (LIST 'EQL S1)) (T2 (LIST 'EQL S2))) - (COND - ((SUBTYPEP T1 T2) "T1 is subtype of T2") - ((SUBTYPEP T2 T1) "T2 is subtype of T1") - (T (CHECK-DISJOINTNESS T1 T2))))) -Expected value: NIL -Actual value: "T1 is subtype of T2". -Test SUBTYPEP.EQL.2 failed -Form: (LET ((S1 (COPY-SEQ '(A B C))) (S2 (COPY-SEQ '(A B C)))) - (LET ((T1 (LIST 'EQL S1)) (T2 (LIST 'EQL S2))) - (COND - ((SUBTYPEP T1 T2) "T1 is subtype of T2") - ((SUBTYPEP T2 T1) "T2 is subtype of T1") - (T (CHECK-DISJOINTNESS T1 T2))))) -Expected value: NIL -Actual value: "T1 is subtype of T2". - SUBTYPEP.EQL.3 SUBTYPEP.EQL.4 SUBTYPEP.EQL.5 SUBTYPEP.EQL.6 - SUBTYPEP.EQL.7 SUBTYPEP.EQL.8 -Test SUBTYPEP.ARRAY.1 failed -Form: (LET ((ARRAY-TYPES - (CONS (FIND-CLASS 'ARRAY) - '(ARRAY (ARRAY) (ARRAY *) (ARRAY * *))))) - (LOOP - FOR - TP1 - IN - ARRAY-TYPES - APPEND - (LOOP - FOR - TP2 - IN - ARRAY-TYPES - UNLESS - (SUBTYPEP TP1 TP2) - COLLECT - (LIST TP1 TP2)))) -Expected value: NIL -Actual value: ((# ARRAY) - (# (ARRAY)) - (# (ARRAY *)) - (# (ARRAY * *)) - (ARRAY #) - ((ARRAY) - #) - ((ARRAY *) - #) - ((ARRAY * *) - #)). - SUBTYPEP.ARRAY.2 -Test SUBTYPEP.ARRAY.3 failed -Form: (LOOP - FOR - I - FROM - 0 - BELOW - (MIN 16 ARRAY-RANK-LIMIT) - FOR - TYPE - = - (LIST 'ARRAY '* I) - FOR - TYPE2 - = - (LIST 'ARRAY '* (MAKE-LIST I :INITIAL-ELEMENT '*)) - UNLESS - (AND (SUBTYPEP TYPE 'ARRAY) (SUBTYPEP TYPE '(ARRAY)) - (SUBTYPEP TYPE '(ARRAY *)) (SUBTYPEP TYPE '(ARRAY * *)) - (SUBTYPEP TYPE TYPE2)) - COLLECT - TYPE) -Expected value: NIL -Actual value: #. -Test SUBTYPEP.ARRAY.4 failed -Form: (LOOP - FOR - I - FROM - 0 - BELOW - (MIN 16 ARRAY-RANK-LIMIT) - FOR - TYPE - = - (LIST 'ARRAY T I) - FOR - TYPE2 - = - (LIST 'ARRAY T (MAKE-LIST I :INITIAL-ELEMENT '*)) - UNLESS - (AND (SUBTYPEP TYPE '(ARRAY T)) (SUBTYPEP TYPE '(ARRAY T *)) - (SUBTYPEP TYPE TYPE2)) - COLLECT - TYPE) -Expected value: NIL -Actual value: #. -Test SUBTYPEP.ARRAY.5 failed -Form: (LOOP - FOR - ELEMENT-TYPE - IN - (CONS '* *ARRAY-ELEMENT-TYPES*) - NCONC - (LOOP - FOR - I - FROM - 0 - BELOW - (MIN 16 ARRAY-RANK-LIMIT) - FOR - TYPE - = - (LIST 'ARRAY ELEMENT-TYPE I) - FOR - TYPE2 - = - (LIST 'ARRAY ELEMENT-TYPE (MAKE-LIST I :INITIAL-ELEMENT '0)) - FOR - TYPE3 - = - (LIST 'ARRAY ELEMENT-TYPE (MAKE-LIST I :INITIAL-ELEMENT '1)) - UNLESS - (AND (SUBTYPEP TYPE2 TYPE) (SUBTYPEP TYPE3 TYPE) - (LOOP - FOR - J - FROM - 0 - TO - I - ALWAYS - (AND (SUBTYPEP - (LIST 'ARRAY ELEMENT-TYPE - (APPEND (MAKE-LIST J :INITIAL-ELEMENT - '*) - (MAKE-LIST (- I J) - :INITIAL-ELEMENT 2))) - TYPE) - (SUBTYPEP - (LIST 'ARRAY ELEMENT-TYPE - (APPEND (MAKE-LIST J :INITIAL-ELEMENT - 2) - (MAKE-LIST (- I J) - :INITIAL-ELEMENT '*))) - TYPE)))) - COLLECT - TYPE)) -Expected value: NIL -Actual value: #. - SUBTYPEP.ARAY.6 SUBTYPEP.ARAY.7 READTABLE-VALID READTABLEP.1 - READ-SYMBOL.1 READ-SYMBOL.2 READ-SYMBOL.3 READ-SYMBOL.4 READ-SYMBOL.5 - READ-SYMBOL.6 READ-SYMBOL.7 READ-SYMBOL.9 READ-SYMBOL.10 CHAR.1 CHAR.2 - CHAR.3 CHAR.4 CHAR.5 CHAR.6 CHAR.7 CHAR.8 CHAR.9 CHAR.10 CHAR.ORDER.1 - CHAR.ORDER.2 SCHAR.1 SCHAR.2 SCHAR.3 SCHAR.4 SCHAR.5 SCHAR.6 SCHAR.7 - SCHAR.ORDER.1 SCHAR.ORDER.2 STRING.1 STRING.2 STRING.3 STRING.4 - STRING.5 STRING.6 STRING.7 BASE-STRING.1 BASE-STRING.2 BASE-STRING.3 - BASE-STRING.4 SIMPLE-STRING.1 SIMPLE-STRING.2 SIMPLE-STRING.3 - SIMPLE-STRING.4 SIMPLE-STRING.5 SIMPLE-BASE-STRING.1 - SIMPLE-BASE-STRING.2 SIMPLE-BASE-STRING.3 SIMPLE-BASE-STRING.4 - SIMPLE-BASE-STRING.5 SIMPLE-BASE-STRING.6 SIMPLE-BASE-STRING.7 - SIMPLE-BASE-STRING.8 SIMPLE-STRING-P.1 SIMPLE-STRING-P.2 - SIMPLE-STRING-P.3 SIMPLE-STRING-P.4 SIMPLE-STRING-P.5 - SIMPLE-STRING-P.6 SIMPLE-STRING-P.7 STRINGP.1 STRINGP.2 STRINGP.3 - STRINGP.4 STRINGP.5 STRINGP.6 STRINGP.7 STRINGP.8 STRING-UPCASE.1 - STRING-UPCASE.2 STRING-UPCASE.3 STRING-UPCASE.4 STRING-UPCASE.5 - STRING-UPCASE.6 STRING-UPCASE.7 STRING-UPCASE.8 STRING-UPCASE.9 - STRING-UPCASE.10 STRING-UPCASE.ORDER.1 STRING-UPCASE.ORDER.2 - STRING-UPCASE.ERROR.1 STRING-UPCASE.ERROR.2 STRING-UPCASE.ERROR.3 - STRING-UPCASE.ERROR.4 STRING-UPCASE.ERROR.5 STRING-UPCASE.ERROR.6 - STRING-DOWNCASE.1 STRING-DOWNCASE.2 STRING-DOWNCASE.3 - STRING-DOWNCASE.4 STRING-DOWNCASE.5 STRING-DOWNCASE.6 - STRING-DOWNCASE.7 STRING-DOWNCASE.8 STRING-DOWNCASE.9 - STRING-DOWNCASE.10 STRING-DOWNCASE.ORDER.1 STRING-DOWNCASE.ORDER.2 - STRING-DOWNCASE.ERROR.1 STRING-DOWNCASE.ERROR.2 - STRING-DOWNCASE.ERROR.3 STRING-DOWNCASE.ERROR.4 - STRING-DOWNCASE.ERROR.5 STRING-DOWNCASE.ERROR.6 STRING-CAPITALIZE.1 - STRING-CAPITALIZE.2 STRING-CAPITALIZE.3 STRING-CAPITALIZE.4 - STRING-CAPITALIZE.5 STRING-CAPITALIZE.6 STRING-CAPITALIZE.7 - STRING-CAPITALIZE.8 STRING-CAPITALIZE.9 STRING-CAPITALIZE.10 - STRING-CAPITALIZE.ORDER.1 STRING-CAPITALIZE.ORDER.2 - STRING-CAPITALIZE.ERROR.1 STRING-CAPITALIZE.ERROR.2 - STRING-CAPITALIZE.ERROR.3 STRING-CAPITALIZE.ERROR.4 - STRING-CAPITALIZE.ERROR.5 STRING-CAPITALIZE.ERROR.6 NSTRING-UPCASE.1 - NSTRING-UPCASE.2 NSTRING-UPCASE.3 NSTRING-UPCASE.6 NSTRING-UPCASE.7 - NSTRING-UPCASE.8 NSTRING-UPCASE.9 NSTRING-UPCASE.10 - NSTRING-UPCASE.ORDER.1 NSTRING-UPCASE.ORDER.2 NSTRING-UPCASE.ERROR.1 - NSTRING-UPCASE.ERROR.2 NSTRING-UPCASE.ERROR.3 NSTRING-UPCASE.ERROR.4 - NSTRING-UPCASE.ERROR.5 NSTRING-UPCASE.ERROR.6 NSTRING-DOWNCASE.1 - NSTRING-DOWNCASE.2 NSTRING-DOWNCASE.3 NSTRING-DOWNCASE.6 - NSTRING-DOWNCASE.7 NSTRING-DOWNCASE.8 NSTRING-DOWNCASE.9 - NSTRING-DOWNCASE.10 NSTRING-DOWNCASE.ORDER.1 NSTRING-DOWNCASE.ORDER.2 - NSTRING-DOWNCASE.ERROR.1 NSTRING-DOWNCASE.ERROR.2 - NSTRING-DOWNCASE.ERROR.3 NSTRING-DOWNCASE.ERROR.4 - NSTRING-DOWNCASE.ERROR.5 NSTRING-DOWNCASE.ERROR.6 NSTRING-CAPITALIZE.1 - NSTRING-CAPITALIZE.2 NSTRING-CAPITALIZE.3 NSTRING-CAPITALIZE.4 - NSTRING-CAPITALIZE.7 NSTRING-CAPITALIZE.8 NSTRING-CAPITALIZE.9 - NSTRING-CAPITALIZE.10 NSTRING-CAPITALIZE.ORDER.1 - NSTRING-CAPITALIZE.ORDER.2 NSTRING-CAPITALIZE.ERROR.1 - NSTRING-CAPITALIZE.ERROR.2 NSTRING-CAPITALIZE.ERROR.3 - NSTRING-CAPITALIZE.ERROR.4 NSTRING-CAPITALIZE.ERROR.5 - NSTRING-CAPITALIZE.ERROR.6 STRING-TRIM.1 STRING-TRIM.2 STRING-TRIM.3 - STRING-TRIM.4 STRING-TRIM.5 STRING-TRIM.6 STRING-TRIM.7 STRING-TRIM.8 - STRING-TRIM.9 STRING-TRIM.10 STRING-TRIM.11 STRING-TRIM.12 - STRING-TRIM.13 STRING-TRIM.14 STRING-TRIM.15 STRING-TRIM.16 - STRING-TRIM.17 STRING-TRIM.18 STRING-TRIM.19 STRING-TRIM.ORDER.1 - STRING-TRIM.ERROR.1 STRING-TRIM.ERROR.2 STRING-TRIM.ERROR.3 - STRING-LEFT-TRIM.1 STRING-LEFT-TRIM.2 STRING-LEFT-TRIM.3 - STRING-LEFT-TRIM.4 STRING-LEFT-TRIM.5 STRING-LEFT-TRIM.6 - STRING-LEFT-TRIM.7 STRING-LEFT-TRIM.8 STRING-LEFT-TRIM.9 - STRING-LEFT-TRIM.10 STRING-LEFT-TRIM.11 STRING-LEFT-TRIM.12 - STRING-LEFT-TRIM.13 STRING-LEFT-TRIM.14 STRING-LEFT-TRIM.15 - STRING-LEFT-TRIM.16 STRING-LEFT-TRIM.17 STRING-LEFT-TRIM.18 - STRING-LEFT-TRIM.19 STRING-LEFT-TRIM.ORDER.1 STRING-LEFT-TRIM.ERROR.1 - STRING-LEFT-TRIM.ERROR.2 STRING-LEFT-TRIM.ERROR.3 STRING-RIGHT-TRIM.1 - STRING-RIGHT-TRIM.2 STRING-RIGHT-TRIM.3 STRING-RIGHT-TRIM.4 - STRING-RIGHT-TRIM.5 STRING-RIGHT-TRIM.6 STRING-RIGHT-TRIM.7 - STRING-RIGHT-TRIM.8 STRING-RIGHT-TRIM.9 STRING-RIGHT-TRIM.10 - STRING-RIGHT-TRIM.11 STRING-RIGHT-TRIM.12 STRING-RIGHT-TRIM.13 - STRING-RIGHT-TRIM.14 STRING-RIGHT-TRIM.15 STRING-RIGHT-TRIM.16 - STRING-RIGHT-TRIM.17 STRING-RIGHT-TRIM.18 STRING-RIGHT-TRIM.19 - STRING-RIGHT-TRIM.ORDER.1 STRING-RIGHT-TRIM.ERROR.1 - STRING-RIGHT-TRIM.ERROR.2 STRING-RIGHT-TRIM.ERROR.3 STRING=.1 - STRING=.2 STRING=.3 STRING=.4 STRING=.5 STRING=.6 STRING=.7 STRING=.8 - STRING=.9 STRING=.10 STRING=.11 STRING=.12 STRING=.13 STRING=.14 - STRING=.ORDER.1 STRING=.ORDER.2 STRING=.ORDER.3 STRING<=.ORDER.1 - STRING<=.ORDER.2 STRING<=.ORDER.3 STRING<.ORDER.1 STRING<.ORDER.2 - STRING<.ORDER.3 STRING/=.ORDER.1 STRING/=.ORDER.2 STRING/=.ORDER.3 - STRING>=.ORDER.1 STRING>=.ORDER.2 STRING>=.ORDER.3 STRING>.ORDER.1 - STRING>.ORDER.2 STRING>.ORDER.3 STRING-EQUAL.ORDER.1 - STRING-EQUAL.ORDER.2 STRING-EQUAL.ORDER.3 STRING-NOT-GREATERP.ORDER.1 - STRING-NOT-GREATERP.ORDER.2 STRING-NOT-GREATERP.ORDER.3 - STRING-LESSP.ORDER.1 STRING-LESSP.ORDER.2 STRING-LESSP.ORDER.3 - STRING-NOT-EQUAL.ORDER.1 STRING-NOT-EQUAL.ORDER.2 - STRING-NOT-EQUAL.ORDER.3 STRING-NOT-LESSP.ORDER.1 - STRING-NOT-LESSP.ORDER.2 STRING-NOT-LESSP.ORDER.3 - STRING-GREATERP.ORDER.1 STRING-GREATERP.ORDER.2 - STRING-GREATERP.ORDER.3ERROR 111443620> - 'PACKAGE-ERROR) - ==> NIL T) - ((SUBTYPEP '(NOT PACKAGE-ERROR) - '(NOT #)) - ==> NIL T) - ((SUBTYPEP - '(NOT #) - '(NOT PACKAGE-ERROR)) - ==> NIL T) - ((SUBTYPEP 'PARSE-ERROR - #) - ==> NIL T) - ((SUBTYPEP - # - 'PARSE-ERROR) - ==> NIL T) - ((SUBTYPEP '(NOT PARSE-ERROR) - '(NOT #)) - ==> NIL T) - ((SUBTYPEP - '(NOT #) - '(NOT PARSE-ERROR)) - ==> NIL T) - ((SUBTYPEP 'WARNING - #) - ==> NIL T) - ((SUBTYPEP - # 'WARNING) - ==> NIL T) - ((SUBTYPEP '(NOT WARNING) - '(NOT #)) - ==> NIL T) - ((SUBTYPEP - '(NOT #) - '(NOT WARNING)) - ==> NIL T) - ((SUBTYPEP 'STORAGE-CONDITION - #) - ==> NIL T) - ((SUBTYPEP - # - 'STORAGE-CONDITION) - ==> NIL T) - ((SUBTYPEP '(NOT STORAGE-CONDITION) - '(NOT #)) - ==> NIL T) - ((SUBTYPEP - '(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 #)) - ==> NIL T) - ((SUBTYPEP - '(NOT #) - '(NOT FLOATING-POINT-INVALID-OPERATION)) - ==> NIL T) - ((SUBTYPEP 'PROGRAM-ERROR - #) - ==> NIL T) - ((SUBTYPEP - # - 'PROGRAM-ERROR) - ==> NIL T) - ((SUBTYPEP '(NOT PROGRAM-ERROR) - '(NOT #)) - ==> NIL T) - ((SUBTYPEP - '(NOT #) - '(NOT PROGRAM-ERROR)) - ==> NIL T) - ((SUBTYPEP 'METHOD - #) - ==> NIL T) - ((SUBTYPEP - # 'METHOD) - ==> NIL T) - ((SUBTYPEP '(NOT METHOD) - '(NOT #)) - ==> NIL T) - ((SUBTYPEP - '(NOT #) - '(NOT METHOD)) - ==> NIL T) - ((SUBTYPEP 'STANDARD-CLASS - #) - ==> NIL T) - ((SUBTYPEP - # - 'STANDARD-CLASS) - ==> NIL T) - ((SUBTYPEP '(NOT STANDARD-CLASS) - '(NOT #)) - ==> NIL T) - ((SUBTYPEP - '(NOT #) - '(NOT STANDARD-CLASS)) - ==> NIL T) - ((SUBTYPEP 'GENERIC-FUNCTION - #) - ==> NIL T) - ((SUBTYPEP - # - 'GENERIC-FUNCTION) - ==> NIL T) - ((SUBTYPEP '(NOT GENERIC-FUNCTION) - '(NOT #)) - ==> NIL T) - ((SUBTYPEP - '(NOT #) - '(NOT GENERIC-FUNCTION)) - ==> NIL T) - ((SUBTYPEP 'STREAM-ERROR - #) - ==> NIL T) - ((SUBTYPEP - # - 'STREAM-ERROR) - ==> NIL T) - ((SUBTYPEP '(NOT STREAM-ERROR) - '(NOT #)) - ==> NIL T) - ((SUBTYPEP - '(NOT #) - '(NOT STREAM-ERROR)) - ==> NIL T) - ((SUBTYPEP 'SERIOUS-CONDITION - #) - ==> NIL T) - ((SUBTYPEP - # - 'SERIOUS-CONDITION) - ==> NIL T) - ((SUBTYPEP '(NOT SERIOUS-CONDITION) - '(NOT #)) - ==> NIL T) - ((SUBTYPEP - '(NOT #) - '(NOT SERIOUS-CONDITION)) - ==> NIL T) - ((SUBTYPEP 'READER-ERROR - #) - ==> NIL T) - ((SUBTYPEP - # - 'READER-ERROR) - ==> NIL T) - ((SUBTYPEP '(NOT READER-ERROR) - '(NOT #)) - ==> NIL T) - ((SUBTYPEP - '(NOT #) - '(NOT READER-ERROR)) - ==> NIL T) - ((SUBTYPEP 'VECTOR - #) - ==> NIL T) - ((SUBTYPEP - # 'VECTOR) - ==> NIL T) - ((SUBTYPEP '(NOT VECTOR) - '(NOT #)) - ==> NIL T) - ((SUBTYPEP - '(NOT #) - '(NOT VECTOR)) - ==> NIL T) - ((SUBTYPEP 'CONDITION - #) - ==> NIL T) - ((SUBTYPEP - # 'CONDITION) - ==> NIL T) - ((SUBTYPEP '(NOT CONDITION) - '(NOT #)) - ==> NIL T) - ((SUBTYPEP - '(NOT #) - '(NOT CONDITION)) - ==> NIL T) - ((SUBTYPEP 'UNBOUND-VARIABLE - #) - ==> NIL T) - ((SUBTYPEP - # - 'UNBOUND-VARIABLE) - ==> NIL T) - ((SUBTYPEP '(NOT UNBOUND-VARIABLE) - '(NOT #)) - ==> NIL T) - ((SUBTYPEP - '(NOT #) + '(NOT #) '(NOT UNBOUND-VARIABLE)) ==> NIL T)). Test ALL-STANDARD-CLASSES-ARE-SUBTYPES-OF-STANDARD-OBJECT failed @@ -30451,112 +30591,7 @@ 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 RANDOM-STRING-COMPARISON-TESTS MAKE-STRING.1 - MAKE-STRING.2 MAKE-STRING.3 MAKE-STRING.4 MAKE-STRING.5 MAKE-STRING.6 - MAKE-STRING.7 MAKE-STRING.8 MAKE-STRING.9 - MAKE-STRING.ALLOW-OTHER-KEYS.1 MAKE-STRING.ALLOW-OTHER-KEYS.2 - MAKE-STRING.ALLOW-OTHER-KEYS.3 MAKE-STRING.ALLOW-OTHER-KEYS.4 - MAKE-STRING.ALLOW-OTHER-KEYS.5 MAKE-STRING.ALLOW-OTHER-KEYS.6 - MAKE-STRING.KEYWORDS.7 MAKE-STRING.ERROR.1 MAKE-STRING.ERROR.2 - MAKE-STRING.ERROR.3 MAKE-STRING.ERROR.4 MAKE-STRING.ERROR.5 - MAKE-STRING.ERROR.6 MAKE-STRING.ORDER.1 MAKE-STRING.ORDER.2 - MAKE-STRING.ORDER.3 -Test PATHNAMES-PRINT-AND-READ-PROPERLY failed -Form: (WITH-STANDARD-IO-SYNTAX - (LOOP - FOR - P1 - IN - *PATHNAMES* - FOR - S - = - (HANDLER-CASE (WRITE-TO-STRING P1 :READABLY T) - (PRINT-NOT-READABLE NIL :UNREADABLE-ERROR)) - UNLESS - (EQL S :UNREADABLE-ERROR) - APPEND - (LET ((P2 (READ-FROM-STRING S))) - (UNLESS (EQUAL P1 P2) (LIST (LIST P1 S P2)))))) -Expected value: NIL -Actual value: ((#p"" "#p\"\"" #p"") (#p"" "#p\"\"" #p"")). - PATHNAME.1 PATHNAME.2 PATHNAME.3 PATHNAME.4 PATHNAME.5 PATHNAME.6 - PATHNAME.7 PATHNAME.8 PATHNAME.9 PATHNAME.10 PATHNAME.11 - PATHNAME.ERROR.1 PATHNAME.ERROR.2 PATHNAMEP.1 PATHNAMEP.2 PATHNAMEP.3 - PATHNAMEP.ERROR.1 PATHNAMEP.ERROR.2 PATHNAMEP.ERROR.3 MAKE-PATHNAME.1 - MAKE-PATHNAME.2 MAKE-PATHNAME.2A MAKE-PATHNAME.3 MAKE-PATHNAME.3A - MAKE-PATHNAME.4 MAKE-PATHNAME.5 MAKE-PATHNAME.6 MAKE-PATHNAME.7 - MAKE-PATHNAME.8 MAKE-PATHNAME.9 MAKE-PATHNAME.10 MAKE-PATHNAME.11 - MAKE-PATHNAME.12 MAKE-PATHNAME.13 MAKE-PATHNAME.14 - 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 + RENAME-FILE.2 RENAME-FILE.3 RENAME-FILE.4 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 @@ -30589,21 +30624,6 @@ 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 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 STREAM-ELEMENT-TYPE.5 STREAM-ELEMENT-TYPE.6 @@ -30751,7 +30771,26 @@ FILE-LENGTH.ERROR.10 FILE-LENGTH.ERROR.11 FILE-LENGTH.ERROR.12 FILE-LENGTH.1 FILE-LENGTH.2 FILE-LENGTH.3 FILE-LENGTH.4 FILE-LENGTH.5 FILE-LENGTH.6 FILE-POSITION.1 FILE-POSITION.2 FILE-POSITION.3 - FILE-POSITION.4 FILE-POSITION.5 FILE-POSITION.6 + FILE-POSITION.4 FILE-POSITION.5 FILE-POSITION.6 FILE-POSITION.7 + FILE-POSITION.8 FILE-POSITION.9 FILE-POSITION.10 FILE-POSITION.ERROR.1 + FILE-POSITION.ERROR.2 FILE-STRING-LENGTH.1 FILE-STRING-LENGTH.2 + FILE-STRING-LENGTH.3 FILE-STRING-LENGTH.ERROR.1 + FILE-STRING-LENGTH.ERROR.2 FILE-STRING-LENGTH.ERROR.3 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 STREAM-ELEMENT-TYPE.5 STREAM-ELEMENT-TYPE.6 STREAM-ELEMENT-TYPE.ERROR.1 STREAM-ELEMENT-TYPE.ERROR.2 @@ -31222,11 +31261,40 @@ CHAR-DOWNCASE.4 CHAR-DOWNCASE.ORDER.1 CHAR-DOWNCASE.ERROR.1 CHAR-DOWNCASE.ERROR.2 UPPER-CASE-P.1 UPPER-CASE-P.2 UPPER-CASE-P.3 UPPER-CASE-P.4 UPPER-CASE-P.ORDER.1 UPPER-CASE-P.ERROR.1 - UPPER-CASE-P.ERROR.2 LOWER-CASE-P.1 LOWER-CASE-P.2 FILE-POSITION.7 - FILE-POSITION.8 FILE-POSITION.9 FILE-POSITION.10 FILE-POSITION.ERROR.1 - FILE-POSITION.ERROR.2 FILE-STRING-LENGTH.1 FILE-STRING-LENGTH.2 - FILE-STRING-LENGTH.3 FILE-STRING-LENGTH.ERROR.1 - FILE-STRING-LENGTH.ERROR.2 FILE-STRING-LENGTH.ERROR.3 OPEN.1 OPEN.2 + UPPER-CASE-P.ERROR.2 LOWER-CASE-P.1 LOWER-CASE-P.2 LOWER-CASE-P.3 + LOWER-CASE-P.ORDER.1 LOWER-CASE-P.ERROR.1 LOWER-CASE-P.ERROR.2 + BOTH-CASE-P.1 BOTH-CASE-P.2 BOTH-CASE-P.3 BOTH-CASE-P.ORDER.1 + BOTH-CASE-P.ERROR.1 BOTH-CASE-P.ERROR.2 CHAR-CODE.1 CHAR-CODE.2 + CHAR-CODE.ORDER.1 CHAR-CODE.ERROR.1 CHAR-CODE.ERROR.2 CODE-CHAR.1 + CODE-CHAR.ORDER.1 CODE-CHAR.ERROR.1 +Test CODE-CHAR.ERROR.2 failed +Form: (CLASSIFY-ERROR (CODE-CHAR 1 1)) +Expected value: PROGRAM-ERROR +Actual value: NIL. + CHAR-INT.1 CHAR-INT.2 CHAR-INT.ORDER.1 CHAR-INT.ERROR.1 + CHAR-INT.ERROR.2 CHAR-NAME.1 CHAR-NAME.2 CHAR-NAME.3 CHAR-NAME.4 + CHAR-NAME.5 CHAR-NAME.ORDER.1 CHAR-NAME.ERROR.1 CHAR-NAME.ERROR.2 + NAME-CHAR.1 NAME-CHAR.2 NAME-CHAR.ORDER.1 NAME-CHAR.ERROR.1 + NAME-CHAR.ERROR.2 CHAR-COMPARE-NO-ARGS CHAR=.1 CHAR=.2 CHAR=.3 CHAR=.4 + CHAR=.ORDER.1 CHAR=.ORDER.2 CHAR=.ORDER.3 CHAR/=.1 CHAR/=.2 CHAR/=.3 + CHAR/=.4 CHAR/=.ORDER.1 CHAR/=.ORDER.2 CHAR/=.ORDER.3 CHAR<=.1 + CHAR<=.2 CHAR<=.3 CHAR<=.4 CHAR<=.5 CHAR<=.6 CHAR<=.7 CHAR<=.8 + CHAR<=.ORDER.1 CHAR<=.ORDER.2 CHAR<=.ORDER.3 CHAR<.1 CHAR<.2 CHAR<.3 + CHAR<.4 CHAR<.5 CHAR<.6 CHAR<.7 CHAR<.8 CHAR<.ORDER.1 CHAR<.ORDER.2 + CHAR<.ORDER.3 CHAR<.ORDER.4 CHAR>=.1 CHAR>=.2 CHAR>=.3 CHAR>=.4 + CHAR>=.5 CHAR>=.6 CHAR>=.7 CHAR>=.8 CHAR>=.ORDER.1 CHAR>=.ORDER.2 + CHAR>=.ORDER.3 CHAR>=.ORDER.4 CHAR>.1 CHAR>.2 CHAR>.3 CHAR>.4 CHAR>.5 + CHAR>.6 CHAR>.7 CHAR>.8 CHAR>.ORDER.1 CHAR>.ORDER.2 CHAR>.ORDER.3 + CHAR>.ORDER.4 CHAR-EQUAL.1 CHAR-EQUAL.2 CHAR-EQUAL.3 CHAR-EQUAL.4 + CHAR-EQUAL.ORDER.1 CHAR-EQUAL.ORDER.2 CHAR-EQUAL.ORDER.3 + CHAR-EQUAL.ORDER.4 CHAR-NOT-EQUAL.1 CHAR-NOT-EQUAL.2 CHAR-NOT-EQUAL.3 + CHAR-NOT-EQUAL.4 CHAR-NOT-EQUAL.ORDER.1 CHAR-NOT-EQUAL.ORDER.2 + CHAR-NOT-EQUAL.ORDER.3 CHAR-NOT-EQUAL.ORDER.4 CHAR-NOT-GREATERP.1 + CHAR-NOT-GREATERP.2 CHAR-NOT-GREATERP.3 CHAR-NOT-GREATERP.4 + CHAR-NOT-GREATERP.5 CHAR-NOT-GREATERP.6 CHAR-NOT-GREATERP.7 + CHAR-NOT-GREATERP.8 CHAR-NOT-GREATERP.ORDER.1 + CHAR-NOT-GREATERP.ORDER.2 CHAR-NOT-GREATERP.ORDER.3 + CHAR-NOT-GREATERP.ORDER.4 CHAR-LESSP.1 CHAR-LESSP.2 OPEN.1 OPEN.2 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 @@ -31579,39 +31647,6 @@ CHAR-NOT-GREATERP.5 CHAR-NOT-GREATERP.6 CHAR-NOT-GREATERP.7 CHAR-NOT-GREATERP.8 CHAR-NOT-GREATERP.ORDER.1 CHAR-NOT-GREATERP.ORDER.2 CHAR-NOT-GREATERP.ORDER.3 - CHAR-NOT-GREATERP.ORDER.4 CHAR-LESSP.1 CHAR-LESSP.2 LOWER-CASE-P.3 - LOWER-CASE-P.ORDER.1 LOWER-CASE-P.ERROR.1 LOWER-CASE-P.ERROR.2 - BOTH-CASE-P.1 BOTH-CASE-P.2 BOTH-CASE-P.3 BOTH-CASE-P.ORDER.1 - BOTH-CASE-P.ERROR.1 BOTH-CASE-P.ERROR.2 CHAR-CODE.1 CHAR-CODE.2 - CHAR-CODE.ORDER.1 CHAR-CODE.ERROR.1 CHAR-CODE.ERROR.2 CODE-CHAR.1 - CODE-CHAR.ORDER.1 CODE-CHAR.ERROR.1 -Test CODE-CHAR.ERROR.2 failed -Form: (CLASSIFY-ERROR (CODE-CHAR 1 1)) -Expected value: PROGRAM-ERROR -Actual value: NIL. - CHAR-INT.1 CHAR-INT.2 CHAR-INT.ORDER.1 CHAR-INT.ERROR.1 - CHAR-INT.ERROR.2 CHAR-NAME.1 CHAR-NAME.2 CHAR-NAME.3 CHAR-NAME.4 - CHAR-NAME.5 CHAR-NAME.ORDER.1 CHAR-NAME.ERROR.1 CHAR-NAME.ERROR.2 - NAME-CHAR.1 NAME-CHAR.2 NAME-CHAR.ORDER.1 NAME-CHAR.ERROR.1 - NAME-CHAR.ERROR.2 CHAR-COMPARE-NO-ARGS CHAR=.1 CHAR=.2 CHAR=.3 CHAR=.4 - CHAR=.ORDER.1 CHAR=.ORDER.2 CHAR=.ORDER.3 CHAR/=.1 CHAR/=.2 CHAR/=.3 - CHAR/=.4 CHAR/=.ORDER.1 CHAR/=.ORDER.2 CHAR/=.ORDER.3 CHAR<=.1 - CHAR<=.2 CHAR<=.3 CHAR<=.4 CHAR<=.5 CHAR<=.6 CHAR<=.7 CHAR<=.8 - CHAR<=.ORDER.1 CHAR<=.ORDER.2 CHAR<=.ORDER.3 CHAR<.1 CHAR<.2 CHAR<.3 - CHAR<.4 CHAR<.5 CHAR<.6 CHAR<.7 CHAR<.8 CHAR<.ORDER.1 CHAR<.ORDER.2 - CHAR<.ORDER.3 CHAR<.ORDER.4 CHAR>=.1 CHAR>=.2 CHAR>=.3 CHAR>=.4 - CHAR>=.5 CHAR>=.6 CHAR>=.7 CHAR>=.8 CHAR>=.ORDER.1 CHAR>=.ORDER.2 - CHAR>=.ORDER.3 CHAR>=.ORDER.4 CHAR>.1 CHAR>.2 CHAR>.3 CHAR>.4 CHAR>.5 - CHAR>.6 CHAR>.7 CHAR>.8 CHAR>.ORDER.1 CHAR>.ORDER.2 CHAR>.ORDER.3 - CHAR>.ORDER.4 CHAR-EQUAL.1 CHAR-EQUAL.2 CHAR-EQUAL.3 CHAR-EQUAL.4 - CHAR-EQUAL.ORDER.1 CHAR-EQUAL.ORDER.2 CHAR-EQUAL.ORDER.3 - CHAR-EQUAL.ORDER.4 CHAR-NOT-EQUAL.1 CHAR-NOT-EQUAL.2 CHAR-NOT-EQUAL.3 - CHAR-NOT-EQUAL.4 CHAR-NOT-EQUAL.ORDER.1 CHAR-NOT-EQUAL.ORDER.2 - CHAR-NOT-EQUAL.ORDER.3 CHAR-NOT-EQUAL.ORDER.4 CHAR-NOT-GREATERP.1 - CHAR-NOT-GREATERP.2 CHAR-NOT-GREATERP.3 CHAR-NOT-GREATERP.4 - CHAR-NOT-GREATERP.5 CHAR-NOT-GREATERP.6 CHAR-NOT-GREATERP.7 - CHAR-NOT-GREATERP.8 CHAR-NOT-GREATERP.ORDER.1 - CHAR-NOT-GREATERP.ORDER.2 CHAR-NOT-GREATERP.ORDER.3 CHAR-NOT-GREATERP.ORDER.4 CHAR-LESSP.1 CHAR-LESSP.2 CHAR-LESSP.3 CHAR-LESSP.4 CHAR-LESSP.5 CHAR-LESSP.6 CHAR-LESSP.7 CHAR-LESSP.8 CHAR-LESSP.ORDER.1 CHAR-LESSP.ORDER.2 CHAR-LESSP.ORDER.3 @@ -31721,6 +31756,10 @@ touch build-stamp fakeroot debian/rules binary 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 CHAR-LESSP.3 CHAR-LESSP.4 CHAR-LESSP.5 CHAR-LESSP.6 CHAR-LESSP.7 CHAR-LESSP.8 CHAR-LESSP.ORDER.1 CHAR-LESSP.ORDER.2 CHAR-LESSP.ORDER.3 @@ -31826,11 +31865,7 @@ DIGIT-CHAR.ERROR.2, CODE-CHAR.ERROR.2.;; Finished loading "gclload.lsp" T ->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.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 @@ -31933,8 +31968,8 @@ dh_gencontrol -a -u"-Vgcc=gcc" dh_md5sums -a dh_builddeb -a -dpkg-deb: building package 'gcl' in '../gcl_2.6.12-102_arm64.deb'. dpkg-deb: building package 'gcl-dbgsym' in '../gcl-dbgsym_2.6.12-102_arm64.deb'. +dpkg-deb: building package 'gcl' in '../gcl_2.6.12-102_arm64.deb'. dpkg-genbuildinfo --build=binary dpkg-genchanges --build=binary >../gcl_2.6.12-102_arm64.changes dpkg-genchanges: info: binary-only upload (no source code included) @@ -31942,12 +31977,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/96213/tmp/hooks/B01_cleanup starting +I: user script /srv/workspace/pbuilder/96213/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/296566 and its subdirectories -I: Current time: Sat Jan 6 07:54:37 -12 2024 -I: pbuilder-time-stamp: 1704570877 +I: removing directory /srv/workspace/pbuilder/96213 and its subdirectories +I: Current time: Sun Jan 7 10:12:27 +14 2024 +I: pbuilder-time-stamp: 1704571947