Diff of the two buildlogs:
--
--- b1/build.log 2025-03-26 07:38:37.818707959 +0000
+++ b2/build.log 2025-03-26 08:05:58.821088688 +0000
@@ -1,7 +1,6 @@
-W: cgroups are not available on the host, not using them.
I: pbuilder: network access will be disabled during build
-I: Current time: Tue Apr 28 01:45:23 -12 2026
-I: pbuilder-time-stamp: 1777383923
+I: Current time: Wed Mar 26 21:38:42 +14 2025
+I: pbuilder-time-stamp: 1742974722
I: Building the build Environment
I: extracting base tarball [/var/cache/pbuilder/unstable-reproducible-base.tgz]
I: copying local configuration
@@ -40,51 +39,84 @@
dpkg-source: info: applying Version_2_6_15pre18
I: using fakeroot in build.
I: Installing the build-deps
-I: user script /srv/workspace/pbuilder/849285/tmp/hooks/D02_print_environment starting
+I: user script /srv/workspace/pbuilder/505186/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 Mar 26 07:38 /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/505186/tmp/hooks/D01_modify_environment finished
+I: user script /srv/workspace/pbuilder/505186/tmp/hooks/D02_print_environment starting
I: set
- BUILDDIR='/build/reproducible-path'
- BUILDUSERGECOS='first user,first room,first work-phone,first home-phone,first other'
- BUILDUSERNAME='pbuilder1'
- BUILD_ARCH='arm64'
- DEBIAN_FRONTEND='noninteractive'
+ BASH=/bin/sh
+ BASHOPTS=checkwinsize:cmdhist:complete_fullquote:extquote:force_fignore:globasciiranges:globskipdots:hostcomplete:interactive_comments:patsub_replacement:progcomp:promptvars:sourcepath
+ BASH_ALIASES=()
+ BASH_ARGC=()
+ BASH_ARGV=()
+ BASH_CMDS=()
+ BASH_LINENO=([0]="12" [1]="0")
+ BASH_LOADABLES_PATH=/usr/local/lib/bash:/usr/lib/bash:/opt/local/lib/bash:/usr/pkg/lib/bash:/opt/pkg/lib/bash:.
+ BASH_SOURCE=([0]="/tmp/hooks/D02_print_environment" [1]="/tmp/hooks/D02_print_environment")
+ BASH_VERSINFO=([0]="5" [1]="2" [2]="37" [3]="1" [4]="release" [5]="aarch64-unknown-linux-gnu")
+ BASH_VERSION='5.2.37(1)-release'
+ BUILDDIR=/build/reproducible-path
+ BUILDUSERGECOS='second user,second room,second work-phone,second home-phone,second other'
+ BUILDUSERNAME=pbuilder2
+ BUILD_ARCH=arm64
+ DEBIAN_FRONTEND=noninteractive
DEB_BUILD_OPTIONS='buildinfo=+all reproducible=+all parallel=12 '
- DISTRIBUTION='unstable'
- HOME='/root'
- HOST_ARCH='arm64'
+ DIRSTACK=()
+ DISTRIBUTION=unstable
+ EUID=0
+ FUNCNAME=([0]="Echo" [1]="main")
+ GROUPS=()
+ HOME=/root
+ HOSTNAME=i-capture-the-hostname
+ HOSTTYPE=aarch64
+ HOST_ARCH=arm64
IFS='
'
- LANG='C'
- LANGUAGE='en_US:en'
- LC_ALL='C'
- MAIL='/var/mail/root'
- OPTIND='1'
- PATH='/usr/sbin:/usr/bin:/sbin:/bin:/usr/games'
- PBCURRENTCOMMANDLINEOPERATION='build'
- PBUILDER_OPERATION='build'
- PBUILDER_PKGDATADIR='/usr/share/pbuilder'
- PBUILDER_PKGLIBDIR='/usr/lib/pbuilder'
- PBUILDER_SYSCONFDIR='/etc'
- PPID='849285'
- PS1='# '
- PS2='> '
+ INVOCATION_ID=5927b760384244f5b457d2e48758d035
+ 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=505186
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.LIL9T9eD/pbuilderrc_Z7ds --distribution unstable --hookdir /etc/pbuilder/first-build-hooks --debbuildopts -b --basetgz /var/cache/pbuilder/unstable-reproducible-base.tgz --buildresult /srv/reproducible-results/rbuild-debian/r-b-build.LIL9T9eD/b1 --logfile b1/build.log gcl_2.6.14-19.dsc'
- SUDO_GID='109'
- SUDO_UID='104'
- SUDO_USER='jenkins'
- TERM='unknown'
- TZ='/usr/share/zoneinfo/Etc/GMT+12'
- USER='root'
- _='/usr/sbin/chroot'
- http_proxy='http://192.168.101.4:3128'
+ PWD=/
+ SHELL=/bin/bash
+ SHELLOPTS=braceexpand:errexit:hashall:interactive-comments:posix
+ SHLVL=3
+ SUDO_COMMAND='/usr/bin/timeout -k 24.1h 24h /usr/bin/ionice -c 3 /usr/bin/nice -n 11 /usr/bin/unshare --uts -- /usr/sbin/pbuilder --build --configfile /srv/reproducible-results/rbuild-debian/r-b-build.LIL9T9eD/pbuilderrc_MYAE --distribution unstable --hookdir /etc/pbuilder/rebuild-hooks --debbuildopts -b --basetgz /var/cache/pbuilder/unstable-reproducible-base.tgz --buildresult /srv/reproducible-results/rbuild-debian/r-b-build.LIL9T9eD/b2 --logfile b2/build.log gcl_2.6.14-19.dsc'
+ SUDO_GID=109
+ SUDO_UID=104
+ SUDO_USER=jenkins
+ TERM=unknown
+ TZ=/usr/share/zoneinfo/Etc/GMT-14
+ UID=0
+ USER=root
+ _='I: set'
+ http_proxy=http://192.168.101.4:3128
I: uname -a
- Linux codethink03-arm64 6.1.0-32-cloud-arm64 #1 SMP Debian 6.1.129-1 (2025-03-06) aarch64 GNU/Linux
+ Linux i-capture-the-hostname 6.1.0-32-cloud-arm64 #1 SMP Debian 6.1.129-1 (2025-03-06) aarch64 GNU/Linux
I: ls -l /bin
- lrwxrwxrwx 1 root root 7 Mar 4 2025 /bin -> usr/bin
-I: user script /srv/workspace/pbuilder/849285/tmp/hooks/D02_print_environment finished
+ lrwxrwxrwx 1 root root 7 Mar 4 11:20 /bin -> usr/bin
+I: user script /srv/workspace/pbuilder/505186/tmp/hooks/D02_print_environment finished
-> Attempting to satisfy build-dependencies
-> Creating pbuilder-satisfydepends-dummy package
Package: pbuilder-satisfydepends-dummy
@@ -254,7 +286,7 @@
Get: 110 http://deb.debian.org/debian unstable/main arm64 tk8.6 arm64 8.6.16-1 [69.7 kB]
Get: 111 http://deb.debian.org/debian unstable/main arm64 x11proto-core-dev all 2024.1-1 [3312 B]
Get: 112 http://deb.debian.org/debian unstable/main arm64 tk8.6-dev arm64 8.6.16-1 [763 kB]
-Fetched 50.8 MB in 0s (172 MB/s)
+Fetched 50.8 MB in 1s (81.7 MB/s)
Preconfiguring packages ...
Selecting previously unselected package tzdata.
(Reading database ...
(Reading database ... 5%
(Reading database ... 10%
(Reading database ... 15%
(Reading database ... 20%
(Reading database ... 25%
(Reading database ... 30%
(Reading database ... 35%
(Reading database ... 40%
(Reading database ... 45%
(Reading database ... 50%
(Reading database ... 55%
(Reading database ... 60%
(Reading database ... 65%
(Reading database ... 70%
(Reading database ... 75%
(Reading database ... 80%
(Reading database ... 85%
(Reading database ... 90%
(Reading database ... 95%
(Reading database ... 100%
(Reading database ... 19919 files and directories currently installed.)
@@ -622,8 +654,8 @@
Setting up tzdata (2025b-1) ...
Current default time zone: 'Etc/UTC'
-Local time is now: Tue Apr 28 13:45:52 UTC 2026.
-Universal Time is now: Tue Apr 28 13:45:52 UTC 2026.
+Local time is now: Wed Mar 26 07:39:42 UTC 2025.
+Universal Time is now: Wed Mar 26 07:39:42 UTC 2025.
Run 'dpkg-reconfigure tzdata' if you wish to change it.
Setting up xtrans-dev (1.4.0-1) ...
@@ -732,7 +764,11 @@
fakeroot is already the newest version (1.37.1.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.14/ && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games" HOME="/nonexistent/first-build" dpkg-buildpackage -us -uc -b && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games" HOME="/nonexistent/first-build" dpkg-genchanges -S > ../gcl_2.6.14-19_source.changes
+I: user script /srv/workspace/pbuilder/505186/tmp/hooks/A99_set_merged_usr starting
+Not re-configuring usrmerge for unstable
+I: user script /srv/workspace/pbuilder/505186/tmp/hooks/A99_set_merged_usr finished
+hostname: Name or service not known
+I: Running cd /build/reproducible-path/gcl-2.6.14/ && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games:/i/capture/the/path" HOME="/nonexistent/second-build" dpkg-buildpackage -us -uc -b && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games:/i/capture/the/path" HOME="/nonexistent/second-build" dpkg-genchanges -S > ../gcl_2.6.14-19_source.changes
dpkg-buildpackage: info: source package gcl
dpkg-buildpackage: info: source version 2.6.14-19
dpkg-buildpackage: info: source distribution unstable
@@ -3214,13 +3250,13 @@
cd info && /usr/bin/make
make[2]: Entering directory '/build/reproducible-path/gcl-2.6.14/info'
TEXINPUTS=.:$TEXINPUTS tex --interaction nonstopmode gcl-si.texi || true
-/bin/sh: 1: tex: not found
+/bin/sh: line 1: tex: command not found
rm -f *.cp *.ky *.vr *.tp *.pg *.toc *.aux *.log *.fn
dvipdfm gcl-si.dvi
make[2]: dvipdfm: No such file or directory
make[2]: [makefile:36: gcl-si.pdf] Error 127 (ignored)
TEXINPUTS=.:$TEXINPUTS tex --interaction nonstopmode gcl.texi || true
-/bin/sh: 1: tex: not found
+/bin/sh: line 1: tex: command not found
rm -f *.cp *.ky *.vr *.tp *.pg *.toc *.aux *.log *.fn
dvipdfm gcl.dvi
make[2]: dvipdfm: No such file or directory
@@ -6100,20 +6136,20 @@
Finished compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_fixup.o.
Loading binary of GCL_PCL_FIXUP...
;; Loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_fixup.o"
-Compiling gazonk_1134864_0.lsp.
+Compiling gazonk_1581220_0.lsp.
End of Pass 1.
End of Pass 2.
OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3
-Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_0.o.
-;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_0.o"
-start address -T 0xef9b70 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_0.o"
-Compiling gazonk_1134864_1.lsp.
+Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_0.o.
+;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_0.o"
+start address -T 0xef9b70 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_0.o"
+Compiling gazonk_1581220_1.lsp.
End of Pass 1.
End of Pass 2.
OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3
-Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_1.o.
-;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_1.o"
-start address -T 0xefa180 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_1.o"
+Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_1.o.
+;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_1.o"
+start address -T 0xefa180 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_1.o"
start address -T 0xef99b0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_fixup.o"
Compiling GCL_PCL_DEFCOMBIN...
Compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_defcombin.lisp.
@@ -6123,34 +6159,34 @@
Finished compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_defcombin.o.
Loading binary of GCL_PCL_DEFCOMBIN...
;; Loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_defcombin.o"
-Compiling gazonk_1134864_2.lsp.
+Compiling gazonk_1581220_2.lsp.
End of Pass 1.
End of Pass 2.
OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3
-Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_2.o.
-;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_2.o"
-start address -T 0xefe7a0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_2.o"
-Compiling gazonk_1134864_3.lsp.
+Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_2.o.
+;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_2.o"
+start address -T 0xefe7a0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_2.o"
+Compiling gazonk_1581220_3.lsp.
End of Pass 1.
End of Pass 2.
OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3
-Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_3.o.
-;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_3.o"
-start address -T 0xeff8d0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_3.o"
-Compiling gazonk_1134864_4.lsp.
+Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_3.o.
+;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_3.o"
+start address -T 0xeff8d0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_3.o"
+Compiling gazonk_1581220_4.lsp.
End of Pass 1.
End of Pass 2.
OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3
-Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_4.o.
-;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_4.o"
-start address -T 0xf00650 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_4.o"
-Compiling gazonk_1134864_5.lsp.
+Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_4.o.
+;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_4.o"
+start address -T 0xf00650 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_4.o"
+Compiling gazonk_1581220_5.lsp.
End of Pass 1.
End of Pass 2.
OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3
-Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_5.o.
-;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_5.o"
-start address -T 0xf00ef0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_5.o"
+Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_5.o.
+;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_5.o"
+start address -T 0xf00ef0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_5.o"
start address -T 0xefa790 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_defcombin.o"
Compiling GCL_PCL_CTYPES...
Compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_ctypes.lisp.
@@ -6160,13 +6196,13 @@
Finished compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_ctypes.o.
Loading binary of GCL_PCL_CTYPES...
;; Loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_ctypes.o"
-Compiling gazonk_1134864_6.lsp.
+Compiling gazonk_1581220_6.lsp.
End of Pass 1.
End of Pass 2.
OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3
-Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_6.o.
-;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_6.o"
-start address -T 0xf020e0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_6.o"
+Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_6.o.
+;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_6.o"
+start address -T 0xf020e0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_6.o"
start address -T 0xf01930 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_ctypes.o"
Compiling GCL_PCL_ENV...
Compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_env.lisp.
@@ -6179,13 +6215,13 @@
Finished compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_env.o.
Loading binary of GCL_PCL_ENV...
;; Loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_env.o"
-Compiling gazonk_1134864_7.lsp.
+Compiling gazonk_1581220_7.lsp.
End of Pass 1.
End of Pass 2.
OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3
-Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_7.o.
-;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_7.o"
-start address -T 0xf08a10 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1134864_7.o"
+Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_7.o.
+;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_7.o"
+start address -T 0xf08a10 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1581220_7.o"
Warning: DESCRIBE is being redefined.
start address -T 0xf02980 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_env.o"
Compiling GCL_PCL_COMPAT...
@@ -7058,7 +7094,7 @@
/tmp/
>;; Loading "../tkl.o"
-start address -T 0x109ead0 ;; Finished loading "../tkl.o"
+start address -T 0x1097e50 ;; Finished loading "../tkl.o"
82958
>
@@ -7068,13 +7104,13 @@
cd info && /usr/bin/make
make[2]: Entering directory '/build/reproducible-path/gcl-2.6.14/info'
TEXINPUTS=.:$TEXINPUTS tex --interaction nonstopmode gcl-si.texi || true
-/bin/sh: 1: tex: not found
+/bin/sh: line 1: tex: command not found
rm -f *.cp *.ky *.vr *.tp *.pg *.toc *.aux *.log *.fn
dvipdfm gcl-si.dvi
make[2]: dvipdfm: No such file or directory
make[2]: [makefile:36: gcl-si.pdf] Error 127 (ignored)
TEXINPUTS=.:$TEXINPUTS tex --interaction nonstopmode gcl.texi || true
-/bin/sh: 1: tex: not found
+/bin/sh: line 1: tex: command not found
rm -f *.cp *.ky *.vr *.tp *.pg *.toc *.aux *.log *.fn
dvipdfm gcl.dvi
make[2]: dvipdfm: No such file or directory
@@ -9670,13 +9706,13 @@
cd info && /usr/bin/make
make[2]: Entering directory '/build/reproducible-path/gcl-2.6.14/info'
TEXINPUTS=.:$TEXINPUTS tex --interaction nonstopmode gcl-si.texi || true
-/bin/sh: 1: tex: not found
+/bin/sh: line 1: tex: command not found
rm -f *.cp *.ky *.vr *.tp *.pg *.toc *.aux *.log *.fn
dvipdfm gcl-si.dvi
make[2]: dvipdfm: No such file or directory
make[2]: [makefile:36: gcl-si.pdf] Error 127 (ignored)
TEXINPUTS=.:$TEXINPUTS tex --interaction nonstopmode gcl.texi || true
-/bin/sh: 1: tex: not found
+/bin/sh: line 1: tex: command not found
rm -f *.cp *.ky *.vr *.tp *.pg *.toc *.aux *.log *.fn
dvipdfm gcl.dvi
make[2]: dvipdfm: No such file or directory
@@ -12542,20 +12578,20 @@
Finished compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_fixup.o.
Loading binary of GCL_PCL_FIXUP...
;; Loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_fixup.o"
-Compiling gazonk_1209105_0.lsp.
+Compiling gazonk_2347394_0.lsp.
End of Pass 1.
End of Pass 2.
OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3
-Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_0.o.
-;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_0.o"
-start address -T 0xef9b70 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_0.o"
-Compiling gazonk_1209105_1.lsp.
+Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_0.o.
+;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_0.o"
+start address -T 0xef9b70 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_0.o"
+Compiling gazonk_2347394_1.lsp.
End of Pass 1.
End of Pass 2.
OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3
-Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_1.o.
-;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_1.o"
-start address -T 0xefa180 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_1.o"
+Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_1.o.
+;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_1.o"
+start address -T 0xefa180 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_1.o"
start address -T 0xef99b0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_fixup.o"
Compiling GCL_PCL_DEFCOMBIN...
Compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_defcombin.lisp.
@@ -12565,34 +12601,34 @@
Finished compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_defcombin.o.
Loading binary of GCL_PCL_DEFCOMBIN...
;; Loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_defcombin.o"
-Compiling gazonk_1209105_2.lsp.
+Compiling gazonk_2347394_2.lsp.
End of Pass 1.
End of Pass 2.
OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3
-Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_2.o.
-;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_2.o"
-start address -T 0xefe7a0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_2.o"
-Compiling gazonk_1209105_3.lsp.
+Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_2.o.
+;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_2.o"
+start address -T 0xefe7a0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_2.o"
+Compiling gazonk_2347394_3.lsp.
End of Pass 1.
End of Pass 2.
OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3
-Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_3.o.
-;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_3.o"
-start address -T 0xeff8d0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_3.o"
-Compiling gazonk_1209105_4.lsp.
+Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_3.o.
+;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_3.o"
+start address -T 0xeff8d0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_3.o"
+Compiling gazonk_2347394_4.lsp.
End of Pass 1.
End of Pass 2.
OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3
-Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_4.o.
-;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_4.o"
-start address -T 0xf00650 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_4.o"
-Compiling gazonk_1209105_5.lsp.
+Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_4.o.
+;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_4.o"
+start address -T 0xf00650 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_4.o"
+Compiling gazonk_2347394_5.lsp.
End of Pass 1.
End of Pass 2.
OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3
-Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_5.o.
-;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_5.o"
-start address -T 0xf00ef0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_5.o"
+Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_5.o.
+;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_5.o"
+start address -T 0xf00ef0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_5.o"
start address -T 0xefa790 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_defcombin.o"
Compiling GCL_PCL_CTYPES...
Compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_ctypes.lisp.
@@ -12602,13 +12638,13 @@
Finished compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_ctypes.o.
Loading binary of GCL_PCL_CTYPES...
;; Loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_ctypes.o"
-Compiling gazonk_1209105_6.lsp.
+Compiling gazonk_2347394_6.lsp.
End of Pass 1.
End of Pass 2.
OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3
-Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_6.o.
-;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_6.o"
-start address -T 0xf020e0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_6.o"
+Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_6.o.
+;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_6.o"
+start address -T 0xf020e0 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_6.o"
start address -T 0xf01930 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_ctypes.o"
Compiling GCL_PCL_ENV...
Compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_env.lisp.
@@ -12621,13 +12657,13 @@
Finished compiling /build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_env.o.
Loading binary of GCL_PCL_ENV...
;; Loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_env.o"
-Compiling gazonk_1209105_7.lsp.
+Compiling gazonk_2347394_7.lsp.
End of Pass 1.
End of Pass 2.
OPTIMIZE levels: Safety=1 (No runtime error checking), Space=0, Speed=3
-Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_7.o.
-;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_7.o"
-start address -T 0xf08a10 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_1209105_7.o"
+Finished compiling /build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_7.o.
+;; Loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_7.o"
+start address -T 0xf08a10 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/pcl/gazonk_2347394_7.o"
Warning: DESCRIBE is being redefined.
start address -T 0xf02980 ;; Finished loading #p"/build/reproducible-path/gcl-2.6.14/unixport/../pcl/gcl_pcl_env.o"
Compiling GCL_PCL_COMPAT...
@@ -13500,7 +13536,7 @@
/tmp/
>;; Loading "../tkl.o"
-start address -T 0x109e490 ;; Finished loading "../tkl.o"
+start address -T 0x109a9b0 ;; Finished loading "../tkl.o"
82958
>
@@ -13510,13 +13546,13 @@
cd info && /usr/bin/make
make[2]: Entering directory '/build/reproducible-path/gcl-2.6.14/info'
TEXINPUTS=.:$TEXINPUTS tex --interaction nonstopmode gcl-si.texi || true
-/bin/sh: 1: tex: not found
+/bin/sh: line 1: tex: command not found
rm -f *.cp *.ky *.vr *.tp *.pg *.toc *.aux *.log *.fn
dvipdfm gcl-si.dvi
make[2]: dvipdfm: No such file or directory
make[2]: [makefile:36: gcl-si.pdf] Error 127 (ignored)
TEXINPUTS=.:$TEXINPUTS tex --interaction nonstopmode gcl.texi || true
-/bin/sh: 1: tex: not found
+/bin/sh: line 1: tex: command not found
rm -f *.cp *.ky *.vr *.tp *.pg *.toc *.aux *.log *.fn
dvipdfm gcl.dvi
make[2]: dvipdfm: No such file or directory
@@ -13675,7 +13711,7 @@
OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3
Finished compiling /build/reproducible-path/gcl-2.6.14/ansi-tests/rt.o.
;; Loading #p"rt.o"
-start address -T 0x1065960 ;; Finished loading #p"rt.o"
+start address -T 0xffea70 ;; Finished loading #p"rt.o"
;; Loading "cl-test-package.lsp"
;; Finished loading "cl-test-package.lsp"
;; Loading "universe.lsp"
@@ -13720,7 +13756,7 @@
OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3
Finished compiling /build/reproducible-path/gcl-2.6.14/ansi-tests/rt.o.
;; Loading #p"rt.o"
-start address -T 0x1065960 ;; Finished loading #p"rt.o"
+start address -T 0xffea70 ;; Finished loading #p"rt.o"
;; Loading "cl-test-package.lsp"
;; Finished loading "cl-test-package.lsp"
;; Loading "universe.lsp"
@@ -14243,7 +14279,389 @@
Form: (REMOVE-IF #'MACRO-FUNCTION *EVAL-AND-COMPILE-MACROS*)
Expected value: NIL
Actual value: (DEFINE-SYMBOL-MACRO).
- COMPILE.1 COMPILE.2Doing 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: #<compiled-function COMPILER::CMP-ANON>
+ 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: #<CONDITIONS::INTERNAL-SIMPLE-PROGRAM-ERROR.0>.
+ CONSTANTP.7
+Test CONSTANTP.8 failed
+Form: (NOTNOT-MV (CONSTANTP 1 NIL))
+Expected value: T
+Actual value: #<CONDITIONS::INTERNAL-SIMPLE-PROGRAM-ERROR.1>.
+ 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: #<CONDITIONS::INTERNAL-SIMPLE-PROGRAM-ERROR.2>.
+ 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: #<CONDITIONS::INTERNAL-SIMPLE-TYPE-ERROR.3>.
+Test FBOUNDP.7 failed
+Form: (LET ((G (GENSYM))) (FBOUNDP (LIST 'SETF G)))
+Expected value: NIL
+Actual value: #<CONDITIONS::INTERNAL-SIMPLE-TYPE-ERROR.4>.
+ 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: #<CONDITIONS::INTERNAL-SIMPLE-UNDEFINED-FUNCTION.5>.
+Test FDEFINITION.2 failed
+Form: (PROGN (FDEFINITION 'COND) :GOOD)
+Expected value: :GOOD
+Actual value: #<CONDITIONS::INTERNAL-SIMPLE-UNDEFINED-FUNCTION.6>.
+Test FDEFINITION.3 failed
+Form: (PROGN (FDEFINITION 'SETQ) :GOOD)
+Expected value: :GOOD
+Actual value: #<CONDITIONS::INTERNAL-SIMPLE-UNDEFINED-FUNCTION.7>.
+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: #<CONDITIONS::INTERNAL-SIMPLE-PROGRAM-ERROR.8>.
+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: #<CONDITIONS::INTERNAL-SIMPLE-TYPE-ERROR.9>.
+Test FDEFINITION.ORDER.1 failed
+Form: (LET ((I 0)) (FDEFINITION (PROGN (INCF I) 'SETQ)) I)
+Expected value: 1
+Actual value: #<CONDITIONS::INTERNAL-SIMPLE-UNDEFINED-FUNCTION.10>.
+ 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: #<CONDITIONS::INTERNAL-SIMPLE-ERROR.11>.
+ 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: #<CONDITIONS::INTERNAL-SIMPLE-TYPE-ERROR.12>.
+ 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: #<CONDITIONS::INTERNAL-SIMPLE-UNDEFINED-FUNCTION.13>.
+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: #<CONDITIONS::INTERNAL-SIMPLE-UNDEFINED-FUNCTION.14>.
+Test FUNCTION-LAMBDA-EXPRESSION.ORDER.1 failed
+Form: (LET ((I 0))
+ (FUNCTION-LAMBDA-EXPRESSION (PROGN (INCF I) #'CONS))
+ I)
+Expected value: 1
+Actual value: #<CONDITIONS::INTERNAL-SIMPLE-UNDEFINED-FUNCTION.15>.
+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: #<CONDITIONS::INTERNAL-SIMPLE-TYPE-ERROR.16>.
+ 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*
@@ -16422,389 +16840,52 @@
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 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: #<compiled-function COMPILER::CMP-ANON>
- 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: #<CONDITIONS::INTERNAL-SIMPLE-PROGRAM-ERROR.0>.
- CONSTANTP.7
-Test CONSTANTP.8 failed
-Form: (NOTNOT-MV (CONSTANTP 1 NIL))
-Expected value: T
-Actual value: #<CONDITIONS::INTERNAL-SIMPLE-PROGRAM-ERROR.1>.
- 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: #<CONDITIONS::INTERNAL-SIMPLE-PROGRAM-ERROR.2>.
- 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: #<CONDITIONS::INTERNAL-SIMPLE-TYPE-ERROR.3>.
-Test FBOUNDP.7 failed
-Form: (LET ((G (GENSYM))) (FBOUNDP (LIST 'SETF G)))
-Expected value: NIL
-Actual value: #<CONDITIONS::INTERNAL-SIMPLE-TYPE-ERROR.4>.
- 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: #<CONDITIONS::INTERNAL-SIMPLE-UNDEFINED-FUNCTION.5>.
-Test FDEFINITION.2 failed
-Form: (PROGN (FDEFINITION 'COND) :GOOD)
-Expected value: :GOOD
-Actual value: #<CONDITIONS::INTERNAL-SIMPLE-UNDEFINED-FUNCTION.6>.
-Test FDEFINITION.3 failed
-Form: (PROGN (FDEFINITION 'SETQ) :GOOD)
-Expected value: :GOOD
-Actual value: #<CONDITIONS::INTERNAL-SIMPLE-UNDEFINED-FUNCTION.7>.
-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: #<CONDITIONS::INTERNAL-SIMPLE-PROGRAM-ERROR.8>.
-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: #<CONDITIONS::INTERNAL-SIMPLE-TYPE-ERROR.9>.
-Test FDEFINITION.ORDER.1 failed
-Form: (LET ((I 0)) (FDEFINITION (PROGN (INCF I) 'SETQ)) I)
-Expected value: 1
-Actual value: #<CONDITIONS::INTERNAL-SIMPLE-UNDEFINED-FUNCTION.10>.
- 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: #<CONDITIONS::INTERNAL-SIMPLE-ERROR.11>.
- 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: #<CONDITIONS::INTERNAL-SIMPLE-TYPE-ERROR.12>.
- 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: #<CONDITIONS::INTERNAL-SIMPLE-UNDEFINED-FUNCTION.13>.
-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: #<CONDITIONS::INTERNAL-SIMPLE-UNDEFINED-FUNCTION.14>.
-Test FUNCTION-LAMBDA-EXPRESSION.ORDER.1 failed
-Form: (LET ((I 0))
- (FUNCTION-LAMBDA-EXPRESSION (PROGN (INCF I) #'CONS))
- I)
-Expected value: 1
-Actual value: #<CONDITIONS::INTERNAL-SIMPLE-UNDEFINED-FUNCTION.15>.
-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: #<CONDITIONS::INTERNAL-SIMPLE-TYPE-ERROR.16>.
- FUNCTION.8 FUNCTION.9
+ 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
@@ -19498,10 +19579,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)
- #<hash-table 000000000132ceb8>
- #<hash-table 000000000132cef0>
- #<hash-table 000000000132cf28>
- #<hash-table 000000000132cf60> #p"foo" #p"foo"
+ #<hash-table 000000000132fda0>
+ #<hash-table 000000000132fdd8>
+ #<hash-table 000000000132fe10>
+ #<hash-table 000000000132fe48> #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"" #<output stream "stderr">
@@ -19509,7 +19590,7 @@
#<two-way stream 0000000000b39128>
#<synonym stream to *TERMINAL-IO*>
#<readtable 0000000000c53118>
- #<readtable 00000000012d7a60>
+ #<readtable 00000000012d7a30>
#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)
@@ -19518,7 +19599,7 @@
#<compiled-function VALUES>
#<compiled-function COND>
(SYSTEM:LAMBDA-CLOSURE () () () (X) X)
- #$21432891753082646881269794685792758234607977137639794957838607139053456445848542225236681936231009445579102442341416191871574923375771809105883457023146897560895425492376581137476018984586073581150643423014521782269767674283333812257437709532612120114955072254152339629213627393309728803692381836042072769643442103436969503002000606321244542421912352891502146076647037033843724302004696243337565883844275784482711196159046401618145600858090138106077514856728922198531079757407156401187616511102809175454094397312760492908386922187651555348712378185165882141202018015241057968064523441439612287290108997538988258407451174479142461424601424952125260670185935931040604983167172707513309617700439938284879546909496027293390803550843863089759650654615763701325236107347603003282786613341991501364303234520155199412781316281907451365859513550124238980404110064409017544138180800378881578740083615428663315967694998545886780654832648487553643731677945029975040399138099608225885633404405319746497578024159752331863619054290113628798576311980716969952005297360995387950369486298319470894513339803252984849282568745711497902417852352753508305301345696457350190648994149479818849847715014745630137713824012498753975118216663879611207534311675029120447708039119559180175665914073691139228522604743743413342205053589418619541092167924132247295970968661352281493254331506739522115842784789963719425603419291704168170998942842524943129842709393604030587002215596675891259750059629771203419404835240440176743311970649998906682359297617744099606833535281783678482117455941422580128838069042601149377861539651476568089737868355603642638854314330308094356254827741663444204068360750499479440509953646718285783780924983181564436743167643659332168294658052538910658176437005074603604526884643181367507910419721483607952053784627094976314149490259795016510175664643812356626977691772146829238901104779573318796902826548892595693780591327357251451011933262325714034311896463869251500484231228649762974594731809663166894483859306033390197258023026694654789051755821030013545919195414195406191877604542312218607458499735789668752486091875054993272005002093530742399835619687055547895198792314408245467164042424212205573441625888530505430114530567790334780636677873229865196348786219719785667420167345595518199823298147442399686061856981492857168159487047313973007233602321742587969859756755664733321702807501657327815714594389279106286101785708148469125649400422755684577370004004503094728057975436742527093949269461224700164981934041285532690986121657815522378344207505364792622243538153727192242210741891944515960091205891128329880731166732647538780200861324166969010461739392293241512547086821866686665186663076004320259423017193305800415370356761914302126142495779078897687687659691283636575977933693830203013596165111566512188178918485697003795968036713003248225234201666406983169673511223919949272421066580290689612282766590384388411970324430162365290246989590395373305911406976537178686446176289733242325564108520615612988514464003112377847027953118628530806910359009010184145519593965740477691551499340432872720426853237846763372737069899202705323139029679429780667230904605420919950579344575990018816530271543977993663478400361108291122828811036259198189744731691544141104583189338628169328601454398219523173965116795233518116390273856319255284273518181682909853527545397097325945734291026704506577195210273915773112779186947598032906447741128746016814819384094504014813034880461458344872571032867682202227887321062632306875394454200371812621911728172885815054403798788149406631929508843313723668007935561984747933801504338014082923661798968356078563456337963629382041050416042731876242714681224415001491184868118446849270778135791386770242007110314853996007538092836891535505701835968050476521625356759787459143717392744683907946214178358374326402680812119807622830978783613226133669539198011528700877057987939038719264655867945757559135707168394386950370382946584666048326180050260989425862346206430017282561065938698413420388257293856176682501481324832725371232739281370914838600520621042509831118562109548834986936869119466680768087974116748507612017473799310828507393124048639480488271805504249751220809618729863665872221170616640133272520015830766602543896055816983628283145561857013829738136858171847174580942921621395450714449254938909130590691060549992714716960695775063514068902316857047639549180513809359362286314842369268892693307484822492977847792670081470052751437614566679945934706746582172407820516835451358968840290119583849343707177305367297615874351943456001891240969095845741551227680636128022942575329498285811652926494777866175340520543327274684466449313742447492509766253943748884836925550778501094176028304748568034040314137964596920878793492807353107582771904239330604696169825722328800367795452256816808155904930344561354682173090165316128402558732733606425061503952847892460039214133573199704022731991809939746319046576030824078474185008700736578473552727532468098780745494046635978509861219860369147702644223481991988345879455752794846547201748344546631645907331463512742320357223873087909416935193825010060469737369737860023219022751575747861965945967517496984781951885987357684662957778995976589979190410442716485596006153922066387543372651919519500216687479152635191956730857095415494016992884803605552820058283630558381899827025752158743955232908351292944806968455094075184493908861408061362255116179967337861791008740569741045508168788794822989707210899863159023165861319531454409432139891038378457413993282870766645696541241143229513986992163996040260207600936263297261795649962362225426146791513714358980718875575034477551118347629162067058556445677656972469073805360132483099916156950149115623860930303961972025117111336534116703669150321081327844642385792317128272274388668353986858522889842062475566128736485917534512249367794261731141426861363175424015789905286833493321930107573360785559274343652715628091859365162915902841556431016124110572887686959520977200136245203377518900824689761951).
+ #$7568644328816382367545516621473196068917869934487165997962491976492729258522022612794703883689405243884056344172284410502322183644997815631713611613501531545550273726130689245043900108284058623382629359798023722596347736523149564365655844348050948894209000128850882376175006077677566955053067034345924221304968916230624415887419315887871805420614142361708444441635301755026177668020362953843124070970261347892427670116349754334080492137609799513509430333550909698372439460052129398480928967306876363732227473758951529517449769943486417620337471372878977201688769968537940810101028455425260705139942716480344699698879195386315864557051484872859985877597313409011931777126805514805230490444302058237235305398253435254560101288949701556728146999472800814697491371048766337153404779401649101772414403048981280555352826907861714255876804072289626903399157152293615989616283264725786724242393258793036236911044050473624453562825004717112421075486215875746074127209919309138278240403103508211570856290966912564691929508430017874072481786829292820315701231167428696051944638806479668464229031212733858804364006152804729962752293714099738991999322343597758807881143019970899718205144442646353273267139602920889659286835286820070400244997506363338860929273266580542981476418928863500088366725475420250927279220657047615363307752671431272069787062735630910959647949832497564390847014770871887832199646476113577133572399654694413855914560055541693436448104318896402552308480654713493763860762971454164229465616770457166182803620505474741854739573880450851327588172786190482286014530329622756683741568788073000824222800795002937672786823709764342290447651618083286293945069756367487519040618260370876733522109501137515549335618943266328167871947339017871434220805232438119867419737860781761404035819075997587980568098045273204823159113778393383458980758573254305847038602861535996849043604014672214330916123240594150976317776365408603362284812485126256184182309159173193022406509606992145980374805004378767936387362672385385676955479246557055958494841390024389622730645414042033887778291300653663587021937374744134245607367394952715011050469172654995531067124313517172891098255379703501831581151807694860505412421676188980355551571653263549485670757312174956910673657717400320820353784344192791318109856021757822706483437755365168599753313394046789707582461174383777483464204755926891392156357100028439821957734793796126322243523348573753561445761352538534871875244439620894953977610602792709954304002223428916940633746786780615739983265929247520636883612582962734200241147953462221706773401041782987227096840631299460075710132501986542925409676549340562453691650862776817110935781195139320966328624945268904690631562986318740429419108605210869358548067637789605010298002751414515239892476156521230916680686253423576803905154607074856891517004490348397179047462360838130735951894293860685554632750713704457680572229103893478661897499925422050736796655862881467521347863382477299439060473295800304899595550928837037125953981131461923735777297941924172502577554151957804987509241952954882321367471653305726556502087419289550310467492296328927695469150663522241058041474116357719654654757575125241159156975067869831714676530448921115156151558068782964322836367131345438603954109448039925788713671576155916666648599495842833102486711033478150167327749912860062912059531507447461783443054890870797638122252525565606512997366310418701933518442574730159715042410232393217677103891757306825180341953059031505745488368412931787905580855968597871929062797215146383451747047272140265690574634295881340422118680127433352050613679138641317098180524901849994813964073353870568541770037623759107825233103797271464709919775991424845973826270186695309484807174871966165817519343812756032218787140984815937109913360638810442679964686538328681378844084817051176702930482373767698478772300293068891751612855048277865204160165718224314728517749766651420196879457818489852798554391355225658972758134664535322029380847823530693654693478888530744451875786584228302955278643406792826033008937608456337280614514741623539094351403703895200185604627564600199750761255010086989920184586777120852588692557774796907121863466507725046096895482822815825504218564357583346112745040911276358890688445798858752571252445172204570456613507176750816229116204308425206285077524384858296781484190000293076954858459153782118054206368734265868756714670840767986868866269001977450516189315314777111129773929572067037082683455215695495562586544241400970536099506107961872523434740519362091919080820502662767469163823086082938934746556806723680694520719809426856293503206344969735045000693483936028338635044251973413090125251858590539466799693177278567693452475521679427121166632692276933552284237782590685683867189784059137517958297763790374412208718911942374137962058714466349590115581149781404486090904773544481225956743966039944466105586006408797317401851200920052065206053016104917984541826836910020565314422950872268112470703413904338957092119949233105340358497422302677733148324752736194039969626759453919199236383376892396315949679863171554128445510095200707138531458818866573503638653192352846756257323768748029852195853773851291362127568958900497968450710475962102557122153045790969241993453126959571092221830539501610515734274682898068864727605215102113609920317062137733816550489631742340881640313111155150596935812244015346629643140039931058220419659110048504334001862192132167692107349720502515168089358641847081835310635301759461664180735371960645918561737826145941947430779732207614984385958223489054293621484859530444455479295932344404845235258267107507275714694511745602567500983290979819869002381023734576643122296231112701772973685321795771365551094024626266418307741173063607236144667718097764799025448714040150036779749171405197276196188409768565738186060055171211995101646554261418384599543842732247925069442903165676205886706794912784348582391046253835446780610959359318450069192013850809796094762961354317822593200839202186084733668536676955917260).
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
@@ -19814,52 +19895,133 @@
Package #<"LOOP.CL-TEST.2" package>
Package #<"LOOP.CL-TEST.1" package>
Package #<"CL-TEST" package>
-
- 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 SET-EXCLUSIVE-OR.13
+Package #<"REGRESSION-TEST" package>
+Package #<"CONDITIONS" package>
+Package #<"SLOT-ACCESSOR-NAME" package>
+Package #<"PCL" package>
+Package #<"ITERATE" package>
+Package #<"WALKER" package>
+Package #<"XLIB" package>
+Package #<"CLTL1-COMPAT" package>
+Package #<"FPE" package>
+Package #<"TK" package>
+Package #<"DEFPACKAGE" package>
+Package #<"ANSI-LOOP" package>
+Package #<"SLOOP" package>
+Package #<"COMPILER" package>
+Package #<"SYSTEM" package>
+Package #<"KEYWORD" package>
+Package #<"COMMON-LISP-USER" package>
+Package #<"COMMON-LISP" package>
+ WITH-PACKAGE-ITERATOR.12Package #<"MPE11" package>
+Package #<"TEST-DPE2" package>
+Package #<"LOOP.16.PACKAGE" package>
+Package #<"LOOP.15.PACKAGE" package>
+Package #<"STRUCT-TEST-PACKAGE" package>
+Package #<"DS4" package>
+Package #<"DS3" package>
+Package #<"DS2" package>
+Package #<"DS1" package>
+Package #<"B" package>
+Package #<"A" package>
+Package #<"LOOP.CL-TEST.2" package>
+Package #<"LOOP.CL-TEST.1" package>
+Package #<"CL-TEST" package>
+Package #<"REGRESSION-TEST" package>
+Package #<"CONDITIONS" package>
+Package #<"SLOT-ACCESSOR-NAME" package>
+Package #<"PCL" package>
+Package #<"ITERATE" package>
+Package #<"WALKER" package>
+Package #<"XLIB" package>
+Package #<"CLTL1-COMPAT" package>
+Package #<"FPE" package>
+Package #<"TK" package>
+Package #<"DEFPACKAGE" package>
+Package #<"ANSI-LOOP" package>
+Package #<"SLOOP" package>
+Package #<"COMPILER" package>
+Package #<"SYSTEM" package>
+Package #<"KEYWORD" package>
+Package #<"COMMON-LISP-USER" package>
+Package #<"COMMON-LISP" package>
+ WITH-PACKAGE-ITERATOR.13Package #<"MPE11" package>
+Package #<"TEST-DPE2" package>
+Package #<"LOOP.16.PACKAGE" package>
+Package #<"LOOP.15.PACKAGE" package>
+Package #<"STRUCT-TEST-PACKAGE" package>
+Package #<"DS4" package>
+Package #<"DS3" package>
+Package #<"DS2" package>
+Package #<"DS1" package>
+Package #<"B" package>
+Package #<"A" package>
+Package #<"LOOP.CL-TEST.2" package>
+Package #<"LOOP.CL-TEST.1" package>
+Package #<"CL-TEST" package>
+Package #<"REGRESSION-TEST" package>
+Package #<"CONDITIONS" package>
+Package #<"SLOT-ACCESSOR-NAME" package>
+Package #<"PCL" package>
+Package #<"ITERATE" package>
+Package #<"WALKER" package>
+Package #<"XLIB" package>
+Package #<"CLTL1-COMPAT" package>
+Package #<"FPE" package>
+Package #<"TK" package>
+Package #<"DEFPACKAGE" package>
+Package #<"ANSI-LOOP" package>
+Package #<"SLOOP" package>
+Package #<"COMPILER" package>
+Package #<"SYSTEM" package>
+Package #<"KEYWORD" package>
+Package #<"COMMON-LISP-USER" package>
+Package #<"COMMON-LISP" package>
+ WITH-PACKAGE-ITERATOR.14 UNEXPORT.1 UNEXPORT.2 UNEXPORT.3 UNEXPORT.4
+ UNEXPORT.5 UNEXPORT.6 UNEXPORT.ERROR.1 UNEXPORT.ERROR.2 UNINTERN.1
+ UNINTERN.2 UNINTERN.3 UNINTERN.4 UNINTERN.5 UNINTERN.6 UNINTERN.7Properly threw an error: #<CONDITIONS::INTERNAL-SIMPLE-PACKAGE-ERROR.75>
+ UNINTERN.8 UNINTERN.9 UNINTERN.ERROR.1 UNINTERN.ERROR.2 IN-PACKAGE.1
+ IN-PACKAGE.2 IN-PACKAGE.3 IN-PACKAGE.4 IN-PACKAGE.5 UNUSE-PACKAGE.1
+ UNUSE-PACKAGE.2 UNUSE-PACKAGE.3 UNUSE-PACKAGE.4 UNUSE-PACKAGE.5
+ UNUSE-PACKAGE.6 UNUSE-PACKAGE.7 UNUSE-PACKAGE.8 UNUSE-PACKAGE.9
+ UNUSE-PACKAGE.ERROR.1 UNUSE-PACKAGE.ERROR.2 USE-PACKAGE.1
+ USE-PACKAGE.2 USE-PACKAGE.3 USE-PACKAGE.4 USE-PACKAGE.5 USE-PACKAGE.6
+ USE-PACKAGE.ERROR.1 USE-PACKAGE.ERROR.2 DEFPACKAGE.1 DEFPACKAGE.2
+ DEFPACKAGE.3 DEFPACKAGE.4 DEFPACKAGE.5 DEFPACKAGE.6 DEFPACKAGE.7
+ DEFPACKAGE.8 DEFPACKAGE.9 DEFPACKAGE.10 DEFPACKAGE.11 DEFPACKAGE.12
+ DEFPACKAGE.13 DEFPACKAGE.14 DEFPACKAGE.15 DEFPACKAGE.16 DEFPACKAGE.17
+ DEFPACKAGE.18 DEFPACKAGE.19 DEFPACKAGE.20 DEFPACKAGE.21 DEFPACKAGE.22
+ DEFPACKAGE.23 DEFPACKAGE.24 DEFPACKAGE.25Making G1...
+Making G2...
+Making G3...
+Making G1...
+Making G2...
+Making G3...
+ DEFPACKAGE.26 DO-SYMBOLS.1 DO-SYMBOLS.2 DO-SYMBOLS.3 DO-SYMBOLS.4
+ DO-SYMBOLS.5 DO-EXTERNAL-SYMBOLS.1 DO-EXTERNAL-SYMBOLS.2
+ DO-EXTERNAL-SYMBOLS.3 DO-EXTERNAL-SYMBOLS.4 DO-EXTERNAL-SYMBOLS.5
+ DO-SYMBOLS.6 DO-EXTERNAL-SYMBOLS.6 DO-SYMBOLS.7 DO-EXTERNAL-SYMBOLS.7
+ DO-SYMBOLS.8 DO-EXTERNAL-SYMBOLS.8 PACKAGEP.1 PACKAGEP.2
+ PACKAGEP.ERROR.1 PACKAGEP.ERROR.2 PACKAGE-ERROR.1 PACKAGE-ERROR.2
+Test PACKAGE-ERROR.3 failed
+Form: (SUBTYPEP* 'PACKAGE-ERROR 'ERROR)
+Expected values: T
+ T
+Actual values: NIL
+ NIL.
+ PACKAGE-ERROR.4 PACKAGE-ERROR-PACKAGE.1 PACKAGE-ERROR-PACKAGE.2
+ PACKAGE-ERROR-PACKAGE.3 PACKAGE-ERROR-PACKAGE.4
+ PACKAGE-ERROR-PACKAGE.ERROR.1 PACKAGE-ERROR-PACKAGE.ERROR.2 KEYWORD.1
+ KEYWORD.2 KEYWORD.3 PACKAGE-SHADOWING-SYMBOLS.ERROR.1
+ PACKAGE-SHADOWING-SYMBOLS.ERROR.2 PACKAGE-USE-LIST.ERROR.1
+ PACKAGE-USE-LIST.ERROR.2 PACKAGE-USED-BY-LIST.ERROR.1
+ PACKAGE-USED-BY-LIST.ERROR.2 COPY-SEQ.1 COPY-SEQ.2 COPY-SEQ.3
+ COPY-SEQ.4 COPY-SEQ.5 COPY-SEQ.6 COPY-SEQ.7 COPY-SEQ.8 COPY-SEQ.9
+ COPY-SEQ.10 COPY-SEQ.11 COPY-SEQ.12 COPY-SEQ.13 COPY-SEQ.14
+ COPY-SEQ.15 COPY-SEQ.16 COPY-SEQ.17 COPY-SEQ.18 COPY-SEQ.ORDER.1
+ COPY-SEQ.ERROR.1 COPY-SEQ.ERROR.2 COPY-SEQ.ERROR.3 COPY-SEQ.ERROR.4
+ COPY-SEQ.ERROR.5 COPY-SEQ.ERROR.6 ELT.1 ELT.1A ELT.1B ELT.2 ELT.3
+ ELT.4 ELT.5 ELT.5A ELT.6 ELT.7 ELT.8 ELT.9 ELT.10 ELT.11 ELT.12 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
@@ -21201,10 +21363,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)
- #<hash-table 000000000132ceb8>
- #<hash-table 000000000132cef0>
- #<hash-table 000000000132cf28>
- #<hash-table 000000000132cf60> #p"foo" #p"foo"
+ #<hash-table 000000000132fda0>
+ #<hash-table 000000000132fdd8>
+ #<hash-table 000000000132fe10>
+ #<hash-table 000000000132fe48> #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"" #<output stream "stderr">
@@ -21212,7 +21374,7 @@
#<two-way stream 0000000000b39128>
#<synonym stream to *TERMINAL-IO*>
#<readtable 0000000000c53118>
- #<readtable 00000000012d7a60>
+ #<readtable 00000000012d7a30>
#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)
@@ -21221,7 +21383,7 @@
#<compiled-function VALUES>
#<compiled-function COND>
(SYSTEM:LAMBDA-CLOSURE () () () (X) X)
- #$21432891753082646881269794685792758234607977137639794957838607139053456445848542225236681936231009445579102442341416191871574923375771809105883457023146897560895425492376581137476018984586073581150643423014521782269767674283333812257437709532612120114955072254152339629213627393309728803692381836042072769643442103436969503002000606321244542421912352891502146076647037033843724302004696243337565883844275784482711196159046401618145600858090138106077514856728922198531079757407156401187616511102809175454094397312760492908386922187651555348712378185165882141202018015241057968064523441439612287290108997538988258407451174479142461424601424952125260670185935931040604983167172707513309617700439938284879546909496027293390803550843863089759650654615763701325236107347603003282786613341991501364303234520155199412781316281907451365859513550124238980404110064409017544138180800378881578740083615428663315967694998545886780654832648487553643731677945029975040399138099608225885633404405319746497578024159752331863619054290113628798576311980716969952005297360995387950369486298319470894513339803252984849282568745711497902417852352753508305301345696457350190648994149479818849847715014745630137713824012498753975118216663879611207534311675029120447708039119559180175665914073691139228522604743743413342205053589418619541092167924132247295970968661352281493254331506739522115842784789963719425603419291704168170998942842524943129842709393604030587002215596675891259750059629771203419404835240440176743311970649998906682359297617744099606833535281783678482117455941422580128838069042601149377861539651476568089737868355603642638854314330308094356254827741663444204068360750499479440509953646718285783780924983181564436743167643659332168294658052538910658176437005074603604526884643181367507910419721483607952053784627094976314149490259795016510175664643812356626977691772146829238901104779573318796902826548892595693780591327357251451011933262325714034311896463869251500484231228649762974594731809663166894483859306033390197258023026694654789051755821030013545919195414195406191877604542312218607458499735789668752486091875054993272005002093530742399835619687055547895198792314408245467164042424212205573441625888530505430114530567790334780636677873229865196348786219719785667420167345595518199823298147442399686061856981492857168159487047313973007233602321742587969859756755664733321702807501657327815714594389279106286101785708148469125649400422755684577370004004503094728057975436742527093949269461224700164981934041285532690986121657815522378344207505364792622243538153727192242210741891944515960091205891128329880731166732647538780200861324166969010461739392293241512547086821866686665186663076004320259423017193305800415370356761914302126142495779078897687687659691283636575977933693830203013596165111566512188178918485697003795968036713003248225234201666406983169673511223919949272421066580290689612282766590384388411970324430162365290246989590395373305911406976537178686446176289733242325564108520615612988514464003112377847027953118628530806910359009010184145519593965740477691551499340432872720426853237846763372737069899202705323139029679429780667230904605420919950579344575990018816530271543977993663478400361108291122828811036259198189744731691544141104583189338628169328601454398219523173965116795233518116390273856319255284273518181682909853527545397097325945734291026704506577195210273915773112779186947598032906447741128746016814819384094504014813034880461458344872571032867682202227887321062632306875394454200371812621911728172885815054403798788149406631929508843313723668007935561984747933801504338014082923661798968356078563456337963629382041050416042731876242714681224415001491184868118446849270778135791386770242007110314853996007538092836891535505701835968050476521625356759787459143717392744683907946214178358374326402680812119807622830978783613226133669539198011528700877057987939038719264655867945757559135707168394386950370382946584666048326180050260989425862346206430017282561065938698413420388257293856176682501481324832725371232739281370914838600520621042509831118562109548834986936869119466680768087974116748507612017473799310828507393124048639480488271805504249751220809618729863665872221170616640133272520015830766602543896055816983628283145561857013829738136858171847174580942921621395450714449254938909130590691060549992714716960695775063514068902316857047639549180513809359362286314842369268892693307484822492977847792670081470052751437614566679945934706746582172407820516835451358968840290119583849343707177305367297615874351943456001891240969095845741551227680636128022942575329498285811652926494777866175340520543327274684466449313742447492509766253943748884836925550778501094176028304748568034040314137964596920878793492807353107582771904239330604696169825722328800367795452256816808155904930344561354682173090165316128402558732733606425061503952847892460039214133573199704022731991809939746319046576030824078474185008700736578473552727532468098780745494046635978509861219860369147702644223481991988345879455752794846547201748344546631645907331463512742320357223873087909416935193825010060469737369737860023219022751575747861965945967517496984781951885987357684662957778995976589979190410442716485596006153922066387543372651919519500216687479152635191956730857095415494016992884803605552820058283630558381899827025752158743955232908351292944806968455094075184493908861408061362255116179967337861791008740569741045508168788794822989707210899863159023165861319531454409432139891038378457413993282870766645696541241143229513986992163996040260207600936263297261795649962362225426146791513714358980718875575034477551118347629162067058556445677656972469073805360132483099916156950149115623860930303961972025117111336534116703669150321081327844642385792317128272274388668353986858522889842062475566128736485917534512249367794261731141426861363175424015789905286833493321930107573360785559274343652715628091859365162915902841556431016124110572887686959520977200136245203377518900824689761951).
+ #$7568644328816382367545516621473196068917869934487165997962491976492729258522022612794703883689405243884056344172284410502322183644997815631713611613501531545550273726130689245043900108284058623382629359798023722596347736523149564365655844348050948894209000128850882376175006077677566955053067034345924221304968916230624415887419315887871805420614142361708444441635301755026177668020362953843124070970261347892427670116349754334080492137609799513509430333550909698372439460052129398480928967306876363732227473758951529517449769943486417620337471372878977201688769968537940810101028455425260705139942716480344699698879195386315864557051484872859985877597313409011931777126805514805230490444302058237235305398253435254560101288949701556728146999472800814697491371048766337153404779401649101772414403048981280555352826907861714255876804072289626903399157152293615989616283264725786724242393258793036236911044050473624453562825004717112421075486215875746074127209919309138278240403103508211570856290966912564691929508430017874072481786829292820315701231167428696051944638806479668464229031212733858804364006152804729962752293714099738991999322343597758807881143019970899718205144442646353273267139602920889659286835286820070400244997506363338860929273266580542981476418928863500088366725475420250927279220657047615363307752671431272069787062735630910959647949832497564390847014770871887832199646476113577133572399654694413855914560055541693436448104318896402552308480654713493763860762971454164229465616770457166182803620505474741854739573880450851327588172786190482286014530329622756683741568788073000824222800795002937672786823709764342290447651618083286293945069756367487519040618260370876733522109501137515549335618943266328167871947339017871434220805232438119867419737860781761404035819075997587980568098045273204823159113778393383458980758573254305847038602861535996849043604014672214330916123240594150976317776365408603362284812485126256184182309159173193022406509606992145980374805004378767936387362672385385676955479246557055958494841390024389622730645414042033887778291300653663587021937374744134245607367394952715011050469172654995531067124313517172891098255379703501831581151807694860505412421676188980355551571653263549485670757312174956910673657717400320820353784344192791318109856021757822706483437755365168599753313394046789707582461174383777483464204755926891392156357100028439821957734793796126322243523348573753561445761352538534871875244439620894953977610602792709954304002223428916940633746786780615739983265929247520636883612582962734200241147953462221706773401041782987227096840631299460075710132501986542925409676549340562453691650862776817110935781195139320966328624945268904690631562986318740429419108605210869358548067637789605010298002751414515239892476156521230916680686253423576803905154607074856891517004490348397179047462360838130735951894293860685554632750713704457680572229103893478661897499925422050736796655862881467521347863382477299439060473295800304899595550928837037125953981131461923735777297941924172502577554151957804987509241952954882321367471653305726556502087419289550310467492296328927695469150663522241058041474116357719654654757575125241159156975067869831714676530448921115156151558068782964322836367131345438603954109448039925788713671576155916666648599495842833102486711033478150167327749912860062912059531507447461783443054890870797638122252525565606512997366310418701933518442574730159715042410232393217677103891757306825180341953059031505745488368412931787905580855968597871929062797215146383451747047272140265690574634295881340422118680127433352050613679138641317098180524901849994813964073353870568541770037623759107825233103797271464709919775991424845973826270186695309484807174871966165817519343812756032218787140984815937109913360638810442679964686538328681378844084817051176702930482373767698478772300293068891751612855048277865204160165718224314728517749766651420196879457818489852798554391355225658972758134664535322029380847823530693654693478888530744451875786584228302955278643406792826033008937608456337280614514741623539094351403703895200185604627564600199750761255010086989920184586777120852588692557774796907121863466507725046096895482822815825504218564357583346112745040911276358890688445798858752571252445172204570456613507176750816229116204308425206285077524384858296781484190000293076954858459153782118054206368734265868756714670840767986868866269001977450516189315314777111129773929572067037082683455215695495562586544241400970536099506107961872523434740519362091919080820502662767469163823086082938934746556806723680694520719809426856293503206344969735045000693483936028338635044251973413090125251858590539466799693177278567693452475521679427121166632692276933552284237782590685683867189784059137517958297763790374412208718911942374137962058714466349590115581149781404486090904773544481225956743966039944466105586006408797317401851200920052065206053016104917984541826836910020565314422950872268112470703413904338957092119949233105340358497422302677733148324752736194039969626759453919199236383376892396315949679863171554128445510095200707138531458818866573503638653192352846756257323768748029852195853773851291362127568958900497968450710475962102557122153045790969241993453126959571092221830539501610515734274682898068864727605215102113609920317062137733816550489631742340881640313111155150596935812244015346629643140039931058220419659110048504334001862192132167692107349720502515168089358641847081835310635301759461664180735371960645918561737826145941947430779732207614984385958223489054293621484859530444455479295932344404845235258267107507275714694511745602567500983290979819869002381023734576643122296231112701772973685321795771365551094024626266418307741173063607236144667718097764799025448714040150036779749171405197276196188409768565738186060055171211995101646554261418384599543842732247925069442903165676205886706794912784348582391046253835446780610959359318450069192013850809796094762961354317822593200839202186084733668536676955917260).
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
@@ -22048,133 +22210,14 @@
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.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.12Package #<"MPE11" package>
-Package #<"TEST-DPE2" package>
-Package #<"LOOP.16.PACKAGE" package>
-Package #<"LOOP.15.PACKAGE" package>
-Package #<"STRUCT-TEST-PACKAGE" package>
-Package #<"DS4" package>
-Package #<"DS3" package>
-Package #<"DS2" package>
-Package #<"DS1" package>
-Package #<"B" package>
-Package #<"A" package>
-Package #<"LOOP.CL-TEST.2" package>
-Package #<"LOOP.CL-TEST.1" package>
-Package #<"CL-TEST" package>
-Package #<"REGRESSION-TEST" package>
-Package #<"CONDITIONS" package>
-Package #<"SLOT-ACCESSOR-NAME" package>
-Package #<"PCL" package>
-Package #<"ITERATE" package>
-Package #<"WALKER" package>
-Package #<"XLIB" package>
-Package #<"CLTL1-COMPAT" package>
-Package #<"FPE" package>
-Package #<"TK" package>
-Package #<"DEFPACKAGE" package>
-Package #<"ANSI-LOOP" package>
-Package #<"SLOOP" package>
-Package #<"COMPILER" package>
-Package #<"SYSTEM" package>
-Package #<"KEYWORD" package>
-Package #<"COMMON-LISP-USER" package>
-Package #<"COMMON-LISP" package>
- WITH-PACKAGE-ITERATOR.13Package #<"MPE11" package>
-Package #<"TEST-DPE2" package>
-Package #<"LOOP.16.PACKAGE" package>
-Package #<"LOOP.15.PACKAGE" package>
-Package #<"STRUCT-TEST-PACKAGE" package>
-Package #<"DS4" package>
-Package #<"DS3" package>
-Package #<"DS2" package>
-Package #<"DS1" package>
-Package #<"B" package>
-Package #<"A" package>
-Package #<"LOOP.CL-TEST.2" package>
-Package #<"LOOP.CL-TEST.1" package>
-Package #<"CL-TEST" package>
-Package #<"REGRESSION-TEST" package>
-Package #<"CONDITIONS" package>
-Package #<"SLOT-ACCESSOR-NAME" package>
-Package #<"PCL" package>
-Package #<"ITERATE" package>
-Package #<"WALKER" package>
-Package #<"XLIB" package>
-Package #<"CLTL1-COMPAT" package>
-Package #<"FPE" package>
-Package #<"TK" package>
-Package #<"DEFPACKAGE" package>
-Package #<"ANSI-LOOP" package>
-Package #<"SLOOP" package>
-Package #<"COMPILER" package>
-Package #<"SYSTEM" package>
-Package #<"KEYWORD" package>
-Package #<"COMMON-LISP-USER" package>
-Package #<"COMMON-LISP" package>
- WITH-PACKAGE-ITERATOR.14 UNEXPORT.1 UNEXPORT.2 UNEXPORT.3 UNEXPORT.4
- UNEXPORT.5 UNEXPORT.6 UNEXPORT.ERROR.1 UNEXPORT.ERROR.2 UNINTERN.1
- UNINTERN.2 UNINTERN.3 UNINTERN.4 UNINTERN.5 UNINTERN.6 UNINTERN.7Properly threw an error: #<CONDITIONS::INTERNAL-SIMPLE-PACKAGE-ERROR.75>
- UNINTERN.8 UNINTERN.9 UNINTERN.ERROR.1 UNINTERN.ERROR.2 IN-PACKAGE.1
- IN-PACKAGE.2 IN-PACKAGE.3 IN-PACKAGE.4 IN-PACKAGE.5 UNUSE-PACKAGE.1
- UNUSE-PACKAGE.2 UNUSE-PACKAGE.3 UNUSE-PACKAGE.4 UNUSE-PACKAGE.5
- UNUSE-PACKAGE.6 UNUSE-PACKAGE.7 UNUSE-PACKAGE.8 UNUSE-PACKAGE.9
- UNUSE-PACKAGE.ERROR.1 UNUSE-PACKAGE.ERROR.2 USE-PACKAGE.1
- USE-PACKAGE.2 USE-PACKAGE.3 USE-PACKAGE.4 USE-PACKAGE.5 USE-PACKAGE.6
- USE-PACKAGE.ERROR.1 USE-PACKAGE.ERROR.2 DEFPACKAGE.1 DEFPACKAGE.2
- DEFPACKAGE.3 DEFPACKAGE.4 DEFPACKAGE.5 DEFPACKAGE.6 DEFPACKAGE.7
- DEFPACKAGE.8 DEFPACKAGE.9 DEFPACKAGE.10 DEFPACKAGE.11 DEFPACKAGE.12
- DEFPACKAGE.13 DEFPACKAGE.14 DEFPACKAGE.15 DEFPACKAGE.16 DEFPACKAGE.17
- DEFPACKAGE.18 DEFPACKAGE.19 DEFPACKAGE.20 DEFPACKAGE.21 DEFPACKAGE.22
- DEFPACKAGE.23 DEFPACKAGE.24 DEFPACKAGE.25Making G1...
-Making G2...
-Making G3...
-Making G1...
-Making G2...
-Making G3...
- DEFPACKAGE.26 DO-SYMBOLS.1 DO-SYMBOLS.2 DO-SYMBOLS.3 DO-SYMBOLS.4
- DO-SYMBOLS.5 DO-EXTERNAL-SYMBOLS.1 DO-EXTERNAL-SYMBOLS.2
- DO-EXTERNAL-SYMBOLS.3 DO-EXTERNAL-SYMBOLS.4 DO-EXTERNAL-SYMBOLS.5
- DO-SYMBOLS.6 DO-EXTERNAL-SYMBOLS.6 DO-SYMBOLS.7 DO-EXTERNAL-SYMBOLS.7
- DO-SYMBOLS.8 DO-EXTERNAL-SYMBOLS.8 PACKAGEP.1 PACKAGEP.2
- PACKAGEP.ERROR.1 PACKAGEP.ERROR.2 PACKAGE-ERROR.1 PACKAGE-ERROR.2
-Test PACKAGE-ERROR.3 failed
-Form: (SUBTYPEP* 'PACKAGE-ERROR 'ERROR)
-Expected values: T
- T
-Actual values: NIL
- NIL.
- PACKAGE-ERROR.4 PACKAGE-ERROR-PACKAGE.1 PACKAGE-ERROR-PACKAGE.2
- PACKAGE-ERROR-PACKAGE.3 PACKAGE-ERROR-PACKAGE.4
- PACKAGE-ERROR-PACKAGE.ERROR.1 PACKAGE-ERROR-PACKAGE.ERROR.2 KEYWORD.1
- KEYWORD.2 KEYWORD.3 PACKAGE-SHADOWING-SYMBOLS.ERROR.1
- PACKAGE-SHADOWING-SYMBOLS.ERROR.2 PACKAGE-USE-LIST.ERROR.1
- PACKAGE-USE-LIST.ERROR.2 PACKAGE-USED-BY-LIST.ERROR.1
- PACKAGE-USED-BY-LIST.ERROR.2 COPY-SEQ.1 COPY-SEQ.2 COPY-SEQ.3
- COPY-SEQ.4 COPY-SEQ.5 COPY-SEQ.6 COPY-SEQ.7 COPY-SEQ.8 COPY-SEQ.9
- COPY-SEQ.10 COPY-SEQ.11 COPY-SEQ.12 COPY-SEQ.13 COPY-SEQ.14
- COPY-SEQ.15 COPY-SEQ.16 COPY-SEQ.17 COPY-SEQ.18 COPY-SEQ.ORDER.1
- COPY-SEQ.ERROR.1 COPY-SEQ.ERROR.2 COPY-SEQ.ERROR.3 COPY-SEQ.ERROR.4
- COPY-SEQ.ERROR.5 COPY-SEQ.ERROR.6 ELT.1 ELT.1A ELT.1B ELT.2 ELT.3
- ELT.4 ELT.5 ELT.5A ELT.6 ELT.7 ELT.8 ELT.9 ELT.10 ELT.11 ELT.12 ELT.13
+ 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 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
@@ -23109,15 +23152,7 @@
DELETE-BIT-VECTOR.2 DELETE-BIT-VECTOR.3 REMOVE.ORDER.1 REMOVE.ORDER.2
DELETE.ORDER.1 DELETE.ORDER.2 REMOVE-IF.ORDER.1 REMOVE-IF.ORDER.2
DELETE-IF.ORDER.1 DELETE-IF.ORDER.2 REMOVE-IF-NOT.ORDER.1
- REMOVE-IF-NOT.ORDER.2 DELETE-IF-NOT.ORDER.1 DELETE-IF-NOT.ORDER.2
- REMOVE-RANDOM 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
+ REMOVE-IF-NOT.ORDER.2 DELETE-IF-NOT.ORDER.1 DELETE-IF-NOT.ORDER.2 SEARCH-STRING.4 SEARCH-STRING.5
SEARCH-STRING.6 SEARCH-STRING.7 SEARCH-STRING.8 SEARCH-STRING.9
SEARCH-STRING.10 SEARCH-STRING.11 SEARCH-STRING.13 SEARCH-STRING.14
SEARCH-STRING.15 SEARCH-STRING.16 MISMATCH-LIST.1 MISMATCH-LIST.2
@@ -23641,6 +23676,7 @@
DELETE.ORDER.1 DELETE.ORDER.2 REMOVE-IF.ORDER.1 REMOVE-IF.ORDER.2
DELETE-IF.ORDER.1 DELETE-IF.ORDER.2 REMOVE-IF-NOT.ORDER.1
REMOVE-IF-NOT.ORDER.2 DELETE-IF-NOT.ORDER.1 DELETE-IF-NOT.ORDER.2
+ REMOVE-RANDOM REMOVE-IF-RANDOM REMOVE-IF-NOT-RANDOM
REMOVE-RANDOM REMOVE-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
@@ -23656,7 +23692,7 @@
REMOVE.ERROR.5 REMOVE.ERROR.6 REMOVE.ERROR.7 REMOVE.ERROR.8
REMOVE.ERROR.9 REMOVE.ERROR.10 DELETE.ERROR.1 DELETE.ERROR.2
DELETE.ERROR.3 DELETE.ERROR.4 DELETE.ERROR.5 DELETE.ERROR.6
- DELETE.ERROR.7 DELETE.ERROR.8 DELETE.ERROR.9 DELETE.ERROR.10 REMOVE-IF-RANDOM REMOVE-IF-NOT-RANDOM DELETE-RANDOM
+ DELETE.ERROR.7 DELETE.ERROR.8 DELETE.ERROR.9 DELETE.ERROR.10 DELETE-RANDOM
DELETE-IF-RANDOM DELETE-IF-NOT-RANDOM REMOVE-IF-LIST.1
REMOVE-IF-LIST.2 REMOVE-IF-NOT-LIST.1 REMOVE-IF-NOT-LIST.2
DELETE-IF-LIST.1 DELETE-IF-LIST.2 DELETE-IF-NOT-LIST.1
@@ -23672,6 +23708,7 @@
REMOVE.ERROR.9 REMOVE.ERROR.10 DELETE.ERROR.1 DELETE.ERROR.2
DELETE.ERROR.3 DELETE.ERROR.4 DELETE.ERROR.5 DELETE.ERROR.6
DELETE.ERROR.7 DELETE.ERROR.8 DELETE.ERROR.9 DELETE.ERROR.10
+ RANDOM-REMOVE-DUPLICATES
RANDOM-REMOVE-DUPLICATES RANDOM-DELETE-DUPLICATES REMOVE-DUPLICATES.1
DELETE-DUPLICATES.1 REMOVE-DUPLICATES.ORDER.1
REMOVE-DUPLICATES.ORDER.2 REMOVE-DUPLICATES.ALLOW-OTHER-KEYS.1
@@ -25294,1579 +25331,7 @@
(((SUBTYPEP 'PRINT-NOT-READABLE 'ATOM) ==> NIL NIL))
(((SUBTYPEP 'READER-ERROR 'ATOM) ==> NIL NIL))
(((SUBTYPEP 'READER-ERROR 'ATOM) ==> NIL NIL))).
- TYPES.7B TYPES.7C
-Should be atomic, but isn't: CONDITION
-Test TYPES.8 failed
-Form: (LOOP
- FOR
- TP
- IN
- *DISJOINT-TYPES-LIST*
- COUNT
- (COND
- ((AND (NOT (EQT TP 'CONS)) (NOT (SUBTYPEP* TP 'ATOM)))
- (FORMAT T "~%Should be atomic, but isn't: ~S" TP) T)))
-Expected value: 0
-Actual value: 1.
- TYPES.9Found element of FUNCTION not in ATOM: (SYSTEM:LAMBDA-CLOSURE
- () () () (X)
- X)
-Found element of ARRAY not in SIMPLE-ARRAY: #0ANIL
-Found element of ARRAY not in SIMPLE-ARRAY: #(NIL NIL)
-Found element of ARRAY not in SIMPLE-ARRAY: #2A((NIL NIL) (NIL NIL))
-Found element of ARRAY not in SIMPLE-ARRAY: #3A(((NIL NIL) (NIL NIL))
- ((NIL NIL) (NIL NIL)))
-Found element of ARRAY not in SIMPLE-ARRAY: #4A((((NIL NIL) (NIL NIL))
- ((NIL NIL) (NIL NIL)))
- (((NIL NIL) (NIL NIL))
- ((NIL NIL) (NIL NIL))))
-Found element of ARRAY not in SIMPLE-ARRAY: #5A(((((NIL NIL) (NIL NIL))
- ((NIL NIL) (NIL NIL)))
- (((NIL NIL) (NIL NIL))
- ((NIL NIL) (NIL NIL))))
- ((((NIL NIL) (NIL NIL))
- ((NIL NIL) (NIL NIL)))
- (((NIL NIL) (NIL NIL))
- ((NIL NIL) (NIL NIL)))))
-Found element of ARRAY not in SIMPLE-ARRAY: #6A((((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL))))
- ((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))))
- (((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL))))
- ((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL))))))
-Found element of ARRAY not in SIMPLE-ARRAY: #7A(((((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL))))
- ((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))))
- (((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL))))
- ((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL))))))
- ((((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL))))
- ((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))))
- (((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL))))
- ((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))))))
-Found element of ARRAY not in SIMPLE-ARRAY: #8A((((((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL))))
- ((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))))
- (((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL))))
- ((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL))))))
- ((((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL))))
- ((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))))
- (((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL))))
- ((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))))))
- (((((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL))))
- ((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))))
- (((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL))))
- ((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL))))))
- ((((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL))))
- ((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))))
- (((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL))))
- ((((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL)))
- (((NIL NIL)
- (NIL NIL))
- ((NIL NIL)
- (NIL NIL))))))))
-Found element of VECTOR not in SIMPLE-ARRAY: #(NIL NIL)
-Test TYPES.9A failed
-Form: (TYPES.9A-BODY)
-Expected value: 0
-Actual value: 11.
-Test ALL-CLASSES-ARE-TYPE-EQUIVALENT-TO-THEIR-NAMES failed
-Form: (LOOP
- FOR
- SYM
- BEING
- THE
- EXTERNAL-SYMBOLS
- OF
- "COMMON-LISP"
- FOR
- CLASS
- =
- (FIND-CLASS SYM NIL)
- WHEN
- CLASS
- APPEND
- (CHECK-EQUIVALENCE SYM CLASS))
-Expected value: NIL
-Actual value: (((SUBTYPEP 'STRUCTURE-OBJECT
- #<Structure-Class STRUCTURE-OBJECT 61235170>)
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Structure-Class STRUCTURE-OBJECT 61235170>)
- '(NOT STRUCTURE-OBJECT))
- ==> NIL T)
- ((SUBTYPEP 'ARITHMETIC-ERROR
- #<Standard-Class ARITHMETIC-ERROR 106152440>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class ARITHMETIC-ERROR 106152440>
- 'ARITHMETIC-ERROR)
- ==> NIL T)
- ((SUBTYPEP '(NOT ARITHMETIC-ERROR)
- '(NOT #<Standard-Class ARITHMETIC-ERROR 106152440>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class ARITHMETIC-ERROR 106152440>)
- '(NOT ARITHMETIC-ERROR))
- ==> NIL T)
- ((SUBTYPEP 'SYMBOL
- #<Built-In-Class SYMBOL 75262140>)
- ==> NIL T)
- ((SUBTYPEP
- #<Built-In-Class SYMBOL 75262140> 'SYMBOL)
- ==> NIL T)
- ((SUBTYPEP '(NOT SYMBOL)
- '(NOT #<Built-In-Class SYMBOL 75262140>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Built-In-Class SYMBOL 75262140>)
- '(NOT SYMBOL))
- ==> NIL T)
- ((SUBTYPEP 'CONTROL-ERROR
- #<Standard-Class CONTROL-ERROR 75212410>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class CONTROL-ERROR 75212410>
- 'CONTROL-ERROR)
- ==> NIL T)
- ((SUBTYPEP '(NOT CONTROL-ERROR)
- '(NOT #<Standard-Class CONTROL-ERROR 75212410>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class CONTROL-ERROR 75212410>)
- '(NOT CONTROL-ERROR))
- ==> NIL T)
- ((SUBTYPEP 'CLASS
- #<Standard-Class CLASS 61234670>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class CLASS 61234670> 'CLASS)
- ==> NIL T)
- ((SUBTYPEP '(NOT CLASS)
- '(NOT #<Standard-Class CLASS 61234670>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class CLASS 61234670>)
- '(NOT CLASS))
- ==> NIL T)
- ((SUBTYPEP 'SIMPLE-ERROR
- #<Standard-Class SIMPLE-ERROR 104416570>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class SIMPLE-ERROR 104416570>
- 'SIMPLE-ERROR)
- ==> NIL T)
- ((SUBTYPEP '(NOT SIMPLE-ERROR)
- '(NOT #<Standard-Class SIMPLE-ERROR 104416570>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class SIMPLE-ERROR 104416570>)
- '(NOT SIMPLE-ERROR))
- ==> NIL T)
- ((SUBTYPEP T
- #<Built-In-Class T 61235250>)
- ==> NIL T)
- ((SUBTYPEP
- #<Built-In-Class T 61235250> T)
- ==> NIL T)
- ((SUBTYPEP '(NOT T)
- '(NOT #<Built-In-Class T 61235250>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Built-In-Class T 61235250>) '(NOT T))
- ==> NIL T)
- ((SUBTYPEP 'COMPLEX
- #<Built-In-Class COMPLEX 75261450>)
- ==> NIL T)
- ((SUBTYPEP
- #<Built-In-Class COMPLEX 75261450> 'COMPLEX)
- ==> NIL T)
- ((SUBTYPEP '(NOT COMPLEX)
- '(NOT #<Built-In-Class COMPLEX 75261450>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Built-In-Class COMPLEX 75261450>)
- '(NOT COMPLEX))
- ==> NIL T)
- ((SUBTYPEP 'ARRAY
- #<Built-In-Class ARRAY 75261750>)
- ==> NIL T)
- ((SUBTYPEP
- #<Built-In-Class ARRAY 75261750> 'ARRAY)
- ==> NIL T)
- ((SUBTYPEP '(NOT ARRAY)
- '(NOT #<Built-In-Class ARRAY 75261750>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Built-In-Class ARRAY 75261750>)
- '(NOT ARRAY))
- ==> NIL T)
- ((SUBTYPEP 'FLOATING-POINT-INEXACT
- #<Standard-Class FLOATING-POINT-INEXACT 104415410>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class FLOATING-POINT-INEXACT 104415410>
- 'FLOATING-POINT-INEXACT)
- ==> NIL T)
- ((SUBTYPEP '(NOT FLOATING-POINT-INEXACT)
- '(NOT #<Standard-Class FLOATING-POINT-INEXACT 104415410>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class FLOATING-POINT-INEXACT 104415410>)
- '(NOT FLOATING-POINT-INEXACT))
- ==> NIL T)
- ((SUBTYPEP 'NUMBER
- #<Built-In-Class NUMBER 75261370>)
- ==> NIL T)
- ((SUBTYPEP
- #<Built-In-Class NUMBER 75261370> 'NUMBER)
- ==> NIL T)
- ((SUBTYPEP '(NOT NUMBER)
- '(NOT #<Built-In-Class NUMBER 75261370>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Built-In-Class NUMBER 75261370>)
- '(NOT NUMBER))
- ==> NIL T)
- ((SUBTYPEP 'NULL
- #<Built-In-Class NULL 75262170>)
- ==> NIL T)
- ((SUBTYPEP
- #<Built-In-Class NULL 75262170> 'NULL)
- ==> NIL T)
- ((SUBTYPEP '(NOT NULL)
- '(NOT #<Built-In-Class NULL 75262170>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Built-In-Class NULL 75262170>) '(NOT NULL))
- ==> NIL T)
- ((SUBTYPEP 'FLOATING-POINT-UNDERFLOW
- #<Standard-Class FLOATING-POINT-UNDERFLOW 104416730>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class FLOATING-POINT-UNDERFLOW 104416730>
- 'FLOATING-POINT-UNDERFLOW)
- ==> NIL T)
- ((SUBTYPEP '(NOT FLOATING-POINT-UNDERFLOW)
- '(NOT #<Standard-Class FLOATING-POINT-UNDERFLOW 104416730>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class FLOATING-POINT-UNDERFLOW 104416730>)
- '(NOT FLOATING-POINT-UNDERFLOW))
- ==> NIL T)
- ((SUBTYPEP 'FLOATING-POINT-OVERFLOW
- #<Standard-Class FLOATING-POINT-OVERFLOW 104412170>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class FLOATING-POINT-OVERFLOW 104412170>
- 'FLOATING-POINT-OVERFLOW)
- ==> NIL T)
- ((SUBTYPEP '(NOT FLOATING-POINT-OVERFLOW)
- '(NOT #<Standard-Class FLOATING-POINT-OVERFLOW 104412170>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class FLOATING-POINT-OVERFLOW 104412170>)
- '(NOT FLOATING-POINT-OVERFLOW))
- ==> NIL T)
- ((SUBTYPEP 'RATIONAL
- #<Built-In-Class RATIONAL 75261530>)
- ==> NIL T)
- ((SUBTYPEP
- #<Built-In-Class RATIONAL 75261530> 'RATIONAL)
- ==> NIL T)
- ((SUBTYPEP '(NOT RATIONAL)
- '(NOT #<Built-In-Class RATIONAL 75261530>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Built-In-Class RATIONAL 75261530>)
- '(NOT RATIONAL))
- ==> NIL T)
- ((SUBTYPEP 'RATIO
- #<Built-In-Class RATIO 75261610>)
- ==> NIL T)
- ((SUBTYPEP
- #<Built-In-Class RATIO 75261610> 'RATIO)
- ==> NIL T)
- ((SUBTYPEP '(NOT RATIO)
- '(NOT #<Built-In-Class RATIO 75261610>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Built-In-Class RATIO 75261610>)
- '(NOT RATIO))
- ==> NIL T)
- ((SUBTYPEP 'STANDARD-METHOD
- #<Standard-Class STANDARD-METHOD 61234070>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class STANDARD-METHOD 61234070>
- 'STANDARD-METHOD)
- ==> NIL T)
- ((SUBTYPEP '(NOT STANDARD-METHOD)
- '(NOT #<Standard-Class STANDARD-METHOD 61234070>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class STANDARD-METHOD 61234070>)
- '(NOT STANDARD-METHOD))
- ==> NIL T)
- ((SUBTYPEP 'STRUCTURE-CLASS
- #<Standard-Class STRUCTURE-CLASS 61233430>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class STRUCTURE-CLASS 61233430>
- 'STRUCTURE-CLASS)
- ==> NIL T)
- ((SUBTYPEP '(NOT STRUCTURE-CLASS)
- '(NOT #<Standard-Class STRUCTURE-CLASS 61233430>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class STRUCTURE-CLASS 61233430>)
- '(NOT STRUCTURE-CLASS))
- ==> NIL T)
- ((SUBTYPEP 'BUILT-IN-CLASS
- #<Standard-Class BUILT-IN-CLASS 61233400>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class BUILT-IN-CLASS 61233400>
- 'BUILT-IN-CLASS)
- ==> NIL T)
- ((SUBTYPEP '(NOT BUILT-IN-CLASS)
- '(NOT #<Standard-Class BUILT-IN-CLASS 61233400>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class BUILT-IN-CLASS 61233400>)
- '(NOT BUILT-IN-CLASS))
- ==> NIL T)
- ((SUBTYPEP 'UNBOUND-SLOT
- #<Standard-Class UNBOUND-SLOT 106153100>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class UNBOUND-SLOT 106153100>
- 'UNBOUND-SLOT)
- ==> NIL T)
- ((SUBTYPEP '(NOT UNBOUND-SLOT)
- '(NOT #<Standard-Class UNBOUND-SLOT 106153100>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class UNBOUND-SLOT 106153100>)
- '(NOT UNBOUND-SLOT))
- ==> NIL T)
- ((SUBTYPEP 'ERROR
- #<Standard-Class ERROR 76041010>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class ERROR 76041010> 'ERROR)
- ==> NIL T)
- ((SUBTYPEP '(NOT ERROR)
- '(NOT #<Standard-Class ERROR 76041010>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class ERROR 76041010>)
- '(NOT ERROR))
- ==> NIL T)
- ((SUBTYPEP 'STANDARD-GENERIC-FUNCTION
- #<Funcallable-Standard-Class STANDARD-GENERIC-FUNCTION 61233570>)
- ==> NIL T)
- ((SUBTYPEP
- #<Funcallable-Standard-Class STANDARD-GENERIC-FUNCTION 61233570>
- 'STANDARD-GENERIC-FUNCTION)
- ==> NIL T)
- ((SUBTYPEP '(NOT STANDARD-GENERIC-FUNCTION)
- '(NOT #<Funcallable-Standard-Class STANDARD-GENERIC-FUNCTION 61233570>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Funcallable-Standard-Class STANDARD-GENERIC-FUNCTION 61233570>)
- '(NOT STANDARD-GENERIC-FUNCTION))
- ==> NIL T)
- ((SUBTYPEP 'CHARACTER
- #<Built-In-Class CHARACTER 75262110>)
- ==> NIL T)
- ((SUBTYPEP
- #<Built-In-Class CHARACTER 75262110> 'CHARACTER)
- ==> NIL T)
- ((SUBTYPEP '(NOT CHARACTER)
- '(NOT #<Built-In-Class CHARACTER 75262110>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Built-In-Class CHARACTER 75262110>)
- '(NOT CHARACTER))
- ==> NIL T)
- ((SUBTYPEP 'DIVISION-BY-ZERO
- #<Standard-Class DIVISION-BY-ZERO 104410620>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class DIVISION-BY-ZERO 104410620>
- 'DIVISION-BY-ZERO)
- ==> NIL T)
- ((SUBTYPEP '(NOT DIVISION-BY-ZERO)
- '(NOT #<Standard-Class DIVISION-BY-ZERO 104410620>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class DIVISION-BY-ZERO 104410620>)
- '(NOT DIVISION-BY-ZERO))
- ==> NIL T)
- ((SUBTYPEP 'SEQUENCE
- #<Built-In-Class SEQUENCE 75261640>)
- ==> NIL T)
- ((SUBTYPEP
- #<Built-In-Class SEQUENCE 75261640> 'SEQUENCE)
- ==> NIL T)
- ((SUBTYPEP '(NOT SEQUENCE)
- '(NOT #<Built-In-Class SEQUENCE 75261640>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Built-In-Class SEQUENCE 75261640>)
- '(NOT SEQUENCE))
- ==> NIL T)
- ((SUBTYPEP 'PRINT-NOT-READABLE
- #<Standard-Class PRINT-NOT-READABLE 104342440>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class PRINT-NOT-READABLE 104342440>
- 'PRINT-NOT-READABLE)
- ==> NIL T)
- ((SUBTYPEP '(NOT PRINT-NOT-READABLE)
- '(NOT #<Standard-Class PRINT-NOT-READABLE 104342440>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class PRINT-NOT-READABLE 104342440>)
- '(NOT PRINT-NOT-READABLE))
- ==> NIL T)
- ((SUBTYPEP 'UNDEFINED-FUNCTION
- #<Standard-Class UNDEFINED-FUNCTION 104462440>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class UNDEFINED-FUNCTION 104462440>
- 'UNDEFINED-FUNCTION)
- ==> NIL T)
- ((SUBTYPEP '(NOT UNDEFINED-FUNCTION)
- '(NOT #<Standard-Class UNDEFINED-FUNCTION 104462440>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class UNDEFINED-FUNCTION 104462440>)
- '(NOT UNDEFINED-FUNCTION))
- ==> NIL T)
- ((SUBTYPEP 'END-OF-FILE
- #<Standard-Class END-OF-FILE 106153650>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class END-OF-FILE 106153650>
- 'END-OF-FILE)
- ==> NIL T)
- ((SUBTYPEP '(NOT END-OF-FILE)
- '(NOT #<Standard-Class END-OF-FILE 106153650>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class END-OF-FILE 106153650>)
- '(NOT END-OF-FILE))
- ==> NIL T)
- ((SUBTYPEP 'INTEGER
- #<Built-In-Class INTEGER 75261560>)
- ==> NIL T)
- ((SUBTYPEP
- #<Built-In-Class INTEGER 75261560> 'INTEGER)
- ==> NIL T)
- ((SUBTYPEP '(NOT INTEGER)
- '(NOT #<Built-In-Class INTEGER 75261560>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Built-In-Class INTEGER 75261560>)
- '(NOT INTEGER))
- ==> NIL T)
- ((SUBTYPEP 'FLOAT
- #<Built-In-Class FLOAT 75261500>)
- ==> NIL T)
- ((SUBTYPEP
- #<Built-In-Class FLOAT 75261500> 'FLOAT)
- ==> NIL T)
- ((SUBTYPEP '(NOT FLOAT)
- '(NOT #<Built-In-Class FLOAT 75261500>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Built-In-Class FLOAT 75261500>)
- '(NOT FLOAT))
- ==> NIL T)
- ((SUBTYPEP 'BIT-VECTOR
- #<Built-In-Class BIT-VECTOR 75262060>)
- ==> NIL T)
- ((SUBTYPEP
- #<Built-In-Class BIT-VECTOR 75262060> 'BIT-VECTOR)
- ==> NIL T)
- ((SUBTYPEP '(NOT BIT-VECTOR)
- '(NOT #<Built-In-Class BIT-VECTOR 75262060>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Built-In-Class BIT-VECTOR 75262060>)
- '(NOT BIT-VECTOR))
- ==> NIL T)
- ((SUBTYPEP 'STYLE-WARNING
- #<Standard-Class STYLE-WARNING 75212300>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class STYLE-WARNING 75212300>
- 'STYLE-WARNING)
- ==> NIL T)
- ((SUBTYPEP '(NOT STYLE-WARNING)
- '(NOT #<Standard-Class STYLE-WARNING 75212300>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class STYLE-WARNING 75212300>)
- '(NOT STYLE-WARNING))
- ==> NIL T)
- ((SUBTYPEP 'SIMPLE-TYPE-ERROR
- #<Standard-Class SIMPLE-TYPE-ERROR 104471670>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class SIMPLE-TYPE-ERROR 104471670>
- 'SIMPLE-TYPE-ERROR)
- ==> NIL T)
- ((SUBTYPEP '(NOT SIMPLE-TYPE-ERROR)
- '(NOT #<Standard-Class SIMPLE-TYPE-ERROR 104471670>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class SIMPLE-TYPE-ERROR 104471670>)
- '(NOT SIMPLE-TYPE-ERROR))
- ==> NIL T)
- ((SUBTYPEP 'CELL-ERROR
- #<Standard-Class CELL-ERROR 106175600>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class CELL-ERROR 106175600> 'CELL-ERROR)
- ==> NIL T)
- ((SUBTYPEP '(NOT CELL-ERROR)
- '(NOT #<Standard-Class CELL-ERROR 106175600>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class CELL-ERROR 106175600>)
- '(NOT CELL-ERROR))
- ==> NIL T)
- ((SUBTYPEP 'FILE-ERROR
- #<Standard-Class FILE-ERROR 104460760>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class FILE-ERROR 104460760> 'FILE-ERROR)
- ==> NIL T)
- ((SUBTYPEP '(NOT FILE-ERROR)
- '(NOT #<Standard-Class FILE-ERROR 104460760>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class FILE-ERROR 104460760>)
- '(NOT FILE-ERROR))
- ==> NIL T)
- ((SUBTYPEP 'RESTART
- #<Structure-Class RESTART 370347310>)
- ==> NIL T)
- ((SUBTYPEP
- #<Structure-Class RESTART 370347310> 'RESTART)
- ==> NIL T)
- ((SUBTYPEP '(NOT RESTART)
- '(NOT #<Structure-Class RESTART 370347310>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Structure-Class RESTART 370347310>)
- '(NOT RESTART))
- ==> NIL T)
- ((SUBTYPEP 'TYPE-ERROR
- #<Standard-Class TYPE-ERROR 104224610>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class TYPE-ERROR 104224610> 'TYPE-ERROR)
- ==> NIL T)
- ((SUBTYPEP '(NOT TYPE-ERROR)
- '(NOT #<Standard-Class TYPE-ERROR 104224610>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class TYPE-ERROR 104224610>)
- '(NOT TYPE-ERROR))
- ==> NIL T)
- ((SUBTYPEP 'LIST
- #<Built-In-Class LIST 75261670>)
- ==> NIL T)
- ((SUBTYPEP
- #<Built-In-Class LIST 75261670> 'LIST)
- ==> NIL T)
- ((SUBTYPEP '(NOT LIST)
- '(NOT #<Built-In-Class LIST 75261670>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Built-In-Class LIST 75261670>) '(NOT LIST))
- ==> NIL T)
- ((SUBTYPEP 'STANDARD-OBJECT
- #<Standard-Class STANDARD-OBJECT 61235140>)
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class STANDARD-OBJECT 61235140>)
- '(NOT STANDARD-OBJECT))
- ==> NIL T)
- ((SUBTYPEP 'STRING
- #<Built-In-Class STRING 75262030>)
- ==> NIL T)
- ((SUBTYPEP
- #<Built-In-Class STRING 75262030> 'STRING)
- ==> NIL T)
- ((SUBTYPEP '(NOT STRING)
- '(NOT #<Built-In-Class STRING 75262030>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Built-In-Class STRING 75262030>)
- '(NOT STRING))
- ==> NIL T)
- ((SUBTYPEP 'METHOD-COMBINATION
- #<Standard-Class METHOD-COMBINATION 61233650>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class METHOD-COMBINATION 61233650>
- 'METHOD-COMBINATION)
- ==> NIL T)
- ((SUBTYPEP '(NOT METHOD-COMBINATION)
- '(NOT #<Standard-Class METHOD-COMBINATION 61233650>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class METHOD-COMBINATION 61233650>)
- '(NOT METHOD-COMBINATION))
- ==> NIL T)
- ((SUBTYPEP 'CONS
- #<Built-In-Class CONS 75261720>)
- ==> NIL T)
- ((SUBTYPEP
- #<Built-In-Class CONS 75261720> 'CONS)
- ==> NIL T)
- ((SUBTYPEP '(NOT CONS)
- '(NOT #<Built-In-Class CONS 75261720>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Built-In-Class CONS 75261720>) '(NOT CONS))
- ==> NIL T)
- ((SUBTYPEP 'SIMPLE-CONDITION
- #<Standard-Class SIMPLE-CONDITION 104106320>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class SIMPLE-CONDITION 104106320>
- 'SIMPLE-CONDITION)
- ==> NIL T)
- ((SUBTYPEP '(NOT SIMPLE-CONDITION)
- '(NOT #<Standard-Class SIMPLE-CONDITION 104106320>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class SIMPLE-CONDITION 104106320>)
- '(NOT SIMPLE-CONDITION))
- ==> NIL T)
- ((SUBTYPEP 'SIMPLE-WARNING
- #<Standard-Class SIMPLE-WARNING 104415710>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class SIMPLE-WARNING 104415710>
- 'SIMPLE-WARNING)
- ==> NIL T)
- ((SUBTYPEP '(NOT SIMPLE-WARNING)
- '(NOT #<Standard-Class SIMPLE-WARNING 104415710>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class SIMPLE-WARNING 104415710>)
- '(NOT SIMPLE-WARNING))
- ==> NIL T)
- ((SUBTYPEP 'PACKAGE-ERROR
- #<Standard-Class PACKAGE-ERROR 106156510>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class PACKAGE-ERROR 106156510>
- 'PACKAGE-ERROR)
- ==> NIL T)
- ((SUBTYPEP '(NOT PACKAGE-ERROR)
- '(NOT #<Standard-Class PACKAGE-ERROR 106156510>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class PACKAGE-ERROR 106156510>)
- '(NOT PACKAGE-ERROR))
- ==> NIL T)
- ((SUBTYPEP 'PARSE-ERROR
- #<Standard-Class PARSE-ERROR 75267500>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class PARSE-ERROR 75267500>
- 'PARSE-ERROR)
- ==> NIL T)
- ((SUBTYPEP '(NOT PARSE-ERROR)
- '(NOT #<Standard-Class PARSE-ERROR 75267500>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class PARSE-ERROR 75267500>)
- '(NOT PARSE-ERROR))
- ==> NIL T)
- ((SUBTYPEP 'WARNING
- #<Standard-Class WARNING 74624670>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class WARNING 74624670> 'WARNING)
- ==> NIL T)
- ((SUBTYPEP '(NOT WARNING)
- '(NOT #<Standard-Class WARNING 74624670>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class WARNING 74624670>)
- '(NOT WARNING))
- ==> NIL T)
- ((SUBTYPEP 'STORAGE-CONDITION
- #<Standard-Class STORAGE-CONDITION 75214500>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class STORAGE-CONDITION 75214500>
- 'STORAGE-CONDITION)
- ==> NIL T)
- ((SUBTYPEP '(NOT STORAGE-CONDITION)
- '(NOT #<Standard-Class STORAGE-CONDITION 75214500>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class STORAGE-CONDITION 75214500>)
- '(NOT STORAGE-CONDITION))
- ==> NIL T)
- ((SUBTYPEP 'FLOATING-POINT-INVALID-OPERATION
- #<Standard-Class FLOATING-POINT-INVALID-OPERATION 104415140>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class FLOATING-POINT-INVALID-OPERATION 104415140>
- 'FLOATING-POINT-INVALID-OPERATION)
- ==> NIL T)
- ((SUBTYPEP '(NOT FLOATING-POINT-INVALID-OPERATION)
- '(NOT #<Standard-Class FLOATING-POINT-INVALID-OPERATION 104415140>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class FLOATING-POINT-INVALID-OPERATION 104415140>)
- '(NOT FLOATING-POINT-INVALID-OPERATION))
- ==> NIL T)
- ((SUBTYPEP 'PROGRAM-ERROR
- #<Standard-Class PROGRAM-ERROR 104472740>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class PROGRAM-ERROR 104472740>
- 'PROGRAM-ERROR)
- ==> NIL T)
- ((SUBTYPEP '(NOT PROGRAM-ERROR)
- '(NOT #<Standard-Class PROGRAM-ERROR 104472740>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class PROGRAM-ERROR 104472740>)
- '(NOT PROGRAM-ERROR))
- ==> NIL T)
- ((SUBTYPEP 'METHOD
- #<Standard-Class METHOD 61234120>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class METHOD 61234120> 'METHOD)
- ==> NIL T)
- ((SUBTYPEP '(NOT METHOD)
- '(NOT #<Standard-Class METHOD 61234120>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class METHOD 61234120>)
- '(NOT METHOD))
- ==> NIL T)
- ((SUBTYPEP 'STANDARD-CLASS
- #<Standard-Class STANDARD-CLASS 61233270>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class STANDARD-CLASS 61233270>
- 'STANDARD-CLASS)
- ==> NIL T)
- ((SUBTYPEP '(NOT STANDARD-CLASS)
- '(NOT #<Standard-Class STANDARD-CLASS 61233270>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class STANDARD-CLASS 61233270>)
- '(NOT STANDARD-CLASS))
- ==> NIL T)
- ((SUBTYPEP 'GENERIC-FUNCTION
- #<Funcallable-Standard-Class GENERIC-FUNCTION 61233700>)
- ==> NIL T)
- ((SUBTYPEP
- #<Funcallable-Standard-Class GENERIC-FUNCTION 61233700>
- 'GENERIC-FUNCTION)
- ==> NIL T)
- ((SUBTYPEP '(NOT GENERIC-FUNCTION)
- '(NOT #<Funcallable-Standard-Class GENERIC-FUNCTION 61233700>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Funcallable-Standard-Class GENERIC-FUNCTION 61233700>)
- '(NOT GENERIC-FUNCTION))
- ==> NIL T)
- ((SUBTYPEP 'STREAM-ERROR
- #<Standard-Class STREAM-ERROR 104474450>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class STREAM-ERROR 104474450>
- 'STREAM-ERROR)
- ==> NIL T)
- ((SUBTYPEP '(NOT STREAM-ERROR)
- '(NOT #<Standard-Class STREAM-ERROR 104474450>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class STREAM-ERROR 104474450>)
- '(NOT STREAM-ERROR))
- ==> NIL T)
- ((SUBTYPEP 'SERIOUS-CONDITION
- #<Standard-Class SERIOUS-CONDITION 75214120>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class SERIOUS-CONDITION 75214120>
- 'SERIOUS-CONDITION)
- ==> NIL T)
- ((SUBTYPEP '(NOT SERIOUS-CONDITION)
- '(NOT #<Standard-Class SERIOUS-CONDITION 75214120>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class SERIOUS-CONDITION 75214120>)
- '(NOT SERIOUS-CONDITION))
- ==> NIL T)
- ((SUBTYPEP 'READER-ERROR
- #<Standard-Class READER-ERROR 106152740>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class READER-ERROR 106152740>
- 'READER-ERROR)
- ==> NIL T)
- ((SUBTYPEP '(NOT READER-ERROR)
- '(NOT #<Standard-Class READER-ERROR 106152740>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class READER-ERROR 106152740>)
- '(NOT READER-ERROR))
- ==> NIL T)
- ((SUBTYPEP 'REAL
- #<Built-In-Class REAL 75261420>)
- ==> NIL T)
- ((SUBTYPEP
- #<Built-In-Class REAL 75261420> 'REAL)
- ==> NIL T)
- ((SUBTYPEP '(NOT REAL)
- '(NOT #<Built-In-Class REAL 75261420>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Built-In-Class REAL 75261420>) '(NOT REAL))
- ==> NIL T)
- ((SUBTYPEP 'VECTOR
- #<Built-In-Class VECTOR 75262000>)
- ==> NIL T)
- ((SUBTYPEP
- #<Built-In-Class VECTOR 75262000> 'VECTOR)
- ==> NIL T)
- ((SUBTYPEP '(NOT VECTOR)
- '(NOT #<Built-In-Class VECTOR 75262000>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Built-In-Class VECTOR 75262000>)
- '(NOT VECTOR))
- ==> NIL T)
- ((SUBTYPEP 'CONDITION
- #<Standard-Class CONDITION 75211560>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class CONDITION 75211560> 'CONDITION)
- ==> NIL T)
- ((SUBTYPEP '(NOT CONDITION)
- '(NOT #<Standard-Class CONDITION 75211560>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class CONDITION 75211560>)
- '(NOT CONDITION))
- ==> NIL T)
- ((SUBTYPEP 'UNBOUND-VARIABLE
- #<Standard-Class UNBOUND-VARIABLE 104473240>)
- ==> NIL T)
- ((SUBTYPEP
- #<Standard-Class UNBOUND-VARIABLE 104473240>
- 'UNBOUND-VARIABLE)
- ==> NIL T)
- ((SUBTYPEP '(NOT UNBOUND-VARIABLE)
- '(NOT #<Standard-Class UNBOUND-VARIABLE 104473240>))
- ==> NIL T)
- ((SUBTYPEP
- '(NOT #<Standard-Class UNBOUND-VARIABLE 104473240>)
- '(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 #<compiled-function 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: ((#<Built-In-Class ARRAY 75261750> ARRAY)
- (#<Built-In-Class ARRAY 75261750> (ARRAY))
- (#<Built-In-Class ARRAY 75261750> (ARRAY *))
- (#<Built-In-Class ARRAY 75261750> (ARRAY * *))
- (ARRAY #<Built-In-Class ARRAY 75261750>)
- ((ARRAY)
- #<Built-In-Class ARRAY 75261750>)
- ((ARRAY *)
- #<Built-In-Class ARRAY 75261750>)
- ((ARRAY * *)
- #<Built-In-Class ARRAY 75261750>)).
- 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: #<CONDITIONS::INTERNAL-SIMPLE-TYPE-ERROR.123>.
-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: #<CONDITIONS::INTERNAL-SIMPLE-TYPE-ERROR.124>.
-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: #<CONDITIONS::INTERNAL-SIMPLE-TYPE-ERROR.125>.
- 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
- RANDOM-REMOVE-DUPLICATES RANDOM-DELETE-DUPLICATES REMOVE-DUPLICATES.1
+ TYPES.7B 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
@@ -28777,17 +27242,1673 @@
'(NOT STRUCTURE-OBJECT))
==> NIL T)
((SUBTYPEP 'ARITHMETIC-ERROR
- #<Standard-Class ARITHMETIC-ERROR 106152440>)
+ #<Standard-Class ARITHMETIC-ERROR 106152330>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class ARITHMETIC-ERROR 106152330>
+ 'ARITHMETIC-ERROR)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT ARITHMETIC-ERROR)
+ '(NOT #<Standard-Class ARITHMETIC-ERROR 106152330>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class ARITHMETIC-ERROR 106152330>)
+ '(NOT ARITHMETIC-ERROR))
+ ==> NIL T)
+ ((SUBTYPEP 'SYMBOL
+ #<Built-In-Class SYMBOL 75262140>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Built-In-Class SYMBOL 75262140> 'SYMBOL)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT SYMBOL)
+ '(NOT #<Built-In-Class SYMBOL 75262140>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Built-In-Class SYMBOL 75262140>)
+ '(NOT SYMBOL))
+ ==> NIL T)
+ ((SUBTYPEP 'CONTROL-ERROR
+ #<Standard-Class CONTROL-ERROR 75211530>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class CONTROL-ERROR 75211530>
+ 'CONTROL-ERROR)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT CONTROL-ERROR)
+ '(NOT #<Standard-Class CONTROL-ERROR 75211530>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class CONTROL-ERROR 75211530>)
+ '(NOT CONTROL-ERROR))
+ ==> NIL T)
+ ((SUBTYPEP 'CLASS
+ #<Standard-Class CLASS 61234670>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class CLASS 61234670> 'CLASS)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT CLASS)
+ '(NOT #<Standard-Class CLASS 61234670>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class CLASS 61234670>)
+ '(NOT CLASS))
+ ==> NIL T)
+ ((SUBTYPEP 'SIMPLE-ERROR
+ #<Standard-Class SIMPLE-ERROR 104406570>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class SIMPLE-ERROR 104406570>
+ 'SIMPLE-ERROR)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT SIMPLE-ERROR)
+ '(NOT #<Standard-Class SIMPLE-ERROR 104406570>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class SIMPLE-ERROR 104406570>)
+ '(NOT SIMPLE-ERROR))
+ ==> NIL T)
+ ((SUBTYPEP T
+ #<Built-In-Class T 61235250>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Built-In-Class T 61235250> T)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT T)
+ '(NOT #<Built-In-Class T 61235250>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Built-In-Class T 61235250>) '(NOT T))
+ ==> NIL T)
+ ((SUBTYPEP 'COMPLEX
+ #<Built-In-Class COMPLEX 75261450>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Built-In-Class COMPLEX 75261450> 'COMPLEX)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT COMPLEX)
+ '(NOT #<Built-In-Class COMPLEX 75261450>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Built-In-Class COMPLEX 75261450>)
+ '(NOT COMPLEX))
+ ==> NIL T)
+ ((SUBTYPEP 'ARRAY
+ #<Built-In-Class ARRAY 75261750>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Built-In-Class ARRAY 75261750> 'ARRAY)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT ARRAY)
+ '(NOT #<Built-In-Class ARRAY 75261750>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Built-In-Class ARRAY 75261750>)
+ '(NOT ARRAY))
+ ==> NIL T)
+ ((SUBTYPEP 'FLOATING-POINT-INEXACT
+ #<Standard-Class FLOATING-POINT-INEXACT 104405410>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class FLOATING-POINT-INEXACT 104405410>
+ 'FLOATING-POINT-INEXACT)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT FLOATING-POINT-INEXACT)
+ '(NOT #<Standard-Class FLOATING-POINT-INEXACT 104405410>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class FLOATING-POINT-INEXACT 104405410>)
+ '(NOT FLOATING-POINT-INEXACT))
+ ==> NIL T)
+ ((SUBTYPEP 'NUMBER
+ #<Built-In-Class NUMBER 75261370>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Built-In-Class NUMBER 75261370> 'NUMBER)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT NUMBER)
+ '(NOT #<Built-In-Class NUMBER 75261370>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Built-In-Class NUMBER 75261370>)
+ '(NOT NUMBER))
+ ==> NIL T)
+ ((SUBTYPEP 'NULL
+ #<Built-In-Class NULL 75262170>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Built-In-Class NULL 75262170> 'NULL)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT NULL)
+ '(NOT #<Built-In-Class NULL 75262170>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Built-In-Class NULL 75262170>) '(NOT NULL))
+ ==> NIL T)
+ ((SUBTYPEP 'FLOATING-POINT-UNDERFLOW
+ #<Standard-Class FLOATING-POINT-UNDERFLOW 104406730>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class FLOATING-POINT-UNDERFLOW 104406730>
+ 'FLOATING-POINT-UNDERFLOW)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT FLOATING-POINT-UNDERFLOW)
+ '(NOT #<Standard-Class FLOATING-POINT-UNDERFLOW 104406730>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class FLOATING-POINT-UNDERFLOW 104406730>)
+ '(NOT FLOATING-POINT-UNDERFLOW))
+ ==> NIL T)
+ ((SUBTYPEP 'FLOATING-POINT-OVERFLOW
+ #<Standard-Class FLOATING-POINT-OVERFLOW 104401530>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class FLOATING-POINT-OVERFLOW 104401530>
+ 'FLOATING-POINT-OVERFLOW)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT FLOATING-POINT-OVERFLOW)
+ '(NOT #<Standard-Class FLOATING-POINT-OVERFLOW 104401530>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class FLOATING-POINT-OVERFLOW 104401530>)
+ '(NOT FLOATING-POINT-OVERFLOW))
+ ==> NIL T)
+ ((SUBTYPEP 'RATIONAL
+ #<Built-In-Class RATIONAL 75261530>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Built-In-Class RATIONAL 75261530> 'RATIONAL)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT RATIONAL)
+ '(NOT #<Built-In-Class RATIONAL 75261530>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Built-In-Class RATIONAL 75261530>)
+ '(NOT RATIONAL))
+ ==> NIL T)
+ ((SUBTYPEP 'RATIO
+ #<Built-In-Class RATIO 75261610>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Built-In-Class RATIO 75261610> 'RATIO)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT RATIO)
+ '(NOT #<Built-In-Class RATIO 75261610>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Built-In-Class RATIO 75261610>)
+ '(NOT RATIO))
+ ==> NIL T)
+ ((SUBTYPEP 'STANDARD-METHOD
+ #<Standard-Class STANDARD-METHOD 61234070>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class STANDARD-METHOD 61234070>
+ 'STANDARD-METHOD)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT STANDARD-METHOD)
+ '(NOT #<Standard-Class STANDARD-METHOD 61234070>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class STANDARD-METHOD 61234070>)
+ '(NOT STANDARD-METHOD))
+ ==> NIL T)
+ ((SUBTYPEP 'STRUCTURE-CLASS
+ #<Standard-Class STRUCTURE-CLASS 61233430>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class STRUCTURE-CLASS 61233430>
+ 'STRUCTURE-CLASS)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT STRUCTURE-CLASS)
+ '(NOT #<Standard-Class STRUCTURE-CLASS 61233430>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class STRUCTURE-CLASS 61233430>)
+ '(NOT STRUCTURE-CLASS))
+ ==> NIL T)
+ ((SUBTYPEP 'BUILT-IN-CLASS
+ #<Standard-Class BUILT-IN-CLASS 61233400>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class BUILT-IN-CLASS 61233400>
+ 'BUILT-IN-CLASS)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT BUILT-IN-CLASS)
+ '(NOT #<Standard-Class BUILT-IN-CLASS 61233400>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class BUILT-IN-CLASS 61233400>)
+ '(NOT BUILT-IN-CLASS))
+ ==> NIL T)
+ ((SUBTYPEP 'UNBOUND-SLOT
+ #<Standard-Class UNBOUND-SLOT 106153100>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class UNBOUND-SLOT 106153100>
+ 'UNBOUND-SLOT)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT UNBOUND-SLOT)
+ '(NOT #<Standard-Class UNBOUND-SLOT 106153100>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class UNBOUND-SLOT 106153100>)
+ '(NOT UNBOUND-SLOT))
+ ==> NIL T)
+ ((SUBTYPEP 'ERROR
+ #<Standard-Class ERROR 76045470>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class ERROR 76045470> 'ERROR)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT ERROR)
+ '(NOT #<Standard-Class ERROR 76045470>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class ERROR 76045470>)
+ '(NOT ERROR))
+ ==> NIL T)
+ ((SUBTYPEP 'STANDARD-GENERIC-FUNCTION
+ #<Funcallable-Standard-Class STANDARD-GENERIC-FUNCTION 61233570>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Funcallable-Standard-Class STANDARD-GENERIC-FUNCTION 61233570>
+ 'STANDARD-GENERIC-FUNCTION)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT STANDARD-GENERIC-FUNCTION)
+ '(NOT #<Funcallable-Standard-Class STANDARD-GENERIC-FUNCTION 61233570>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Funcallable-Standard-Class STANDARD-GENERIC-FUNCTION 61233570>)
+ '(NOT STANDARD-GENERIC-FUNCTION))
+ ==> NIL T)
+ ((SUBTYPEP 'CHARACTER
+ #<Built-In-Class CHARACTER 75262110>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Built-In-Class CHARACTER 75262110> 'CHARACTER)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT CHARACTER)
+ '(NOT #<Built-In-Class CHARACTER 75262110>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Built-In-Class CHARACTER 75262110>)
+ '(NOT CHARACTER))
+ ==> NIL T)
+ ((SUBTYPEP 'DIVISION-BY-ZERO
+ #<Standard-Class DIVISION-BY-ZERO 104401120>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class DIVISION-BY-ZERO 104401120>
+ 'DIVISION-BY-ZERO)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT DIVISION-BY-ZERO)
+ '(NOT #<Standard-Class DIVISION-BY-ZERO 104401120>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class DIVISION-BY-ZERO 104401120>)
+ '(NOT DIVISION-BY-ZERO))
+ ==> NIL T)
+ ((SUBTYPEP 'SEQUENCE
+ #<Built-In-Class SEQUENCE 75261640>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Built-In-Class SEQUENCE 75261640> 'SEQUENCE)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT SEQUENCE)
+ '(NOT #<Built-In-Class SEQUENCE 75261640>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Built-In-Class SEQUENCE 75261640>)
+ '(NOT SEQUENCE))
+ ==> NIL T)
+ ((SUBTYPEP 'PRINT-NOT-READABLE
+ #<Standard-Class PRINT-NOT-READABLE 104314010>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class PRINT-NOT-READABLE 104314010>
+ 'PRINT-NOT-READABLE)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT PRINT-NOT-READABLE)
+ '(NOT #<Standard-Class PRINT-NOT-READABLE 104314010>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class PRINT-NOT-READABLE 104314010>)
+ '(NOT PRINT-NOT-READABLE))
+ ==> NIL T)
+ ((SUBTYPEP 'UNDEFINED-FUNCTION
+ #<Standard-Class UNDEFINED-FUNCTION 104452330>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class UNDEFINED-FUNCTION 104452330>
+ 'UNDEFINED-FUNCTION)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT UNDEFINED-FUNCTION)
+ '(NOT #<Standard-Class UNDEFINED-FUNCTION 104452330>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class UNDEFINED-FUNCTION 104452330>)
+ '(NOT UNDEFINED-FUNCTION))
+ ==> NIL T)
+ ((SUBTYPEP 'END-OF-FILE
+ #<Standard-Class END-OF-FILE 106153650>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class END-OF-FILE 106153650>
+ 'END-OF-FILE)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT END-OF-FILE)
+ '(NOT #<Standard-Class END-OF-FILE 106153650>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class END-OF-FILE 106153650>)
+ '(NOT END-OF-FILE))
+ ==> NIL T)
+ ((SUBTYPEP 'INTEGER
+ #<Built-In-Class INTEGER 75261560>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Built-In-Class INTEGER 75261560> 'INTEGER)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT INTEGER)
+ '(NOT #<Built-In-Class INTEGER 75261560>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Built-In-Class INTEGER 75261560>)
+ '(NOT INTEGER))
+ ==> NIL T)
+ ((SUBTYPEP 'FLOAT
+ #<Built-In-Class FLOAT 75261500>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Built-In-Class FLOAT 75261500> 'FLOAT)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT FLOAT)
+ '(NOT #<Built-In-Class FLOAT 75261500>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Built-In-Class FLOAT 75261500>)
+ '(NOT FLOAT))
+ ==> NIL T)
+ ((SUBTYPEP 'BIT-VECTOR
+ #<Built-In-Class BIT-VECTOR 75262060>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Built-In-Class BIT-VECTOR 75262060> 'BIT-VECTOR)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT BIT-VECTOR)
+ '(NOT #<Built-In-Class BIT-VECTOR 75262060>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Built-In-Class BIT-VECTOR 75262060>)
+ '(NOT BIT-VECTOR))
+ ==> NIL T)
+ ((SUBTYPEP 'STYLE-WARNING
+ #<Standard-Class STYLE-WARNING 75212030>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class STYLE-WARNING 75212030>
+ 'STYLE-WARNING)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT STYLE-WARNING)
+ '(NOT #<Standard-Class STYLE-WARNING 75212030>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class STYLE-WARNING 75212030>)
+ '(NOT STYLE-WARNING))
+ ==> NIL T)
+ ((SUBTYPEP 'SIMPLE-TYPE-ERROR
+ #<Standard-Class SIMPLE-TYPE-ERROR 104461670>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class SIMPLE-TYPE-ERROR 104461670>
+ 'SIMPLE-TYPE-ERROR)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT SIMPLE-TYPE-ERROR)
+ '(NOT #<Standard-Class SIMPLE-TYPE-ERROR 104461670>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class SIMPLE-TYPE-ERROR 104461670>)
+ '(NOT SIMPLE-TYPE-ERROR))
+ ==> NIL T)
+ ((SUBTYPEP 'CELL-ERROR
+ #<Standard-Class CELL-ERROR 106175600>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class CELL-ERROR 106175600> 'CELL-ERROR)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT CELL-ERROR)
+ '(NOT #<Standard-Class CELL-ERROR 106175600>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class CELL-ERROR 106175600>)
+ '(NOT CELL-ERROR))
+ ==> NIL T)
+ ((SUBTYPEP 'FILE-ERROR
+ #<Standard-Class FILE-ERROR 104450760>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class FILE-ERROR 104450760> 'FILE-ERROR)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT FILE-ERROR)
+ '(NOT #<Standard-Class FILE-ERROR 104450760>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class FILE-ERROR 104450760>)
+ '(NOT FILE-ERROR))
+ ==> NIL T)
+ ((SUBTYPEP 'RESTART
+ #<Structure-Class RESTART 370337230>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Structure-Class RESTART 370337230> 'RESTART)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT RESTART)
+ '(NOT #<Structure-Class RESTART 370337230>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Structure-Class RESTART 370337230>)
+ '(NOT RESTART))
+ ==> NIL T)
+ ((SUBTYPEP 'TYPE-ERROR
+ #<Standard-Class TYPE-ERROR 104216270>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class TYPE-ERROR 104216270> 'TYPE-ERROR)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT TYPE-ERROR)
+ '(NOT #<Standard-Class TYPE-ERROR 104216270>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class TYPE-ERROR 104216270>)
+ '(NOT TYPE-ERROR))
+ ==> NIL T)
+ ((SUBTYPEP 'LIST
+ #<Built-In-Class LIST 75261670>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Built-In-Class LIST 75261670> 'LIST)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT LIST)
+ '(NOT #<Built-In-Class LIST 75261670>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Built-In-Class LIST 75261670>) '(NOT LIST))
+ ==> NIL T)
+ ((SUBTYPEP 'STANDARD-OBJECT
+ #<Standard-Class STANDARD-OBJECT 61235140>)
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class STANDARD-OBJECT 61235140>)
+ '(NOT STANDARD-OBJECT))
+ ==> NIL T)
+ ((SUBTYPEP 'STRING
+ #<Built-In-Class STRING 75262030>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Built-In-Class STRING 75262030> 'STRING)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT STRING)
+ '(NOT #<Built-In-Class STRING 75262030>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Built-In-Class STRING 75262030>)
+ '(NOT STRING))
+ ==> NIL T)
+ ((SUBTYPEP 'METHOD-COMBINATION
+ #<Standard-Class METHOD-COMBINATION 61233650>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class METHOD-COMBINATION 61233650>
+ 'METHOD-COMBINATION)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT METHOD-COMBINATION)
+ '(NOT #<Standard-Class METHOD-COMBINATION 61233650>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class METHOD-COMBINATION 61233650>)
+ '(NOT METHOD-COMBINATION))
+ ==> NIL T)
+ ((SUBTYPEP 'CONS
+ #<Built-In-Class CONS 75261720>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Built-In-Class CONS 75261720> 'CONS)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT CONS)
+ '(NOT #<Built-In-Class CONS 75261720>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Built-In-Class CONS 75261720>) '(NOT CONS))
+ ==> NIL T)
+ ((SUBTYPEP 'SIMPLE-CONDITION
+ #<Standard-Class SIMPLE-CONDITION 104067070>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class SIMPLE-CONDITION 104067070>
+ 'SIMPLE-CONDITION)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT SIMPLE-CONDITION)
+ '(NOT #<Standard-Class SIMPLE-CONDITION 104067070>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class SIMPLE-CONDITION 104067070>)
+ '(NOT SIMPLE-CONDITION))
+ ==> NIL T)
+ ((SUBTYPEP 'SIMPLE-WARNING
+ #<Standard-Class SIMPLE-WARNING 104405710>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class SIMPLE-WARNING 104405710>
+ 'SIMPLE-WARNING)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT SIMPLE-WARNING)
+ '(NOT #<Standard-Class SIMPLE-WARNING 104405710>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class SIMPLE-WARNING 104405710>)
+ '(NOT SIMPLE-WARNING))
+ ==> NIL T)
+ ((SUBTYPEP 'PACKAGE-ERROR
+ #<Standard-Class PACKAGE-ERROR 106156510>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class PACKAGE-ERROR 106156510>
+ 'PACKAGE-ERROR)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT PACKAGE-ERROR)
+ '(NOT #<Standard-Class PACKAGE-ERROR 106156510>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class PACKAGE-ERROR 106156510>)
+ '(NOT PACKAGE-ERROR))
+ ==> NIL T)
+ ((SUBTYPEP 'PARSE-ERROR
+ #<Standard-Class PARSE-ERROR 76046540>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class PARSE-ERROR 76046540>
+ 'PARSE-ERROR)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT PARSE-ERROR)
+ '(NOT #<Standard-Class PARSE-ERROR 76046540>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class PARSE-ERROR 76046540>)
+ '(NOT PARSE-ERROR))
+ ==> NIL T)
+ ((SUBTYPEP 'WARNING
+ #<Standard-Class WARNING 74625000>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class WARNING 74625000> 'WARNING)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT WARNING)
+ '(NOT #<Standard-Class WARNING 74625000>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class WARNING 74625000>)
+ '(NOT WARNING))
+ ==> NIL T)
+ ((SUBTYPEP 'STORAGE-CONDITION
+ #<Standard-Class STORAGE-CONDITION 75214230>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class STORAGE-CONDITION 75214230>
+ 'STORAGE-CONDITION)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT STORAGE-CONDITION)
+ '(NOT #<Standard-Class STORAGE-CONDITION 75214230>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class STORAGE-CONDITION 75214230>)
+ '(NOT STORAGE-CONDITION))
+ ==> NIL T)
+ ((SUBTYPEP 'FLOATING-POINT-INVALID-OPERATION
+ #<Standard-Class FLOATING-POINT-INVALID-OPERATION 104403160>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class FLOATING-POINT-INVALID-OPERATION 104403160>
+ 'FLOATING-POINT-INVALID-OPERATION)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT FLOATING-POINT-INVALID-OPERATION)
+ '(NOT #<Standard-Class FLOATING-POINT-INVALID-OPERATION 104403160>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class FLOATING-POINT-INVALID-OPERATION 104403160>)
+ '(NOT FLOATING-POINT-INVALID-OPERATION))
+ ==> NIL T)
+ ((SUBTYPEP 'PROGRAM-ERROR
+ #<Standard-Class PROGRAM-ERROR 104462740>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class PROGRAM-ERROR 104462740>
+ 'PROGRAM-ERROR)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT PROGRAM-ERROR)
+ '(NOT #<Standard-Class PROGRAM-ERROR 104462740>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class PROGRAM-ERROR 104462740>)
+ '(NOT PROGRAM-ERROR))
+ ==> NIL T)
+ ((SUBTYPEP 'METHOD
+ #<Standard-Class METHOD 61234120>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class METHOD 61234120> 'METHOD)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT METHOD)
+ '(NOT #<Standard-Class METHOD 61234120>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class METHOD 61234120>)
+ '(NOT METHOD))
+ ==> NIL T)
+ ((SUBTYPEP 'STANDARD-CLASS
+ #<Standard-Class STANDARD-CLASS 61233270>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class STANDARD-CLASS 61233270>
+ 'STANDARD-CLASS)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT STANDARD-CLASS)
+ '(NOT #<Standard-Class STANDARD-CLASS 61233270>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class STANDARD-CLASS 61233270>)
+ '(NOT STANDARD-CLASS))
+ ==> NIL T)
+ ((SUBTYPEP 'GENERIC-FUNCTION
+ #<Funcallable-Standard-Class GENERIC-FUNCTION 61233700>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Funcallable-Standard-Class GENERIC-FUNCTION 61233700>
+ 'GENERIC-FUNCTION)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT GENERIC-FUNCTION)
+ '(NOT #<Funcallable-Standard-Class GENERIC-FUNCTION 61233700>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Funcallable-Standard-Class GENERIC-FUNCTION 61233700>)
+ '(NOT GENERIC-FUNCTION))
+ ==> NIL T)
+ ((SUBTYPEP 'STREAM-ERROR
+ #<Standard-Class STREAM-ERROR 104464450>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class STREAM-ERROR 104464450>
+ 'STREAM-ERROR)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT STREAM-ERROR)
+ '(NOT #<Standard-Class STREAM-ERROR 104464450>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class STREAM-ERROR 104464450>)
+ '(NOT STREAM-ERROR))
+ ==> NIL T)
+ ((SUBTYPEP 'SERIOUS-CONDITION
+ #<Standard-Class SERIOUS-CONDITION 75213700>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class SERIOUS-CONDITION 75213700>
+ 'SERIOUS-CONDITION)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT SERIOUS-CONDITION)
+ '(NOT #<Standard-Class SERIOUS-CONDITION 75213700>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class SERIOUS-CONDITION 75213700>)
+ '(NOT SERIOUS-CONDITION))
+ ==> NIL T)
+ ((SUBTYPEP 'READER-ERROR
+ #<Standard-Class READER-ERROR 106152740>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class READER-ERROR 106152740>
+ 'READER-ERROR)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT READER-ERROR)
+ '(NOT #<Standard-Class READER-ERROR 106152740>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class READER-ERROR 106152740>)
+ '(NOT READER-ERROR))
+ ==> NIL T)
+ ((SUBTYPEP 'REAL
+ #<Built-In-Class REAL 75261420>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Built-In-Class REAL 75261420> 'REAL)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT REAL)
+ '(NOT #<Built-In-Class REAL 75261420>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Built-In-Class REAL 75261420>) '(NOT REAL))
+ ==> NIL T)
+ ((SUBTYPEP 'VECTOR
+ #<Built-In-Class VECTOR 75262000>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Built-In-Class VECTOR 75262000> 'VECTOR)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT VECTOR)
+ '(NOT #<Built-In-Class VECTOR 75262000>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Built-In-Class VECTOR 75262000>)
+ '(NOT VECTOR))
+ ==> NIL T)
+ ((SUBTYPEP 'CONDITION
+ #<Standard-Class CONDITION 75211340>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class CONDITION 75211340> 'CONDITION)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT CONDITION)
+ '(NOT #<Standard-Class CONDITION 75211340>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class CONDITION 75211340>)
+ '(NOT CONDITION))
+ ==> NIL T)
+ ((SUBTYPEP 'UNBOUND-VARIABLE
+ #<Standard-Class UNBOUND-VARIABLE 104463240>)
+ ==> NIL T)
+ ((SUBTYPEP
+ #<Standard-Class UNBOUND-VARIABLE 104463240>
+ 'UNBOUND-VARIABLE)
+ ==> NIL T)
+ ((SUBTYPEP '(NOT UNBOUND-VARIABLE)
+ '(NOT #<Standard-Class UNBOUND-VARIABLE 104463240>))
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Standard-Class UNBOUND-VARIABLE 104463240>)
+ '(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 #<compiled-function 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: ((#<Built-In-Class ARRAY 75261750> ARRAY)
+ (#<Built-In-Class ARRAY 75261750> (ARRAY))
+ (#<Built-In-Class ARRAY 75261750> (ARRAY *))
+ (#<Built-In-Class ARRAY 75261750> (ARRAY * *))
+ (ARRAY #<Built-In-Class ARRAY 75261750>)
+ ((ARRAY)
+ #<Built-In-Class ARRAY 75261750>)
+ ((ARRAY *)
+ #<Built-In-Class ARRAY 75261750>)
+ ((ARRAY * *)
+ #<Built-In-Class ARRAY 75261750>)).
+ 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: #<CONDITIONS::INTERNAL-SIMPLE-TYPE-ERROR.123>.
+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: #<CONDITIONS::INTERNAL-SIMPLE-TYPE-ERROR.124>.
+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: #<CONDITIONS::INTERNAL-SIMPLE-TYPE-ERROR.125>.
+ 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 TYPES.7C
+Should be atomic, but isn't: CONDITION
+Test TYPES.8 failed
+Form: (LOOP
+ FOR
+ TP
+ IN
+ *DISJOINT-TYPES-LIST*
+ COUNT
+ (COND
+ ((AND (NOT (EQT TP 'CONS)) (NOT (SUBTYPEP* TP 'ATOM)))
+ (FORMAT T "~%Should be atomic, but isn't: ~S" TP) T)))
+Expected value: 0
+Actual value: 1.
+ TYPES.9Found element of FUNCTION not in ATOM: (SYSTEM:LAMBDA-CLOSURE
+ () () () (X)
+ X)
+Found element of ARRAY not in SIMPLE-ARRAY: #0ANIL
+Found element of ARRAY not in SIMPLE-ARRAY: #(NIL NIL)
+Found element of ARRAY not in SIMPLE-ARRAY: #2A((NIL NIL) (NIL NIL))
+Found element of ARRAY not in SIMPLE-ARRAY: #3A(((NIL NIL) (NIL NIL))
+ ((NIL NIL) (NIL NIL)))
+Found element of ARRAY not in SIMPLE-ARRAY: #4A((((NIL NIL) (NIL NIL))
+ ((NIL NIL) (NIL NIL)))
+ (((NIL NIL) (NIL NIL))
+ ((NIL NIL) (NIL NIL))))
+Found element of ARRAY not in SIMPLE-ARRAY: #5A(((((NIL NIL) (NIL NIL))
+ ((NIL NIL) (NIL NIL)))
+ (((NIL NIL) (NIL NIL))
+ ((NIL NIL) (NIL NIL))))
+ ((((NIL NIL) (NIL NIL))
+ ((NIL NIL) (NIL NIL)))
+ (((NIL NIL) (NIL NIL))
+ ((NIL NIL) (NIL NIL)))))
+Found element of ARRAY not in SIMPLE-ARRAY: #6A((((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL))))
+ ((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))))
+ (((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL))))
+ ((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL))))))
+Found element of ARRAY not in SIMPLE-ARRAY: #7A(((((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL))))
+ ((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))))
+ (((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL))))
+ ((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL))))))
+ ((((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL))))
+ ((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))))
+ (((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL))))
+ ((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))))))
+Found element of ARRAY not in SIMPLE-ARRAY: #8A((((((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL))))
+ ((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))))
+ (((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL))))
+ ((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL))))))
+ ((((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL))))
+ ((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))))
+ (((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL))))
+ ((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))))))
+ (((((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL))))
+ ((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))))
+ (((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL))))
+ ((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL))))))
+ ((((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL))))
+ ((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))))
+ (((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL))))
+ ((((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL)))
+ (((NIL NIL)
+ (NIL NIL))
+ ((NIL NIL)
+ (NIL NIL))))))))
+Found element of VECTOR not in SIMPLE-ARRAY: #(NIL NIL)
+Test TYPES.9A failed
+Form: (TYPES.9A-BODY)
+Expected value: 0
+Actual value: 11.
+Test ALL-CLASSES-ARE-TYPE-EQUIVALENT-TO-THEIR-NAMES failed
+Form: (LOOP
+ FOR
+ SYM
+ BEING
+ THE
+ EXTERNAL-SYMBOLS
+ OF
+ "COMMON-LISP"
+ FOR
+ CLASS
+ =
+ (FIND-CLASS SYM NIL)
+ WHEN
+ CLASS
+ APPEND
+ (CHECK-EQUIVALENCE SYM CLASS))
+Expected value: NIL
+Actual value: (((SUBTYPEP 'STRUCTURE-OBJECT
+ #<Structure-Class STRUCTURE-OBJECT 61235170>)
+ ==> NIL T)
+ ((SUBTYPEP
+ '(NOT #<Structure-Class STRUCTURE-OBJECT 61235170>)
+ '(NOT STRUCTURE-OBJECT))
+ ==> NIL T)
+ ((SUBTYPEP 'ARITHMETIC-ERROR
+ #<Standard-Class ARITHMETIC-ERROR 106152330>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class ARITHMETIC-ERROR 106152440>
+ #<Standard-Class ARITHMETIC-ERROR 106152330>
'ARITHMETIC-ERROR)
==> NIL T)
((SUBTYPEP '(NOT ARITHMETIC-ERROR)
- '(NOT #<Standard-Class ARITHMETIC-ERROR 106152440>))
+ '(NOT #<Standard-Class ARITHMETIC-ERROR 106152330>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class ARITHMETIC-ERROR 106152440>)
+ '(NOT #<Standard-Class ARITHMETIC-ERROR 106152330>)
'(NOT ARITHMETIC-ERROR))
==> NIL T)
((SUBTYPEP 'SYMBOL
@@ -28804,17 +28925,17 @@
'(NOT SYMBOL))
==> NIL T)
((SUBTYPEP 'CONTROL-ERROR
- #<Standard-Class CONTROL-ERROR 75212410>)
+ #<Standard-Class CONTROL-ERROR 75211530>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class CONTROL-ERROR 75212410>
+ #<Standard-Class CONTROL-ERROR 75211530>
'CONTROL-ERROR)
==> NIL T)
((SUBTYPEP '(NOT CONTROL-ERROR)
- '(NOT #<Standard-Class CONTROL-ERROR 75212410>))
+ '(NOT #<Standard-Class CONTROL-ERROR 75211530>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class CONTROL-ERROR 75212410>)
+ '(NOT #<Standard-Class CONTROL-ERROR 75211530>)
'(NOT CONTROL-ERROR))
==> NIL T)
((SUBTYPEP 'CLASS
@@ -28831,17 +28952,17 @@
'(NOT CLASS))
==> NIL T)
((SUBTYPEP 'SIMPLE-ERROR
- #<Standard-Class SIMPLE-ERROR 104416570>)
+ #<Standard-Class SIMPLE-ERROR 104406570>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class SIMPLE-ERROR 104416570>
+ #<Standard-Class SIMPLE-ERROR 104406570>
'SIMPLE-ERROR)
==> NIL T)
((SUBTYPEP '(NOT SIMPLE-ERROR)
- '(NOT #<Standard-Class SIMPLE-ERROR 104416570>))
+ '(NOT #<Standard-Class SIMPLE-ERROR 104406570>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class SIMPLE-ERROR 104416570>)
+ '(NOT #<Standard-Class SIMPLE-ERROR 104406570>)
'(NOT SIMPLE-ERROR))
==> NIL T)
((SUBTYPEP T
@@ -28883,17 +29004,17 @@
'(NOT ARRAY))
==> NIL T)
((SUBTYPEP 'FLOATING-POINT-INEXACT
- #<Standard-Class FLOATING-POINT-INEXACT 104415410>)
+ #<Standard-Class FLOATING-POINT-INEXACT 104405410>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class FLOATING-POINT-INEXACT 104415410>
+ #<Standard-Class FLOATING-POINT-INEXACT 104405410>
'FLOATING-POINT-INEXACT)
==> NIL T)
((SUBTYPEP '(NOT FLOATING-POINT-INEXACT)
- '(NOT #<Standard-Class FLOATING-POINT-INEXACT 104415410>))
+ '(NOT #<Standard-Class FLOATING-POINT-INEXACT 104405410>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class FLOATING-POINT-INEXACT 104415410>)
+ '(NOT #<Standard-Class FLOATING-POINT-INEXACT 104405410>)
'(NOT FLOATING-POINT-INEXACT))
==> NIL T)
((SUBTYPEP 'NUMBER
@@ -28922,31 +29043,31 @@
'(NOT #<Built-In-Class NULL 75262170>) '(NOT NULL))
==> NIL T)
((SUBTYPEP 'FLOATING-POINT-UNDERFLOW
- #<Standard-Class FLOATING-POINT-UNDERFLOW 104416730>)
+ #<Standard-Class FLOATING-POINT-UNDERFLOW 104406730>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class FLOATING-POINT-UNDERFLOW 104416730>
+ #<Standard-Class FLOATING-POINT-UNDERFLOW 104406730>
'FLOATING-POINT-UNDERFLOW)
==> NIL T)
((SUBTYPEP '(NOT FLOATING-POINT-UNDERFLOW)
- '(NOT #<Standard-Class FLOATING-POINT-UNDERFLOW 104416730>))
+ '(NOT #<Standard-Class FLOATING-POINT-UNDERFLOW 104406730>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class FLOATING-POINT-UNDERFLOW 104416730>)
+ '(NOT #<Standard-Class FLOATING-POINT-UNDERFLOW 104406730>)
'(NOT FLOATING-POINT-UNDERFLOW))
==> NIL T)
((SUBTYPEP 'FLOATING-POINT-OVERFLOW
- #<Standard-Class FLOATING-POINT-OVERFLOW 104412170>)
+ #<Standard-Class FLOATING-POINT-OVERFLOW 104401530>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class FLOATING-POINT-OVERFLOW 104412170>
+ #<Standard-Class FLOATING-POINT-OVERFLOW 104401530>
'FLOATING-POINT-OVERFLOW)
==> NIL T)
((SUBTYPEP '(NOT FLOATING-POINT-OVERFLOW)
- '(NOT #<Standard-Class FLOATING-POINT-OVERFLOW 104412170>))
+ '(NOT #<Standard-Class FLOATING-POINT-OVERFLOW 104401530>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class FLOATING-POINT-OVERFLOW 104412170>)
+ '(NOT #<Standard-Class FLOATING-POINT-OVERFLOW 104401530>)
'(NOT FLOATING-POINT-OVERFLOW))
==> NIL T)
((SUBTYPEP 'RATIONAL
@@ -29032,16 +29153,16 @@
'(NOT UNBOUND-SLOT))
==> NIL T)
((SUBTYPEP 'ERROR
- #<Standard-Class ERROR 76041010>)
+ #<Standard-Class ERROR 76045470>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class ERROR 76041010> 'ERROR)
+ #<Standard-Class ERROR 76045470> 'ERROR)
==> NIL T)
((SUBTYPEP '(NOT ERROR)
- '(NOT #<Standard-Class ERROR 76041010>))
+ '(NOT #<Standard-Class ERROR 76045470>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class ERROR 76041010>)
+ '(NOT #<Standard-Class ERROR 76045470>)
'(NOT ERROR))
==> NIL T)
((SUBTYPEP 'STANDARD-GENERIC-FUNCTION
@@ -29072,17 +29193,17 @@
'(NOT CHARACTER))
==> NIL T)
((SUBTYPEP 'DIVISION-BY-ZERO
- #<Standard-Class DIVISION-BY-ZERO 104410620>)
+ #<Standard-Class DIVISION-BY-ZERO 104401120>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class DIVISION-BY-ZERO 104410620>
+ #<Standard-Class DIVISION-BY-ZERO 104401120>
'DIVISION-BY-ZERO)
==> NIL T)
((SUBTYPEP '(NOT DIVISION-BY-ZERO)
- '(NOT #<Standard-Class DIVISION-BY-ZERO 104410620>))
+ '(NOT #<Standard-Class DIVISION-BY-ZERO 104401120>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class DIVISION-BY-ZERO 104410620>)
+ '(NOT #<Standard-Class DIVISION-BY-ZERO 104401120>)
'(NOT DIVISION-BY-ZERO))
==> NIL T)
((SUBTYPEP 'SEQUENCE
@@ -29099,31 +29220,31 @@
'(NOT SEQUENCE))
==> NIL T)
((SUBTYPEP 'PRINT-NOT-READABLE
- #<Standard-Class PRINT-NOT-READABLE 104342440>)
+ #<Standard-Class PRINT-NOT-READABLE 104314010>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class PRINT-NOT-READABLE 104342440>
+ #<Standard-Class PRINT-NOT-READABLE 104314010>
'PRINT-NOT-READABLE)
==> NIL T)
((SUBTYPEP '(NOT PRINT-NOT-READABLE)
- '(NOT #<Standard-Class PRINT-NOT-READABLE 104342440>))
+ '(NOT #<Standard-Class PRINT-NOT-READABLE 104314010>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class PRINT-NOT-READABLE 104342440>)
+ '(NOT #<Standard-Class PRINT-NOT-READABLE 104314010>)
'(NOT PRINT-NOT-READABLE))
==> NIL T)
((SUBTYPEP 'UNDEFINED-FUNCTION
- #<Standard-Class UNDEFINED-FUNCTION 104462440>)
+ #<Standard-Class UNDEFINED-FUNCTION 104452330>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class UNDEFINED-FUNCTION 104462440>
+ #<Standard-Class UNDEFINED-FUNCTION 104452330>
'UNDEFINED-FUNCTION)
==> NIL T)
((SUBTYPEP '(NOT UNDEFINED-FUNCTION)
- '(NOT #<Standard-Class UNDEFINED-FUNCTION 104462440>))
+ '(NOT #<Standard-Class UNDEFINED-FUNCTION 104452330>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class UNDEFINED-FUNCTION 104462440>)
+ '(NOT #<Standard-Class UNDEFINED-FUNCTION 104452330>)
'(NOT UNDEFINED-FUNCTION))
==> NIL T)
((SUBTYPEP 'END-OF-FILE
@@ -29180,31 +29301,31 @@
'(NOT BIT-VECTOR))
==> NIL T)
((SUBTYPEP 'STYLE-WARNING
- #<Standard-Class STYLE-WARNING 75212300>)
+ #<Standard-Class STYLE-WARNING 75212030>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class STYLE-WARNING 75212300>
+ #<Standard-Class STYLE-WARNING 75212030>
'STYLE-WARNING)
==> NIL T)
((SUBTYPEP '(NOT STYLE-WARNING)
- '(NOT #<Standard-Class STYLE-WARNING 75212300>))
+ '(NOT #<Standard-Class STYLE-WARNING 75212030>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class STYLE-WARNING 75212300>)
+ '(NOT #<Standard-Class STYLE-WARNING 75212030>)
'(NOT STYLE-WARNING))
==> NIL T)
((SUBTYPEP 'SIMPLE-TYPE-ERROR
- #<Standard-Class SIMPLE-TYPE-ERROR 104471670>)
+ #<Standard-Class SIMPLE-TYPE-ERROR 104461670>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class SIMPLE-TYPE-ERROR 104471670>
+ #<Standard-Class SIMPLE-TYPE-ERROR 104461670>
'SIMPLE-TYPE-ERROR)
==> NIL T)
((SUBTYPEP '(NOT SIMPLE-TYPE-ERROR)
- '(NOT #<Standard-Class SIMPLE-TYPE-ERROR 104471670>))
+ '(NOT #<Standard-Class SIMPLE-TYPE-ERROR 104461670>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class SIMPLE-TYPE-ERROR 104471670>)
+ '(NOT #<Standard-Class SIMPLE-TYPE-ERROR 104461670>)
'(NOT SIMPLE-TYPE-ERROR))
==> NIL T)
((SUBTYPEP 'CELL-ERROR
@@ -29221,42 +29342,42 @@
'(NOT CELL-ERROR))
==> NIL T)
((SUBTYPEP 'FILE-ERROR
- #<Standard-Class FILE-ERROR 104460760>)
+ #<Standard-Class FILE-ERROR 104450760>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class FILE-ERROR 104460760> 'FILE-ERROR)
+ #<Standard-Class FILE-ERROR 104450760> 'FILE-ERROR)
==> NIL T)
((SUBTYPEP '(NOT FILE-ERROR)
- '(NOT #<Standard-Class FILE-ERROR 104460760>))
+ '(NOT #<Standard-Class FILE-ERROR 104450760>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class FILE-ERROR 104460760>)
+ '(NOT #<Standard-Class FILE-ERROR 104450760>)
'(NOT FILE-ERROR))
==> NIL T)
((SUBTYPEP 'RESTART
- #<Structure-Class RESTART 370347310>)
+ #<Structure-Class RESTART 370337230>)
==> NIL T)
((SUBTYPEP
- #<Structure-Class RESTART 370347310> 'RESTART)
+ #<Structure-Class RESTART 370337230> 'RESTART)
==> NIL T)
((SUBTYPEP '(NOT RESTART)
- '(NOT #<Structure-Class RESTART 370347310>))
+ '(NOT #<Structure-Class RESTART 370337230>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Structure-Class RESTART 370347310>)
+ '(NOT #<Structure-Class RESTART 370337230>)
'(NOT RESTART))
==> NIL T)
((SUBTYPEP 'TYPE-ERROR
- #<Standard-Class TYPE-ERROR 104224610>)
+ #<Standard-Class TYPE-ERROR 104216270>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class TYPE-ERROR 104224610> 'TYPE-ERROR)
+ #<Standard-Class TYPE-ERROR 104216270> 'TYPE-ERROR)
==> NIL T)
((SUBTYPEP '(NOT TYPE-ERROR)
- '(NOT #<Standard-Class TYPE-ERROR 104224610>))
+ '(NOT #<Standard-Class TYPE-ERROR 104216270>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class TYPE-ERROR 104224610>)
+ '(NOT #<Standard-Class TYPE-ERROR 104216270>)
'(NOT TYPE-ERROR))
==> NIL T)
((SUBTYPEP 'LIST
@@ -29318,31 +29439,31 @@
'(NOT #<Built-In-Class CONS 75261720>) '(NOT CONS))
==> NIL T)
((SUBTYPEP 'SIMPLE-CONDITION
- #<Standard-Class SIMPLE-CONDITION 104106320>)
+ #<Standard-Class SIMPLE-CONDITION 104067070>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class SIMPLE-CONDITION 104106320>
+ #<Standard-Class SIMPLE-CONDITION 104067070>
'SIMPLE-CONDITION)
==> NIL T)
((SUBTYPEP '(NOT SIMPLE-CONDITION)
- '(NOT #<Standard-Class SIMPLE-CONDITION 104106320>))
+ '(NOT #<Standard-Class SIMPLE-CONDITION 104067070>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class SIMPLE-CONDITION 104106320>)
+ '(NOT #<Standard-Class SIMPLE-CONDITION 104067070>)
'(NOT SIMPLE-CONDITION))
==> NIL T)
((SUBTYPEP 'SIMPLE-WARNING
- #<Standard-Class SIMPLE-WARNING 104415710>)
+ #<Standard-Class SIMPLE-WARNING 104405710>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class SIMPLE-WARNING 104415710>
+ #<Standard-Class SIMPLE-WARNING 104405710>
'SIMPLE-WARNING)
==> NIL T)
((SUBTYPEP '(NOT SIMPLE-WARNING)
- '(NOT #<Standard-Class SIMPLE-WARNING 104415710>))
+ '(NOT #<Standard-Class SIMPLE-WARNING 104405710>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class SIMPLE-WARNING 104415710>)
+ '(NOT #<Standard-Class SIMPLE-WARNING 104405710>)
'(NOT SIMPLE-WARNING))
==> NIL T)
((SUBTYPEP 'PACKAGE-ERROR
@@ -29360,72 +29481,72 @@
'(NOT PACKAGE-ERROR))
==> NIL T)
((SUBTYPEP 'PARSE-ERROR
- #<Standard-Class PARSE-ERROR 75267500>)
+ #<Standard-Class PARSE-ERROR 76046540>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class PARSE-ERROR 75267500>
+ #<Standard-Class PARSE-ERROR 76046540>
'PARSE-ERROR)
==> NIL T)
((SUBTYPEP '(NOT PARSE-ERROR)
- '(NOT #<Standard-Class PARSE-ERROR 75267500>))
+ '(NOT #<Standard-Class PARSE-ERROR 76046540>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class PARSE-ERROR 75267500>)
+ '(NOT #<Standard-Class PARSE-ERROR 76046540>)
'(NOT PARSE-ERROR))
==> NIL T)
((SUBTYPEP 'WARNING
- #<Standard-Class WARNING 74624670>)
+ #<Standard-Class WARNING 74625000>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class WARNING 74624670> 'WARNING)
+ #<Standard-Class WARNING 74625000> 'WARNING)
==> NIL T)
((SUBTYPEP '(NOT WARNING)
- '(NOT #<Standard-Class WARNING 74624670>))
+ '(NOT #<Standard-Class WARNING 74625000>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class WARNING 74624670>)
+ '(NOT #<Standard-Class WARNING 74625000>)
'(NOT WARNING))
==> NIL T)
((SUBTYPEP 'STORAGE-CONDITION
- #<Standard-Class STORAGE-CONDITION 75214500>)
+ #<Standard-Class STORAGE-CONDITION 75214230>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class STORAGE-CONDITION 75214500>
+ #<Standard-Class STORAGE-CONDITION 75214230>
'STORAGE-CONDITION)
==> NIL T)
((SUBTYPEP '(NOT STORAGE-CONDITION)
- '(NOT #<Standard-Class STORAGE-CONDITION 75214500>))
+ '(NOT #<Standard-Class STORAGE-CONDITION 75214230>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class STORAGE-CONDITION 75214500>)
+ '(NOT #<Standard-Class STORAGE-CONDITION 75214230>)
'(NOT STORAGE-CONDITION))
==> NIL T)
((SUBTYPEP 'FLOATING-POINT-INVALID-OPERATION
- #<Standard-Class FLOATING-POINT-INVALID-OPERATION 104415140>)
+ #<Standard-Class FLOATING-POINT-INVALID-OPERATION 104403160>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class FLOATING-POINT-INVALID-OPERATION 104415140>
+ #<Standard-Class FLOATING-POINT-INVALID-OPERATION 104403160>
'FLOATING-POINT-INVALID-OPERATION)
==> NIL T)
((SUBTYPEP '(NOT FLOATING-POINT-INVALID-OPERATION)
- '(NOT #<Standard-Class FLOATING-POINT-INVALID-OPERATION 104415140>))
+ '(NOT #<Standard-Class FLOATING-POINT-INVALID-OPERATION 104403160>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class FLOATING-POINT-INVALID-OPERATION 104415140>)
+ '(NOT #<Standard-Class FLOATING-POINT-INVALID-OPERATION 104403160>)
'(NOT FLOATING-POINT-INVALID-OPERATION))
==> NIL T)
((SUBTYPEP 'PROGRAM-ERROR
- #<Standard-Class PROGRAM-ERROR 104472740>)
+ #<Standard-Class PROGRAM-ERROR 104462740>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class PROGRAM-ERROR 104472740>
+ #<Standard-Class PROGRAM-ERROR 104462740>
'PROGRAM-ERROR)
==> NIL T)
((SUBTYPEP '(NOT PROGRAM-ERROR)
- '(NOT #<Standard-Class PROGRAM-ERROR 104472740>))
+ '(NOT #<Standard-Class PROGRAM-ERROR 104462740>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class PROGRAM-ERROR 104472740>)
+ '(NOT #<Standard-Class PROGRAM-ERROR 104462740>)
'(NOT PROGRAM-ERROR))
==> NIL T)
((SUBTYPEP 'METHOD
@@ -29470,31 +29591,31 @@
'(NOT GENERIC-FUNCTION))
==> NIL T)
((SUBTYPEP 'STREAM-ERROR
- #<Standard-Class STREAM-ERROR 104474450>)
+ #<Standard-Class STREAM-ERROR 104464450>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class STREAM-ERROR 104474450>
+ #<Standard-Class STREAM-ERROR 104464450>
'STREAM-ERROR)
==> NIL T)
((SUBTYPEP '(NOT STREAM-ERROR)
- '(NOT #<Standard-Class STREAM-ERROR 104474450>))
+ '(NOT #<Standard-Class STREAM-ERROR 104464450>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class STREAM-ERROR 104474450>)
+ '(NOT #<Standard-Class STREAM-ERROR 104464450>)
'(NOT STREAM-ERROR))
==> NIL T)
((SUBTYPEP 'SERIOUS-CONDITION
- #<Standard-Class SERIOUS-CONDITION 75214120>)
+ #<Standard-Class SERIOUS-CONDITION 75213700>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class SERIOUS-CONDITION 75214120>
+ #<Standard-Class SERIOUS-CONDITION 75213700>
'SERIOUS-CONDITION)
==> NIL T)
((SUBTYPEP '(NOT SERIOUS-CONDITION)
- '(NOT #<Standard-Class SERIOUS-CONDITION 75214120>))
+ '(NOT #<Standard-Class SERIOUS-CONDITION 75213700>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class SERIOUS-CONDITION 75214120>)
+ '(NOT #<Standard-Class SERIOUS-CONDITION 75213700>)
'(NOT SERIOUS-CONDITION))
==> NIL T)
((SUBTYPEP 'READER-ERROR
@@ -29537,30 +29658,30 @@
'(NOT VECTOR))
==> NIL T)
((SUBTYPEP 'CONDITION
- #<Standard-Class CONDITION 75211560>)
+ #<Standard-Class CONDITION 75211340>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class CONDITION 75211560> 'CONDITION)
+ #<Standard-Class CONDITION 75211340> 'CONDITION)
==> NIL T)
((SUBTYPEP '(NOT CONDITION)
- '(NOT #<Standard-Class CONDITION 75211560>))
+ '(NOT #<Standard-Class CONDITION 75211340>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class CONDITION 75211560>)
+ '(NOT #<Standard-Class CONDITION 75211340>)
'(NOT CONDITION))
==> NIL T)
((SUBTYPEP 'UNBOUND-VARIABLE
- #<Standard-Class UNBOUND-VARIABLE 104473240>)
+ #<Standard-Class UNBOUND-VARIABLE 104463240>)
==> NIL T)
((SUBTYPEP
- #<Standard-Class UNBOUND-VARIABLE 104473240>
+ #<Standard-Class UNBOUND-VARIABLE 104463240>
'UNBOUND-VARIABLE)
==> NIL T)
((SUBTYPEP '(NOT UNBOUND-VARIABLE)
- '(NOT #<Standard-Class UNBOUND-VARIABLE 104473240>))
+ '(NOT #<Standard-Class UNBOUND-VARIABLE 104463240>))
==> NIL T)
((SUBTYPEP
- '(NOT #<Standard-Class UNBOUND-VARIABLE 104473240>)
+ '(NOT #<Standard-Class UNBOUND-VARIABLE 104463240>)
'(NOT UNBOUND-VARIABLE))
==> NIL T)).
Test ALL-STANDARD-CLASSES-ARE-SUBTYPES-OF-STANDARD-OBJECT failed
@@ -30267,92 +30388,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 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
+ 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
@@ -30719,7 +30755,11 @@
OPEN.IO.28A OPEN.IO.29 OPEN.IO.30 OPEN.IO.31 OPEN.IO.32 OPEN.IO.33
OPEN.IO.34 OPEN.IO.35 OPEN.PROBE.1 OPEN.PROBE.2 OPEN.PROBE.3
OPEN.PROBE.4 OPEN.PROBE.5 OPEN.PROBE.6 OPEN.PROBE.7 OPEN.PROBE.8
- OPEN.PROBE.9 OPEN.PROBE.10 OPEN.PROBE.11 RENAME-FILE.5 RENAME-FILE.6
+ OPEN.PROBE.9 OPEN.PROBE.10 OPEN.PROBE.11 OPEN.PROBE.12 OPEN.PROBE.13
+ OPEN.PROBE.14 OPEN.PROBE.15 OPEN.PROBE.16 OPEN.PROBE.17 OPEN.PROBE.18
+ OPEN.PROBE.19 OPEN.PROBE.20 OPEN.PROBE.21 OPEN.PROBE.22 OPEN.PROBE.23
+ OPEN.PROBE.24 OPEN.PROBE.25 OPEN.PROBE.26 OPEN.PROBE.27 OPEN.PROBE.28
+ OPEN.PROBE.29 OPEN.PROBE.30 OPEN.PROBE.31 OPEN.PROBE.32 OPEN.PROBE.33 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
@@ -30967,7 +31007,7 @@
OPEN.PROBE.14 OPEN.PROBE.15 OPEN.PROBE.16 OPEN.PROBE.17 OPEN.PROBE.18
OPEN.PROBE.19 OPEN.PROBE.20 OPEN.PROBE.21 OPEN.PROBE.22 OPEN.PROBE.23
OPEN.PROBE.24 OPEN.PROBE.25 OPEN.PROBE.26 OPEN.PROBE.27 OPEN.PROBE.28
- OPEN.PROBE.29 OPEN.PROBE.30 OPEN.PROBE.31 OPEN.PROBE.32 OPEN.PROBE.33
+ OPEN.PROBE.29 OPEN.PROBE.30
OPEN.PROBE.34 OPEN.PROBE.35 OPEN.PROBE.36 OPEN.ERROR.1 OPEN.ERROR.2
OPEN.ERROR.3 OPEN.ERROR.4 OPEN.ERROR.5 OPEN.ERROR.6 OPEN.ERROR.7
OPEN.ERROR.8 OPEN.ERROR.9 OPEN.ERROR.10 OPEN.ERROR.11 OPEN.ERROR.12
@@ -31367,14 +31407,7 @@
cat debian/in.gcl.emacsen-compat | sed 's,@EXT@,,g' >debian/gcl.emacsen-compat
cat debian/in.gcl.emacsen-install | sed 's,@EXT@,,g' >debian/gcl.emacsen-install
cat debian/in.gcl.emacsen-remove | sed 's,@EXT@,,g' >debian/gcl.emacsen-remove
-cat debian/in.gcl.emacsen-startup | sed 's,@EXT@,,g' >debian/gcl.emacsen-startup
-cat debian/in.gcl.install | sed 's,@EXT@,,g' >debian/gcl.install
-cat debian/in.gcl.manpages | sed 's,@EXT@,,g' >debian/gcl.manpages
- OPEN.PROBE.12 OPEN.PROBE.13
- OPEN.PROBE.14 OPEN.PROBE.15 OPEN.PROBE.16 OPEN.PROBE.17 OPEN.PROBE.18
- OPEN.PROBE.19 OPEN.PROBE.20 OPEN.PROBE.21 OPEN.PROBE.22 OPEN.PROBE.23
- OPEN.PROBE.24 OPEN.PROBE.25 OPEN.PROBE.26 OPEN.PROBE.27 OPEN.PROBE.28
- OPEN.PROBE.29 OPEN.PROBE.30 OPEN.PROBE.31 OPEN.PROBE.32 OPEN.PROBE.33
+ OPEN.PROBE.31 OPEN.PROBE.32 OPEN.PROBE.33
OPEN.PROBE.34 OPEN.PROBE.35 OPEN.PROBE.36 OPEN.ERROR.1 OPEN.ERROR.2
OPEN.ERROR.3 OPEN.ERROR.4 OPEN.ERROR.5 OPEN.ERROR.6 OPEN.ERROR.7
OPEN.ERROR.8 OPEN.ERROR.9 OPEN.ERROR.10 OPEN.ERROR.11 OPEN.ERROR.12
@@ -31757,7 +31790,10 @@
WITH-OUTPUT-TO-STRING.16, DIGIT-CHAR.ERROR.2, CODE-CHAR.ERROR.2.;; Finished loading "gclload.lsp"
T
->cat debian/in.gcl.postinst | sed 's,@EXT@,,g' >debian/gcl.postinst
+>cat debian/in.gcl.emacsen-startup | sed 's,@EXT@,,g' >debian/gcl.emacsen-startup
+cat debian/in.gcl.install | sed 's,@EXT@,,g' >debian/gcl.install
+cat debian/in.gcl.manpages | sed 's,@EXT@,,g' >debian/gcl.manpages
+cat debian/in.gcl.postinst | sed 's,@EXT@,,g' >debian/gcl.postinst
cat debian/in.gcl.postrm | sed 's,@EXT@,,g' >debian/gcl.postrm
dh_testdir
dh_testroot
@@ -31856,12 +31892,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/505186/tmp/hooks/B01_cleanup starting
+I: user script /srv/workspace/pbuilder/505186/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/849285 and its subdirectories
-I: Current time: Tue Apr 28 02:01:36 -12 2026
-I: pbuilder-time-stamp: 1777384896
+I: removing directory /srv/workspace/pbuilder/505186 and its subdirectories
+I: Current time: Wed Mar 26 22:05:57 +14 2025
+I: pbuilder-time-stamp: 1742976357