Mock Version: 1.4.21 Mock Version: 1.4.21 ENTER ['do_with_status'](['bash', '--login', '-c', '/usr/bin/rpmbuild -bs --target riscv64 --nodeps /builddir/build/SPECS/clisp.spec'], chrootPath='/var/lib/mock/f33-build-589421-66825/root'env={'TERM': 'vt100', 'SHELL': '/bin/bash', 'HOME': '/builddir', 'HOSTNAME': 'mock', 'PATH': '/usr/bin:/bin:/usr/sbin:/sbin', 'PROMPT_COMMAND': 'printf "\\033]0;\\007"', 'PS1': ' \\s-\\v\\$ ', 'LANG': 'en_US.UTF-8'}shell=Falselogger=timeout=432000uid=987gid=135user='mockbuild'nspawn_args=[]unshare_net=TrueprintOutput=False) Executing command: ['bash', '--login', '-c', '/usr/bin/rpmbuild -bs --target riscv64 --nodeps /builddir/build/SPECS/clisp.spec'] with env {'TERM': 'vt100', 'SHELL': '/bin/bash', 'HOME': '/builddir', 'HOSTNAME': 'mock', 'PATH': '/usr/bin:/bin:/usr/sbin:/sbin', 'PROMPT_COMMAND': 'printf "\\033]0;\\007"', 'PS1': ' \\s-\\v\\$ ', 'LANG': 'en_US.UTF-8'} and shell False Building target platforms: riscv64 Building for target riscv64 setting SOURCE_DATE_EPOCH=1604880000 Wrote: /builddir/build/SRPMS/clisp-2.49.93-15.a9aeb80git.fc33.src.rpm Child return code was: 0 ENTER ['do_with_status'](['bash', '--login', '-c', '/usr/bin/rpmbuild -bb --target riscv64 --nodeps /builddir/build/SPECS/clisp.spec'], chrootPath='/var/lib/mock/f33-build-589421-66825/root'env={'TERM': 'vt100', 'SHELL': '/bin/bash', 'HOME': '/builddir', 'HOSTNAME': 'mock', 'PATH': '/usr/bin:/bin:/usr/sbin:/sbin', 'PROMPT_COMMAND': 'printf "\\033]0;\\007"', 'PS1': ' \\s-\\v\\$ ', 'LANG': 'en_US.UTF-8'}shell=Falselogger=timeout=432000uid=987gid=135user='mockbuild'nspawn_args=[]unshare_net=TrueprintOutput=False) Executing command: ['bash', '--login', '-c', '/usr/bin/rpmbuild -bb --target riscv64 --nodeps /builddir/build/SPECS/clisp.spec'] with env {'TERM': 'vt100', 'SHELL': '/bin/bash', 'HOME': '/builddir', 'HOSTNAME': 'mock', 'PATH': '/usr/bin:/bin:/usr/sbin:/sbin', 'PROMPT_COMMAND': 'printf "\\033]0;\\007"', 'PS1': ' \\s-\\v\\$ ', 'LANG': 'en_US.UTF-8'} and shell False Building target platforms: riscv64 Building for target riscv64 setting SOURCE_DATE_EPOCH=1604880000 Executing(%prep): /bin/sh -e /var/tmp/rpm-tmp.DMgDRV + umask 022 + cd /builddir/build/BUILD + cd /builddir/build/BUILD + rm -rf clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749 + /usr/bin/gzip -dc /builddir/build/SOURCES/clisp-a9aeb80.tar.gz + /usr/bin/tar -xof - + STATUS=0 + '[' 0 -ne 0 ']' + cd clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749 + /usr/bin/chmod -Rf a+rX,u+w,g-w,o-w . + /usr/bin/cat /builddir/build/SOURCES/clisp-db.patch + /usr/bin/patch -p0 -s --fuzz=0 --no-backup-if-mismatch + /usr/bin/cat /builddir/build/SOURCES/clisp-format.patch + /usr/bin/patch -p0 -s --fuzz=0 --no-backup-if-mismatch + /usr/bin/cat /builddir/build/SOURCES/clisp-setkey.patch + /usr/bin/patch -p0 -s --fuzz=0 --no-backup-if-mismatch + /usr/bin/patch -p0 -s --fuzz=0 --no-backup-if-mismatch + /usr/bin/cat /builddir/build/SOURCES/clisp-pari.patch + /usr/bin/patch -p0 -s --fuzz=0 --no-backup-if-mismatch + /usr/bin/cat /builddir/build/SOURCES/clisp-register-volatile.patch + sed -i.orig 's|lisp.org/HyperSpec/Body/chap-7.html|lispworks.com/documentation/HyperSpec/Body/07_.htm|' src/clos-package.lisp + touch -r src/clos-package.lisp.orig src/clos-package.lisp + rm -f src/clos-package.lisp.orig + for f in src/_README.* + sed -i.orig 's|lisp.org/HyperSpec/FrontMatter|lispworks.com/documentation/HyperSpec/Front|' src/_README.de + touch -r src/_README.de.orig src/_README.de + rm -f src/_README.de.orig + for f in src/_README.* + sed -i.orig 's|lisp.org/HyperSpec/FrontMatter|lispworks.com/documentation/HyperSpec/Front|' src/_README.en + touch -r src/_README.en.orig src/_README.en + rm -f src/_README.en.orig + for f in src/_README.* + sed -i.orig 's|lisp.org/HyperSpec/FrontMatter|lispworks.com/documentation/HyperSpec/Front|' src/_README.es + touch -r src/_README.es.orig src/_README.es + rm -f src/_README.es.orig + cp -p src/build-aux/config.rpath config.rpath.orig + sed -i -e 's/${wl}-rpath ${wl}/-L/g' src/build-aux/config.rpath + sed -i 's/\(${GLLIB_A}\) \(${LIBS}\)/-Wl,--whole-archive \1 -Wl,--no-whole-archive \2 -ldl/' src/makemake.in + sed -i 's/;; \((setq \*browser\* .*)\)/\1/' src/cfgunix.lisp + tar -C modules/clx -xzf modules/clx/clx-manual.tar.gz + chmod -R go+r modules/clx/clx-manual + chmod a-x modules/clx/clx-manual/html/doc-index.cgi + cp -p /builddir/build/SOURCES/sv.po /builddir/build/SOURCES/de.po src/po + sed -i s/9090/9096/g tests/socket.tst + RPM_EC=0 ++ jobs -p + exit 0 Executing(%build): /bin/sh -e /var/tmp/rpm-tmp.zk4K9X + umask 022 + cd /builddir/build/BUILD + cd clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749 + ulimit -s unlimited + export LC_ALL=C.UTF-8 + LC_ALL=C.UTF-8 + ./configure --prefix=/usr --libdir=/usr/lib64 --mandir=/usr/share/man --infodir=/usr/share/info --docdir=/usr/share/doc/clisp --fsstnd=redhat --hyperspec=http://www.lispworks.com/documentation/HyperSpec/ --with-module=asdf --with-module=berkeley-db --with-module=bindings/glibc --with-module=clx/new-clx --with-module=dbus --with-module=fastcgi --with-module=gdbm --with-module=gtk2 --with-module=libsvm --with-module=pari --with-module=pcre --with-module=postgresql --with-module=rawsock --with-module=zlib --with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline --with-ffcall --cbcx build CPPFLAGS=-I/usr/include/libsvm 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' executing ../src/configure --prefix=/usr --libdir=/usr/lib64 --mandir=/usr/share/man --infodir=/usr/share/info --docdir=/usr/share/doc/clisp --fsstnd=redhat --hyperspec=http://www.lispworks.com/documentation/HyperSpec/ --with-module=asdf --with-module=berkeley-db --with-module=bindings/glibc --with-module=clx/new-clx --with-module=dbus --with-module=fastcgi --with-module=gdbm --with-module=gtk2 --with-module=libsvm --with-module=pari --with-module=pcre --with-module=postgresql --with-module=rawsock --with-module=zlib --with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline --with-ffcall --cbcx build CPPFLAGS=-I/usr/include/libsvm CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack configure: creating cache config.cache checking for a BSD-compatible install... /usr/bin/install -c checking whether build environment is sane... yes checking for a thread-safe mkdir -p... /usr/bin/mkdir -p checking for gawk... gawk checking whether make sets $(MAKE)... yes checking whether make supports nested variables... yes configure: ** check for host type checking build system type... riscv64-unknown-linux-gnu checking host system type... riscv64-unknown-linux-gnu checking how to remove colons from paths... echo $x configure: ** checks for programs checking for gcc... gcc checking whether the C compiler works... yes checking for C compiler default output file name... a.out checking for suffix of executables... checking whether we are cross compiling... no checking for suffix of object files... o checking whether we are using the GNU C compiler... yes checking whether gcc accepts -g... yes checking for gcc option to accept ISO C89... none needed checking whether gcc understands -c and -o together... yes checking whether make supports the include directive... yes (GNU style) checking dependency style of gcc... gcc3 checking how to run the C preprocessor... gcc -E checking for windres... no checking for grep that handles long lines and -e... /usr/bin/grep checking for egrep... /usr/bin/grep -E checking for ANSI C header files... yes checking for sys/types.h... yes checking for sys/stat.h... yes checking for stdlib.h... yes checking for string.h... yes checking for memory.h... yes checking for strings.h... yes checking for inttypes.h... yes checking for stdint.h... yes checking for unistd.h... yes checking minix/config.h usability... no checking minix/config.h presence... no checking for minix/config.h... no checking whether it is safe to define __EXTENSIONS__... yes checking whether _XOPEN_SOURCE should be defined... no checking for Minix Amsterdam compiler... no checking for ar... ar checking for ranlib... ranlib checking for special C compiler options needed for large files... no checking for _FILE_OFFSET_BITS value needed for large files... no checking for ld used by gcc... /usr/bin/ld checking if the linker (/usr/bin/ld) is GNU ld... yes checking whether make sets $(MAKE)... (cached) yes checking how to make hard links... ln checking whether ln -s works... yes checking how to make hard links to symlinks... hln checking how to print strings... printf checking for a sed that does not truncate output... /usr/bin/sed checking for fgrep... /usr/bin/grep -F checking for ld used by gcc... /usr/bin/ld checking if the linker (/usr/bin/ld) is GNU ld... yes checking for BSD- or MS-compatible name lister (nm)... /usr/bin/nm -B checking the name lister (/usr/bin/nm -B) interface... BSD nm checking whether ln -s works... yes checking the maximum length of command line arguments... 3458764513820540925 checking how to convert riscv64-unknown-linux-gnu file names to riscv64-unknown-linux-gnu format... func_convert_file_noop checking how to convert riscv64-unknown-linux-gnu file names to toolchain format... func_convert_file_noop checking for /usr/bin/ld option to reload object files... -r checking for objdump... objdump checking how to recognize dependent libraries... pass_all checking for dlltool... dlltool checking how to associate runtime and link libraries... printf %s\n checking for archiver @FILE support... @ checking for strip... strip checking for ranlib... (cached) ranlib checking command to parse /usr/bin/nm -B output from gcc object... ok checking for sysroot... no checking for a working dd... /usr/bin/dd checking how to truncate binary pipes... /usr/bin/dd bs=4096 count=1 checking for mt... no checking if : is a manifest tool... no checking for dlfcn.h... yes checking for objdir... .libs checking if gcc supports -fno-rtti -fno-exceptions... no checking for gcc option to produce PIC... -fPIC -DPIC checking if gcc PIC flag -fPIC -DPIC works... yes checking if gcc static flag -static works... no checking if gcc supports -c -o file.o... yes checking if gcc supports -c -o file.o... (cached) yes checking whether the gcc linker (/usr/bin/ld) supports shared libraries... yes checking whether -lc should be explicitly linked in... no checking dynamic linker characteristics... GNU/Linux ld.so checking how to hardcode library paths into programs... immediate checking whether stripping libraries is possible... yes checking if libtool supports shared libraries... yes checking whether to build shared libraries... yes checking whether to build static libraries... yes checking for groff... groff checking for ps2pdf... ps2pdf checking for gzip... gzip configure: ** checks for system features checking for special C compiler options needed for large files... (cached) no checking for _FILE_OFFSET_BITS value needed for large files... (cached) no checking whether using GNU C... yes checking whether using SUNPRO C... no checking whether using C++... no checking whether CPP likes empty macro arguments... yes checking whether C symbols are prefixed with underscore at the linker level... no checking whether CC works at all... yes configure: ** check for add-ons checking for sys/socket.h... yes checking for arpa/inet.h... yes checking for features.h... yes checking for unistd.h... (cached) yes checking for wctype.h... yes checking for sys/param.h... yes checking for netdb.h... yes checking for sys/time.h... yes checking for netinet/in.h... yes checking for langinfo.h... yes checking for limits.h... yes checking for xlocale.h... no checking for sys/mman.h... yes checking for malloc.h... yes checking for sys/select.h... yes checking for sys/stat.h... (cached) yes checking for wchar.h... yes checking for stdint.h... (cached) yes checking for strings.h... (cached) yes checking for sys/ioctl.h... yes checking for sys/uio.h... yes checking for sys/utsname.h... yes checking for sys/wait.h... yes checking for crtdefs.h... no checking whether the preprocessor supports include_next... yes checking whether system header files limit the line length... no checking whether is self-contained... yes checking for shutdown... yes checking whether defines the SHUT_* macros... yes checking for struct sockaddr_storage... yes checking for sa_family_t... yes checking for struct sockaddr_storage.ss_family... yes checking whether socket is declared without a macro... yes checking whether connect is declared without a macro... yes checking whether accept is declared without a macro... yes checking whether bind is declared without a macro... yes checking whether getpeername is declared without a macro... yes checking whether getsockname is declared without a macro... yes checking whether getsockopt is declared without a macro... yes checking whether listen is declared without a macro... yes checking whether recv is declared without a macro... yes checking whether send is declared without a macro... yes checking whether recvfrom is declared without a macro... yes checking whether sendto is declared without a macro... yes checking whether setsockopt is declared without a macro... yes checking whether shutdown is declared without a macro... yes checking whether accept4 is declared without a macro... yes checking for size_t... yes checking for working alloca.h... yes checking for alloca... yes checking whether uses 'inline' correctly... yes checking for btowc... yes checking for _set_invalid_parameter_handler... no checking for symlink... yes checking for isblank... yes checking for iswctype... yes checking for mbsrtowcs... yes checking for mempcpy... yes checking for wmemchr... yes checking for wmemcpy... yes checking for wmempcpy... yes checking for gettimeofday... yes checking for readlink... yes checking for lstat... yes checking for mbsinit... yes checking for mbrtowc... yes checking for mprotect... yes checking for mkfifo... yes checking for mknod... yes checking for mkstemp... yes checking for tzset... yes checking for nl_langinfo... yes checking for setenv... yes checking for strdup... yes checking for strerror_r... yes checking for __xpg_strerror_r... yes checking for catgets... yes checking for snprintf... yes checking for strptime... yes checking for localtime_r... yes checking for timegm... yes checking for mquery... no checking for pstat_getprocvm... no checking for wcrtomb... yes checking for iswcntrl... yes checking for nl_langinfo and CODESET... yes checking for a traditional french locale... fr_FR checking whether byte ordering is bigendian... no checking if environ is properly declared... yes checking for complete errno.h... yes checking for working fcntl.h... yes checking for pid_t... yes checking for mode_t... yes checking for mbstate_t... yes checking for C/C++ restrict keyword... __restrict checking for struct timeval... yes checking for wide-enough struct timeval.tv_sec member... yes checking whether gettimeofday is declared without a macro... yes checking host CPU and C ABI... riscv64-lp64d checking for shared library run path origin... done checking for the common suffixes of directories in the library search path... ../src/configure: line 15116: cd: /lib64/lp64d/../lib64/lp64d/: No such file or directory ../src/configure: line 15116: cd: /usr/lib64/lp64d/../lib64/lp64d/: No such file or directory lib,lib checking for iconv... yes checking for working iconv... yes checking for iconv declaration... extern size_t iconv (iconv_t cd, char * *inbuf, size_t *inbytesleft, char * *outbuf, size_t *outbytesleft); checking for IPv4 sockets... yes checking for IPv6 sockets... yes checking whether included libunistring is requested... no checking for libunistring... yes checking how to link with libunistring... /usr/lib64/libunistring.so -L/usr/lib64 checking for libunistring version... 0.9.10 checking whether limits.h has ULLONG_WIDTH etc.... yes checking whether getc_unlocked is declared... yes checking whether we are using the GNU C Library >= 2.1 or uClibc... yes checking for wchar_t... yes checking for max_align_t... yes checking whether NULL can be used in arbitrary expressions... yes checking whether imported symbols can be declared weak... yes checking pthread.h usability... yes checking pthread.h presence... yes checking for pthread.h... yes checking for multithread API to use... posix checking whether lstat correctly handles trailing slash... yes checking whether malloc, realloc, calloc are POSIX compliant... yes checking for stdlib.h... (cached) yes checking for GNU libc compatible malloc... yes checking for unsigned long long int... yes checking for long long int... yes checking for a traditional japanese locale... ja_JP checking for a transitional chinese locale... zh_CN.GB18030 checking for a french Unicode locale... fr_FR.UTF-8 checking for mmap... yes checking for MAP_ANONYMOUS... yes checking whether memchr works... yes checking whether time_t is signed... yes checking whether alarm is declared... yes checking for working mktime... yes checking whether struct tm is in sys/time.h or time.h... time.h checking for struct tm.tm_zone... yes checking for struct tm.tm_gmtoff... yes checking for inline... inline checking whether is self-contained... yes checking whether pselect is declared without a macro... yes checking whether select is declared without a macro... yes checking for library containing setsockopt... none needed checking whether setenv is declared... yes checking search.h usability... yes checking search.h presence... yes checking for search.h... yes checking for tsearch... yes checking for sigset_t... yes checking for uid_t in sys/types.h... yes checking whether stat file-mode macros are broken... no checking for nlink_t... yes checking whether fchmodat is declared without a macro... yes checking whether fstat is declared without a macro... yes checking whether fstatat is declared without a macro... yes checking whether futimens is declared without a macro... yes checking whether lchmod is declared without a macro... yes checking whether lstat is declared without a macro... yes checking whether mkdirat is declared without a macro... yes checking whether mkfifo is declared without a macro... yes checking whether mkfifoat is declared without a macro... yes checking whether mknod is declared without a macro... yes checking whether mknodat is declared without a macro... yes checking whether stat is declared without a macro... yes checking whether utimensat is declared without a macro... yes checking for stdbool.h that conforms to C99... yes checking for _Bool... yes checking for wint_t... yes checking whether wint_t is too small... no checking whether stdint.h conforms to C99... yes checking whether stdint.h predates C++11... no checking whether stdint.h has UINTMAX_WIDTH etc.... yes checking whether strdup is declared... yes checking whether strerror(0) succeeds... yes checking for strerror_r with POSIX signature... no checking whether __xpg_strerror_r works... yes checking whether strerror_r is declared... yes checking whether ffsl is declared without a macro... yes checking whether ffsll is declared without a macro... yes checking whether memmem is declared without a macro... yes checking whether mempcpy is declared without a macro... yes checking whether memrchr is declared without a macro... yes checking whether rawmemchr is declared without a macro... yes checking whether stpcpy is declared without a macro... yes checking whether stpncpy is declared without a macro... yes checking whether strchrnul is declared without a macro... yes checking whether strdup is declared without a macro... yes checking whether strncat is declared without a macro... yes checking whether strndup is declared without a macro... yes checking whether strnlen is declared without a macro... yes checking whether strpbrk is declared without a macro... yes checking whether strsep is declared without a macro... yes checking whether strcasestr is declared without a macro... yes checking whether strtok_r is declared without a macro... yes checking whether strerror_r is declared without a macro... yes checking whether strsignal is declared without a macro... yes checking whether strverscmp is declared without a macro... yes checking whether ffs is declared without a macro... yes checking whether strcasecmp is declared without a macro... yes checking whether strncasecmp is declared without a macro... yes checking for struct timespec in ... yes checking whether unsetenv is declared... yes checking for alloca as a compiler built-in... yes checking whether inet_ntop is declared without a macro... yes checking whether inet_pton is declared without a macro... yes checking whether btowc(0) is correct... yes checking whether btowc(EOF) is correct... yes checking for __builtin_expect... yes checking for strtod_l... yes checking whether dup2 works... yes checking whether fcntl is declared without a macro... yes checking whether openat is declared without a macro... yes checking for flexible array member... yes checking for working GNU fnmatch... yes checking for gethostname... yes checking for HOST_NAME_MAX... yes checking for getloadavg... yes checking sys/loadavg.h usability... no checking sys/loadavg.h presence... no checking for sys/loadavg.h... no checking whether getloadavg is declared... yes checking for getpagesize... yes checking whether getpagesize is declared... yes checking whether gettimeofday clobbers localtime buffer... no checking for gettimeofday with POSIX signature... yes checking for library containing inet_ntop... none required checking whether inet_ntop is declared... (cached) yes checking for library containing inet_pton... none required checking whether inet_pton is declared... (cached) yes checking for ioctl... yes checking for ioctl with POSIX signature... no checking whether langinfo.h defines CODESET... yes checking whether langinfo.h defines T_FMT_AMPM... yes checking whether langinfo.h defines ALTMON_1... yes checking whether langinfo.h defines ERA... yes checking whether langinfo.h defines YESEXPR... yes checking whether nl_langinfo is declared without a macro... yes checking for libsigsegv... yes checking how to link with libsigsegv... -lsigsegv checking whether to use the included libunistring... no checking for __xpg4... no checking whether link(2) dereferences a symlink... no checking whether locale.h conforms to POSIX:2001... yes checking whether struct lconv is properly defined... yes checking whether setlocale is declared without a macro... yes checking whether duplocale is declared without a macro... yes checking for pthread_rwlock_t... yes checking whether pthread_rwlock_rdlock prefers a writer to a reader... no checking whether mbrtowc handles incomplete characters... yes checking whether mbrtowc works as well as mbtowc... yes checking whether mbrtowc handles a NULL pwc argument... yes checking whether mbrtowc handles a NULL string argument... yes checking whether mbrtowc has a correct return value... yes checking whether mbrtowc returns 0 when parsing a NUL character... yes checking whether mbrtowc works on empty input... yes checking whether the C locale is free of encoding errors... no checking whether mbrtowc handles incomplete characters... (cached) yes checking whether mbrtowc works as well as mbtowc... (cached) yes checking whether mbrtowc handles incomplete characters... (cached) yes checking whether mbrtowc works as well as mbtowc... (cached) yes checking whether mbsrtowcs works... yes checking for mkdtemp... yes checking whether mkfifo rejects trailing slashes... yes checking whether mknod can create fifo without root privileges... yes checking for working mkstemp... yes checking for __mktime_internal... no checking whether is self-contained... yes checking whether YESEXPR works... yes checking whether readlink signature is correct... yes checking whether readlink handles trailing slash correctly... yes checking for working re_compile_pattern... yes checking whether select supports a 0 argument... yes checking whether select detects invalid fds... yes checking whether setenv validates arguments... yes checking for volatile sig_atomic_t... yes checking for sighandler_t... yes checking whether pthread_sigmask is declared without a macro... yes checking whether sigaction is declared without a macro... yes checking whether sigaddset is declared without a macro... yes checking whether sigdelset is declared without a macro... yes checking whether sigemptyset is declared without a macro... yes checking whether sigfillset is declared without a macro... yes checking whether sigismember is declared without a macro... yes checking whether sigpending is declared without a macro... yes checking whether sigprocmask is declared without a macro... yes checking for socklen_t... yes checking for ssize_t... yes checking whether stat handles trailing slashes on files... yes checking for struct stat.st_atim.tv_nsec... yes checking whether struct stat.st_atim is of type struct timespec... yes checking for struct stat.st_birthtimespec.tv_nsec... no checking for struct stat.st_birthtimensec... no checking for struct stat.st_birthtim.tv_nsec... no checking for working stdalign.h... yes checking for max_align_t... (cached) yes checking whether NULL can be used in arbitrary expressions... (cached) yes checking whether _Exit is declared without a macro... yes checking whether atoll is declared without a macro... yes checking whether canonicalize_file_name is declared without a macro... yes checking whether getloadavg is declared without a macro... yes checking whether getsubopt is declared without a macro... yes checking whether grantpt is declared without a macro... yes checking whether initstate is declared without a macro... yes checking whether initstate_r is declared without a macro... yes checking whether mkdtemp is declared without a macro... yes checking whether mkostemp is declared without a macro... yes checking whether mkostemps is declared without a macro... yes checking whether mkstemp is declared without a macro... yes checking whether mkstemps is declared without a macro... yes checking whether posix_openpt is declared without a macro... yes checking whether ptsname is declared without a macro... yes checking whether ptsname_r is declared without a macro... yes checking whether qsort_r is declared without a macro... yes checking whether random is declared without a macro... yes checking whether random_r is declared without a macro... yes checking whether reallocarray is declared without a macro... yes checking whether realpath is declared without a macro... yes checking whether rpmatch is declared without a macro... yes checking whether secure_getenv is declared without a macro... yes checking whether setenv is declared without a macro... yes checking whether setstate is declared without a macro... yes checking whether setstate_r is declared without a macro... yes checking whether srandom is declared without a macro... yes checking whether srandom_r is declared without a macro... yes checking whether strtod is declared without a macro... yes checking whether strtoll is declared without a macro... yes checking whether strtoull is declared without a macro... yes checking whether unlockpt is declared without a macro... yes checking whether unsetenv is declared without a macro... yes checking for strcasecmp... yes checking for strncasecmp... yes checking whether strncasecmp is declared... (cached) yes checking for strverscmp... yes checking whether declares ioctl... yes checking whether ioctl is declared without a macro... yes checking for nlink_t... (cached) yes checking whether fchmodat is declared without a macro... (cached) yes checking whether fstat is declared without a macro... (cached) yes checking whether fstatat is declared without a macro... (cached) yes checking whether futimens is declared without a macro... (cached) yes checking whether lchmod is declared without a macro... (cached) yes checking whether lstat is declared without a macro... (cached) yes checking whether mkdirat is declared without a macro... (cached) yes checking whether mkfifo is declared without a macro... (cached) yes checking whether mkfifoat is declared without a macro... (cached) yes checking whether mknod is declared without a macro... (cached) yes checking whether mknodat is declared without a macro... (cached) yes checking whether stat is declared without a macro... (cached) yes checking whether utimensat is declared without a macro... (cached) yes checking for struct utsname... yes checking whether uname is declared without a macro... yes checking whether waitpid is declared without a macro... yes checking whether localtime_r is declared... yes checking whether localtime_r is compatible with its POSIX signature... yes checking whether localtime loops forever near extrema... no checking for timezone_t... no checking whether tzset clobbers localtime buffer... no checking for uname... yes checking whether chdir is declared without a macro... yes checking whether chown is declared without a macro... yes checking whether dup is declared without a macro... yes checking whether dup2 is declared without a macro... yes checking whether dup3 is declared without a macro... yes checking whether environ is declared without a macro... yes checking whether euidaccess is declared without a macro... yes checking whether faccessat is declared without a macro... yes checking whether fchdir is declared without a macro... yes checking whether fchownat is declared without a macro... yes checking whether fdatasync is declared without a macro... yes checking whether fsync is declared without a macro... yes checking whether ftruncate is declared without a macro... yes checking whether getcwd is declared without a macro... yes checking whether getdomainname is declared without a macro... yes checking whether getdtablesize is declared without a macro... yes checking whether getgroups is declared without a macro... yes checking whether gethostname is declared without a macro... yes checking whether getlogin is declared without a macro... yes checking whether getlogin_r is declared without a macro... yes checking whether getpagesize is declared without a macro... yes checking whether getusershell is declared without a macro... yes checking whether setusershell is declared without a macro... yes checking whether endusershell is declared without a macro... yes checking whether group_member is declared without a macro... yes checking whether isatty is declared without a macro... yes checking whether lchown is declared without a macro... yes checking whether link is declared without a macro... yes checking whether linkat is declared without a macro... yes checking whether lseek is declared without a macro... yes checking whether pipe is declared without a macro... yes checking whether pipe2 is declared without a macro... yes checking whether pread is declared without a macro... yes checking whether pwrite is declared without a macro... yes checking whether readlink is declared without a macro... yes checking whether readlinkat is declared without a macro... yes checking whether rmdir is declared without a macro... yes checking whether sethostname is declared without a macro... yes checking whether sleep is declared without a macro... yes checking whether symlink is declared without a macro... yes checking whether symlinkat is declared without a macro... yes checking whether truncate is declared without a macro... yes checking whether ttyname_r is declared without a macro... yes checking whether unlink is declared without a macro... yes checking whether unlinkat is declared without a macro... yes checking whether usleep is declared without a macro... yes checking for unsetenv... yes checking for unsetenv() return type... int checking whether unsetenv obeys POSIX... yes checking for mmap... (cached) yes checking for MAP_ANONYMOUS... yes checking whether btowc is declared without a macro... yes checking whether wctob is declared without a macro... yes checking whether mbsinit is declared without a macro... yes checking whether mbrtowc is declared without a macro... yes checking whether mbrlen is declared without a macro... yes checking whether mbsrtowcs is declared without a macro... yes checking whether mbsnrtowcs is declared without a macro... yes checking whether wcrtomb is declared without a macro... yes checking whether wcsrtombs is declared without a macro... yes checking whether wcsnrtombs is declared without a macro... yes checking whether wcwidth is declared without a macro... yes checking whether wmemchr is declared without a macro... yes checking whether wmemcmp is declared without a macro... yes checking whether wmemcpy is declared without a macro... yes checking whether wmemmove is declared without a macro... yes checking whether wmemset is declared without a macro... yes checking whether wcslen is declared without a macro... yes checking whether wcsnlen is declared without a macro... yes checking whether wcscpy is declared without a macro... yes checking whether wcpcpy is declared without a macro... yes checking whether wcsncpy is declared without a macro... yes checking whether wcpncpy is declared without a macro... yes checking whether wcscat is declared without a macro... yes checking whether wcsncat is declared without a macro... yes checking whether wcscmp is declared without a macro... yes checking whether wcsncmp is declared without a macro... yes checking whether wcscasecmp is declared without a macro... yes checking whether wcsncasecmp is declared without a macro... yes checking whether wcscoll is declared without a macro... yes checking whether wcsxfrm is declared without a macro... yes checking whether wcsdup is declared without a macro... yes checking whether wcschr is declared without a macro... yes checking whether wcsrchr is declared without a macro... yes checking whether wcscspn is declared without a macro... yes checking whether wcsspn is declared without a macro... yes checking whether wcspbrk is declared without a macro... yes checking whether wcsstr is declared without a macro... yes checking whether wcstok is declared without a macro... yes checking whether wcswidth is declared without a macro... yes checking whether wcsftime is declared without a macro... yes checking whether mbrtowc handles incomplete characters... (cached) yes checking whether mbrtowc works as well as mbtowc... (cached) yes checking whether wcrtomb return value is correct... yes checking whether iswcntrl works... yes checking for towlower... yes checking for wctype_t... yes checking for wctrans_t... yes checking whether wctype is declared without a macro... yes checking whether iswctype is declared without a macro... yes checking whether wctrans is declared without a macro... yes checking whether towctrans is declared without a macro... yes checking whether NLS is requested... yes checking for msgfmt... /usr/bin/msgfmt checking for gmsgfmt... /usr/bin/msgfmt checking for xgettext... /usr/bin/xgettext checking for msgmerge... /usr/bin/msgmerge checking for CFPreferencesCopyAppValue... no checking for CFLocaleCopyCurrent... no checking for GNU gettext in libc... yes checking whether to use NLS... yes checking where the gettext function comes from... libc checking how to link with libffcall... -lffcall checking avcall.h usability... yes checking avcall.h presence... yes checking for avcall.h... yes checking callback.h usability... yes checking callback.h presence... yes checking for callback.h... yes checking for library containing ffcall_get_version... none required checking whether libffcall is installed... yes checking lightning.h usability... no checking lightning.h presence... no checking for lightning.h... no configure: ** checks for fundamental compiler characteristics checking for inline... (cached) inline checking for inline __builtin_strlen... no checking for long long int... (cached) yes configure: ** checks for header files checking termios.h usability... yes checking termios.h presence... yes checking for termios.h... yes checking for struct winsize in termios.h... no checking for struct winsize in sys/ioctl.h... yes checking for X... libraries , headers checking for gethostbyname... yes checking for connect... yes checking for remove... yes checking for shmat... yes checking for IceConnectionNumber in -lICE... yes configure: ** checks for typedefs checking size of off_t... 8 checking size of struct timeval... 16 configure: ** checks for structure members checking for struct dirent.d_namlen... no configure: ** checks for functions and declarations checking for working alloca.h... (cached) yes checking for alloca... (cached) yes checking for _setjmp... yes checking for _longjmp... yes checking whether signal handlers need to be reinstalled... no checking whether signals are blocked when signal handlers are entered... yes checking whether other signals are blocked when signal handlers are entered... no checking for sigaction... yes checking for siginterrupt... yes checking for strerror... yes checking for sysconf... yes checking for getdtablesize... yes checking for memset... yes checking for setsid... yes checking for setpgid... yes checking for fchmod... yes checking for fsync... yes checking for flock... yes checking for gethostent... yes checking for shutdown... (cached) yes checking for usleep... yes checking for ualarm... yes checking for setitimer... yes checking for nice... yes checking for ftime... yes checking for realpath... yes checking for getresuid... yes checking for setresuid... yes checking for getresgid... yes checking for setresgid... yes checking for setreuid... yes checking for setregid... yes checking for gethostname... (cached) yes checking for getcwd... yes checking for getrlimit... yes checking for uname... (cached) yes checking for readdir_r... yes checking for rand_r... yes checking vfork.h usability... no checking vfork.h presence... no checking for vfork.h... no checking for fork... yes checking for vfork... yes checking for working fork... yes checking for working vfork... (cached) yes checking sys/resource.h usability... yes checking sys/resource.h presence... yes checking for sys/resource.h... yes checking for getrusage... yes checking whether getrusage works... yes checking for ioctl... (cached) yes checking for FIONREAD... no checking for FIONREAD in sys/filio.h... no checking for FIONREAD in sys/ioctl.h... yes checking for reliable FIONREAD... yes checking for poll... yes checking for reliable poll()... yes checking for select... yes checking for sys/select.h... yes checking for select declaration... extern int select (int, fd_set *, fd_set *, fd_set *, struct timeval *); checking for reliable select()... yes checking for netdb.h... (cached) yes checking sys/un.h usability... yes checking sys/un.h presence... yes checking for sys/un.h... yes checking for sun_len in struct sockaddr_un... no checking for IPv4 sockets... yes checking for IPv6 sockets... yes checking for setsockopt... yes checking for getsockopt... yes checking for netinet/tcp.h... yes checking for setsockopt declaration... extern int setsockopt (int, int, int, const void*, unsigned int); checking for the code address range... 0x0000000000000000 checking for the malloc address range... 0x000000001E000000 checking for the shared library address range... 0x000000157B000000 checking for the stack address range... 0x0000003FFF000000 checking for usable vadvise... no checking for vm_allocate... no checking for sys/mman.h... (cached) yes checking for mmap... (cached) yes checking for mmap at fixed addresses... yes (MAP_ANON,MAP_ANONYMOUS,/dev/zero) checking for highest bit number which can be included in mmaped addresses... 37 checking for mincore... yes checking for munmap... yes checking for mprotect... (cached) yes checking for working mprotect... yes checking for dlfcn.h... (cached) yes checking for library containing dlopen... -ldl checking for dlopen... yes checking for dlsym... yes checking for dlvsym... yes checking for dlerror... yes checking for dlclose... yes checking for dladdr... yes checking for working fcntl.h... (cached) yes configure: ** checks for libraries checking for library containing tgetent... -lncurses checking readline/readline.h usability... yes checking readline/readline.h presence... yes checking for readline/readline.h... yes checking for readline... yes checking for rl_filename_completion_function... yes checking for filename_completion_function declaration... extern char* rl_filename_completion_function(const char*, int); checking whether rl_already_prompted is declared... yes checking whether rl_readline_name is declared... yes checking whether rl_gnu_readline_p is declared... yes checking whether rl_deprep_term_function is declared... yes checking for readline 4.1 or newer... found GNU readline 4.1 or newer configure: ** checks for OS services checking for the valid characters in filenames... ((ch >= 1) && (ch != 47)) configure: ** checks for compiler characteristics (arithmetic data types) checking whether char is unsigned... yes checking whether single-float divbyzero raises an exception... no checking whether single-float overflow raises an exception... no checking whether single-float underflow raises an exception... no checking whether single-float inexact raises an exception... no checking whether double-float divbyzero raises an exception... no checking whether double-float overflow raises an exception... no checking whether double-float underflow raises an exception... no checking whether double-float inexact raises an exception... no checking for integer types and behaviour... created intparam.h checking for floating-point types and behaviour... created floatparam.h configure: ** output file generation configure: updating cache config.cache checking that generated files are newer than configure... done configure: creating ./config.status config.status: creating po/Makefile.in config.status: creating gllib/Makefile config.status: creating makemake config.status: creating config.h config.status: executing depfiles commands config.status: executing libtool commands config.status: executing po-directories commands config.status: creating po/POTFILES config.status: creating po/Makefile ===> /bin/sh ../src/configure --disable-option-checking --prefix=/usr --libdir=/usr/lib64 --mandir=/usr/share/man --infodir=/usr/share/info --docdir=/usr/share/doc/clisp --with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline --with-ffcall --with-libsigsegv-prefix=/usr --with-libffcall-prefix=/usr --cache-file=config.cache SUCCEEDED Configure findings: FFI: yes (user requested: yes) readline: yes (user requested: default) libsigsegv: yes ./makemake --with-dynamic-ffi --prefix=/usr --libdir=/usr/lib64 --mandir=/usr/share/man --infodir=/usr/share/info --docdir=/usr/share/doc/clisp --fsstnd=redhat --hyperspec=http://www.lispworks.com/documentation/HyperSpec/ --with-module=asdf --with-module=berkeley-db --with-module=bindings/glibc --with-module=clx/new-clx --with-module=dbus --with-module=fastcgi --with-module=gdbm --with-module=gtk2 --with-module=libsvm --with-module=pari --with-module=pcre --with-module=postgresql --with-module=rawsock --with-module=zlib --with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline > Makefile cp -p ../src/cfgunix.lisp config.lisp chmod +w config.lisp echo '(setq *clhs-root-default* "http://www.lispworks.com/documentation/HyperSpec/")' >> config.lisp ln -s ../src/.gdbinit .gdbinit rm -f build-aux ln -s ../src/build-aux build-aux mkdir -p gllib test -f gllib/Makefile || sh config.status gllib/Makefile depfiles cd gllib && make CFLAGS="-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC " top_srcdir="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src" make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib' rm -f alloca.h-t alloca.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \ cat ../../src/gllib/alloca.in.h; \ } > alloca.h-t && \ mv -f alloca.h-t alloca.h /usr/bin/mkdir -p arpa rm -f arpa/inet.h-t arpa/inet.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''HAVE_FEATURES_H''@|1|g' \ -e 's|@''NEXT_ARPA_INET_H''@||g' \ -e 's|@''HAVE_ARPA_INET_H''@|1|g' \ -e 's/@''GNULIB_INET_NTOP''@/1/g' \ -e 's/@''GNULIB_INET_PTON''@/1/g' \ -e 's|@''HAVE_DECL_INET_NTOP''@|1|g' \ -e 's|@''HAVE_DECL_INET_PTON''@|1|g' \ -e 's|@''REPLACE_INET_NTOP''@|0|g' \ -e 's|@''REPLACE_INET_PTON''@|0|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r ../../src/gllib/c++defs.h' \ -e '/definition of _GL_ARG_NONNULL/r ../../src/gllib/arg-nonnull.h' \ -e '/definition of _GL_WARN_ON_USE/r ../../src/gllib/warn-on-use.h' \ < ../../src/gllib/arpa_inet.in.h; \ } > arpa/inet.h-t && \ mv arpa/inet.h-t arpa/inet.h rm -f configmake.h-t && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \ echo '#define PREFIX "/usr"'; \ echo '#define EXEC_PREFIX "/usr"'; \ echo '#define BINDIR "/usr/bin"'; \ echo '#define SBINDIR "/usr/sbin"'; \ echo '#define LIBEXECDIR "/usr/libexec"'; \ echo '#define DATAROOTDIR "/usr/share"'; \ echo '#define DATADIR "/usr/share"'; \ echo '#define SYSCONFDIR "/usr/etc"'; \ echo '#define SHAREDSTATEDIR "/usr/com"'; \ echo '#define LOCALSTATEDIR "/usr/var"'; \ echo '#define RUNSTATEDIR "/usr/var/run"'; \ echo '#define INCLUDEDIR "/usr/include"'; \ echo '#define OLDINCLUDEDIR "/usr/include"'; \ echo '#define DOCDIR "/usr/share/doc/clisp"'; \ echo '#define INFODIR "/usr/share/info"'; \ echo '#define HTMLDIR "/usr/share/doc/clisp"'; \ echo '#define DVIDIR "/usr/share/doc/clisp"'; \ echo '#define PDFDIR "/usr/share/doc/clisp"'; \ echo '#define PSDIR "/usr/share/doc/clisp"'; \ echo '#define LIBDIR "/usr/lib64"'; \ echo '#define LISPDIR "/usr/share/emacs/site-lisp"'; \ echo '#define LOCALEDIR "/usr/share/locale"'; \ echo '#define MANDIR "/usr/share/man"'; \ echo '#define MANEXT ""'; \ echo '#define PKGDATADIR "/usr/share/clisp"'; \ echo '#define PKGINCLUDEDIR "/usr/include/clisp"'; \ echo '#define PKGLIBDIR "/usr/lib64/clisp"'; \ echo '#define PKGLIBEXECDIR "/usr/libexec/clisp"'; \ } | sed '/""/d' > configmake.h-t && \ mv -f configmake.h-t configmake.h rm -f fcntl.h-t fcntl.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_FCNTL_H''@||g' \ -e 's/@''GNULIB_FCNTL''@/0/g' \ -e 's/@''GNULIB_NONBLOCKING''@/0/g' \ -e 's/@''GNULIB_OPEN''@/0/g' \ -e 's/@''GNULIB_OPENAT''@/0/g' \ -e 's|@''HAVE_FCNTL''@|1|g' \ -e 's|@''HAVE_OPENAT''@|1|g' \ -e 's|@''REPLACE_FCNTL''@|0|g' \ -e 's|@''REPLACE_OPEN''@|0|g' \ -e 's|@''REPLACE_OPENAT''@|0|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r ../../src/gllib/c++defs.h' \ -e '/definition of _GL_ARG_NONNULL/r ../../src/gllib/arg-nonnull.h' \ -e '/definition of _GL_WARN_ON_USE/r ../../src/gllib/warn-on-use.h' \ < ../../src/gllib/fcntl.in.h; \ } > fcntl.h-t && \ mv fcntl.h-t fcntl.h rm -f langinfo.h-t langinfo.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''HAVE_LANGINFO_H''@|1|g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_LANGINFO_H''@||g' \ -e 's/@''GNULIB_NL_LANGINFO''@/1/g' \ -e 's|@''HAVE_LANGINFO_CODESET''@|1|g' \ -e 's|@''HAVE_LANGINFO_T_FMT_AMPM''@|1|g' \ -e 's|@''HAVE_LANGINFO_ALTMON''@|1|g' \ -e 's|@''HAVE_LANGINFO_ERA''@|1|g' \ -e 's|@''HAVE_LANGINFO_YESEXPR''@|1|g' \ -e 's|@''HAVE_NL_LANGINFO''@|1|g' \ -e 's|@''REPLACE_NL_LANGINFO''@|0|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r ../../src/gllib/c++defs.h' \ -e '/definition of _GL_WARN_ON_USE/r ../../src/gllib/warn-on-use.h' \ < ../../src/gllib/langinfo.in.h; \ } > langinfo.h-t && \ mv langinfo.h-t langinfo.h rm -f limits.h-t limits.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */' && \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_LIMITS_H''@||g' \ < ../../src/gllib/limits.in.h; \ } > limits.h-t && \ mv limits.h-t limits.h rm -f locale.h-t locale.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */' && \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_LOCALE_H''@||g' \ -e 's/@''GNULIB_LOCALECONV''@/1/g' \ -e 's/@''GNULIB_SETLOCALE''@/0/g' \ -e 's/@''GNULIB_DUPLOCALE''@/0/g' \ -e 's|@''HAVE_DUPLOCALE''@|1|g' \ -e 's|@''HAVE_XLOCALE_H''@|0|g' \ -e 's|@''REPLACE_LOCALECONV''@|0|g' \ -e 's|@''REPLACE_SETLOCALE''@|0|g' \ -e 's|@''REPLACE_DUPLOCALE''@|0|g' \ -e 's|@''REPLACE_STRUCT_LCONV''@|0|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r ../../src/gllib/c++defs.h' \ -e '/definition of _GL_ARG_NONNULL/r ../../src/gllib/arg-nonnull.h' \ -e '/definition of _GL_WARN_ON_USE/r ../../src/gllib/warn-on-use.h' \ < ../../src/gllib/locale.in.h; \ } > locale.h-t && \ mv locale.h-t locale.h rm -f signal.h-t signal.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */' && \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_SIGNAL_H''@||g' \ -e 's/@''GNULIB_PTHREAD_SIGMASK''@/0/g' \ -e 's/@''GNULIB_RAISE''@/0/g' \ -e 's/@''GNULIB_SIGNAL_H_SIGPIPE''@/0/g' \ -e 's/@''GNULIB_SIGPROCMASK''@/0/g' \ -e 's/@''GNULIB_SIGACTION''@/0/g' \ -e 's|@''HAVE_POSIX_SIGNALBLOCKING''@|1|g' \ -e 's|@''HAVE_PTHREAD_SIGMASK''@|1|g' \ -e 's|@''HAVE_RAISE''@|1|g' \ -e 's|@''HAVE_SIGSET_T''@|1|g' \ -e 's|@''HAVE_SIGINFO_T''@|1|g' \ -e 's|@''HAVE_SIGACTION''@|1|g' \ -e 's|@''HAVE_STRUCT_SIGACTION_SA_SIGACTION''@|1|g' \ -e 's|@''HAVE_TYPE_VOLATILE_SIG_ATOMIC_T''@|1|g' \ -e 's|@''HAVE_SIGHANDLER_T''@|1|g' \ -e 's|@''REPLACE_PTHREAD_SIGMASK''@|0|g' \ -e 's|@''REPLACE_RAISE''@|0|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r ../../src/gllib/c++defs.h' \ -e '/definition of _GL_ARG_NONNULL/r ../../src/gllib/arg-nonnull.h' \ -e '/definition of _GL_WARN_ON_USE/r ../../src/gllib/warn-on-use.h' \ < ../../src/gllib/signal.in.h; \ } > signal.h-t && \ mv signal.h-t signal.h rm -f stdlib.h-t stdlib.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */' && \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_STDLIB_H''@||g' \ -e 's/@''GNULIB__EXIT''@/0/g' \ -e 's/@''GNULIB_ATOLL''@/0/g' \ -e 's/@''GNULIB_CALLOC_POSIX''@/0/g' \ -e 's/@''GNULIB_CANONICALIZE_FILE_NAME''@/0/g' \ -e 's/@''GNULIB_GETLOADAVG''@/1/g' \ -e 's/@''GNULIB_GETSUBOPT''@/0/g' \ -e 's/@''GNULIB_GRANTPT''@/0/g' \ -e 's/@''GNULIB_MALLOC_POSIX''@/1/g' \ -e 's/@''GNULIB_MBTOWC''@/1/g' \ -e 's/@''GNULIB_MKDTEMP''@/1/g' \ -e 's/@''GNULIB_MKOSTEMP''@/0/g' \ -e 's/@''GNULIB_MKOSTEMPS''@/0/g' \ -e 's/@''GNULIB_MKSTEMP''@/1/g' \ -e 's/@''GNULIB_MKSTEMPS''@/0/g' \ -e 's/@''GNULIB_POSIX_OPENPT''@/0/g' \ -e 's/@''GNULIB_PTSNAME''@/0/g' \ -e 's/@''GNULIB_PTSNAME_R''@/0/g' \ -e 's/@''GNULIB_PUTENV''@/0/g' \ -e 's/@''GNULIB_QSORT_R''@/0/g' \ -e 's/@''GNULIB_RANDOM''@/0/g' \ -e 's/@''GNULIB_RANDOM_R''@/0/g' \ -e 's/@''GNULIB_REALLOC_POSIX''@/0/g' \ -e 's/@''GNULIB_REALLOCARRAY''@/0/g' \ -e 's/@''GNULIB_REALPATH''@/0/g' \ -e 's/@''GNULIB_RPMATCH''@/0/g' \ -e 's/@''GNULIB_SECURE_GETENV''@/0/g' \ -e 's/@''GNULIB_SETENV''@/1/g' \ -e 's/@''GNULIB_STRTOD''@/0/g' \ -e 's/@''GNULIB_STRTOLL''@/0/g' \ -e 's/@''GNULIB_STRTOULL''@/0/g' \ -e 's/@''GNULIB_SYSTEM_POSIX''@/0/g' \ -e 's/@''GNULIB_UNLOCKPT''@/0/g' \ -e 's/@''GNULIB_UNSETENV''@/1/g' \ -e 's/@''GNULIB_WCTOMB''@/0/g' \ < ../../src/gllib/stdlib.in.h | \ sed -e 's|@''HAVE__EXIT''@|1|g' \ -e 's|@''HAVE_ATOLL''@|1|g' \ -e 's|@''HAVE_CANONICALIZE_FILE_NAME''@|1|g' \ -e 's|@''HAVE_DECL_GETLOADAVG''@|1|g' \ -e 's|@''HAVE_GETSUBOPT''@|1|g' \ -e 's|@''HAVE_GRANTPT''@|1|g' \ -e 's|@''HAVE_DECL_INITSTATE''@|1|g' \ -e 's|@''HAVE_MKDTEMP''@|1|g' \ -e 's|@''HAVE_MKOSTEMP''@|1|g' \ -e 's|@''HAVE_MKOSTEMPS''@|1|g' \ -e 's|@''HAVE_MKSTEMP''@|1|g' \ -e 's|@''HAVE_MKSTEMPS''@|1|g' \ -e 's|@''HAVE_POSIX_OPENPT''@|1|g' \ -e 's|@''HAVE_PTSNAME''@|1|g' \ -e 's|@''HAVE_PTSNAME_R''@|1|g' \ -e 's|@''HAVE_QSORT_R''@|1|g' \ -e 's|@''HAVE_RANDOM''@|1|g' \ -e 's|@''HAVE_RANDOM_H''@|1|g' \ -e 's|@''HAVE_RANDOM_R''@|1|g' \ -e 's|@''HAVE_REALLOCARRAY''@|1|g' \ -e 's|@''HAVE_REALPATH''@|1|g' \ -e 's|@''HAVE_RPMATCH''@|1|g' \ -e 's|@''HAVE_SECURE_GETENV''@|1|g' \ -e 's|@''HAVE_DECL_SETENV''@|1|g' \ -e 's|@''HAVE_DECL_SETSTATE''@|1|g' \ -e 's|@''HAVE_STRTOD''@|1|g' \ -e 's|@''HAVE_STRTOLL''@|1|g' \ -e 's|@''HAVE_STRTOULL''@|1|g' \ -e 's|@''HAVE_STRUCT_RANDOM_DATA''@|1|g' \ -e 's|@''HAVE_SYS_LOADAVG_H''@|0|g' \ -e 's|@''HAVE_UNLOCKPT''@|1|g' \ -e 's|@''HAVE_DECL_UNSETENV''@|1|g' \ -e 's|@''REPLACE_CALLOC''@|0|g' \ -e 's|@''REPLACE_CANONICALIZE_FILE_NAME''@|0|g' \ -e 's|@''REPLACE_MALLOC''@|0|g' \ -e 's|@''REPLACE_MBTOWC''@|0|g' \ -e 's|@''REPLACE_MKSTEMP''@|0|g' \ -e 's|@''REPLACE_PTSNAME''@|0|g' \ -e 's|@''REPLACE_PTSNAME_R''@|0|g' \ -e 's|@''REPLACE_PUTENV''@|0|g' \ -e 's|@''REPLACE_QSORT_R''@|0|g' \ -e 's|@''REPLACE_RANDOM_R''@|0|g' \ -e 's|@''REPLACE_REALLOC''@|0|g' \ -e 's|@''REPLACE_REALPATH''@|0|g' \ -e 's|@''REPLACE_SETENV''@|0|g' \ -e 's|@''REPLACE_STRTOD''@|0|g' \ -e 's|@''REPLACE_UNSETENV''@|0|g' \ -e 's|@''REPLACE_WCTOMB''@|0|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r ../../src/gllib/c++defs.h' \ -e '/definition of _Noreturn/r ../../src/gllib/_Noreturn.h' \ -e '/definition of _GL_ARG_NONNULL/r ../../src/gllib/arg-nonnull.h' \ -e '/definition of _GL_WARN_ON_USE/r ../../src/gllib/warn-on-use.h'; \ } > stdlib.h-t && \ mv stdlib.h-t stdlib.h rm -f string.h-t string.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */' && \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_STRING_H''@||g' \ -e 's/@''GNULIB_EXPLICIT_BZERO''@/0/g' \ -e 's/@''GNULIB_FFSL''@/0/g' \ -e 's/@''GNULIB_FFSLL''@/0/g' \ -e 's/@''GNULIB_MBSLEN''@/0/g' \ -e 's/@''GNULIB_MBSNLEN''@/0/g' \ -e 's/@''GNULIB_MBSCHR''@/0/g' \ -e 's/@''GNULIB_MBSRCHR''@/0/g' \ -e 's/@''GNULIB_MBSSTR''@/0/g' \ -e 's/@''GNULIB_MBSCASECMP''@/0/g' \ -e 's/@''GNULIB_MBSNCASECMP''@/0/g' \ -e 's/@''GNULIB_MBSPCASECMP''@/0/g' \ -e 's/@''GNULIB_MBSCASESTR''@/0/g' \ -e 's/@''GNULIB_MBSCSPN''@/0/g' \ -e 's/@''GNULIB_MBSPBRK''@/0/g' \ -e 's/@''GNULIB_MBSSPN''@/0/g' \ -e 's/@''GNULIB_MBSSEP''@/0/g' \ -e 's/@''GNULIB_MBSTOK_R''@/0/g' \ -e 's/@''GNULIB_MEMCHR''@/1/g' \ -e 's/@''GNULIB_MEMMEM''@/0/g' \ -e 's/@''GNULIB_MEMPCPY''@/0/g' \ -e 's/@''GNULIB_MEMRCHR''@/0/g' \ -e 's/@''GNULIB_RAWMEMCHR''@/0/g' \ -e 's/@''GNULIB_STPCPY''@/0/g' \ -e 's/@''GNULIB_STPNCPY''@/0/g' \ -e 's/@''GNULIB_STRCHRNUL''@/0/g' \ -e 's/@''GNULIB_STRDUP''@/1/g' \ -e 's/@''GNULIB_STRNCAT''@/0/g' \ -e 's/@''GNULIB_STRNDUP''@/0/g' \ -e 's/@''GNULIB_STRNLEN''@/0/g' \ -e 's/@''GNULIB_STRPBRK''@/0/g' \ -e 's/@''GNULIB_STRSEP''@/0/g' \ -e 's/@''GNULIB_STRSTR''@/0/g' \ -e 's/@''GNULIB_STRCASESTR''@/0/g' \ -e 's/@''GNULIB_STRTOK_R''@/0/g' \ -e 's/@''GNULIB_STRERROR''@/0/g' \ -e 's/@''GNULIB_STRERROR_R''@/1/g' \ -e 's/@''GNULIB_STRSIGNAL''@/0/g' \ -e 's/@''GNULIB_STRVERSCMP''@/1/g' \ < ../../src/gllib/string.in.h | \ sed -e 's|@''HAVE_EXPLICIT_BZERO''@|1|g' \ -e 's|@''HAVE_FFSL''@|1|g' \ -e 's|@''HAVE_FFSLL''@|1|g' \ -e 's|@''HAVE_MBSLEN''@|0|g' \ -e 's|@''HAVE_MEMCHR''@|1|g' \ -e 's|@''HAVE_DECL_MEMMEM''@|1|g' \ -e 's|@''HAVE_MEMPCPY''@|1|g' \ -e 's|@''HAVE_DECL_MEMRCHR''@|1|g' \ -e 's|@''HAVE_RAWMEMCHR''@|1|g' \ -e 's|@''HAVE_STPCPY''@|1|g' \ -e 's|@''HAVE_STPNCPY''@|1|g' \ -e 's|@''HAVE_STRCHRNUL''@|1|g' \ -e 's|@''HAVE_DECL_STRDUP''@|1|g' \ -e 's|@''HAVE_DECL_STRNDUP''@|1|g' \ -e 's|@''HAVE_DECL_STRNLEN''@|1|g' \ -e 's|@''HAVE_STRPBRK''@|1|g' \ -e 's|@''HAVE_STRSEP''@|1|g' \ -e 's|@''HAVE_STRCASESTR''@|1|g' \ -e 's|@''HAVE_DECL_STRTOK_R''@|1|g' \ -e 's|@''HAVE_DECL_STRERROR_R''@|1|g' \ -e 's|@''HAVE_DECL_STRSIGNAL''@|1|g' \ -e 's|@''HAVE_STRVERSCMP''@|1|g' \ -e 's|@''REPLACE_MEMCHR''@|0|g' \ -e 's|@''REPLACE_MEMMEM''@|0|g' \ -e 's|@''REPLACE_STPNCPY''@|0|g' \ -e 's|@''REPLACE_STRCHRNUL''@|0|g' \ -e 's|@''REPLACE_STRDUP''@|0|g' \ -e 's|@''REPLACE_STRNCAT''@|0|g' \ -e 's|@''REPLACE_STRNDUP''@|0|g' \ -e 's|@''REPLACE_STRNLEN''@|0|g' \ -e 's|@''REPLACE_STRSTR''@|0|g' \ -e 's|@''REPLACE_STRCASESTR''@|0|g' \ -e 's|@''REPLACE_STRTOK_R''@|0|g' \ -e 's|@''REPLACE_STRERROR''@|0|g' \ -e 's|@''REPLACE_STRERROR_R''@|1|g' \ -e 's|@''REPLACE_STRSIGNAL''@|0|g' \ -e 's|@''UNDEFINE_STRTOK_R''@|0|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r ../../src/gllib/c++defs.h' \ -e '/definition of _GL_ARG_NONNULL/r ../../src/gllib/arg-nonnull.h' \ -e '/definition of _GL_WARN_ON_USE/r ../../src/gllib/warn-on-use.h'; \ < ../../src/gllib/string.in.h; \ } > string.h-t && \ mv string.h-t string.h rm -f strings.h-t strings.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */' && \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''HAVE_STRINGS_H''@|1|g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_STRINGS_H''@||g' \ -e 's/@''GNULIB_FFS''@/0/g' \ -e 's|@''HAVE_FFS''@|1|g' \ -e 's|@''HAVE_STRCASECMP''@|1|g' \ -e 's|@''HAVE_DECL_STRNCASECMP''@|1|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r ../../src/gllib/c++defs.h' \ -e '/definition of _GL_ARG_NONNULL/r ../../src/gllib/arg-nonnull.h' \ -e '/definition of _GL_WARN_ON_USE/r ../../src/gllib/warn-on-use.h' \ < ../../src/gllib/strings.in.h; \ } > strings.h-t && \ mv strings.h-t strings.h /usr/bin/mkdir -p sys rm -f sys/ioctl.h-t sys/ioctl.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''HAVE_SYS_IOCTL_H''@|1|g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_SYS_IOCTL_H''@||g' \ -e 's/@''GNULIB_IOCTL''@/1/g' \ -e 's|@''SYS_IOCTL_H_HAVE_WINSOCK2_H''@|0|g' \ -e 's|@''SYS_IOCTL_H_HAVE_WINSOCK2_H_AND_USE_SOCKETS''@|0|g' \ -e 's|@''REPLACE_IOCTL''@|1|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r ../../src/gllib/c++defs.h' \ -e '/definition of _GL_WARN_ON_USE/r ../../src/gllib/warn-on-use.h' \ < ../../src/gllib/sys_ioctl.in.h; \ } > sys/ioctl.h-t && \ mv sys/ioctl.h-t sys/ioctl.h /usr/bin/mkdir -p sys rm -f sys/select.h-t sys/select.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_SYS_SELECT_H''@||g' \ -e 's|@''HAVE_SYS_SELECT_H''@|1|g' \ -e 's/@''GNULIB_PSELECT''@/0/g' \ -e 's/@''GNULIB_SELECT''@/1/g' \ -e 's|@''HAVE_WINSOCK2_H''@|0|g' \ -e 's|@''HAVE_PSELECT''@|1|g' \ -e 's|@''REPLACE_PSELECT''@|0|g' \ -e 's|@''REPLACE_SELECT''@|0|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r ../../src/gllib/c++defs.h' \ -e '/definition of _GL_WARN_ON_USE/r ../../src/gllib/warn-on-use.h' \ < ../../src/gllib/sys_select.in.h; \ } > sys/select.h-t && \ mv sys/select.h-t sys/select.h /usr/bin/mkdir -p sys rm -f sys/socket.h-t sys/socket.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_SYS_SOCKET_H''@||g' \ -e 's|@''HAVE_SYS_SOCKET_H''@|1|g' \ -e 's/@''GNULIB_CLOSE''@/1/g' \ -e 's/@''GNULIB_SOCKET''@/1/g' \ -e 's/@''GNULIB_CONNECT''@/1/g' \ -e 's/@''GNULIB_ACCEPT''@/1/g' \ -e 's/@''GNULIB_BIND''@/1/g' \ -e 's/@''GNULIB_GETPEERNAME''@/1/g' \ -e 's/@''GNULIB_GETSOCKNAME''@/1/g' \ -e 's/@''GNULIB_GETSOCKOPT''@/1/g' \ -e 's/@''GNULIB_LISTEN''@/1/g' \ -e 's/@''GNULIB_RECV''@/1/g' \ -e 's/@''GNULIB_SEND''@/1/g' \ -e 's/@''GNULIB_RECVFROM''@/1/g' \ -e 's/@''GNULIB_SENDTO''@/1/g' \ -e 's/@''GNULIB_SETSOCKOPT''@/1/g' \ -e 's/@''GNULIB_SHUTDOWN''@/1/g' \ -e 's/@''GNULIB_ACCEPT4''@/0/g' \ -e 's|@''HAVE_WINSOCK2_H''@|0|g' \ -e 's|@''HAVE_WS2TCPIP_H''@|0|g' \ -e 's|@''HAVE_STRUCT_SOCKADDR_STORAGE''@|1|g' \ -e 's|@''HAVE_STRUCT_SOCKADDR_STORAGE_SS_FAMILY''@|1|g' \ -e 's|@''HAVE_SA_FAMILY_T''@|1|g' \ -e 's|@''HAVE_ACCEPT4''@|1|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r ../../src/gllib/c++defs.h' \ -e '/definition of _GL_ARG_NONNULL/r ../../src/gllib/arg-nonnull.h' \ -e '/definition of _GL_WARN_ON_USE/r ../../src/gllib/warn-on-use.h' \ < ../../src/gllib/sys_socket.in.h; \ } > sys/socket.h-t && \ mv -f sys/socket.h-t sys/socket.h /usr/bin/mkdir -p sys rm -f sys/stat.h-t sys/stat.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_SYS_STAT_H''@||g' \ -e 's|@''WINDOWS_64_BIT_ST_SIZE''@|0|g' \ -e 's|@''WINDOWS_STAT_TIMESPEC''@|0|g' \ -e 's/@''GNULIB_FCHMODAT''@/0/g' \ -e 's/@''GNULIB_FSTAT''@/0/g' \ -e 's/@''GNULIB_FSTATAT''@/0/g' \ -e 's/@''GNULIB_FUTIMENS''@/0/g' \ -e 's/@''GNULIB_LCHMOD''@/0/g' \ -e 's/@''GNULIB_LSTAT''@/1/g' \ -e 's/@''GNULIB_MKDIRAT''@/0/g' \ -e 's/@''GNULIB_MKFIFO''@/1/g' \ -e 's/@''GNULIB_MKFIFOAT''@/0/g' \ -e 's/@''GNULIB_MKNOD''@/1/g' \ -e 's/@''GNULIB_MKNODAT''@/0/g' \ -e 's/@''GNULIB_STAT''@/1/g' \ -e 's/@''GNULIB_UTIMENSAT''@/0/g' \ -e 's/@''GNULIB_OVERRIDES_STRUCT_STAT''@/0/g' \ -e 's|@''HAVE_FCHMODAT''@|1|g' \ -e 's|@''HAVE_FSTATAT''@|1|g' \ -e 's|@''HAVE_FUTIMENS''@|1|g' \ -e 's|@''HAVE_LCHMOD''@|1|g' \ -e 's|@''HAVE_LSTAT''@|1|g' \ -e 's|@''HAVE_MKDIRAT''@|1|g' \ -e 's|@''HAVE_MKFIFO''@|1|g' \ -e 's|@''HAVE_MKFIFOAT''@|1|g' \ -e 's|@''HAVE_MKNOD''@|1|g' \ -e 's|@''HAVE_MKNODAT''@|1|g' \ -e 's|@''HAVE_UTIMENSAT''@|1|g' \ -e 's|@''REPLACE_FSTAT''@|0|g' \ -e 's|@''REPLACE_FSTATAT''@|0|g' \ -e 's|@''REPLACE_FUTIMENS''@|0|g' \ -e 's|@''REPLACE_LSTAT''@|0|g' \ -e 's|@''REPLACE_MKDIR''@|0|g' \ -e 's|@''REPLACE_MKFIFO''@|0|g' \ -e 's|@''REPLACE_MKNOD''@|0|g' \ -e 's|@''REPLACE_STAT''@|0|g' \ -e 's|@''REPLACE_UTIMENSAT''@|0|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r ../../src/gllib/c++defs.h' \ -e '/definition of _GL_ARG_NONNULL/r ../../src/gllib/arg-nonnull.h' \ -e '/definition of _GL_WARN_ON_USE/r ../../src/gllib/warn-on-use.h' \ < ../../src/gllib/sys_stat.in.h; \ } > sys/stat.h-t && \ mv sys/stat.h-t sys/stat.h /usr/bin/mkdir -p sys rm -f sys/time.h-t sys/time.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's/@''HAVE_SYS_TIME_H''@/1/g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_SYS_TIME_H''@||g' \ -e 's/@''GNULIB_GETTIMEOFDAY''@/1/g' \ -e 's|@''HAVE_WINSOCK2_H''@|0|g' \ -e 's/@''HAVE_GETTIMEOFDAY''@/1/g' \ -e 's/@''HAVE_STRUCT_TIMEVAL''@/1/g' \ -e 's/@''REPLACE_GETTIMEOFDAY''@/0/g' \ -e 's/@''REPLACE_STRUCT_TIMEVAL''@/0/g' \ -e '/definitions of _GL_FUNCDECL_RPL/r ../../src/gllib/c++defs.h' \ -e '/definition of _GL_ARG_NONNULL/r ../../src/gllib/arg-nonnull.h' \ -e '/definition of _GL_WARN_ON_USE/r ../../src/gllib/warn-on-use.h' \ < ../../src/gllib/sys_time.in.h; \ } > sys/time.h-t && \ mv sys/time.h-t sys/time.h /usr/bin/mkdir -p sys rm -f sys/types.h-t sys/types.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_SYS_TYPES_H''@||g' \ -e 's|@''WINDOWS_64_BIT_OFF_T''@|0|g' \ -e 's|@''WINDOWS_STAT_INODES''@|0|g' \ < ../../src/gllib/sys_types.in.h; \ } > sys/types.h-t && \ mv sys/types.h-t sys/types.h /usr/bin/mkdir -p sys rm -f sys/uio.h-t sys/uio.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_SYS_UIO_H''@||g' \ -e 's|@''HAVE_SYS_UIO_H''@|1|g' \ < ../../src/gllib/sys_uio.in.h; \ } > sys/uio.h-t && \ mv -f sys/uio.h-t sys/uio.h /usr/bin/mkdir -p sys rm -f sys/utsname.h-t sys/utsname.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's/@''HAVE_SYS_UTSNAME_H''@/1/g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_SYS_UTSNAME_H''@||g' \ -e 's/@''GNULIB_UNAME''@/1/g' \ -e 's|@''HAVE_STRUCT_UTSNAME''@|1|g' \ -e 's|@''HAVE_UNAME''@|1|g' \ -e '/definition of _GL_ARG_NONNULL/r ../../src/gllib/arg-nonnull.h' \ -e '/definition of _GL_WARN_ON_USE/r ../../src/gllib/warn-on-use.h' \ < ../../src/gllib/sys_utsname.in.h; \ } > sys/utsname.h-t && \ mv sys/utsname.h-t sys/utsname.h /usr/bin/mkdir -p sys rm -f sys/wait.h-t sys/wait.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_SYS_WAIT_H''@||g' \ -e 's/@''GNULIB_WAITPID''@/0/g' \ -e '/definitions of _GL_FUNCDECL_RPL/r ../../src/gllib/c++defs.h' \ -e '/definition of _GL_WARN_ON_USE/r ../../src/gllib/warn-on-use.h' \ < ../../src/gllib/sys_wait.in.h; \ } > sys/wait.h-t && \ mv sys/wait.h-t sys/wait.h rm -f time.h-t time.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */' && \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_TIME_H''@||g' \ -e 's/@''GNULIB_CTIME''@/0/g' \ -e 's/@''GNULIB_LOCALTIME''@/0/g' \ -e 's/@''GNULIB_MKTIME''@/1/g' \ -e 's/@''GNULIB_NANOSLEEP''@/0/g' \ -e 's/@''GNULIB_STRFTIME''@/0/g' \ -e 's/@''GNULIB_STRPTIME''@/1/g' \ -e 's/@''GNULIB_TIMEGM''@/1/g' \ -e 's/@''GNULIB_TIME_R''@/1/g' \ -e 's/@''GNULIB_TIME_RZ''@/1/g' \ -e 's/@''GNULIB_TZSET''@/1/g' \ -e 's|@''HAVE_DECL_LOCALTIME_R''@|1|g' \ -e 's|@''HAVE_NANOSLEEP''@|1|g' \ -e 's|@''HAVE_STRPTIME''@|1|g' \ -e 's|@''HAVE_TIMEGM''@|1|g' \ -e 's|@''HAVE_TIMEZONE_T''@|0|g' \ -e 's|@''HAVE_TZSET''@|1|g' \ -e 's|@''REPLACE_CTIME''@|GNULIB_PORTCHECK|g' \ -e 's|@''REPLACE_GMTIME''@|0|g' \ -e 's|@''REPLACE_LOCALTIME''@|0|g' \ -e 's|@''REPLACE_LOCALTIME_R''@|0|g' \ -e 's|@''REPLACE_MKTIME''@|0|g' \ -e 's|@''REPLACE_NANOSLEEP''@|GNULIB_PORTCHECK|g' \ -e 's|@''REPLACE_STRFTIME''@|GNULIB_PORTCHECK|g' \ -e 's|@''REPLACE_TIMEGM''@|0|g' \ -e 's|@''REPLACE_TZSET''@|0|g' \ -e 's|@''PTHREAD_H_DEFINES_STRUCT_TIMESPEC''@|0|g' \ -e 's|@''SYS_TIME_H_DEFINES_STRUCT_TIMESPEC''@|0|g' \ -e 's|@''TIME_H_DEFINES_STRUCT_TIMESPEC''@|1|g' \ -e 's|@''UNISTD_H_DEFINES_STRUCT_TIMESPEC''@|0|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r ../../src/gllib/c++defs.h' \ -e '/definition of _GL_ARG_NONNULL/r ../../src/gllib/arg-nonnull.h' \ -e '/definition of _GL_WARN_ON_USE/r ../../src/gllib/warn-on-use.h' \ < ../../src/gllib/time.in.h; \ } > time.h-t && \ mv time.h-t time.h rm -f unistd.h-t unistd.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''HAVE_UNISTD_H''@|1|g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_UNISTD_H''@||g' \ -e 's|@''WINDOWS_64_BIT_OFF_T''@|0|g' \ -e 's/@''GNULIB_CHDIR''@/0/g' \ -e 's/@''GNULIB_CHOWN''@/0/g' \ -e 's/@''GNULIB_CLOSE''@/1/g' \ -e 's/@''GNULIB_DUP''@/0/g' \ -e 's/@''GNULIB_DUP2''@/1/g' \ -e 's/@''GNULIB_DUP3''@/0/g' \ -e 's/@''GNULIB_ENVIRON''@/1/g' \ -e 's/@''GNULIB_EUIDACCESS''@/0/g' \ -e 's/@''GNULIB_FACCESSAT''@/0/g' \ -e 's/@''GNULIB_FCHDIR''@/0/g' \ -e 's/@''GNULIB_FCHOWNAT''@/0/g' \ -e 's/@''GNULIB_FDATASYNC''@/0/g' \ -e 's/@''GNULIB_FSYNC''@/0/g' \ -e 's/@''GNULIB_FTRUNCATE''@/0/g' \ -e 's/@''GNULIB_GETCWD''@/0/g' \ -e 's/@''GNULIB_GETDOMAINNAME''@/0/g' \ -e 's/@''GNULIB_GETDTABLESIZE''@/0/g' \ -e 's/@''GNULIB_GETGROUPS''@/0/g' \ -e 's/@''GNULIB_GETHOSTNAME''@/1/g' \ -e 's/@''GNULIB_GETLOGIN''@/0/g' \ -e 's/@''GNULIB_GETLOGIN_R''@/0/g' \ -e 's/@''GNULIB_GETPAGESIZE''@/1/g' \ -e 's/@''GNULIB_GETUSERSHELL''@/0/g' \ -e 's/@''GNULIB_GROUP_MEMBER''@/0/g' \ -e 's/@''GNULIB_ISATTY''@/0/g' \ -e 's/@''GNULIB_LCHOWN''@/0/g' \ -e 's/@''GNULIB_LINK''@/0/g' \ -e 's/@''GNULIB_LINKAT''@/0/g' \ -e 's/@''GNULIB_LSEEK''@/0/g' \ -e 's/@''GNULIB_PIPE''@/0/g' \ -e 's/@''GNULIB_PIPE2''@/0/g' \ -e 's/@''GNULIB_PREAD''@/0/g' \ -e 's/@''GNULIB_PWRITE''@/0/g' \ -e 's/@''GNULIB_READ''@/0/g' \ -e 's/@''GNULIB_READLINK''@/1/g' \ -e 's/@''GNULIB_READLINKAT''@/0/g' \ -e 's/@''GNULIB_RMDIR''@/0/g' \ -e 's/@''GNULIB_SETHOSTNAME''@/0/g' \ -e 's/@''GNULIB_SLEEP''@/0/g' \ -e 's/@''GNULIB_SYMLINK''@/0/g' \ -e 's/@''GNULIB_SYMLINKAT''@/0/g' \ -e 's/@''GNULIB_TRUNCATE''@/0/g' \ -e 's/@''GNULIB_TTYNAME_R''@/0/g' \ -e 's/@''GNULIB_UNISTD_H_GETOPT''@/0/g' \ -e 's/@''GNULIB_UNISTD_H_NONBLOCKING''@/0/g' \ -e 's/@''GNULIB_UNISTD_H_SIGPIPE''@/0/g' \ -e 's/@''GNULIB_UNLINK''@/0/g' \ -e 's/@''GNULIB_UNLINKAT''@/0/g' \ -e 's/@''GNULIB_USLEEP''@/0/g' \ -e 's/@''GNULIB_WRITE''@/0/g' \ < ../../src/gllib/unistd.in.h | \ sed -e 's|@''HAVE_CHOWN''@|1|g' \ -e 's|@''HAVE_DUP2''@|1|g' \ -e 's|@''HAVE_DUP3''@|1|g' \ -e 's|@''HAVE_EUIDACCESS''@|1|g' \ -e 's|@''HAVE_FACCESSAT''@|1|g' \ -e 's|@''HAVE_FCHDIR''@|1|g' \ -e 's|@''HAVE_FCHOWNAT''@|1|g' \ -e 's|@''HAVE_FDATASYNC''@|1|g' \ -e 's|@''HAVE_FSYNC''@|1|g' \ -e 's|@''HAVE_FTRUNCATE''@|1|g' \ -e 's|@''HAVE_GETDTABLESIZE''@|1|g' \ -e 's|@''HAVE_GETGROUPS''@|1|g' \ -e 's|@''HAVE_GETHOSTNAME''@|1|g' \ -e 's|@''HAVE_GETPAGESIZE''@|1|g' \ -e 's|@''HAVE_GROUP_MEMBER''@|1|g' \ -e 's|@''HAVE_LCHOWN''@|1|g' \ -e 's|@''HAVE_LINK''@|1|g' \ -e 's|@''HAVE_LINKAT''@|1|g' \ -e 's|@''HAVE_PIPE''@|1|g' \ -e 's|@''HAVE_PIPE2''@|1|g' \ -e 's|@''HAVE_PREAD''@|1|g' \ -e 's|@''HAVE_PWRITE''@|1|g' \ -e 's|@''HAVE_READLINK''@|1|g' \ -e 's|@''HAVE_READLINKAT''@|1|g' \ -e 's|@''HAVE_SETHOSTNAME''@|1|g' \ -e 's|@''HAVE_SLEEP''@|1|g' \ -e 's|@''HAVE_SYMLINK''@|1|g' \ -e 's|@''HAVE_SYMLINKAT''@|1|g' \ -e 's|@''HAVE_TRUNCATE''@|1|g' \ -e 's|@''HAVE_UNLINKAT''@|1|g' \ -e 's|@''HAVE_USLEEP''@|1|g' \ -e 's|@''HAVE_DECL_ENVIRON''@|1|g' \ -e 's|@''HAVE_DECL_FCHDIR''@|1|g' \ -e 's|@''HAVE_DECL_FDATASYNC''@|1|g' \ -e 's|@''HAVE_DECL_GETDOMAINNAME''@|1|g' \ -e 's|@''HAVE_DECL_GETLOGIN''@|1|g' \ -e 's|@''HAVE_DECL_GETLOGIN_R''@|1|g' \ -e 's|@''HAVE_DECL_GETPAGESIZE''@|1|g' \ -e 's|@''HAVE_DECL_GETUSERSHELL''@|1|g' \ -e 's|@''HAVE_DECL_SETHOSTNAME''@|1|g' \ -e 's|@''HAVE_DECL_TTYNAME_R''@|1|g' \ -e 's|@''HAVE_OS_H''@|0|g' \ -e 's|@''HAVE_SYS_PARAM_H''@|0|g' \ | \ sed -e 's|@''REPLACE_CHOWN''@|0|g' \ -e 's|@''REPLACE_CLOSE''@|0|g' \ -e 's|@''REPLACE_DUP''@|0|g' \ -e 's|@''REPLACE_DUP2''@|0|g' \ -e 's|@''REPLACE_FACCESSAT''@|0|g' \ -e 's|@''REPLACE_FCHOWNAT''@|0|g' \ -e 's|@''REPLACE_FTRUNCATE''@|0|g' \ -e 's|@''REPLACE_GETCWD''@|0|g' \ -e 's|@''REPLACE_GETDOMAINNAME''@|0|g' \ -e 's|@''REPLACE_GETDTABLESIZE''@|0|g' \ -e 's|@''REPLACE_GETLOGIN_R''@|0|g' \ -e 's|@''REPLACE_GETGROUPS''@|0|g' \ -e 's|@''REPLACE_GETPAGESIZE''@|0|g' \ -e 's|@''REPLACE_ISATTY''@|0|g' \ -e 's|@''REPLACE_LCHOWN''@|0|g' \ -e 's|@''REPLACE_LINK''@|0|g' \ -e 's|@''REPLACE_LINKAT''@|0|g' \ -e 's|@''REPLACE_LSEEK''@|0|g' \ -e 's|@''REPLACE_PREAD''@|0|g' \ -e 's|@''REPLACE_PWRITE''@|0|g' \ -e 's|@''REPLACE_READ''@|0|g' \ -e 's|@''REPLACE_READLINK''@|0|g' \ -e 's|@''REPLACE_READLINKAT''@|0|g' \ -e 's|@''REPLACE_RMDIR''@|0|g' \ -e 's|@''REPLACE_SLEEP''@|0|g' \ -e 's|@''REPLACE_SYMLINK''@|0|g' \ -e 's|@''REPLACE_SYMLINKAT''@|0|g' \ -e 's|@''REPLACE_TRUNCATE''@|0|g' \ -e 's|@''REPLACE_TTYNAME_R''@|0|g' \ -e 's|@''REPLACE_UNLINK''@|0|g' \ -e 's|@''REPLACE_UNLINKAT''@|0|g' \ -e 's|@''REPLACE_USLEEP''@|0|g' \ -e 's|@''REPLACE_WRITE''@|0|g' \ -e 's|@''UNISTD_H_HAVE_WINSOCK2_H''@|0|g' \ -e 's|@''UNISTD_H_HAVE_WINSOCK2_H_AND_USE_SOCKETS''@|0|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r ../../src/gllib/c++defs.h' \ -e '/definition of _GL_ARG_NONNULL/r ../../src/gllib/arg-nonnull.h' \ -e '/definition of _GL_WARN_ON_USE/r ../../src/gllib/warn-on-use.h'; \ } > unistd.h-t && \ mv unistd.h-t unistd.h rm -f wchar.h-t wchar.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''HAVE_FEATURES_H''@|1|g' \ -e 's|@''NEXT_WCHAR_H''@||g' \ -e 's|@''HAVE_WCHAR_H''@|1|g' \ -e 's/@''HAVE_CRTDEFS_H''@/0/g' \ -e 's/@''GNULIB_OVERRIDES_WINT_T''@/0/g' \ -e 's/@''GNULIB_BTOWC''@/1/g' \ -e 's/@''GNULIB_WCTOB''@/0/g' \ -e 's/@''GNULIB_MBSINIT''@/1/g' \ -e 's/@''GNULIB_MBRTOWC''@/1/g' \ -e 's/@''GNULIB_MBRLEN''@/0/g' \ -e 's/@''GNULIB_MBSRTOWCS''@/1/g' \ -e 's/@''GNULIB_MBSNRTOWCS''@/0/g' \ -e 's/@''GNULIB_WCRTOMB''@/1/g' \ -e 's/@''GNULIB_WCSRTOMBS''@/0/g' \ -e 's/@''GNULIB_WCSNRTOMBS''@/0/g' \ -e 's/@''GNULIB_WCWIDTH''@/0/g' \ -e 's/@''GNULIB_WMEMCHR''@/0/g' \ -e 's/@''GNULIB_WMEMCMP''@/0/g' \ -e 's/@''GNULIB_WMEMCPY''@/0/g' \ -e 's/@''GNULIB_WMEMMOVE''@/0/g' \ -e 's/@''GNULIB_WMEMSET''@/0/g' \ -e 's/@''GNULIB_WCSLEN''@/0/g' \ -e 's/@''GNULIB_WCSNLEN''@/0/g' \ -e 's/@''GNULIB_WCSCPY''@/0/g' \ -e 's/@''GNULIB_WCPCPY''@/0/g' \ -e 's/@''GNULIB_WCSNCPY''@/0/g' \ -e 's/@''GNULIB_WCPNCPY''@/0/g' \ -e 's/@''GNULIB_WCSCAT''@/0/g' \ -e 's/@''GNULIB_WCSNCAT''@/0/g' \ -e 's/@''GNULIB_WCSCMP''@/0/g' \ -e 's/@''GNULIB_WCSNCMP''@/0/g' \ -e 's/@''GNULIB_WCSCASECMP''@/0/g' \ -e 's/@''GNULIB_WCSNCASECMP''@/0/g' \ -e 's/@''GNULIB_WCSCOLL''@/0/g' \ -e 's/@''GNULIB_WCSXFRM''@/0/g' \ -e 's/@''GNULIB_WCSDUP''@/0/g' \ -e 's/@''GNULIB_WCSCHR''@/0/g' \ -e 's/@''GNULIB_WCSRCHR''@/0/g' \ -e 's/@''GNULIB_WCSCSPN''@/0/g' \ -e 's/@''GNULIB_WCSSPN''@/0/g' \ -e 's/@''GNULIB_WCSPBRK''@/0/g' \ -e 's/@''GNULIB_WCSSTR''@/0/g' \ -e 's/@''GNULIB_WCSTOK''@/0/g' \ -e 's/@''GNULIB_WCSWIDTH''@/0/g' \ -e 's/@''GNULIB_WCSFTIME''@/0/g' \ < ../../src/gllib/wchar.in.h | \ sed -e 's|@''HAVE_WINT_T''@|1|g' \ -e 's|@''HAVE_BTOWC''@|1|g' \ -e 's|@''HAVE_MBSINIT''@|1|g' \ -e 's|@''HAVE_MBRTOWC''@|1|g' \ -e 's|@''HAVE_MBRLEN''@|1|g' \ -e 's|@''HAVE_MBSRTOWCS''@|1|g' \ -e 's|@''HAVE_MBSNRTOWCS''@|1|g' \ -e 's|@''HAVE_WCRTOMB''@|1|g' \ -e 's|@''HAVE_WCSRTOMBS''@|1|g' \ -e 's|@''HAVE_WCSNRTOMBS''@|1|g' \ -e 's|@''HAVE_WMEMCHR''@|1|g' \ -e 's|@''HAVE_WMEMCMP''@|1|g' \ -e 's|@''HAVE_WMEMCPY''@|1|g' \ -e 's|@''HAVE_WMEMMOVE''@|1|g' \ -e 's|@''HAVE_WMEMSET''@|1|g' \ -e 's|@''HAVE_WCSLEN''@|1|g' \ -e 's|@''HAVE_WCSNLEN''@|1|g' \ -e 's|@''HAVE_WCSCPY''@|1|g' \ -e 's|@''HAVE_WCPCPY''@|1|g' \ -e 's|@''HAVE_WCSNCPY''@|1|g' \ -e 's|@''HAVE_WCPNCPY''@|1|g' \ -e 's|@''HAVE_WCSCAT''@|1|g' \ -e 's|@''HAVE_WCSNCAT''@|1|g' \ -e 's|@''HAVE_WCSCMP''@|1|g' \ -e 's|@''HAVE_WCSNCMP''@|1|g' \ -e 's|@''HAVE_WCSCASECMP''@|1|g' \ -e 's|@''HAVE_WCSNCASECMP''@|1|g' \ -e 's|@''HAVE_WCSCOLL''@|1|g' \ -e 's|@''HAVE_WCSXFRM''@|1|g' \ -e 's|@''HAVE_WCSDUP''@|1|g' \ -e 's|@''HAVE_WCSCHR''@|1|g' \ -e 's|@''HAVE_WCSRCHR''@|1|g' \ -e 's|@''HAVE_WCSCSPN''@|1|g' \ -e 's|@''HAVE_WCSSPN''@|1|g' \ -e 's|@''HAVE_WCSPBRK''@|1|g' \ -e 's|@''HAVE_WCSSTR''@|1|g' \ -e 's|@''HAVE_WCSTOK''@|1|g' \ -e 's|@''HAVE_WCSWIDTH''@|1|g' \ -e 's|@''HAVE_WCSFTIME''@|1|g' \ -e 's|@''HAVE_DECL_WCTOB''@|1|g' \ -e 's|@''HAVE_DECL_WCWIDTH''@|1|g' \ | \ sed -e 's|@''REPLACE_MBSTATE_T''@|0|g' \ -e 's|@''REPLACE_BTOWC''@|0|g' \ -e 's|@''REPLACE_WCTOB''@|0|g' \ -e 's|@''REPLACE_MBSINIT''@|0|g' \ -e 's|@''REPLACE_MBRTOWC''@|1|g' \ -e 's|@''REPLACE_MBRLEN''@|0|g' \ -e 's|@''REPLACE_MBSRTOWCS''@|0|g' \ -e 's|@''REPLACE_MBSNRTOWCS''@|0|g' \ -e 's|@''REPLACE_WCRTOMB''@|0|g' \ -e 's|@''REPLACE_WCSRTOMBS''@|0|g' \ -e 's|@''REPLACE_WCSNRTOMBS''@|0|g' \ -e 's|@''REPLACE_WCWIDTH''@|0|g' \ -e 's|@''REPLACE_WCSWIDTH''@|0|g' \ -e 's|@''REPLACE_WCSFTIME''@|0|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r ../../src/gllib/c++defs.h' \ -e '/definition of _GL_ARG_NONNULL/r ../../src/gllib/arg-nonnull.h' \ -e '/definition of _GL_WARN_ON_USE/r ../../src/gllib/warn-on-use.h'; \ } > wchar.h-t && \ mv wchar.h-t wchar.h rm -f wctype.h-t wctype.h && \ { echo '/* DO NOT EDIT! GENERATED AUTOMATICALLY! */'; \ sed -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's/@''HAVE_WCTYPE_H''@/1/g' \ -e 's|@''INCLUDE_NEXT''@|include_next|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|#pragma GCC system_header|g' \ -e 's|@''PRAGMA_COLUMNS''@||g' \ -e 's|@''NEXT_WCTYPE_H''@||g' \ -e 's/@''HAVE_CRTDEFS_H''@/0/g' \ -e 's/@''GNULIB_OVERRIDES_WINT_T''@/0/g' \ -e 's/@''GNULIB_ISWBLANK''@/0/g' \ -e 's/@''GNULIB_WCTYPE''@/0/g' \ -e 's/@''GNULIB_ISWCTYPE''@/0/g' \ -e 's/@''GNULIB_WCTRANS''@/0/g' \ -e 's/@''GNULIB_TOWCTRANS''@/0/g' \ -e 's/@''HAVE_ISWBLANK''@/1/g' \ -e 's/@''HAVE_ISWCNTRL''@/1/g' \ -e 's/@''HAVE_WCTYPE_T''@/1/g' \ -e 's/@''HAVE_WCTRANS_T''@/1/g' \ -e 's/@''HAVE_WINT_T''@/1/g' \ -e 's/@''REPLACE_ISWBLANK''@/0/g' \ -e 's/@''REPLACE_ISWCNTRL''@/0/g' \ -e 's/@''REPLACE_TOWLOWER''@/0/g' \ -e '/definitions of _GL_FUNCDECL_RPL/r ../../src/gllib/c++defs.h' \ -e '/definition of _GL_WARN_ON_USE/r ../../src/gllib/warn-on-use.h' \ < ../../src/gllib/wctype.in.h; \ } > wctype.h-t && \ mv wctype.h-t wctype.h make all-recursive make[2]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib' make[3]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib' depbase=`echo c-ctype.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT c-ctype.o -MD -MP -MF $depbase.Tpo -c -o c-ctype.o ../../src/gllib/c-ctype.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo c-strtod.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT c-strtod.o -MD -MP -MF $depbase.Tpo -c -o c-strtod.o ../../src/gllib/c-strtod.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo sha1.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT sha1.o -MD -MP -MF $depbase.Tpo -c -o sha1.o ../../src/gllib/sha1.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo fd-hook.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT fd-hook.o -MD -MP -MF $depbase.Tpo -c -o fd-hook.o ../../src/gllib/fd-hook.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo hard-locale.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT hard-locale.o -MD -MP -MF $depbase.Tpo -c -o hard-locale.o ../../src/gllib/hard-locale.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo localcharset.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT localcharset.o -MD -MP -MF $depbase.Tpo -c -o localcharset.o ../../src/gllib/localcharset.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo glthread/lock.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT glthread/lock.o -MD -MP -MF $depbase.Tpo -c -o glthread/lock.o ../../src/gllib/glthread/lock.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo malloca.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT malloca.o -MD -MP -MF $depbase.Tpo -c -o malloca.o ../../src/gllib/malloca.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo nstrftime.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT nstrftime.o -MD -MP -MF $depbase.Tpo -c -o nstrftime.o ../../src/gllib/nstrftime.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo sockets.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT sockets.o -MD -MP -MF $depbase.Tpo -c -o sockets.o ../../src/gllib/sockets.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo stat-time.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT stat-time.o -MD -MP -MF $depbase.Tpo -c -o stat-time.o ../../src/gllib/stat-time.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo strnlen1.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT strnlen1.o -MD -MP -MF $depbase.Tpo -c -o strnlen1.o ../../src/gllib/strnlen1.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo sys_socket.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT sys_socket.o -MD -MP -MF $depbase.Tpo -c -o sys_socket.o ../../src/gllib/sys_socket.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo tempname.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT tempname.o -MD -MP -MF $depbase.Tpo -c -o tempname.o ../../src/gllib/tempname.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo glthread/threadlib.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT glthread/threadlib.o -MD -MP -MF $depbase.Tpo -c -o glthread/threadlib.o ../../src/gllib/glthread/threadlib.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo unistd.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT unistd.o -MD -MP -MF $depbase.Tpo -c -o unistd.o ../../src/gllib/unistd.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo vma-iter.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT vma-iter.o -MD -MP -MF $depbase.Tpo -c -o vma-iter.o ../../src/gllib/vma-iter.c &&\ mv -f $depbase.Tpo $depbase.Po ../../src/gllib/vma-iter.c: In function ‘vma_iterate_bsd’: ../../src/gllib/vma-iter.c:852:42: warning: unused parameter ‘callback’ [-Wunused-parameter] 852 | vma_iterate_bsd (vma_iterate_callback_fn callback, void *data) | ~~~~~~~~~~~~~~~~~~~~~~~~^~~~~~~~ ../../src/gllib/vma-iter.c:852:58: warning: unused parameter ‘data’ [-Wunused-parameter] 852 | vma_iterate_bsd (vma_iterate_callback_fn callback, void *data) | ~~~~~~^~~~ depbase=`echo wctype-h.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT wctype-h.o -MD -MP -MF $depbase.Tpo -c -o wctype-h.o ../../src/gllib/wctype-h.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo ioctl.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT ioctl.o -MD -MP -MF $depbase.Tpo -c -o ioctl.o ../../src/gllib/ioctl.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo localtime-buffer.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT localtime-buffer.o -MD -MP -MF $depbase.Tpo -c -o localtime-buffer.o ../../src/gllib/localtime-buffer.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo mbrtowc.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT mbrtowc.o -MD -MP -MF $depbase.Tpo -c -o mbrtowc.o ../../src/gllib/mbrtowc.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo mktime.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT mktime.o -MD -MP -MF $depbase.Tpo -c -o mktime.o ../../src/gllib/mktime.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo strerror_r.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT strerror_r.o -MD -MP -MF $depbase.Tpo -c -o strerror_r.o ../../src/gllib/strerror_r.c &&\ mv -f $depbase.Tpo $depbase.Po depbase=`echo time_rz.o | sed 's|[^/]*$|.deps/&|;s|\.o$||'`;\ gcc -DHAVE_CONFIG_H -I. -I../../src/gllib -I.. -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -MT time_rz.o -MD -MP -MF $depbase.Tpo -c -o time_rz.o ../../src/gllib/time_rz.c &&\ mv -f $depbase.Tpo $depbase.Po rm -f libgnu.a ar cr libgnu.a c-ctype.o c-strtod.o sha1.o fd-hook.o hard-locale.o localcharset.o glthread/lock.o malloca.o nstrftime.o sockets.o stat-time.o strnlen1.o sys_socket.o tempname.o glthread/threadlib.o unistd.o vma-iter.o wctype-h.o ioctl.o localtime-buffer.o mbrtowc.o mktime.o strerror_r.o time_rz.o ranlib libgnu.a rm -f t-charset.alias charset.alias && \ /bin/sh ../../src/gllib/config.charset 'riscv64-unknown-linux-gnu' > t-charset.alias && \ mv t-charset.alias charset.alias rm -f t-ref-add.sed ref-add.sed && \ sed -e '/^#/d' -e 's/@''PACKAGE''@/clisp/g' ../../src/gllib/ref-add.sin > t-ref-add.sed && \ mv t-ref-add.sed ref-add.sed rm -f t-ref-del.sed ref-del.sed && \ sed -e '/^#/d' -e 's/@''PACKAGE''@/clisp/g' ../../src/gllib/ref-del.sin > t-ref-del.sed && \ mv t-ref-del.sed ref-del.sed make[3]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib' make[2]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib' make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib' { echo '#include "config.h"' && cat '../src/intparam.c'; } > gen-intparam.c gcc gen-intparam.c -o intparam ./intparam intparam.h rm -f intparam gen-intparam.c { echo '#include "config.h"' && cat '../src/floatparam.c'; } > gen-floatparam.c gcc gen-floatparam.c -o floatparam ./floatparam floatparam.h rm -f floatparam gen-floatparam.c test -r libgnu.a || ln -s gllib/libgnu.a libgnu.a gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -I. ../utils/comment5.c libgnu.a -o comment5 ../utils/comment5.c: In function ‘main’: ../utils/comment5.c:137:5: warning: label ‘L6a’ defined but not used [-Wunused-label] 137 | L6a: if (c==EOF){ goto L3; } | ^~~ ../utils/comment5.c:131:5: warning: label ‘L5a’ defined but not used [-Wunused-label] 131 | L5a: if (c==EOF){ goto L3; } /* do not fix programmer errors */ | ^~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -I. ../utils/gctrigger.c libgnu.a -o gctrigger ../utils/gctrigger.c: In function ‘nexttoken’: ../utils/gctrigger.c:662:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 662 | if (!(((c>='0') && (c<='9')) || (c=='.'))) | ^ ../utils/gctrigger.c:664:7: note: here 664 | case '0': case '1': case '2': case '3': case '4': | ^~~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -I. ../utils/varbrace.c libgnu.a -o varbrace ../utils/varbrace.c: In function ‘next_token’: ../utils/varbrace.c:1327:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 1327 | if (!(((c>='0') && (c<='9')) || (c=='.'))) | ^ ../utils/varbrace.c:1329:7: note: here 1329 | case '0': case '1': case '2': case '3': case '4': | ^~~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -I. ../utils/txt2c.c libgnu.a -o txt2c gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -I. ../utils/ccmp2c.c libgnu.a -o ccmp2c ../utils/ccmp2c.c: In function ‘nexttoken’: ../utils/ccmp2c.c:538:16: warning: this statement may fall through [-Wimplicit-fallthrough=] 538 | if (!((c >= '0' && c <= '9') || c == '.')) | ^ ../utils/ccmp2c.c:541:11: note: here 541 | case '0': case '1': case '2': case '3': case '4': | ^~~~ touch modules.h ./comment5 ../src/spvw.d | ./gctrigger | ./varbrace > spvw.c ./comment5 ../src/spvwtabf.d | ./gctrigger | ./varbrace > spvwtabf.c ./comment5 ../src/spvwtabs.d | ./gctrigger | ./varbrace > spvwtabs.c ./comment5 ../src/spvwtabo.d | ./gctrigger | ./varbrace > spvwtabo.c ./comment5 ../src/eval.d | ./gctrigger | ./varbrace > eval.c ./comment5 ../src/control.d | ./gctrigger | ./varbrace > control.c ./comment5 ../src/encoding.d | ./gctrigger | ./varbrace > encoding.c ./comment5 ../src/pathname.d | ./gctrigger | ./varbrace > pathname.c ./comment5 ../src/stream.d | ./gctrigger | ./varbrace > stream.c ./comment5 ../src/socket.d | ./gctrigger | ./varbrace > socket.c ./comment5 ../src/io.d | ./gctrigger | ./varbrace > io.c ./comment5 ../src/funarg.d | ./gctrigger | ./varbrace > funarg.c ./comment5 ../src/array.d | ./gctrigger | ./varbrace > array.c ./comment5 ../src/hashtabl.d | ./gctrigger | ./varbrace > hashtabl.c ./comment5 ../src/list.d | ./gctrigger | ./varbrace > list.c ./comment5 ../src/package.d | ./gctrigger | ./varbrace > package.c ./comment5 ../src/record.d | ./gctrigger | ./varbrace > record.c ./comment5 ../src/weak.d | ./gctrigger | ./varbrace > weak.c ./comment5 ../src/sequence.d | ./gctrigger | ./varbrace > sequence.c ./comment5 ../src/charstrg.d | ./gctrigger | ./varbrace > charstrg.c ./comment5 ../src/debug.d | ./gctrigger | ./varbrace > debug.c ./comment5 ../src/error.d | ./gctrigger | ./varbrace > error.c ./comment5 ../src/misc.d | ./gctrigger | ./varbrace > misc.c ./comment5 ../src/time.d | ./gctrigger | ./varbrace > time.c ./comment5 ../src/predtype.d | ./gctrigger | ./varbrace > predtype.c ./comment5 ../src/symbol.d | ./gctrigger | ./varbrace > symbol.c ./comment5 ../src/lisparit.d | ./gctrigger | ./varbrace > lisparit.c ./comment5 ../src/i18n.d | ./gctrigger | ./varbrace > i18n.c ./comment5 ../src/foreign.d | ./gctrigger | ./varbrace > foreign.c ./comment5 ../src/unixaux.d | ./gctrigger | ./varbrace > unixaux.c ./comment5 ../src/built.d | ./gctrigger | ./varbrace > built.c ./comment5 ../src/lispbibl.d | sed -e 's/^\(%% .*\)//' | ./gctrigger | ./varbrace > lispbibl.c ./comment5 ../src/fsubr.d | ./gctrigger | ./varbrace > fsubr.c ./comment5 ../src/subr.d | ./gctrigger | ./varbrace > subr.c ./comment5 ../src/pseudofun.d | ./gctrigger | ./varbrace > pseudofun.c ./comment5 ../src/constsym.d | ./gctrigger | ./varbrace > constsym.c ./comment5 ../src/constobj.d | ./gctrigger | ./varbrace > constobj.c ./comment5 ../src/constobj_tl.d | ./gctrigger | ./varbrace > constobj_tl.c ./comment5 ../src/unix.d | ./gctrigger | ./varbrace > unix.c ./comment5 ../src/xthread.d | ./gctrigger | ./varbrace > xthread.c ./comment5 ../src/constpack.d | ./gctrigger | ./varbrace > constpack.c ./comment5 ../src/avl.d | ./gctrigger | ./varbrace > avl.c ./comment5 ../src/sort.d | ./gctrigger | ./varbrace > sort.c ./comment5 ../src/bytecode.d | ./gctrigger | ./varbrace > bytecode.c ./comment5 ../src/spvw_module.d | ./gctrigger | ./varbrace > spvw_module.c ./comment5 ../src/spvw_debug.d | ./gctrigger | ./varbrace > spvw_debug.c ./comment5 ../src/spvw_alloca.d | ./gctrigger | ./varbrace > spvw_alloca.c ./comment5 ../src/spvw_mmap.d | ./gctrigger | ./varbrace > spvw_mmap.c ./comment5 ../src/spvw_singlemap.d | ./gctrigger | ./varbrace > spvw_singlemap.c ./comment5 ../src/spvw_page.d | ./gctrigger | ./varbrace > spvw_page.c ./comment5 ../src/spvw_heap.d | ./gctrigger | ./varbrace > spvw_heap.c ./comment5 ../src/spvw_heap_old.d | ./gctrigger | ./varbrace > spvw_heap_old.c ./comment5 ../src/spvw_global.d | ./gctrigger | ./varbrace > spvw_global.c ./comment5 ../src/spvw_global_old.d | ./gctrigger | ./varbrace > spvw_global_old.c ./comment5 ../src/spvw_gcstat.d | ./gctrigger | ./varbrace > spvw_gcstat.c ./comment5 ../src/spvw_space.d | ./gctrigger | ./varbrace > spvw_space.c ./comment5 ../src/spvw_mark.d | ./gctrigger | ./varbrace > spvw_mark.c ./comment5 ../src/spvw_objsize.d | ./gctrigger | ./varbrace > spvw_objsize.c ./comment5 ../src/spvw_update.d | ./gctrigger | ./varbrace > spvw_update.c ./comment5 ../src/spvw_fault.d | ./gctrigger | ./varbrace > spvw_fault.c ./comment5 ../src/spvw_fault_old.d | ./gctrigger | ./varbrace > spvw_fault_old.c ./comment5 ../src/spvw_sigsegv.d | ./gctrigger | ./varbrace > spvw_sigsegv.c ./comment5 ../src/spvw_sigcld.d | ./gctrigger | ./varbrace > spvw_sigcld.c ./comment5 ../src/spvw_sigpipe.d | ./gctrigger | ./varbrace > spvw_sigpipe.c ./comment5 ../src/spvw_sigint.d | ./gctrigger | ./varbrace > spvw_sigint.c ./comment5 ../src/spvw_sigwinch.d | ./gctrigger | ./varbrace > spvw_sigwinch.c ./comment5 ../src/spvw_sigterm.d | ./gctrigger | ./varbrace > spvw_sigterm.c ./comment5 ../src/spvw_garcol.d | ./gctrigger | ./varbrace > spvw_garcol.c ./comment5 ../src/spvw_garcol_old.d | ./gctrigger | ./varbrace > spvw_garcol_old.c ./comment5 ../src/spvw_genera1.d | ./gctrigger | ./varbrace > spvw_genera1.c ./comment5 ../src/spvw_genera1_old.d | ./gctrigger | ./varbrace > spvw_genera1_old.c ./comment5 ../src/spvw_gcmark.d | ./gctrigger | ./varbrace > spvw_gcmark.c ./comment5 ../src/spvw_genera2.d | ./gctrigger | ./varbrace > spvw_genera2.c ./comment5 ../src/spvw_weak.d | ./gctrigger | ./varbrace > spvw_weak.c ./comment5 ../src/spvw_genera3.d | ./gctrigger | ./varbrace > spvw_genera3.c ./comment5 ../src/spvw_genera3_old.d | ./gctrigger | ./varbrace > spvw_genera3_old.c ./comment5 ../src/spvw_allocate.d | ./gctrigger | ./varbrace > spvw_allocate.c ./comment5 ../src/spvw_allocate_old.d | ./gctrigger | ./varbrace > spvw_allocate_old.c ./comment5 ../src/spvw_typealloc.d | ./gctrigger | ./varbrace > spvw_typealloc.c ./comment5 ../src/spvw_circ.d | ./gctrigger | ./varbrace > spvw_circ.c ./comment5 ../src/spvw_circ_old.d | ./gctrigger | ./varbrace > spvw_circ_old.c ./comment5 ../src/spvw_walk.d | ./gctrigger | ./varbrace > spvw_walk.c ./comment5 ../src/spvw_ctype.d | ./gctrigger | ./varbrace > spvw_ctype.c ./comment5 ../src/spvw_language.d | ./gctrigger | ./varbrace > spvw_language.c ./comment5 ../src/spvw_memfile.d | ./gctrigger | ./varbrace > spvw_memfile.c ./comment5 ../src/errunix.d | ./gctrigger | ./varbrace > errunix.c ./comment5 ../src/aridecl.d | ./gctrigger | ./varbrace > aridecl.c ./comment5 ../src/arilev0.d | ./gctrigger | ./varbrace > arilev0.c ./comment5 ../src/arilev1.d | ./gctrigger | ./varbrace > arilev1.c ./comment5 ../src/intelem.d | ./gctrigger | ./varbrace > intelem.c ./comment5 ../src/intlog.d | ./gctrigger | ./varbrace > intlog.c ./comment5 ../src/intplus.d | ./gctrigger | ./varbrace > intplus.c ./comment5 ../src/intcomp.d | ./gctrigger | ./varbrace > intcomp.c ./comment5 ../src/intbyte.d | ./gctrigger | ./varbrace > intbyte.c ./comment5 ../src/intmal.d | ./gctrigger | ./varbrace > intmal.c ./comment5 ../src/intdiv.d | ./gctrigger | ./varbrace > intdiv.c ./comment5 ../src/intgcd.d | ./gctrigger | ./varbrace > intgcd.c ./comment5 ../src/int2adic.d | ./gctrigger | ./varbrace > int2adic.c ./comment5 ../src/intsqrt.d | ./gctrigger | ./varbrace > intsqrt.c ./comment5 ../src/intprint.d | ./gctrigger | ./varbrace > intprint.c ./comment5 ../src/intread.d | ./gctrigger | ./varbrace > intread.c ./comment5 ../src/intserial.d | ./gctrigger | ./varbrace > intserial.c ./comment5 ../src/rational.d | ./gctrigger | ./varbrace > rational.c ./comment5 ../src/sfloat.d | ./gctrigger | ./varbrace > sfloat.c ./comment5 ../src/ffloat.d | ./gctrigger | ./varbrace > ffloat.c ./comment5 ../src/dfloat.d | ./gctrigger | ./varbrace > dfloat.c ./comment5 ../src/lfloat.d | ./gctrigger | ./varbrace > lfloat.c ./comment5 ../src/flo_konv.d | ./gctrigger | ./varbrace > flo_konv.c ./comment5 ../src/flo_rest.d | ./gctrigger | ./varbrace > flo_rest.c ./comment5 ../src/realelem.d | ./gctrigger | ./varbrace > realelem.c ./comment5 ../src/realrand.d | ./gctrigger | ./varbrace > realrand.c ./comment5 ../src/realtran.d | ./gctrigger | ./varbrace > realtran.c ./comment5 ../src/compelem.d | ./gctrigger | ./varbrace > compelem.c ./comment5 ../src/comptran.d | ./gctrigger | ./varbrace > comptran.c ./comment5 ../src/arilev1c.d | ./gctrigger | ./varbrace > arilev1c.c ./comment5 ../src/arilev1e.d | ./gctrigger | ./varbrace > arilev1e.c ./comment5 ../src/arilev1i.d | ./gctrigger | ./varbrace > arilev1i.c ./comment5 ../src/arilev1dbg.d | ./gctrigger | ./varbrace > arilev1dbg.c ./comment5 ../src/genclisph.d | ./gctrigger | ./varbrace > genclisph.c ./comment5 ../src/arilev1_asm_proto.d | ./gctrigger | ./varbrace > arilev1_asm_proto.c ./comment5 ../src/noreadline.d | ./gctrigger | ./varbrace > noreadline.c ./comment5 ../src/lispbibl.d | sed -e '/^%% /{s///;p;d;}' -e '/^#line /!s/.*//' | sed -e 's/puts(/fprintf(header_f,"%s\\n",/g' -e 's/print("/fprint(header_f,"/g' -e 's/printf("/fprintf(header_f,"/g' > gen.lispbibl.c gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c spvw.c In file included from ../src/spvw.d:23: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/spvw.d: In function ‘near_SP_overflow’: ../src/spvw.d:965:11: warning: variable ‘dummy’ set but not used [-Wunused-but-set-variable] 965 | var uintB dummy[0x1001]; | ^~~~~ In file included from ../src/spvw.d:1047: ../src/spvw_sigsegv.d: In function ‘stackoverflow_handler_continuation’: ../src/spvw_sigsegv.d:98:27: warning: unused variable ‘scp’ [-Wunused-variable] 98 | stackoverflow_context_t scp = (stackoverflow_context_t) arg1; | ^~~ In file included from ../src/spvw.d:1077: ../src/spvw_allocate.d: In function ‘make_space_gc_true’: ../src/spvw_allocate.d:322:4: warning: label ‘doing_gc’ defined but not used [-Wunused-label] 322 | doing_gc: | ^~~~~~~~ In file included from ../src/spvw.d:1077: ../src/spvw_allocate.d: In function ‘make_space_gc_false’: ../src/spvw_allocate.d:389:4: warning: label ‘doing_gc’ defined but not used [-Wunused-label] 389 | doing_gc: | ^~~~~~~~ In file included from ../src/spvw.d:1087: ../src/spvw_circ.d: In function ‘get_circ_mark’: ../src/spvw_circ.d:1134:19: warning: label ‘case_lrecord’ defined but not used [-Wunused-label] 1134 | case_orecord: case_lrecord: /* mark other record: */ | ^~~~~~~~~~~~ ../src/spvw_circ.d:1095:6: warning: label ‘m_array’ defined but not used [-Wunused-label] 1095 | m_array: | ^~~~~~~ In file included from ../src/spvw.d:1087: ../src/spvw_circ.d:1077:6: warning: label ‘m_svector’ defined but not used [-Wunused-label] 1077 | m_svector: | ^~~~~~~~~ In file included from ../src/spvw.d:1087: ../src/spvw_circ.d: In function ‘get_circ_unmark’: ../src/spvw_circ.d:1374:19: warning: label ‘case_lrecord’ defined but not used [-Wunused-label] 1374 | case_orecord: case_lrecord: /* unmark other record: */ | ^~~~~~~~~~~~ ../src/spvw_circ.d:1339:6: warning: label ‘u_array’ defined but not used [-Wunused-label] 1339 | u_array: | ^~~~~~~ ../src/spvw_circ.d:1324:6: warning: label ‘u_svector’ defined but not used [-Wunused-label] 1324 | u_svector: | ^~~~~~~~~ In file included from ../src/spvw.d:1087: ../src/spvw_circ.d: In function ‘subst_circ_mark’: ../src/spvw_circ.d:2004:50: warning: label ‘case_lrecord’ defined but not used [-Wunused-label] 2004 | case_closure: _case_structure _case_stream case_orecord: case_instance: case_lrecord: /* Record */ | ^~~~~~~~~~~~ ../src/spvw_circ.d:2004:35: warning: label ‘case_instance’ defined but not used [-Wunused-label] 2004 | case_closure: _case_structure _case_stream case_orecord: case_instance: case_lrecord: /* Record */ | ^~~~~~~~~~~~~ ../src/spvw_circ.d:2004:7: warning: label ‘case_closure’ defined but not used [-Wunused-label] 2004 | case_closure: _case_structure _case_stream case_orecord: case_instance: case_lrecord: /* Record */ | ^~~~~~~~~~~~ In file included from ../src/spvw.d:1087: ../src/spvw_circ.d: In function ‘subst_circ_unmark’: ../src/spvw_circ.d:2160:35: warning: label ‘case_lrecord’ defined but not used [-Wunused-label] 2160 | case_closure: _case_structure _case_stream case_orecord: case_lrecord: | ^~~~~~~~~~~~ ../src/spvw_circ.d:2160:7: warning: label ‘case_closure’ defined but not used [-Wunused-label] 2160 | case_closure: _case_structure _case_stream case_orecord: case_lrecord: | ^~~~~~~~~~~~ ../src/spvw_circ.d:2159:7: warning: label ‘case_instance’ defined but not used [-Wunused-label] 2159 | case_instance: /* Record */ | ^~~~~~~~~~~~~ ../src/spvw.d: At top level: ../src/spvw.d:1419:17: warning: no previous declaration for ‘error_pseudocode_alignment’ [-Wmissing-declarations] 1419 | global _Noreturn void error_pseudocode_alignment (uintP address, const char* prefix, const char* name) { | ^~~~~~~~~~~~~~~~~~~~~~~~~~ In file included from ../src/spvw.d:1578: ../src/subr.d: In function ‘init_subr_tab_2’: ../src/subr.d:217:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 217 | LISPFUNNF(funtabref,1) | ^ ../src/subr.d:218:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 218 | LISPFUNNR(subr_info,1) | ^ ../src/subr.d:219:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 219 | LISPFUN(special_variable_p,seclass_read,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:220:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 220 | LISPFUNNR(add_implicit_block,2) | ^ ../src/subr.d:221:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 221 | LISPFUNNR(function_block_name,1) | ^ ../src/subr.d:223:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 223 | LISPFUNNR(copy_simple_vector,1) | ^ ../src/subr.d:224:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 224 | LISPFUN(vector,seclass_no_se,0,0,rest,nokey,0,NIL) | ^ ../src/subr.d:225:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 225 | LISPFUN(aref,seclass_read,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:226:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 226 | LISPFUN(store,seclass_default,2,0,rest,nokey,0,NIL) | ^ ../src/subr.d:227:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 227 | LISPFUNNR(svref,2) | ^ ../src/subr.d:228:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 228 | LISPFUNN(svstore,3) | ^ ../src/subr.d:229:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 229 | LISPFUNN(psvstore,3) | ^ ../src/subr.d:230:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 230 | LISPFUNNR(row_major_aref,2) | ^ ../src/subr.d:231:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 231 | LISPFUNN(row_major_store,3) | ^ ../src/subr.d:232:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 232 | LISPFUNNF(array_element_type,1) | ^ ../src/subr.d:233:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 233 | LISPFUNNF(array_rank,1) | ^ ../src/subr.d:234:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 234 | LISPFUNNR(array_dimension,2) | ^ ../src/subr.d:235:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 235 | LISPFUNNR(array_dimensions,1) | ^ ../src/subr.d:236:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 236 | LISPFUNNR(array_total_size,1) | ^ ../src/subr.d:237:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 237 | LISPFUN(array_in_bounds_p,seclass_read,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:238:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 238 | LISPFUN(array_row_major_index,seclass_read,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:239:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 239 | LISPFUNNF(adjustable_array_p,1) | ^ ../src/subr.d:240:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 240 | LISPFUNN(array_displacement,1) | ^ ../src/subr.d:241:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 241 | LISPFUN(bit,seclass_read,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:242:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 242 | LISPFUN(sbit,seclass_read,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:243:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 243 | LISPFUN(bit_and,seclass_default,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:244:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 244 | LISPFUN(bit_ior,seclass_default,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:245:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 245 | LISPFUN(bit_xor,seclass_default,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:246:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 246 | LISPFUN(bit_eqv,seclass_default,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:247:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 247 | LISPFUN(bit_nand,seclass_default,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:248:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 248 | LISPFUN(bit_nor,seclass_default,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:249:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 249 | LISPFUN(bit_andc1,seclass_default,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:250:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 250 | LISPFUN(bit_andc2,seclass_default,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:251:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 251 | LISPFUN(bit_orc1,seclass_default,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:252:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 252 | LISPFUN(bit_orc2,seclass_default,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:253:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 253 | LISPFUN(bit_not,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:254:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 254 | LISPFUNNR(array_has_fill_pointer_p,1) | ^ ../src/subr.d:255:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 255 | LISPFUNNR(fill_pointer,1) | ^ ../src/subr.d:256:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 256 | LISPFUNN(set_fill_pointer,2) | ^ ../src/subr.d:257:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 257 | LISPFUNN(vector_push,2) | ^ ../src/subr.d:258:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 258 | LISPFUNN(vector_pop,1) | ^ ../src/subr.d:259:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 259 | LISPFUN(vector_push_extend,seclass_default,2,1,norest,nokey,0,NIL) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:268:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 268 | LISPFUNN(vector_init,1) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:269:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 269 | LISPFUNN(vector_upd,2) | ^ ../src/subr.d:270:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 270 | LISPFUNN(vector_endtest,2) | ^ ../src/subr.d:271:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 271 | LISPFUNN(vector_fe_init,1) | ^ ../src/subr.d:272:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 272 | LISPFUNN(vector_fe_upd,2) | ^ ../src/subr.d:273:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 273 | LISPFUNN(vector_fe_endtest,2) | ^ ../src/subr.d:274:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 274 | LISPFUNN(vector_length,1) | ^ ../src/subr.d:275:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 275 | LISPFUNN(vector_init_start,2) | ^ ../src/subr.d:276:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 276 | LISPFUNN(vector_fe_init_end,2) | ^ ../src/subr.d:277:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 277 | LISPFUNN(make_bit_vector,1) | ^ ../src/subr.d:279:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 279 | LISPFUNNR(string_info,1) | ^ ../src/subr.d:280:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 280 | LISPFUNNF(standard_char_p,1) | ^ ../src/subr.d:281:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 281 | LISPFUNNF(graphic_char_p,1) | ^ ../src/subr.d:282:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 282 | LISPFUNN(char_width,1) | ^ ../src/subr.d:283:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 283 | LISPFUNNF(string_char_p,1) | ^ ../src/subr.d:287:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 287 | LISPFUNNF(alpha_char_p,1) | ^ ../src/subr.d:288:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 288 | LISPFUNNF(upper_case_p,1) | ^ ../src/subr.d:289:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 289 | LISPFUNNF(lower_case_p,1) | ^ ../src/subr.d:290:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 290 | LISPFUNNF(both_case_p,1) | ^ ../src/subr.d:291:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 291 | LISPFUN(digit_char_p,seclass_foldable,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:292:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 292 | LISPFUNNF(alphanumericp,1) | ^ ../src/subr.d:293:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 293 | LISPFUN(char_eq,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:294:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 294 | LISPFUN(char_noteq,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:295:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 295 | LISPFUN(char_less,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:296:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 296 | LISPFUN(char_greater,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:297:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 297 | LISPFUN(char_ltequal,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:298:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 298 | LISPFUN(char_gtequal,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:299:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 299 | LISPFUN(char_equal,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:300:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 300 | LISPFUN(char_not_equal,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:301:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 301 | LISPFUN(char_lessp,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:302:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 302 | LISPFUN(char_greaterp,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:303:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 303 | LISPFUN(char_not_greaterp,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:304:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 304 | LISPFUN(char_not_lessp,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:305:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 305 | LISPFUNNF(char_code,1) | ^ ../src/subr.d:306:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 306 | LISPFUNNF(code_char,1) | ^ ../src/subr.d:307:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 307 | LISPFUNNR(character,1) | ^ ../src/subr.d:308:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 308 | LISPFUNNF(char_upcase,1) | ^ ../src/subr.d:309:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 309 | LISPFUNNF(char_downcase,1) | ^ ../src/subr.d:310:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 310 | LISPFUN(digit_char,seclass_foldable,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:311:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 311 | LISPFUNNF(char_int,1) | ^ ../src/subr.d:312:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 312 | LISPFUNNF(int_char,1) | ^ ../src/subr.d:313:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 313 | LISPFUNNF(char_name,1) | ^ ../src/subr.d:314:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 314 | LISPFUNNF(char_invertcase,1) | ^ ../src/subr.d:315:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 315 | LISPFUNNR(char,2) | ^ ../src/subr.d:316:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 316 | LISPFUNNR(schar,2) | ^ ../src/subr.d:317:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 317 | LISPFUNN(store_char,3) | ^ ../src/subr.d:318:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 318 | LISPFUNN(store_schar,3) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:361:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 361 | LISPFUNNR(string_both_trim,4) | ^ ../src/subr.d:374:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 374 | LISPFUNNR(string,1) | ^ ../src/subr.d:375:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 375 | LISPFUNNR(cs_string,1) | ^ ../src/subr.d:376:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 376 | LISPFUNNR(name_char,1) | ^ ../src/subr.d:377:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 377 | LISPFUN(substring,seclass_read,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:378:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 378 | LISPFUN(string_concat,seclass_read,0,0,rest,nokey,0,NIL) | ^ ../src/subr.d:380:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 380 | LISPFUN(exit,seclass_default,0,1,norest,nokey,0,NIL) | ^ ../src/subr.d:381:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 381 | LISPFUNNR(symbol_value,1) | ^ ../src/subr.d:382:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 382 | LISPFUNNR(symbol_function,1) | ^ ../src/subr.d:383:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 383 | LISPFUNNS(fdefinition,1) | ^ ../src/subr.d:384:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 384 | LISPFUNNR(boundp,1) | ^ ../src/subr.d:385:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 385 | LISPFUNNR(fboundp,1) | ^ ../src/subr.d:386:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 386 | LISPFUNNF(special_operator_p,1) | ^ ../src/subr.d:387:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 387 | LISPFUNN(set,2) | ^ ../src/subr.d:388:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 388 | LISPFUNN(makunbound,1) | ^ ../src/subr.d:389:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 389 | LISPFUNN(fmakunbound,1) | ^ ../src/subr.d:390:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 390 | LISPFUN(apply,seclass_default,2,0,rest,nokey,0,NIL) | ^ ../src/subr.d:391:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 391 | LISPFUN(funcall,seclass_default,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:392:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 392 | LISPFUN(mapcar,seclass_default,2,0,rest,nokey,0,NIL) | ^ ../src/subr.d:393:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 393 | LISPFUN(maplist,seclass_default,2,0,rest,nokey,0,NIL) | ^ ../src/subr.d:394:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 394 | LISPFUN(mapc,seclass_default,2,0,rest,nokey,0,NIL) | ^ ../src/subr.d:395:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 395 | LISPFUN(mapl,seclass_default,2,0,rest,nokey,0,NIL) | ^ ../src/subr.d:396:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 396 | LISPFUN(mapcan,seclass_default,2,0,rest,nokey,0,NIL) | ^ ../src/subr.d:397:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 397 | LISPFUN(mapcon,seclass_default,2,0,rest,nokey,0,NIL) | ^ ../src/subr.d:398:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 398 | LISPFUN(mapcap,seclass_default,2,0,rest,nokey,0,NIL) | ^ ../src/subr.d:399:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 399 | LISPFUN(maplap,seclass_default,2,0,rest,nokey,0,NIL) | ^ ../src/subr.d:400:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 400 | LISPFUN(values,seclass_no_se,0,0,rest,nokey,0,NIL) | ^ ../src/subr.d:401:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 401 | LISPFUNNR(values_list,1) | ^ ../src/subr.d:402:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 402 | LISPFUNN(driver,1) | ^ ../src/subr.d:403:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 403 | LISPFUNN(unwind_to_driver,1) | ^ ../src/subr.d:404:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 404 | LISPFUN(macro_function,seclass_read,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:405:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 405 | LISPFUN(macroexpand,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:406:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 406 | LISPFUN(macroexpand_1,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:407:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 407 | LISPFUNN(proclaim,1) | ^ ../src/subr.d:408:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 408 | LISPFUNN(eval,1) | ^ ../src/subr.d:409:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 409 | LISPFUN(evalhook,seclass_default,3,1,norest,nokey,0,NIL) | ^ ../src/subr.d:410:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 410 | LISPFUN(applyhook,seclass_default,4,1,norest,nokey,0,NIL) | ^ ../src/subr.d:411:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 411 | LISPFUN(constantp,seclass_read,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:412:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 412 | LISPFUNNR(global_symbol_macro_p,1) | ^ ../src/subr.d:413:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 413 | LISPFUNNR(function_side_effect,1) | ^ ../src/subr.d:414:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 414 | LISPFUNNR(function_name_p,1) | ^ ../src/subr.d:415:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 415 | LISPFUNN(check_function_name,2) | ^ ../src/subr.d:416:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 416 | LISPFUNN(check_symbol,2) | ^ ../src/subr.d:417:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 417 | LISPFUN(parse_body,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:418:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 418 | LISPFUNN(keyword_test,2) | ^ ../src/subr.d:419:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 419 | LISPFUN(xor,seclass_foldable,0,0,rest,nokey,0,NIL) | ^ ../src/subr.d:421:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 421 | LISPFUN(read_form,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:422:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 422 | LISPFUN(read_eval_print,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:423:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 423 | LISPFUNN(initial_break_driver,1) | ^ ../src/subr.d:424:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 424 | LISPFUNN(load,1) | ^ ../src/subr.d:425:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 425 | LISPFUNN(frame_up,3) | ^ ../src/subr.d:426:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 426 | LISPFUNN(frame_down,3) | ^ ../src/subr.d:427:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 427 | LISPFUNN(the_frame,0) | ^ ../src/subr.d:428:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 428 | LISPFUNN(same_env_as,2) | ^ ../src/subr.d:429:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 429 | LISPFUNN(eval_at,2) | ^ ../src/subr.d:430:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 430 | LISPFUNN(eval_frame_p,1) | ^ ../src/subr.d:431:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 431 | LISPFUNN(driver_frame_p,1) | ^ ../src/subr.d:432:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 432 | LISPFUNN(trap_eval_frame,2) | ^ ../src/subr.d:433:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 433 | LISPFUNN(redo_eval_frame,1) | ^ ../src/subr.d:434:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 434 | LISPFUNN(return_from_eval_frame,2) | ^ ../src/subr.d:435:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 435 | LISPFUNN(describe_frame,2) | ^ ../src/subr.d:436:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 436 | LISPFUN(show_stack,seclass_default,0,3,norest,nokey,0,NIL) | ^ ../src/subr.d:437:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 437 | LISPFUNN(crash,0) | ^ ../src/subr.d:438:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 438 | LISPFUNN(proom,0) | ^ ../src/subr.d:439:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 439 | LISPFUN(gc,seclass_default,0,1,norest,nokey,0,NIL) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:444:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 444 | LISPFUNNF(encodingp,1) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:445:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 445 | LISPFUNNR(charset_typep,2) | ^ ../src/subr.d:446:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 446 | LISPFUNNF(encoding_line_terminator,1) | ^ ../src/subr.d:448:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 448 | LISPFUNNF(encoding_charset,1) | ^ ../src/subr.d:449:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 449 | LISPFUN(charset_range,seclass_read,3,1,norest,nokey,0,NIL) | ^ ../src/subr.d:451:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 451 | LISPFUNNR(default_file_encoding,0) | ^ ../src/subr.d:452:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 452 | LISPFUNN(set_default_file_encoding,1) | ^ ../src/subr.d:454:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 454 | LISPFUNNR(pathname_encoding,0) | ^ ../src/subr.d:455:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 455 | LISPFUNN(set_pathname_encoding,1) | ^ ../src/subr.d:456:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 456 | LISPFUNNR(terminal_encoding,0) | ^ ../src/subr.d:457:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 457 | LISPFUNN(set_terminal_encoding,1) | ^ ../src/subr.d:459:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 459 | LISPFUNNR(foreign_encoding,0) | ^ ../src/subr.d:460:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 460 | LISPFUNN(set_foreign_encoding,1) | ^ ../src/subr.d:462:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 462 | LISPFUNNR(misc_encoding,0) | ^ ../src/subr.d:463:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 463 | LISPFUNN(set_misc_encoding,1) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:470:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 470 | LISPFUNNF(strerror,1) | ^ ../src/subr.d:474:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 474 | LISPFUN(error,seclass_default,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:475:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 475 | LISPFUNN(defclcs,1) | ^ ../src/subr.d:476:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 476 | LISPFUN(cerror_of_type,seclass_default,3,0,rest,nokey,0,NIL) | ^ ../src/subr.d:477:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 477 | LISPFUN(error_of_type,seclass_default,2,0,rest,nokey,0,NIL) | ^ ../src/subr.d:478:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 478 | LISPFUNN(invoke_debugger,1) | ^ ../src/subr.d:479:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 479 | LISPFUN(clcs_signal,seclass_default,1,0,rest,nokey,0,NIL) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:485:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 485 | LISPFUN(gethash,seclass_read,2,1,norest,nokey,0,NIL) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:486:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 486 | LISPFUNN(puthash,3) | ^ ../src/subr.d:487:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 487 | LISPFUNN(remhash,2) | ^ ../src/subr.d:488:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 488 | LISPFUNN(maphash,2) | ^ ../src/subr.d:489:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 489 | LISPFUNN(clrhash,1) | ^ ../src/subr.d:490:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 490 | LISPFUNNR(hash_table_count,1) | ^ ../src/subr.d:491:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 491 | LISPFUNNR(hash_table_rehash_size,1) | ^ ../src/subr.d:492:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 492 | LISPFUNNR(hash_table_rehash_threshold,1) | ^ ../src/subr.d:493:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 493 | LISPFUNNR(hash_table_size,1) | ^ ../src/subr.d:494:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 494 | LISPFUNNF(hash_table_test,1) | ^ ../src/subr.d:495:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 495 | LISPFUNNF(fasthash_stable_p,1) | ^ ../src/subr.d:496:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 496 | LISPFUNNR(stablehash_stable_p,1) | ^ ../src/subr.d:497:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 497 | LISPFUNNR(hash_table_iterator,1) | ^ ../src/subr.d:498:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 498 | LISPFUNN(hash_table_iterate,1) | ^ ../src/subr.d:499:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 499 | LISPFUNNR(hash_table_weak_p,1) | ^ ../src/subr.d:500:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 500 | LISPFUNN(set_hash_table_weak_p,2) | ^ ../src/subr.d:501:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 501 | LISPFUNNR(hash_table_warn_if_needs_rehash_after_gc,1) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:502:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 502 | LISPFUNN(set_hash_table_warn_if_needs_rehash_after_gc,2) | ^ ../src/subr.d:503:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 503 | LISPFUNN(class_gethash,2) | ^ ../src/subr.d:504:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 504 | LISPFUN(class_tuple_gethash,seclass_default,2,0,rest,nokey,0,NIL) | ^ ../src/subr.d:505:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 505 | LISPFUNN(sxhash,1) | ^ ../src/subr.d:507:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 507 | LISPFUNN(defio,2) | ^ ../src/subr.d:508:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 508 | LISPFUN(copy_readtable,seclass_read,0,2,norest,nokey,0,NIL) | ^ ../src/subr.d:509:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 509 | LISPFUN(set_syntax_from_char,seclass_default,2,2,norest,nokey,0,NIL) | ^ ../src/subr.d:510:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 510 | LISPFUN(set_macro_character,seclass_default,2,2,norest,nokey,0,NIL) | ^ ../src/subr.d:511:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 511 | LISPFUN(get_macro_character,seclass_read,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:512:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 512 | LISPFUN(make_dispatch_macro_character,seclass_default,1,2,norest,nokey,0,NIL) | ^~ ../src/subr.d:513:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 513 | LISPFUN(set_dispatch_macro_character,seclass_default,3,1,norest,nokey,0,NIL) | ^ ../src/subr.d:514:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 514 | LISPFUN(get_dispatch_macro_character,seclass_rd_sig,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:515:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 515 | LISPFUNN(readtable_case,1) | ^ ../src/subr.d:516:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 516 | LISPFUNN(set_readtable_case,2) | ^ ../src/subr.d:517:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 517 | LISPFUNN(lpar_reader,2) | ^ ../src/subr.d:518:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 518 | LISPFUNN(rpar_reader,2) | ^ ../src/subr.d:519:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 519 | LISPFUNN(string_reader,2) | ^ ../src/subr.d:520:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 520 | LISPFUNN(quote_reader,2) | ^ ../src/subr.d:521:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 521 | LISPFUNN(line_comment_reader,2) | ^ ../src/subr.d:522:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 522 | LISPFUNN(function_reader,3) | ^ ../src/subr.d:523:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 523 | LISPFUNN(comment_reader,3) | ^ ../src/subr.d:524:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 524 | LISPFUNN(char_reader,3) | ^ ../src/subr.d:525:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 525 | LISPFUNN(binary_reader,3) | ^ ../src/subr.d:526:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 526 | LISPFUNN(octal_reader,3) | ^ ../src/subr.d:527:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 527 | LISPFUNN(hexadecimal_reader,3) | ^ ../src/subr.d:528:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 528 | LISPFUNN(radix_reader,3) | ^ ../src/subr.d:529:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 529 | LISPFUNN(complex_reader,3) | ^ ../src/subr.d:530:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 530 | LISPFUNN(uninterned_reader,3) | ^ ../src/subr.d:531:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 531 | LISPFUNN(bit_vector_reader,3) | ^ ../src/subr.d:532:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 532 | LISPFUNN(vector_reader,3) | ^ ../src/subr.d:533:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 533 | LISPFUNN(array_reader,3) | ^ ../src/subr.d:534:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 534 | LISPFUNN(read_eval_reader,3) | ^ ../src/subr.d:535:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 535 | LISPFUNN(load_eval_reader,3) | ^ ../src/subr.d:536:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 536 | LISPFUNN(label_definition_reader,3) | ^ ../src/subr.d:537:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 537 | LISPFUNN(label_reference_reader,3) | ^ ../src/subr.d:538:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 538 | LISPFUNN(not_readable_reader,3) | ^ ../src/subr.d:539:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 539 | LISPFUNN(syntax_error_reader,3) | ^ ../src/subr.d:540:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 540 | LISPFUNNR(featurep,1) | ^ ../src/subr.d:541:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 541 | LISPFUNN(feature_reader,3) | ^ ../src/subr.d:542:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 542 | LISPFUNN(not_feature_reader,3) | ^ ../src/subr.d:543:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 543 | LISPFUNN(structure_reader,3) | ^ ../src/subr.d:544:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 544 | LISPFUNN(closure_reader,3) | ^ ../src/subr.d:545:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 545 | LISPFUNN(clisp_pathname_reader,3) | ^ ../src/subr.d:546:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 546 | LISPFUNN(ansi_pathname_reader,3) | ^ ../src/subr.d:548:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 548 | LISPFUNN(unix_executable_reader,3) | ^ ../src/subr.d:550:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 550 | LISPFUN(readL,seclass_default,0,4,norest,nokey,0,NIL) | ^ ../src/subr.d:551:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 551 | LISPFUN(read_preserving_whitespace,seclass_default,0,4,norest,nokey,0,NIL) | ^ ../src/subr.d:552:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 552 | LISPFUN(read_delimited_list,seclass_default,1,2,norest,nokey,0,NIL) | ^ ../src/subr.d:553:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 553 | LISPFUN(read_line,seclass_default,0,4,norest,nokey,0,NIL) | ^ ../src/subr.d:554:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 554 | LISPFUN(read_char,seclass_default,0,4,norest,nokey,0,NIL) | ^ ../src/subr.d:555:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 555 | LISPFUN(unread_char,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:556:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 556 | LISPFUN(peek_char,seclass_default,0,5,norest,nokey,0,NIL) | ^ ../src/subr.d:557:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 557 | LISPFUN(listenL,seclass_default,0,1,norest,nokey,0,NIL) | ^ ../src/subr.d:558:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 558 | LISPFUNN(read_char_will_hang_p,1) | ^ ../src/subr.d:559:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 559 | LISPFUN(read_char_no_hang,seclass_default,0,4,norest,nokey,0,NIL) | ^ ../src/subr.d:560:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 560 | LISPFUN(clear_input,seclass_default,0,1,norest,nokey,0,NIL) | ^ ../src/subr.d:565:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 565 | LISPFUNN(print_structure,2) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:571:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 571 | LISPFUN(prin1,seclass_default,1,1,norest,nokey,0,NIL) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:572:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 572 | LISPFUN(print,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:573:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 573 | LISPFUN(pprint,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:574:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 574 | LISPFUN(pprint_indent,seclass_default,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:575:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 575 | LISPFUN(pprint_newline,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:576:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 576 | LISPFUN(format_tabulate,seclass_default,3,2,norest,nokey,0,NIL) | ^ ../src/subr.d:577:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 577 | LISPFUNN(ppprint_logical_block,3) | ^ ../src/subr.d:578:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 578 | LISPFUNN(pcirclep,2) | ^ ../src/subr.d:579:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 579 | LISPFUN(princ,seclass_default,1,1,norest,nokey,0,NIL) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:584:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 584 | LISPFUNN(prin1_to_string,1) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:585:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 585 | LISPFUNN(princ_to_string,1) | ^ ../src/subr.d:586:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 586 | LISPFUN(write_char,seclass_default,1,1,norest,nokey,0,NIL) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:589:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 589 | LISPFUN(terpri,seclass_default,0,1,norest,nokey,0,NIL) | ^ ../src/subr.d:590:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 590 | LISPFUN(fresh_line,seclass_default,0,1,norest,nokey,0,NIL) | ^ ../src/subr.d:591:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 591 | LISPFUN(elastic_newline,seclass_default,0,1,norest,nokey,0,NIL) | ^ ../src/subr.d:592:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 592 | LISPFUN(finish_output,seclass_default,0,1,norest,nokey,0,NIL) | ^ ../src/subr.d:593:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 593 | LISPFUN(force_output,seclass_default,0,1,norest,nokey,0,NIL) | ^ ../src/subr.d:594:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 594 | LISPFUN(clear_output,seclass_default,0,1,norest,nokey,0,NIL) | ^ ../src/subr.d:597:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 597 | LISPFUN(line_position,seclass_default,0,1,norest,nokey,0,NIL) | ^ ../src/subr.d:598:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 598 | LISPFUNN(whitespacep,1) | ^ ../src/subr.d:599:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 599 | LISPFUN(write_spaces,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:601:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 601 | LISPFUNNR(car,1) | ^ ../src/subr.d:602:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 602 | LISPFUNNR(cdr,1) | ^ ../src/subr.d:603:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 603 | LISPFUNNR(caar,1) | ^ ../src/subr.d:604:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 604 | LISPFUNNR(cadr,1) | ^ ../src/subr.d:605:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 605 | LISPFUNNR(cdar,1) | ^ ../src/subr.d:606:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 606 | LISPFUNNR(cddr,1) | ^ ../src/subr.d:607:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 607 | LISPFUNNR(caaar,1) | ^ ../src/subr.d:608:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 608 | LISPFUNNR(caadr,1) | ^ ../src/subr.d:609:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 609 | LISPFUNNR(cadar,1) | ^ ../src/subr.d:610:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 610 | LISPFUNNR(caddr,1) | ^ ../src/subr.d:611:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 611 | LISPFUNNR(cdaar,1) | ^ ../src/subr.d:612:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 612 | LISPFUNNR(cdadr,1) | ^ ../src/subr.d:613:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 613 | LISPFUNNR(cddar,1) | ^ ../src/subr.d:614:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 614 | LISPFUNNR(cdddr,1) | ^ ../src/subr.d:615:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 615 | LISPFUNNR(caaaar,1) | ^ ../src/subr.d:616:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 616 | LISPFUNNR(caaadr,1) | ^ ../src/subr.d:617:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 617 | LISPFUNNR(caadar,1) | ^ ../src/subr.d:618:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 618 | LISPFUNNR(caaddr,1) | ^ ../src/subr.d:619:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 619 | LISPFUNNR(cadaar,1) | ^ ../src/subr.d:620:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 620 | LISPFUNNR(cadadr,1) | ^ ../src/subr.d:621:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 621 | LISPFUNNR(caddar,1) | ^ ../src/subr.d:622:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 622 | LISPFUNNR(cadddr,1) | ^ ../src/subr.d:623:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 623 | LISPFUNNR(cdaaar,1) | ^ ../src/subr.d:624:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 624 | LISPFUNNR(cdaadr,1) | ^ ../src/subr.d:625:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 625 | LISPFUNNR(cdadar,1) | ^ ../src/subr.d:626:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 626 | LISPFUNNR(cdaddr,1) | ^ ../src/subr.d:627:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 627 | LISPFUNNR(cddaar,1) | ^ ../src/subr.d:628:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 628 | LISPFUNNR(cddadr,1) | ^ ../src/subr.d:629:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 629 | LISPFUNNR(cdddar,1) | ^ ../src/subr.d:630:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 630 | LISPFUNNR(cddddr,1) | ^ ../src/subr.d:631:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 631 | LISPFUN(cons,seclass_no_se,2,0,norest,nokey,0,NIL) | ^ ../src/subr.d:633:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 633 | LISPFUNNF(endp,1) | ^ ../src/subr.d:634:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 634 | LISPFUNNR(list_length,1) | ^ ../src/subr.d:635:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 635 | LISPFUNNR(list_length_dotted,1) | ^ ../src/subr.d:636:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 636 | LISPFUNNR(list_length_proper,1) | ^ ../src/subr.d:637:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 637 | LISPFUNNR(list_length_in_bounds_p,4) | ^ ../src/subr.d:638:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 638 | LISPFUN(proper_list_length_in_bounds_p,seclass_read,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:639:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 639 | LISPFUNNR(nth,2) | ^ ../src/subr.d:640:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 640 | LISPFUNNR(first,1) | ^ ../src/subr.d:641:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 641 | LISPFUNNR(second,1) | ^ ../src/subr.d:642:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 642 | LISPFUNNR(third,1) | ^ ../src/subr.d:643:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 643 | LISPFUNNR(fourth,1) | ^ ../src/subr.d:644:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 644 | LISPFUNNR(fifth,1) | ^ ../src/subr.d:645:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 645 | LISPFUNNR(sixth,1) | ^ ../src/subr.d:646:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 646 | LISPFUNNR(seventh,1) | ^ ../src/subr.d:647:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 647 | LISPFUNNR(eighth,1) | ^ ../src/subr.d:648:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 648 | LISPFUNNR(ninth,1) | ^ ../src/subr.d:649:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 649 | LISPFUNNR(tenth,1) | ^ ../src/subr.d:650:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 650 | LISPFUNNR(rest,1) | ^ ../src/subr.d:651:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 651 | LISPFUNNR(nthcdr,2) | ^ ../src/subr.d:652:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 652 | LISPFUNNR(conses_p,2) | ^ ../src/subr.d:653:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 653 | LISPFUN(last,seclass_read,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:654:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 654 | LISPFUN(list,seclass_no_se,0,0,rest,nokey,0,NIL) | ^ ../src/subr.d:655:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 655 | LISPFUN(liststar,seclass_no_se,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:657:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 657 | LISPFUN(append,seclass_read,0,0,rest,nokey,0,NIL) | ^ ../src/subr.d:658:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 658 | LISPFUNNR(copy_list,1) | ^ ../src/subr.d:659:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 659 | LISPFUNNR(copy_alist,1) | ^ ../src/subr.d:660:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 660 | LISPFUNNR(copy_tree,1) | ^ ../src/subr.d:661:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 661 | LISPFUNNR(revappend,2) | ^ ../src/subr.d:662:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 662 | LISPFUN(nconc,seclass_default,0,0,rest,nokey,0,NIL) | ^ ../src/subr.d:663:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 663 | LISPFUNN(nreconc,2) | ^ ../src/subr.d:664:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 664 | LISPFUNN(list_nreverse,1) | ^ ../src/subr.d:665:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 665 | LISPFUN(butlast,seclass_read,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:666:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 666 | LISPFUN(nbutlast,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:667:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 667 | LISPFUNNR(ldiff,2) | ^ ../src/subr.d:668:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 668 | LISPFUNN(rplaca,2) | ^ ../src/subr.d:669:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 669 | LISPFUNN(prplaca,2) | ^ ../src/subr.d:670:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 670 | LISPFUNN(rplacd,2) | ^ ../src/subr.d:671:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 671 | LISPFUNN(prplacd,2) | ^ ../src/subr.d:684:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 684 | LISPFUNNR(memq,2) | ^ ../src/subr.d:689:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 689 | LISPFUNNR(tailp,2) | ^ ../src/subr.d:692:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 692 | LISPFUN(acons,seclass_no_se,3,0,norest,nokey,0,NIL) | ^ ../src/subr.d:693:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 693 | LISPFUN(pairlis,seclass_read,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:702:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 702 | LISPFUNN(list_upd,2) | ^ ../src/subr.d:703:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 703 | LISPFUNN(list_endtest,2) | ^ ../src/subr.d:704:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 704 | LISPFUNN(list_fe_init,1) | ^ ../src/subr.d:705:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 705 | LISPFUNN(list_access,2) | ^ ../src/subr.d:706:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 706 | LISPFUNN(list_access_set,3) | ^ ../src/subr.d:707:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 707 | LISPFUNN(list_elt,2) | ^ ../src/subr.d:708:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 708 | LISPFUNN(list_set_elt,3) | ^ ../src/subr.d:709:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 709 | LISPFUNN(list_init_start,2) | ^ ../src/subr.d:710:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 710 | LISPFUNN(list_fe_init_end,2) | ^ ../src/subr.d:712:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 712 | LISPFUN(lisp_implementation_type,seclass_no_se,0,0,norest,nokey,0,NIL) | ^ ../src/subr.d:713:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 713 | LISPFUN(lisp_implementation_version,seclass_no_se,0,0,norest,nokey,0,NIL) | ^ ../src/subr.d:714:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 714 | LISPFUN(version,seclass_default,0,1,norest,nokey,0,NIL) | ^ ../src/subr.d:715:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 715 | LISPFUNN(machinetype,0) | ^ ../src/subr.d:716:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 716 | LISPFUNN(machine_version,0) | ^ ../src/subr.d:717:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 717 | LISPFUNN(operating_system_type,0) | ^ ../src/subr.d:718:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 718 | LISPFUNN(operating_system_version,0) | ^ ../src/subr.d:719:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 719 | LISPFUN(get_env,seclass_default,0,1,norest,nokey,0,NIL) | ^ ../src/subr.d:720:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 720 | LISPFUNN(set_env,2) | ^ ../src/subr.d:724:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 724 | LISPFUN(software_type,seclass_no_se,0,0,norest,nokey,0,NIL) | ^ ../src/subr.d:725:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 725 | LISPFUN(software_version,seclass_no_se,0,0,norest,nokey,0,NIL) | ^ ../src/subr.d:726:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 726 | LISPFUNNF(identity,1) | ^ ../src/subr.d:727:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 727 | LISPFUNN(address_of,1) | ^ ../src/subr.d:728:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 728 | LISPFUNN(code_address_of,1) | ^ ../src/subr.d:729:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 729 | LISPFUNN(process_id,0) | ^ ../src/subr.d:730:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 730 | LISPFUNNF(ansi,0) | ^ ../src/subr.d:731:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 731 | LISPFUNN(set_ansi,1) | ^ ../src/subr.d:732:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 732 | LISPFUN(module_info,seclass_no_se,0,2,norest,nokey,0,NIL) | ^ ../src/subr.d:733:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 733 | LISPFUN(argv,seclass_no_se,0,0,norest,nokey,0,NIL) | ^ ../src/subr.d:735:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 735 | LISPFUNNR(current_language,0) | ^ ../src/subr.d:736:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 736 | LISPFUNN(set_current_language,1) | ^ ../src/subr.d:737:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 737 | LISPFUNNR(text,1) | ^ ../src/subr.d:739:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 739 | LISPFUNN(machine_instance,0) | ^ ../src/subr.d:741:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 741 | LISPFUNNR(get_internal_real_time,0) | ^ ../src/subr.d:742:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 742 | LISPFUN(get_internal_run_time,seclass_read,0,1,norest,nokey,0,NIL) | ^ ../src/subr.d:743:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 743 | LISPFUNNR(get_universal_time,0) | ^ ../src/subr.d:745:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 745 | LISPFUNNR(default_time_zone,2) | ^ ../src/subr.d:747:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 747 | LISPFUNN(psleep,2) | ^ ../src/subr.d:748:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 748 | LISPFUN(pptime,seclass_read,0,1,norest,nokey,0,NIL) | ^ ../src/subr.d:749:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 749 | LISPFUNNF(delta4,5) | ^ ../src/subr.d:751:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 751 | LISPFUNNR(make_symbol,1) | ^ ../src/subr.d:752:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 752 | LISPFUNNR(find_package,1) | ^ ../src/subr.d:753:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 753 | LISPFUNN(pfind_package,1) | ^ ../src/subr.d:754:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 754 | LISPFUNNR(package_name,1) | ^ ../src/subr.d:755:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 755 | LISPFUNNR(package_nicknames,1) | ^ ../src/subr.d:756:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 756 | LISPFUN(rename_package,seclass_default,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:757:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 757 | LISPFUNNR(package_use_list,1) | ^ ../src/subr.d:758:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 758 | LISPFUNNR(package_used_by_list,1) | ^ ../src/subr.d:759:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 759 | LISPFUNNR(package_shadowing_symbols,1) | ^ ../src/subr.d:760:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 760 | LISPFUNNR(package_lock,1) | ^ ../src/subr.d:761:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 761 | LISPFUNNR(package_shortest_name,1) | ^ ../src/subr.d:762:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 762 | LISPFUNNR(package_case_sensitive_p,1) | ^ ../src/subr.d:763:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 763 | LISPFUNNR(package_case_inverted_p,1) | ^ ../src/subr.d:764:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 764 | LISPFUNNR(package_documentation,1) | ^ ../src/subr.d:765:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 765 | LISPFUNN(set_package_documentation,2) | ^ ../src/subr.d:766:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 766 | LISPFUNN(set_package_case_inverted_p,2) | ^ ../src/subr.d:767:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 767 | LISPFUNN(set_package_case_sensitive_p,2) | ^ ../src/subr.d:768:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 768 | LISPFUNN(set_package_lock,2) | ^ ../src/subr.d:769:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 769 | LISPFUNN(symbol_value_lock,1) | ^ ../src/subr.d:770:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 770 | LISPFUNN(check_package_lock,3) | ^ ../src/subr.d:771:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 771 | LISPFUNNR(list_all_packages,0) | ^ ../src/subr.d:772:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 772 | LISPFUN(intern,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:773:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 773 | LISPFUN(cs_intern,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:774:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 774 | LISPFUN(find_symbol,seclass_read,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:775:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 775 | LISPFUN(cs_find_symbol,seclass_read,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:776:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 776 | LISPFUN(unintern,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:777:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 777 | LISPFUN(export,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:778:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 778 | LISPFUN(unexport,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:779:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 779 | LISPFUNN(re_export,2) | ^ ../src/subr.d:780:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 780 | LISPFUN(import,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:781:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 781 | LISPFUN(shadowing_import,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:782:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 782 | LISPFUN(shadow,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:783:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 783 | LISPFUN(cs_shadow,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:784:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 784 | LISPFUN(use_package,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:785:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 785 | LISPFUN(unuse_package,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:792:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 792 | LISPFUNN(delete_package,1) | ^ ../src/subr.d:793:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 793 | LISPFUNNR(find_all_symbols,1) | ^ ../src/subr.d:794:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 794 | LISPFUNNR(cs_find_all_symbols,1) | ^ ../src/subr.d:795:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 795 | LISPFUNN(map_symbols,2) | ^ ../src/subr.d:796:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 796 | LISPFUNN(map_external_symbols,2) | ^ ../src/subr.d:797:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 797 | LISPFUNN(map_all_symbols,1) | ^ ../src/subr.d:798:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 798 | LISPFUNN(package_iterator,2) | ^ ../src/subr.d:799:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 799 | LISPFUNN(package_iterate,1) | ^ ../src/subr.d:803:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 803 | LISPFUNNR(pathname,1) | ^ ../src/subr.d:809:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 809 | LISPFUNNR(pathnameversion,1) | ^ ../src/subr.d:810:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 810 | LISPFUNNS(logical_pathname,1) | ^ ../src/subr.d:813:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 813 | LISPFUNNR(file_namestring,1) | ^ ../src/subr.d:814:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 814 | LISPFUNNR(directory_namestring,1) | ^ ../src/subr.d:815:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 815 | LISPFUNNR(host_namestring,1) | ^ ../src/subr.d:817:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 817 | LISPFUN(enough_namestring,seclass_read,1,1,norest,nokey,0,NIL) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:824:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 824 | LISPFUN(user_homedir_pathname,seclass_default,0,1,norest,nokey,0,NIL) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:825:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 825 | LISPFUN(wild_pathname_p,seclass_rd_sig,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:826:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 826 | LISPFUNNS(pathname_match_p,2) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:829:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 829 | LISPFUNN(absolute_pathname,1) | ^ ../src/subr.d:830:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 830 | LISPFUNNR(namestring,1) | ^ ../src/subr.d:831:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 831 | LISPFUNNS(truename,1) | ^ ../src/subr.d:832:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 832 | LISPFUNNS(probe_file,1) | ^ ../src/subr.d:834:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 834 | LISPFUNNS(probe_directory,1) | ^ ../src/subr.d:835:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 835 | LISPFUNN(delete_file,1) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:842:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 842 | LISPFUN(cd,seclass_default,0,1,norest,nokey,0,NIL) | ^ ../src/subr.d:843:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 843 | LISPFUNN(make_directory,1) | ^ ../src/subr.d:844:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 844 | LISPFUNN(delete_directory,1) | ^ ../src/subr.d:845:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 845 | LISPFUNN(rename_directory,2) | ^ ../src/subr.d:848:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 848 | LISPFUNNS(file_write_date,1) | ^ ../src/subr.d:849:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 849 | LISPFUNNS(file_author,1) | ^ ../src/subr.d:851:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 851 | LISPFUN(execute,seclass_default,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:856:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 856 | LISPFUN(shell,seclass_default,0,1,norest,nokey,0,NIL) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:863:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 863 | LISPFUNN(savemem,2) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:865:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 865 | LISPFUNN(dynload_modules,2) | ^ ../src/subr.d:867:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 867 | LISPFUNN(program_name,0) | ^ ../src/subr.d:868:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 868 | LISPFUNN(lib_directory,0) | ^ ../src/subr.d:869:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 869 | LISPFUNN(set_lib_directory,1) | ^ ../src/subr.d:871:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 871 | LISPFUN(eq,SECFC(seclass_foldable,fastcmp_eq),2,0,norest,nokey,0,NIL) | ^ ../src/subr.d:872:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 872 | LISPFUN(eql,SECFC(seclass_foldable,fastcmp_eql),2,0,norest,nokey,0,NIL) | ^ ../src/subr.d:873:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 873 | LISPFUN(equal,SECFC(seclass_read,fastcmp_equal),2,0,norest,nokey,0,NIL) | ^ ../src/subr.d:874:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 874 | LISPFUN(equalp,SECFC(seclass_read,fastcmp_equalp),2,0,norest,nokey,0,NIL) | ^ ../src/subr.d:875:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 875 | LISPFUNNF(consp,1) | ^ ../src/subr.d:876:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 876 | LISPFUNNF(atom,1) | ^ ../src/subr.d:877:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 877 | LISPFUNNF(symbolp,1) | ^ ../src/subr.d:878:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 878 | LISPFUNNF(stringp,1) | ^ ../src/subr.d:879:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 879 | LISPFUNNF(numberp,1) | ^ ../src/subr.d:880:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 880 | LISPFUNNR(compiled_function_p,1) | ^ ../src/subr.d:881:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 881 | LISPFUNNR(pcompiled_function_p,1) | ^ ../src/subr.d:882:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 882 | LISPFUNNF(null,1) | ^ ../src/subr.d:883:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 883 | LISPFUNNF(not,1) | ^ ../src/subr.d:884:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 884 | LISPFUNNF(closurep,1) | ^ ../src/subr.d:885:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 885 | LISPFUNNF(listp,1) | ^ ../src/subr.d:886:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 886 | LISPFUNNR(proper_list_p,1) | ^ ../src/subr.d:887:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 887 | LISPFUNNF(bytep,1) | ^ ../src/subr.d:888:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 888 | LISPFUNNF(integerp,1) | ^ ../src/subr.d:889:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 889 | LISPFUNNF(fixnump,1) | ^ ../src/subr.d:890:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 890 | LISPFUNNF(rationalp,1) | ^ ../src/subr.d:891:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 891 | LISPFUNNF(floatp,1) | ^ ../src/subr.d:892:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 892 | LISPFUNNF(short_float_p,1) | ^ ../src/subr.d:893:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 893 | LISPFUNNF(single_float_p,1) | ^ ../src/subr.d:894:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 894 | LISPFUNNF(double_float_p,1) | ^ ../src/subr.d:895:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 895 | LISPFUNNF(long_float_p,1) | ^ ../src/subr.d:896:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 896 | LISPFUNNF(realp,1) | ^ ../src/subr.d:897:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 897 | LISPFUNNF(complexp,1) | ^ ../src/subr.d:898:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 898 | LISPFUNNR(streamp,1) | ^ ../src/subr.d:899:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 899 | LISPFUNNF(built_in_stream_p,1) | ^ ../src/subr.d:900:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 900 | LISPFUNNF(random_state_p,1) | ^ ../src/subr.d:901:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 901 | LISPFUNNF(readtablep,1) | ^ ../src/subr.d:902:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 902 | LISPFUNNF(hash_table_p,1) | ^ ../src/subr.d:903:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 903 | LISPFUNNF(pathnamep,1) | ^ ../src/subr.d:904:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 904 | LISPFUNNF(logical_pathname_p,1) | ^ ../src/subr.d:905:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 905 | LISPFUNNF(characterp,1) | ^ ../src/subr.d:906:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 906 | LISPFUNNF(functionp,1) | ^ ../src/subr.d:907:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 907 | LISPFUNNF(packagep,1) | ^ ../src/subr.d:908:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 908 | LISPFUNNF(arrayp,1) | ^ ../src/subr.d:909:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 909 | LISPFUNNF(simple_array_p,1) | ^ ../src/subr.d:910:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 910 | LISPFUNNF(bit_vector_p,1) | ^ ../src/subr.d:911:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 911 | LISPFUNNF(vectorp,1) | ^ ../src/subr.d:912:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 912 | LISPFUNNF(simple_vector_p,1) | ^ ../src/subr.d:913:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 913 | LISPFUNNF(simple_string_p,1) | ^ ../src/subr.d:914:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 914 | LISPFUNNF(simple_bit_vector_p,1) | ^ ../src/subr.d:915:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 915 | LISPFUNNR(type_of,1) | ^ ../src/subr.d:916:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 916 | LISPFUNN(defclos,6) | ^ ../src/subr.d:917:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 917 | LISPFUNNR(potential_class_p,1) | ^ ../src/subr.d:918:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 918 | LISPFUNNR(defined_class_p,1) | ^ ../src/subr.d:919:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 919 | LISPFUNNR(class_of,1) | ^ ../src/subr.d:920:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 920 | LISPFUN(find_class,seclass_default,1,2,norest,nokey,0,NIL) | ^ ../src/subr.d:921:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 921 | LISPFUNN(typep_class,2) | ^ ../src/subr.d:922:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 922 | LISPFUN(expand_deftype,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:923:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 923 | LISPFUNNS(coerce,2) | ^ ../src/subr.d:924:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 924 | LISPFUNN(note_new_structure_class,0) | ^ ../src/subr.d:925:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 925 | LISPFUNN(note_new_standard_class,0) | ^ ../src/subr.d:926:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 926 | LISPFUNN(heap_statistics,0) | ^ ../src/subr.d:927:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 927 | LISPFUNN(gc_statistics,0) | ^ ../src/subr.d:928:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 928 | LISPFUNN(list_statistics,1) | ^ ../src/subr.d:929:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 929 | LISPFUNN(heap_statistics_statistics,1) | ^ ../src/subr.d:930:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 930 | LISPFUNN(gc_statistics_statistics,2) | ^ ../src/subr.d:932:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 932 | LISPFUNNR(record_ref,2) | ^ ../src/subr.d:933:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 933 | LISPFUNN(record_store,3) | ^ ../src/subr.d:934:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 934 | LISPFUNNR(record_length,1) | ^ ../src/subr.d:935:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 935 | LISPFUNNR(pstructure_ref,3) | ^ ../src/subr.d:936:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 936 | LISPFUNNR(structure_ref,3) | ^ ../src/subr.d:937:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 937 | LISPFUNN(structure_store,4) | ^ ../src/subr.d:938:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 938 | LISPFUNNR(make_structure,2) | ^ ../src/subr.d:939:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 939 | LISPFUNNR(copy_structure,1) | ^ ../src/subr.d:940:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 940 | LISPFUNNR(structure_type_p,2) | ^ ../src/subr.d:941:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 941 | LISPFUNNR(closure_name,1) | ^ ../src/subr.d:942:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 942 | LISPFUNN(set_closure_name,2) | ^ ../src/subr.d:943:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 943 | LISPFUNNR(closure_codevec,1) | ^ ../src/subr.d:944:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 944 | LISPFUNNR(closure_consts,1) | ^ ../src/subr.d:945:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 945 | LISPFUNNR(closure_const,2) | ^ ../src/subr.d:946:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 946 | LISPFUNN(set_closure_const,3) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:948:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 948 | LISPFUNN(make_constant_initfunction,1) | ^ ../src/subr.d:949:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 949 | LISPFUNN(constant_initfunction_p,1) | ^ ../src/subr.d:950:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 950 | LISPFUNN(closure_set_seclass,2) | ^ ../src/subr.d:951:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 951 | LISPFUNNR(closure_documentation,1) | ^ ../src/subr.d:952:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 952 | LISPFUNN(closure_set_documentation,2) | ^ ../src/subr.d:953:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 953 | LISPFUNNR(closure_lambda_list,1) | ^ ../src/subr.d:954:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 954 | LISPFUNN(set_funcallable_instance_function,2) | ^ ../src/subr.d:955:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 955 | LISPFUNN(copy_generic_function,2) | ^ ../src/subr.d:956:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 956 | LISPFUNN(generic_function_effective_method_function,1) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:957:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 957 | LISPFUN(make_load_time_eval,seclass_no_se,1,0,norest,nokey,0,NIL) | ^ ../src/subr.d:958:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 958 | LISPFUN(make_symbol_macro,seclass_no_se,1,0,norest,nokey,0,NIL) | ^ ../src/subr.d:959:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 959 | LISPFUNNF(symbol_macro_p,1) | ^ ../src/subr.d:960:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 960 | LISPFUNN(symbol_macro_expand,1) | ^ ../src/subr.d:961:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 961 | LISPFUN(make_global_symbol_macro,seclass_no_se,1,0,norest,nokey,0,NIL) | ^ ../src/subr.d:962:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 962 | LISPFUNN(global_symbol_macro_definition,1) | ^ ../src/subr.d:963:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 963 | LISPFUN(make_macro,seclass_no_se,2,0,norest,nokey,0,NIL) | ^ ../src/subr.d:964:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 964 | LISPFUNN(macrop,1) | ^ ../src/subr.d:965:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 965 | LISPFUNN(macro_expander,1) | ^ ../src/subr.d:966:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 966 | LISPFUNN(macro_lambda_list,1) | ^ ../src/subr.d:967:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 967 | LISPFUNN(make_function_macro,2) | ^ ../src/subr.d:968:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 968 | LISPFUNN(function_macro_p,1) | ^ ../src/subr.d:969:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 969 | LISPFUNN(function_macro_function,1) | ^ ../src/subr.d:970:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 970 | LISPFUNN(function_macro_expander,1) | ^ ../src/subr.d:971:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 971 | LISPFUN(finalize,seclass_default,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:972:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 972 | LISPFUNNF(structure_object_p,1) | ^ ../src/subr.d:973:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 973 | LISPFUNNF(std_instance_p,1) | ^ ../src/subr.d:974:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 974 | LISPFUNNF(funcallable_instance_p,1) | ^ ../src/subr.d:975:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 975 | LISPFUNN(allocate_metaobject_instance,2) | ^ ../src/subr.d:976:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 976 | LISPFUNN(allocate_std_instance,2) | ^ ../src/subr.d:977:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 977 | LISPFUNN(allocate_funcallable_instance,2) | ^ ../src/subr.d:978:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 978 | LISPFUN(pallocate_instance,seclass_read,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:979:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 979 | LISPFUNN(pslot_value_using_class,3) | ^ ../src/subr.d:980:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 980 | LISPFUNN(pset_slot_value_using_class,4) | ^ ../src/subr.d:981:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 981 | LISPFUNN(pslot_boundp_using_class,3) | ^ ../src/subr.d:982:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 982 | LISPFUNN(pslot_makunbound_using_class,3) | ^ ../src/subr.d:983:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 983 | LISPFUNN(slot_value,2) | ^ ../src/subr.d:984:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 984 | LISPFUNN(set_slot_value,3) | ^ ../src/subr.d:985:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 985 | LISPFUNN(slot_boundp,2) | ^ ../src/subr.d:986:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 986 | LISPFUNN(slot_makunbound,2) | ^ ../src/subr.d:987:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 987 | LISPFUNNR(slot_exists_p,2) | ^ ../src/subr.d:988:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 988 | LISPFUNNR(standard_instance_access,2) | ^ ../src/subr.d:989:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 989 | LISPFUNN(set_standard_instance_access,3) | ^ ../src/subr.d:990:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 990 | LISPFUNNR(punbound,0) | ^ ../src/subr.d:991:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 991 | LISPFUN(pshared_initialize,seclass_default,2,0,rest,nokey,0,NIL) | ^ ../src/subr.d:992:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 992 | LISPFUN(preinitialize_instance,seclass_default,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:993:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 993 | LISPFUN(pinitialize_instance,seclass_default,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:994:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 994 | LISPFUN(pmake_instance,seclass_default,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:995:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 995 | LISPFUNN(pchange_class,2) | ^ ../src/subr.d:997:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 997 | LISPFUN(make_weak_pointer,seclass_no_se,1,0,norest,nokey,0,NIL) | ^ ../src/subr.d:998:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 998 | LISPFUNNF(weak_pointer_p,1) | ^ ../src/subr.d:999:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 999 | LISPFUNNR(weak_pointer_value,1) | ^ ../src/subr.d:1000:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1000 | LISPFUNN(set_weak_pointer_value,2) | ^ ../src/subr.d:1001:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1001 | LISPFUNN(make_weak_list,1) | ^ ../src/subr.d:1002:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1002 | LISPFUNNF(weak_list_p,1) | ^ ../src/subr.d:1003:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1003 | LISPFUNNR(weak_list_list,1) | ^ ../src/subr.d:1004:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1004 | LISPFUNN(set_weak_list_list,2) | ^ ../src/subr.d:1005:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1005 | LISPFUNN(make_weak_and_relation,1) | ^ ../src/subr.d:1006:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1006 | LISPFUNNF(weak_and_relation_p,1) | ^ ../src/subr.d:1007:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1007 | LISPFUNNR(weak_and_relation_list,1) | ^ ../src/subr.d:1008:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1008 | LISPFUNN(make_weak_or_relation,1) | ^ ../src/subr.d:1009:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1009 | LISPFUNNF(weak_or_relation_p,1) | ^ ../src/subr.d:1010:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1010 | LISPFUNNR(weak_or_relation_list,1) | ^ ../src/subr.d:1011:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1011 | LISPFUNN(make_weak_mapping,2) | ^ ../src/subr.d:1012:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1012 | LISPFUNNF(weak_mapping_p,1) | ^ ../src/subr.d:1013:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1013 | LISPFUNNR(weak_mapping_pair,1) | ^ ../src/subr.d:1014:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1014 | LISPFUNNR(weak_mapping_value,1) | ^ ../src/subr.d:1015:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1015 | LISPFUNN(set_weak_mapping_value,2) | ^ ../src/subr.d:1016:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1016 | LISPFUNN(make_weak_and_mapping,2) | ^ ../src/subr.d:1017:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1017 | LISPFUNNF(weak_and_mapping_p,1) | ^ ../src/subr.d:1018:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1018 | LISPFUNNR(weak_and_mapping_pair,1) | ^ ../src/subr.d:1019:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1019 | LISPFUNNR(weak_and_mapping_value,1) | ^ ../src/subr.d:1020:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1020 | LISPFUNN(set_weak_and_mapping_value,2) | ^ ../src/subr.d:1021:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1021 | LISPFUNN(make_weak_or_mapping,2) | ^ ../src/subr.d:1022:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1022 | LISPFUNNF(weak_or_mapping_p,1) | ^ ../src/subr.d:1023:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1023 | LISPFUNNR(weak_or_mapping_pair,1) | ^ ../src/subr.d:1024:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1024 | LISPFUNNR(weak_or_mapping_value,1) | ^ ../src/subr.d:1025:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1025 | LISPFUNN(set_weak_or_mapping_value,2) | ^ ../src/subr.d:1028:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1028 | LISPFUNNF(weak_alist_p,1) | ^ ../src/subr.d:1029:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1029 | LISPFUNNR(weak_alist_type,1) | ^ ../src/subr.d:1030:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1030 | LISPFUNNR(weak_alist_contents,1) | ^ ../src/subr.d:1031:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1031 | LISPFUNN(set_weak_alist_contents,2) | ^ ../src/subr.d:1041:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1041 | LISPFUNNR(sequencep,1) | ^ ../src/subr.d:1042:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1042 | LISPFUNN(defseq,1) | ^ ../src/subr.d:1043:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1043 | LISPFUNNR(elt,2) | ^ ../src/subr.d:1044:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1044 | LISPFUNN(setelt,3) | ^ ../src/subr.d:1045:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1045 | LISPFUN(subseq,seclass_read,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1046:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1046 | LISPFUNNR(copy_seq,1) | ^ ../src/subr.d:1047:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1047 | LISPFUNNR(length,1) | ^ ../src/subr.d:1048:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1048 | LISPFUNNR(reverse,1) | ^ ../src/subr.d:1049:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1049 | LISPFUNN(nreverse,1) | ^ ../src/subr.d:1053:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1053 | LISPFUN(concatenate,seclass_rd_sig,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1054:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1054 | LISPFUN(map,seclass_default,3,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1055:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1055 | LISPFUN(map_into,seclass_default,2,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1056:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1056 | LISPFUN(some,seclass_default,2,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1057:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1057 | LISPFUN(every,seclass_default,2,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1058:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1058 | LISPFUN(notany,seclass_default,2,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1059:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1059 | LISPFUN(notevery,seclass_default,2,0,rest,nokey,0,NIL) | ^ In file included from ../src/spvw.d:1578: ../src/subr.d:1134:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1134 | LISPFUN(symbol_stream,seclass_read,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1135:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1135 | LISPFUNNR(make_synonym_stream,1) | ^ ../src/subr.d:1136:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1136 | LISPFUNNF(synonym_stream_p,1) | ^ ../src/subr.d:1137:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1137 | LISPFUNNR(synonym_stream_symbol,1) | ^ ../src/subr.d:1138:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1138 | LISPFUN(make_broadcast_stream,seclass_read,0,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1139:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1139 | LISPFUNNF(broadcast_stream_p,1) | ^ ../src/subr.d:1140:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1140 | LISPFUNNR(broadcast_stream_streams,1) | ^ ../src/subr.d:1141:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1141 | LISPFUN(make_concatenated_stream,seclass_read,0,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1142:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1142 | LISPFUNNF(concatenated_stream_p,1) | ^ ../src/subr.d:1143:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1143 | LISPFUNNR(concatenated_stream_streams,1) | ^ ../src/subr.d:1144:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1144 | LISPFUNNR(make_two_way_stream,2) | ^ ../src/subr.d:1145:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1145 | LISPFUNNF(two_way_stream_p,1) | ^ ../src/subr.d:1146:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1146 | LISPFUNNR(two_way_stream_input_stream,1) | ^ ../src/subr.d:1147:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1147 | LISPFUNNR(two_way_stream_output_stream,1) | ^ ../src/subr.d:1148:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1148 | LISPFUNNR(make_echo_stream,2) | ^ ../src/subr.d:1149:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1149 | LISPFUNNF(echo_stream_p,1) | ^ ../src/subr.d:1150:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1150 | LISPFUNNR(echo_stream_input_stream,1) | ^ ../src/subr.d:1151:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1151 | LISPFUNNR(echo_stream_output_stream,1) | ^ ../src/subr.d:1152:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1152 | LISPFUN(make_string_input_stream,seclass_read,1,2,norest,nokey,0,NIL) | ^ ../src/subr.d:1153:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1153 | LISPFUNNR(string_input_stream_index,1) | ^ ../src/subr.d:1156:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1156 | LISPFUNN(get_output_stream_string,1) | ^ ../src/subr.d:1157:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1157 | LISPFUNNR(make_string_push_stream,1) | ^ ../src/subr.d:1158:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1158 | LISPFUNNF(string_stream_p,1) | ^ ../src/subr.d:1159:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1159 | LISPFUNNR(string_stream_string,1) | ^ ../src/subr.d:1160:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1160 | LISPFUNNR(make_buffered_input_stream,2) | ^ ../src/subr.d:1161:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1161 | LISPFUNNR(buffered_input_stream_index,1) | ^ ../src/subr.d:1162:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1162 | LISPFUN(make_buffered_output_stream,seclass_read,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1164:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1164 | LISPFUNN(generic_stream_controller,1) | ^ ../src/subr.d:1165:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1165 | LISPFUNN(make_generic_stream,1) | ^ ../src/subr.d:1166:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1166 | LISPFUNN(generic_stream_p,1) | ^ ../src/subr.d:1169:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1169 | LISPFUNN(make_keyboard_stream,0) | ^ ../src/subr.d:1171:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1171 | LISPFUN(terminal_raw,seclass_default,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1173:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1173 | LISPFUNN(make_window,0) | ^ ../src/subr.d:1174:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1174 | LISPFUNN(window_size,1) | ^ ../src/subr.d:1175:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1175 | LISPFUNN(window_cursor_position,1) | ^ ../src/subr.d:1176:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1176 | LISPFUNN(set_window_cursor_position,3) | ^ ../src/subr.d:1177:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1177 | LISPFUNN(clear_window,1) | ^ ../src/subr.d:1178:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1178 | LISPFUNN(clear_window_to_eot,1) | ^ ../src/subr.d:1179:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1179 | LISPFUNN(clear_window_to_eol,1) | ^ ../src/subr.d:1180:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1180 | LISPFUNN(delete_window_line,1) | ^ ../src/subr.d:1181:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1181 | LISPFUNN(insert_window_line,1) | ^ ../src/subr.d:1182:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1182 | LISPFUNN(highlight_on,1) | ^ ../src/subr.d:1183:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1183 | LISPFUNN(highlight_off,1) | ^ ../src/subr.d:1184:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1184 | LISPFUNN(window_cursor_on,1) | ^ ../src/subr.d:1185:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1185 | LISPFUNN(window_cursor_off,1) | ^ ../src/subr.d:1187:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1187 | LISPFUNNF(file_stream_p,1) | ^ ../src/subr.d:1199:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1199 | LISPFUNN(make_x11socket_stream,2) | ^ ../src/subr.d:1200:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1200 | LISPFUNN(read_n_bytes,4) | ^ ../src/subr.d:1201:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1201 | LISPFUNN(write_n_bytes,4) | ^ ../src/subr.d:1204:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1204 | LISPFUNN(socket_server_close,1) | ^ ../src/subr.d:1207:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1207 | LISPFUNN(socket_server_port,1) | ^ ../src/subr.d:1208:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1208 | LISPFUNN(socket_server_host,1) | ^ ../src/subr.d:1211:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1211 | LISPFUN(socket_wait,seclass_default,1,2,norest,nokey,0,NIL) | ^ ../src/subr.d:1212:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1212 | LISPFUN(socket_status,seclass_default,1,2,norest,nokey,0,NIL) | ^ ../src/subr.d:1215:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1215 | LISPFUNN(socket_stream_port,1) | ^ ../src/subr.d:1216:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1216 | LISPFUNN(socket_stream_host,1) | ^ ../src/subr.d:1217:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1217 | LISPFUN(socket_stream_peer,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1218:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1218 | LISPFUN(socket_stream_local,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1219:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1219 | LISPFUN(socket_options,seclass_default,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1221:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1221 | LISPFUNN(socket_stream_shutdown,2) | ^ ../src/subr.d:1226:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1226 | LISPFUNN(stream_handles,1) | ^ ../src/subr.d:1227:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1227 | LISPFUNNR(built_in_stream_open_p,1) | ^ ../src/subr.d:1228:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1228 | LISPFUNNR(input_stream_p,1) | ^ ../src/subr.d:1229:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1229 | LISPFUNNR(output_stream_p,1) | ^ ../src/subr.d:1230:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1230 | LISPFUNN(stream_element_type_eq,2) | ^ ../src/subr.d:1231:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1231 | LISPFUNNR(built_in_stream_element_type,1) | ^ ../src/subr.d:1232:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1232 | LISPFUNN(built_in_stream_set_element_type,2) | ^ ../src/subr.d:1233:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1233 | LISPFUNNR(stream_external_format,1) | ^ ../src/subr.d:1234:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1234 | LISPFUN(set_stream_external_format,seclass_default,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1235:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1235 | LISPFUNN(interactive_stream_p,1) | ^ ../src/subr.d:1237:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1237 | LISPFUN(read_byte,seclass_default,1,2,norest,nokey,0,NIL) | ^ ../src/subr.d:1238:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1238 | LISPFUNN(read_byte_lookahead,1) | ^ ../src/subr.d:1239:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1239 | LISPFUNN(read_byte_will_hang_p,1) | ^ ../src/subr.d:1240:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1240 | LISPFUN(read_byte_no_hang,seclass_default,1,2,norest,nokey,0,NIL) | ^ ../src/subr.d:1241:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1241 | LISPFUN(read_integer,seclass_default,2,3,norest,nokey,0,NIL) | ^ ../src/subr.d:1242:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1242 | LISPFUN(read_float,seclass_default,2,3,norest,nokey,0,NIL) | ^ ../src/subr.d:1243:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1243 | LISPFUNN(write_byte,2) | ^ ../src/subr.d:1244:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1244 | LISPFUN(write_integer,seclass_default,3,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1245:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1245 | LISPFUN(write_float,seclass_default,3,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1246:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1246 | LISPFUN(file_position,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1247:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1247 | LISPFUNNR(file_length,1) | ^ ../src/subr.d:1248:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1248 | LISPFUNN(file_string_length,2) | ^ ../src/subr.d:1249:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1249 | LISPFUNN(line_number,1) | ^ ../src/subr.d:1250:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1250 | LISPFUN(stream_fasl_p,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1251:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1251 | LISPFUNN(defgray,1) | ^ ../src/subr.d:1253:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1253 | LISPFUNN(putd,2) | ^ ../src/subr.d:1254:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1254 | LISPFUNN(find_subr,1) | ^ ../src/subr.d:1255:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1255 | LISPFUNN(proclaim_constant,2) | ^ ../src/subr.d:1256:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1256 | LISPFUNN(proclaim_symbol_macro,1) | ^ ../src/subr.d:1257:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1257 | LISPFUN(get,seclass_read,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1258:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1258 | LISPFUN(getf,seclass_read,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1259:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1259 | LISPFUNN(putf,3) | ^ ../src/subr.d:1260:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1260 | LISPFUNN(remf,2) | ^ ../src/subr.d:1261:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1261 | LISPFUNNR(get_properties,2) | ^ ../src/subr.d:1262:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1262 | LISPFUNN(putplist,2) | ^ ../src/subr.d:1263:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1263 | LISPFUNN(put,3) | ^ ../src/subr.d:1264:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1264 | LISPFUNN(remprop,2) | ^ ../src/subr.d:1265:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1265 | LISPFUNNR(symbol_package,1) | ^ ../src/subr.d:1266:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1266 | LISPFUNNR(symbol_plist,1) | ^ ../src/subr.d:1267:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1267 | LISPFUN(symbol_name,seclass_no_se,1,0,norest,nokey,0,NIL) | ^ ../src/subr.d:1268:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1268 | LISPFUNNR(cs_symbol_name,1) | ^ ../src/subr.d:1269:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1269 | LISPFUNNR(keywordp,1) | ^ ../src/subr.d:1270:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1270 | LISPFUN(gensym,seclass_read,0,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1271:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1271 | LISPFUN(gentemp,seclass_read,0,2,norest,nokey,0,NIL) | ^ ../src/subr.d:1273:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1273 | LISPFUN(decimal_string,seclass_no_se,1,0,norest,nokey,0,NIL) | ^ ../src/subr.d:1274:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1274 | LISPFUNNF(zerop,1) | ^ ../src/subr.d:1275:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1275 | LISPFUNNF(plusp,1) | ^ ../src/subr.d:1276:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1276 | LISPFUNNF(minusp,1) | ^ ../src/subr.d:1277:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1277 | LISPFUNNF(oddp,1) | ^ ../src/subr.d:1278:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1278 | LISPFUNNF(evenp,1) | ^ ../src/subr.d:1279:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1279 | LISPFUN(numequal,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1280:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1280 | LISPFUN(numunequal,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1281:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1281 | LISPFUN(smaller,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1282:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1282 | LISPFUN(greater,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1283:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1283 | LISPFUN(ltequal,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1284:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1284 | LISPFUN(gtequal,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1285:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1285 | LISPFUN(max,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1286:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1286 | LISPFUN(min,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1287:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1287 | LISPFUN(plus,seclass_foldable,0,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1288:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1288 | LISPFUN(minus,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1289:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1289 | LISPFUN(star,seclass_foldable,0,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1290:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1290 | LISPFUN(slash,seclass_foldable,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1291:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1291 | LISPFUNNF(plus_one,1) | ^ ../src/subr.d:1292:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1292 | LISPFUNNF(minus_one,1) | ^ ../src/subr.d:1293:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1293 | LISPFUNNF(conjugate,1) | ^ ../src/subr.d:1294:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1294 | LISPFUN(gcd,seclass_foldable,0,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1295:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1295 | LISPFUN(xgcd,seclass_foldable,0,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1296:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1296 | LISPFUN(lcm,seclass_foldable,0,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1297:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1297 | LISPFUNNR(exp,1) | ^ ../src/subr.d:1298:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1298 | LISPFUNNR(expt,2) | ^ ../src/subr.d:1299:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1299 | LISPFUN(log,seclass_read,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1300:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1300 | LISPFUNNR(sqrt,1) | ^ ../src/subr.d:1301:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1301 | LISPFUNNF(isqrt,1) | ^ ../src/subr.d:1302:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1302 | LISPFUNNR(abs,1) | ^ ../src/subr.d:1303:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1303 | LISPFUNNR(phase,1) | ^ ../src/subr.d:1304:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1304 | LISPFUNNR(signum,1) | ^ ../src/subr.d:1305:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1305 | LISPFUNNR(sin,1) | ^ ../src/subr.d:1306:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1306 | LISPFUNNR(cos,1) | ^ ../src/subr.d:1307:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1307 | LISPFUNNR(tan,1) | ^ ../src/subr.d:1308:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1308 | LISPFUNNR(cis,1) | ^ ../src/subr.d:1309:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1309 | LISPFUNNR(asin,1) | ^ ../src/subr.d:1310:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1310 | LISPFUNNR(acos,1) | ^ ../src/subr.d:1311:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1311 | LISPFUN(atan,seclass_read,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1312:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1312 | LISPFUNNR(sinh,1) | ^ ../src/subr.d:1313:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1313 | LISPFUNNR(cosh,1) | ^ ../src/subr.d:1314:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1314 | LISPFUNNR(tanh,1) | ^ ../src/subr.d:1315:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1315 | LISPFUNNR(asinh,1) | ^ ../src/subr.d:1316:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1316 | LISPFUNNR(acosh,1) | ^ ../src/subr.d:1317:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1317 | LISPFUNNR(atanh,1) | ^ ../src/subr.d:1318:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1318 | LISPFUN(float,seclass_read,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1319:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1319 | LISPFUNNF(rational,1) | ^ ../src/subr.d:1320:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1320 | LISPFUNNF(rationalize,1) | ^ ../src/subr.d:1321:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1321 | LISPFUNNF(numerator,1) | ^ ../src/subr.d:1322:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1322 | LISPFUNNF(denominator,1) | ^ ../src/subr.d:1323:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1323 | LISPFUN(floor,seclass_foldable,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1324:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1324 | LISPFUN(ceiling,seclass_foldable,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1325:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1325 | LISPFUN(truncate,seclass_foldable,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1326:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1326 | LISPFUN(round,seclass_foldable,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1327:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1327 | LISPFUNNF(mod,2) | ^ ../src/subr.d:1328:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1328 | LISPFUNNF(rem,2) | ^ ../src/subr.d:1329:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1329 | LISPFUN(ffloor,seclass_read,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1330:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1330 | LISPFUN(fceiling,seclass_read,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1331:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1331 | LISPFUN(ftruncate,seclass_read,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1332:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1332 | LISPFUN(fround,seclass_read,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1333:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1333 | LISPFUNNF(decode_float,1) | ^ ../src/subr.d:1334:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1334 | LISPFUNNF(scale_float,2) | ^ ../src/subr.d:1335:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1335 | LISPFUNNF(float_scale_exponent,1) | ^ ../src/subr.d:1336:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1336 | LISPFUNNF(float_radix,1) | ^ ../src/subr.d:1337:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1337 | LISPFUN(float_sign,seclass_foldable,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1338:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1338 | LISPFUN(float_digits,seclass_foldable,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1339:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1339 | LISPFUNNF(float_precision,1) | ^ ../src/subr.d:1340:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1340 | LISPFUNNF(integer_decode_float,1) | ^ ../src/subr.d:1341:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1341 | LISPFUN(complex,seclass_foldable,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1342:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1342 | LISPFUNNF(realpart,1) | ^ ../src/subr.d:1343:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1343 | LISPFUNNF(imagpart,1) | ^ ../src/subr.d:1344:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1344 | LISPFUN(logior,seclass_foldable,0,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1345:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1345 | LISPFUN(logxor,seclass_foldable,0,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1346:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1346 | LISPFUN(logand,seclass_foldable,0,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1347:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1347 | LISPFUN(logeqv,seclass_foldable,0,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1348:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1348 | LISPFUNNF(lognand,2) | ^ ../src/subr.d:1349:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1349 | LISPFUNNF(lognor,2) | ^ ../src/subr.d:1350:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1350 | LISPFUNNF(logandc1,2) | ^ ../src/subr.d:1351:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1351 | LISPFUNNF(logandc2,2) | ^ ../src/subr.d:1352:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1352 | LISPFUNNF(logorc1,2) | ^ ../src/subr.d:1353:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1353 | LISPFUNNF(logorc2,2) | ^ ../src/subr.d:1354:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1354 | LISPFUNNF(boole,3) | ^ ../src/subr.d:1355:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1355 | LISPFUNNF(lognot,1) | ^ ../src/subr.d:1356:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1356 | LISPFUNNF(logtest,2) | ^ ../src/subr.d:1357:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1357 | LISPFUNNF(logbitp,2) | ^ ../src/subr.d:1358:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1358 | LISPFUNNF(ash,2) | ^ ../src/subr.d:1359:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1359 | LISPFUNNF(logcount,1) | ^ ../src/subr.d:1360:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1360 | LISPFUNNF(integer_length,1) | ^ ../src/subr.d:1361:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1361 | LISPFUNNR(byte,2) | ^ ../src/subr.d:1362:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1362 | LISPFUNNR(bytesize,1) | ^ ../src/subr.d:1363:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1363 | LISPFUNNR(byteposition,1) | ^ ../src/subr.d:1364:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1364 | LISPFUNNF(ldb,2) | ^ ../src/subr.d:1365:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1365 | LISPFUNNF(ldb_test,2) | ^ ../src/subr.d:1366:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1366 | LISPFUNNF(mask_field,2) | ^ ../src/subr.d:1367:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1367 | LISPFUNNF(dpb,3) | ^ ../src/subr.d:1368:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1368 | LISPFUNNF(deposit_field,3) | ^ ../src/subr.d:1369:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1369 | LISPFUN(random,seclass_default,1,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1370:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1370 | LISPFUN(random_posfixnum,seclass_default,0,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1371:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1371 | LISPFUN(make_random_state,seclass_default,0,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1372:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1372 | LISPFUNNF(factorial,1) | ^ ../src/subr.d:1373:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1373 | LISPFUNNF(exquo,2) | ^ ../src/subr.d:1374:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1374 | LISPFUNNF(mod_expt,3) | ^ ../src/subr.d:1375:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1375 | LISPFUNN(long_float_digits,0) | ^ ../src/subr.d:1376:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1376 | LISPFUNN(set_long_float_digits,1) | ^ ../src/subr.d:1377:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1377 | LISPFUNNR(log2,1) | ^ ../src/subr.d:1378:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1378 | LISPFUNNR(log10,1) | ^ ../src/subr.d:1381:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1381 | LISPFUNN(sizeof,1) | ^ ../src/subr.d:1382:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1382 | LISPFUNN(bitsizeof,1) | ^ ../src/subr.d:1383:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1383 | LISPFUNNR(validp,1) | ^ ../src/subr.d:1384:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1384 | LISPFUNN(set_validp,2) | ^ ../src/subr.d:1385:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1385 | LISPFUNNR(foreign_pointer,1) | ^ ../src/subr.d:1386:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1386 | LISPFUNN(set_foreign_pointer,2) | ^ ../src/subr.d:1387:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1387 | LISPFUNNR(unsigned_foreign_address,1) | ^ ../src/subr.d:1388:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1388 | LISPFUNNR(foreign_address_unsigned,1) | ^ ../src/subr.d:1389:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1389 | LISPFUNNR(foreign_address,1) | ^ ../src/subr.d:1391:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1391 | LISPFUNN(foreign_pointer_info,1) | ^ ../src/subr.d:1395:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1395 | LISPFUNN(close_foreign_library,1) | ^ ../src/subr.d:1397:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1397 | LISPFUNNF(parse_foreign_inttype,2) | ^ ../src/subr.d:1399:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1399 | LISPFUNN(find_foreign_variable,5) | ^ ../src/subr.d:1401:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1401 | LISPFUNN(foreign_value,1) | ^ ../src/subr.d:1402:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1402 | LISPFUNN(set_foreign_value,2) | ^ ../src/subr.d:1403:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1403 | LISPFUNN(foreign_type,1) | ^ ../src/subr.d:1404:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1404 | LISPFUN(element,seclass_default,1,0,rest,nokey,0,NIL) | ^ ../src/subr.d:1405:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1405 | LISPFUNN(deref,1) | ^ ../src/subr.d:1406:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1406 | LISPFUNN(slot,2) | ^ ../src/subr.d:1407:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1407 | LISPFUNN(cast,2) | ^ ../src/subr.d:1408:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1408 | LISPFUNN(offset,3) | ^ ../src/subr.d:1409:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1409 | LISPFUN(read_memory_as,seclass_default,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1410:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1410 | LISPFUN(write_memory_as,seclass_default,3,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1411:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1411 | LISPFUN(exec_on_stack,seclass_default,2,1,norest,nokey,0,NIL) | ^ ../src/subr.d:1412:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1412 | LISPFUNN(call_with_foreign_string,6) | ^ ../src/subr.d:1416:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1416 | LISPFUNN(find_foreign_function,6) | ^ ../src/subr.d:1417:76: warning: unused variable ‘vecptr’ [-Wunused-variable] 1417 | LISPFUN(foreign_call_out,seclass_default,1,0,rest,nokey,0,NIL) | ^ ../src/spvw.d: In function ‘parse_options’: ../src/spvw.d:2730:35: warning: result of ‘2 << 63’ requires 66 bits to represent, but ‘long long int’ only has 64 bits [-Wshift-overflow=] 2730 | : vbitm(oint_addr_len+addr_shift)-1))) | ^~ ../src/spvw.d: In function ‘init_memory’: ../src/spvw.d:3496:17: warning: unused variable ‘teil’ [-Wunused-variable] 3496 | var uintM teil = free_reserved/teile; /* a sub block, a 1/16 of the room */ | ^~~~ ../src/spvw.d:3486:15: warning: unused variable ‘for_objects’ [-Wunused-variable] 3486 | var uintM for_objects; /* number of bytes for Lisp-objects */ | ^~~~~~~~~~~ ../src/spvw.d:3485:15: warning: variable ‘for_STACK’ set but not used [-Wunused-but-set-variable] 3485 | var uintM for_STACK; /* number of bytes for Lisp-stack */ | ^~~~~~~~~ ../src/spvw.d:3149:13: warning: unused variable ‘pagesize’ [-Wunused-variable] 3149 | var uintL pagesize = /* size of a page */ | ^~~~~~~~ ../src/spvw.d: In function ‘dynload_modules’: ../src/spvw.d:4612:26: warning: unused variable ‘err’ [-Wunused-variable] 4612 | var const char * err; | ^~~ ../src/spvw.d:4611:19: warning: unused variable ‘len’ [-Wunused-variable] 4611 | var uintL len = asciz_length(modname); | ^~~ In file included from ../src/spvw.d:306: ../src/spvw.d: At top level: ../src/spvw_singlemap.d:30:14: warning: ‘filemap’ declared ‘static’ but never defined [-Wunused-function] 30 | local void* filemap (void* map_addr, uintM map_len, int fd, off_t offset) | ^~~~~~~ In file included from ../src/spvw.d:1047: ../src/spvw_sigsegv.d:17:13: warning: ‘install_stackoverflow_handler’ declared ‘static’ but never defined [-Wunused-function] 17 | local void install_stackoverflow_handler (uintL size); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~ In file included from ../src/spvw.d:1049: ../src/spvw_sigpipe.d:13:13: warning: ‘install_sigpipe_handler’ declared ‘static’ but never defined [-Wunused-function] 13 | local void install_sigpipe_handler (void); | ^~~~~~~~~~~~~~~~~~~~~~~ In file included from ../src/spvw.d:1050: ../src/spvw_sigint.d:7:13: warning: ‘install_sigint_handler’ declared ‘static’ but never defined [-Wunused-function] 7 | local void install_sigint_handler (void); | ^~~~~~~~~~~~~~~~~~~~~~ In file included from ../src/spvw.d:1051: ../src/spvw_sigwinch.d:7:13: warning: ‘install_sigwinch_handler’ declared ‘static’ but never defined [-Wunused-function] 7 | local void install_sigwinch_handler (void); | ^~~~~~~~~~~~~~~~~~~~~~~~ ../src/spvw.d: In function ‘near_SP_overflow’: ../src/spvw.d:968:3: warning: ignoring return value of ‘__builtin_alloca’ declared with attribute ‘warn_unused_result’ [-Wunused-result] 968 | alloca(1); /* Makes this function non-inlinable. */ | ^~~~~~~~~~~~~~~~~~~ ../src/spvw.d: In function ‘size_arg’: ../src/spvw.d:2526:11: warning: this statement may fall through [-Wimplicit-fallthrough=] 2526 | val *= sizeof(gcv_object_t); /*FALLTHROUGH*/ | ~~~~^~~~~~~~~~~~~~~~~~~~~~~ ../src/spvw.d:2527:5: note: here 2527 | case 'b': case 'B': /* in bytes */ | ^~~~ ../src/spvw.d: In function ‘install_global_handlers’: ../src/spvw.d:2393:7: warning: this statement may fall through [-Wimplicit-fallthrough=] 2393 | funcall(S(set_global_handler),2); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ../src/spvw.d:2395:5: note: here 2395 | case ON_ERROR_APPEASE: appease: { | ^~~~ In file included from ../src/spvw.d:1077: At top level: ../src/spvw_allocate.d:188:14: warning: ‘mymalloc’ defined but not used [-Wunused-function] 188 | local void* mymalloc (uintM need) | ^~~~~~~~ In file included from ../src/spvw.d:263: ../src/spvw_mmap.d:546:14: warning: ‘mmap_filemap’ defined but not used [-Wunused-function] 546 | local void* mmap_filemap (void* map_addr, uintM map_len, int fd, off_t offset) | ^~~~~~~~~~~~ In file included from ../src/spvw.d:160: ../src/spvw_debug.d:13:13: warning: ‘mem_hex_out’ defined but not used [-Wunused-function] 13 | local void mem_hex_out (const void* buf, uintL count) { | ^~~~~~~~~~~ In file included from ../src/spvw.d:160: ../src/spvw_debug.d: In function ‘nobject_out1’: ../src/spvw_debug.d:131:119: warning: array subscript 1 is outside array bounds of ‘struct subr_tab_[1]’ [-Warray-bounds] 131 | string_out(out, (((as_oint(subr_tab_ptr_as_object(&subr_tab)) <= | ^ In file included from ../src/spvw.d:23: ../src/lispbibl.d:13588:3: note: while referencing ‘subr_tab_data’ 13588 | } subr_tab_data; | ^~~~~~~~~~~~~ ../src/spvw.d: In function ‘main_actions.constprop’: ../src/spvw.d:3891:13: warning: variable ‘count’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 3891 | var uintL count = p->argv_init_filecount; | ^~~~~ ../src/spvw.d:3909:36: warning: variable ‘fileptr’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 3909 | var const argv_compile_file_t* fileptr = &p->argv_compile_files[0]; | ^~~~~~~ ../src/spvw.d:3910:15: warning: variable ‘count’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 3910 | var uintL count = p->argv_compile_filecount; | ^~~~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c spvwtabf.c In file included from ../src/spvwtabf.d:8: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c spvwtabs.c In file included from ../src/spvwtabs.d:8: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c spvwtabo.c In file included from ../src/spvwtabo.d:8: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c eval.c In file included from ../src/eval.d:7: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/eval.d: In function ‘reset’: ../src/eval.d:557:32: warning: cast between incompatible function types from ‘__attribute__((noreturn)) void (*)(uintL)’ {aka ‘__attribute__((noreturn)) void (*)(unsigned int)’} to ‘__attribute__((noreturn)) void (*)(void **)’ [-Wcast-function-type] 557 | unwind_protect_to_save.fun = (restartf_t)&reset; | ^ ../src/eval.d: In function ‘macroexp0’: ../src/eval.d:1544:14: warning: unused variable ‘val’ [-Wunused-variable] 1544 | var object val = sym_value(form,TheSvector(env)->data[0],&symbolmacro); | ^~~ ../src/eval.d: In function ‘get_closure’: ../src/eval.d:1824:28: warning: unused variable ‘stack_env’ [-Wunused-variable] 1824 | var gcv_environment_t* stack_env = nest_env(env); /* push on STACK */ | ^~~~~~~~~ ../src/eval.d:1979:2: warning: label ‘req’ defined but not used [-Wunused-label] 1979 | req: /* process required-parameter push on STACK: */ | ^~~ ../src/eval.d: In function ‘interpret_bytecode_’: ../src/eval.d:5872:2: warning: label ‘next_byte’ defined but not used [-Wunused-label] 5872 | next_byte: | ^~~~~~~~~ ../src/eval.d: At top level: ../src/eval.d:4151:23: warning: ‘error_subr_toomany’ declared ‘static’ but never defined [-Wunused-function] 4151 | local _Noreturn void error_subr_toomany (object fun); | ^~~~~~~~~~~~~~~~~~ ../src/eval.d:4157:23: warning: ‘error_subr_toofew’ declared ‘static’ but never defined [-Wunused-function] 4157 | local _Noreturn void error_subr_toofew (object fun, object tail); | ^~~~~~~~~~~~~~~~~ ../src/eval.d:4472:23: warning: ‘error_closure_toomany’ declared ‘static’ but never defined [-Wunused-function] 4472 | local _Noreturn void error_closure_toomany (object closure); | ^~~~~~~~~~~~~~~~~~~~~ ../src/eval.d:4478:23: warning: ‘error_closure_toofew’ declared ‘static’ but never defined [-Wunused-function] 4478 | local _Noreturn void error_closure_toofew (object closure, object tail); | ^~~~~~~~~~~~~~~~~~~~ ../src/eval.d: In function ‘eval_subr’: ../src/eval.d:3409:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3409 | REQ_ARG(); | ^ ../src/eval.d:3410:5: note: here 3410 | case (uintW)subr_argtype_5_0: /* SUBR with 5 required arguments */ | ^~~~ ../src/eval.d:3411:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3411 | REQ_ARG(); | ^ ../src/eval.d:3412:5: note: here 3412 | case (uintW)subr_argtype_4_0: /* SUBR with 4 required arguments */ | ^~~~ ../src/eval.d:3413:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3413 | REQ_ARG(); | ^ ../src/eval.d:3414:5: note: here 3414 | case (uintW)subr_argtype_3_0: /* SUBR with 3 required arguments */ | ^~~~ ../src/eval.d:3415:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3415 | REQ_ARG(); | ^ ../src/eval.d:3416:5: note: here 3416 | case (uintW)subr_argtype_2_0: /* SUBR with 2 required arguments */ | ^~~~ ../src/eval.d:3417:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3417 | REQ_ARG(); | ^ ../src/eval.d:3418:5: note: here 3418 | case (uintW)subr_argtype_1_0: /* SUBR with 1 required argument */ | ^~~~ ../src/eval.d:3419:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3419 | REQ_ARG(); | ^ ../src/eval.d:3420:5: note: here 3420 | case (uintW)subr_argtype_0_0: /* SUBR without Arguments */ | ^~~~ ../src/eval.d:3424:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3424 | REQ_ARG(); | ^ ../src/eval.d:3425:5: note: here 3425 | case (uintW)subr_argtype_3_1: /* SUBR with 3 required and 1 optional */ | ^~~~ ../src/eval.d:3426:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3426 | REQ_ARG(); | ^ ../src/eval.d:3427:5: note: here 3427 | case (uintW)subr_argtype_2_1: /* SUBR with 2 required and 1 optional */ | ^~~~ ../src/eval.d:3428:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3428 | REQ_ARG(); | ^ ../src/eval.d:3429:5: note: here 3429 | case (uintW)subr_argtype_1_1: /* SUBR with 1 required and 1 optional */ | ^~~~ ../src/eval.d:3430:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3430 | REQ_ARG(); | ^ ../src/eval.d:3431:5: note: here 3431 | case (uintW)subr_argtype_0_1: /* SUBR with 1 optional argument */ | ^~~~ ../src/eval.d:3436:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3436 | REQ_ARG(); | ^ ../src/eval.d:3437:5: note: here 3437 | case (uintW)subr_argtype_2_2: /* SUBR with 2 required and 2 optional */ | ^~~~ ../src/eval.d:3438:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3438 | REQ_ARG(); | ^ ../src/eval.d:3439:5: note: here 3439 | case (uintW)subr_argtype_1_2: /* SUBR with 1 required and 2 optional */ | ^~~~ ../src/eval.d:3440:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3440 | REQ_ARG(); | ^ ../src/eval.d:3441:5: note: here 3441 | case (uintW)subr_argtype_0_2: /* SUBR with 2 optional arguments */ | ^~~~ ../src/eval.d:3447:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3447 | REQ_ARG(); | ^ ../src/eval.d:3448:5: note: here 3448 | case (uintW)subr_argtype_1_3: /* SUBR with 1 required and 3 optional */ | ^~~~ ../src/eval.d:3449:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3449 | REQ_ARG(); | ^ ../src/eval.d:3450:5: note: here 3450 | case (uintW)subr_argtype_0_3: /* SUBR with 3 optional arguments */ | ^~~~ ../src/eval.d:3457:253: warning: this statement may fall through [-Wimplicit-fallthrough=] 3457 | OPT_ARG(5); | ^ ../src/eval.d:3458:5: note: here 3458 | case (uintW)subr_argtype_0_4: /* SUBR with 4 optional arguments */ | ^~~~ ../src/eval.d:3478:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3478 | REQ_ARG(); | ^ ../src/eval.d:3479:5: note: here 3479 | case (uintW)subr_argtype_2_0_rest: /* SUBR with 2 required and rest */ | ^~~~ ../src/eval.d:3480:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3480 | REQ_ARG(); | ^ ../src/eval.d:3481:5: note: here 3481 | case (uintW)subr_argtype_1_0_rest: /* SUBR with 1 required and rest */ | ^~~~ ../src/eval.d:3482:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3482 | REQ_ARG(); | ^ ../src/eval.d:3483:5: note: here 3483 | case (uintW)subr_argtype_0_0_rest: /* SUBR with &rest Arguments */ | ^~~~ ../src/eval.d:3496:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3496 | REQ_ARG(); | ^ ../src/eval.d:3497:5: note: here 3497 | case (uintW)subr_argtype_3_0_key: /* SUBR with 3 required and &key */ | ^~~~ ../src/eval.d:3498:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3498 | REQ_ARG(); | ^ ../src/eval.d:3499:5: note: here 3499 | case (uintW)subr_argtype_2_0_key: /* SUBR with 2 required and &key */ | ^~~~ ../src/eval.d:3500:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3500 | REQ_ARG(); | ^ ../src/eval.d:3501:5: note: here 3501 | case (uintW)subr_argtype_1_0_key: /* SUBR with 1 required and &key */ | ^~~~ ../src/eval.d:3502:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3502 | REQ_ARG(); | ^ ../src/eval.d:3503:5: note: here 3503 | case (uintW)subr_argtype_0_0_key: /* SUBR with &key */ | ^~~~ ../src/eval.d:3508:246: warning: this statement may fall through [-Wimplicit-fallthrough=] 3508 | REQ_ARG(); | ^ ../src/eval.d:3509:5: note: here 3509 | case (uintW)subr_argtype_0_1_key: /* SUBR with 1 optional and &key */ | ^~~~ ../src/eval.d: In function ‘eval_closure’: ../src/eval.d:3692:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3692 | REQ_ARG(); | ^ ../src/eval.d:3693:7: note: here 3693 | case (uintB)cclos_argtype_4_0: /* 4 required arguments */ | ^~~~ ../src/eval.d:3694:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3694 | REQ_ARG(); | ^ ../src/eval.d:3695:7: note: here 3695 | case (uintB)cclos_argtype_3_0: /* 3 required arguments */ | ^~~~ ../src/eval.d:3696:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3696 | REQ_ARG(); | ^ ../src/eval.d:3697:7: note: here 3697 | case (uintB)cclos_argtype_2_0: /* 2 required arguments */ | ^~~~ ../src/eval.d:3698:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3698 | REQ_ARG(); | ^ ../src/eval.d:3699:7: note: here 3699 | case (uintB)cclos_argtype_1_0: /* 1 required argument */ | ^~~~ ../src/eval.d:3700:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3700 | REQ_ARG(); | ^ ../src/eval.d:3701:7: note: here 3701 | case (uintB)cclos_argtype_0_0: /* no Arguments */ | ^~~~ ../src/eval.d:3706:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3706 | REQ_ARG(); | ^ ../src/eval.d:3707:7: note: here 3707 | case (uintB)cclos_argtype_3_1: /* 3 required and 1 optional */ | ^~~~ ../src/eval.d:3708:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3708 | REQ_ARG(); | ^ ../src/eval.d:3709:7: note: here 3709 | case (uintB)cclos_argtype_2_1: /* 2 required and 1 optional */ | ^~~~ ../src/eval.d:3710:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3710 | REQ_ARG(); | ^ ../src/eval.d:3711:7: note: here 3711 | case (uintB)cclos_argtype_1_1: /* 1 required and 1 optional */ | ^~~~ ../src/eval.d:3712:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3712 | REQ_ARG(); | ^ ../src/eval.d:3713:7: note: here 3713 | case (uintB)cclos_argtype_0_1: /* 1 optional argument */ | ^~~~ ../src/eval.d:3718:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3718 | REQ_ARG(); | ^ ../src/eval.d:3719:7: note: here 3719 | case (uintB)cclos_argtype_2_2: /* 2 required and 2 optional */ | ^~~~ ../src/eval.d:3720:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3720 | REQ_ARG(); | ^ ../src/eval.d:3721:7: note: here 3721 | case (uintB)cclos_argtype_1_2: /* 1 required and 2 optional */ | ^~~~ ../src/eval.d:3722:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3722 | REQ_ARG(); | ^ ../src/eval.d:3723:7: note: here 3723 | case (uintB)cclos_argtype_0_2: /* 2 optional arguments */ | ^~~~ ../src/eval.d:3728:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3728 | REQ_ARG(); | ^ ../src/eval.d:3729:7: note: here 3729 | case (uintB)cclos_argtype_1_3: /* 1 required and 3 optional */ | ^~~~ ../src/eval.d:3730:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3730 | REQ_ARG(); | ^ ../src/eval.d:3731:7: note: here 3731 | case (uintB)cclos_argtype_0_3: /* 3 optional arguments */ | ^~~~ ../src/eval.d:3736:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3736 | REQ_ARG(); | ^ ../src/eval.d:3737:7: note: here 3737 | case (uintB)cclos_argtype_0_4: /* 4 optional arguments */ | ^~~~ ../src/eval.d:3757:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3757 | REQ_ARG(); | ^ ../src/eval.d:3758:7: note: here 3758 | case (uintB)cclos_argtype_3_0_rest: /* 3 required + &rest */ | ^~~~ ../src/eval.d:3759:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3759 | REQ_ARG(); | ^ ../src/eval.d:3760:7: note: here 3760 | case (uintB)cclos_argtype_2_0_rest: /* 2 required + &rest */ | ^~~~ ../src/eval.d:3761:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3761 | REQ_ARG(); | ^ ../src/eval.d:3762:7: note: here 3762 | case (uintB)cclos_argtype_1_0_rest: /* 1 required + &rest */ | ^~~~ ../src/eval.d:3763:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3763 | REQ_ARG(); | ^ ../src/eval.d:3764:7: note: here 3764 | case (uintB)cclos_argtype_0_0_rest: /* no Arguments, Rest-Parameter */ | ^~~~ ../src/eval.d:3770:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3770 | REQ_ARG(); | ^ ../src/eval.d:3771:7: note: here 3771 | case (uintB)cclos_argtype_3_0_key: /* 3 required arguments, &key */ | ^~~~ ../src/eval.d:3772:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3772 | REQ_ARG(); | ^ ../src/eval.d:3773:7: note: here 3773 | case (uintB)cclos_argtype_2_0_key: /* 2 required arguments, &key */ | ^~~~ ../src/eval.d:3774:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3774 | REQ_ARG(); | ^ ../src/eval.d:3775:7: note: here 3775 | case (uintB)cclos_argtype_1_0_key: /* 1 required argument, &key */ | ^~~~ ../src/eval.d:3778:38: warning: this statement may fall through [-Wimplicit-fallthrough=] 3778 | closure = *closure_; codevec = TheCclosure(closure)->clos_codevec; | ~~~~~~~~^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ../src/eval.d:3779:7: note: here 3779 | case (uintB)cclos_argtype_0_0_key: | ^~~~ ../src/eval.d:3785:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3785 | REQ_ARG(); | ^ ../src/eval.d:3786:7: note: here 3786 | case (uintB)cclos_argtype_2_1_key: | ^~~~ ../src/eval.d:3788:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3788 | REQ_ARG(); | ^ ../src/eval.d:3789:7: note: here 3789 | case (uintB)cclos_argtype_1_1_key: | ^~~~ ../src/eval.d:3791:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3791 | REQ_ARG(); | ^ ../src/eval.d:3792:7: note: here 3792 | case (uintB)cclos_argtype_0_1_key: | ^~~~ ../src/eval.d:3798:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3798 | REQ_ARG(); | ^ ../src/eval.d:3799:7: note: here 3799 | case (uintB)cclos_argtype_1_2_key: /* 1 required and 2 optional, &key */ | ^~~~ ../src/eval.d:3800:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3800 | REQ_ARG(); | ^ ../src/eval.d:3801:7: note: here 3801 | case (uintB)cclos_argtype_0_2_key: /* 2 optional arguments, &key */ | ^~~~ ../src/eval.d:3806:248: warning: this statement may fall through [-Wimplicit-fallthrough=] 3806 | REQ_ARG(); | ^ ../src/eval.d:3807:7: note: here 3807 | case (uintB)cclos_argtype_0_3_key: /* 3 optional arguments, &key */ | ^~~~ ../src/eval.d: In function ‘eval_fsubr’: ../src/eval.d:3224:152: warning: this statement may fall through [-Wimplicit-fallthrough=] 3224 | REQ_PAR(); | ^ ../src/eval.d:3225:5: note: here 3225 | case (uintW)fsubr_argtype_1_0_nobody: | ^~~~ ../src/eval.d:3232:152: warning: this statement may fall through [-Wimplicit-fallthrough=] 3232 | REQ_PAR(); | ^ ../src/eval.d:3233:5: note: here 3233 | case (uintW)fsubr_argtype_1_1_nobody: | ^~~~ ../src/eval.d:3247:152: warning: this statement may fall through [-Wimplicit-fallthrough=] 3247 | REQ_PAR(); | ^ ../src/eval.d:3248:5: note: here 3248 | case (uintW)fsubr_argtype_1_body: | ^~~~ ../src/eval.d:3250:152: warning: this statement may fall through [-Wimplicit-fallthrough=] 3250 | REQ_PAR(); | ^ ../src/eval.d:3251:5: note: here 3251 | case (uintW)fsubr_argtype_0_body: | ^~~~ ../src/eval.d: In function ‘apply_closure’: ../src/eval.d:4518:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4518 | REQ_ARG(); | ^ ../src/eval.d:4519:7: note: here 4519 | case (uintB)cclos_argtype_4_0: /* 4 required arguments */ | ^~~~ ../src/eval.d:4520:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4520 | REQ_ARG(); | ^ ../src/eval.d:4521:7: note: here 4521 | case (uintB)cclos_argtype_3_0: /* 3 required arguments */ | ^~~~ ../src/eval.d:4522:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4522 | REQ_ARG(); | ^ ../src/eval.d:4523:7: note: here 4523 | case (uintB)cclos_argtype_2_0: /* 2 required arguments */ | ^~~~ ../src/eval.d:4524:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4524 | REQ_ARG(); | ^ ../src/eval.d:4525:7: note: here 4525 | case (uintB)cclos_argtype_1_0: /* 1 required argument */ | ^~~~ ../src/eval.d:4526:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4526 | REQ_ARG(); | ^ ../src/eval.d:4527:7: note: here 4527 | case (uintB)cclos_argtype_0_0: /* no Arguments */ | ^~~~ ../src/eval.d:4538:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4538 | REQ_ARG(); | ^ ../src/eval.d:4539:7: note: here 4539 | case (uintB)cclos_argtype_3_1: /* 3 required and 1 optional */ | ^~~~ ../src/eval.d:4540:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4540 | REQ_ARG(); | ^ ../src/eval.d:4541:7: note: here 4541 | case (uintB)cclos_argtype_2_1: /* 2 required and 1 optional */ | ^~~~ ../src/eval.d:4542:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4542 | REQ_ARG(); | ^ ../src/eval.d:4543:7: note: here 4543 | case (uintB)cclos_argtype_1_1: /* 1 required and 1 optional */ | ^~~~ ../src/eval.d:4544:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4544 | REQ_ARG(); | ^ ../src/eval.d:4545:7: note: here 4545 | case (uintB)cclos_argtype_0_1: /* 1 optional argument */ | ^~~~ ../src/eval.d:4550:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4550 | REQ_ARG(); | ^ ../src/eval.d:4551:7: note: here 4551 | case (uintB)cclos_argtype_2_2: /* 2 required and 2 optional */ | ^~~~ ../src/eval.d:4552:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4552 | REQ_ARG(); | ^ ../src/eval.d:4553:7: note: here 4553 | case (uintB)cclos_argtype_1_2: /* 1 required and 2 optional */ | ^~~~ ../src/eval.d:4554:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4554 | REQ_ARG(); | ^ ../src/eval.d:4555:7: note: here 4555 | case (uintB)cclos_argtype_0_2: /* 2 optional arguments */ | ^~~~ ../src/eval.d:4560:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4560 | REQ_ARG(); | ^ ../src/eval.d:4561:7: note: here 4561 | case (uintB)cclos_argtype_1_3: /* 1 required and 3 optional */ | ^~~~ ../src/eval.d:4562:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4562 | REQ_ARG(); | ^ ../src/eval.d:4563:7: note: here 4563 | case (uintB)cclos_argtype_0_3: /* 3 optional arguments */ | ^~~~ ../src/eval.d:4568:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4568 | REQ_ARG(); | ^ ../src/eval.d:4569:7: note: here 4569 | case (uintB)cclos_argtype_0_4: /* 4 optional arguments */ | ^~~~ ../src/eval.d:4589:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4589 | REQ_ARG(); | ^ ../src/eval.d:4590:7: note: here 4590 | case (uintB)cclos_argtype_3_0_rest: /* 3 required + &rest */ | ^~~~ ../src/eval.d:4591:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4591 | REQ_ARG(); | ^ ../src/eval.d:4592:7: note: here 4592 | case (uintB)cclos_argtype_2_0_rest: /* 2 required + &rest */ | ^~~~ ../src/eval.d:4593:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4593 | REQ_ARG(); | ^ ../src/eval.d:4594:7: note: here 4594 | case (uintB)cclos_argtype_1_0_rest: /* 1 required + &rest */ | ^~~~ ../src/eval.d:4599:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4599 | REQ_ARG(); | ^ ../src/eval.d:4600:7: note: here 4600 | case (uintB)cclos_argtype_3_0_key: /* 3 required arguments, &key */ | ^~~~ ../src/eval.d:4601:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4601 | REQ_ARG(); | ^ ../src/eval.d:4602:7: note: here 4602 | case (uintB)cclos_argtype_2_0_key: /* 2 required arguments, &key */ | ^~~~ ../src/eval.d:4603:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4603 | REQ_ARG(); | ^ ../src/eval.d:4604:7: note: here 4604 | case (uintB)cclos_argtype_1_0_key: /* 1 required argument, &key */ | ^~~~ ../src/eval.d:4605:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4605 | REQ_ARG(); | ^ ../src/eval.d:4606:9: note: here 4606 | noch_0_opt_args_key: | ^~~~~~~~~~~~~~~~~~~ ../src/eval.d:4612:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4612 | REQ_ARG(); | ^ ../src/eval.d:4613:7: note: here 4613 | case (uintB)cclos_argtype_2_1_key: | ^~~~ ../src/eval.d:4615:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4615 | REQ_ARG(); | ^ ../src/eval.d:4616:7: note: here 4616 | case (uintB)cclos_argtype_1_1_key: | ^~~~ ../src/eval.d:4618:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4618 | REQ_ARG(); | ^ ../src/eval.d:4619:7: note: here 4619 | case (uintB)cclos_argtype_0_1_key: /* 1 optional argument, &key */ | ^~~~ ../src/eval.d:4625:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4625 | REQ_ARG(); | ^ ../src/eval.d:4626:7: note: here 4626 | case (uintB)cclos_argtype_1_2_key: | ^~~~ ../src/eval.d:4628:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4628 | REQ_ARG(); | ^ ../src/eval.d:4629:7: note: here 4629 | case (uintB)cclos_argtype_0_2_key: | ^~~~ ../src/eval.d:4636:14: warning: this statement may fall through [-Wimplicit-fallthrough=] 4636 | REQ_ARG(); | ^ ../src/eval.d:4637:7: note: here 4637 | case (uintB)cclos_argtype_0_3_key: | ^~~~ ../src/eval.d: In function ‘apply_subr’: ../src/eval.d:4195:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4195 | REQ_ARG(); | ^ ../src/eval.d:4196:5: note: here 4196 | case (uintW)subr_argtype_5_0: /* SUBR with 5 required arguments */ | ^~~~ ../src/eval.d:4197:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4197 | REQ_ARG(); | ^ ../src/eval.d:4198:5: note: here 4198 | case (uintW)subr_argtype_4_0: /* SUBR with 4 required arguments */ | ^~~~ ../src/eval.d:4199:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4199 | REQ_ARG(); | ^ ../src/eval.d:4200:5: note: here 4200 | case (uintW)subr_argtype_3_0: /* SUBR with 3 required arguments */ | ^~~~ ../src/eval.d:4201:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4201 | REQ_ARG(); | ^ ../src/eval.d:4202:5: note: here 4202 | case (uintW)subr_argtype_2_0: /* SUBR with 2 required arguments */ | ^~~~ ../src/eval.d:4203:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4203 | REQ_ARG(); | ^ ../src/eval.d:4204:5: note: here 4204 | case (uintW)subr_argtype_1_0: /* SUBR with 1 required argument */ | ^~~~ ../src/eval.d:4205:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4205 | REQ_ARG(); | ^ ../src/eval.d:4206:5: note: here 4206 | case (uintW)subr_argtype_0_0: /* SUBR without Arguments */ | ^~~~ ../src/eval.d:4210:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4210 | REQ_ARG(); | ^ ../src/eval.d:4211:5: note: here 4211 | case (uintW)subr_argtype_3_1: /* SUBR with 3 required and 1 optional */ | ^~~~ ../src/eval.d:4212:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4212 | REQ_ARG(); | ^ ../src/eval.d:4213:5: note: here 4213 | case (uintW)subr_argtype_2_1: /* SUBR with 2 required and 1 optional */ | ^~~~ ../src/eval.d:4214:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4214 | REQ_ARG(); | ^ ../src/eval.d:4215:5: note: here 4215 | case (uintW)subr_argtype_1_1: /* SUBR with 1 required and 1 optional */ | ^~~~ ../src/eval.d:4216:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4216 | REQ_ARG(); | ^ ../src/eval.d:4217:5: note: here 4217 | case (uintW)subr_argtype_0_1: /* SUBR with 1 optional argument */ | ^~~~ ../src/eval.d:4222:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4222 | REQ_ARG(); | ^ ../src/eval.d:4223:5: note: here 4223 | case (uintW)subr_argtype_2_2: /* SUBR with 2 required and 2 optional */ | ^~~~ ../src/eval.d:4224:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4224 | REQ_ARG(); | ^ ../src/eval.d:4225:5: note: here 4225 | case (uintW)subr_argtype_1_2: /* SUBR with 1 required and 2 optional */ | ^~~~ ../src/eval.d:4226:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4226 | REQ_ARG(); | ^ ../src/eval.d:4227:5: note: here 4227 | case (uintW)subr_argtype_0_2: /* SUBR with 2 optional arguments */ | ^~~~ ../src/eval.d:4233:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4233 | REQ_ARG(); | ^ ../src/eval.d:4234:5: note: here 4234 | case (uintW)subr_argtype_1_3: /* SUBR with 1 required and 3 optional */ | ^~~~ ../src/eval.d:4235:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4235 | REQ_ARG(); | ^ ../src/eval.d:4236:5: note: here 4236 | case (uintW)subr_argtype_0_3: /* SUBR with 3 optional arguments */ | ^~~~ ../src/eval.d:4243:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4243 | OPT_ARG(5); | ^ ../src/eval.d:4244:5: note: here 4244 | case (uintW)subr_argtype_0_4: /* SUBR with 4 optional arguments */ | ^~~~ ../src/eval.d:4263:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4263 | REQ_ARG(); | ^ ../src/eval.d:4264:5: note: here 4264 | case (uintW)subr_argtype_2_0_rest: /* SUBR with 2 required and &rest */ | ^~~~ ../src/eval.d:4265:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4265 | REQ_ARG(); | ^ ../src/eval.d:4266:5: note: here 4266 | case (uintW)subr_argtype_1_0_rest: /* SUBR with 1 required and &rest */ | ^~~~ ../src/eval.d:4267:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4267 | REQ_ARG(); | ^ ../src/eval.d:4268:5: note: here 4268 | case (uintW)subr_argtype_0_0_rest: /* SUBR with rest arguments */ | ^~~~ ../src/eval.d:4274:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4274 | REQ_ARG(); | ^ ../src/eval.d:4275:5: note: here 4275 | case (uintW)subr_argtype_3_0_key: /* SUBR with 3 required and &key */ | ^~~~ ../src/eval.d:4276:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4276 | REQ_ARG(); | ^ ../src/eval.d:4277:5: note: here 4277 | case (uintW)subr_argtype_2_0_key: /* SUBR with 2 required and &key */ | ^~~~ ../src/eval.d:4278:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4278 | REQ_ARG(); | ^ ../src/eval.d:4279:5: note: here 4279 | case (uintW)subr_argtype_1_0_key: /* SUBR with 1 required and &key */ | ^~~~ ../src/eval.d:4280:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4280 | REQ_ARG(); | ^ ../src/eval.d:4281:5: note: here 4281 | case (uintW)subr_argtype_0_0_key: /* SUBR with &key */ | ^~~~ ../src/eval.d:4286:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 4286 | REQ_ARG(); | ^ ../src/eval.d:4287:5: note: here 4287 | case (uintW)subr_argtype_0_1_key: | ^~~~ ../src/eval.d: In function ‘funcall_closure’: ../src/eval.d:5339:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5339 | case 0: { pushSTACK(unbound); } | ^ ../src/eval.d:5340:11: note: here 5340 | case 1: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5347:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5347 | case 1: { pushSTACK(unbound); } | ^ ../src/eval.d:5348:11: note: here 5348 | case 2: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5355:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5355 | case 2: { pushSTACK(unbound); } | ^ ../src/eval.d:5356:11: note: here 5356 | case 3: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5363:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5363 | case 3: { pushSTACK(unbound); } | ^ ../src/eval.d:5364:11: note: here 5364 | case 4: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5370:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5370 | case 0: { pushSTACK(unbound); } | ^ ../src/eval.d:5371:11: note: here 5371 | case 1: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5371:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5371 | case 1: { pushSTACK(unbound); } | ^ ../src/eval.d:5372:11: note: here 5372 | case 2: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5379:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5379 | case 1: { pushSTACK(unbound); } | ^ ../src/eval.d:5380:11: note: here 5380 | case 2: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5380:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5380 | case 2: { pushSTACK(unbound); } | ^ ../src/eval.d:5381:11: note: here 5381 | case 3: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5388:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5388 | case 2: { pushSTACK(unbound); } | ^ ../src/eval.d:5389:11: note: here 5389 | case 3: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5389:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5389 | case 3: { pushSTACK(unbound); } | ^ ../src/eval.d:5390:11: note: here 5390 | case 4: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5396:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5396 | case 0: { pushSTACK(unbound); } | ^ ../src/eval.d:5397:11: note: here 5397 | case 1: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5397:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5397 | case 1: { pushSTACK(unbound); } | ^ ../src/eval.d:5398:11: note: here 5398 | case 2: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5398:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5398 | case 2: { pushSTACK(unbound); } | ^ ../src/eval.d:5399:11: note: here 5399 | case 3: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5406:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5406 | case 1: { pushSTACK(unbound); } | ^ ../src/eval.d:5407:11: note: here 5407 | case 2: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5407:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5407 | case 2: { pushSTACK(unbound); } | ^ ../src/eval.d:5408:11: note: here 5408 | case 3: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5408:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5408 | case 3: { pushSTACK(unbound); } | ^ ../src/eval.d:5409:11: note: here 5409 | case 4: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5415:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5415 | case 0: { pushSTACK(unbound); } | ^ ../src/eval.d:5416:11: note: here 5416 | case 1: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5416:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5416 | case 1: { pushSTACK(unbound); } | ^ ../src/eval.d:5417:11: note: here 5417 | case 2: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5417:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5417 | case 2: { pushSTACK(unbound); } | ^ ../src/eval.d:5418:11: note: here 5418 | case 3: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5418:203: warning: this statement may fall through [-Wimplicit-fallthrough=] 5418 | case 3: { pushSTACK(unbound); } | ^ ../src/eval.d:5419:11: note: here 5419 | case 4: { pushSTACK(unbound); } | ^~~~ ../src/eval.d: In function ‘funcall_subr’: ../src/eval.d:5028:201: warning: this statement may fall through [-Wimplicit-fallthrough=] 5028 | case 0: { pushSTACK(unbound); } | ^ ../src/eval.d:5029:9: note: here 5029 | case 1: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5036:201: warning: this statement may fall through [-Wimplicit-fallthrough=] 5036 | case 1: { pushSTACK(unbound); } | ^ ../src/eval.d:5037:9: note: here 5037 | case 2: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5045:201: warning: this statement may fall through [-Wimplicit-fallthrough=] 5045 | case 2: { pushSTACK(unbound); } | ^ ../src/eval.d:5046:9: note: here 5046 | case 3: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5055:201: warning: this statement may fall through [-Wimplicit-fallthrough=] 5055 | case 3: { pushSTACK(unbound); } | ^ ../src/eval.d:5056:9: note: here 5056 | case 4: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5062:201: warning: this statement may fall through [-Wimplicit-fallthrough=] 5062 | case 0: { pushSTACK(unbound); } | ^ ../src/eval.d:5063:9: note: here 5063 | case 1: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5063:201: warning: this statement may fall through [-Wimplicit-fallthrough=] 5063 | case 1: { pushSTACK(unbound); } | ^ ../src/eval.d:5064:9: note: here 5064 | case 2: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5071:201: warning: this statement may fall through [-Wimplicit-fallthrough=] 5071 | case 1: { pushSTACK(unbound); } | ^ ../src/eval.d:5072:9: note: here 5072 | case 2: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5072:201: warning: this statement may fall through [-Wimplicit-fallthrough=] 5072 | case 2: { pushSTACK(unbound); } | ^ ../src/eval.d:5073:9: note: here 5073 | case 3: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5081:201: warning: this statement may fall through [-Wimplicit-fallthrough=] 5081 | case 2: { pushSTACK(unbound); } | ^ ../src/eval.d:5082:9: note: here 5082 | case 3: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5082:201: warning: this statement may fall through [-Wimplicit-fallthrough=] 5082 | case 3: { pushSTACK(unbound); } | ^ ../src/eval.d:5083:9: note: here 5083 | case 4: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5089:201: warning: this statement may fall through [-Wimplicit-fallthrough=] 5089 | case 0: { pushSTACK(unbound); } | ^ ../src/eval.d:5090:9: note: here 5090 | case 1: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5090:201: warning: this statement may fall through [-Wimplicit-fallthrough=] 5090 | case 1: { pushSTACK(unbound); } | ^ ../src/eval.d:5091:9: note: here 5091 | case 2: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5091:201: warning: this statement may fall through [-Wimplicit-fallthrough=] 5091 | case 2: { pushSTACK(unbound); } | ^ ../src/eval.d:5092:9: note: here 5092 | case 3: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5098:201: warning: this statement may fall through [-Wimplicit-fallthrough=] 5098 | case 0: { pushSTACK(unbound); } | ^ ../src/eval.d:5099:9: note: here 5099 | case 1: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5099:201: warning: this statement may fall through [-Wimplicit-fallthrough=] 5099 | case 1: { pushSTACK(unbound); } | ^ ../src/eval.d:5100:9: note: here 5100 | case 2: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5100:201: warning: this statement may fall through [-Wimplicit-fallthrough=] 5100 | case 2: { pushSTACK(unbound); } | ^ ../src/eval.d:5101:9: note: here 5101 | case 3: { pushSTACK(unbound); } | ^~~~ ../src/eval.d:5101:201: warning: this statement may fall through [-Wimplicit-fallthrough=] 5101 | case 3: { pushSTACK(unbound); } | ^ ../src/eval.d:5102:9: note: here 5102 | case 4: { pushSTACK(unbound); } | ^~~~ ../src/eval.d: In function ‘eval’: ../src/eval.d:2973:22: warning: argument ‘form’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 2973 | modexp maygc Values eval (object form) | ~~~~~~~^~~~ ../src/eval.d: In function ‘funcall_iclosure’: ../src/eval.d:2686:20: warning: variable ‘count’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 2686 | var uintC count; | ^~~~~ ../src/eval.d:2701:25: warning: variable ‘rest_args_pointer’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 2701 | var gcv_object_t* rest_args_pointer = args_pointer; | ^~~~~~~~~~~~~~~~~ ../src/eval.d:2730:278: warning: variable ‘find_count’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 2730 | dotimespC(count,count, { | ^ ../src/eval.d:2497:40: warning: argument ‘closure’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 2497 | local maygc Values funcall_iclosure (object closure, gcv_object_t* args_pointer, | ~~~~~~~^~~~~~~ ../src/eval.d:2498:45: warning: argument ‘argcount’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 2498 | uintC argcount) | ~~~~~~~^~~~~~~~ ../src/eval.d: In function ‘interpret_bytecode_’: ../src/eval.d:5801:19: warning: variable ‘closureptr’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 5801 | var gcv_object_t* closureptr = (pushSTACK(closure), &STACK_0); | ^~~~~~~~~~ ../src/eval.d:5772:43: warning: argument ‘closure’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 5772 | local /*maygc*/ Values interpret_bytecode_ (object closure_in, Sbvector codeptr, | ~~~~~~~^~~~~~~ ../src/eval.d:5772:61: warning: argument ‘codeptr’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 5772 | local /*maygc*/ Values interpret_bytecode_ (object closure_in, Sbvector codeptr, | ~~~~~~~~~^~~~~~~ ../src/eval.d: In function ‘invoke_handlers’: ../src/eval.d:711:20: warning: variable ‘other_ranges’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 711 | var stack_range_t* other_ranges = inactive_handlers; | ^~~~~~~~~~~~ ../src/eval.d:714:19: warning: variable ‘FRAME’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 714 | var gcv_object_t* FRAME = STACK; | ^~~~~ ../src/eval.d:728:17: warning: variable ‘i’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 728 | var uintL i = 0; | ^ ../src/eval.d: In function ‘eval_no_hooks’: ../src/eval.d:3028:31: warning: argument ‘form’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 3028 | global maygc Values eval_no_hooks (object form) { | ~~~~~~~^~~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c control.c In file included from ../src/control.d:8: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/control.d: In function ‘aktenv_to_stack’: ../src/control.d:353:24: warning: unused variable ‘stack_env’ [-Wunused-variable] 353 | var gcv_environment_t* stack_env = nest_aktenv(); | ^~~~~~~~~ ../src/control.d: In function ‘C_compiler_let’: ../src/control.d:799:14: warning: variable ‘symbol’ set but not used [-Wunused-but-set-variable] 799 | var object symbol; | ^~~~~~ ../src/control.d: In function ‘C_values’: ../src/control.d:1744:50: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 1744 | LISPFUN(values,seclass_no_se,0,0,rest,nokey,0,NIL) | ~~~~~~~~~~~~~~^ ../src/control.d: In function ‘C_xor’: ../src/control.d:2518:47: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 2518 | LISPFUN(xor,seclass_foldable,0,0,rest,nokey,0,NIL) | ~~~~~~~~~~~~~~^~~~ ../src/control.d: In function ‘C_tagbody’: ../src/control.d:1605:12: warning: variable ‘body’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 1605 | var object body = popSTACK(); | ^~~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -falign-functions=8 -c encoding.c In file included from ../src/encoding.d:7: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/encoding.d: In function ‘base64_to_chars’: ../src/encoding.d:87:11: warning: unused variable ‘pos’ [-Wunused-variable] 87 | var uintL pos = 0; | ^~~ ../src/encoding.d: In function ‘C_make_encoding’: ../src/encoding.d:2111:10: warning: label ‘create_new_encoding’ defined but not used [-Wunused-label] 2111 | } else create_new_encoding: { | ^~~~~~~~~~~~~~~~~~~ ../src/encoding.d: In function ‘nls_range’: ../src/encoding.d:1957:96: warning: ‘i2’ may be used uninitialized in this function [-Wmaybe-uninitialized] 1957 | pushSTACK(code_char(as_chart(i2))); | ^ ../src/encoding.d:1940:13: note: ‘i2’ was declared here 1940 | var uintL i2; | ^~ ../src/encoding.d:1956:96: warning: ‘i1’ may be used uninitialized in this function [-Wmaybe-uninitialized] 1956 | pushSTACK(code_char(as_chart(i1))); | ^ ../src/encoding.d:1939:13: note: ‘i1’ was declared here 1939 | var uintL i1; | ^~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c pathname.c In file included from ../src/pathname.d:9: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/pathname.d: In function ‘C_merge_pathnames’: ../src/pathname.d:2872:2: warning: label ‘notmatch_directories’ defined but not used [-Wunused-label] 2872 | notmatch_directories: | ^~~~~~~~~~~~~~~~~~~~ ../src/pathname.d:2866:2: warning: label ‘notmatch_devices’ defined but not used [-Wunused-label] 2866 | notmatch_devices: | ^~~~~~~~~~~~~~~~ ../src/pathname.d:2855:2: warning: label ‘match_directories’ defined but not used [-Wunused-label] 2855 | match_directories: { /* match directories: */ | ^~~~~~~~~~~~~~~~~ ../src/pathname.d:2838:2: warning: label ‘match_devices’ defined but not used [-Wunused-label] 2838 | match_devices: | ^~~~~~~~~~~~~ ../src/pathname.d: In function ‘C_pathname_match_p’: ../src/pathname.d:3973:2: warning: label ‘yes’ defined but not used [-Wunused-label] 3973 | yes: | ^~~ ../src/pathname.d: In function ‘open_file’: ../src/pathname.d:6674:2: warning: label ‘handle_ok’ defined but not used [-Wunused-label] 6674 | handle_ok: | ^~~~~~~~~ ../src/pathname.d: At top level: ../src/pathname.d:3609:11: warning: ‘has_host_wildcards’ declared ‘static’ but never defined [-Wunused-function] 3609 | local bool has_host_wildcards (object pathname); | ^~~~~~~~~~~~~~~~~~ ../src/pathname.d: In function ‘classify_namestring’: ../src/pathname.d:5784:5: warning: ignoring return value of ‘realpath’ declared with attribute ‘warn_unused_result’ [-Wunused-result] 5784 | realpath(namestring,resolved); /* ==> success assured */ | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ../src/pathname.d: In function ‘C_probe_pathname’: ../src/pathname.d:5854:10: warning: this statement may fall through [-Wimplicit-fallthrough=] 5854 | if (errorp) | ^ ../src/pathname.d:5857:5: note: here 5857 | case FILE_KIND_NONE: /* does not exist */ | ^~~~ ../src/pathname.d: In function ‘open_file’: ../src/pathname.d:6620:40: warning: this statement may fall through [-Wimplicit-fallthrough=] 6620 | case DIRECTION_OUTPUT: wronly_flag = true; /*FALLTHROUGH*/ ../src/pathname.d:6621:5: note: here 6621 | case DIRECTION_IO: | ^~~~ ../src/pathname.d: In function ‘C_launch’: ../src/pathname.d:8752:15: warning: ignoring return value of ‘nice’ declared with attribute ‘warn_unused_result’ [-Wunused-result] 8752 | errno = 0; nice(priority); | ^~~~~~~~~~~~~~ At top level: ../src/pathname.d:4423:15: warning: ‘translate_device’ defined but not used [-Wunused-function] 4423 | local maygc object translate_device (gcv_object_t* subst, object pattern, | ^~~~~~~~~~~~~~~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -falign-functions=8 -c stream.c In file included from ../src/stream.d:10: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/stream.d: In function ‘wr_ch_array_dummy’: ../src/stream.d:397:243: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 397 | SstringDispatch(*chararray_,X, { | ^ ../src/stream.d:397:628: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 397 | SstringDispatch(*chararray_,X, { | ^ ../src/stream.d:397:1014: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 397 | SstringDispatch(*chararray_,X, { | ^ ../src/stream.d: In function ‘wr_ch_array_pending_newline’: ../src/stream.d:976:243: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 976 | SstringDispatch(*chararray_,X, { | ^ ../src/stream.d:976:512: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 976 | SstringDispatch(*chararray_,X, { | ^ ../src/stream.d:976:782: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 976 | SstringDispatch(*chararray_,X, { | ^ ../src/stream.d: In function ‘write_char_array’: ../src/stream.d:1010:247: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 1010 | SstringDispatch(*chararray_,X, { | ^ ../src/stream.d:1010:516: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 1010 | SstringDispatch(*chararray_,X, { | ^ ../src/stream.d:1010:786: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 1010 | SstringDispatch(*chararray_,X, { | ^ ../src/stream.d: In function ‘listen_handle’: ../src/stream.d:4813:50: warning: unused parameter ‘tty_p’ [-Wunused-parameter] 4813 | local listen_t listen_handle (Handle handle, bool tty_p, int *byte) { ../src/stream.d: In function ‘low_write_unbuffered_handle’: ../src/stream.d:5473:2: warning: label ‘restart_it’ defined but not used [-Wunused-label] 5473 | restart_it: | ^~~~~~~~~~ ../src/stream.d: In function ‘rd_ch_keyboard’: ../src/stream.d:8804:4: warning: label ‘next_char_is_read’ defined but not used [-Wunused-label] 8804 | next_char_is_read: { /* increase the buffer: */ | ^~~~~~~~~~~~~~~~~ ../src/stream.d: In function ‘make_keyboard_stream’: ../src/stream.d:9163:7: warning: label ‘xterm’ defined but not used [-Wunused-label] 9163 | xterm: | ^~~~~ ../src/stream.d: In function ‘unread_char’: ../src/stream.d:766:18: warning: this statement may fall through [-Wimplicit-fallthrough=] 766 | stream = *stream_; | ~~~~~~~^~~~~~~~~~ ../src/stream.d:768:9: note: here 768 | default: | ^~~~~~~ ../src/stream.d: In function ‘test_socket_stream’: ../src/stream.d:13840:13: warning: this statement may fall through [-Wimplicit-fallthrough=] 13840 | obj = TheStream(obj)->strm_twoway_socket_input; | ~~~~^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ../src/stream.d:13842:7: note: here 13842 | case strmtype_socket: | ^~~~ ../src/stream.d: In function ‘C_socket_stream_shutdown’: ../src/stream.d:14730:13: warning: this statement may fall through [-Wimplicit-fallthrough=] 14730 | get_handle_and_mark(TheStream(STACK_0)->strm_twoway_socket_output, | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 14731 | strmflags_wr_B,strm_ochannel_position); | ~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ../src/stream.d:14733:11: note: here 14733 | case DIRECTION_INPUT: case DIRECTION_INPUT_IMMUTABLE: | ^~~~ ../src/stream.d: In function ‘C_stream_external_format’: ../src/stream.d:15735:130: warning: this statement may fall through [-Wimplicit-fallthrough=] 15735 | if (streamp(stream)) { | ~~~~~~~~~~~~~~~~~~ ^ ../src/stream.d:15739:7: note: here 15739 | default: | ^~~~~~~ ../src/stream.d: In function ‘interactive_stream_p’: ../src/stream.d:15967:10: warning: this statement may fall through [-Wimplicit-fallthrough=] 15967 | if (nullp(TheStream(stream)->strm_isatty)) | ^ ../src/stream.d:15972:5: note: here 15972 | case strmtype_keyboard: | ^~~~ ../src/stream.d: In function ‘C_read_byte_no_hang’: ../src/stream.d:17094:7: warning: this statement may fall through [-Wimplicit-fallthrough=] 17094 | var object obj = read_byte(stream); | ^ ../src/stream.d:17101:5: note: here 17101 | case LISTEN_ERROR: OS_filestream_error(STACK_2); | ^~~~ At top level: ../src/stream.d:13309:11: warning: ‘sock_error_eof_p’ defined but not used [-Wunused-function] 13309 | local bool sock_error_eof_p (void) { | ^~~~~~~~~~~~~~~~ ../src/stream.d: In function ‘lisp_completion’: ../src/stream.d:9329:22: warning: variable ‘ptr1’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 9329 | var const chart* ptr1; | ^~~~ ../src/stream.d: In function ‘close_ochannel’: ../src/stream.d:5878:36: warning: argument ‘stream’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 5878 | local maygc void close_ochannel (object stream, uintB abort) { | ~~~~~~~^~~~~~ ../src/stream.d: In function ‘close_buffered’: ../src/stream.d:8361:36: warning: argument ‘stream’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 8361 | local maygc void close_buffered (object stream, uintB abort) { | ~~~~~~~^~~~~~ ../src/stream.d: In function ‘handle_isset’: ../src/stream.d:14305:124: warning: ‘ret’ may be used uninitialized in this function [-Wmaybe-uninitialized] 14305 | if (!nullp(status_cons)) Cdr(status_cons) = ret; | ^ ../src/stream.d:14269:18: note: ‘ret’ was declared here 14269 | var object sock, ret; | ^~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -falign-functions=8 -c socket.c In file included from ../src/socket.d:44: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c io.c In file included from ../src/io.d:9: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/io.d: In function ‘interpret_feature’: ../src/io.d:3762:14: warning: unused variable ‘and_or_flag’ [-Wunused-variable] 3762 | var uintWL and_or_flag; | ^~~~~~~~~~~ ../src/io.d: In function ‘C_parse_integer’: ../src/io.d:4733:12: warning: unused variable ‘string’ [-Wunused-variable] 4733 | var object string = test_string_limits_ro(&arg); | ^~~~~~ ../src/io.d: In function ‘write_sstring_invert’: ../src/io.d:5075:235: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 5075 | SstringDispatch(string,X, { | ^ ../src/io.d:5075:677: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 5075 | SstringDispatch(string,X, { | ^ ../src/io.d:5075:1120: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 5075 | SstringDispatch(string,X, { | ^ ../src/io.d: In function ‘write_sstring_case_ext’: ../src/io.d:5122:243: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 5122 | SstringDispatch(string,X, { | ^ ../src/io.d:5122:774: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 5122 | SstringDispatch(string,X, { | ^ ../src/io.d:5122:1306: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 5122 | SstringDispatch(string,X, { | ^ ../src/io.d:5138:243: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 5138 | SstringDispatch(string,X, { | ^ ../src/io.d:5138:772: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 5138 | SstringDispatch(string,X, { | ^ ../src/io.d:5138:1302: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 5138 | SstringDispatch(string,X, { | ^ ../src/io.d:5151:310: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 5151 | switch_print_case( | ^ ../src/io.d:5151:470: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 5151 | switch_print_case( | ^ ../src/io.d:5151:470: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 5151 | switch_print_case( | ^ ../src/io.d:5232:310: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 5232 | switch_print_case( | ^ ../src/io.d:5232:469: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 5232 | switch_print_case( | ^ ../src/io.d:5232:469: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 5232 | switch_print_case( | ^ ../src/io.d: In function ‘pr_symbol_part’: ../src/io.d:7099:271: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 7099 | SstringDispatch(STACK_2,X, { | ^ ../src/io.d:7099:771: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 7099 | SstringDispatch(STACK_2,X, { | ^ ../src/io.d:7099:1272: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 7099 | SstringDispatch(STACK_2,X, { | ^ ../src/io.d:7133:271: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 7133 | SstringDispatch(STACK_0,X, { | ^ ../src/io.d:7133:1039: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 7133 | SstringDispatch(STACK_0,X, { | ^ ../src/io.d:7133:1808: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 7133 | SstringDispatch(STACK_0,X, { | ^ ../src/io.d: In function ‘pr_sstring_ab’: ../src/io.d:7251:237: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 7251 | SstringDispatch(string,X, { | ^ ../src/io.d:7251:573: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 7251 | SstringDispatch(string,X, { | ^ ../src/io.d:7251:573: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 7251 | SstringDispatch(string,X, { | ^ ../src/io.d:7297:239: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 7297 | SstringDispatch(string,X, { | ^ ../src/io.d:7297:903: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 7297 | SstringDispatch(string,X, { | ^ ../src/io.d:7297:1568: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 7297 | SstringDispatch(string,X, { | ^ ../src/io.d: In function ‘C_get_macro_character’: ../src/io.d:693:24: warning: this statement may fall through [-Wimplicit-fallthrough=] 693 | case syntax_nt_macro: { nontermp = T; } | ~~~~~~~~~^~~~~~~~~~~~~~~~~~~~ ../src/io.d:694:5: note: here 694 | case syntax_t_macro: { /* nontermp = NIL; */ | ^~~~ ../src/io.d: In function ‘test_number_syntax’: ../src/io.d:1512:24: warning: this statement may fall through [-Wimplicit-fallthrough=] 1512 | case a_minus: info->sign = -1; /* sign:=negativ */ | ~~~~~~~~~~~^~~~ ../src/io.d:1513:5: note: here 1513 | case a_plus: /* read over sign: */ | ^~~~ ../src/io.d: In function ‘C_parse_integer’: ../src/io.d:4766:22: warning: this statement may fall through [-Wimplicit-fallthrough=] 4766 | case '-': sign = -1; /* sign := negative */ | ~~~~~^~~~ ../src/io.d:4767:7: note: here 4767 | case '+': /* sign found */ | ^~~~ ../src/io.d: In function ‘pr_array’: ../src/io.d:8191:28: warning: this statement may fall through [-Wimplicit-fallthrough=] 8191 | case Atype_T: readable = false; /* automatically rereadable */ ../src/io.d:8193:11: note: here 8193 | default: locals.pr_one_elt = &pr_array_elt_simple; | ^~~~~~~ ../src/io.d: In function ‘pr_stream’: ../src/io.d:9954:13: warning: this statement may fall through [-Wimplicit-fallthrough=] 9954 | *obj_ = TheStream(*obj_)->strm_twoway_socket_input; | ~~~~~~^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ../src/io.d:9956:5: note: here 9956 | case strmtype_socket: { /* Socket-Stream */ | ^~~~ ../src/io.d: In function ‘pr_real_number’: ../src/io.d:7633:16: warning: this statement may fall through [-Wimplicit-fallthrough=] 7633 | if (RA_integerp(number)) { | ~^~~~~~~~~~~~~~~~~~~~~ ../src/io.d:7640:9: note: here 7640 | default: { /* print base in #nR-notation: */ | ^~~~~~~ ../src/io.d: In function ‘C_pprint_newline’: ../src/io.d:10119:34: warning: this statement may fall through [-Wimplicit-fallthrough=] 10119 | STACK_1 = S(Klinear); | ~~~~~~~~~~~~~~~~~~~~~ ^ ../src/io.d:10121:7: note: here 10121 | case PPRINT_NEWLINE_LINEAR: { | ^~~~ ../src/io.d:10122:12: warning: this statement may fall through [-Wimplicit-fallthrough=] 10122 | if (eq(TheStream(STACK_0)->strm_pphelp_modus,mehrzeiler)) | ^ ../src/io.d:10125:7: note: here 10125 | case PPRINT_NEWLINE_FILL: { | ^~~~ ../src/io.d: In function ‘C_bit_vector_reader’: ../src/io.d:3276:10: warning: ‘ch’ may be used uninitialized in this function [-Wmaybe-uninitialized] 3276 | if (chareq(ch,ascii('0'))) { | ^ ../src/io.d:3271:13: note: ‘ch’ was declared here 3271 | var chart ch; /* last character ('0' or '1') */ | ^~ ../src/io.d: In function ‘C_vector_reader’: ../src/io.d:3333:15: warning: ‘el’ may be used uninitialized in this function [-Wmaybe-uninitialized] 3333 | *vptr++ = el; | ~~~~~~~~^~~~ ../src/io.d:3327:14: note: ‘el’ was declared here 3327 | var object el; /* last Element */ | ^~ ../src/io.d: In function ‘prin_object_dispatch_low’: ../src/io.d:9548:166: warning: array subscript 1 is outside array bounds of ‘struct subr_tab_[1]’ [-Warray-bounds] 9548 | pr_unreadably(stream_,TheSubr(obj)->name, | ^ In file included from ../src/io.d:9: ../src/lispbibl.d:13588:3: note: while referencing ‘subr_tab_data’ 13588 | } subr_tab_data; | ^~~~~~~~~~~~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -falign-functions=8 -c funarg.c In file included from ../src/funarg.d:7: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c array.c In file included from ../src/array.d:8: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/array.d: In function ‘C_vector’: ../src/array.d:191:50: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 191 | LISPFUN(vector,seclass_no_se,0,0,rest,nokey,0,NIL) | ~~~~~~~~~~~~~~^ ../src/array.d: In function ‘make_ssstring’: ../src/array.d:4028:11: warning: comparison is always false due to limited range of data type [-Wtype-limits] 4028 | if (len > arraysize_limit_1) | ^ ../src/array.d: In function ‘ssstring_extend_low’: ../src/array.d:4049:12: warning: comparison is always false due to limited range of data type [-Wtype-limits] 4049 | if (size > arraysize_limit_1) | ^ ../src/array.d: In function ‘ssstring_push_extend’: ../src/array.d:4084:13: warning: comparison is always false due to limited range of data type [-Wtype-limits] 4084 | if (len > arraysize_limit_1) /* cannot extend beyond arraysize_limit_1 */ | ^ ../src/array.d: In function ‘ssstring_extend’: ../src/array.d:4108:18: warning: comparison is always false due to limited range of data type [-Wtype-limits] 4108 | if (needed_len > arraysize_limit_1) /* cannot extend beyond arraysize_limit_1 */ | ^ ../src/array.d:4113:17: warning: comparison is always false due to limited range of data type [-Wtype-limits] 4113 | if (now_len > arraysize_limit_1) /* cannot extend beyond arraysize_limit_1 */ | ^ ../src/array.d: In function ‘make_ssbvector’: ../src/array.d:4172:11: warning: comparison is always false due to limited range of data type [-Wtype-limits] 4172 | if (len > arraysize_limit_1) | ^ ../src/array.d: In function ‘ssbvector_push_extend’: ../src/array.d:4198:13: warning: comparison is always false due to limited range of data type [-Wtype-limits] 4198 | if (len > arraysize_limit_1) /* cannot extend beyond arraysize_limit_1 */ | ^ ../src/array.d: In function ‘test_dims’: ../src/array.d:4262:43: warning: comparison is always true due to limited range of data type [-Wtype-limits] 4262 | if (!((produkt_hi==0) && (produkt_lo<=arraysize_limit_1))) { /* product < 2^24 ? */ | ^~ ../src/array.d: In function ‘C_make_bit_vector’: ../src/array.d:5159:11: warning: unused variable ‘size’ [-Wunused-variable] 5159 | var uintL size; | ^~~~ ../src/array.d: At top level: ../src/array.d:2079:13: warning: ‘elt_copy_Bit_Bit’ declared ‘static’ but never defined [-Wunused-function] 2079 | local void elt_copy_Bit_Bit (object dv1, uintL index1, object dv2, uintL index2, uintL count); | ^~~~~~~~~~~~~~~~ ../src/array.d:2080:13: warning: ‘elt_copy_2Bit_2Bit’ declared ‘static’ but never defined [-Wunused-function] 2080 | local void elt_copy_2Bit_2Bit (object dv1, uintL index1, object dv2, uintL index2, uintL count); | ^~~~~~~~~~~~~~~~~~ ../src/array.d:2081:13: warning: ‘elt_copy_4Bit_4Bit’ declared ‘static’ but never defined [-Wunused-function] 2081 | local void elt_copy_4Bit_4Bit (object dv1, uintL index1, object dv2, uintL index2, uintL count); | ^~~~~~~~~~~~~~~~~~ ../src/array.d: In function ‘C_make_array’: ../src/array.d:4696:17: warning: ‘fillpointer’ may be used uninitialized in this function [-Wmaybe-uninitialized] 4696 | *dimptr++ = fillpointer; | ~~~~~~~~~~^~~~~~~~~~~~~ ../src/array.d:4598:11: note: ‘fillpointer’ was declared here 4598 | var uintL fillpointer; | ^~~~~~~~~~~ ../src/array.d: In function ‘C_adjust_array’: ../src/array.d:5028:19: warning: ‘fillpointer’ may be used uninitialized in this function [-Wmaybe-uninitialized] 5028 | *dimptr = fillpointer; | ~~~~~~~~^~~~~~~~~~~~~ ../src/array.d:4918:11: note: ‘fillpointer’ was declared here 4918 | var uintL fillpointer; | ^~~~~~~~~~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -O1 -falign-functions=8 -c hashtabl.c In file included from ../src/hashtabl.d:8: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/hashtabl.d: In function ‘C_hash_table_rehash_threshold’: ../src/hashtabl.d:2399:12: warning: unused variable ‘ht’ [-Wunused-variable] 2399 | var object ht = check_hashtable(popSTACK()); /* hashtable argument */ | ^~ ../src/hashtabl.d: At top level: ../src/hashtabl.d:115:15: warning: ‘hashcode1’ declared ‘static’ but never defined [-Wunused-function] 115 | local uint32 hashcode1 (object obj); | ^~~~~~~~~ ../src/hashtabl.d:200:15: warning: ‘hashcode_fixnum’ declared ‘static’ but never defined [-Wunused-function] 200 | local uint32 hashcode_fixnum (object obj); | ^~~~~~~~~~~~~~~ ../src/hashtabl.d:225:15: warning: ‘hashcode_sfloat’ declared ‘static’ but never defined [-Wunused-function] 225 | local uint32 hashcode_sfloat (object obj); | ^~~~~~~~~~~~~~~ ../src/hashtabl.d: In function ‘hashcode4_vector’: ../src/hashtabl.d:942:10: warning: this statement may fall through [-Wimplicit-fallthrough=] 942 | if (count > 0) | ^ ../src/hashtabl.d:945:5: note: here 945 | case Array_type_sstring: /* simple-string */ | ^~~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c list.c In file included from ../src/list.d:8: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/list.d: In function ‘C_list’: ../src/list.d:841:48: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 841 | LISPFUN(list,seclass_no_se,0,0,rest,nokey,0,NIL) | ~~~~~~~~~~~~~~^ ../src/list.d: In function ‘C_liststar’: ../src/list.d:846:52: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 846 | LISPFUN(liststar,seclass_no_se,1,0,rest,nokey,0,NIL) | ~~~~~~~~~~~~~~^ ../src/list.d: In function ‘C_append’: ../src/list.d:867:50: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 867 | LISPFUN(append,seclass_read,0,0,rest,nokey,0,NIL) | ~~~~~~~~~~~~~~^ ../src/list.d: In function ‘C_nconc’: ../src/list.d:996:49: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 996 | LISPFUN(nconc,seclass_default,0,0,rest,nokey,0,NIL) | ~~~~~~~~~~~~~~^~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c package.c In file included from ../src/package.d:8: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/package.d: In function ‘use_package’: ../src/package.d:1565:19: warning: unused variable ‘pack_lock_’ [-Wunused-variable] 1565 | var gcv_object_t *pack_lock_ = &STACK_1; | ^~~~~~~~~~ ../src/package.d:1564:19: warning: unused variable ‘packlist_lock_’ [-Wunused-variable] 1564 | var gcv_object_t *packlist_lock_ = &STACK_0; | ^~~~~~~~~~~~~~ ../src/package.d: In function ‘C_re_export’: ../src/package.d:2932:12: warning: unused variable ‘pack_u_l’ [-Wunused-variable] 2932 | var object pack_u_l = ThePackage(STACK_0)->pack_use_list; | ^~~~~~~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c record.c In file included from ../src/record.d:7: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/record.d: In function ‘update_instance’: ../src/record.d:1492:18: warning: unused variable ‘oldclass’ [-Wunused-variable] 1492 | var object oldclass = TheClassVersion(cv)->cv_class; | ^~~~~~~~ ../src/record.d:1409:50: warning: argument ‘obj’ might be clobbered by ‘longjmp’ or ‘vfork’ [-Wclobbered] 1409 | global maygc object update_instance (object user_obj, object obj) { | ~~~~~~~^~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c weak.c In file included from ../src/weak.d:6: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c sequence.c In file included from ../src/sequence.d:7: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/sequence.d: In function ‘C_mismatch’: ../src/sequence.d:3880:19: warning: unused variable ‘stackptr’ [-Wunused-variable] 3880 | var gcv_object_t* stackptr = &STACK_6; | ^~~~~~~~ ../src/sequence.d: In function ‘C_search’: ../src/sequence.d:4068:19: warning: unused variable ‘stackptr’ [-Wunused-variable] 4068 | var gcv_object_t* stackptr = &STACK_6; | ^~~~~~~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c charstrg.c In file included from ../src/charstrg.d:8: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/charstrg.d: In function ‘C_string_char_p’: ../src/charstrg.d:1481:12: warning: unused variable ‘arg’ [-Wunused-variable] 1481 | var object arg = check_char(popSTACK()); | ^~~ ../src/charstrg.d: In function ‘char_eq’: ../src/charstrg.d:1692:2: warning: label ‘yes’ defined but not used [-Wunused-label] 1692 | yes: VALUES1(T); goto ok; | ^~~ ../src/charstrg.d: In function ‘char_noteq’: ../src/charstrg.d:1718:2: warning: label ‘yes’ defined but not used [-Wunused-label] 1718 | yes: VALUES1(T); goto ok; | ^~~ ../src/charstrg.d: In function ‘char_less’: ../src/charstrg.d:1735:2: warning: label ‘yes’ defined but not used [-Wunused-label] 1735 | yes: VALUES1(T); goto ok; | ^~~ ../src/charstrg.d: In function ‘char_greater’: ../src/charstrg.d:1752:2: warning: label ‘yes’ defined but not used [-Wunused-label] 1752 | yes: VALUES1(T); goto ok; | ^~~ ../src/charstrg.d: In function ‘char_ltequal’: ../src/charstrg.d:1769:2: warning: label ‘yes’ defined but not used [-Wunused-label] 1769 | yes: VALUES1(T); goto ok; | ^~~ ../src/charstrg.d: In function ‘char_gtequal’: ../src/charstrg.d:1786:2: warning: label ‘yes’ defined but not used [-Wunused-label] 1786 | yes: VALUES1(T); goto ok; | ^~~ ../src/charstrg.d: In function ‘nstring_capitalize’: ../src/charstrg.d:3447:1130: warning: label ‘in_word_8’ defined but not used [-Wunused-label] 3447 | SstringCase(dv,{ | ^ ../src/charstrg.d: In function ‘C_string_concat’: ../src/charstrg.d:3745:57: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 3745 | LISPFUN(string_concat,seclass_read,0,0,rest,nokey,0,NIL) | ~~~~~~~~~~~~~~^ ../src/charstrg.d: At top level: ../src/charstrg.d:261:11: warning: ‘numericp’ declared ‘static’ but never defined [-Wunused-function] 261 | local bool numericp (chart ch); | ^~~~~~~~ ../src/charstrg.d: In function ‘sstring_store’: ../src/charstrg.d:604:20: warning: this statement may fall through [-Wimplicit-fallthrough=] 604 | inner_string = TheSistring(inner_string)->data; | ~~~~~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ../src/charstrg.d:607:5: note: here 607 | case Sstringtype_32Bit: /* mutable Simple-String */ | ^~~~ ../src/charstrg.d: In function ‘sstring_store_array’: ../src/charstrg.d:711:22: warning: this statement may fall through [-Wimplicit-fallthrough=] 711 | inner_string = TheSistring(inner_string)->data; | ~~~~~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ../src/charstrg.d:715:7: note: here 715 | case Sstringtype_32Bit: { /* mutable Simple-String */ | ^~~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c debug.c In file included from ../src/debug.d:9: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c error.c In file included from ../src/error.d:9: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/error.d: In function ‘C_clcs_signal’: ../src/error.d:860:55: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 860 | LISPFUN(clcs_signal,seclass_default,1,0,rest,nokey,0,NIL) | ~~~~~~~~~~~~~~^~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c misc.c In file included from ../src/misc.d:7: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c time.c In file included from ../src/time.d:8: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -falign-functions=8 -c predtype.c In file included from ../src/predtype.d:8: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/predtype.d: In function ‘C_type_of’: ../src/predtype.d:1572:19: warning: label ‘case_lrecord’ defined but not used [-Wunused-label] 1572 | case_orecord: case_lrecord: /* OtherRecord -> PACKAGE, ... */ | ^~~~~~~~~~~~ ../src/predtype.d: In function ‘C_class_of’: ../src/predtype.d:1894:19: warning: label ‘case_lrecord’ defined but not used [-Wunused-label] 1894 | case_orecord: case_lrecord: /* OtherRecord -> , ... */ | ^~~~~~~~~~~~ ../src/predtype.d: In function ‘heap_statistics_mapper’: ../src/predtype.d:2871:19: warning: label ‘case_lrecord’ defined but not used [-Wunused-label] 2871 | case_orecord: case_lrecord: /* OtherRecord */ | ^~~~~~~~~~~~ ../src/predtype.d: At top level: ../src/predtype.d:260:22: warning: ‘elt_compare_Char_Char’ declared ‘static’ but never defined [-Wunused-function] 260 | local elt_compare_t elt_compare_Char_Char; | ^~~~~~~~~~~~~~~~~~~~~ ../src/predtype.d:261:22: warning: ‘elt_compare_Bit_Bit’ declared ‘static’ but never defined [-Wunused-function] 261 | local elt_compare_t elt_compare_Bit_Bit; | ^~~~~~~~~~~~~~~~~~~ ../src/predtype.d:267:22: warning: ‘elt_compare_2Bit_2Bit’ declared ‘static’ but never defined [-Wunused-function] 267 | local elt_compare_t elt_compare_2Bit_2Bit; | ^~~~~~~~~~~~~~~~~~~~~ ../src/predtype.d:272:22: warning: ‘elt_compare_4Bit_4Bit’ declared ‘static’ but never defined [-Wunused-function] 272 | local elt_compare_t elt_compare_4Bit_4Bit; | ^~~~~~~~~~~~~~~~~~~~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c symbol.c In file included from ../src/symbol.d:8: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/symbol.d: In function ‘C_putd’: ../src/symbol.d:60:12: warning: unused variable ‘symbol’ [-Wunused-variable] 60 | var object symbol = check_symbol(STACK_1); | ^~~~~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c lisparit.c In file included from ../src/lisparit.d:8: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ In file included from ../src/lisparit.d:30: ../src/intelem.d: In function ‘NDS_to_I’: ../src/intelem.d:981:6: warning: label ‘len_1’ defined but not used [-Wunused-label] 981 | len_1: value = (sint64)(sintD)MSDptr[0]; | ^~~~~ In file included from ../src/lisparit.d:31: ../src/intlog.d: In function ‘I_logcount_I’: ../src/intlog.d:724:14: warning: unused variable ‘x32’ [-Wunused-variable] 724 | var uint16 x16; /* auxiliary variable */ | ^~~ In file included from ../src/lisparit.d:31: ../src/intlog.d:750:123: warning: unused variable ‘x32’ [-Wunused-variable] 750 | dotimespC(len,len, { | ^ In file included from ../src/lisparit.d:37: ../src/intgcd.d: In function ‘partial_gcd’: ../src/intgcd.d:559:5: warning: label ‘subtract_from_2’ defined but not used [-Wunused-label] 559 | subtract_from_2: # Hier ist z2-x2>=z1+x1. | ^~~~~~~~~~~~~~~ In file included from ../src/lisparit.d:39: ../src/intsqrt.d: In function ‘UDS_sqrt_’: ../src/intsqrt.d:235:114: warning: statement with no effect [-Wunused-value] 235 | divuD(a_msdd,x, d=,); | ^ In file included from ../src/lisparit.d:39: ../src/intsqrt.d:292:126: warning: statement with no effect [-Wunused-value] 292 | divuD(a_123dd,b_msd, b_star=,); | ^ In file included from ../src/lisparit.d:46: ../src/sfloat.d: In function ‘SF_SF_plus_SF’: ../src/sfloat.d:328:4: warning: label ‘norm_1’ defined but not used [-Wunused-label] 328 | norm_1: # [Knuth, S.201, Schritt N1] | ^~~~~~ In file included from ../src/lisparit.d:53: ../src/realelem.d: In function ‘I_float_F’: ../src/realelem.d:216:134: warning: bitwise comparison always evaluates to false [-Wtautological-compare] 216 | defaultfloatcase(S(default_float_format),Fixnum_0, | ^ In file included from ../src/lisparit.d:53: ../src/realelem.d: In function ‘RA_float_F’: ../src/realelem.d:229:134: warning: bitwise comparison always evaluates to false [-Wtautological-compare] 229 | defaultfloatcase(S(default_float_format),Fixnum_0, | ^ In file included from ../src/lisparit.d:53: ../src/realelem.d: In function ‘R_float_digits’: ../src/realelem.d:307:136: warning: bitwise comparison always evaluates to false [-Wtautological-compare] 307 | defaultfloatcase(S(default_float_format),Fixnum_0, | ^ ../src/lisparit.d: In function ‘read_float’: ../src/lisparit.d:229:138: warning: bitwise comparison always evaluates to false [-Wtautological-compare] 229 | defaultfloatcase(S(read_default_float_format),Fixnum_0, | ^ ../src/lisparit.d: In function ‘C_numequal’: ../src/lisparit.d:542:2: warning: label ‘yes’ defined but not used [-Wunused-label] 542 | yes: | ^~~ ../src/lisparit.d: In function ‘C_numunequal’: ../src/lisparit.d:569:2: warning: label ‘yes’ defined but not used [-Wunused-label] 569 | yes: | ^~~ ../src/lisparit.d: In function ‘C_smaller’: ../src/lisparit.d:591:2: warning: label ‘yes’ defined but not used [-Wunused-label] 591 | yes: | ^~~ ../src/lisparit.d: In function ‘C_greater’: ../src/lisparit.d:613:2: warning: label ‘yes’ defined but not used [-Wunused-label] 613 | yes: | ^~~ ../src/lisparit.d: In function ‘C_ltequal’: ../src/lisparit.d:635:2: warning: label ‘yes’ defined but not used [-Wunused-label] 635 | yes: | ^~~ ../src/lisparit.d: In function ‘C_gtequal’: ../src/lisparit.d:657:2: warning: label ‘yes’ defined but not used [-Wunused-label] 657 | yes: | ^~~ ../src/lisparit.d: In function ‘C_boole’: ../src/lisparit.d:1548:12: warning: unused variable ‘op’ [-Wunused-variable] 1548 | var object op = STACK_2; /* operator, not a typetest */ | ^~ In file included from ../src/lisparit.d:30: ../src/lisparit.d: At top level: ../src/intelem.d:111:14: warning: ‘FN_to_V’ declared ‘static’ but never defined [-Wunused-function] 111 | local sintV FN_to_V (object obj); | ^~~~~~~ In file included from ../src/lisparit.d:30: ../src/intelem.d:145:15: warning: ‘FN_to_Q’ declared ‘static’ but never defined [-Wunused-function] 145 | local sint64 FN_to_Q (object obj); | ^~~~~~~ In file included from ../src/lisparit.d:30: ../src/intelem.d:943:15: warning: ‘UL_UL_minus_I’ declared ‘static’ but never defined [-Wunused-function] 943 | local maygc object UL_UL_minus_I (object x, object y); | ^~~~~~~~~~~~~ In file included from ../src/lisparit.d:38: ../src/int2adic.d:7:16: warning: ‘D_D_mult2adic_D’ declared ‘static’ but never defined [-Wunused-function] 7 | local uintD D_D_mult2adic_D (uintD a, uintD b); | ^~~~~~~~~~~~~~~ In file included from ../src/lisparit.d:51: ../src/flo_rest.d:1228:15: warning: ‘F_float_radix_I’ declared ‘static’ but never defined [-Wunused-function] 1228 | local object F_float_radix_I (object x); | ^~~~~~~~~~~~~~~ In file included from ../src/lisparit.d:55: ../src/realtran.d:291:15: warning: ‘R_atan_R’ declared ‘static’ but never defined [-Wunused-function] 291 | local maygc object R_atan_R (object x); | ^~~~~~~~ In file included from ../src/lisparit.d:57: ../src/compelem.d:30:15: warning: ‘N_realpart_R’ declared ‘static’ but never defined [-Wunused-function] 30 | local object N_realpart_R (object x); | ^~~~~~~~~~~~ In file included from ../src/lisparit.d:57: ../src/compelem.d:39:15: warning: ‘N_imagpart_R’ declared ‘static’ but never defined [-Wunused-function] 39 | local object N_imagpart_R (object x); | ^~~~~~~~~~~~ In file included from ../src/lisparit.d:30: ../src/intelem.d: In function ‘I_to_UL’: ../src/intelem.d:172:5: warning: this statement may fall through [-Wimplicit-fallthrough=] 172 | var Bignum bn = TheBignum(obj); | ^ In file included from ../src/lisparit.d:30: ../src/intelem.d:191:4: note: here 191 | default: | ^~~~~~~ In file included from ../src/lisparit.d:30: ../src/intelem.d: In function ‘I_to_UQ’: ../src/intelem.d:312:7: warning: this statement may fall through [-Wimplicit-fallthrough=] 312 | var Bignum bn = TheBignum(obj); | ^ In file included from ../src/lisparit.d:30: ../src/intelem.d:338:5: note: here 338 | default: | ^~~~~~~ ../src/lisparit.d: In function ‘read_float’: ../src/lisparit.d:178:26: warning: this statement may fall through [-Wimplicit-fallthrough=] 178 | case '-': exp_sign = ~exp_sign; /* sign := negative */ | ~~~~~~~~~^~~~~~~~~~~ ../src/lisparit.d:179:7: note: here 179 | case '+': ptr++; exp_len--; /* skip exponent-sign */ | ^~~~ In file included from ../src/lisparit.d:57: At top level: ../src/compelem.d:889:11: warning: ‘dfloat_N_equal’ defined but not used [-Wunused-function] 889 | local bool dfloat_N_equal (dfloat x, object y) | ^~~~~~~~~~~~~~ In file included from ../src/lisparit.d:57: ../src/compelem.d:874:11: warning: ‘ffloat_N_equal’ defined but not used [-Wunused-function] 874 | local bool ffloat_N_equal (ffloat x, object y) | ^~~~~~~~~~~~~~ In file included from ../src/lisparit.d:53: ../src/realelem.d:1248:11: warning: ‘ffloat_dfloat_equal’ defined but not used [-Wunused-function] 1248 | local bool ffloat_dfloat_equal (ffloat x, dfloat y) | ^~~~~~~~~~~~~~~~~~~ In file included from ../src/lisparit.d:53: ../src/realelem.d:1196:11: warning: ‘dfloat_uint32_equal’ defined but not used [-Wunused-function] 1196 | local bool dfloat_uint32_equal (dfloat x, uint32 y) | ^~~~~~~~~~~~~~~~~~~ In file included from ../src/lisparit.d:53: ../src/realelem.d:1171:11: warning: ‘ffloat_uint32_equal’ defined but not used [-Wunused-function] 1171 | local bool ffloat_uint32_equal (ffloat x, uint32 y) | ^~~~~~~~~~~~~~~~~~~ In file included from ../src/lisparit.d:46: ../src/sfloat.d: In function ‘I_to_SF’: ../src/sfloat.d:654:11: warning: ‘I_to_NDS_room_649’ may be used uninitialized in this function [-Wmaybe-uninitialized] 654 | var uintD msd = *MSDptr++; # erstes Digit | ^~~ ../src/sfloat.d:660:82: warning: ‘*((void *)&I_to_NDS_room_649+4)’ may be used uninitialized in this function [-Wmaybe-uninitialized] 660 | DOCONSTTIMES(32/intDsize,NEXT_DIGIT); | ^ In file included from ../src/lisparit.d:47: ../src/ffloat.d: In function ‘I_to_FF’: ../src/ffloat.d:765:11: warning: ‘I_to_NDS_room_760’ may be used uninitialized in this function [-Wmaybe-uninitialized] 765 | var uintD msd = *MSDptr++; # erstes Digit | ^~~ ../src/ffloat.d:771:82: warning: ‘*((void *)&I_to_NDS_room_760+4)’ may be used uninitialized in this function [-Wmaybe-uninitialized] 771 | DOCONSTTIMES(32/intDsize,NEXT_DIGIT); | ^ In file included from ../src/lisparit.d:48: ../src/dfloat.d: In function ‘I_to_DF’: ../src/dfloat.d:1404:11: warning: ‘I_to_NDS_room_1399’ may be used uninitialized in this function [-Wmaybe-uninitialized] 1404 | var uintD msd = *MSDptr++; /* first digit */ | ^~~ ../src/dfloat.d:1411:82: warning: ‘*((void *)&I_to_NDS_room_1399+4)’ may be used uninitialized in this function [-Wmaybe-uninitialized] 1411 | DOCONSTTIMES(32/intDsize,NEXT_DIGIT); | ^ In file included from ../src/lisparit.d:49: ../src/lfloat.d: In function ‘I_to_LF.constprop’: ../src/lfloat.d:1445:22: warning: ‘I_to_NDS_room_1388’ may be used uninitialized in this function [-Wmaybe-uninitialized] 1445 | carry_rechts = shiftrightcopy_loop_up(&x_MSDptr[1],y_mantMSDptr,x_len,shiftcount,x_MSDptr[0]); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c i18n.c In file included from ../src/i18n.d:7: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c foreign.c In file included from ../src/foreign.d:7: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/foreign.d: In function ‘foreign_pointer’: ../src/foreign.d:362:13: warning: this statement may fall through [-Wimplicit-fallthrough=] 362 | obj = TheFfunction(obj)->ff_address; | ~~~~^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ../src/foreign.d:363:7: note: here 363 | case Rectype_Faddress: foreign_address: | ^~~~ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c unixaux.c In file included from ../src/unixaux.d:7: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/unixaux.d: In function ‘install_signal_handler’: ../src/unixaux.d:734:3: warning: ‘siginterrupt’ is deprecated: Use sigaction with SA_RESTART instead [-Wdeprecated-declarations] 734 | siginterrupt(sig,0); | ^~~~~~~~~~~~ In file included from /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib/signal.h:52, from ../src/unix.d:111, from ../src/lispbibl.d:1923, from ../src/unixaux.d:7: /usr/include/signal.h:311:12: note: declared here 311 | extern int siginterrupt (int __sig, int __interrupt) __THROW | ^~~~~~~~~~~~ echo '/* generated from Makefile */' > cflags.h.new echo '#define CC "gcc"' >> cflags.h.new echo '#define CFLAGS "-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES"' >> cflags.h.new echo '#define LDFLAGS "-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack"' >> cflags.h.new echo '#define CLFLAGS "-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack "' >> cflags.h.new echo '#define LIBS "-Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl "' >> cflags.h.new echo '#define CPPFLAGS "-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib"' >> cflags.h.new echo '#define CPP "gcc -E"' >> cflags.h.new echo '#define CXX "g++"' >> cflags.h.new echo '#define CXXFLAGS ""' >> cflags.h.new echo '#define X_LIBS ""' >> cflags.h.new if cmp cflags.h.new cflags.h > /dev/null 2>&1; then rm -f cflags.h.new; else mv cflags.h.new cflags.h; fi touch cflags.h.stamp gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c built.c In file included from ../src/built.d:7: ../src/lispbibl.d: In function ‘schar’: ../src/lispbibl.d:16682:233: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:463: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ ../src/lispbibl.d:16682:694: warning: typedef ‘cintX’ locally defined but not used [-Wunused-local-typedefs] 16682 | SstringDispatch(string,X, { | ^ gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -DCOMPILE_STANDALONE -O1 -c genclisph.c ../src/genclisph.d: In function ‘main’: ../src/genclisph.d:410:30: warning: comparison of unsigned expression in ‘< 0’ is always false [-Wtype-limits] 410 | EMIT_TO_I("size",size_t); | ^ gcc -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack genclisph.o -o genclisph ./genclisph clisp.h.tmp clisp-test.c writing test file clisp-test.c wrote 163 tests (154 typedefs, 9 defines) (echo '#ifndef _CLISP_H' ; echo '#define _CLISP_H' ; echo; echo '/* ==== config.h ==== */' ; cat config.h ) > clisp.h (echo; echo '/* 'intparam.h' */' ; grep '^#' intparam.h ) >> clisp.h (echo; echo '/* 'floatparam.h' */' ; grep '^#' floatparam.h ) >> clisp.h (echo; echo '/* genclisph */' ; cat clisp.h.tmp; echo ; echo '#endif /* _CLISP_H */') >> clisp.h gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -I. -DUSE_CLISP_H=1 -DCOMPILE_STANDALONE clisp-test.c libgnu.a -o clisp-test-clisp gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -I. -DUSE_CLISP_H=0 -DCOMPILE_STANDALONE clisp-test.c libgnu.a -o clisp-test-lispbibl ./clisp-test-clisp > clisp-test-clisp.out ./clisp-test-lispbibl > clisp-test-lispbibl.out cmp clisp-test-clisp.out clisp-test-lispbibl.out if grep lispbibl.d clisp.h; then false; else true; fi rm -f genclisph clisp.h.tmp clisp-test-clisp clisp-test-lispbibl clisp-test-clisp.out clisp-test-lispbibl.out gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -I. -c ../src/modules.c if test -d locale; then rm -rf locale; fi mkdir locale (cd po && make && make install datarootdir=.. localedir='$(datarootdir)/locale' INSTALL_DATA='ln') || (rm -rf locale ; exit 1) make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/po' make[1]: Nothing to be done for 'all'. make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/po' make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/po' installing ../../src/po/en.gmo as ../locale/en/LC_MESSAGES/clisp.mo installing ../../src/po/clisplow_en.gmo as ../locale/en/LC_MESSAGES/clisplow.mo installing ../../src/po/da.gmo as ../locale/da/LC_MESSAGES/clisp.mo installing ../../src/po/clisplow_da.gmo as ../locale/da/LC_MESSAGES/clisplow.mo installing ../../src/po/de.gmo as ../locale/de/LC_MESSAGES/clisp.mo installing ../../src/po/clisplow_de.gmo as ../locale/de/LC_MESSAGES/clisplow.mo installing ../../src/po/fr.gmo as ../locale/fr/LC_MESSAGES/clisp.mo installing ../../src/po/clisplow_fr.gmo as ../locale/fr/LC_MESSAGES/clisplow.mo installing ../../src/po/es.gmo as ../locale/es/LC_MESSAGES/clisp.mo installing ../../src/po/clisplow_es.gmo as ../locale/es/LC_MESSAGES/clisplow.mo installing ../../src/po/nl.gmo as ../locale/nl/LC_MESSAGES/clisp.mo installing ../../src/po/clisplow_nl.gmo as ../locale/nl/LC_MESSAGES/clisplow.mo installing ../../src/po/ru.gmo as ../locale/ru/LC_MESSAGES/clisp.mo installing ../../src/po/clisplow_ru.gmo as ../locale/ru/LC_MESSAGES/clisplow.mo installing ../../src/po/sv.gmo as ../locale/sv/LC_MESSAGES/clisp.mo installing ../../src/po/clisplow_sv.gmo as ../locale/sv/LC_MESSAGES/clisplow.mo make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/po' rm -rf data mkdir data cd data && ln -s ../../utils/unicode/UnicodeDataFull.txt . cd data && ln -s ../../doc/Symbol-Table.text . gcc -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic spvw.o spvwtabf.o spvwtabs.o spvwtabo.o eval.o control.o encoding.o pathname.o stream.o socket.o io.o funarg.o array.o hashtabl.o list.o package.o record.o weak.o sequence.o charstrg.o debug.o error.o misc.o time.o predtype.o symbol.o lisparit.o i18n.o foreign.o unixaux.o built.o modules.o -Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl -o lisp.run ./lisp.run -marc > marc.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -lp ../src/ -x '(and (load "../src/init.lisp") (sys::%saveinitmem) (ext::exit)) (ext::exit t)' Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x8111000 - 0x8131fff 0x80000000 - 0x800bffff 0x156a343000 - 0x156a35dfff 0x156a35e000 - 0x156a35efff 0x156a35f000 - 0x156a35ffff 0x156a360000 - 0x156a361fff 0x156a362000 - 0x156a363fff 0x156a364000 - 0x156a36afff 0x156a36b000 - 0x156a36bfff 0x156a36c000 - 0x156a36cfff 0x156a36e000 - 0x156a36ffff 0x156a370000 - 0x156a3aefff 0x156a3af000 - 0x156a3b0fff 0x156a3b1000 - 0x156a3b7fff 0x156a3b8000 - 0x156a3b8fff 0x156a3b9000 - 0x156a3defff 0x156a3df000 - 0x156a3e2fff 0x156a3e3000 - 0x156a3e3fff 0x156a3e4000 - 0x156a3e5fff 0x156a3e6000 - 0x156a3e6fff 0x156a3e7000 - 0x156a3e7fff 0x156a3e8000 - 0x156a3e8fff 0x156a3e9000 - 0x156a3ecfff 0x156a3ed000 - 0x156a3edfff 0x156a3ee000 - 0x156a3eefff 0x156a3ef000 - 0x156a3f0fff 0x156a3f1000 - 0x156a3f1fff 0x156a3f2000 - 0x156a3f2fff 0x156a3f3000 - 0x156a55efff 0x156a55f000 - 0x156a561fff 0x156a562000 - 0x156a562fff 0x156a563000 - 0x156a565fff 0x156a566000 - 0x156a578fff 0x156a579000 - 0x156a579fff 0x156a57a000 - 0x156a57afff 0x156a57b000 - 0x156a698fff 0x156a699000 - 0x156a69bfff 0x156a69c000 - 0x156a69efff 0x156a69f000 - 0x156a6a3fff 0x156a6a4000 - 0x156a6f8fff 0x156a6f9000 - 0x156ada3fff 0x3fff93f000 - 0x3fff95ffff i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I \ `+' / I 8 8 8 8 8 8 \ `-+-' / 8 8 8 ooooo 8oooo `-__|__-' 8 8 8 8 8 | 8 o 8 8 o 8 8 ------+------ ooooo 8oooooo ooo8ooo ooooo 8 Welcome to GNU CLISP 2.49.93+ (2018-02-18) Copyright (c) Bruno Haible, Michael Stoll 1992-1993 Copyright (c) Bruno Haible, Marcus Daniels 1994-1997 Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998 Copyright (c) Bruno Haible, Sam Steingold 1999-2000 Copyright (c) Sam Steingold, Bruno Haible 2001-2018 Type :h and hit Enter for context help. ;; Loading file ../src/defseq.lisp ... ;; Loaded file ../src/defseq.lisp ;; Loading file ../src/backquote.lisp ... ;; Loaded file ../src/backquote.lisp ;; Loading file ../src/defmacro.lisp ... ;; Loaded file ../src/defmacro.lisp ;; Loading file ../src/macros1.lisp ... ;; Loaded file ../src/macros1.lisp ;; Loading file ../src/macros2.lisp ... ;; Loaded file ../src/macros2.lisp ;; Loading file ../src/defs1.lisp ... ;; Loaded file ../src/defs1.lisp ;; Loading file ../src/lambdalist.lisp ... ;; Loaded file ../src/lambdalist.lisp ;; Loading file ../src/places.lisp ... ;; Loaded file ../src/places.lisp ;; Loading file ../src/floatprint.lisp ... ;; Loaded file ../src/floatprint.lisp ;; Loading file ../src/defpackage.lisp ... ;; Loaded file ../src/defpackage.lisp ;; Loading file ../src/type.lisp ... ;; Loading file ../src/subtypep.lisp ... ;; Loaded file ../src/subtypep.lisp ;; Loaded file ../src/type.lisp ;; Loading file ../src/clos-package.lisp ... ;; Loaded file ../src/clos-package.lisp ;; Loading file ../src/clos-macros.lisp ... ;; Loaded file ../src/clos-macros.lisp ;; Loading file ../src/clos-class0.lisp ... ;; Loaded file ../src/clos-class0.lisp ;; Loading file ../src/clos-metaobject1.lisp ... ;; Loaded file ../src/clos-metaobject1.lisp ;; Loading file ../src/clos-slotdef1.lisp ... ;; Loaded file ../src/clos-slotdef1.lisp ;; Loading file ../src/clos-stablehash1.lisp ... ;; Loaded file ../src/clos-stablehash1.lisp ;; Loading file ../src/clos-specializer1.lisp ... ;; Loaded file ../src/clos-specializer1.lisp ;; Loading file ../src/clos-class1.lisp ... ;; Loaded file ../src/clos-class1.lisp ;; Loading file ../src/clos-class2.lisp ... ;; Loaded file ../src/clos-class2.lisp ;; Loading file ../src/clos-class3.lisp ... ;; Loaded file ../src/clos-class3.lisp ;; Loading file ../src/defstruct.lisp ... ;; Loaded file ../src/defstruct.lisp ;; Loading file ../src/format.lisp ... ;; Loaded file ../src/format.lisp ;; Loading file ../src/international.lisp ... ;; Loaded file ../src/international.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/room.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/room.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/functions.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/functions.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/trace.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/trace.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/cmacros.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/cmacros.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/compiler.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/compiler.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/defs2.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/defs2.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/loop.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/loop.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos.lisp ... ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slots1.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slots1.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method1.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method1.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb1.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb1.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun1.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun1.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun2a.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun2a.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb2.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb2.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun2b.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun2b.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method2.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method2.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun3.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun3.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-dependent.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-dependent.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun4.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun4.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method3.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method3.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb3.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb3.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slots2.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slots2.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slotdef2.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slotdef2.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-stablehash2.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-stablehash2.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-specializer2.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-specializer2.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class4.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class4.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class5.lisp ... WARNING: DEFGENERIC: redefining function SHARED-INITIALIZE in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class5.lisp, was defined in top-level WARNING: DEFGENERIC: redefining function REINITIALIZE-INSTANCE in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class5.lisp, was defined in top-level WARNING: DEFGENERIC: redefining function INITIALIZE-INSTANCE in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class5.lisp, was defined in top-level ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class5.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slotdef3.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slotdef3.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-specializer3.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-specializer3.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class6.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class6.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method4.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method4.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb4.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb4.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun5.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun5.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-print.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-print.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-custom.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-custom.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/documentation.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/documentation.lisp ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gray.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gray.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/fill-out.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/fill-out.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/disassem.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/disassem.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/condition.lisp ... WARNING: DEFUN/DEFMACRO: redefining function MUFFLE-CERRORS in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/condition.lisp, was defined in C ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/condition.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/loadform.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/loadform.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gstream.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gstream.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/xcharin.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/xcharin.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/keyboard.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/keyboard.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/screen.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/screen.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/runprog.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/runprog.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/query.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/query.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/reploop.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/reploop.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/savemem.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/savemem.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/dribble.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/dribble.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/pprint.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/pprint.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/describe.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/describe.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/edit.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/edit.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clhs.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clhs.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/inspect.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/inspect.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/macros3.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/macros3.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/complete.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/complete.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/case-sensitive.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/case-sensitive.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/foreign1.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/foreign1.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/exporting.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/exporting.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/danish.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/danish.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/german.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/german.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/french.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/french.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/spanish.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/spanish.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/dutch.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/dutch.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/russian.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/russian.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/deprecated.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/deprecated.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/config.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/config.lisp Bytes permanently allocated: 173,664 Bytes currently in use: 10,358,888 Bytes available until next GC: 5,179,444 Bye. mv lispimag.mem interpreted.mem ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M interpreted.mem -q -c ../src/compiler.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2eb47000 - 0x2eb67fff 0x80000000 - 0x800bffff 0x15615a2000 - 0x15615bcfff 0x15615bd000 - 0x15615bdfff 0x15615be000 - 0x15615befff 0x15615bf000 - 0x15615c0fff 0x15615c1000 - 0x15615c2fff 0x15615c3000 - 0x15615c9fff 0x15615ca000 - 0x15615cafff 0x15615cb000 - 0x15615cbfff 0x15615cd000 - 0x15615cefff 0x15615cf000 - 0x156160dfff 0x156160e000 - 0x156160ffff 0x1561610000 - 0x1561616fff 0x1561617000 - 0x1561617fff 0x1561618000 - 0x156163dfff 0x156163e000 - 0x1561641fff 0x1561642000 - 0x1561642fff 0x1561643000 - 0x1561644fff 0x1561645000 - 0x1561645fff 0x1561646000 - 0x1561646fff 0x1561647000 - 0x1561647fff 0x1561648000 - 0x156164bfff 0x156164c000 - 0x156164cfff 0x156164d000 - 0x156164dfff 0x156164e000 - 0x156164ffff 0x1561650000 - 0x1561650fff 0x1561651000 - 0x1561651fff 0x1561652000 - 0x15617bdfff 0x15617be000 - 0x15617c0fff 0x15617c1000 - 0x15617c1fff 0x15617c2000 - 0x15617c4fff 0x15617c5000 - 0x15617d7fff 0x15617d8000 - 0x15617d8fff 0x15617d9000 - 0x15617d9fff 0x15617da000 - 0x15618f7fff 0x15618f8000 - 0x15618fafff 0x15618fb000 - 0x15618fdfff 0x15618fe000 - 0x1561902fff 0x1561903000 - 0x1561957fff 0x1561958000 - 0x1562002fff 0x3fffe30000 - 0x3fffe50fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/compiler.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/compiler.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -lp ../src/ -x '(and (load "../src/init.lisp") (sys::%saveinitmem) (ext::exit)) (ext::exit t)' Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x226af000 - 0x226cffff 0x80000000 - 0x800bffff 0x157eca8000 - 0x157ecc2fff 0x157ecc3000 - 0x157ecc3fff 0x157ecc4000 - 0x157ecc4fff 0x157ecc5000 - 0x157ecc6fff 0x157ecc7000 - 0x157ecc8fff 0x157ecc9000 - 0x157eccffff 0x157ecd0000 - 0x157ecd0fff 0x157ecd1000 - 0x157ecd1fff 0x157ecd3000 - 0x157ecd4fff 0x157ecd5000 - 0x157ed13fff 0x157ed14000 - 0x157ed15fff 0x157ed16000 - 0x157ed1cfff 0x157ed1d000 - 0x157ed1dfff 0x157ed1e000 - 0x157ed43fff 0x157ed44000 - 0x157ed47fff 0x157ed48000 - 0x157ed48fff 0x157ed49000 - 0x157ed4afff 0x157ed4b000 - 0x157ed4bfff 0x157ed4c000 - 0x157ed4cfff 0x157ed4d000 - 0x157ed4dfff 0x157ed4e000 - 0x157ed51fff 0x157ed52000 - 0x157ed52fff 0x157ed53000 - 0x157ed53fff 0x157ed54000 - 0x157ed55fff 0x157ed56000 - 0x157ed56fff 0x157ed57000 - 0x157ed57fff 0x157ed58000 - 0x157eec3fff 0x157eec4000 - 0x157eec6fff 0x157eec7000 - 0x157eec7fff 0x157eec8000 - 0x157eecafff 0x157eecb000 - 0x157eeddfff 0x157eede000 - 0x157eedefff 0x157eedf000 - 0x157eedffff 0x157eee0000 - 0x157effdfff 0x157effe000 - 0x157f000fff 0x157f001000 - 0x157f003fff 0x157f004000 - 0x157f008fff 0x157f009000 - 0x157f05dfff 0x157f05e000 - 0x157f708fff 0x3fffc3d000 - 0x3fffc5dfff i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I \ `+' / I 8 8 8 8 8 8 \ `-+-' / 8 8 8 ooooo 8oooo `-__|__-' 8 8 8 8 8 | 8 o 8 8 o 8 8 ------+------ ooooo 8oooooo ooo8ooo ooooo 8 Welcome to GNU CLISP 2.49.93+ (2018-02-18) Copyright (c) Bruno Haible, Michael Stoll 1992-1993 Copyright (c) Bruno Haible, Marcus Daniels 1994-1997 Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998 Copyright (c) Bruno Haible, Sam Steingold 1999-2000 Copyright (c) Sam Steingold, Bruno Haible 2001-2018 Type :h and hit Enter for context help. ;; Loading file ../src/defseq.lisp ... ;; Loaded file ../src/defseq.lisp ;; Loading file ../src/backquote.lisp ... ;; Loaded file ../src/backquote.lisp ;; Loading file ../src/defmacro.lisp ... ;; Loaded file ../src/defmacro.lisp ;; Loading file ../src/macros1.lisp ... ;; Loaded file ../src/macros1.lisp ;; Loading file ../src/macros2.lisp ... ;; Loaded file ../src/macros2.lisp ;; Loading file ../src/defs1.lisp ... ;; Loaded file ../src/defs1.lisp ;; Loading file ../src/lambdalist.lisp ... ;; Loaded file ../src/lambdalist.lisp ;; Loading file ../src/places.lisp ... ;; Loaded file ../src/places.lisp ;; Loading file ../src/floatprint.lisp ... ;; Loaded file ../src/floatprint.lisp ;; Loading file ../src/defpackage.lisp ... ;; Loaded file ../src/defpackage.lisp ;; Loading file ../src/type.lisp ... ;; Loading file ../src/subtypep.lisp ... ;; Loaded file ../src/subtypep.lisp ;; Loaded file ../src/type.lisp ;; Loading file ../src/clos-package.lisp ... ;; Loaded file ../src/clos-package.lisp ;; Loading file ../src/clos-macros.lisp ... ;; Loaded file ../src/clos-macros.lisp ;; Loading file ../src/clos-class0.lisp ... ;; Loaded file ../src/clos-class0.lisp ;; Loading file ../src/clos-metaobject1.lisp ... ;; Loaded file ../src/clos-metaobject1.lisp ;; Loading file ../src/clos-slotdef1.lisp ... ;; Loaded file ../src/clos-slotdef1.lisp ;; Loading file ../src/clos-stablehash1.lisp ... ;; Loaded file ../src/clos-stablehash1.lisp ;; Loading file ../src/clos-specializer1.lisp ... ;; Loaded file ../src/clos-specializer1.lisp ;; Loading file ../src/clos-class1.lisp ... ;; Loaded file ../src/clos-class1.lisp ;; Loading file ../src/clos-class2.lisp ... ;; Loaded file ../src/clos-class2.lisp ;; Loading file ../src/clos-class3.lisp ... ;; Loaded file ../src/clos-class3.lisp ;; Loading file ../src/defstruct.lisp ... ;; Loaded file ../src/defstruct.lisp ;; Loading file ../src/format.lisp ... ;; Loaded file ../src/format.lisp ;; Loading file ../src/international.lisp ... ;; Loaded file ../src/international.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/room.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/room.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/functions.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/functions.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/trace.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/trace.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/cmacros.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/cmacros.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/compiler.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/compiler.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/defs2.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/defs2.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/loop.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/loop.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos.lisp ... ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slots1.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slots1.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method1.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method1.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb1.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb1.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun1.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun1.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun2a.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun2a.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb2.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb2.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun2b.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun2b.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method2.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method2.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun3.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun3.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-dependent.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-dependent.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun4.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun4.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method3.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method3.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb3.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb3.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slots2.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slots2.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slotdef2.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slotdef2.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-stablehash2.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-stablehash2.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-specializer2.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-specializer2.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class4.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class4.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class5.lisp ... WARNING: DEFGENERIC: redefining function SHARED-INITIALIZE in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class5.lisp, was defined in top-level WARNING: DEFGENERIC: redefining function REINITIALIZE-INSTANCE in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class5.lisp, was defined in top-level WARNING: DEFGENERIC: redefining function INITIALIZE-INSTANCE in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class5.lisp, was defined in top-level ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class5.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slotdef3.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slotdef3.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-specializer3.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-specializer3.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class6.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class6.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method4.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method4.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb4.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb4.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun5.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun5.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-print.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-print.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-custom.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-custom.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/documentation.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/documentation.lisp ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gray.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gray.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/fill-out.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/fill-out.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/disassem.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/disassem.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/condition.lisp ... WARNING: DEFUN/DEFMACRO: redefining function MUFFLE-CERRORS in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/condition.lisp, was defined in C ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/condition.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/loadform.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/loadform.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gstream.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gstream.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/xcharin.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/xcharin.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/keyboard.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/keyboard.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/screen.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/screen.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/runprog.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/runprog.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/query.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/query.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/reploop.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/reploop.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/savemem.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/savemem.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/dribble.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/dribble.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/pprint.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/pprint.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/describe.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/describe.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/edit.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/edit.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clhs.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clhs.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/inspect.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/inspect.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/macros3.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/macros3.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/complete.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/complete.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/case-sensitive.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/case-sensitive.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/foreign1.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/foreign1.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/exporting.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/exporting.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/danish.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/danish.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/german.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/german.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/french.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/french.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/spanish.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/spanish.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/dutch.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/dutch.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/russian.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/russian.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/deprecated.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/deprecated.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/config.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/config.lisp Bytes permanently allocated: 173,664 Bytes currently in use: 8,907,096 Bytes available until next GC: 4,453,548 Bye. mv lispimag.mem halfcompiled.mem ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/init.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x38493000 - 0x384b3fff 0x80000000 - 0x800bffff 0x156b30c000 - 0x156b326fff 0x156b327000 - 0x156b327fff 0x156b328000 - 0x156b328fff 0x156b329000 - 0x156b32afff 0x156b32b000 - 0x156b32cfff 0x156b32d000 - 0x156b333fff 0x156b334000 - 0x156b334fff 0x156b335000 - 0x156b335fff 0x156b337000 - 0x156b338fff 0x156b339000 - 0x156b377fff 0x156b378000 - 0x156b379fff 0x156b37a000 - 0x156b380fff 0x156b381000 - 0x156b381fff 0x156b382000 - 0x156b3a7fff 0x156b3a8000 - 0x156b3abfff 0x156b3ac000 - 0x156b3acfff 0x156b3ad000 - 0x156b3aefff 0x156b3af000 - 0x156b3affff 0x156b3b0000 - 0x156b3b0fff 0x156b3b1000 - 0x156b3b1fff 0x156b3b2000 - 0x156b3b5fff 0x156b3b6000 - 0x156b3b6fff 0x156b3b7000 - 0x156b3b7fff 0x156b3b8000 - 0x156b3b9fff 0x156b3ba000 - 0x156b3bafff 0x156b3bb000 - 0x156b3bbfff 0x156b3bc000 - 0x156b527fff 0x156b528000 - 0x156b52afff 0x156b52b000 - 0x156b52bfff 0x156b52c000 - 0x156b52efff 0x156b52f000 - 0x156b541fff 0x156b542000 - 0x156b542fff 0x156b543000 - 0x156b543fff 0x156b544000 - 0x156b661fff 0x156b662000 - 0x156b664fff 0x156b665000 - 0x156b667fff 0x156b668000 - 0x156b66cfff 0x156b66d000 - 0x156b6c1fff 0x156b6c2000 - 0x156bd6cfff 0x3fffa27000 - 0x3fffa47fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/init.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/init.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/defseq.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x29837000 - 0x29857fff 0x80000000 - 0x800bffff 0x156208f000 - 0x15620a9fff 0x15620aa000 - 0x15620aafff 0x15620ab000 - 0x15620abfff 0x15620ac000 - 0x15620adfff 0x15620ae000 - 0x15620affff 0x15620b0000 - 0x15620b6fff 0x15620b7000 - 0x15620b7fff 0x15620b8000 - 0x15620b8fff 0x15620ba000 - 0x15620bbfff 0x15620bc000 - 0x15620fafff 0x15620fb000 - 0x15620fcfff 0x15620fd000 - 0x1562103fff 0x1562104000 - 0x1562104fff 0x1562105000 - 0x156212afff 0x156212b000 - 0x156212efff 0x156212f000 - 0x156212ffff 0x1562130000 - 0x1562131fff 0x1562132000 - 0x1562132fff 0x1562133000 - 0x1562133fff 0x1562134000 - 0x1562134fff 0x1562135000 - 0x1562138fff 0x1562139000 - 0x1562139fff 0x156213a000 - 0x156213afff 0x156213b000 - 0x156213cfff 0x156213d000 - 0x156213dfff 0x156213e000 - 0x156213efff 0x156213f000 - 0x15622aafff 0x15622ab000 - 0x15622adfff 0x15622ae000 - 0x15622aefff 0x15622af000 - 0x15622b1fff 0x15622b2000 - 0x15622c4fff 0x15622c5000 - 0x15622c5fff 0x15622c6000 - 0x15622c6fff 0x15622c7000 - 0x15623e4fff 0x15623e5000 - 0x15623e7fff 0x15623e8000 - 0x15623eafff 0x15623eb000 - 0x15623effff 0x15623f0000 - 0x1562444fff 0x1562445000 - 0x1562aeffff 0x3fff82e000 - 0x3fff84efff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/defseq.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/defseq.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/backquote.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3f48a000 - 0x3f4aafff 0x80000000 - 0x800bffff 0x1558ee4000 - 0x1558efefff 0x1558eff000 - 0x1558efffff 0x1558f00000 - 0x1558f00fff 0x1558f01000 - 0x1558f02fff 0x1558f03000 - 0x1558f04fff 0x1558f05000 - 0x1558f0bfff 0x1558f0c000 - 0x1558f0cfff 0x1558f0d000 - 0x1558f0dfff 0x1558f0f000 - 0x1558f10fff 0x1558f11000 - 0x1558f4ffff 0x1558f50000 - 0x1558f51fff 0x1558f52000 - 0x1558f58fff 0x1558f59000 - 0x1558f59fff 0x1558f5a000 - 0x1558f7ffff 0x1558f80000 - 0x1558f83fff 0x1558f84000 - 0x1558f84fff 0x1558f85000 - 0x1558f86fff 0x1558f87000 - 0x1558f87fff 0x1558f88000 - 0x1558f88fff 0x1558f89000 - 0x1558f89fff 0x1558f8a000 - 0x1558f8dfff 0x1558f8e000 - 0x1558f8efff 0x1558f8f000 - 0x1558f8ffff 0x1558f90000 - 0x1558f91fff 0x1558f92000 - 0x1558f92fff 0x1558f93000 - 0x1558f93fff 0x1558f94000 - 0x15590fffff 0x1559100000 - 0x1559102fff 0x1559103000 - 0x1559103fff 0x1559104000 - 0x1559106fff 0x1559107000 - 0x1559119fff 0x155911a000 - 0x155911afff 0x155911b000 - 0x155911bfff 0x155911c000 - 0x1559239fff 0x155923a000 - 0x155923cfff 0x155923d000 - 0x155923ffff 0x1559240000 - 0x1559244fff 0x1559245000 - 0x1559299fff 0x155929a000 - 0x1559944fff 0x3fffc81000 - 0x3fffca1fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/backquote.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/backquote.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/defmacro.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1466a000 - 0x1468afff 0x80000000 - 0x800bffff 0x1558039000 - 0x1558053fff 0x1558054000 - 0x1558054fff 0x1558055000 - 0x1558055fff 0x1558056000 - 0x1558057fff 0x1558058000 - 0x1558059fff 0x155805a000 - 0x1558060fff 0x1558061000 - 0x1558061fff 0x1558062000 - 0x1558062fff 0x1558064000 - 0x1558065fff 0x1558066000 - 0x15580a4fff 0x15580a5000 - 0x15580a6fff 0x15580a7000 - 0x15580adfff 0x15580ae000 - 0x15580aefff 0x15580af000 - 0x15580d4fff 0x15580d5000 - 0x15580d8fff 0x15580d9000 - 0x15580d9fff 0x15580da000 - 0x15580dbfff 0x15580dc000 - 0x15580dcfff 0x15580dd000 - 0x15580ddfff 0x15580de000 - 0x15580defff 0x15580df000 - 0x15580e2fff 0x15580e3000 - 0x15580e3fff 0x15580e4000 - 0x15580e4fff 0x15580e5000 - 0x15580e6fff 0x15580e7000 - 0x15580e7fff 0x15580e8000 - 0x15580e8fff 0x15580e9000 - 0x1558254fff 0x1558255000 - 0x1558257fff 0x1558258000 - 0x1558258fff 0x1558259000 - 0x155825bfff 0x155825c000 - 0x155826efff 0x155826f000 - 0x155826ffff 0x1558270000 - 0x1558270fff 0x1558271000 - 0x155838efff 0x155838f000 - 0x1558391fff 0x1558392000 - 0x1558394fff 0x1558395000 - 0x1558399fff 0x155839a000 - 0x15583eefff 0x15583ef000 - 0x1558a99fff 0x3fffc2e000 - 0x3fffc4efff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/defmacro.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/defmacro.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/macros1.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1191f000 - 0x1193ffff 0x80000000 - 0x800bffff 0x1594aec000 - 0x1594b06fff 0x1594b07000 - 0x1594b07fff 0x1594b08000 - 0x1594b08fff 0x1594b09000 - 0x1594b0afff 0x1594b0b000 - 0x1594b0cfff 0x1594b0d000 - 0x1594b13fff 0x1594b14000 - 0x1594b14fff 0x1594b15000 - 0x1594b15fff 0x1594b17000 - 0x1594b18fff 0x1594b19000 - 0x1594b57fff 0x1594b58000 - 0x1594b59fff 0x1594b5a000 - 0x1594b60fff 0x1594b61000 - 0x1594b61fff 0x1594b62000 - 0x1594b87fff 0x1594b88000 - 0x1594b8bfff 0x1594b8c000 - 0x1594b8cfff 0x1594b8d000 - 0x1594b8efff 0x1594b8f000 - 0x1594b8ffff 0x1594b90000 - 0x1594b90fff 0x1594b91000 - 0x1594b91fff 0x1594b92000 - 0x1594b95fff 0x1594b96000 - 0x1594b96fff 0x1594b97000 - 0x1594b97fff 0x1594b98000 - 0x1594b99fff 0x1594b9a000 - 0x1594b9afff 0x1594b9b000 - 0x1594b9bfff 0x1594b9c000 - 0x1594d07fff 0x1594d08000 - 0x1594d0afff 0x1594d0b000 - 0x1594d0bfff 0x1594d0c000 - 0x1594d0efff 0x1594d0f000 - 0x1594d21fff 0x1594d22000 - 0x1594d22fff 0x1594d23000 - 0x1594d23fff 0x1594d24000 - 0x1594e41fff 0x1594e42000 - 0x1594e44fff 0x1594e45000 - 0x1594e47fff 0x1594e48000 - 0x1594e4cfff 0x1594e4d000 - 0x1594ea1fff 0x1594ea2000 - 0x159554cfff 0x3fffb52000 - 0x3fffb72fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/macros1.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/macros1.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/macros2.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x234ca000 - 0x234eafff 0x80000000 - 0x800bffff 0x157f42d000 - 0x157f447fff 0x157f448000 - 0x157f448fff 0x157f449000 - 0x157f449fff 0x157f44a000 - 0x157f44bfff 0x157f44c000 - 0x157f44dfff 0x157f44e000 - 0x157f454fff 0x157f455000 - 0x157f455fff 0x157f456000 - 0x157f456fff 0x157f458000 - 0x157f459fff 0x157f45a000 - 0x157f498fff 0x157f499000 - 0x157f49afff 0x157f49b000 - 0x157f4a1fff 0x157f4a2000 - 0x157f4a2fff 0x157f4a3000 - 0x157f4c8fff 0x157f4c9000 - 0x157f4ccfff 0x157f4cd000 - 0x157f4cdfff 0x157f4ce000 - 0x157f4cffff 0x157f4d0000 - 0x157f4d0fff 0x157f4d1000 - 0x157f4d1fff 0x157f4d2000 - 0x157f4d2fff 0x157f4d3000 - 0x157f4d6fff 0x157f4d7000 - 0x157f4d7fff 0x157f4d8000 - 0x157f4d8fff 0x157f4d9000 - 0x157f4dafff 0x157f4db000 - 0x157f4dbfff 0x157f4dc000 - 0x157f4dcfff 0x157f4dd000 - 0x157f648fff 0x157f649000 - 0x157f64bfff 0x157f64c000 - 0x157f64cfff 0x157f64d000 - 0x157f64ffff 0x157f650000 - 0x157f662fff 0x157f663000 - 0x157f663fff 0x157f664000 - 0x157f664fff 0x157f665000 - 0x157f782fff 0x157f783000 - 0x157f785fff 0x157f786000 - 0x157f788fff 0x157f789000 - 0x157f78dfff 0x157f78e000 - 0x157f7e2fff 0x157f7e3000 - 0x157fe8dfff 0x3fffbe4000 - 0x3fffc04fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/macros2.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/macros2.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/defs1.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1b66000 - 0x1b86fff 0x80000000 - 0x800bffff 0x1591fa7000 - 0x1591fc1fff 0x1591fc2000 - 0x1591fc2fff 0x1591fc3000 - 0x1591fc3fff 0x1591fc4000 - 0x1591fc5fff 0x1591fc6000 - 0x1591fc7fff 0x1591fc8000 - 0x1591fcefff 0x1591fcf000 - 0x1591fcffff 0x1591fd0000 - 0x1591fd0fff 0x1591fd2000 - 0x1591fd3fff 0x1591fd4000 - 0x1592012fff 0x1592013000 - 0x1592014fff 0x1592015000 - 0x159201bfff 0x159201c000 - 0x159201cfff 0x159201d000 - 0x1592042fff 0x1592043000 - 0x1592046fff 0x1592047000 - 0x1592047fff 0x1592048000 - 0x1592049fff 0x159204a000 - 0x159204afff 0x159204b000 - 0x159204bfff 0x159204c000 - 0x159204cfff 0x159204d000 - 0x1592050fff 0x1592051000 - 0x1592051fff 0x1592052000 - 0x1592052fff 0x1592053000 - 0x1592054fff 0x1592055000 - 0x1592055fff 0x1592056000 - 0x1592056fff 0x1592057000 - 0x15921c2fff 0x15921c3000 - 0x15921c5fff 0x15921c6000 - 0x15921c6fff 0x15921c7000 - 0x15921c9fff 0x15921ca000 - 0x15921dcfff 0x15921dd000 - 0x15921ddfff 0x15921de000 - 0x15921defff 0x15921df000 - 0x15922fcfff 0x15922fd000 - 0x15922fffff 0x1592300000 - 0x1592302fff 0x1592303000 - 0x1592307fff 0x1592308000 - 0x159235cfff 0x159235d000 - 0x1592a07fff 0x3fffef5000 - 0x3ffff15fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/defs1.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/defs1.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/lambdalist.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2389000 - 0x23a9fff 0x80000000 - 0x800bffff 0x15648b2000 - 0x15648ccfff 0x15648cd000 - 0x15648cdfff 0x15648ce000 - 0x15648cefff 0x15648cf000 - 0x15648d0fff 0x15648d1000 - 0x15648d2fff 0x15648d3000 - 0x15648d9fff 0x15648da000 - 0x15648dafff 0x15648db000 - 0x15648dbfff 0x15648dd000 - 0x15648defff 0x15648df000 - 0x156491dfff 0x156491e000 - 0x156491ffff 0x1564920000 - 0x1564926fff 0x1564927000 - 0x1564927fff 0x1564928000 - 0x156494dfff 0x156494e000 - 0x1564951fff 0x1564952000 - 0x1564952fff 0x1564953000 - 0x1564954fff 0x1564955000 - 0x1564955fff 0x1564956000 - 0x1564956fff 0x1564957000 - 0x1564957fff 0x1564958000 - 0x156495bfff 0x156495c000 - 0x156495cfff 0x156495d000 - 0x156495dfff 0x156495e000 - 0x156495ffff 0x1564960000 - 0x1564960fff 0x1564961000 - 0x1564961fff 0x1564962000 - 0x1564acdfff 0x1564ace000 - 0x1564ad0fff 0x1564ad1000 - 0x1564ad1fff 0x1564ad2000 - 0x1564ad4fff 0x1564ad5000 - 0x1564ae7fff 0x1564ae8000 - 0x1564ae8fff 0x1564ae9000 - 0x1564ae9fff 0x1564aea000 - 0x1564c07fff 0x1564c08000 - 0x1564c0afff 0x1564c0b000 - 0x1564c0dfff 0x1564c0e000 - 0x1564c12fff 0x1564c13000 - 0x1564c67fff 0x1564c68000 - 0x1565312fff 0x3fffa13000 - 0x3fffa33fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/lambdalist.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/lambdalist.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/places.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x8ec4000 - 0x8ee4fff 0x80000000 - 0x800bffff 0x155930a000 - 0x1559324fff 0x1559325000 - 0x1559325fff 0x1559326000 - 0x1559326fff 0x1559327000 - 0x1559328fff 0x1559329000 - 0x155932afff 0x155932b000 - 0x1559331fff 0x1559332000 - 0x1559332fff 0x1559333000 - 0x1559333fff 0x1559335000 - 0x1559336fff 0x1559337000 - 0x1559375fff 0x1559376000 - 0x1559377fff 0x1559378000 - 0x155937efff 0x155937f000 - 0x155937ffff 0x1559380000 - 0x15593a5fff 0x15593a6000 - 0x15593a9fff 0x15593aa000 - 0x15593aafff 0x15593ab000 - 0x15593acfff 0x15593ad000 - 0x15593adfff 0x15593ae000 - 0x15593aefff 0x15593af000 - 0x15593affff 0x15593b0000 - 0x15593b3fff 0x15593b4000 - 0x15593b4fff 0x15593b5000 - 0x15593b5fff 0x15593b6000 - 0x15593b7fff 0x15593b8000 - 0x15593b8fff 0x15593b9000 - 0x15593b9fff 0x15593ba000 - 0x1559525fff 0x1559526000 - 0x1559528fff 0x1559529000 - 0x1559529fff 0x155952a000 - 0x155952cfff 0x155952d000 - 0x155953ffff 0x1559540000 - 0x1559540fff 0x1559541000 - 0x1559541fff 0x1559542000 - 0x155965ffff 0x1559660000 - 0x1559662fff 0x1559663000 - 0x1559665fff 0x1559666000 - 0x155966afff 0x155966b000 - 0x15596bffff 0x15596c0000 - 0x1559d6afff 0x3fff8b4000 - 0x3fff8d4fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/places.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/places.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/floatprint.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x36e73000 - 0x36e93fff 0x80000000 - 0x800bffff 0x158960a000 - 0x1589624fff 0x1589625000 - 0x1589625fff 0x1589626000 - 0x1589626fff 0x1589627000 - 0x1589628fff 0x1589629000 - 0x158962afff 0x158962b000 - 0x1589631fff 0x1589632000 - 0x1589632fff 0x1589633000 - 0x1589633fff 0x1589635000 - 0x1589636fff 0x1589637000 - 0x1589675fff 0x1589676000 - 0x1589677fff 0x1589678000 - 0x158967efff 0x158967f000 - 0x158967ffff 0x1589680000 - 0x15896a5fff 0x15896a6000 - 0x15896a9fff 0x15896aa000 - 0x15896aafff 0x15896ab000 - 0x15896acfff 0x15896ad000 - 0x15896adfff 0x15896ae000 - 0x15896aefff 0x15896af000 - 0x15896affff 0x15896b0000 - 0x15896b3fff 0x15896b4000 - 0x15896b4fff 0x15896b5000 - 0x15896b5fff 0x15896b6000 - 0x15896b7fff 0x15896b8000 - 0x15896b8fff 0x15896b9000 - 0x15896b9fff 0x15896ba000 - 0x1589825fff 0x1589826000 - 0x1589828fff 0x1589829000 - 0x1589829fff 0x158982a000 - 0x158982cfff 0x158982d000 - 0x158983ffff 0x1589840000 - 0x1589840fff 0x1589841000 - 0x1589841fff 0x1589842000 - 0x158995ffff 0x1589960000 - 0x1589962fff 0x1589963000 - 0x1589965fff 0x1589966000 - 0x158996afff 0x158996b000 - 0x15899bffff 0x15899c0000 - 0x158a06afff 0x3fffd5f000 - 0x3fffd7ffff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/floatprint.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/floatprint.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/defpackage.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x37e33000 - 0x37e53fff 0x80000000 - 0x800bffff 0x1585747000 - 0x1585761fff 0x1585762000 - 0x1585762fff 0x1585763000 - 0x1585763fff 0x1585764000 - 0x1585765fff 0x1585766000 - 0x1585767fff 0x1585768000 - 0x158576efff 0x158576f000 - 0x158576ffff 0x1585770000 - 0x1585770fff 0x1585772000 - 0x1585773fff 0x1585774000 - 0x15857b2fff 0x15857b3000 - 0x15857b4fff 0x15857b5000 - 0x15857bbfff 0x15857bc000 - 0x15857bcfff 0x15857bd000 - 0x15857e2fff 0x15857e3000 - 0x15857e6fff 0x15857e7000 - 0x15857e7fff 0x15857e8000 - 0x15857e9fff 0x15857ea000 - 0x15857eafff 0x15857eb000 - 0x15857ebfff 0x15857ec000 - 0x15857ecfff 0x15857ed000 - 0x15857f0fff 0x15857f1000 - 0x15857f1fff 0x15857f2000 - 0x15857f2fff 0x15857f3000 - 0x15857f4fff 0x15857f5000 - 0x15857f5fff 0x15857f6000 - 0x15857f6fff 0x15857f7000 - 0x1585962fff 0x1585963000 - 0x1585965fff 0x1585966000 - 0x1585966fff 0x1585967000 - 0x1585969fff 0x158596a000 - 0x158597cfff 0x158597d000 - 0x158597dfff 0x158597e000 - 0x158597efff 0x158597f000 - 0x1585a9cfff 0x1585a9d000 - 0x1585a9ffff 0x1585aa0000 - 0x1585aa2fff 0x1585aa3000 - 0x1585aa7fff 0x1585aa8000 - 0x1585afcfff 0x1585afd000 - 0x15861a7fff 0x3fffdd4000 - 0x3fffdf4fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/defpackage.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/defpackage.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/type.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x9240000 - 0x9260fff 0x80000000 - 0x800bffff 0x155beee000 - 0x155bf08fff 0x155bf09000 - 0x155bf09fff 0x155bf0a000 - 0x155bf0afff 0x155bf0b000 - 0x155bf0cfff 0x155bf0d000 - 0x155bf0efff 0x155bf0f000 - 0x155bf15fff 0x155bf16000 - 0x155bf16fff 0x155bf17000 - 0x155bf17fff 0x155bf19000 - 0x155bf1afff 0x155bf1b000 - 0x155bf59fff 0x155bf5a000 - 0x155bf5bfff 0x155bf5c000 - 0x155bf62fff 0x155bf63000 - 0x155bf63fff 0x155bf64000 - 0x155bf89fff 0x155bf8a000 - 0x155bf8dfff 0x155bf8e000 - 0x155bf8efff 0x155bf8f000 - 0x155bf90fff 0x155bf91000 - 0x155bf91fff 0x155bf92000 - 0x155bf92fff 0x155bf93000 - 0x155bf93fff 0x155bf94000 - 0x155bf97fff 0x155bf98000 - 0x155bf98fff 0x155bf99000 - 0x155bf99fff 0x155bf9a000 - 0x155bf9bfff 0x155bf9c000 - 0x155bf9cfff 0x155bf9d000 - 0x155bf9dfff 0x155bf9e000 - 0x155c109fff 0x155c10a000 - 0x155c10cfff 0x155c10d000 - 0x155c10dfff 0x155c10e000 - 0x155c110fff 0x155c111000 - 0x155c123fff 0x155c124000 - 0x155c124fff 0x155c125000 - 0x155c125fff 0x155c126000 - 0x155c243fff 0x155c244000 - 0x155c246fff 0x155c247000 - 0x155c249fff 0x155c24a000 - 0x155c24efff 0x155c24f000 - 0x155c2a3fff 0x155c2a4000 - 0x155c94efff 0x3fffb2d000 - 0x3fffb4dfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/type.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/type.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/subtypep.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3faf4000 - 0x3fb14fff 0x80000000 - 0x800bffff 0x157c5c8000 - 0x157c5e2fff 0x157c5e3000 - 0x157c5e3fff 0x157c5e4000 - 0x157c5e4fff 0x157c5e5000 - 0x157c5e6fff 0x157c5e7000 - 0x157c5e8fff 0x157c5e9000 - 0x157c5effff 0x157c5f0000 - 0x157c5f0fff 0x157c5f1000 - 0x157c5f1fff 0x157c5f3000 - 0x157c5f4fff 0x157c5f5000 - 0x157c633fff 0x157c634000 - 0x157c635fff 0x157c636000 - 0x157c63cfff 0x157c63d000 - 0x157c63dfff 0x157c63e000 - 0x157c663fff 0x157c664000 - 0x157c667fff 0x157c668000 - 0x157c668fff 0x157c669000 - 0x157c66afff 0x157c66b000 - 0x157c66bfff 0x157c66c000 - 0x157c66cfff 0x157c66d000 - 0x157c66dfff 0x157c66e000 - 0x157c671fff 0x157c672000 - 0x157c672fff 0x157c673000 - 0x157c673fff 0x157c674000 - 0x157c675fff 0x157c676000 - 0x157c676fff 0x157c677000 - 0x157c677fff 0x157c678000 - 0x157c7e3fff 0x157c7e4000 - 0x157c7e6fff 0x157c7e7000 - 0x157c7e7fff 0x157c7e8000 - 0x157c7eafff 0x157c7eb000 - 0x157c7fdfff 0x157c7fe000 - 0x157c7fefff 0x157c7ff000 - 0x157c7fffff 0x157c800000 - 0x157c91dfff 0x157c91e000 - 0x157c920fff 0x157c921000 - 0x157c923fff 0x157c924000 - 0x157c928fff 0x157c929000 - 0x157c97dfff 0x157c97e000 - 0x157d028fff 0x3fff9f2000 - 0x3fffa12fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/subtypep.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/subtypep.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-package.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1c81f000 - 0x1c83ffff 0x80000000 - 0x800bffff 0x1571fa4000 - 0x1571fbefff 0x1571fbf000 - 0x1571fbffff 0x1571fc0000 - 0x1571fc0fff 0x1571fc1000 - 0x1571fc2fff 0x1571fc3000 - 0x1571fc4fff 0x1571fc5000 - 0x1571fcbfff 0x1571fcc000 - 0x1571fccfff 0x1571fcd000 - 0x1571fcdfff 0x1571fcf000 - 0x1571fd0fff 0x1571fd1000 - 0x157200ffff 0x1572010000 - 0x1572011fff 0x1572012000 - 0x1572018fff 0x1572019000 - 0x1572019fff 0x157201a000 - 0x157203ffff 0x1572040000 - 0x1572043fff 0x1572044000 - 0x1572044fff 0x1572045000 - 0x1572046fff 0x1572047000 - 0x1572047fff 0x1572048000 - 0x1572048fff 0x1572049000 - 0x1572049fff 0x157204a000 - 0x157204dfff 0x157204e000 - 0x157204efff 0x157204f000 - 0x157204ffff 0x1572050000 - 0x1572051fff 0x1572052000 - 0x1572052fff 0x1572053000 - 0x1572053fff 0x1572054000 - 0x15721bffff 0x15721c0000 - 0x15721c2fff 0x15721c3000 - 0x15721c3fff 0x15721c4000 - 0x15721c6fff 0x15721c7000 - 0x15721d9fff 0x15721da000 - 0x15721dafff 0x15721db000 - 0x15721dbfff 0x15721dc000 - 0x15722f9fff 0x15722fa000 - 0x15722fcfff 0x15722fd000 - 0x15722fffff 0x1572300000 - 0x1572304fff 0x1572305000 - 0x1572359fff 0x157235a000 - 0x1572a04fff 0x3ffffad000 - 0x3ffffcdfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-package.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-package.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-macros.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xeef5000 - 0xef15fff 0x80000000 - 0x800bffff 0x156eda9000 - 0x156edc3fff 0x156edc4000 - 0x156edc4fff 0x156edc5000 - 0x156edc5fff 0x156edc6000 - 0x156edc7fff 0x156edc8000 - 0x156edc9fff 0x156edca000 - 0x156edd0fff 0x156edd1000 - 0x156edd1fff 0x156edd2000 - 0x156edd2fff 0x156edd4000 - 0x156edd5fff 0x156edd6000 - 0x156ee14fff 0x156ee15000 - 0x156ee16fff 0x156ee17000 - 0x156ee1dfff 0x156ee1e000 - 0x156ee1efff 0x156ee1f000 - 0x156ee44fff 0x156ee45000 - 0x156ee48fff 0x156ee49000 - 0x156ee49fff 0x156ee4a000 - 0x156ee4bfff 0x156ee4c000 - 0x156ee4cfff 0x156ee4d000 - 0x156ee4dfff 0x156ee4e000 - 0x156ee4efff 0x156ee4f000 - 0x156ee52fff 0x156ee53000 - 0x156ee53fff 0x156ee54000 - 0x156ee54fff 0x156ee55000 - 0x156ee56fff 0x156ee57000 - 0x156ee57fff 0x156ee58000 - 0x156ee58fff 0x156ee59000 - 0x156efc4fff 0x156efc5000 - 0x156efc7fff 0x156efc8000 - 0x156efc8fff 0x156efc9000 - 0x156efcbfff 0x156efcc000 - 0x156efdefff 0x156efdf000 - 0x156efdffff 0x156efe0000 - 0x156efe0fff 0x156efe1000 - 0x156f0fefff 0x156f0ff000 - 0x156f101fff 0x156f102000 - 0x156f104fff 0x156f105000 - 0x156f109fff 0x156f10a000 - 0x156f15efff 0x156f15f000 - 0x156f809fff 0x3fffc54000 - 0x3fffc74fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-macros.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-macros.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-class0.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x18852000 - 0x18872fff 0x80000000 - 0x800bffff 0x1574ada000 - 0x1574af4fff 0x1574af5000 - 0x1574af5fff 0x1574af6000 - 0x1574af6fff 0x1574af7000 - 0x1574af8fff 0x1574af9000 - 0x1574afafff 0x1574afb000 - 0x1574b01fff 0x1574b02000 - 0x1574b02fff 0x1574b03000 - 0x1574b03fff 0x1574b05000 - 0x1574b06fff 0x1574b07000 - 0x1574b45fff 0x1574b46000 - 0x1574b47fff 0x1574b48000 - 0x1574b4efff 0x1574b4f000 - 0x1574b4ffff 0x1574b50000 - 0x1574b75fff 0x1574b76000 - 0x1574b79fff 0x1574b7a000 - 0x1574b7afff 0x1574b7b000 - 0x1574b7cfff 0x1574b7d000 - 0x1574b7dfff 0x1574b7e000 - 0x1574b7efff 0x1574b7f000 - 0x1574b7ffff 0x1574b80000 - 0x1574b83fff 0x1574b84000 - 0x1574b84fff 0x1574b85000 - 0x1574b85fff 0x1574b86000 - 0x1574b87fff 0x1574b88000 - 0x1574b88fff 0x1574b89000 - 0x1574b89fff 0x1574b8a000 - 0x1574cf5fff 0x1574cf6000 - 0x1574cf8fff 0x1574cf9000 - 0x1574cf9fff 0x1574cfa000 - 0x1574cfcfff 0x1574cfd000 - 0x1574d0ffff 0x1574d10000 - 0x1574d10fff 0x1574d11000 - 0x1574d11fff 0x1574d12000 - 0x1574e2ffff 0x1574e30000 - 0x1574e32fff 0x1574e33000 - 0x1574e35fff 0x1574e36000 - 0x1574e3afff 0x1574e3b000 - 0x1574e8ffff 0x1574e90000 - 0x157553afff 0x3fffac3000 - 0x3fffae3fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class0.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-class0.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-metaobject1.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x8415000 - 0x8435fff 0x80000000 - 0x800bffff 0x158408f000 - 0x15840a9fff 0x15840aa000 - 0x15840aafff 0x15840ab000 - 0x15840abfff 0x15840ac000 - 0x15840adfff 0x15840ae000 - 0x15840affff 0x15840b0000 - 0x15840b6fff 0x15840b7000 - 0x15840b7fff 0x15840b8000 - 0x15840b8fff 0x15840ba000 - 0x15840bbfff 0x15840bc000 - 0x15840fafff 0x15840fb000 - 0x15840fcfff 0x15840fd000 - 0x1584103fff 0x1584104000 - 0x1584104fff 0x1584105000 - 0x158412afff 0x158412b000 - 0x158412efff 0x158412f000 - 0x158412ffff 0x1584130000 - 0x1584131fff 0x1584132000 - 0x1584132fff 0x1584133000 - 0x1584133fff 0x1584134000 - 0x1584134fff 0x1584135000 - 0x1584138fff 0x1584139000 - 0x1584139fff 0x158413a000 - 0x158413afff 0x158413b000 - 0x158413cfff 0x158413d000 - 0x158413dfff 0x158413e000 - 0x158413efff 0x158413f000 - 0x15842aafff 0x15842ab000 - 0x15842adfff 0x15842ae000 - 0x15842aefff 0x15842af000 - 0x15842b1fff 0x15842b2000 - 0x15842c4fff 0x15842c5000 - 0x15842c5fff 0x15842c6000 - 0x15842c6fff 0x15842c7000 - 0x15843e4fff 0x15843e5000 - 0x15843e7fff 0x15843e8000 - 0x15843eafff 0x15843eb000 - 0x15843effff 0x15843f0000 - 0x1584444fff 0x1584445000 - 0x1584aeffff 0x3fffe09000 - 0x3fffe29fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-metaobject1.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-metaobject1.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-slotdef1.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x76a8000 - 0x76c8fff 0x80000000 - 0x800bffff 0x157a44a000 - 0x157a464fff 0x157a465000 - 0x157a465fff 0x157a466000 - 0x157a466fff 0x157a467000 - 0x157a468fff 0x157a469000 - 0x157a46afff 0x157a46b000 - 0x157a471fff 0x157a472000 - 0x157a472fff 0x157a473000 - 0x157a473fff 0x157a475000 - 0x157a476fff 0x157a477000 - 0x157a4b5fff 0x157a4b6000 - 0x157a4b7fff 0x157a4b8000 - 0x157a4befff 0x157a4bf000 - 0x157a4bffff 0x157a4c0000 - 0x157a4e5fff 0x157a4e6000 - 0x157a4e9fff 0x157a4ea000 - 0x157a4eafff 0x157a4eb000 - 0x157a4ecfff 0x157a4ed000 - 0x157a4edfff 0x157a4ee000 - 0x157a4eefff 0x157a4ef000 - 0x157a4effff 0x157a4f0000 - 0x157a4f3fff 0x157a4f4000 - 0x157a4f4fff 0x157a4f5000 - 0x157a4f5fff 0x157a4f6000 - 0x157a4f7fff 0x157a4f8000 - 0x157a4f8fff 0x157a4f9000 - 0x157a4f9fff 0x157a4fa000 - 0x157a665fff 0x157a666000 - 0x157a668fff 0x157a669000 - 0x157a669fff 0x157a66a000 - 0x157a66cfff 0x157a66d000 - 0x157a67ffff 0x157a680000 - 0x157a680fff 0x157a681000 - 0x157a681fff 0x157a682000 - 0x157a79ffff 0x157a7a0000 - 0x157a7a2fff 0x157a7a3000 - 0x157a7a5fff 0x157a7a6000 - 0x157a7aafff 0x157a7ab000 - 0x157a7fffff 0x157a800000 - 0x157aeaafff 0x3fffe08000 - 0x3fffe28fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slotdef1.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-slotdef1.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-stablehash1.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1e6c4000 - 0x1e6e4fff 0x80000000 - 0x800bffff 0x156816b000 - 0x1568185fff 0x1568186000 - 0x1568186fff 0x1568187000 - 0x1568187fff 0x1568188000 - 0x1568189fff 0x156818a000 - 0x156818bfff 0x156818c000 - 0x1568192fff 0x1568193000 - 0x1568193fff 0x1568194000 - 0x1568194fff 0x1568196000 - 0x1568197fff 0x1568198000 - 0x15681d6fff 0x15681d7000 - 0x15681d8fff 0x15681d9000 - 0x15681dffff 0x15681e0000 - 0x15681e0fff 0x15681e1000 - 0x1568206fff 0x1568207000 - 0x156820afff 0x156820b000 - 0x156820bfff 0x156820c000 - 0x156820dfff 0x156820e000 - 0x156820efff 0x156820f000 - 0x156820ffff 0x1568210000 - 0x1568210fff 0x1568211000 - 0x1568214fff 0x1568215000 - 0x1568215fff 0x1568216000 - 0x1568216fff 0x1568217000 - 0x1568218fff 0x1568219000 - 0x1568219fff 0x156821a000 - 0x156821afff 0x156821b000 - 0x1568386fff 0x1568387000 - 0x1568389fff 0x156838a000 - 0x156838afff 0x156838b000 - 0x156838dfff 0x156838e000 - 0x15683a0fff 0x15683a1000 - 0x15683a1fff 0x15683a2000 - 0x15683a2fff 0x15683a3000 - 0x15684c0fff 0x15684c1000 - 0x15684c3fff 0x15684c4000 - 0x15684c6fff 0x15684c7000 - 0x15684cbfff 0x15684cc000 - 0x1568520fff 0x1568521000 - 0x1568bcbfff 0x3fffcb6000 - 0x3fffcd6fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-stablehash1.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-stablehash1.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-specializer1.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x20811000 - 0x20831fff 0x80000000 - 0x800bffff 0x158cbf6000 - 0x158cc10fff 0x158cc11000 - 0x158cc11fff 0x158cc12000 - 0x158cc12fff 0x158cc13000 - 0x158cc14fff 0x158cc15000 - 0x158cc16fff 0x158cc17000 - 0x158cc1dfff 0x158cc1e000 - 0x158cc1efff 0x158cc1f000 - 0x158cc1ffff 0x158cc21000 - 0x158cc22fff 0x158cc23000 - 0x158cc61fff 0x158cc62000 - 0x158cc63fff 0x158cc64000 - 0x158cc6afff 0x158cc6b000 - 0x158cc6bfff 0x158cc6c000 - 0x158cc91fff 0x158cc92000 - 0x158cc95fff 0x158cc96000 - 0x158cc96fff 0x158cc97000 - 0x158cc98fff 0x158cc99000 - 0x158cc99fff 0x158cc9a000 - 0x158cc9afff 0x158cc9b000 - 0x158cc9bfff 0x158cc9c000 - 0x158cc9ffff 0x158cca0000 - 0x158cca0fff 0x158cca1000 - 0x158cca1fff 0x158cca2000 - 0x158cca3fff 0x158cca4000 - 0x158cca4fff 0x158cca5000 - 0x158cca5fff 0x158cca6000 - 0x158ce11fff 0x158ce12000 - 0x158ce14fff 0x158ce15000 - 0x158ce15fff 0x158ce16000 - 0x158ce18fff 0x158ce19000 - 0x158ce2bfff 0x158ce2c000 - 0x158ce2cfff 0x158ce2d000 - 0x158ce2dfff 0x158ce2e000 - 0x158cf4bfff 0x158cf4c000 - 0x158cf4efff 0x158cf4f000 - 0x158cf51fff 0x158cf52000 - 0x158cf56fff 0x158cf57000 - 0x158cfabfff 0x158cfac000 - 0x158d656fff 0x3fffa1d000 - 0x3fffa3dfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-specializer1.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-specializer1.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-class1.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1d586000 - 0x1d5a6fff 0x80000000 - 0x800bffff 0x156d37d000 - 0x156d397fff 0x156d398000 - 0x156d398fff 0x156d399000 - 0x156d399fff 0x156d39a000 - 0x156d39bfff 0x156d39c000 - 0x156d39dfff 0x156d39e000 - 0x156d3a4fff 0x156d3a5000 - 0x156d3a5fff 0x156d3a6000 - 0x156d3a6fff 0x156d3a8000 - 0x156d3a9fff 0x156d3aa000 - 0x156d3e8fff 0x156d3e9000 - 0x156d3eafff 0x156d3eb000 - 0x156d3f1fff 0x156d3f2000 - 0x156d3f2fff 0x156d3f3000 - 0x156d418fff 0x156d419000 - 0x156d41cfff 0x156d41d000 - 0x156d41dfff 0x156d41e000 - 0x156d41ffff 0x156d420000 - 0x156d420fff 0x156d421000 - 0x156d421fff 0x156d422000 - 0x156d422fff 0x156d423000 - 0x156d426fff 0x156d427000 - 0x156d427fff 0x156d428000 - 0x156d428fff 0x156d429000 - 0x156d42afff 0x156d42b000 - 0x156d42bfff 0x156d42c000 - 0x156d42cfff 0x156d42d000 - 0x156d598fff 0x156d599000 - 0x156d59bfff 0x156d59c000 - 0x156d59cfff 0x156d59d000 - 0x156d59ffff 0x156d5a0000 - 0x156d5b2fff 0x156d5b3000 - 0x156d5b3fff 0x156d5b4000 - 0x156d5b4fff 0x156d5b5000 - 0x156d6d2fff 0x156d6d3000 - 0x156d6d5fff 0x156d6d6000 - 0x156d6d8fff 0x156d6d9000 - 0x156d6ddfff 0x156d6de000 - 0x156d732fff 0x156d733000 - 0x156ddddfff 0x3fffdc2000 - 0x3fffde2fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class1.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-class1.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-class2.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xf25d000 - 0xf27dfff 0x80000000 - 0x800bffff 0x1583a01000 - 0x1583a1bfff 0x1583a1c000 - 0x1583a1cfff 0x1583a1d000 - 0x1583a1dfff 0x1583a1e000 - 0x1583a1ffff 0x1583a20000 - 0x1583a21fff 0x1583a22000 - 0x1583a28fff 0x1583a29000 - 0x1583a29fff 0x1583a2a000 - 0x1583a2afff 0x1583a2c000 - 0x1583a2dfff 0x1583a2e000 - 0x1583a6cfff 0x1583a6d000 - 0x1583a6efff 0x1583a6f000 - 0x1583a75fff 0x1583a76000 - 0x1583a76fff 0x1583a77000 - 0x1583a9cfff 0x1583a9d000 - 0x1583aa0fff 0x1583aa1000 - 0x1583aa1fff 0x1583aa2000 - 0x1583aa3fff 0x1583aa4000 - 0x1583aa4fff 0x1583aa5000 - 0x1583aa5fff 0x1583aa6000 - 0x1583aa6fff 0x1583aa7000 - 0x1583aaafff 0x1583aab000 - 0x1583aabfff 0x1583aac000 - 0x1583aacfff 0x1583aad000 - 0x1583aaefff 0x1583aaf000 - 0x1583aaffff 0x1583ab0000 - 0x1583ab0fff 0x1583ab1000 - 0x1583c1cfff 0x1583c1d000 - 0x1583c1ffff 0x1583c20000 - 0x1583c20fff 0x1583c21000 - 0x1583c23fff 0x1583c24000 - 0x1583c36fff 0x1583c37000 - 0x1583c37fff 0x1583c38000 - 0x1583c38fff 0x1583c39000 - 0x1583d56fff 0x1583d57000 - 0x1583d59fff 0x1583d5a000 - 0x1583d5cfff 0x1583d5d000 - 0x1583d61fff 0x1583d62000 - 0x1583db6fff 0x1583db7000 - 0x1584461fff 0x3fff8f1000 - 0x3fff911fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class2.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-class2.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-class3.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x23186000 - 0x231a6fff 0x80000000 - 0x800bffff 0x1593f58000 - 0x1593f72fff 0x1593f73000 - 0x1593f73fff 0x1593f74000 - 0x1593f74fff 0x1593f75000 - 0x1593f76fff 0x1593f77000 - 0x1593f78fff 0x1593f79000 - 0x1593f7ffff 0x1593f80000 - 0x1593f80fff 0x1593f81000 - 0x1593f81fff 0x1593f83000 - 0x1593f84fff 0x1593f85000 - 0x1593fc3fff 0x1593fc4000 - 0x1593fc5fff 0x1593fc6000 - 0x1593fccfff 0x1593fcd000 - 0x1593fcdfff 0x1593fce000 - 0x1593ff3fff 0x1593ff4000 - 0x1593ff7fff 0x1593ff8000 - 0x1593ff8fff 0x1593ff9000 - 0x1593ffafff 0x1593ffb000 - 0x1593ffbfff 0x1593ffc000 - 0x1593ffcfff 0x1593ffd000 - 0x1593ffdfff 0x1593ffe000 - 0x1594001fff 0x1594002000 - 0x1594002fff 0x1594003000 - 0x1594003fff 0x1594004000 - 0x1594005fff 0x1594006000 - 0x1594006fff 0x1594007000 - 0x1594007fff 0x1594008000 - 0x1594173fff 0x1594174000 - 0x1594176fff 0x1594177000 - 0x1594177fff 0x1594178000 - 0x159417afff 0x159417b000 - 0x159418dfff 0x159418e000 - 0x159418efff 0x159418f000 - 0x159418ffff 0x1594190000 - 0x15942adfff 0x15942ae000 - 0x15942b0fff 0x15942b1000 - 0x15942b3fff 0x15942b4000 - 0x15942b8fff 0x15942b9000 - 0x159430dfff 0x159430e000 - 0x15949b8fff 0x3ffffde000 - 0x3fffffefff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class3.lisp ... WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-class3.fas 0 errors, 19 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/defstruct.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2047f000 - 0x2049ffff 0x80000000 - 0x800bffff 0x15689a6000 - 0x15689c0fff 0x15689c1000 - 0x15689c1fff 0x15689c2000 - 0x15689c2fff 0x15689c3000 - 0x15689c4fff 0x15689c5000 - 0x15689c6fff 0x15689c7000 - 0x15689cdfff 0x15689ce000 - 0x15689cefff 0x15689cf000 - 0x15689cffff 0x15689d1000 - 0x15689d2fff 0x15689d3000 - 0x1568a11fff 0x1568a12000 - 0x1568a13fff 0x1568a14000 - 0x1568a1afff 0x1568a1b000 - 0x1568a1bfff 0x1568a1c000 - 0x1568a41fff 0x1568a42000 - 0x1568a45fff 0x1568a46000 - 0x1568a46fff 0x1568a47000 - 0x1568a48fff 0x1568a49000 - 0x1568a49fff 0x1568a4a000 - 0x1568a4afff 0x1568a4b000 - 0x1568a4bfff 0x1568a4c000 - 0x1568a4ffff 0x1568a50000 - 0x1568a50fff 0x1568a51000 - 0x1568a51fff 0x1568a52000 - 0x1568a53fff 0x1568a54000 - 0x1568a54fff 0x1568a55000 - 0x1568a55fff 0x1568a56000 - 0x1568bc1fff 0x1568bc2000 - 0x1568bc4fff 0x1568bc5000 - 0x1568bc5fff 0x1568bc6000 - 0x1568bc8fff 0x1568bc9000 - 0x1568bdbfff 0x1568bdc000 - 0x1568bdcfff 0x1568bdd000 - 0x1568bddfff 0x1568bde000 - 0x1568cfbfff 0x1568cfc000 - 0x1568cfefff 0x1568cff000 - 0x1568d01fff 0x1568d02000 - 0x1568d06fff 0x1568d07000 - 0x1568d5bfff 0x1568d5c000 - 0x1569406fff 0x3fff853000 - 0x3fff873fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/defstruct.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/defstruct.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/format.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x16311000 - 0x16331fff 0x80000000 - 0x800bffff 0x155c37f000 - 0x155c399fff 0x155c39a000 - 0x155c39afff 0x155c39b000 - 0x155c39bfff 0x155c39c000 - 0x155c39dfff 0x155c39e000 - 0x155c39ffff 0x155c3a0000 - 0x155c3a6fff 0x155c3a7000 - 0x155c3a7fff 0x155c3a8000 - 0x155c3a8fff 0x155c3aa000 - 0x155c3abfff 0x155c3ac000 - 0x155c3eafff 0x155c3eb000 - 0x155c3ecfff 0x155c3ed000 - 0x155c3f3fff 0x155c3f4000 - 0x155c3f4fff 0x155c3f5000 - 0x155c41afff 0x155c41b000 - 0x155c41efff 0x155c41f000 - 0x155c41ffff 0x155c420000 - 0x155c421fff 0x155c422000 - 0x155c422fff 0x155c423000 - 0x155c423fff 0x155c424000 - 0x155c424fff 0x155c425000 - 0x155c428fff 0x155c429000 - 0x155c429fff 0x155c42a000 - 0x155c42afff 0x155c42b000 - 0x155c42cfff 0x155c42d000 - 0x155c42dfff 0x155c42e000 - 0x155c42efff 0x155c42f000 - 0x155c59afff 0x155c59b000 - 0x155c59dfff 0x155c59e000 - 0x155c59efff 0x155c59f000 - 0x155c5a1fff 0x155c5a2000 - 0x155c5b4fff 0x155c5b5000 - 0x155c5b5fff 0x155c5b6000 - 0x155c5b6fff 0x155c5b7000 - 0x155c6d4fff 0x155c6d5000 - 0x155c6d7fff 0x155c6d8000 - 0x155c6dafff 0x155c6db000 - 0x155c6dffff 0x155c6e0000 - 0x155c734fff 0x155c735000 - 0x155cddffff 0x3ffff34000 - 0x3ffff54fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/format.lisp ... WARNING: in FORMATTER-MAIN-1 in lines 2028..2526 : variable ADD-FILL is not used. Misspelled or missing IGNORE declaration? ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/format.fas 0 errors, 1 warning ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/international.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3b8ca000 - 0x3b8eafff 0x80000000 - 0x800bffff 0x157ec20000 - 0x157ec3afff 0x157ec3b000 - 0x157ec3bfff 0x157ec3c000 - 0x157ec3cfff 0x157ec3d000 - 0x157ec3efff 0x157ec3f000 - 0x157ec40fff 0x157ec41000 - 0x157ec47fff 0x157ec48000 - 0x157ec48fff 0x157ec49000 - 0x157ec49fff 0x157ec4b000 - 0x157ec4cfff 0x157ec4d000 - 0x157ec8bfff 0x157ec8c000 - 0x157ec8dfff 0x157ec8e000 - 0x157ec94fff 0x157ec95000 - 0x157ec95fff 0x157ec96000 - 0x157ecbbfff 0x157ecbc000 - 0x157ecbffff 0x157ecc0000 - 0x157ecc0fff 0x157ecc1000 - 0x157ecc2fff 0x157ecc3000 - 0x157ecc3fff 0x157ecc4000 - 0x157ecc4fff 0x157ecc5000 - 0x157ecc5fff 0x157ecc6000 - 0x157ecc9fff 0x157ecca000 - 0x157eccafff 0x157eccb000 - 0x157eccbfff 0x157eccc000 - 0x157eccdfff 0x157ecce000 - 0x157eccefff 0x157eccf000 - 0x157eccffff 0x157ecd0000 - 0x157ee3bfff 0x157ee3c000 - 0x157ee3efff 0x157ee3f000 - 0x157ee3ffff 0x157ee40000 - 0x157ee42fff 0x157ee43000 - 0x157ee55fff 0x157ee56000 - 0x157ee56fff 0x157ee57000 - 0x157ee57fff 0x157ee58000 - 0x157ef75fff 0x157ef76000 - 0x157ef78fff 0x157ef79000 - 0x157ef7bfff 0x157ef7c000 - 0x157ef80fff 0x157ef81000 - 0x157efd5fff 0x157efd6000 - 0x157f680fff 0x3fff8a4000 - 0x3fff8c4fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/international.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/international.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/savemem.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1aefb000 - 0x1af1bfff 0x80000000 - 0x800bffff 0x1573e35000 - 0x1573e4ffff 0x1573e50000 - 0x1573e50fff 0x1573e51000 - 0x1573e51fff 0x1573e52000 - 0x1573e53fff 0x1573e54000 - 0x1573e55fff 0x1573e56000 - 0x1573e5cfff 0x1573e5d000 - 0x1573e5dfff 0x1573e5e000 - 0x1573e5efff 0x1573e60000 - 0x1573e61fff 0x1573e62000 - 0x1573ea0fff 0x1573ea1000 - 0x1573ea2fff 0x1573ea3000 - 0x1573ea9fff 0x1573eaa000 - 0x1573eaafff 0x1573eab000 - 0x1573ed0fff 0x1573ed1000 - 0x1573ed4fff 0x1573ed5000 - 0x1573ed5fff 0x1573ed6000 - 0x1573ed7fff 0x1573ed8000 - 0x1573ed8fff 0x1573ed9000 - 0x1573ed9fff 0x1573eda000 - 0x1573edafff 0x1573edb000 - 0x1573edefff 0x1573edf000 - 0x1573edffff 0x1573ee0000 - 0x1573ee0fff 0x1573ee1000 - 0x1573ee2fff 0x1573ee3000 - 0x1573ee3fff 0x1573ee4000 - 0x1573ee4fff 0x1573ee5000 - 0x1574050fff 0x1574051000 - 0x1574053fff 0x1574054000 - 0x1574054fff 0x1574055000 - 0x1574057fff 0x1574058000 - 0x157406afff 0x157406b000 - 0x157406bfff 0x157406c000 - 0x157406cfff 0x157406d000 - 0x157418afff 0x157418b000 - 0x157418dfff 0x157418e000 - 0x1574190fff 0x1574191000 - 0x1574195fff 0x1574196000 - 0x15741eafff 0x15741eb000 - 0x1574895fff 0x3fffd54000 - 0x3fffd74fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/savemem.lisp ... WARNING: in SAVEINITMEM in lines 31..106 : Mixing &OPTIONAL and &KEY in lambda list (&OPTIONAL (FILENAME "lispinit.mem") &KEY ((:QUIET *QUIET*) NIL) (INIT-FUNCTION NIL INIT-FUNCTION-P) ((:VERBOSE *SAVEINITMEM-VERBOSE*) *SAVEINITMEM-VERBOSE*) ((:NORC *NORC*) NIL) ((:DOCUMENTATION *IMAGE-DOC*) (DOCUMENTATION INIT-FUNCTION 'FUNCTION)) ((:SCRIPT *SCRIPT*) (NULL INIT-FUNCTION)) KEEP-GLOBAL-HANDLERS (START-PACKAGE *PACKAGE*) (LOCKED-PACKAGES *SYSTEM-PACKAGE-LIST*) EXECUTABLE) is bad design ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/savemem.fas 0 errors, 1 warning ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/functions.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x204f9000 - 0x20519fff 0x80000000 - 0x800bffff 0x158eba8000 - 0x158ebc2fff 0x158ebc3000 - 0x158ebc3fff 0x158ebc4000 - 0x158ebc4fff 0x158ebc5000 - 0x158ebc6fff 0x158ebc7000 - 0x158ebc8fff 0x158ebc9000 - 0x158ebcffff 0x158ebd0000 - 0x158ebd0fff 0x158ebd1000 - 0x158ebd1fff 0x158ebd3000 - 0x158ebd4fff 0x158ebd5000 - 0x158ec13fff 0x158ec14000 - 0x158ec15fff 0x158ec16000 - 0x158ec1cfff 0x158ec1d000 - 0x158ec1dfff 0x158ec1e000 - 0x158ec43fff 0x158ec44000 - 0x158ec47fff 0x158ec48000 - 0x158ec48fff 0x158ec49000 - 0x158ec4afff 0x158ec4b000 - 0x158ec4bfff 0x158ec4c000 - 0x158ec4cfff 0x158ec4d000 - 0x158ec4dfff 0x158ec4e000 - 0x158ec51fff 0x158ec52000 - 0x158ec52fff 0x158ec53000 - 0x158ec53fff 0x158ec54000 - 0x158ec55fff 0x158ec56000 - 0x158ec56fff 0x158ec57000 - 0x158ec57fff 0x158ec58000 - 0x158edc3fff 0x158edc4000 - 0x158edc6fff 0x158edc7000 - 0x158edc7fff 0x158edc8000 - 0x158edcafff 0x158edcb000 - 0x158edddfff 0x158edde000 - 0x158eddefff 0x158eddf000 - 0x158eddffff 0x158ede0000 - 0x158eefdfff 0x158eefe000 - 0x158ef00fff 0x158ef01000 - 0x158ef03fff 0x158ef04000 - 0x158ef08fff 0x158ef09000 - 0x158ef5dfff 0x158ef5e000 - 0x158f608fff 0x3fff93d000 - 0x3fff95dfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/functions.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/functions.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/trace.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1f676000 - 0x1f696fff 0x80000000 - 0x800bffff 0x1573e3c000 - 0x1573e56fff 0x1573e57000 - 0x1573e57fff 0x1573e58000 - 0x1573e58fff 0x1573e59000 - 0x1573e5afff 0x1573e5b000 - 0x1573e5cfff 0x1573e5d000 - 0x1573e63fff 0x1573e64000 - 0x1573e64fff 0x1573e65000 - 0x1573e65fff 0x1573e67000 - 0x1573e68fff 0x1573e69000 - 0x1573ea7fff 0x1573ea8000 - 0x1573ea9fff 0x1573eaa000 - 0x1573eb0fff 0x1573eb1000 - 0x1573eb1fff 0x1573eb2000 - 0x1573ed7fff 0x1573ed8000 - 0x1573edbfff 0x1573edc000 - 0x1573edcfff 0x1573edd000 - 0x1573edefff 0x1573edf000 - 0x1573edffff 0x1573ee0000 - 0x1573ee0fff 0x1573ee1000 - 0x1573ee1fff 0x1573ee2000 - 0x1573ee5fff 0x1573ee6000 - 0x1573ee6fff 0x1573ee7000 - 0x1573ee7fff 0x1573ee8000 - 0x1573ee9fff 0x1573eea000 - 0x1573eeafff 0x1573eeb000 - 0x1573eebfff 0x1573eec000 - 0x1574057fff 0x1574058000 - 0x157405afff 0x157405b000 - 0x157405bfff 0x157405c000 - 0x157405efff 0x157405f000 - 0x1574071fff 0x1574072000 - 0x1574072fff 0x1574073000 - 0x1574073fff 0x1574074000 - 0x1574191fff 0x1574192000 - 0x1574194fff 0x1574195000 - 0x1574197fff 0x1574198000 - 0x157419cfff 0x157419d000 - 0x15741f1fff 0x15741f2000 - 0x157489cfff 0x3fffd5a000 - 0x3fffd7afff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/trace.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/trace.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/cmacros.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x35a9a000 - 0x35abafff 0x80000000 - 0x800bffff 0x1576fae000 - 0x1576fc8fff 0x1576fc9000 - 0x1576fc9fff 0x1576fca000 - 0x1576fcafff 0x1576fcb000 - 0x1576fccfff 0x1576fcd000 - 0x1576fcefff 0x1576fcf000 - 0x1576fd5fff 0x1576fd6000 - 0x1576fd6fff 0x1576fd7000 - 0x1576fd7fff 0x1576fd9000 - 0x1576fdafff 0x1576fdb000 - 0x1577019fff 0x157701a000 - 0x157701bfff 0x157701c000 - 0x1577022fff 0x1577023000 - 0x1577023fff 0x1577024000 - 0x1577049fff 0x157704a000 - 0x157704dfff 0x157704e000 - 0x157704efff 0x157704f000 - 0x1577050fff 0x1577051000 - 0x1577051fff 0x1577052000 - 0x1577052fff 0x1577053000 - 0x1577053fff 0x1577054000 - 0x1577057fff 0x1577058000 - 0x1577058fff 0x1577059000 - 0x1577059fff 0x157705a000 - 0x157705bfff 0x157705c000 - 0x157705cfff 0x157705d000 - 0x157705dfff 0x157705e000 - 0x15771c9fff 0x15771ca000 - 0x15771ccfff 0x15771cd000 - 0x15771cdfff 0x15771ce000 - 0x15771d0fff 0x15771d1000 - 0x15771e3fff 0x15771e4000 - 0x15771e4fff 0x15771e5000 - 0x15771e5fff 0x15771e6000 - 0x1577303fff 0x1577304000 - 0x1577306fff 0x1577307000 - 0x1577309fff 0x157730a000 - 0x157730efff 0x157730f000 - 0x1577363fff 0x1577364000 - 0x1577a0efff 0x3fffce5000 - 0x3fffd05fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/cmacros.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/cmacros.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/defs2.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x15a5000 - 0x15c5fff 0x80000000 - 0x800bffff 0x157e409000 - 0x157e423fff 0x157e424000 - 0x157e424fff 0x157e425000 - 0x157e425fff 0x157e426000 - 0x157e427fff 0x157e428000 - 0x157e429fff 0x157e42a000 - 0x157e430fff 0x157e431000 - 0x157e431fff 0x157e432000 - 0x157e432fff 0x157e434000 - 0x157e435fff 0x157e436000 - 0x157e474fff 0x157e475000 - 0x157e476fff 0x157e477000 - 0x157e47dfff 0x157e47e000 - 0x157e47efff 0x157e47f000 - 0x157e4a4fff 0x157e4a5000 - 0x157e4a8fff 0x157e4a9000 - 0x157e4a9fff 0x157e4aa000 - 0x157e4abfff 0x157e4ac000 - 0x157e4acfff 0x157e4ad000 - 0x157e4adfff 0x157e4ae000 - 0x157e4aefff 0x157e4af000 - 0x157e4b2fff 0x157e4b3000 - 0x157e4b3fff 0x157e4b4000 - 0x157e4b4fff 0x157e4b5000 - 0x157e4b6fff 0x157e4b7000 - 0x157e4b7fff 0x157e4b8000 - 0x157e4b8fff 0x157e4b9000 - 0x157e624fff 0x157e625000 - 0x157e627fff 0x157e628000 - 0x157e628fff 0x157e629000 - 0x157e62bfff 0x157e62c000 - 0x157e63efff 0x157e63f000 - 0x157e63ffff 0x157e640000 - 0x157e640fff 0x157e641000 - 0x157e75efff 0x157e75f000 - 0x157e761fff 0x157e762000 - 0x157e764fff 0x157e765000 - 0x157e769fff 0x157e76a000 - 0x157e7befff 0x157e7bf000 - 0x157ee69fff 0x3fffbcf000 - 0x3fffbeffff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/defs2.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/defs2.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/loop.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x46ad000 - 0x46cdfff 0x80000000 - 0x800bffff 0x1583de1000 - 0x1583dfbfff 0x1583dfc000 - 0x1583dfcfff 0x1583dfd000 - 0x1583dfdfff 0x1583dfe000 - 0x1583dfffff 0x1583e00000 - 0x1583e01fff 0x1583e02000 - 0x1583e08fff 0x1583e09000 - 0x1583e09fff 0x1583e0a000 - 0x1583e0afff 0x1583e0c000 - 0x1583e0dfff 0x1583e0e000 - 0x1583e4cfff 0x1583e4d000 - 0x1583e4efff 0x1583e4f000 - 0x1583e55fff 0x1583e56000 - 0x1583e56fff 0x1583e57000 - 0x1583e7cfff 0x1583e7d000 - 0x1583e80fff 0x1583e81000 - 0x1583e81fff 0x1583e82000 - 0x1583e83fff 0x1583e84000 - 0x1583e84fff 0x1583e85000 - 0x1583e85fff 0x1583e86000 - 0x1583e86fff 0x1583e87000 - 0x1583e8afff 0x1583e8b000 - 0x1583e8bfff 0x1583e8c000 - 0x1583e8cfff 0x1583e8d000 - 0x1583e8efff 0x1583e8f000 - 0x1583e8ffff 0x1583e90000 - 0x1583e90fff 0x1583e91000 - 0x1583ffcfff 0x1583ffd000 - 0x1583ffffff 0x1584000000 - 0x1584000fff 0x1584001000 - 0x1584003fff 0x1584004000 - 0x1584016fff 0x1584017000 - 0x1584017fff 0x1584018000 - 0x1584018fff 0x1584019000 - 0x1584136fff 0x1584137000 - 0x1584139fff 0x158413a000 - 0x158413cfff 0x158413d000 - 0x1584141fff 0x1584142000 - 0x1584196fff 0x1584197000 - 0x1584841fff 0x3ffff76000 - 0x3ffff96fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/loop.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/loop.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xb5b6000 - 0xb5d6fff 0x80000000 - 0x800bffff 0x1591419000 - 0x1591433fff 0x1591434000 - 0x1591434fff 0x1591435000 - 0x1591435fff 0x1591436000 - 0x1591437fff 0x1591438000 - 0x1591439fff 0x159143a000 - 0x1591440fff 0x1591441000 - 0x1591441fff 0x1591442000 - 0x1591442fff 0x1591444000 - 0x1591445fff 0x1591446000 - 0x1591484fff 0x1591485000 - 0x1591486fff 0x1591487000 - 0x159148dfff 0x159148e000 - 0x159148efff 0x159148f000 - 0x15914b4fff 0x15914b5000 - 0x15914b8fff 0x15914b9000 - 0x15914b9fff 0x15914ba000 - 0x15914bbfff 0x15914bc000 - 0x15914bcfff 0x15914bd000 - 0x15914bdfff 0x15914be000 - 0x15914befff 0x15914bf000 - 0x15914c2fff 0x15914c3000 - 0x15914c3fff 0x15914c4000 - 0x15914c4fff 0x15914c5000 - 0x15914c6fff 0x15914c7000 - 0x15914c7fff 0x15914c8000 - 0x15914c8fff 0x15914c9000 - 0x1591634fff 0x1591635000 - 0x1591637fff 0x1591638000 - 0x1591638fff 0x1591639000 - 0x159163bfff 0x159163c000 - 0x159164efff 0x159164f000 - 0x159164ffff 0x1591650000 - 0x1591650fff 0x1591651000 - 0x159176efff 0x159176f000 - 0x1591771fff 0x1591772000 - 0x1591774fff 0x1591775000 - 0x1591779fff 0x159177a000 - 0x15917cefff 0x15917cf000 - 0x1591e79fff 0x3fffdc2000 - 0x3fffde2fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-stablehash2.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x17486000 - 0x174a6fff 0x80000000 - 0x800bffff 0x159282f000 - 0x1592849fff 0x159284a000 - 0x159284afff 0x159284b000 - 0x159284bfff 0x159284c000 - 0x159284dfff 0x159284e000 - 0x159284ffff 0x1592850000 - 0x1592856fff 0x1592857000 - 0x1592857fff 0x1592858000 - 0x1592858fff 0x159285a000 - 0x159285bfff 0x159285c000 - 0x159289afff 0x159289b000 - 0x159289cfff 0x159289d000 - 0x15928a3fff 0x15928a4000 - 0x15928a4fff 0x15928a5000 - 0x15928cafff 0x15928cb000 - 0x15928cefff 0x15928cf000 - 0x15928cffff 0x15928d0000 - 0x15928d1fff 0x15928d2000 - 0x15928d2fff 0x15928d3000 - 0x15928d3fff 0x15928d4000 - 0x15928d4fff 0x15928d5000 - 0x15928d8fff 0x15928d9000 - 0x15928d9fff 0x15928da000 - 0x15928dafff 0x15928db000 - 0x15928dcfff 0x15928dd000 - 0x15928ddfff 0x15928de000 - 0x15928defff 0x15928df000 - 0x1592a4afff 0x1592a4b000 - 0x1592a4dfff 0x1592a4e000 - 0x1592a4efff 0x1592a4f000 - 0x1592a51fff 0x1592a52000 - 0x1592a64fff 0x1592a65000 - 0x1592a65fff 0x1592a66000 - 0x1592a66fff 0x1592a67000 - 0x1592b84fff 0x1592b85000 - 0x1592b87fff 0x1592b88000 - 0x1592b8afff 0x1592b8b000 - 0x1592b8ffff 0x1592b90000 - 0x1592be4fff 0x1592be5000 - 0x159328ffff 0x3fffc3c000 - 0x3fffc5cfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-stablehash2.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-stablehash2.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-specializer2.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x10a18000 - 0x10a38fff 0x80000000 - 0x800bffff 0x15633eb000 - 0x1563405fff 0x1563406000 - 0x1563406fff 0x1563407000 - 0x1563407fff 0x1563408000 - 0x1563409fff 0x156340a000 - 0x156340bfff 0x156340c000 - 0x1563412fff 0x1563413000 - 0x1563413fff 0x1563414000 - 0x1563414fff 0x1563416000 - 0x1563417fff 0x1563418000 - 0x1563456fff 0x1563457000 - 0x1563458fff 0x1563459000 - 0x156345ffff 0x1563460000 - 0x1563460fff 0x1563461000 - 0x1563486fff 0x1563487000 - 0x156348afff 0x156348b000 - 0x156348bfff 0x156348c000 - 0x156348dfff 0x156348e000 - 0x156348efff 0x156348f000 - 0x156348ffff 0x1563490000 - 0x1563490fff 0x1563491000 - 0x1563494fff 0x1563495000 - 0x1563495fff 0x1563496000 - 0x1563496fff 0x1563497000 - 0x1563498fff 0x1563499000 - 0x1563499fff 0x156349a000 - 0x156349afff 0x156349b000 - 0x1563606fff 0x1563607000 - 0x1563609fff 0x156360a000 - 0x156360afff 0x156360b000 - 0x156360dfff 0x156360e000 - 0x1563620fff 0x1563621000 - 0x1563621fff 0x1563622000 - 0x1563622fff 0x1563623000 - 0x1563740fff 0x1563741000 - 0x1563743fff 0x1563744000 - 0x1563746fff 0x1563747000 - 0x156374bfff 0x156374c000 - 0x15637a0fff 0x15637a1000 - 0x1563e4bfff 0x3ffff12000 - 0x3ffff32fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-specializer2.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-specializer2.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-specializer3.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x258d000 - 0x25adfff 0x80000000 - 0x800bffff 0x1587e47000 - 0x1587e61fff 0x1587e62000 - 0x1587e62fff 0x1587e63000 - 0x1587e63fff 0x1587e64000 - 0x1587e65fff 0x1587e66000 - 0x1587e67fff 0x1587e68000 - 0x1587e6efff 0x1587e6f000 - 0x1587e6ffff 0x1587e70000 - 0x1587e70fff 0x1587e72000 - 0x1587e73fff 0x1587e74000 - 0x1587eb2fff 0x1587eb3000 - 0x1587eb4fff 0x1587eb5000 - 0x1587ebbfff 0x1587ebc000 - 0x1587ebcfff 0x1587ebd000 - 0x1587ee2fff 0x1587ee3000 - 0x1587ee6fff 0x1587ee7000 - 0x1587ee7fff 0x1587ee8000 - 0x1587ee9fff 0x1587eea000 - 0x1587eeafff 0x1587eeb000 - 0x1587eebfff 0x1587eec000 - 0x1587eecfff 0x1587eed000 - 0x1587ef0fff 0x1587ef1000 - 0x1587ef1fff 0x1587ef2000 - 0x1587ef2fff 0x1587ef3000 - 0x1587ef4fff 0x1587ef5000 - 0x1587ef5fff 0x1587ef6000 - 0x1587ef6fff 0x1587ef7000 - 0x1588062fff 0x1588063000 - 0x1588065fff 0x1588066000 - 0x1588066fff 0x1588067000 - 0x1588069fff 0x158806a000 - 0x158807cfff 0x158807d000 - 0x158807dfff 0x158807e000 - 0x158807efff 0x158807f000 - 0x158819cfff 0x158819d000 - 0x158819ffff 0x15881a0000 - 0x15881a2fff 0x15881a3000 - 0x15881a7fff 0x15881a8000 - 0x15881fcfff 0x15881fd000 - 0x15888a7fff 0x3fffc87000 - 0x3fffca7fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-specializer3.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-specializer3.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-class4.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2c394000 - 0x2c3b4fff 0x80000000 - 0x800bffff 0x156d6fd000 - 0x156d717fff 0x156d718000 - 0x156d718fff 0x156d719000 - 0x156d719fff 0x156d71a000 - 0x156d71bfff 0x156d71c000 - 0x156d71dfff 0x156d71e000 - 0x156d724fff 0x156d725000 - 0x156d725fff 0x156d726000 - 0x156d726fff 0x156d728000 - 0x156d729fff 0x156d72a000 - 0x156d768fff 0x156d769000 - 0x156d76afff 0x156d76b000 - 0x156d771fff 0x156d772000 - 0x156d772fff 0x156d773000 - 0x156d798fff 0x156d799000 - 0x156d79cfff 0x156d79d000 - 0x156d79dfff 0x156d79e000 - 0x156d79ffff 0x156d7a0000 - 0x156d7a0fff 0x156d7a1000 - 0x156d7a1fff 0x156d7a2000 - 0x156d7a2fff 0x156d7a3000 - 0x156d7a6fff 0x156d7a7000 - 0x156d7a7fff 0x156d7a8000 - 0x156d7a8fff 0x156d7a9000 - 0x156d7aafff 0x156d7ab000 - 0x156d7abfff 0x156d7ac000 - 0x156d7acfff 0x156d7ad000 - 0x156d918fff 0x156d919000 - 0x156d91bfff 0x156d91c000 - 0x156d91cfff 0x156d91d000 - 0x156d91ffff 0x156d920000 - 0x156d932fff 0x156d933000 - 0x156d933fff 0x156d934000 - 0x156d934fff 0x156d935000 - 0x156da52fff 0x156da53000 - 0x156da55fff 0x156da56000 - 0x156da58fff 0x156da59000 - 0x156da5dfff 0x156da5e000 - 0x156dab2fff 0x156dab3000 - 0x156e15dfff 0x3fffd83000 - 0x3fffda3fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class4.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-class4.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-class5.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x31553000 - 0x31573fff 0x80000000 - 0x800bffff 0x155c123000 - 0x155c13dfff 0x155c13e000 - 0x155c13efff 0x155c13f000 - 0x155c13ffff 0x155c140000 - 0x155c141fff 0x155c142000 - 0x155c143fff 0x155c144000 - 0x155c14afff 0x155c14b000 - 0x155c14bfff 0x155c14c000 - 0x155c14cfff 0x155c14e000 - 0x155c14ffff 0x155c150000 - 0x155c18efff 0x155c18f000 - 0x155c190fff 0x155c191000 - 0x155c197fff 0x155c198000 - 0x155c198fff 0x155c199000 - 0x155c1befff 0x155c1bf000 - 0x155c1c2fff 0x155c1c3000 - 0x155c1c3fff 0x155c1c4000 - 0x155c1c5fff 0x155c1c6000 - 0x155c1c6fff 0x155c1c7000 - 0x155c1c7fff 0x155c1c8000 - 0x155c1c8fff 0x155c1c9000 - 0x155c1ccfff 0x155c1cd000 - 0x155c1cdfff 0x155c1ce000 - 0x155c1cefff 0x155c1cf000 - 0x155c1d0fff 0x155c1d1000 - 0x155c1d1fff 0x155c1d2000 - 0x155c1d2fff 0x155c1d3000 - 0x155c33efff 0x155c33f000 - 0x155c341fff 0x155c342000 - 0x155c342fff 0x155c343000 - 0x155c345fff 0x155c346000 - 0x155c358fff 0x155c359000 - 0x155c359fff 0x155c35a000 - 0x155c35afff 0x155c35b000 - 0x155c478fff 0x155c479000 - 0x155c47bfff 0x155c47c000 - 0x155c47efff 0x155c47f000 - 0x155c483fff 0x155c484000 - 0x155c4d8fff 0x155c4d9000 - 0x155cb83fff 0x3ffffc9000 - 0x3ffffe9fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class5.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-class5.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-class6.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x196a5000 - 0x196c5fff 0x80000000 - 0x800bffff 0x1583a36000 - 0x1583a50fff 0x1583a51000 - 0x1583a51fff 0x1583a52000 - 0x1583a52fff 0x1583a53000 - 0x1583a54fff 0x1583a55000 - 0x1583a56fff 0x1583a57000 - 0x1583a5dfff 0x1583a5e000 - 0x1583a5efff 0x1583a5f000 - 0x1583a5ffff 0x1583a61000 - 0x1583a62fff 0x1583a63000 - 0x1583aa1fff 0x1583aa2000 - 0x1583aa3fff 0x1583aa4000 - 0x1583aaafff 0x1583aab000 - 0x1583aabfff 0x1583aac000 - 0x1583ad1fff 0x1583ad2000 - 0x1583ad5fff 0x1583ad6000 - 0x1583ad6fff 0x1583ad7000 - 0x1583ad8fff 0x1583ad9000 - 0x1583ad9fff 0x1583ada000 - 0x1583adafff 0x1583adb000 - 0x1583adbfff 0x1583adc000 - 0x1583adffff 0x1583ae0000 - 0x1583ae0fff 0x1583ae1000 - 0x1583ae1fff 0x1583ae2000 - 0x1583ae3fff 0x1583ae4000 - 0x1583ae4fff 0x1583ae5000 - 0x1583ae5fff 0x1583ae6000 - 0x1583c51fff 0x1583c52000 - 0x1583c54fff 0x1583c55000 - 0x1583c55fff 0x1583c56000 - 0x1583c58fff 0x1583c59000 - 0x1583c6bfff 0x1583c6c000 - 0x1583c6cfff 0x1583c6d000 - 0x1583c6dfff 0x1583c6e000 - 0x1583d8bfff 0x1583d8c000 - 0x1583d8efff 0x1583d8f000 - 0x1583d91fff 0x1583d92000 - 0x1583d96fff 0x1583d97000 - 0x1583debfff 0x1583dec000 - 0x1584496fff 0x3fffa25000 - 0x3fffa45fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class6.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-class6.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-slotdef2.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2f7db000 - 0x2f7fbfff 0x80000000 - 0x800bffff 0x15725ee000 - 0x1572608fff 0x1572609000 - 0x1572609fff 0x157260a000 - 0x157260afff 0x157260b000 - 0x157260cfff 0x157260d000 - 0x157260efff 0x157260f000 - 0x1572615fff 0x1572616000 - 0x1572616fff 0x1572617000 - 0x1572617fff 0x1572619000 - 0x157261afff 0x157261b000 - 0x1572659fff 0x157265a000 - 0x157265bfff 0x157265c000 - 0x1572662fff 0x1572663000 - 0x1572663fff 0x1572664000 - 0x1572689fff 0x157268a000 - 0x157268dfff 0x157268e000 - 0x157268efff 0x157268f000 - 0x1572690fff 0x1572691000 - 0x1572691fff 0x1572692000 - 0x1572692fff 0x1572693000 - 0x1572693fff 0x1572694000 - 0x1572697fff 0x1572698000 - 0x1572698fff 0x1572699000 - 0x1572699fff 0x157269a000 - 0x157269bfff 0x157269c000 - 0x157269cfff 0x157269d000 - 0x157269dfff 0x157269e000 - 0x1572809fff 0x157280a000 - 0x157280cfff 0x157280d000 - 0x157280dfff 0x157280e000 - 0x1572810fff 0x1572811000 - 0x1572823fff 0x1572824000 - 0x1572824fff 0x1572825000 - 0x1572825fff 0x1572826000 - 0x1572943fff 0x1572944000 - 0x1572946fff 0x1572947000 - 0x1572949fff 0x157294a000 - 0x157294efff 0x157294f000 - 0x15729a3fff 0x15729a4000 - 0x157304efff 0x3fffee6000 - 0x3ffff06fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slotdef2.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-slotdef2.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-slotdef3.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2a908000 - 0x2a928fff 0x80000000 - 0x800bffff 0x158daa0000 - 0x158dabafff 0x158dabb000 - 0x158dabbfff 0x158dabc000 - 0x158dabcfff 0x158dabd000 - 0x158dabefff 0x158dabf000 - 0x158dac0fff 0x158dac1000 - 0x158dac7fff 0x158dac8000 - 0x158dac8fff 0x158dac9000 - 0x158dac9fff 0x158dacb000 - 0x158daccfff 0x158dacd000 - 0x158db0bfff 0x158db0c000 - 0x158db0dfff 0x158db0e000 - 0x158db14fff 0x158db15000 - 0x158db15fff 0x158db16000 - 0x158db3bfff 0x158db3c000 - 0x158db3ffff 0x158db40000 - 0x158db40fff 0x158db41000 - 0x158db42fff 0x158db43000 - 0x158db43fff 0x158db44000 - 0x158db44fff 0x158db45000 - 0x158db45fff 0x158db46000 - 0x158db49fff 0x158db4a000 - 0x158db4afff 0x158db4b000 - 0x158db4bfff 0x158db4c000 - 0x158db4dfff 0x158db4e000 - 0x158db4efff 0x158db4f000 - 0x158db4ffff 0x158db50000 - 0x158dcbbfff 0x158dcbc000 - 0x158dcbefff 0x158dcbf000 - 0x158dcbffff 0x158dcc0000 - 0x158dcc2fff 0x158dcc3000 - 0x158dcd5fff 0x158dcd6000 - 0x158dcd6fff 0x158dcd7000 - 0x158dcd7fff 0x158dcd8000 - 0x158ddf5fff 0x158ddf6000 - 0x158ddf8fff 0x158ddf9000 - 0x158ddfbfff 0x158ddfc000 - 0x158de00fff 0x158de01000 - 0x158de55fff 0x158de56000 - 0x158e500fff 0x3fffb90000 - 0x3fffbb0fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slotdef3.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-slotdef3.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-slots1.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x103e3000 - 0x10403fff 0x80000000 - 0x800bffff 0x158abe3000 - 0x158abfdfff 0x158abfe000 - 0x158abfefff 0x158abff000 - 0x158abfffff 0x158ac00000 - 0x158ac01fff 0x158ac02000 - 0x158ac03fff 0x158ac04000 - 0x158ac0afff 0x158ac0b000 - 0x158ac0bfff 0x158ac0c000 - 0x158ac0cfff 0x158ac0e000 - 0x158ac0ffff 0x158ac10000 - 0x158ac4efff 0x158ac4f000 - 0x158ac50fff 0x158ac51000 - 0x158ac57fff 0x158ac58000 - 0x158ac58fff 0x158ac59000 - 0x158ac7efff 0x158ac7f000 - 0x158ac82fff 0x158ac83000 - 0x158ac83fff 0x158ac84000 - 0x158ac85fff 0x158ac86000 - 0x158ac86fff 0x158ac87000 - 0x158ac87fff 0x158ac88000 - 0x158ac88fff 0x158ac89000 - 0x158ac8cfff 0x158ac8d000 - 0x158ac8dfff 0x158ac8e000 - 0x158ac8efff 0x158ac8f000 - 0x158ac90fff 0x158ac91000 - 0x158ac91fff 0x158ac92000 - 0x158ac92fff 0x158ac93000 - 0x158adfefff 0x158adff000 - 0x158ae01fff 0x158ae02000 - 0x158ae02fff 0x158ae03000 - 0x158ae05fff 0x158ae06000 - 0x158ae18fff 0x158ae19000 - 0x158ae19fff 0x158ae1a000 - 0x158ae1afff 0x158ae1b000 - 0x158af38fff 0x158af39000 - 0x158af3bfff 0x158af3c000 - 0x158af3efff 0x158af3f000 - 0x158af43fff 0x158af44000 - 0x158af98fff 0x158af99000 - 0x158b643fff 0x3ffffad000 - 0x3ffffcdfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slots1.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-slots1.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-slots2.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2301a000 - 0x2303afff 0x80000000 - 0x800bffff 0x156e6ac000 - 0x156e6c6fff 0x156e6c7000 - 0x156e6c7fff 0x156e6c8000 - 0x156e6c8fff 0x156e6c9000 - 0x156e6cafff 0x156e6cb000 - 0x156e6ccfff 0x156e6cd000 - 0x156e6d3fff 0x156e6d4000 - 0x156e6d4fff 0x156e6d5000 - 0x156e6d5fff 0x156e6d7000 - 0x156e6d8fff 0x156e6d9000 - 0x156e717fff 0x156e718000 - 0x156e719fff 0x156e71a000 - 0x156e720fff 0x156e721000 - 0x156e721fff 0x156e722000 - 0x156e747fff 0x156e748000 - 0x156e74bfff 0x156e74c000 - 0x156e74cfff 0x156e74d000 - 0x156e74efff 0x156e74f000 - 0x156e74ffff 0x156e750000 - 0x156e750fff 0x156e751000 - 0x156e751fff 0x156e752000 - 0x156e755fff 0x156e756000 - 0x156e756fff 0x156e757000 - 0x156e757fff 0x156e758000 - 0x156e759fff 0x156e75a000 - 0x156e75afff 0x156e75b000 - 0x156e75bfff 0x156e75c000 - 0x156e8c7fff 0x156e8c8000 - 0x156e8cafff 0x156e8cb000 - 0x156e8cbfff 0x156e8cc000 - 0x156e8cefff 0x156e8cf000 - 0x156e8e1fff 0x156e8e2000 - 0x156e8e2fff 0x156e8e3000 - 0x156e8e3fff 0x156e8e4000 - 0x156ea01fff 0x156ea02000 - 0x156ea04fff 0x156ea05000 - 0x156ea07fff 0x156ea08000 - 0x156ea0cfff 0x156ea0d000 - 0x156ea61fff 0x156ea62000 - 0x156f10cfff 0x3fffe1a000 - 0x3fffe3afff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slots2.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-slots2.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-method1.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xcf8a000 - 0xcfaafff 0x80000000 - 0x800bffff 0x156b042000 - 0x156b05cfff 0x156b05d000 - 0x156b05dfff 0x156b05e000 - 0x156b05efff 0x156b05f000 - 0x156b060fff 0x156b061000 - 0x156b062fff 0x156b063000 - 0x156b069fff 0x156b06a000 - 0x156b06afff 0x156b06b000 - 0x156b06bfff 0x156b06d000 - 0x156b06efff 0x156b06f000 - 0x156b0adfff 0x156b0ae000 - 0x156b0affff 0x156b0b0000 - 0x156b0b6fff 0x156b0b7000 - 0x156b0b7fff 0x156b0b8000 - 0x156b0ddfff 0x156b0de000 - 0x156b0e1fff 0x156b0e2000 - 0x156b0e2fff 0x156b0e3000 - 0x156b0e4fff 0x156b0e5000 - 0x156b0e5fff 0x156b0e6000 - 0x156b0e6fff 0x156b0e7000 - 0x156b0e7fff 0x156b0e8000 - 0x156b0ebfff 0x156b0ec000 - 0x156b0ecfff 0x156b0ed000 - 0x156b0edfff 0x156b0ee000 - 0x156b0effff 0x156b0f0000 - 0x156b0f0fff 0x156b0f1000 - 0x156b0f1fff 0x156b0f2000 - 0x156b25dfff 0x156b25e000 - 0x156b260fff 0x156b261000 - 0x156b261fff 0x156b262000 - 0x156b264fff 0x156b265000 - 0x156b277fff 0x156b278000 - 0x156b278fff 0x156b279000 - 0x156b279fff 0x156b27a000 - 0x156b397fff 0x156b398000 - 0x156b39afff 0x156b39b000 - 0x156b39dfff 0x156b39e000 - 0x156b3a2fff 0x156b3a3000 - 0x156b3f7fff 0x156b3f8000 - 0x156baa2fff 0x3fffeba000 - 0x3fffedafff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method1.lisp ... WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-method1.fas 0 errors, 5 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-method2.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3fe13000 - 0x3fe33fff 0x80000000 - 0x800bffff 0x156158b000 - 0x15615a5fff 0x15615a6000 - 0x15615a6fff 0x15615a7000 - 0x15615a7fff 0x15615a8000 - 0x15615a9fff 0x15615aa000 - 0x15615abfff 0x15615ac000 - 0x15615b2fff 0x15615b3000 - 0x15615b3fff 0x15615b4000 - 0x15615b4fff 0x15615b6000 - 0x15615b7fff 0x15615b8000 - 0x15615f6fff 0x15615f7000 - 0x15615f8fff 0x15615f9000 - 0x15615fffff 0x1561600000 - 0x1561600fff 0x1561601000 - 0x1561626fff 0x1561627000 - 0x156162afff 0x156162b000 - 0x156162bfff 0x156162c000 - 0x156162dfff 0x156162e000 - 0x156162efff 0x156162f000 - 0x156162ffff 0x1561630000 - 0x1561630fff 0x1561631000 - 0x1561634fff 0x1561635000 - 0x1561635fff 0x1561636000 - 0x1561636fff 0x1561637000 - 0x1561638fff 0x1561639000 - 0x1561639fff 0x156163a000 - 0x156163afff 0x156163b000 - 0x15617a6fff 0x15617a7000 - 0x15617a9fff 0x15617aa000 - 0x15617aafff 0x15617ab000 - 0x15617adfff 0x15617ae000 - 0x15617c0fff 0x15617c1000 - 0x15617c1fff 0x15617c2000 - 0x15617c2fff 0x15617c3000 - 0x15618e0fff 0x15618e1000 - 0x15618e3fff 0x15618e4000 - 0x15618e6fff 0x15618e7000 - 0x15618ebfff 0x15618ec000 - 0x1561940fff 0x1561941000 - 0x1561febfff 0x3fffe29000 - 0x3fffe49fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method2.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-method2.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-method3.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xf743000 - 0xf763fff 0x80000000 - 0x800bffff 0x15742bb000 - 0x15742d5fff 0x15742d6000 - 0x15742d6fff 0x15742d7000 - 0x15742d7fff 0x15742d8000 - 0x15742d9fff 0x15742da000 - 0x15742dbfff 0x15742dc000 - 0x15742e2fff 0x15742e3000 - 0x15742e3fff 0x15742e4000 - 0x15742e4fff 0x15742e6000 - 0x15742e7fff 0x15742e8000 - 0x1574326fff 0x1574327000 - 0x1574328fff 0x1574329000 - 0x157432ffff 0x1574330000 - 0x1574330fff 0x1574331000 - 0x1574356fff 0x1574357000 - 0x157435afff 0x157435b000 - 0x157435bfff 0x157435c000 - 0x157435dfff 0x157435e000 - 0x157435efff 0x157435f000 - 0x157435ffff 0x1574360000 - 0x1574360fff 0x1574361000 - 0x1574364fff 0x1574365000 - 0x1574365fff 0x1574366000 - 0x1574366fff 0x1574367000 - 0x1574368fff 0x1574369000 - 0x1574369fff 0x157436a000 - 0x157436afff 0x157436b000 - 0x15744d6fff 0x15744d7000 - 0x15744d9fff 0x15744da000 - 0x15744dafff 0x15744db000 - 0x15744ddfff 0x15744de000 - 0x15744f0fff 0x15744f1000 - 0x15744f1fff 0x15744f2000 - 0x15744f2fff 0x15744f3000 - 0x1574610fff 0x1574611000 - 0x1574613fff 0x1574614000 - 0x1574616fff 0x1574617000 - 0x157461bfff 0x157461c000 - 0x1574670fff 0x1574671000 - 0x1574d1bfff 0x3fffbfa000 - 0x3fffc1afff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method3.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-method3.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-method4.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2cab6000 - 0x2cad6fff 0x80000000 - 0x800bffff 0x1575687000 - 0x15756a1fff 0x15756a2000 - 0x15756a2fff 0x15756a3000 - 0x15756a3fff 0x15756a4000 - 0x15756a5fff 0x15756a6000 - 0x15756a7fff 0x15756a8000 - 0x15756aefff 0x15756af000 - 0x15756affff 0x15756b0000 - 0x15756b0fff 0x15756b2000 - 0x15756b3fff 0x15756b4000 - 0x15756f2fff 0x15756f3000 - 0x15756f4fff 0x15756f5000 - 0x15756fbfff 0x15756fc000 - 0x15756fcfff 0x15756fd000 - 0x1575722fff 0x1575723000 - 0x1575726fff 0x1575727000 - 0x1575727fff 0x1575728000 - 0x1575729fff 0x157572a000 - 0x157572afff 0x157572b000 - 0x157572bfff 0x157572c000 - 0x157572cfff 0x157572d000 - 0x1575730fff 0x1575731000 - 0x1575731fff 0x1575732000 - 0x1575732fff 0x1575733000 - 0x1575734fff 0x1575735000 - 0x1575735fff 0x1575736000 - 0x1575736fff 0x1575737000 - 0x15758a2fff 0x15758a3000 - 0x15758a5fff 0x15758a6000 - 0x15758a6fff 0x15758a7000 - 0x15758a9fff 0x15758aa000 - 0x15758bcfff 0x15758bd000 - 0x15758bdfff 0x15758be000 - 0x15758befff 0x15758bf000 - 0x15759dcfff 0x15759dd000 - 0x15759dffff 0x15759e0000 - 0x15759e2fff 0x15759e3000 - 0x15759e7fff 0x15759e8000 - 0x1575a3cfff 0x1575a3d000 - 0x15760e7fff 0x3fff8c7000 - 0x3fff8e7fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method4.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-method4.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-methcomb1.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x214c000 - 0x216cfff 0x80000000 - 0x800bffff 0x15669b1000 - 0x15669cbfff 0x15669cc000 - 0x15669ccfff 0x15669cd000 - 0x15669cdfff 0x15669ce000 - 0x15669cffff 0x15669d0000 - 0x15669d1fff 0x15669d2000 - 0x15669d8fff 0x15669d9000 - 0x15669d9fff 0x15669da000 - 0x15669dafff 0x15669dc000 - 0x15669ddfff 0x15669de000 - 0x1566a1cfff 0x1566a1d000 - 0x1566a1efff 0x1566a1f000 - 0x1566a25fff 0x1566a26000 - 0x1566a26fff 0x1566a27000 - 0x1566a4cfff 0x1566a4d000 - 0x1566a50fff 0x1566a51000 - 0x1566a51fff 0x1566a52000 - 0x1566a53fff 0x1566a54000 - 0x1566a54fff 0x1566a55000 - 0x1566a55fff 0x1566a56000 - 0x1566a56fff 0x1566a57000 - 0x1566a5afff 0x1566a5b000 - 0x1566a5bfff 0x1566a5c000 - 0x1566a5cfff 0x1566a5d000 - 0x1566a5efff 0x1566a5f000 - 0x1566a5ffff 0x1566a60000 - 0x1566a60fff 0x1566a61000 - 0x1566bccfff 0x1566bcd000 - 0x1566bcffff 0x1566bd0000 - 0x1566bd0fff 0x1566bd1000 - 0x1566bd3fff 0x1566bd4000 - 0x1566be6fff 0x1566be7000 - 0x1566be7fff 0x1566be8000 - 0x1566be8fff 0x1566be9000 - 0x1566d06fff 0x1566d07000 - 0x1566d09fff 0x1566d0a000 - 0x1566d0cfff 0x1566d0d000 - 0x1566d11fff 0x1566d12000 - 0x1566d66fff 0x1566d67000 - 0x1567411fff 0x3fff8d6000 - 0x3fff8f6fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb1.lisp ... WARNING: Redefining metaobject class # has no effect. ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-methcomb1.fas 0 errors, 1 warning ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-methcomb2.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xc4ae000 - 0xc4cefff 0x80000000 - 0x800bffff 0x155e4d1000 - 0x155e4ebfff 0x155e4ec000 - 0x155e4ecfff 0x155e4ed000 - 0x155e4edfff 0x155e4ee000 - 0x155e4effff 0x155e4f0000 - 0x155e4f1fff 0x155e4f2000 - 0x155e4f8fff 0x155e4f9000 - 0x155e4f9fff 0x155e4fa000 - 0x155e4fafff 0x155e4fc000 - 0x155e4fdfff 0x155e4fe000 - 0x155e53cfff 0x155e53d000 - 0x155e53efff 0x155e53f000 - 0x155e545fff 0x155e546000 - 0x155e546fff 0x155e547000 - 0x155e56cfff 0x155e56d000 - 0x155e570fff 0x155e571000 - 0x155e571fff 0x155e572000 - 0x155e573fff 0x155e574000 - 0x155e574fff 0x155e575000 - 0x155e575fff 0x155e576000 - 0x155e576fff 0x155e577000 - 0x155e57afff 0x155e57b000 - 0x155e57bfff 0x155e57c000 - 0x155e57cfff 0x155e57d000 - 0x155e57efff 0x155e57f000 - 0x155e57ffff 0x155e580000 - 0x155e580fff 0x155e581000 - 0x155e6ecfff 0x155e6ed000 - 0x155e6effff 0x155e6f0000 - 0x155e6f0fff 0x155e6f1000 - 0x155e6f3fff 0x155e6f4000 - 0x155e706fff 0x155e707000 - 0x155e707fff 0x155e708000 - 0x155e708fff 0x155e709000 - 0x155e826fff 0x155e827000 - 0x155e829fff 0x155e82a000 - 0x155e82cfff 0x155e82d000 - 0x155e831fff 0x155e832000 - 0x155e886fff 0x155e887000 - 0x155ef31fff 0x3fffbaf000 - 0x3fffbcffff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb2.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-methcomb2.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-methcomb3.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x94e6000 - 0x9506fff 0x80000000 - 0x800bffff 0x1583616000 - 0x1583630fff 0x1583631000 - 0x1583631fff 0x1583632000 - 0x1583632fff 0x1583633000 - 0x1583634fff 0x1583635000 - 0x1583636fff 0x1583637000 - 0x158363dfff 0x158363e000 - 0x158363efff 0x158363f000 - 0x158363ffff 0x1583641000 - 0x1583642fff 0x1583643000 - 0x1583681fff 0x1583682000 - 0x1583683fff 0x1583684000 - 0x158368afff 0x158368b000 - 0x158368bfff 0x158368c000 - 0x15836b1fff 0x15836b2000 - 0x15836b5fff 0x15836b6000 - 0x15836b6fff 0x15836b7000 - 0x15836b8fff 0x15836b9000 - 0x15836b9fff 0x15836ba000 - 0x15836bafff 0x15836bb000 - 0x15836bbfff 0x15836bc000 - 0x15836bffff 0x15836c0000 - 0x15836c0fff 0x15836c1000 - 0x15836c1fff 0x15836c2000 - 0x15836c3fff 0x15836c4000 - 0x15836c4fff 0x15836c5000 - 0x15836c5fff 0x15836c6000 - 0x1583831fff 0x1583832000 - 0x1583834fff 0x1583835000 - 0x1583835fff 0x1583836000 - 0x1583838fff 0x1583839000 - 0x158384bfff 0x158384c000 - 0x158384cfff 0x158384d000 - 0x158384dfff 0x158384e000 - 0x158396bfff 0x158396c000 - 0x158396efff 0x158396f000 - 0x1583971fff 0x1583972000 - 0x1583976fff 0x1583977000 - 0x15839cbfff 0x15839cc000 - 0x1584076fff 0x3ffff91000 - 0x3ffffb1fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb3.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-methcomb3.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-methcomb4.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2227e000 - 0x2229efff 0x80000000 - 0x800bffff 0x155d3a3000 - 0x155d3bdfff 0x155d3be000 - 0x155d3befff 0x155d3bf000 - 0x155d3bffff 0x155d3c0000 - 0x155d3c1fff 0x155d3c2000 - 0x155d3c3fff 0x155d3c4000 - 0x155d3cafff 0x155d3cb000 - 0x155d3cbfff 0x155d3cc000 - 0x155d3ccfff 0x155d3ce000 - 0x155d3cffff 0x155d3d0000 - 0x155d40efff 0x155d40f000 - 0x155d410fff 0x155d411000 - 0x155d417fff 0x155d418000 - 0x155d418fff 0x155d419000 - 0x155d43efff 0x155d43f000 - 0x155d442fff 0x155d443000 - 0x155d443fff 0x155d444000 - 0x155d445fff 0x155d446000 - 0x155d446fff 0x155d447000 - 0x155d447fff 0x155d448000 - 0x155d448fff 0x155d449000 - 0x155d44cfff 0x155d44d000 - 0x155d44dfff 0x155d44e000 - 0x155d44efff 0x155d44f000 - 0x155d450fff 0x155d451000 - 0x155d451fff 0x155d452000 - 0x155d452fff 0x155d453000 - 0x155d5befff 0x155d5bf000 - 0x155d5c1fff 0x155d5c2000 - 0x155d5c2fff 0x155d5c3000 - 0x155d5c5fff 0x155d5c6000 - 0x155d5d8fff 0x155d5d9000 - 0x155d5d9fff 0x155d5da000 - 0x155d5dafff 0x155d5db000 - 0x155d6f8fff 0x155d6f9000 - 0x155d6fbfff 0x155d6fc000 - 0x155d6fefff 0x155d6ff000 - 0x155d703fff 0x155d704000 - 0x155d758fff 0x155d759000 - 0x155de03fff 0x3ffff31000 - 0x3ffff51fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb4.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-methcomb4.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-genfun1.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x29974000 - 0x29994fff 0x80000000 - 0x800bffff 0x1578606000 - 0x1578620fff 0x1578621000 - 0x1578621fff 0x1578622000 - 0x1578622fff 0x1578623000 - 0x1578624fff 0x1578625000 - 0x1578626fff 0x1578627000 - 0x157862dfff 0x157862e000 - 0x157862efff 0x157862f000 - 0x157862ffff 0x1578631000 - 0x1578632fff 0x1578633000 - 0x1578671fff 0x1578672000 - 0x1578673fff 0x1578674000 - 0x157867afff 0x157867b000 - 0x157867bfff 0x157867c000 - 0x15786a1fff 0x15786a2000 - 0x15786a5fff 0x15786a6000 - 0x15786a6fff 0x15786a7000 - 0x15786a8fff 0x15786a9000 - 0x15786a9fff 0x15786aa000 - 0x15786aafff 0x15786ab000 - 0x15786abfff 0x15786ac000 - 0x15786affff 0x15786b0000 - 0x15786b0fff 0x15786b1000 - 0x15786b1fff 0x15786b2000 - 0x15786b3fff 0x15786b4000 - 0x15786b4fff 0x15786b5000 - 0x15786b5fff 0x15786b6000 - 0x1578821fff 0x1578822000 - 0x1578824fff 0x1578825000 - 0x1578825fff 0x1578826000 - 0x1578828fff 0x1578829000 - 0x157883bfff 0x157883c000 - 0x157883cfff 0x157883d000 - 0x157883dfff 0x157883e000 - 0x157895bfff 0x157895c000 - 0x157895efff 0x157895f000 - 0x1578961fff 0x1578962000 - 0x1578966fff 0x1578967000 - 0x15789bbfff 0x15789bc000 - 0x1579066fff 0x3fffbdd000 - 0x3fffbfdfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun1.lisp ... WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-genfun1.fas 0 errors, 3 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-genfun2a.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xdd14000 - 0xdd34fff 0x80000000 - 0x800bffff 0x155f0a3000 - 0x155f0bdfff 0x155f0be000 - 0x155f0befff 0x155f0bf000 - 0x155f0bffff 0x155f0c0000 - 0x155f0c1fff 0x155f0c2000 - 0x155f0c3fff 0x155f0c4000 - 0x155f0cafff 0x155f0cb000 - 0x155f0cbfff 0x155f0cc000 - 0x155f0ccfff 0x155f0ce000 - 0x155f0cffff 0x155f0d0000 - 0x155f10efff 0x155f10f000 - 0x155f110fff 0x155f111000 - 0x155f117fff 0x155f118000 - 0x155f118fff 0x155f119000 - 0x155f13efff 0x155f13f000 - 0x155f142fff 0x155f143000 - 0x155f143fff 0x155f144000 - 0x155f145fff 0x155f146000 - 0x155f146fff 0x155f147000 - 0x155f147fff 0x155f148000 - 0x155f148fff 0x155f149000 - 0x155f14cfff 0x155f14d000 - 0x155f14dfff 0x155f14e000 - 0x155f14efff 0x155f14f000 - 0x155f150fff 0x155f151000 - 0x155f151fff 0x155f152000 - 0x155f152fff 0x155f153000 - 0x155f2befff 0x155f2bf000 - 0x155f2c1fff 0x155f2c2000 - 0x155f2c2fff 0x155f2c3000 - 0x155f2c5fff 0x155f2c6000 - 0x155f2d8fff 0x155f2d9000 - 0x155f2d9fff 0x155f2da000 - 0x155f2dafff 0x155f2db000 - 0x155f3f8fff 0x155f3f9000 - 0x155f3fbfff 0x155f3fc000 - 0x155f3fefff 0x155f3ff000 - 0x155f403fff 0x155f404000 - 0x155f458fff 0x155f459000 - 0x155fb03fff 0x3fffe9c000 - 0x3fffebcfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun2a.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-genfun2a.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-genfun2b.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x154c4000 - 0x154e4fff 0x80000000 - 0x800bffff 0x157a891000 - 0x157a8abfff 0x157a8ac000 - 0x157a8acfff 0x157a8ad000 - 0x157a8adfff 0x157a8ae000 - 0x157a8affff 0x157a8b0000 - 0x157a8b1fff 0x157a8b2000 - 0x157a8b8fff 0x157a8b9000 - 0x157a8b9fff 0x157a8ba000 - 0x157a8bafff 0x157a8bc000 - 0x157a8bdfff 0x157a8be000 - 0x157a8fcfff 0x157a8fd000 - 0x157a8fefff 0x157a8ff000 - 0x157a905fff 0x157a906000 - 0x157a906fff 0x157a907000 - 0x157a92cfff 0x157a92d000 - 0x157a930fff 0x157a931000 - 0x157a931fff 0x157a932000 - 0x157a933fff 0x157a934000 - 0x157a934fff 0x157a935000 - 0x157a935fff 0x157a936000 - 0x157a936fff 0x157a937000 - 0x157a93afff 0x157a93b000 - 0x157a93bfff 0x157a93c000 - 0x157a93cfff 0x157a93d000 - 0x157a93efff 0x157a93f000 - 0x157a93ffff 0x157a940000 - 0x157a940fff 0x157a941000 - 0x157aaacfff 0x157aaad000 - 0x157aaaffff 0x157aab0000 - 0x157aab0fff 0x157aab1000 - 0x157aab3fff 0x157aab4000 - 0x157aac6fff 0x157aac7000 - 0x157aac7fff 0x157aac8000 - 0x157aac8fff 0x157aac9000 - 0x157abe6fff 0x157abe7000 - 0x157abe9fff 0x157abea000 - 0x157abecfff 0x157abed000 - 0x157abf1fff 0x157abf2000 - 0x157ac46fff 0x157ac47000 - 0x157b2f1fff 0x3fffd14000 - 0x3fffd34fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun2b.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-genfun2b.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-genfun3.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x7888000 - 0x78a8fff 0x80000000 - 0x800bffff 0x157d163000 - 0x157d17dfff 0x157d17e000 - 0x157d17efff 0x157d17f000 - 0x157d17ffff 0x157d180000 - 0x157d181fff 0x157d182000 - 0x157d183fff 0x157d184000 - 0x157d18afff 0x157d18b000 - 0x157d18bfff 0x157d18c000 - 0x157d18cfff 0x157d18e000 - 0x157d18ffff 0x157d190000 - 0x157d1cefff 0x157d1cf000 - 0x157d1d0fff 0x157d1d1000 - 0x157d1d7fff 0x157d1d8000 - 0x157d1d8fff 0x157d1d9000 - 0x157d1fefff 0x157d1ff000 - 0x157d202fff 0x157d203000 - 0x157d203fff 0x157d204000 - 0x157d205fff 0x157d206000 - 0x157d206fff 0x157d207000 - 0x157d207fff 0x157d208000 - 0x157d208fff 0x157d209000 - 0x157d20cfff 0x157d20d000 - 0x157d20dfff 0x157d20e000 - 0x157d20efff 0x157d20f000 - 0x157d210fff 0x157d211000 - 0x157d211fff 0x157d212000 - 0x157d212fff 0x157d213000 - 0x157d37efff 0x157d37f000 - 0x157d381fff 0x157d382000 - 0x157d382fff 0x157d383000 - 0x157d385fff 0x157d386000 - 0x157d398fff 0x157d399000 - 0x157d399fff 0x157d39a000 - 0x157d39afff 0x157d39b000 - 0x157d4b8fff 0x157d4b9000 - 0x157d4bbfff 0x157d4bc000 - 0x157d4befff 0x157d4bf000 - 0x157d4c3fff 0x157d4c4000 - 0x157d518fff 0x157d519000 - 0x157dbc3fff 0x3ffffc2000 - 0x3ffffe2fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun3.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-genfun3.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-genfun4.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2a3ce000 - 0x2a3eefff 0x80000000 - 0x800bffff 0x1577324000 - 0x157733efff 0x157733f000 - 0x157733ffff 0x1577340000 - 0x1577340fff 0x1577341000 - 0x1577342fff 0x1577343000 - 0x1577344fff 0x1577345000 - 0x157734bfff 0x157734c000 - 0x157734cfff 0x157734d000 - 0x157734dfff 0x157734f000 - 0x1577350fff 0x1577351000 - 0x157738ffff 0x1577390000 - 0x1577391fff 0x1577392000 - 0x1577398fff 0x1577399000 - 0x1577399fff 0x157739a000 - 0x15773bffff 0x15773c0000 - 0x15773c3fff 0x15773c4000 - 0x15773c4fff 0x15773c5000 - 0x15773c6fff 0x15773c7000 - 0x15773c7fff 0x15773c8000 - 0x15773c8fff 0x15773c9000 - 0x15773c9fff 0x15773ca000 - 0x15773cdfff 0x15773ce000 - 0x15773cefff 0x15773cf000 - 0x15773cffff 0x15773d0000 - 0x15773d1fff 0x15773d2000 - 0x15773d2fff 0x15773d3000 - 0x15773d3fff 0x15773d4000 - 0x157753ffff 0x1577540000 - 0x1577542fff 0x1577543000 - 0x1577543fff 0x1577544000 - 0x1577546fff 0x1577547000 - 0x1577559fff 0x157755a000 - 0x157755afff 0x157755b000 - 0x157755bfff 0x157755c000 - 0x1577679fff 0x157767a000 - 0x157767cfff 0x157767d000 - 0x157767ffff 0x1577680000 - 0x1577684fff 0x1577685000 - 0x15776d9fff 0x15776da000 - 0x1577d84fff 0x3fffd63000 - 0x3fffd83fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun4.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-genfun4.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-genfun5.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2234a000 - 0x2236afff 0x80000000 - 0x800bffff 0x1570202000 - 0x157021cfff 0x157021d000 - 0x157021dfff 0x157021e000 - 0x157021efff 0x157021f000 - 0x1570220fff 0x1570221000 - 0x1570222fff 0x1570223000 - 0x1570229fff 0x157022a000 - 0x157022afff 0x157022b000 - 0x157022bfff 0x157022d000 - 0x157022efff 0x157022f000 - 0x157026dfff 0x157026e000 - 0x157026ffff 0x1570270000 - 0x1570276fff 0x1570277000 - 0x1570277fff 0x1570278000 - 0x157029dfff 0x157029e000 - 0x15702a1fff 0x15702a2000 - 0x15702a2fff 0x15702a3000 - 0x15702a4fff 0x15702a5000 - 0x15702a5fff 0x15702a6000 - 0x15702a6fff 0x15702a7000 - 0x15702a7fff 0x15702a8000 - 0x15702abfff 0x15702ac000 - 0x15702acfff 0x15702ad000 - 0x15702adfff 0x15702ae000 - 0x15702affff 0x15702b0000 - 0x15702b0fff 0x15702b1000 - 0x15702b1fff 0x15702b2000 - 0x157041dfff 0x157041e000 - 0x1570420fff 0x1570421000 - 0x1570421fff 0x1570422000 - 0x1570424fff 0x1570425000 - 0x1570437fff 0x1570438000 - 0x1570438fff 0x1570439000 - 0x1570439fff 0x157043a000 - 0x1570557fff 0x1570558000 - 0x157055afff 0x157055b000 - 0x157055dfff 0x157055e000 - 0x1570562fff 0x1570563000 - 0x15705b7fff 0x15705b8000 - 0x1570c62fff 0x3fff8f5000 - 0x3fff915fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun5.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-genfun5.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-dependent.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x33c28000 - 0x33c48fff 0x80000000 - 0x800bffff 0x1555a12000 - 0x1555a2cfff 0x1555a2d000 - 0x1555a2dfff 0x1555a2e000 - 0x1555a2efff 0x1555a2f000 - 0x1555a30fff 0x1555a31000 - 0x1555a32fff 0x1555a33000 - 0x1555a39fff 0x1555a3a000 - 0x1555a3afff 0x1555a3b000 - 0x1555a3bfff 0x1555a3d000 - 0x1555a3efff 0x1555a3f000 - 0x1555a7dfff 0x1555a7e000 - 0x1555a7ffff 0x1555a80000 - 0x1555a86fff 0x1555a87000 - 0x1555a87fff 0x1555a88000 - 0x1555aadfff 0x1555aae000 - 0x1555ab1fff 0x1555ab2000 - 0x1555ab2fff 0x1555ab3000 - 0x1555ab4fff 0x1555ab5000 - 0x1555ab5fff 0x1555ab6000 - 0x1555ab6fff 0x1555ab7000 - 0x1555ab7fff 0x1555ab8000 - 0x1555abbfff 0x1555abc000 - 0x1555abcfff 0x1555abd000 - 0x1555abdfff 0x1555abe000 - 0x1555abffff 0x1555ac0000 - 0x1555ac0fff 0x1555ac1000 - 0x1555ac1fff 0x1555ac2000 - 0x1555c2dfff 0x1555c2e000 - 0x1555c30fff 0x1555c31000 - 0x1555c31fff 0x1555c32000 - 0x1555c34fff 0x1555c35000 - 0x1555c47fff 0x1555c48000 - 0x1555c48fff 0x1555c49000 - 0x1555c49fff 0x1555c4a000 - 0x1555d67fff 0x1555d68000 - 0x1555d6afff 0x1555d6b000 - 0x1555d6dfff 0x1555d6e000 - 0x1555d72fff 0x1555d73000 - 0x1555dc7fff 0x1555dc8000 - 0x1556472fff 0x3fffdbc000 - 0x3fffddcfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-dependent.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-dependent.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-print.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2fdea000 - 0x2fe0afff 0x80000000 - 0x800bffff 0x155fb0e000 - 0x155fb28fff 0x155fb29000 - 0x155fb29fff 0x155fb2a000 - 0x155fb2afff 0x155fb2b000 - 0x155fb2cfff 0x155fb2d000 - 0x155fb2efff 0x155fb2f000 - 0x155fb35fff 0x155fb36000 - 0x155fb36fff 0x155fb37000 - 0x155fb37fff 0x155fb39000 - 0x155fb3afff 0x155fb3b000 - 0x155fb79fff 0x155fb7a000 - 0x155fb7bfff 0x155fb7c000 - 0x155fb82fff 0x155fb83000 - 0x155fb83fff 0x155fb84000 - 0x155fba9fff 0x155fbaa000 - 0x155fbadfff 0x155fbae000 - 0x155fbaefff 0x155fbaf000 - 0x155fbb0fff 0x155fbb1000 - 0x155fbb1fff 0x155fbb2000 - 0x155fbb2fff 0x155fbb3000 - 0x155fbb3fff 0x155fbb4000 - 0x155fbb7fff 0x155fbb8000 - 0x155fbb8fff 0x155fbb9000 - 0x155fbb9fff 0x155fbba000 - 0x155fbbbfff 0x155fbbc000 - 0x155fbbcfff 0x155fbbd000 - 0x155fbbdfff 0x155fbbe000 - 0x155fd29fff 0x155fd2a000 - 0x155fd2cfff 0x155fd2d000 - 0x155fd2dfff 0x155fd2e000 - 0x155fd30fff 0x155fd31000 - 0x155fd43fff 0x155fd44000 - 0x155fd44fff 0x155fd45000 - 0x155fd45fff 0x155fd46000 - 0x155fe63fff 0x155fe64000 - 0x155fe66fff 0x155fe67000 - 0x155fe69fff 0x155fe6a000 - 0x155fe6efff 0x155fe6f000 - 0x155fec3fff 0x155fec4000 - 0x156056efff 0x3ffff0a000 - 0x3ffff2afff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-print.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-print.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clos-custom.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1152000 - 0x1172fff 0x80000000 - 0x800bffff 0x158acba000 - 0x158acd4fff 0x158acd5000 - 0x158acd5fff 0x158acd6000 - 0x158acd6fff 0x158acd7000 - 0x158acd8fff 0x158acd9000 - 0x158acdafff 0x158acdb000 - 0x158ace1fff 0x158ace2000 - 0x158ace2fff 0x158ace3000 - 0x158ace3fff 0x158ace5000 - 0x158ace6fff 0x158ace7000 - 0x158ad25fff 0x158ad26000 - 0x158ad27fff 0x158ad28000 - 0x158ad2efff 0x158ad2f000 - 0x158ad2ffff 0x158ad30000 - 0x158ad55fff 0x158ad56000 - 0x158ad59fff 0x158ad5a000 - 0x158ad5afff 0x158ad5b000 - 0x158ad5cfff 0x158ad5d000 - 0x158ad5dfff 0x158ad5e000 - 0x158ad5efff 0x158ad5f000 - 0x158ad5ffff 0x158ad60000 - 0x158ad63fff 0x158ad64000 - 0x158ad64fff 0x158ad65000 - 0x158ad65fff 0x158ad66000 - 0x158ad67fff 0x158ad68000 - 0x158ad68fff 0x158ad69000 - 0x158ad69fff 0x158ad6a000 - 0x158aed5fff 0x158aed6000 - 0x158aed8fff 0x158aed9000 - 0x158aed9fff 0x158aeda000 - 0x158aedcfff 0x158aedd000 - 0x158aeeffff 0x158aef0000 - 0x158aef0fff 0x158aef1000 - 0x158aef1fff 0x158aef2000 - 0x158b00ffff 0x158b010000 - 0x158b012fff 0x158b013000 - 0x158b015fff 0x158b016000 - 0x158b01afff 0x158b01b000 - 0x158b06ffff 0x158b070000 - 0x158b71afff 0x3fffed3000 - 0x3fffef3fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-custom.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-custom.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/documentation.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3e31e000 - 0x3e33efff 0x80000000 - 0x800bffff 0x158d977000 - 0x158d991fff 0x158d992000 - 0x158d992fff 0x158d993000 - 0x158d993fff 0x158d994000 - 0x158d995fff 0x158d996000 - 0x158d997fff 0x158d998000 - 0x158d99efff 0x158d99f000 - 0x158d99ffff 0x158d9a0000 - 0x158d9a0fff 0x158d9a2000 - 0x158d9a3fff 0x158d9a4000 - 0x158d9e2fff 0x158d9e3000 - 0x158d9e4fff 0x158d9e5000 - 0x158d9ebfff 0x158d9ec000 - 0x158d9ecfff 0x158d9ed000 - 0x158da12fff 0x158da13000 - 0x158da16fff 0x158da17000 - 0x158da17fff 0x158da18000 - 0x158da19fff 0x158da1a000 - 0x158da1afff 0x158da1b000 - 0x158da1bfff 0x158da1c000 - 0x158da1cfff 0x158da1d000 - 0x158da20fff 0x158da21000 - 0x158da21fff 0x158da22000 - 0x158da22fff 0x158da23000 - 0x158da24fff 0x158da25000 - 0x158da25fff 0x158da26000 - 0x158da26fff 0x158da27000 - 0x158db92fff 0x158db93000 - 0x158db95fff 0x158db96000 - 0x158db96fff 0x158db97000 - 0x158db99fff 0x158db9a000 - 0x158dbacfff 0x158dbad000 - 0x158dbadfff 0x158dbae000 - 0x158dbaefff 0x158dbaf000 - 0x158dcccfff 0x158dccd000 - 0x158dccffff 0x158dcd0000 - 0x158dcd2fff 0x158dcd3000 - 0x158dcd7fff 0x158dcd8000 - 0x158dd2cfff 0x158dd2d000 - 0x158e3d7fff 0x3fff956000 - 0x3fff976fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/documentation.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/documentation.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/fill-out.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x336a6000 - 0x336c6fff 0x80000000 - 0x800bffff 0x155a5be000 - 0x155a5d8fff 0x155a5d9000 - 0x155a5d9fff 0x155a5da000 - 0x155a5dafff 0x155a5db000 - 0x155a5dcfff 0x155a5dd000 - 0x155a5defff 0x155a5df000 - 0x155a5e5fff 0x155a5e6000 - 0x155a5e6fff 0x155a5e7000 - 0x155a5e7fff 0x155a5e9000 - 0x155a5eafff 0x155a5eb000 - 0x155a629fff 0x155a62a000 - 0x155a62bfff 0x155a62c000 - 0x155a632fff 0x155a633000 - 0x155a633fff 0x155a634000 - 0x155a659fff 0x155a65a000 - 0x155a65dfff 0x155a65e000 - 0x155a65efff 0x155a65f000 - 0x155a660fff 0x155a661000 - 0x155a661fff 0x155a662000 - 0x155a662fff 0x155a663000 - 0x155a663fff 0x155a664000 - 0x155a667fff 0x155a668000 - 0x155a668fff 0x155a669000 - 0x155a669fff 0x155a66a000 - 0x155a66bfff 0x155a66c000 - 0x155a66cfff 0x155a66d000 - 0x155a66dfff 0x155a66e000 - 0x155a7d9fff 0x155a7da000 - 0x155a7dcfff 0x155a7dd000 - 0x155a7ddfff 0x155a7de000 - 0x155a7e0fff 0x155a7e1000 - 0x155a7f3fff 0x155a7f4000 - 0x155a7f4fff 0x155a7f5000 - 0x155a7f5fff 0x155a7f6000 - 0x155a913fff 0x155a914000 - 0x155a916fff 0x155a917000 - 0x155a919fff 0x155a91a000 - 0x155a91efff 0x155a91f000 - 0x155a973fff 0x155a974000 - 0x155b01efff 0x3ffff78000 - 0x3ffff98fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/fill-out.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/fill-out.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/disassem.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xd15c000 - 0xd17cfff 0x80000000 - 0x800bffff 0x156ad01000 - 0x156ad1bfff 0x156ad1c000 - 0x156ad1cfff 0x156ad1d000 - 0x156ad1dfff 0x156ad1e000 - 0x156ad1ffff 0x156ad20000 - 0x156ad21fff 0x156ad22000 - 0x156ad28fff 0x156ad29000 - 0x156ad29fff 0x156ad2a000 - 0x156ad2afff 0x156ad2c000 - 0x156ad2dfff 0x156ad2e000 - 0x156ad6cfff 0x156ad6d000 - 0x156ad6efff 0x156ad6f000 - 0x156ad75fff 0x156ad76000 - 0x156ad76fff 0x156ad77000 - 0x156ad9cfff 0x156ad9d000 - 0x156ada0fff 0x156ada1000 - 0x156ada1fff 0x156ada2000 - 0x156ada3fff 0x156ada4000 - 0x156ada4fff 0x156ada5000 - 0x156ada5fff 0x156ada6000 - 0x156ada6fff 0x156ada7000 - 0x156adaafff 0x156adab000 - 0x156adabfff 0x156adac000 - 0x156adacfff 0x156adad000 - 0x156adaefff 0x156adaf000 - 0x156adaffff 0x156adb0000 - 0x156adb0fff 0x156adb1000 - 0x156af1cfff 0x156af1d000 - 0x156af1ffff 0x156af20000 - 0x156af20fff 0x156af21000 - 0x156af23fff 0x156af24000 - 0x156af36fff 0x156af37000 - 0x156af37fff 0x156af38000 - 0x156af38fff 0x156af39000 - 0x156b056fff 0x156b057000 - 0x156b059fff 0x156b05a000 - 0x156b05cfff 0x156b05d000 - 0x156b061fff 0x156b062000 - 0x156b0b6fff 0x156b0b7000 - 0x156b761fff 0x3ffff25000 - 0x3ffff45fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/disassem.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/disassem.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/condition.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x24af000 - 0x24cffff 0x80000000 - 0x800bffff 0x157df20000 - 0x157df3afff 0x157df3b000 - 0x157df3bfff 0x157df3c000 - 0x157df3cfff 0x157df3d000 - 0x157df3efff 0x157df3f000 - 0x157df40fff 0x157df41000 - 0x157df47fff 0x157df48000 - 0x157df48fff 0x157df49000 - 0x157df49fff 0x157df4b000 - 0x157df4cfff 0x157df4d000 - 0x157df8bfff 0x157df8c000 - 0x157df8dfff 0x157df8e000 - 0x157df94fff 0x157df95000 - 0x157df95fff 0x157df96000 - 0x157dfbbfff 0x157dfbc000 - 0x157dfbffff 0x157dfc0000 - 0x157dfc0fff 0x157dfc1000 - 0x157dfc2fff 0x157dfc3000 - 0x157dfc3fff 0x157dfc4000 - 0x157dfc4fff 0x157dfc5000 - 0x157dfc5fff 0x157dfc6000 - 0x157dfc9fff 0x157dfca000 - 0x157dfcafff 0x157dfcb000 - 0x157dfcbfff 0x157dfcc000 - 0x157dfcdfff 0x157dfce000 - 0x157dfcefff 0x157dfcf000 - 0x157dfcffff 0x157dfd0000 - 0x157e13bfff 0x157e13c000 - 0x157e13efff 0x157e13f000 - 0x157e13ffff 0x157e140000 - 0x157e142fff 0x157e143000 - 0x157e155fff 0x157e156000 - 0x157e156fff 0x157e157000 - 0x157e157fff 0x157e158000 - 0x157e275fff 0x157e276000 - 0x157e278fff 0x157e279000 - 0x157e27bfff 0x157e27c000 - 0x157e280fff 0x157e281000 - 0x157e2d5fff 0x157e2d6000 - 0x157e980fff 0x3fff8c4000 - 0x3fff8e4fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/condition.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/condition.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/loadform.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x132e8000 - 0x13308fff 0x80000000 - 0x800bffff 0x157f28f000 - 0x157f2a9fff 0x157f2aa000 - 0x157f2aafff 0x157f2ab000 - 0x157f2abfff 0x157f2ac000 - 0x157f2adfff 0x157f2ae000 - 0x157f2affff 0x157f2b0000 - 0x157f2b6fff 0x157f2b7000 - 0x157f2b7fff 0x157f2b8000 - 0x157f2b8fff 0x157f2ba000 - 0x157f2bbfff 0x157f2bc000 - 0x157f2fafff 0x157f2fb000 - 0x157f2fcfff 0x157f2fd000 - 0x157f303fff 0x157f304000 - 0x157f304fff 0x157f305000 - 0x157f32afff 0x157f32b000 - 0x157f32efff 0x157f32f000 - 0x157f32ffff 0x157f330000 - 0x157f331fff 0x157f332000 - 0x157f332fff 0x157f333000 - 0x157f333fff 0x157f334000 - 0x157f334fff 0x157f335000 - 0x157f338fff 0x157f339000 - 0x157f339fff 0x157f33a000 - 0x157f33afff 0x157f33b000 - 0x157f33cfff 0x157f33d000 - 0x157f33dfff 0x157f33e000 - 0x157f33efff 0x157f33f000 - 0x157f4aafff 0x157f4ab000 - 0x157f4adfff 0x157f4ae000 - 0x157f4aefff 0x157f4af000 - 0x157f4b1fff 0x157f4b2000 - 0x157f4c4fff 0x157f4c5000 - 0x157f4c5fff 0x157f4c6000 - 0x157f4c6fff 0x157f4c7000 - 0x157f5e4fff 0x157f5e5000 - 0x157f5e7fff 0x157f5e8000 - 0x157f5eafff 0x157f5eb000 - 0x157f5effff 0x157f5f0000 - 0x157f644fff 0x157f645000 - 0x157fceffff 0x3fff81f000 - 0x3fff83ffff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/loadform.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/loadform.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/gstream.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x4395000 - 0x43b5fff 0x80000000 - 0x800bffff 0x158ac10000 - 0x158ac2afff 0x158ac2b000 - 0x158ac2bfff 0x158ac2c000 - 0x158ac2cfff 0x158ac2d000 - 0x158ac2efff 0x158ac2f000 - 0x158ac30fff 0x158ac31000 - 0x158ac37fff 0x158ac38000 - 0x158ac38fff 0x158ac39000 - 0x158ac39fff 0x158ac3b000 - 0x158ac3cfff 0x158ac3d000 - 0x158ac7bfff 0x158ac7c000 - 0x158ac7dfff 0x158ac7e000 - 0x158ac84fff 0x158ac85000 - 0x158ac85fff 0x158ac86000 - 0x158acabfff 0x158acac000 - 0x158acaffff 0x158acb0000 - 0x158acb0fff 0x158acb1000 - 0x158acb2fff 0x158acb3000 - 0x158acb3fff 0x158acb4000 - 0x158acb4fff 0x158acb5000 - 0x158acb5fff 0x158acb6000 - 0x158acb9fff 0x158acba000 - 0x158acbafff 0x158acbb000 - 0x158acbbfff 0x158acbc000 - 0x158acbdfff 0x158acbe000 - 0x158acbefff 0x158acbf000 - 0x158acbffff 0x158acc0000 - 0x158ae2bfff 0x158ae2c000 - 0x158ae2efff 0x158ae2f000 - 0x158ae2ffff 0x158ae30000 - 0x158ae32fff 0x158ae33000 - 0x158ae45fff 0x158ae46000 - 0x158ae46fff 0x158ae47000 - 0x158ae47fff 0x158ae48000 - 0x158af65fff 0x158af66000 - 0x158af68fff 0x158af69000 - 0x158af6bfff 0x158af6c000 - 0x158af70fff 0x158af71000 - 0x158afc5fff 0x158afc6000 - 0x158b670fff 0x3fffef0000 - 0x3ffff10fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gstream.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gstream.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/xcharin.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2bbc000 - 0x2bdcfff 0x80000000 - 0x800bffff 0x156b7eb000 - 0x156b805fff 0x156b806000 - 0x156b806fff 0x156b807000 - 0x156b807fff 0x156b808000 - 0x156b809fff 0x156b80a000 - 0x156b80bfff 0x156b80c000 - 0x156b812fff 0x156b813000 - 0x156b813fff 0x156b814000 - 0x156b814fff 0x156b816000 - 0x156b817fff 0x156b818000 - 0x156b856fff 0x156b857000 - 0x156b858fff 0x156b859000 - 0x156b85ffff 0x156b860000 - 0x156b860fff 0x156b861000 - 0x156b886fff 0x156b887000 - 0x156b88afff 0x156b88b000 - 0x156b88bfff 0x156b88c000 - 0x156b88dfff 0x156b88e000 - 0x156b88efff 0x156b88f000 - 0x156b88ffff 0x156b890000 - 0x156b890fff 0x156b891000 - 0x156b894fff 0x156b895000 - 0x156b895fff 0x156b896000 - 0x156b896fff 0x156b897000 - 0x156b898fff 0x156b899000 - 0x156b899fff 0x156b89a000 - 0x156b89afff 0x156b89b000 - 0x156ba06fff 0x156ba07000 - 0x156ba09fff 0x156ba0a000 - 0x156ba0afff 0x156ba0b000 - 0x156ba0dfff 0x156ba0e000 - 0x156ba20fff 0x156ba21000 - 0x156ba21fff 0x156ba22000 - 0x156ba22fff 0x156ba23000 - 0x156bb40fff 0x156bb41000 - 0x156bb43fff 0x156bb44000 - 0x156bb46fff 0x156bb47000 - 0x156bb4bfff 0x156bb4c000 - 0x156bba0fff 0x156bba1000 - 0x156c24bfff 0x3ffff92000 - 0x3ffffb2fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/xcharin.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/xcharin.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/keyboard.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x8977000 - 0x8997fff 0x80000000 - 0x800bffff 0x156b363000 - 0x156b37dfff 0x156b37e000 - 0x156b37efff 0x156b37f000 - 0x156b37ffff 0x156b380000 - 0x156b381fff 0x156b382000 - 0x156b383fff 0x156b384000 - 0x156b38afff 0x156b38b000 - 0x156b38bfff 0x156b38c000 - 0x156b38cfff 0x156b38e000 - 0x156b38ffff 0x156b390000 - 0x156b3cefff 0x156b3cf000 - 0x156b3d0fff 0x156b3d1000 - 0x156b3d7fff 0x156b3d8000 - 0x156b3d8fff 0x156b3d9000 - 0x156b3fefff 0x156b3ff000 - 0x156b402fff 0x156b403000 - 0x156b403fff 0x156b404000 - 0x156b405fff 0x156b406000 - 0x156b406fff 0x156b407000 - 0x156b407fff 0x156b408000 - 0x156b408fff 0x156b409000 - 0x156b40cfff 0x156b40d000 - 0x156b40dfff 0x156b40e000 - 0x156b40efff 0x156b40f000 - 0x156b410fff 0x156b411000 - 0x156b411fff 0x156b412000 - 0x156b412fff 0x156b413000 - 0x156b57efff 0x156b57f000 - 0x156b581fff 0x156b582000 - 0x156b582fff 0x156b583000 - 0x156b585fff 0x156b586000 - 0x156b598fff 0x156b599000 - 0x156b599fff 0x156b59a000 - 0x156b59afff 0x156b59b000 - 0x156b6b8fff 0x156b6b9000 - 0x156b6bbfff 0x156b6bc000 - 0x156b6befff 0x156b6bf000 - 0x156b6c3fff 0x156b6c4000 - 0x156b718fff 0x156b719000 - 0x156bdc3fff 0x3ffff14000 - 0x3ffff34fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/keyboard.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/keyboard.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/screen.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2ce75000 - 0x2ce95fff 0x80000000 - 0x800bffff 0x155f768000 - 0x155f782fff 0x155f783000 - 0x155f783fff 0x155f784000 - 0x155f784fff 0x155f785000 - 0x155f786fff 0x155f787000 - 0x155f788fff 0x155f789000 - 0x155f78ffff 0x155f790000 - 0x155f790fff 0x155f791000 - 0x155f791fff 0x155f793000 - 0x155f794fff 0x155f795000 - 0x155f7d3fff 0x155f7d4000 - 0x155f7d5fff 0x155f7d6000 - 0x155f7dcfff 0x155f7dd000 - 0x155f7ddfff 0x155f7de000 - 0x155f803fff 0x155f804000 - 0x155f807fff 0x155f808000 - 0x155f808fff 0x155f809000 - 0x155f80afff 0x155f80b000 - 0x155f80bfff 0x155f80c000 - 0x155f80cfff 0x155f80d000 - 0x155f80dfff 0x155f80e000 - 0x155f811fff 0x155f812000 - 0x155f812fff 0x155f813000 - 0x155f813fff 0x155f814000 - 0x155f815fff 0x155f816000 - 0x155f816fff 0x155f817000 - 0x155f817fff 0x155f818000 - 0x155f983fff 0x155f984000 - 0x155f986fff 0x155f987000 - 0x155f987fff 0x155f988000 - 0x155f98afff 0x155f98b000 - 0x155f99dfff 0x155f99e000 - 0x155f99efff 0x155f99f000 - 0x155f99ffff 0x155f9a0000 - 0x155fabdfff 0x155fabe000 - 0x155fac0fff 0x155fac1000 - 0x155fac3fff 0x155fac4000 - 0x155fac8fff 0x155fac9000 - 0x155fb1dfff 0x155fb1e000 - 0x15601c8fff 0x3fffd55000 - 0x3fffd75fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/screen.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/screen.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/runprog.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x4bec000 - 0x4c0cfff 0x80000000 - 0x800bffff 0x1558034000 - 0x155804efff 0x155804f000 - 0x155804ffff 0x1558050000 - 0x1558050fff 0x1558051000 - 0x1558052fff 0x1558053000 - 0x1558054fff 0x1558055000 - 0x155805bfff 0x155805c000 - 0x155805cfff 0x155805d000 - 0x155805dfff 0x155805f000 - 0x1558060fff 0x1558061000 - 0x155809ffff 0x15580a0000 - 0x15580a1fff 0x15580a2000 - 0x15580a8fff 0x15580a9000 - 0x15580a9fff 0x15580aa000 - 0x15580cffff 0x15580d0000 - 0x15580d3fff 0x15580d4000 - 0x15580d4fff 0x15580d5000 - 0x15580d6fff 0x15580d7000 - 0x15580d7fff 0x15580d8000 - 0x15580d8fff 0x15580d9000 - 0x15580d9fff 0x15580da000 - 0x15580ddfff 0x15580de000 - 0x15580defff 0x15580df000 - 0x15580dffff 0x15580e0000 - 0x15580e1fff 0x15580e2000 - 0x15580e2fff 0x15580e3000 - 0x15580e3fff 0x15580e4000 - 0x155824ffff 0x1558250000 - 0x1558252fff 0x1558253000 - 0x1558253fff 0x1558254000 - 0x1558256fff 0x1558257000 - 0x1558269fff 0x155826a000 - 0x155826afff 0x155826b000 - 0x155826bfff 0x155826c000 - 0x1558389fff 0x155838a000 - 0x155838cfff 0x155838d000 - 0x155838ffff 0x1558390000 - 0x1558394fff 0x1558395000 - 0x15583e9fff 0x15583ea000 - 0x1558a94fff 0x3fffea8000 - 0x3fffec8fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/runprog.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/runprog.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/query.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xd574000 - 0xd594fff 0x80000000 - 0x800bffff 0x156cbba000 - 0x156cbd4fff 0x156cbd5000 - 0x156cbd5fff 0x156cbd6000 - 0x156cbd6fff 0x156cbd7000 - 0x156cbd8fff 0x156cbd9000 - 0x156cbdafff 0x156cbdb000 - 0x156cbe1fff 0x156cbe2000 - 0x156cbe2fff 0x156cbe3000 - 0x156cbe3fff 0x156cbe5000 - 0x156cbe6fff 0x156cbe7000 - 0x156cc25fff 0x156cc26000 - 0x156cc27fff 0x156cc28000 - 0x156cc2efff 0x156cc2f000 - 0x156cc2ffff 0x156cc30000 - 0x156cc55fff 0x156cc56000 - 0x156cc59fff 0x156cc5a000 - 0x156cc5afff 0x156cc5b000 - 0x156cc5cfff 0x156cc5d000 - 0x156cc5dfff 0x156cc5e000 - 0x156cc5efff 0x156cc5f000 - 0x156cc5ffff 0x156cc60000 - 0x156cc63fff 0x156cc64000 - 0x156cc64fff 0x156cc65000 - 0x156cc65fff 0x156cc66000 - 0x156cc67fff 0x156cc68000 - 0x156cc68fff 0x156cc69000 - 0x156cc69fff 0x156cc6a000 - 0x156cdd5fff 0x156cdd6000 - 0x156cdd8fff 0x156cdd9000 - 0x156cdd9fff 0x156cdda000 - 0x156cddcfff 0x156cddd000 - 0x156cdeffff 0x156cdf0000 - 0x156cdf0fff 0x156cdf1000 - 0x156cdf1fff 0x156cdf2000 - 0x156cf0ffff 0x156cf10000 - 0x156cf12fff 0x156cf13000 - 0x156cf15fff 0x156cf16000 - 0x156cf1afff 0x156cf1b000 - 0x156cf6ffff 0x156cf70000 - 0x156d61afff 0x3fff905000 - 0x3fff925fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/query.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/query.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/reploop.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x6d4d000 - 0x6d6dfff 0x80000000 - 0x800bffff 0x1592f7f000 - 0x1592f99fff 0x1592f9a000 - 0x1592f9afff 0x1592f9b000 - 0x1592f9bfff 0x1592f9c000 - 0x1592f9dfff 0x1592f9e000 - 0x1592f9ffff 0x1592fa0000 - 0x1592fa6fff 0x1592fa7000 - 0x1592fa7fff 0x1592fa8000 - 0x1592fa8fff 0x1592faa000 - 0x1592fabfff 0x1592fac000 - 0x1592feafff 0x1592feb000 - 0x1592fecfff 0x1592fed000 - 0x1592ff3fff 0x1592ff4000 - 0x1592ff4fff 0x1592ff5000 - 0x159301afff 0x159301b000 - 0x159301efff 0x159301f000 - 0x159301ffff 0x1593020000 - 0x1593021fff 0x1593022000 - 0x1593022fff 0x1593023000 - 0x1593023fff 0x1593024000 - 0x1593024fff 0x1593025000 - 0x1593028fff 0x1593029000 - 0x1593029fff 0x159302a000 - 0x159302afff 0x159302b000 - 0x159302cfff 0x159302d000 - 0x159302dfff 0x159302e000 - 0x159302efff 0x159302f000 - 0x159319afff 0x159319b000 - 0x159319dfff 0x159319e000 - 0x159319efff 0x159319f000 - 0x15931a1fff 0x15931a2000 - 0x15931b4fff 0x15931b5000 - 0x15931b5fff 0x15931b6000 - 0x15931b6fff 0x15931b7000 - 0x15932d4fff 0x15932d5000 - 0x15932d7fff 0x15932d8000 - 0x15932dafff 0x15932db000 - 0x15932dffff 0x15932e0000 - 0x1593334fff 0x1593335000 - 0x15939dffff 0x3fffb18000 - 0x3fffb38fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/reploop.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/reploop.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/dribble.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3bcaa000 - 0x3bccafff 0x80000000 - 0x800bffff 0x155c6ff000 - 0x155c719fff 0x155c71a000 - 0x155c71afff 0x155c71b000 - 0x155c71bfff 0x155c71c000 - 0x155c71dfff 0x155c71e000 - 0x155c71ffff 0x155c720000 - 0x155c726fff 0x155c727000 - 0x155c727fff 0x155c728000 - 0x155c728fff 0x155c72a000 - 0x155c72bfff 0x155c72c000 - 0x155c76afff 0x155c76b000 - 0x155c76cfff 0x155c76d000 - 0x155c773fff 0x155c774000 - 0x155c774fff 0x155c775000 - 0x155c79afff 0x155c79b000 - 0x155c79efff 0x155c79f000 - 0x155c79ffff 0x155c7a0000 - 0x155c7a1fff 0x155c7a2000 - 0x155c7a2fff 0x155c7a3000 - 0x155c7a3fff 0x155c7a4000 - 0x155c7a4fff 0x155c7a5000 - 0x155c7a8fff 0x155c7a9000 - 0x155c7a9fff 0x155c7aa000 - 0x155c7aafff 0x155c7ab000 - 0x155c7acfff 0x155c7ad000 - 0x155c7adfff 0x155c7ae000 - 0x155c7aefff 0x155c7af000 - 0x155c91afff 0x155c91b000 - 0x155c91dfff 0x155c91e000 - 0x155c91efff 0x155c91f000 - 0x155c921fff 0x155c922000 - 0x155c934fff 0x155c935000 - 0x155c935fff 0x155c936000 - 0x155c936fff 0x155c937000 - 0x155ca54fff 0x155ca55000 - 0x155ca57fff 0x155ca58000 - 0x155ca5afff 0x155ca5b000 - 0x155ca5ffff 0x155ca60000 - 0x155cab4fff 0x155cab5000 - 0x155d15ffff 0x3fffcc8000 - 0x3fffce8fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/dribble.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dribble.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/complete.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x177d4000 - 0x177f4fff 0x80000000 - 0x800bffff 0x1588657000 - 0x1588671fff 0x1588672000 - 0x1588672fff 0x1588673000 - 0x1588673fff 0x1588674000 - 0x1588675fff 0x1588676000 - 0x1588677fff 0x1588678000 - 0x158867efff 0x158867f000 - 0x158867ffff 0x1588680000 - 0x1588680fff 0x1588682000 - 0x1588683fff 0x1588684000 - 0x15886c2fff 0x15886c3000 - 0x15886c4fff 0x15886c5000 - 0x15886cbfff 0x15886cc000 - 0x15886ccfff 0x15886cd000 - 0x15886f2fff 0x15886f3000 - 0x15886f6fff 0x15886f7000 - 0x15886f7fff 0x15886f8000 - 0x15886f9fff 0x15886fa000 - 0x15886fafff 0x15886fb000 - 0x15886fbfff 0x15886fc000 - 0x15886fcfff 0x15886fd000 - 0x1588700fff 0x1588701000 - 0x1588701fff 0x1588702000 - 0x1588702fff 0x1588703000 - 0x1588704fff 0x1588705000 - 0x1588705fff 0x1588706000 - 0x1588706fff 0x1588707000 - 0x1588872fff 0x1588873000 - 0x1588875fff 0x1588876000 - 0x1588876fff 0x1588877000 - 0x1588879fff 0x158887a000 - 0x158888cfff 0x158888d000 - 0x158888dfff 0x158888e000 - 0x158888efff 0x158888f000 - 0x15889acfff 0x15889ad000 - 0x15889affff 0x15889b0000 - 0x15889b2fff 0x15889b3000 - 0x15889b7fff 0x15889b8000 - 0x1588a0cfff 0x1588a0d000 - 0x15890b7fff 0x3fffa87000 - 0x3fffaa7fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/complete.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/complete.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/pprint.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xe0c2000 - 0xe0e2fff 0x80000000 - 0x800bffff 0x157b1fa000 - 0x157b214fff 0x157b215000 - 0x157b215fff 0x157b216000 - 0x157b216fff 0x157b217000 - 0x157b218fff 0x157b219000 - 0x157b21afff 0x157b21b000 - 0x157b221fff 0x157b222000 - 0x157b222fff 0x157b223000 - 0x157b223fff 0x157b225000 - 0x157b226fff 0x157b227000 - 0x157b265fff 0x157b266000 - 0x157b267fff 0x157b268000 - 0x157b26efff 0x157b26f000 - 0x157b26ffff 0x157b270000 - 0x157b295fff 0x157b296000 - 0x157b299fff 0x157b29a000 - 0x157b29afff 0x157b29b000 - 0x157b29cfff 0x157b29d000 - 0x157b29dfff 0x157b29e000 - 0x157b29efff 0x157b29f000 - 0x157b29ffff 0x157b2a0000 - 0x157b2a3fff 0x157b2a4000 - 0x157b2a4fff 0x157b2a5000 - 0x157b2a5fff 0x157b2a6000 - 0x157b2a7fff 0x157b2a8000 - 0x157b2a8fff 0x157b2a9000 - 0x157b2a9fff 0x157b2aa000 - 0x157b415fff 0x157b416000 - 0x157b418fff 0x157b419000 - 0x157b419fff 0x157b41a000 - 0x157b41cfff 0x157b41d000 - 0x157b42ffff 0x157b430000 - 0x157b430fff 0x157b431000 - 0x157b431fff 0x157b432000 - 0x157b54ffff 0x157b550000 - 0x157b552fff 0x157b553000 - 0x157b555fff 0x157b556000 - 0x157b55afff 0x157b55b000 - 0x157b5affff 0x157b5b0000 - 0x157bc5afff 0x3fff7fc000 - 0x3fff81cfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/pprint.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pprint.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/describe.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x220e000 - 0x222efff 0x80000000 - 0x800bffff 0x1594925000 - 0x159493ffff 0x1594940000 - 0x1594940fff 0x1594941000 - 0x1594941fff 0x1594942000 - 0x1594943fff 0x1594944000 - 0x1594945fff 0x1594946000 - 0x159494cfff 0x159494d000 - 0x159494dfff 0x159494e000 - 0x159494efff 0x1594950000 - 0x1594951fff 0x1594952000 - 0x1594990fff 0x1594991000 - 0x1594992fff 0x1594993000 - 0x1594999fff 0x159499a000 - 0x159499afff 0x159499b000 - 0x15949c0fff 0x15949c1000 - 0x15949c4fff 0x15949c5000 - 0x15949c5fff 0x15949c6000 - 0x15949c7fff 0x15949c8000 - 0x15949c8fff 0x15949c9000 - 0x15949c9fff 0x15949ca000 - 0x15949cafff 0x15949cb000 - 0x15949cefff 0x15949cf000 - 0x15949cffff 0x15949d0000 - 0x15949d0fff 0x15949d1000 - 0x15949d2fff 0x15949d3000 - 0x15949d3fff 0x15949d4000 - 0x15949d4fff 0x15949d5000 - 0x1594b40fff 0x1594b41000 - 0x1594b43fff 0x1594b44000 - 0x1594b44fff 0x1594b45000 - 0x1594b47fff 0x1594b48000 - 0x1594b5afff 0x1594b5b000 - 0x1594b5bfff 0x1594b5c000 - 0x1594b5cfff 0x1594b5d000 - 0x1594c7afff 0x1594c7b000 - 0x1594c7dfff 0x1594c7e000 - 0x1594c80fff 0x1594c81000 - 0x1594c85fff 0x1594c86000 - 0x1594cdafff 0x1594cdb000 - 0x1595385fff 0x3fff9dd000 - 0x3fff9fdfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/describe.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/describe.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/room.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3a2e4000 - 0x3a304fff 0x80000000 - 0x800bffff 0x1585912000 - 0x158592cfff 0x158592d000 - 0x158592dfff 0x158592e000 - 0x158592efff 0x158592f000 - 0x1585930fff 0x1585931000 - 0x1585932fff 0x1585933000 - 0x1585939fff 0x158593a000 - 0x158593afff 0x158593b000 - 0x158593bfff 0x158593d000 - 0x158593efff 0x158593f000 - 0x158597dfff 0x158597e000 - 0x158597ffff 0x1585980000 - 0x1585986fff 0x1585987000 - 0x1585987fff 0x1585988000 - 0x15859adfff 0x15859ae000 - 0x15859b1fff 0x15859b2000 - 0x15859b2fff 0x15859b3000 - 0x15859b4fff 0x15859b5000 - 0x15859b5fff 0x15859b6000 - 0x15859b6fff 0x15859b7000 - 0x15859b7fff 0x15859b8000 - 0x15859bbfff 0x15859bc000 - 0x15859bcfff 0x15859bd000 - 0x15859bdfff 0x15859be000 - 0x15859bffff 0x15859c0000 - 0x15859c0fff 0x15859c1000 - 0x15859c1fff 0x15859c2000 - 0x1585b2dfff 0x1585b2e000 - 0x1585b30fff 0x1585b31000 - 0x1585b31fff 0x1585b32000 - 0x1585b34fff 0x1585b35000 - 0x1585b47fff 0x1585b48000 - 0x1585b48fff 0x1585b49000 - 0x1585b49fff 0x1585b4a000 - 0x1585c67fff 0x1585c68000 - 0x1585c6afff 0x1585c6b000 - 0x1585c6dfff 0x1585c6e000 - 0x1585c72fff 0x1585c73000 - 0x1585cc7fff 0x1585cc8000 - 0x1586372fff 0x3fff8b3000 - 0x3fff8d3fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/room.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/room.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/edit.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xa041000 - 0xa061fff 0x80000000 - 0x800bffff 0x158cbab000 - 0x158cbc5fff 0x158cbc6000 - 0x158cbc6fff 0x158cbc7000 - 0x158cbc7fff 0x158cbc8000 - 0x158cbc9fff 0x158cbca000 - 0x158cbcbfff 0x158cbcc000 - 0x158cbd2fff 0x158cbd3000 - 0x158cbd3fff 0x158cbd4000 - 0x158cbd4fff 0x158cbd6000 - 0x158cbd7fff 0x158cbd8000 - 0x158cc16fff 0x158cc17000 - 0x158cc18fff 0x158cc19000 - 0x158cc1ffff 0x158cc20000 - 0x158cc20fff 0x158cc21000 - 0x158cc46fff 0x158cc47000 - 0x158cc4afff 0x158cc4b000 - 0x158cc4bfff 0x158cc4c000 - 0x158cc4dfff 0x158cc4e000 - 0x158cc4efff 0x158cc4f000 - 0x158cc4ffff 0x158cc50000 - 0x158cc50fff 0x158cc51000 - 0x158cc54fff 0x158cc55000 - 0x158cc55fff 0x158cc56000 - 0x158cc56fff 0x158cc57000 - 0x158cc58fff 0x158cc59000 - 0x158cc59fff 0x158cc5a000 - 0x158cc5afff 0x158cc5b000 - 0x158cdc6fff 0x158cdc7000 - 0x158cdc9fff 0x158cdca000 - 0x158cdcafff 0x158cdcb000 - 0x158cdcdfff 0x158cdce000 - 0x158cde0fff 0x158cde1000 - 0x158cde1fff 0x158cde2000 - 0x158cde2fff 0x158cde3000 - 0x158cf00fff 0x158cf01000 - 0x158cf03fff 0x158cf04000 - 0x158cf06fff 0x158cf07000 - 0x158cf0bfff 0x158cf0c000 - 0x158cf60fff 0x158cf61000 - 0x158d60bfff 0x3fffed2000 - 0x3fffef2fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/edit.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/edit.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/macros3.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x209fa000 - 0x20a1afff 0x80000000 - 0x800bffff 0x1567cbf000 - 0x1567cd9fff 0x1567cda000 - 0x1567cdafff 0x1567cdb000 - 0x1567cdbfff 0x1567cdc000 - 0x1567cddfff 0x1567cde000 - 0x1567cdffff 0x1567ce0000 - 0x1567ce6fff 0x1567ce7000 - 0x1567ce7fff 0x1567ce8000 - 0x1567ce8fff 0x1567cea000 - 0x1567cebfff 0x1567cec000 - 0x1567d2afff 0x1567d2b000 - 0x1567d2cfff 0x1567d2d000 - 0x1567d33fff 0x1567d34000 - 0x1567d34fff 0x1567d35000 - 0x1567d5afff 0x1567d5b000 - 0x1567d5efff 0x1567d5f000 - 0x1567d5ffff 0x1567d60000 - 0x1567d61fff 0x1567d62000 - 0x1567d62fff 0x1567d63000 - 0x1567d63fff 0x1567d64000 - 0x1567d64fff 0x1567d65000 - 0x1567d68fff 0x1567d69000 - 0x1567d69fff 0x1567d6a000 - 0x1567d6afff 0x1567d6b000 - 0x1567d6cfff 0x1567d6d000 - 0x1567d6dfff 0x1567d6e000 - 0x1567d6efff 0x1567d6f000 - 0x1567edafff 0x1567edb000 - 0x1567eddfff 0x1567ede000 - 0x1567edefff 0x1567edf000 - 0x1567ee1fff 0x1567ee2000 - 0x1567ef4fff 0x1567ef5000 - 0x1567ef5fff 0x1567ef6000 - 0x1567ef6fff 0x1567ef7000 - 0x1568014fff 0x1568015000 - 0x1568017fff 0x1568018000 - 0x156801afff 0x156801b000 - 0x156801ffff 0x1568020000 - 0x1568074fff 0x1568075000 - 0x156871ffff 0x3fffdac000 - 0x3fffdccfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/macros3.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/macros3.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/clhs.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x11de000 - 0x11fefff 0x80000000 - 0x800bffff 0x1584e3c000 - 0x1584e56fff 0x1584e57000 - 0x1584e57fff 0x1584e58000 - 0x1584e58fff 0x1584e59000 - 0x1584e5afff 0x1584e5b000 - 0x1584e5cfff 0x1584e5d000 - 0x1584e63fff 0x1584e64000 - 0x1584e64fff 0x1584e65000 - 0x1584e65fff 0x1584e67000 - 0x1584e68fff 0x1584e69000 - 0x1584ea7fff 0x1584ea8000 - 0x1584ea9fff 0x1584eaa000 - 0x1584eb0fff 0x1584eb1000 - 0x1584eb1fff 0x1584eb2000 - 0x1584ed7fff 0x1584ed8000 - 0x1584edbfff 0x1584edc000 - 0x1584edcfff 0x1584edd000 - 0x1584edefff 0x1584edf000 - 0x1584edffff 0x1584ee0000 - 0x1584ee0fff 0x1584ee1000 - 0x1584ee1fff 0x1584ee2000 - 0x1584ee5fff 0x1584ee6000 - 0x1584ee6fff 0x1584ee7000 - 0x1584ee7fff 0x1584ee8000 - 0x1584ee9fff 0x1584eea000 - 0x1584eeafff 0x1584eeb000 - 0x1584eebfff 0x1584eec000 - 0x1585057fff 0x1585058000 - 0x158505afff 0x158505b000 - 0x158505bfff 0x158505c000 - 0x158505efff 0x158505f000 - 0x1585071fff 0x1585072000 - 0x1585072fff 0x1585073000 - 0x1585073fff 0x1585074000 - 0x1585191fff 0x1585192000 - 0x1585194fff 0x1585195000 - 0x1585197fff 0x1585198000 - 0x158519cfff 0x158519d000 - 0x15851f1fff 0x15851f2000 - 0x158589cfff 0x3fffd93000 - 0x3fffdb3fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clhs.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clhs.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/inspect.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x4d3a000 - 0x4d5afff 0x80000000 - 0x800bffff 0x1590a23000 - 0x1590a3dfff 0x1590a3e000 - 0x1590a3efff 0x1590a3f000 - 0x1590a3ffff 0x1590a40000 - 0x1590a41fff 0x1590a42000 - 0x1590a43fff 0x1590a44000 - 0x1590a4afff 0x1590a4b000 - 0x1590a4bfff 0x1590a4c000 - 0x1590a4cfff 0x1590a4e000 - 0x1590a4ffff 0x1590a50000 - 0x1590a8efff 0x1590a8f000 - 0x1590a90fff 0x1590a91000 - 0x1590a97fff 0x1590a98000 - 0x1590a98fff 0x1590a99000 - 0x1590abefff 0x1590abf000 - 0x1590ac2fff 0x1590ac3000 - 0x1590ac3fff 0x1590ac4000 - 0x1590ac5fff 0x1590ac6000 - 0x1590ac6fff 0x1590ac7000 - 0x1590ac7fff 0x1590ac8000 - 0x1590ac8fff 0x1590ac9000 - 0x1590accfff 0x1590acd000 - 0x1590acdfff 0x1590ace000 - 0x1590acefff 0x1590acf000 - 0x1590ad0fff 0x1590ad1000 - 0x1590ad1fff 0x1590ad2000 - 0x1590ad2fff 0x1590ad3000 - 0x1590c3efff 0x1590c3f000 - 0x1590c41fff 0x1590c42000 - 0x1590c42fff 0x1590c43000 - 0x1590c45fff 0x1590c46000 - 0x1590c58fff 0x1590c59000 - 0x1590c59fff 0x1590c5a000 - 0x1590c5afff 0x1590c5b000 - 0x1590d78fff 0x1590d79000 - 0x1590d7bfff 0x1590d7c000 - 0x1590d7efff 0x1590d7f000 - 0x1590d83fff 0x1590d84000 - 0x1590dd8fff 0x1590dd9000 - 0x1591483fff 0x3fffabe000 - 0x3fffadefff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/inspect.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/inspect.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/gray.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x5682000 - 0x56a2fff 0x80000000 - 0x800bffff 0x1595248000 - 0x1595262fff 0x1595263000 - 0x1595263fff 0x1595264000 - 0x1595264fff 0x1595265000 - 0x1595266fff 0x1595267000 - 0x1595268fff 0x1595269000 - 0x159526ffff 0x1595270000 - 0x1595270fff 0x1595271000 - 0x1595271fff 0x1595273000 - 0x1595274fff 0x1595275000 - 0x15952b3fff 0x15952b4000 - 0x15952b5fff 0x15952b6000 - 0x15952bcfff 0x15952bd000 - 0x15952bdfff 0x15952be000 - 0x15952e3fff 0x15952e4000 - 0x15952e7fff 0x15952e8000 - 0x15952e8fff 0x15952e9000 - 0x15952eafff 0x15952eb000 - 0x15952ebfff 0x15952ec000 - 0x15952ecfff 0x15952ed000 - 0x15952edfff 0x15952ee000 - 0x15952f1fff 0x15952f2000 - 0x15952f2fff 0x15952f3000 - 0x15952f3fff 0x15952f4000 - 0x15952f5fff 0x15952f6000 - 0x15952f6fff 0x15952f7000 - 0x15952f7fff 0x15952f8000 - 0x1595463fff 0x1595464000 - 0x1595466fff 0x1595467000 - 0x1595467fff 0x1595468000 - 0x159546afff 0x159546b000 - 0x159547dfff 0x159547e000 - 0x159547efff 0x159547f000 - 0x159547ffff 0x1595480000 - 0x159559dfff 0x159559e000 - 0x15955a0fff 0x15955a1000 - 0x15955a3fff 0x15955a4000 - 0x15955a8fff 0x15955a9000 - 0x15955fdfff 0x15955fe000 - 0x1595ca8fff 0x3fffc69000 - 0x3fffc89fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gray.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gray.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/case-sensitive.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2cfe0000 - 0x2d000fff 0x80000000 - 0x800bffff 0x155c711000 - 0x155c72bfff 0x155c72c000 - 0x155c72cfff 0x155c72d000 - 0x155c72dfff 0x155c72e000 - 0x155c72ffff 0x155c730000 - 0x155c731fff 0x155c732000 - 0x155c738fff 0x155c739000 - 0x155c739fff 0x155c73a000 - 0x155c73afff 0x155c73c000 - 0x155c73dfff 0x155c73e000 - 0x155c77cfff 0x155c77d000 - 0x155c77efff 0x155c77f000 - 0x155c785fff 0x155c786000 - 0x155c786fff 0x155c787000 - 0x155c7acfff 0x155c7ad000 - 0x155c7b0fff 0x155c7b1000 - 0x155c7b1fff 0x155c7b2000 - 0x155c7b3fff 0x155c7b4000 - 0x155c7b4fff 0x155c7b5000 - 0x155c7b5fff 0x155c7b6000 - 0x155c7b6fff 0x155c7b7000 - 0x155c7bafff 0x155c7bb000 - 0x155c7bbfff 0x155c7bc000 - 0x155c7bcfff 0x155c7bd000 - 0x155c7befff 0x155c7bf000 - 0x155c7bffff 0x155c7c0000 - 0x155c7c0fff 0x155c7c1000 - 0x155c92cfff 0x155c92d000 - 0x155c92ffff 0x155c930000 - 0x155c930fff 0x155c931000 - 0x155c933fff 0x155c934000 - 0x155c946fff 0x155c947000 - 0x155c947fff 0x155c948000 - 0x155c948fff 0x155c949000 - 0x155ca66fff 0x155ca67000 - 0x155ca69fff 0x155ca6a000 - 0x155ca6cfff 0x155ca6d000 - 0x155ca71fff 0x155ca72000 - 0x155cac6fff 0x155cac7000 - 0x155d171fff 0x3fffdeb000 - 0x3fffe0bfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/case-sensitive.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/case-sensitive.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/foreign1.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1c0d000 - 0x1c2dfff 0x80000000 - 0x800bffff 0x158d5d6000 - 0x158d5f0fff 0x158d5f1000 - 0x158d5f1fff 0x158d5f2000 - 0x158d5f2fff 0x158d5f3000 - 0x158d5f4fff 0x158d5f5000 - 0x158d5f6fff 0x158d5f7000 - 0x158d5fdfff 0x158d5fe000 - 0x158d5fefff 0x158d5ff000 - 0x158d5fffff 0x158d601000 - 0x158d602fff 0x158d603000 - 0x158d641fff 0x158d642000 - 0x158d643fff 0x158d644000 - 0x158d64afff 0x158d64b000 - 0x158d64bfff 0x158d64c000 - 0x158d671fff 0x158d672000 - 0x158d675fff 0x158d676000 - 0x158d676fff 0x158d677000 - 0x158d678fff 0x158d679000 - 0x158d679fff 0x158d67a000 - 0x158d67afff 0x158d67b000 - 0x158d67bfff 0x158d67c000 - 0x158d67ffff 0x158d680000 - 0x158d680fff 0x158d681000 - 0x158d681fff 0x158d682000 - 0x158d683fff 0x158d684000 - 0x158d684fff 0x158d685000 - 0x158d685fff 0x158d686000 - 0x158d7f1fff 0x158d7f2000 - 0x158d7f4fff 0x158d7f5000 - 0x158d7f5fff 0x158d7f6000 - 0x158d7f8fff 0x158d7f9000 - 0x158d80bfff 0x158d80c000 - 0x158d80cfff 0x158d80d000 - 0x158d80dfff 0x158d80e000 - 0x158d92bfff 0x158d92c000 - 0x158d92efff 0x158d92f000 - 0x158d931fff 0x158d932000 - 0x158d936fff 0x158d937000 - 0x158d98bfff 0x158d98c000 - 0x158e036fff 0x3fffa7c000 - 0x3fffa9cfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/foreign1.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/foreign1.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/exporting.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x33de1000 - 0x33e01fff 0x80000000 - 0x800bffff 0x159454d000 - 0x1594567fff 0x1594568000 - 0x1594568fff 0x1594569000 - 0x1594569fff 0x159456a000 - 0x159456bfff 0x159456c000 - 0x159456dfff 0x159456e000 - 0x1594574fff 0x1594575000 - 0x1594575fff 0x1594576000 - 0x1594576fff 0x1594578000 - 0x1594579fff 0x159457a000 - 0x15945b8fff 0x15945b9000 - 0x15945bafff 0x15945bb000 - 0x15945c1fff 0x15945c2000 - 0x15945c2fff 0x15945c3000 - 0x15945e8fff 0x15945e9000 - 0x15945ecfff 0x15945ed000 - 0x15945edfff 0x15945ee000 - 0x15945effff 0x15945f0000 - 0x15945f0fff 0x15945f1000 - 0x15945f1fff 0x15945f2000 - 0x15945f2fff 0x15945f3000 - 0x15945f6fff 0x15945f7000 - 0x15945f7fff 0x15945f8000 - 0x15945f8fff 0x15945f9000 - 0x15945fafff 0x15945fb000 - 0x15945fbfff 0x15945fc000 - 0x15945fcfff 0x15945fd000 - 0x1594768fff 0x1594769000 - 0x159476bfff 0x159476c000 - 0x159476cfff 0x159476d000 - 0x159476ffff 0x1594770000 - 0x1594782fff 0x1594783000 - 0x1594783fff 0x1594784000 - 0x1594784fff 0x1594785000 - 0x15948a2fff 0x15948a3000 - 0x15948a5fff 0x15948a6000 - 0x15948a8fff 0x15948a9000 - 0x15948adfff 0x15948ae000 - 0x1594902fff 0x1594903000 - 0x1594fadfff 0x3fffa3f000 - 0x3fffa5ffff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/exporting.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/exporting.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/german.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xadce000 - 0xadeefff 0x80000000 - 0x800bffff 0x1577256000 - 0x1577270fff 0x1577271000 - 0x1577271fff 0x1577272000 - 0x1577272fff 0x1577273000 - 0x1577274fff 0x1577275000 - 0x1577276fff 0x1577277000 - 0x157727dfff 0x157727e000 - 0x157727efff 0x157727f000 - 0x157727ffff 0x1577281000 - 0x1577282fff 0x1577283000 - 0x15772c1fff 0x15772c2000 - 0x15772c3fff 0x15772c4000 - 0x15772cafff 0x15772cb000 - 0x15772cbfff 0x15772cc000 - 0x15772f1fff 0x15772f2000 - 0x15772f5fff 0x15772f6000 - 0x15772f6fff 0x15772f7000 - 0x15772f8fff 0x15772f9000 - 0x15772f9fff 0x15772fa000 - 0x15772fafff 0x15772fb000 - 0x15772fbfff 0x15772fc000 - 0x15772fffff 0x1577300000 - 0x1577300fff 0x1577301000 - 0x1577301fff 0x1577302000 - 0x1577303fff 0x1577304000 - 0x1577304fff 0x1577305000 - 0x1577305fff 0x1577306000 - 0x1577471fff 0x1577472000 - 0x1577474fff 0x1577475000 - 0x1577475fff 0x1577476000 - 0x1577478fff 0x1577479000 - 0x157748bfff 0x157748c000 - 0x157748cfff 0x157748d000 - 0x157748dfff 0x157748e000 - 0x15775abfff 0x15775ac000 - 0x15775aefff 0x15775af000 - 0x15775b1fff 0x15775b2000 - 0x15775b6fff 0x15775b7000 - 0x157760bfff 0x157760c000 - 0x1577cb6fff 0x3fff9cb000 - 0x3fff9ebfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/german.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/german.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/french.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xdf51000 - 0xdf71fff 0x80000000 - 0x800bffff 0x156eb0a000 - 0x156eb24fff 0x156eb25000 - 0x156eb25fff 0x156eb26000 - 0x156eb26fff 0x156eb27000 - 0x156eb28fff 0x156eb29000 - 0x156eb2afff 0x156eb2b000 - 0x156eb31fff 0x156eb32000 - 0x156eb32fff 0x156eb33000 - 0x156eb33fff 0x156eb35000 - 0x156eb36fff 0x156eb37000 - 0x156eb75fff 0x156eb76000 - 0x156eb77fff 0x156eb78000 - 0x156eb7efff 0x156eb7f000 - 0x156eb7ffff 0x156eb80000 - 0x156eba5fff 0x156eba6000 - 0x156eba9fff 0x156ebaa000 - 0x156ebaafff 0x156ebab000 - 0x156ebacfff 0x156ebad000 - 0x156ebadfff 0x156ebae000 - 0x156ebaefff 0x156ebaf000 - 0x156ebaffff 0x156ebb0000 - 0x156ebb3fff 0x156ebb4000 - 0x156ebb4fff 0x156ebb5000 - 0x156ebb5fff 0x156ebb6000 - 0x156ebb7fff 0x156ebb8000 - 0x156ebb8fff 0x156ebb9000 - 0x156ebb9fff 0x156ebba000 - 0x156ed25fff 0x156ed26000 - 0x156ed28fff 0x156ed29000 - 0x156ed29fff 0x156ed2a000 - 0x156ed2cfff 0x156ed2d000 - 0x156ed3ffff 0x156ed40000 - 0x156ed40fff 0x156ed41000 - 0x156ed41fff 0x156ed42000 - 0x156ee5ffff 0x156ee60000 - 0x156ee62fff 0x156ee63000 - 0x156ee65fff 0x156ee66000 - 0x156ee6afff 0x156ee6b000 - 0x156eebffff 0x156eec0000 - 0x156f56afff 0x3fffd2a000 - 0x3fffd4afff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/french.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/french.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/spanish.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x37c47000 - 0x37c67fff 0x80000000 - 0x800bffff 0x1584256000 - 0x1584270fff 0x1584271000 - 0x1584271fff 0x1584272000 - 0x1584272fff 0x1584273000 - 0x1584274fff 0x1584275000 - 0x1584276fff 0x1584277000 - 0x158427dfff 0x158427e000 - 0x158427efff 0x158427f000 - 0x158427ffff 0x1584281000 - 0x1584282fff 0x1584283000 - 0x15842c1fff 0x15842c2000 - 0x15842c3fff 0x15842c4000 - 0x15842cafff 0x15842cb000 - 0x15842cbfff 0x15842cc000 - 0x15842f1fff 0x15842f2000 - 0x15842f5fff 0x15842f6000 - 0x15842f6fff 0x15842f7000 - 0x15842f8fff 0x15842f9000 - 0x15842f9fff 0x15842fa000 - 0x15842fafff 0x15842fb000 - 0x15842fbfff 0x15842fc000 - 0x15842fffff 0x1584300000 - 0x1584300fff 0x1584301000 - 0x1584301fff 0x1584302000 - 0x1584303fff 0x1584304000 - 0x1584304fff 0x1584305000 - 0x1584305fff 0x1584306000 - 0x1584471fff 0x1584472000 - 0x1584474fff 0x1584475000 - 0x1584475fff 0x1584476000 - 0x1584478fff 0x1584479000 - 0x158448bfff 0x158448c000 - 0x158448cfff 0x158448d000 - 0x158448dfff 0x158448e000 - 0x15845abfff 0x15845ac000 - 0x15845aefff 0x15845af000 - 0x15845b1fff 0x15845b2000 - 0x15845b6fff 0x15845b7000 - 0x158460bfff 0x158460c000 - 0x1584cb6fff 0x3fffe4d000 - 0x3fffe6dfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/spanish.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/spanish.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/russian.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x10eb1000 - 0x10ed1fff 0x80000000 - 0x800bffff 0x1583478000 - 0x1583492fff 0x1583493000 - 0x1583493fff 0x1583494000 - 0x1583494fff 0x1583495000 - 0x1583496fff 0x1583497000 - 0x1583498fff 0x1583499000 - 0x158349ffff 0x15834a0000 - 0x15834a0fff 0x15834a1000 - 0x15834a1fff 0x15834a3000 - 0x15834a4fff 0x15834a5000 - 0x15834e3fff 0x15834e4000 - 0x15834e5fff 0x15834e6000 - 0x15834ecfff 0x15834ed000 - 0x15834edfff 0x15834ee000 - 0x1583513fff 0x1583514000 - 0x1583517fff 0x1583518000 - 0x1583518fff 0x1583519000 - 0x158351afff 0x158351b000 - 0x158351bfff 0x158351c000 - 0x158351cfff 0x158351d000 - 0x158351dfff 0x158351e000 - 0x1583521fff 0x1583522000 - 0x1583522fff 0x1583523000 - 0x1583523fff 0x1583524000 - 0x1583525fff 0x1583526000 - 0x1583526fff 0x1583527000 - 0x1583527fff 0x1583528000 - 0x1583693fff 0x1583694000 - 0x1583696fff 0x1583697000 - 0x1583697fff 0x1583698000 - 0x158369afff 0x158369b000 - 0x15836adfff 0x15836ae000 - 0x15836aefff 0x15836af000 - 0x15836affff 0x15836b0000 - 0x15837cdfff 0x15837ce000 - 0x15837d0fff 0x15837d1000 - 0x15837d3fff 0x15837d4000 - 0x15837d8fff 0x15837d9000 - 0x158382dfff 0x158382e000 - 0x1583ed8fff 0x3fffa28000 - 0x3fffa48fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/russian.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/russian.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/danish.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x16f9b000 - 0x16fbbfff 0x80000000 - 0x800bffff 0x1583c7b000 - 0x1583c95fff 0x1583c96000 - 0x1583c96fff 0x1583c97000 - 0x1583c97fff 0x1583c98000 - 0x1583c99fff 0x1583c9a000 - 0x1583c9bfff 0x1583c9c000 - 0x1583ca2fff 0x1583ca3000 - 0x1583ca3fff 0x1583ca4000 - 0x1583ca4fff 0x1583ca6000 - 0x1583ca7fff 0x1583ca8000 - 0x1583ce6fff 0x1583ce7000 - 0x1583ce8fff 0x1583ce9000 - 0x1583ceffff 0x1583cf0000 - 0x1583cf0fff 0x1583cf1000 - 0x1583d16fff 0x1583d17000 - 0x1583d1afff 0x1583d1b000 - 0x1583d1bfff 0x1583d1c000 - 0x1583d1dfff 0x1583d1e000 - 0x1583d1efff 0x1583d1f000 - 0x1583d1ffff 0x1583d20000 - 0x1583d20fff 0x1583d21000 - 0x1583d24fff 0x1583d25000 - 0x1583d25fff 0x1583d26000 - 0x1583d26fff 0x1583d27000 - 0x1583d28fff 0x1583d29000 - 0x1583d29fff 0x1583d2a000 - 0x1583d2afff 0x1583d2b000 - 0x1583e96fff 0x1583e97000 - 0x1583e99fff 0x1583e9a000 - 0x1583e9afff 0x1583e9b000 - 0x1583e9dfff 0x1583e9e000 - 0x1583eb0fff 0x1583eb1000 - 0x1583eb1fff 0x1583eb2000 - 0x1583eb2fff 0x1583eb3000 - 0x1583fd0fff 0x1583fd1000 - 0x1583fd3fff 0x1583fd4000 - 0x1583fd6fff 0x1583fd7000 - 0x1583fdbfff 0x1583fdc000 - 0x1584030fff 0x1584031000 - 0x15846dbfff 0x3fffb17000 - 0x3fffb37fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/danish.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/danish.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/dutch.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1b76f000 - 0x1b78ffff 0x80000000 - 0x800bffff 0x157d91f000 - 0x157d939fff 0x157d93a000 - 0x157d93afff 0x157d93b000 - 0x157d93bfff 0x157d93c000 - 0x157d93dfff 0x157d93e000 - 0x157d93ffff 0x157d940000 - 0x157d946fff 0x157d947000 - 0x157d947fff 0x157d948000 - 0x157d948fff 0x157d94a000 - 0x157d94bfff 0x157d94c000 - 0x157d98afff 0x157d98b000 - 0x157d98cfff 0x157d98d000 - 0x157d993fff 0x157d994000 - 0x157d994fff 0x157d995000 - 0x157d9bafff 0x157d9bb000 - 0x157d9befff 0x157d9bf000 - 0x157d9bffff 0x157d9c0000 - 0x157d9c1fff 0x157d9c2000 - 0x157d9c2fff 0x157d9c3000 - 0x157d9c3fff 0x157d9c4000 - 0x157d9c4fff 0x157d9c5000 - 0x157d9c8fff 0x157d9c9000 - 0x157d9c9fff 0x157d9ca000 - 0x157d9cafff 0x157d9cb000 - 0x157d9ccfff 0x157d9cd000 - 0x157d9cdfff 0x157d9ce000 - 0x157d9cefff 0x157d9cf000 - 0x157db3afff 0x157db3b000 - 0x157db3dfff 0x157db3e000 - 0x157db3efff 0x157db3f000 - 0x157db41fff 0x157db42000 - 0x157db54fff 0x157db55000 - 0x157db55fff 0x157db56000 - 0x157db56fff 0x157db57000 - 0x157dc74fff 0x157dc75000 - 0x157dc77fff 0x157dc78000 - 0x157dc7afff 0x157dc7b000 - 0x157dc7ffff 0x157dc80000 - 0x157dcd4fff 0x157dcd5000 - 0x157e37ffff 0x3fffd8e000 - 0x3fffdaefff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/dutch.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dutch.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c ../src/deprecated.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1f364000 - 0x1f384fff 0x80000000 - 0x800bffff 0x155d574000 - 0x155d58efff 0x155d58f000 - 0x155d58ffff 0x155d590000 - 0x155d590fff 0x155d591000 - 0x155d592fff 0x155d593000 - 0x155d594fff 0x155d595000 - 0x155d59bfff 0x155d59c000 - 0x155d59cfff 0x155d59d000 - 0x155d59dfff 0x155d59f000 - 0x155d5a0fff 0x155d5a1000 - 0x155d5dffff 0x155d5e0000 - 0x155d5e1fff 0x155d5e2000 - 0x155d5e8fff 0x155d5e9000 - 0x155d5e9fff 0x155d5ea000 - 0x155d60ffff 0x155d610000 - 0x155d613fff 0x155d614000 - 0x155d614fff 0x155d615000 - 0x155d616fff 0x155d617000 - 0x155d617fff 0x155d618000 - 0x155d618fff 0x155d619000 - 0x155d619fff 0x155d61a000 - 0x155d61dfff 0x155d61e000 - 0x155d61efff 0x155d61f000 - 0x155d61ffff 0x155d620000 - 0x155d621fff 0x155d622000 - 0x155d622fff 0x155d623000 - 0x155d623fff 0x155d624000 - 0x155d78ffff 0x155d790000 - 0x155d792fff 0x155d793000 - 0x155d793fff 0x155d794000 - 0x155d796fff 0x155d797000 - 0x155d7a9fff 0x155d7aa000 - 0x155d7aafff 0x155d7ab000 - 0x155d7abfff 0x155d7ac000 - 0x155d8c9fff 0x155d8ca000 - 0x155d8ccfff 0x155d8cd000 - 0x155d8cffff 0x155d8d0000 - 0x155d8d4fff 0x155d8d5000 - 0x155d929fff 0x155d92a000 - 0x155dfd4fff 0x3fffeec000 - 0x3ffff0cfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/deprecated.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/deprecated.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 2MW -M halfcompiled.mem -q -c config.lisp Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x28161000 - 0x28181fff 0x80000000 - 0x800bffff 0x1582edb000 - 0x1582ef5fff 0x1582ef6000 - 0x1582ef6fff 0x1582ef7000 - 0x1582ef7fff 0x1582ef8000 - 0x1582ef9fff 0x1582efa000 - 0x1582efbfff 0x1582efc000 - 0x1582f02fff 0x1582f03000 - 0x1582f03fff 0x1582f04000 - 0x1582f04fff 0x1582f06000 - 0x1582f07fff 0x1582f08000 - 0x1582f46fff 0x1582f47000 - 0x1582f48fff 0x1582f49000 - 0x1582f4ffff 0x1582f50000 - 0x1582f50fff 0x1582f51000 - 0x1582f76fff 0x1582f77000 - 0x1582f7afff 0x1582f7b000 - 0x1582f7bfff 0x1582f7c000 - 0x1582f7dfff 0x1582f7e000 - 0x1582f7efff 0x1582f7f000 - 0x1582f7ffff 0x1582f80000 - 0x1582f80fff 0x1582f81000 - 0x1582f84fff 0x1582f85000 - 0x1582f85fff 0x1582f86000 - 0x1582f86fff 0x1582f87000 - 0x1582f88fff 0x1582f89000 - 0x1582f89fff 0x1582f8a000 - 0x1582f8afff 0x1582f8b000 - 0x15830f6fff 0x15830f7000 - 0x15830f9fff 0x15830fa000 - 0x15830fafff 0x15830fb000 - 0x15830fdfff 0x15830fe000 - 0x1583110fff 0x1583111000 - 0x1583111fff 0x1583112000 - 0x1583112fff 0x1583113000 - 0x1583230fff 0x1583231000 - 0x1583233fff 0x1583234000 - 0x1583236fff 0x1583237000 - 0x158323bfff 0x158323c000 - 0x1583290fff 0x1583291000 - 0x158393bfff 0x3fff9b5000 - 0x3fff9d5fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/config.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/config.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -x "(and (load \"init.fas\") (ext::saveinitmem) (ext::exit)) (ext::exit t)" Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x32f93000 - 0x32fb3fff 0x80000000 - 0x800bffff 0x1594a0d000 - 0x1594a27fff 0x1594a28000 - 0x1594a28fff 0x1594a29000 - 0x1594a29fff 0x1594a2a000 - 0x1594a2bfff 0x1594a2c000 - 0x1594a2dfff 0x1594a2e000 - 0x1594a34fff 0x1594a35000 - 0x1594a35fff 0x1594a36000 - 0x1594a36fff 0x1594a38000 - 0x1594a39fff 0x1594a3a000 - 0x1594a78fff 0x1594a79000 - 0x1594a7afff 0x1594a7b000 - 0x1594a81fff 0x1594a82000 - 0x1594a82fff 0x1594a83000 - 0x1594aa8fff 0x1594aa9000 - 0x1594aacfff 0x1594aad000 - 0x1594aadfff 0x1594aae000 - 0x1594aaffff 0x1594ab0000 - 0x1594ab0fff 0x1594ab1000 - 0x1594ab1fff 0x1594ab2000 - 0x1594ab2fff 0x1594ab3000 - 0x1594ab6fff 0x1594ab7000 - 0x1594ab7fff 0x1594ab8000 - 0x1594ab8fff 0x1594ab9000 - 0x1594abafff 0x1594abb000 - 0x1594abbfff 0x1594abc000 - 0x1594abcfff 0x1594abd000 - 0x1594c28fff 0x1594c29000 - 0x1594c2bfff 0x1594c2c000 - 0x1594c2cfff 0x1594c2d000 - 0x1594c2ffff 0x1594c30000 - 0x1594c42fff 0x1594c43000 - 0x1594c43fff 0x1594c44000 - 0x1594c44fff 0x1594c45000 - 0x1594d62fff 0x1594d63000 - 0x1594d65fff 0x1594d66000 - 0x1594d68fff 0x1594d69000 - 0x1594d6dfff 0x1594d6e000 - 0x1594dc2fff 0x1594dc3000 - 0x159546dfff 0x3fff822000 - 0x3fff842fff i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I \ `+' / I 8 8 8 8 8 8 \ `-+-' / 8 8 8 ooooo 8oooo `-__|__-' 8 8 8 8 8 | 8 o 8 8 o 8 8 ------+------ ooooo 8oooooo ooo8ooo ooooo 8 Welcome to GNU CLISP 2.49.93+ (2018-02-18) Copyright (c) Bruno Haible, Michael Stoll 1992-1993 Copyright (c) Bruno Haible, Marcus Daniels 1994-1997 Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998 Copyright (c) Bruno Haible, Sam Steingold 1999-2000 Copyright (c) Sam Steingold, Bruno Haible 2001-2018 Type :h and hit Enter for context help. WARNING: DEFUN/DEFMACRO: redefining function LOAD in top-level, was defined in C ;; Loading file defseq.fas ... ;; Loaded file defseq.fas ;; Loading file backquote.fas ... ;; Loaded file backquote.fas ;; Loading file defmacro.fas ... ;; Loaded file defmacro.fas ;; Loading file macros1.fas ... ;; Loaded file macros1.fas ;; Loading file macros2.fas ... ;; Loaded file macros2.fas ;; Loading file defs1.fas ... ;; Loaded file defs1.fas ;; Loading file lambdalist.fas ... ;; Loaded file lambdalist.fas ;; Loading file places.fas ... ;; Loaded file places.fas ;; Loading file floatprint.fas ... ;; Loaded file floatprint.fas ;; Loading file defpackage.fas ... ;; Loaded file defpackage.fas ;; Loading file type.fas ... ;; Loading file subtypep.fas ... ;; Loaded file subtypep.fas ;; Loaded file type.fas ;; Loading file clos-package.fas ... ;; Loaded file clos-package.fas ;; Loading file clos-macros.fas ... ;; Loaded file clos-macros.fas ;; Loading file clos-class0.fas ... ;; Loaded file clos-class0.fas ;; Loading file clos-metaobject1.fas ... ;; Loaded file clos-metaobject1.fas ;; Loading file clos-slotdef1.fas ... ;; Loaded file clos-slotdef1.fas ;; Loading file clos-stablehash1.fas ... ;; Loaded file clos-stablehash1.fas ;; Loading file clos-specializer1.fas ... ;; Loaded file clos-specializer1.fas ;; Loading file clos-class1.fas ... ;; Loaded file clos-class1.fas ;; Loading file clos-class2.fas ... ;; Loaded file clos-class2.fas ;; Loading file clos-class3.fas ... ;; Loaded file clos-class3.fas ;; Loading file defstruct.fas ... ;; Loaded file defstruct.fas ;; Loading file format.fas ... ;; Loaded file format.fas ;; Loading file international.fas ... ;; Loaded file international.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/room.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/room.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/functions.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/functions.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/trace.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/trace.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/cmacros.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/cmacros.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/compiler.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/compiler.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/defs2.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/defs2.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/loop.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/loop.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos.fas ... ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-slots1.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-slots1.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-method1.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-method1.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-methcomb1.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-methcomb1.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-genfun1.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-genfun1.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-genfun2a.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-genfun2a.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-methcomb2.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-methcomb2.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-genfun2b.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-genfun2b.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-method2.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-method2.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-genfun3.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-genfun3.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-dependent.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-dependent.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-genfun4.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-genfun4.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-method3.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-method3.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-methcomb3.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-methcomb3.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-slots2.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-slots2.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-slotdef2.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-slotdef2.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-stablehash2.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-stablehash2.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-specializer2.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-specializer2.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-class4.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-class4.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-class5.fas ... WARNING: DEFGENERIC: redefining function SHARED-INITIALIZE in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-class5.fas, was defined in top-level WARNING: DEFGENERIC: redefining function REINITIALIZE-INSTANCE in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-class5.fas, was defined in top-level WARNING: DEFGENERIC: redefining function INITIALIZE-INSTANCE in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-class5.fas, was defined in top-level ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-class5.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-slotdef3.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-slotdef3.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-specializer3.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-specializer3.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-class6.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-class6.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-method4.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-method4.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-methcomb4.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-methcomb4.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-genfun5.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-genfun5.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-print.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-print.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-custom.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-custom.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/documentation.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/documentation.fas ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gray.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gray.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/fill-out.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/fill-out.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/disassem.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/disassem.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/condition.fas ... WARNING: DEFUN/DEFMACRO: redefining function MUFFLE-CERRORS in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/condition.fas, was defined in C ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/condition.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/loadform.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/loadform.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gstream.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gstream.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/xcharin.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/xcharin.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/keyboard.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/keyboard.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/screen.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/screen.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/runprog.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/runprog.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/query.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/query.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/reploop.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/reploop.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/savemem.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/savemem.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dribble.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dribble.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pprint.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pprint.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/describe.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/describe.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/edit.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/edit.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clhs.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clhs.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/inspect.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/inspect.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/macros3.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/macros3.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/complete.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/complete.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/case-sensitive.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/case-sensitive.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/foreign1.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/foreign1.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/exporting.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/exporting.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/danish.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/danish.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/german.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/german.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/french.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/french.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/spanish.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/spanish.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dutch.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dutch.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/russian.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/russian.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/deprecated.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/deprecated.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/config.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/config.fas ;; Wrote the memory image into lispinit.mem (3,318,704 bytes) Bytes permanently allocated: 173,664 Bytes currently in use: 3,141,272 Bytes available until next GC: 1,567,084 Bye. rm -f ANNOUNCE ln -s ../ANNOUNCE ANNOUNCE rm -f COPYRIGHT ln -s ../COPYRIGHT COPYRIGHT rm -f GNU-GPL ln -s ../GNU-GPL GNU-GPL rm -f SUMMARY ln -s ../SUMMARY SUMMARY ln -s ../src/NEWS NEWS ./txt2c -I../src/ < ../src/_README > gen-README.c gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -DCOMPILE_STANDALONE -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -O0 gen-README.c libgnu.a -o gen-README In file included from /usr/include/bits/libc-header-start.h:33, from /usr/include/stdlib.h:25, from /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib/stdlib.h:36, from ../src/lispbibl.d:1123, from gen-README.c:1: /usr/include/features.h:397:4: warning: #warning _FORTIFY_SOURCE requires compiling with optimization (-O) [-Wcpp] 397 | # warning _FORTIFY_SOURCE requires compiling with optimization (-O) | ^~~~~~~ ./gen-README > README rm -f gen-README.c gen-README ./txt2c -I../src/ < ../src/_README.de > gen-READMEde.c gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -DCOMPILE_STANDALONE -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -O0 gen-READMEde.c libgnu.a -o gen-READMEde In file included from /usr/include/bits/libc-header-start.h:33, from /usr/include/stdlib.h:25, from /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib/stdlib.h:36, from ../src/lispbibl.d:1123, from gen-READMEde.c:1: /usr/include/features.h:397:4: warning: #warning _FORTIFY_SOURCE requires compiling with optimization (-O) [-Wcpp] 397 | # warning _FORTIFY_SOURCE requires compiling with optimization (-O) | ^~~~~~~ ./gen-READMEde > README.de rm -f gen-READMEde.c gen-READMEde ./txt2c -I../src/ < ../src/_README.es > gen-READMEes.c gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -DCOMPILE_STANDALONE -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -O0 gen-READMEes.c libgnu.a -o gen-READMEes In file included from /usr/include/bits/libc-header-start.h:33, from /usr/include/stdlib.h:25, from /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib/stdlib.h:36, from ../src/lispbibl.d:1123, from gen-READMEes.c:1: /usr/include/features.h:397:4: warning: #warning _FORTIFY_SOURCE requires compiling with optimization (-O) [-Wcpp] 397 | # warning _FORTIFY_SOURCE requires compiling with optimization (-O) | ^~~~~~~ ./gen-READMEes > README.es rm -f gen-READMEes.c gen-READMEes rm -f MAGIC.add ln -s ../unix/MAGIC.add MAGIC.add ./txt2c -I../src/ < ../doc/_clisp.1 > gen-clisp1.c gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -DCOMPILE_STANDALONE -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -O0 gen-clisp1.c libgnu.a -o gen-clisp1 In file included from /usr/include/bits/libc-header-start.h:33, from /usr/include/stdlib.h:25, from /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib/stdlib.h:36, from ../src/lispbibl.d:1123, from gen-clisp1.c:1: /usr/include/features.h:397:4: warning: #warning _FORTIFY_SOURCE requires compiling with optimization (-O) [-Wcpp] 397 | # warning _FORTIFY_SOURCE requires compiling with optimization (-O) | ^~~~~~~ ./gen-clisp1 | grep -v '^ *$' | sed -e "s,@PLATFORM@,riscv64-unknown-linux-gnu,g" > clisp.1 rm -f gen-clisp1.c gen-clisp1 ./txt2c -I../src/ < ../doc/_clisp.html > gen-clisphtml.c gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -DCOMPILE_STANDALONE -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -O0 gen-clisphtml.c libgnu.a -o gen-clisphtml In file included from /usr/include/bits/libc-header-start.h:33, from /usr/include/stdlib.h:25, from /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib/stdlib.h:36, from ../src/lispbibl.d:1123, from gen-clisphtml.c:1: /usr/include/features.h:397:4: warning: #warning _FORTIFY_SOURCE requires compiling with optimization (-O) [-Wcpp] 397 | # warning _FORTIFY_SOURCE requires compiling with optimization (-O) | ^~~~~~~ ./gen-clisphtml | sed -e 's,="http://www.ai.mit.edu/projects/iiip/doc/CommonLISP/HyperSpec/,="http://www.lispworks.com/documentation/HyperSpec/,' | sed -e "s,@PLATFORM@,riscv64-unknown-linux-gnu,g" > clisp.html rm -f gen-clisphtml.c gen-clisphtml ./txt2c -I../src/ < ../doc/_clisp-link.1 > gen-clisp-link1.c gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -DCOMPILE_STANDALONE -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -O0 gen-clisp-link1.c libgnu.a -o gen-clisp-link1 In file included from /usr/include/bits/libc-header-start.h:33, from /usr/include/stdlib.h:25, from /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib/stdlib.h:36, from ../src/lispbibl.d:1123, from gen-clisp-link1.c:1: /usr/include/features.h:397:4: warning: #warning _FORTIFY_SOURCE requires compiling with optimization (-O) [-Wcpp] 397 | # warning _FORTIFY_SOURCE requires compiling with optimization (-O) | ^~~~~~~ ./gen-clisp-link1 | grep -v '^ *$' | sed -e "s,@PLATFORM@,riscv64-unknown-linux-gnu,g" > clisp-link.1 rm -f gen-clisp-link1.c gen-clisp-link1 ./txt2c -I../src/ < ../doc/_clisp-link.html > gen-clisp-linkhtml.c gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -DCOMPILE_STANDALONE -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -O0 gen-clisp-linkhtml.c libgnu.a -o gen-clisp-linkhtml In file included from /usr/include/bits/libc-header-start.h:33, from /usr/include/stdlib.h:25, from /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib/stdlib.h:36, from ../src/lispbibl.d:1123, from gen-clisp-linkhtml.c:1: /usr/include/features.h:397:4: warning: #warning _FORTIFY_SOURCE requires compiling with optimization (-O) [-Wcpp] 397 | # warning _FORTIFY_SOURCE requires compiling with optimization (-O) | ^~~~~~~ ./gen-clisp-linkhtml | sed -e 's,="http://www.ai.mit.edu/projects/iiip/doc/CommonLISP/HyperSpec/,="http://www.lispworks.com/documentation/HyperSpec/,' | sed -e "s,@PLATFORM@,riscv64-unknown-linux-gnu,g" > clisp-link.html rm -f gen-clisp-linkhtml.c gen-clisp-linkhtml rm -f LISP-tutorial.txt ln -s ../doc/LISP-tutorial.txt LISP-tutorial.txt rm -f CLOS-guide.txt ln -s ../doc/CLOS-guide.txt CLOS-guide.txt rm -f impnotes.html ln -s ../doc/impnotes.html impnotes.html rm -f impnotes.css ln -s ../doc/impnotes.css impnotes.css rm -f clisp.png ln -s ../doc/clisp.png clisp.png groff -Tps -mandoc clisp.1 > clisp.ps troff: clisp.1:1417: warning [p 9, 3.1i]: can't break line troff: clisp.1:1427: warning [p 9, 3.9i]: can't break line troff: clisp.1:1437: warning [p 9, 4.7i]: can't break line troff: clisp.1:1467: warning [p 9, 7.1i]: can't break line troff: clisp.1:1472: warning [p 9, 7.5i]: can't break line troff: clisp.1:1507: warning [p 10, 1.2i]: can't break line troff: clisp.1:1573: warning [p 10, 6.5i]: can't break line troff: clisp.1:1583: warning [p 10, 7.3i]: can't break line troff: clisp.1:1640: warning [p 11, 2.8i]: can't break line troff: clisp.1:1665: warning [p 11, 4.8i]: can't break line ps2pdf clisp.ps clisp.pdf groff -Tps -mandoc clisp-link.1 > clisp-link.ps troff: clisp-link.1:350: warning [p 2, 9.1i]: can't break line ps2pdf clisp-link.ps clisp-link.pdf /usr/bin/ld -r -o lisp.o spvw.o spvwtabf.o spvwtabs.o spvwtabo.o eval.o control.o encoding.o pathname.o stream.o socket.o io.o funarg.o array.o hashtabl.o list.o package.o record.o weak.o sequence.o charstrg.o debug.o error.o misc.o time.o predtype.o symbol.o lisparit.o i18n.o foreign.o unixaux.o built.o chmod a-x lisp.o ar rcv lisp.a lisp.o a - lisp.o rm -f lisp.o ranlib lisp.a gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -c noreadline.c ../src/noreadline.d: In function ‘readline’: ../src/noreadline.d:32:24: warning: unused parameter ‘prompt’ [-Wunused-parameter] 32 | global char* readline (char* prompt) { return NULL; } | ~~~~~~^~~~~~ ../src/noreadline.d: In function ‘filename_completion_function’: ../src/noreadline.d:38:50: warning: unused parameter ‘text’ [-Wunused-parameter] 38 | global char* filename_completion_function (const char* text, int state) | ~~~~~~~~~~~~^~~~ ../src/noreadline.d:38:60: warning: unused parameter ‘state’ [-Wunused-parameter] 38 | global char* filename_completion_function (const char* text, int state) | ~~~~^~~~~ ../src/noreadline.d: In function ‘add_history’: ../src/noreadline.d:42:26: warning: unused parameter ‘line’ [-Wunused-parameter] 42 | global void add_history (char* line) {} | ~~~~~~^~~~ ../src/noreadline.d: In function ‘rl_named_function’: ../src/noreadline.d:45:46: warning: unused parameter ‘string’ [-Wunused-parameter] 45 | global rl_command_func_t* rl_named_function (char* string) { return NULL; } | ~~~~~~^~~~~~ ../src/noreadline.d: In function ‘rl_bind_key’: ../src/noreadline.d:48:23: warning: unused parameter ‘key’ [-Wunused-parameter] 48 | global int rl_bind_key (int key, rl_command_func_t* function) { return 0; } | ~~~~^~~ ../src/noreadline.d:48:47: warning: unused parameter ‘function’ [-Wunused-parameter] 48 | global int rl_bind_key (int key, rl_command_func_t* function) { return 0; } | ~~~~~~~~~~~~~~~~~~~^~~~~~~~ ../src/noreadline.d: In function ‘rl_variable_bind’: ../src/noreadline.d:51:36: warning: unused parameter ‘variable’ [-Wunused-parameter] 51 | global int rl_variable_bind (const char *variable, const char *value) | ~~~~~~~~~~~~^~~~~~~~ ../src/noreadline.d:51:58: warning: unused parameter ‘value’ [-Wunused-parameter] 51 | global int rl_variable_bind (const char *variable, const char *value) | ~~~~~~~~~~~~^~~~~ ../src/noreadline.d: In function ‘rl_set_paren_blink_timeout’: ../src/noreadline.d:55:38: warning: unused parameter ‘timeout’ [-Wunused-parameter] 55 | global int rl_set_paren_blink_timeout (int timeout) { return 0; } | ~~~~^~~~~~~ ../src/noreadline.d: In function ‘rl_add_defun’: ../src/noreadline.d:58:32: warning: unused parameter ‘name’ [-Wunused-parameter] 58 | global int rl_add_defun (const char *name, rl_command_func_t *func, int key) | ~~~~~~~~~~~~^~~~ ../src/noreadline.d:58:57: warning: unused parameter ‘func’ [-Wunused-parameter] 58 | global int rl_add_defun (const char *name, rl_command_func_t *func, int key) | ~~~~~~~~~~~~~~~~~~~^~~~ ../src/noreadline.d:58:67: warning: unused parameter ‘key’ [-Wunused-parameter] 58 | global int rl_add_defun (const char *name, rl_command_func_t *func, int key) | ~~~~^~~ ar rcv libnoreadline.a noreadline.o a - noreadline.o ranlib libnoreadline.a sed -e 's%@''SHELL''@%/bin/sh%' \ -e 's%@with_dynamic_modules@%yes%' \ -e 's%@createsharedlib@%${CC} -shared -fPIC -DPIC $libs ${CLFLAGS} ${CFLAGS} -Wl,-soname -Wl,$dll -o $lib%' \ -e 's%@LEXE@%.run%' -e 's%@SHREXT@%.so%' \ -e 's%@CLISP_DEF@%%' \ < ../src/clisp-link.in > clisp-link chmod a+x clisp-link rm -rf linkkit mkdir linkkit cd linkkit && ln -s /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/modules.c modules.c cd linkkit && ln -s /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp.h clisp.h cd linkkit && ln -s /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/utils/modprep.lisp modprep.lisp (echo 'CC='"'"'gcc'"'" ;\ echo 'CPPFLAGS='"'"'-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib'"'" ;\ echo 'CFLAGS='"'"'-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC'"'" ;\ echo 'CLFLAGS='"'"'-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic'"'" ;\ echo 'LIBS='"'"'lisp.a -Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl '"'" ;\ echo 'X_LIBS='"'"''"'" ;\ echo 'RANLIB='"'"'ranlib'"'" ;\ echo 'FILES='"'"'lisp.a libgnu.a libnoreadline.a '"'") > makevars test -d boot || (mkdir boot && cd boot && for f in lisp.a libgnu.a libnoreadline.a modules.h modules.o lisp.run lispinit.mem; do ln -s ../$f .; done && (grep -v '^FILES=' ../makevars; fl=''; for f in lisp.a libgnu.a libnoreadline.a ; do fl=$fl' '`basename $f`; done; echo 'FILES='"'"$fl"'") > makevars) || (rm -rf boot ; exit 1) ./txt2c -I../src/ < ../src/_clisp.c > gen-clispc.c gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. -DCOMPILE_STANDALONE -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -O0 gen-clispc.c libgnu.a -o gen-clispc In file included from /usr/include/bits/libc-header-start.h:33, from /usr/include/stdlib.h:25, from /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib/stdlib.h:36, from ../src/lispbibl.d:1123, from gen-clispc.c:1: /usr/include/features.h:397:4: warning: #warning _FORTIFY_SOURCE requires compiling with optimization (-O) [-Wcpp] 397 | # warning _FORTIFY_SOURCE requires compiling with optimization (-O) | ^~~~~~~ ./gen-clispc > clisp.c rm -f gen-clispc.c gen-clispc gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -DENABLE_RELOCATABLE clisp.c -Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl -o clisp mkdir -p i18n m=`cd ../modules/i18n; pwd`; \ if test -f $m/configure && { test ! -f i18n/config.status || test -n "`find $m/configure -prune -newer i18n/config.status`"; } ; then ( cd i18n ;\ cache=`echo i18n/ | sed -e 's,[^/][^/]*//*,../,g'`config.cache; \ if test -f ${cache} ; then \ . ${cache}; \ if test "${ac_cv_env_CC_set}" = set; then CC="${ac_cv_env_CC_value}"; export CC; fi; \ if test "${ac_cv_env_CFLAGS_set}" = set; then CFLAGS="${ac_cv_env_CFLAGS_value}"; export CFLAGS; fi; \ if test "${ac_cv_env_LDFLAGS_set}" = set; then LDFLAGS="${ac_cv_env_LDFLAGS_value}"; export LDFLAGS; fi; \ if test "${ac_cv_env_CLFLAGS_set}" = set; then CLFLAGS="${ac_cv_env_CLFLAGS_value}"; export CLFLAGS; fi; \ if test "${ac_cv_env_LIBS_set}" = set; then LIBS="${ac_cv_env_LIBS_value}"; export LIBS; fi; \ if test "${ac_cv_env_CPPFLAGS_set}" = set; then CPPFLAGS="${ac_cv_env_CPPFLAGS_value}"; export CPPFLAGS; fi; \ if test "${ac_cv_env_CPP_set}" = set; then CPP="${ac_cv_env_CPP_value}"; export CPP; fi; \ if test "${ac_cv_env_CXX_set}" = set; then CXX="${ac_cv_env_CXX_value}"; export CXX; fi; \ if test "${ac_cv_env_CXXFLAGS_set}" = set; then CXXFLAGS="${ac_cv_env_CXXFLAGS_value}"; export CXXFLAGS; fi; \ if test "${ac_cv_env_X_LIBS_set}" = set; then X_LIBS="${ac_cv_env_X_LIBS_value}"; export X_LIBS; fi; \ /bin/sh $m/configure --with-clisp="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K boot -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" --cache-file=${cache} --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm';\ else \ /bin/sh $m/configure --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm'; \ fi ) ;\ fi; \ if test -f $m/Makefile && { test ! -f i18n/Makefile || test -n "`find $m/Makefile -prune -newer i18n/Makefile`"; } ; then \ sed "s,srcdir = .,srcdir = $m," "$m/Makefile" > i18n/Makefile ; \ fi ; \ CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K boot -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" ; \ cd i18n ; make clisp-module CC="gcc" CPPFLAGS="-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib" CFLAGS="-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC" CLFLAGS="-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic" LIBS="-Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl " RANLIB="ranlib" CLISP="$CLISP -q" SHREXT=.so configure: loading cache ../config.cache configure: ** I18N (Common) checking how to remove colons from paths... (cached) echo $x checking for CLISP version... 2.49.93+ (2018-02-18) (built 3813886800) (memory 3828276446) checking for CLISP libdir... /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/ checking for CLISP linking set... /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build checking for CLISP... yes checking for gcc... (cached) gcc checking whether the C compiler works... yes checking for C compiler default output file name... a.out checking for suffix of executables... checking whether we are cross compiling... no checking for suffix of object files... (cached) o checking whether we are using the GNU C compiler... (cached) yes checking whether gcc accepts -g... (cached) yes checking for gcc option to accept ISO C89... (cached) none needed checking whether gcc understands -c and -o together... (cached) yes checking how to run the C preprocessor... (cached) gcc -E checking how to make hard links... (cached) ln checking whether ln -s works... (cached) yes checking for grep that handles long lines and -e... (cached) /usr/bin/grep checking for egrep... (cached) /usr/bin/grep -E checking for ANSI C header files... (cached) yes checking for sys/types.h... (cached) yes checking for sys/stat.h... (cached) yes checking for stdlib.h... (cached) yes checking for string.h... (cached) yes checking for memory.h... (cached) yes checking for strings.h... (cached) yes checking for inttypes.h... (cached) yes checking for stdint.h... (cached) yes checking for unistd.h... (cached) yes checking for minix/config.h... (cached) no checking whether it is safe to define __EXTENSIONS__... (cached) yes checking whether _XOPEN_SOURCE should be defined... (cached) no configure: ** I18N (locale) checking for localeconv... yes checking for struct lconv.int_p_cs_precedes... yes checking for struct lconv.int_n_cs_precedes... yes checking for struct lconv.int_p_sep_by_space... yes checking for struct lconv.int_n_sep_by_space... yes checking for struct lconv.int_p_sign_posn... yes checking for struct lconv.int_n_sign_posn... yes configure: ** I18N (Output) configure: updating cache ../config.cache configure: creating ./config.status config.status: creating Makefile config.status: creating link.sh config.status: creating config.h configure: ** I18N (Done) make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/i18n' /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K boot -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/i18n/i18n.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x7d3b000 - 0x7d5bfff 0x80000000 - 0x800bffff 0x15900a9000 - 0x15900c3fff 0x15900c4000 - 0x15900c4fff 0x15900c5000 - 0x15900c5fff 0x15900c6000 - 0x15900c7fff 0x15900c8000 - 0x15900c9fff 0x15900ca000 - 0x15900d0fff 0x15900d1000 - 0x15900d1fff 0x15900d2000 - 0x15900d2fff 0x15900d4000 - 0x15900d5fff 0x15900d6000 - 0x1590114fff 0x1590115000 - 0x1590116fff 0x1590117000 - 0x159011dfff 0x159011e000 - 0x159011efff 0x159011f000 - 0x1590144fff 0x1590145000 - 0x1590148fff 0x1590149000 - 0x1590149fff 0x159014a000 - 0x159014bfff 0x159014c000 - 0x159014cfff 0x159014d000 - 0x159014dfff 0x159014e000 - 0x159014efff 0x159014f000 - 0x1590152fff 0x1590153000 - 0x1590153fff 0x1590154000 - 0x1590154fff 0x1590155000 - 0x1590156fff 0x1590157000 - 0x1590157fff 0x1590158000 - 0x1590158fff 0x1590159000 - 0x15902c4fff 0x15902c5000 - 0x15902c7fff 0x15902c8000 - 0x15902c8fff 0x15902c9000 - 0x15902cbfff 0x15902cc000 - 0x15902defff 0x15902df000 - 0x15902dffff 0x15902e0000 - 0x15902e0fff 0x15902e1000 - 0x15903fefff 0x15903ff000 - 0x1590401fff 0x1590402000 - 0x1590404fff 0x1590405000 - 0x1590409fff 0x159040a000 - 0x159045efff 0x159045f000 - 0x1590b09fff 0x3fff876000 - 0x3fff897fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/i18n/i18n.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/i18n/i18n.fas 0 errors, 0 warnings /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K boot -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -C /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit/modprep /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/i18n/gettext.c ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x291d0000 - 0x291f0fff 0x80000000 - 0x800bffff 0x157bf5e000 - 0x157bf78fff 0x157bf79000 - 0x157bf79fff 0x157bf7a000 - 0x157bf7afff 0x157bf7b000 - 0x157bf7cfff 0x157bf7d000 - 0x157bf7efff 0x157bf7f000 - 0x157bf85fff 0x157bf86000 - 0x157bf86fff 0x157bf87000 - 0x157bf87fff 0x157bf89000 - 0x157bf8afff 0x157bf8b000 - 0x157bfc9fff 0x157bfca000 - 0x157bfcbfff 0x157bfcc000 - 0x157bfd2fff 0x157bfd3000 - 0x157bfd3fff 0x157bfd4000 - 0x157bff9fff 0x157bffa000 - 0x157bffdfff 0x157bffe000 - 0x157bffefff 0x157bfff000 - 0x157c000fff 0x157c001000 - 0x157c001fff 0x157c002000 - 0x157c002fff 0x157c003000 - 0x157c003fff 0x157c004000 - 0x157c007fff 0x157c008000 - 0x157c008fff 0x157c009000 - 0x157c009fff 0x157c00a000 - 0x157c00bfff 0x157c00c000 - 0x157c00cfff 0x157c00d000 - 0x157c00dfff 0x157c00e000 - 0x157c179fff 0x157c17a000 - 0x157c17cfff 0x157c17d000 - 0x157c17dfff 0x157c17e000 - 0x157c180fff 0x157c181000 - 0x157c193fff 0x157c194000 - 0x157c194fff 0x157c195000 - 0x157c195fff 0x157c196000 - 0x157c2b3fff 0x157c2b4000 - 0x157c2b6fff 0x157c2b7000 - 0x157c2b9fff 0x157c2ba000 - 0x157c2befff 0x157c2bf000 - 0x157c313fff 0x157c314000 - 0x157c9befff 0x3fffd4a000 - 0x3fffd6bfff ;; MODPREP: "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/i18n/gettext.c" --> #P"gettext.m.c" ;; MODPREP: reading "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/i18n/gettext.c": 19,122 bytes, 441 lines WARNING: truncated a very long tag (from 7,676 to 2,000) for ("(OR INTEGER (MEMBER" ..) ;; MODPREP: 184 objects, 9 DEFUNs ;; packages: ("I18N") MODPREP: wrote gettext.m.c (92,814 bytes) gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I. -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit \ -c gettext.m.c -o gettext.o /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/i18n/gettext.c: In function ‘bool_char_lconv’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/i18n/gettext.c:283:41: warning: comparison is always true due to limited range of data type [-Wtype-limits] 283 | pushSTACK(sfixnum(val)); | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/i18n/gettext.c:286:20: warning: comparison is always true due to limited range of data type [-Wtype-limits] 286 | return sfixnum(val); | ^~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/i18n/gettext.c:279:19: warning: case label value is less than minimum value for type [-Wswitch-outside-range] 279 | case CHAR_MAX: case -1: return S(Kunspecific); | ^~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/i18n/gettext.c: In function ‘int_char_lconv’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/i18n/gettext.c:292:27: warning: comparison is always true due to limited range of data type [-Wtype-limits] 292 | default: return sfixnum(val); | ^~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/i18n/gettext.c:291:19: warning: case label value is less than minimum value for type [-Wswitch-outside-range] 291 | case CHAR_MAX: case -1: return S(Kunspecific); | ^~~~ ln -s /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/i18n/preload.lisp . make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/i18n' mkdir -p syscalls m=`cd ../modules/syscalls; pwd`; \ if test -f $m/configure && { test ! -f syscalls/config.status || test -n "`find $m/configure -prune -newer syscalls/config.status`"; } ; then ( cd syscalls ;\ cache=`echo syscalls/ | sed -e 's,[^/][^/]*//*,../,g'`config.cache; \ if test -f ${cache} ; then \ . ${cache}; \ if test "${ac_cv_env_CC_set}" = set; then CC="${ac_cv_env_CC_value}"; export CC; fi; \ if test "${ac_cv_env_CFLAGS_set}" = set; then CFLAGS="${ac_cv_env_CFLAGS_value}"; export CFLAGS; fi; \ if test "${ac_cv_env_LDFLAGS_set}" = set; then LDFLAGS="${ac_cv_env_LDFLAGS_value}"; export LDFLAGS; fi; \ if test "${ac_cv_env_CLFLAGS_set}" = set; then CLFLAGS="${ac_cv_env_CLFLAGS_value}"; export CLFLAGS; fi; \ if test "${ac_cv_env_LIBS_set}" = set; then LIBS="${ac_cv_env_LIBS_value}"; export LIBS; fi; \ if test "${ac_cv_env_CPPFLAGS_set}" = set; then CPPFLAGS="${ac_cv_env_CPPFLAGS_value}"; export CPPFLAGS; fi; \ if test "${ac_cv_env_CPP_set}" = set; then CPP="${ac_cv_env_CPP_value}"; export CPP; fi; \ if test "${ac_cv_env_CXX_set}" = set; then CXX="${ac_cv_env_CXX_value}"; export CXX; fi; \ if test "${ac_cv_env_CXXFLAGS_set}" = set; then CXXFLAGS="${ac_cv_env_CXXFLAGS_value}"; export CXXFLAGS; fi; \ if test "${ac_cv_env_X_LIBS_set}" = set; then X_LIBS="${ac_cv_env_X_LIBS_value}"; export X_LIBS; fi; \ /bin/sh $m/configure --with-clisp="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K boot -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" --cache-file=${cache} --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm';\ else \ /bin/sh $m/configure --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm'; \ fi ) ;\ fi; \ if test -f $m/Makefile && { test ! -f syscalls/Makefile || test -n "`find $m/Makefile -prune -newer syscalls/Makefile`"; } ; then \ sed "s,srcdir = .,srcdir = $m," "$m/Makefile" > syscalls/Makefile ; \ fi ; \ CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K boot -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" ; \ cd syscalls ; make clisp-module CC="gcc" CPPFLAGS="-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib" CFLAGS="-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC" CLFLAGS="-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic" LIBS="-Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl " RANLIB="ranlib" CLISP="$CLISP -q" SHREXT=.so configure: loading cache ../config.cache configure: ** System Calls (Common) checking how to remove colons from paths... (cached) echo $x checking for CLISP version... (cached) 2.49.93+ (2018-02-18) (built 3813886800) (memory 3828276446) checking for CLISP libdir... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/ checking for CLISP linking set... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build checking for CLISP... (cached) yes checking for gcc... (cached) gcc checking whether the C compiler works... yes checking for C compiler default output file name... a.out checking for suffix of executables... checking whether we are cross compiling... no checking for suffix of object files... (cached) o checking whether we are using the GNU C compiler... (cached) yes checking whether gcc accepts -g... (cached) yes checking for gcc option to accept ISO C89... (cached) none needed checking whether gcc understands -c and -o together... (cached) yes checking how to run the C preprocessor... (cached) gcc -E checking how to make hard links... (cached) ln checking whether ln -s works... (cached) yes checking for grep that handles long lines and -e... (cached) /usr/bin/grep checking for egrep... (cached) /usr/bin/grep -E checking for ANSI C header files... (cached) yes checking for sys/types.h... (cached) yes checking for sys/stat.h... (cached) yes checking for stdlib.h... (cached) yes checking for string.h... (cached) yes checking for memory.h... (cached) yes checking for strings.h... (cached) yes checking for inttypes.h... (cached) yes checking for stdint.h... (cached) yes checking for unistd.h... (cached) yes checking for minix/config.h... (cached) no checking whether it is safe to define __EXTENSIONS__... (cached) yes checking whether _XOPEN_SOURCE should be defined... (cached) no checking for a BSD-compatible install... (cached) /usr/bin/install -c checking whether build environment is sane... yes checking for a thread-safe mkdir -p... (cached) /usr/bin/mkdir -p checking for gawk... (cached) gawk checking whether make sets $(MAKE)... (cached) yes checking whether make supports the include directive... yes (GNU style) checking whether make supports nested variables... (cached) yes checking dependency style of gcc... (cached) gcc3 checking for ranlib... (cached) ranlib configure: ** System Calls (Headers) checking fcntl.h usability... yes checking fcntl.h presence... yes checking for fcntl.h... yes checking for netdb.h... (cached) yes checking utime.h usability... yes checking utime.h presence... yes checking for utime.h... yes checking pwd.h usability... yes checking pwd.h presence... yes checking for pwd.h... yes checking sys/unistd.h usability... yes checking sys/unistd.h presence... yes checking for sys/unistd.h... yes checking syslog.h usability... yes checking syslog.h presence... yes checking for syslog.h... yes checking signal.h usability... yes checking signal.h presence... yes checking for signal.h... yes checking grp.h usability... yes checking grp.h presence... yes checking for grp.h... yes checking crypt.h usability... yes checking crypt.h presence... yes checking for crypt.h... yes checking utmpx.h usability... yes checking utmpx.h presence... yes checking for utmpx.h... yes checking shlobj.h usability... no checking shlobj.h presence... no checking for shlobj.h... no checking sys/statvfs.h usability... yes checking sys/statvfs.h presence... yes checking for sys/statvfs.h... yes checking sys/statfs.h usability... yes checking sys/statfs.h presence... yes checking for sys/statfs.h... yes checking for sys/param.h... (cached) yes checking ftw.h usability... yes checking ftw.h presence... yes checking for ftw.h... yes checking build system type... (cached) riscv64-unknown-linux-gnu checking host system type... (cached) riscv64-unknown-linux-gnu checking for special C compiler options needed for large files... (cached) no checking for _FILE_OFFSET_BITS value needed for large files... (cached) no checking size of off_t... (cached) 8 checking size of gid_t... 4 checking size of pid_t... 4 checking size of uid_t... 4 checking for struct utmpx.ut_host... yes checking whether the preprocessor supports include_next... (cached) yes checking whether system header files limit the line length... (cached) no checking for complete errno.h... (cached) yes configure: ** System Calls (Functions) checking for library containing crypt... -lcrypt checking for library containing erf... -lm checking for confstr... yes checking for fcntl... yes checking for gethostent... (cached) yes checking for sysconf... (cached) yes checking for getrlimit... (cached) yes checking for setrlimit... yes checking for getlogin... yes checking for getpwent... yes checking for getpwnam... yes checking for getpwuid... yes checking for endpwent... yes checking for setpwent... yes checking for getservbyport... yes checking for getservbyname... yes checking for getservent... yes checking for setservent... yes checking for endservent... yes checking for openlog... yes checking for setlogmask... yes checking for syslog... yes checking for closelog... yes checking for chroot... yes checking for getppid... yes checking for getpgid... yes checking for getsid... yes checking for setpgid... (cached) yes checking for setsid... (cached) yes checking for kill... yes checking for pathconf... yes checking for fpathconf... yes checking for realpath... (cached) yes checking for getpgrp... yes checking for setpgrp... yes checking for getgrgid... yes checking for getgrnam... yes checking for getgrent... yes checking for endgrent... yes checking for setgrent... yes checking for endutxent... yes checking for getutxent... yes checking for getutxid... yes checking for getutxline... yes checking for pututxline... yes checking for setutxent... yes checking for getegid... yes checking for geteuid... yes checking for getgid... yes checking for getuid... yes checking for setegid... yes checking for seteuid... yes checking for setgid... yes checking for setuid... yes checking for setreuid... (cached) yes checking for setregid... (cached) yes checking for getgroups... yes checking for setgroups... yes checking for wait4... yes checking for fchmod... (cached) yes checking for fchown... yes checking for fstat... yes checking for link... yes checking for stat... yes checking for symlink... (cached) yes checking for utime... yes checking for mknod... (cached) yes checking for chmod... yes checking for umask... yes checking for fsync... (cached) yes checking for sync... yes checking for ftruncate... yes checking for truncate... yes checking for getusershell... yes checking for endusershell... yes checking for erf... yes checking for erfc... yes checking for lgamma... yes checking for tgamma... yes checking for fstatvfs... yes checking for statvfs... yes checking for getpriority... yes checking for setpriority... yes checking for crypt... yes checking for encrypt... no checking for setkey... no checking for GlobalMemoryStatusEx... no checking for gethostid... yes checking for sethostid... yes checking for getdomainname... yes checking for setdomainname... yes checking for nftw... yes checking for getdate... yes checking size of rlim_t... 8 checking for uid_t in sys/types.h... (cached) yes checking for unistd.h... (cached) yes checking for working chown... yes checking whether signgam is declared... yes checking whether getdate_err is declared... yes checking whether f_fsid is scalar... yes checking size of fsblkcnt_t... 8 checking size of fsfilcnt_t... 8 checking for struct stat.st_rdev... yes checking for struct stat.st_blksize... yes checking for struct stat.st_blocks... yes checking for sys/resource.h... (cached) yes checking for getrusage... (cached) yes checking whether getrusage works... (cached) yes checking for readlink... (cached) yes checking for __xpg4... (cached) no checking whether link(2) dereferences a symlink... (cached) no checking whether setpgrp() is POSIX... yes checking for getloadavg... (cached) yes checking for sys/loadavg.h... (cached) no checking whether getloadavg is declared... (cached) yes configure: ** System Calls (output) configure: updating cache ../config.cache checking that generated files are newer than configure... done configure: creating ./config.status config.status: creating Makefile config.status: creating link.sh config.status: creating config.h config.status: executing depfiles commands configure: ** System Calls (done) make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls' /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K boot -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -m 2MW -C /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit/modprep /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x389bb000 - 0x389dbfff 0x80000000 - 0x800bffff 0x157da2a000 - 0x157da44fff 0x157da45000 - 0x157da45fff 0x157da46000 - 0x157da46fff 0x157da47000 - 0x157da48fff 0x157da49000 - 0x157da4afff 0x157da4b000 - 0x157da51fff 0x157da52000 - 0x157da52fff 0x157da53000 - 0x157da53fff 0x157da55000 - 0x157da56fff 0x157da57000 - 0x157da95fff 0x157da96000 - 0x157da97fff 0x157da98000 - 0x157da9efff 0x157da9f000 - 0x157da9ffff 0x157daa0000 - 0x157dac5fff 0x157dac6000 - 0x157dac9fff 0x157daca000 - 0x157dacafff 0x157dacb000 - 0x157daccfff 0x157dacd000 - 0x157dacdfff 0x157dace000 - 0x157dacefff 0x157dacf000 - 0x157dacffff 0x157dad0000 - 0x157dad3fff 0x157dad4000 - 0x157dad4fff 0x157dad5000 - 0x157dad5fff 0x157dad6000 - 0x157dad7fff 0x157dad8000 - 0x157dad8fff 0x157dad9000 - 0x157dad9fff 0x157dada000 - 0x157dc45fff 0x157dc46000 - 0x157dc48fff 0x157dc49000 - 0x157dc49fff 0x157dc4a000 - 0x157dc4cfff 0x157dc4d000 - 0x157dc5ffff 0x157dc60000 - 0x157dc60fff 0x157dc61000 - 0x157dc61fff 0x157dc62000 - 0x157dd7ffff 0x157dd80000 - 0x157dd82fff 0x157dd83000 - 0x157dd85fff 0x157dd86000 - 0x157dd8afff 0x157dd8b000 - 0x157dddffff 0x157dde0000 - 0x157e48afff 0x3fff927000 - 0x3fff948fff ;; MODPREP: "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c" --> #P"calls.m.c" ;; MODPREP: reading "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c": 244,348 bytes, 4,746 lines WARNING: truncated a very long tag (from 6,146 to 2,000) for ("(OR INTEGER (MEMBER" ..) WARNING: truncated a very long tag (from 3,248 to 2,000) for ("(OR INTEGER (MEMBER" ..) WARNING: "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c" :5723: fixed object case ":ERROR_ITERATED_DATA_EXCEEDS_64k" WARNING: "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c" :5723: fixed object case ":ERROR_AUTODATASEG_EXCEEDS_64k" WARNING: truncated a very long tag (from 122,702 to 2,000) for ("(OR INTEGER (MEMBER" ..) WARNING: truncated a very long tag (from 5,562 to 2,000) for ("(OR INTEGER (MEMBER" ("defined(E2BIG)" . ":E2BIG") ("defined(EACCES)" . ":EACCES") ("defined(EADDRINUSE)" . ":EADDRINUSE") ("defined(EADDRNOTAVAIL)" . ":EADDRNOTAVAIL") ("defined(EAFNOSUPPORT)" . ":EAFNOSUPPORT") ..) ;; MODPREP: 2,554 objects, 122 DEFUNs, 3 DEFVARs (3 inits) ;; packages: ("SYS" "OS" "POSIX") MODPREP: wrote calls.m.c (1,735,451 bytes) gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I. -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit \ -c calls.m.c -o calls.o /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c: In function ‘C_subr_posix_file_size’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c:470:49: warning: cast between incompatible function types from ‘int (*)(const char *, struct stat *)’ to ‘void * (*)(const char *, void *)’ [-Wcast-function-type] 470 | if (ON_PNAMESTRING(STACK_0,stat,&buf)) | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c: In function ‘C_subr_posix_file_stat’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c:2034:51: warning: cast between incompatible function types from ‘int (*)(const char *, struct stat *)’ to ‘void * (*)(const char *, void *)’ [-Wcast-function-type] 2034 | if (ON_PNAMESTRING(STACK_1,*(link_p ? &stat : &lstat),&buf)) | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c:2076:2: warning: label ‘call_make_file_stat’ defined but not used [-Wunused-label] 2076 | call_make_file_stat: | ^~~~~~~~~~~~~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c: In function ‘C_subr_posix_set_file_stat’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c:2229:51: warning: cast between incompatible function types from ‘int (*)(const char *, struct stat *)’ to ‘void * (*)(const char *, void *)’ [-Wcast-function-type] 2229 | if (ON_PNAMESTRING(STACK_0,stat,&st)) OS_file_error(value1); | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c:2246:51: warning: cast between incompatible function types from ‘int (*)(const char *, struct stat *)’ to ‘void * (*)(const char *, void *)’ [-Wcast-function-type] 2246 | if (ON_PNAMESTRING(STACK_1,stat,&st)) OS_file_error(value1); | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c: In function ‘C_subr_posix_stat_vfs’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c:2482:51: warning: cast between incompatible function types from ‘int (*)(const char * restrict, struct statvfs * restrict)’ to ‘void * (*)(const char *, void *)’ [-Wcast-function-type] 2482 | if (ON_PNAMESTRING(STACK_0,statvfs,&buf)) | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c: In function ‘C_subr_os_file_owner’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c:2737:98: warning: cast between incompatible function types from ‘const char * (*)(const char *)’ to ‘void * (*)(const char *, void *)’ [-Wcast-function-type] 2737 | VALUES1(safe_to_string((char*)ON_PNAMESTRING(popSTACK(),get_owner,NULL))); | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c: In function ‘copy_attributes_and_close’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c:3042:49: warning: cast between incompatible function types from ‘int (*)(const char *, const struct utimbuf *)’ to ‘void * (*)(const char *, void *)’ [-Wcast-function-type] 3042 | if (ON_PNAMESTRING(STACK_0,utime,&utb)) { | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c:3049:2: warning: label ‘close_success’ defined but not used [-Wunused-label] 3049 | close_success: | ^~~~~~~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c: In function ‘C_subr_posix__25sethostid’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/calls.c:1938:34: warning: ignoring return value of ‘sethostid’ declared with attribute ‘warn_unused_result’ [-Wunused-result] 1938 | begin_system_call(); errno = 0; sethostid(hid); e = errno; end_system_call(); | ^~~~~~~~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K boot -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/posix.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x31486000 - 0x314a6fff 0x80000000 - 0x800bffff 0x1579d6d000 - 0x1579d87fff 0x1579d88000 - 0x1579d88fff 0x1579d89000 - 0x1579d89fff 0x1579d8a000 - 0x1579d8bfff 0x1579d8c000 - 0x1579d8dfff 0x1579d8e000 - 0x1579d94fff 0x1579d95000 - 0x1579d95fff 0x1579d96000 - 0x1579d96fff 0x1579d98000 - 0x1579d99fff 0x1579d9a000 - 0x1579dd8fff 0x1579dd9000 - 0x1579ddafff 0x1579ddb000 - 0x1579de1fff 0x1579de2000 - 0x1579de2fff 0x1579de3000 - 0x1579e08fff 0x1579e09000 - 0x1579e0cfff 0x1579e0d000 - 0x1579e0dfff 0x1579e0e000 - 0x1579e0ffff 0x1579e10000 - 0x1579e10fff 0x1579e11000 - 0x1579e11fff 0x1579e12000 - 0x1579e12fff 0x1579e13000 - 0x1579e16fff 0x1579e17000 - 0x1579e17fff 0x1579e18000 - 0x1579e18fff 0x1579e19000 - 0x1579e1afff 0x1579e1b000 - 0x1579e1bfff 0x1579e1c000 - 0x1579e1cfff 0x1579e1d000 - 0x1579f88fff 0x1579f89000 - 0x1579f8bfff 0x1579f8c000 - 0x1579f8cfff 0x1579f8d000 - 0x1579f8ffff 0x1579f90000 - 0x1579fa2fff 0x1579fa3000 - 0x1579fa3fff 0x1579fa4000 - 0x1579fa4fff 0x1579fa5000 - 0x157a0c2fff 0x157a0c3000 - 0x157a0c5fff 0x157a0c6000 - 0x157a0c8fff 0x157a0c9000 - 0x157a0cdfff 0x157a0ce000 - 0x157a122fff 0x157a123000 - 0x157a7cdfff 0x3fffcd4000 - 0x3fffcf5fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/posix.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls/posix.fas The following functions were used but not defined: POSIX::%SYSLOG POSIX::CONVERT-MODE POSIX::FILE-STAT POSIX::SYSCONF POSIX:MKDTEMP POSIX:MKNOD POSIX::%STDIO POSIX:LGAMMA POSIX:FNMATCH 0 errors, 0 warnings ln -s /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/preload.lisp . ln -s /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/datemsk . make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls' mkdir -p regexp m=`cd ../modules/regexp; pwd`; \ if test -f $m/configure && { test ! -f regexp/config.status || test -n "`find $m/configure -prune -newer regexp/config.status`"; } ; then ( cd regexp ;\ cache=`echo regexp/ | sed -e 's,[^/][^/]*//*,../,g'`config.cache; \ if test -f ${cache} ; then \ . ${cache}; \ if test "${ac_cv_env_CC_set}" = set; then CC="${ac_cv_env_CC_value}"; export CC; fi; \ if test "${ac_cv_env_CFLAGS_set}" = set; then CFLAGS="${ac_cv_env_CFLAGS_value}"; export CFLAGS; fi; \ if test "${ac_cv_env_LDFLAGS_set}" = set; then LDFLAGS="${ac_cv_env_LDFLAGS_value}"; export LDFLAGS; fi; \ if test "${ac_cv_env_CLFLAGS_set}" = set; then CLFLAGS="${ac_cv_env_CLFLAGS_value}"; export CLFLAGS; fi; \ if test "${ac_cv_env_LIBS_set}" = set; then LIBS="${ac_cv_env_LIBS_value}"; export LIBS; fi; \ if test "${ac_cv_env_CPPFLAGS_set}" = set; then CPPFLAGS="${ac_cv_env_CPPFLAGS_value}"; export CPPFLAGS; fi; \ if test "${ac_cv_env_CPP_set}" = set; then CPP="${ac_cv_env_CPP_value}"; export CPP; fi; \ if test "${ac_cv_env_CXX_set}" = set; then CXX="${ac_cv_env_CXX_value}"; export CXX; fi; \ if test "${ac_cv_env_CXXFLAGS_set}" = set; then CXXFLAGS="${ac_cv_env_CXXFLAGS_value}"; export CXXFLAGS; fi; \ if test "${ac_cv_env_X_LIBS_set}" = set; then X_LIBS="${ac_cv_env_X_LIBS_value}"; export X_LIBS; fi; \ /bin/sh $m/configure --with-clisp="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K boot -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" --cache-file=${cache} --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm';\ else \ /bin/sh $m/configure --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm'; \ fi ) ;\ fi; \ if test -f $m/Makefile && { test ! -f regexp/Makefile || test -n "`find $m/Makefile -prune -newer regexp/Makefile`"; } ; then \ sed "s,srcdir = .,srcdir = $m," "$m/Makefile" > regexp/Makefile ; \ fi ; \ CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K boot -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" ; \ cd regexp ; make clisp-module CC="gcc" CPPFLAGS="-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib" CFLAGS="-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC" CLFLAGS="-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic" LIBS="-Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl " RANLIB="ranlib" CLISP="$CLISP -q" SHREXT=.so configure: loading cache ../config.cache configure: ** Regexp (Common) checking how to remove colons from paths... (cached) echo $x checking for CLISP version... (cached) 2.49.93+ (2018-02-18) (built 3813886800) (memory 3828276446) checking for CLISP libdir... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/ checking for CLISP linking set... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build checking for CLISP... (cached) yes checking for gcc... (cached) gcc checking whether the C compiler works... yes checking for C compiler default output file name... a.out checking for suffix of executables... checking whether we are cross compiling... no checking for suffix of object files... (cached) o checking whether we are using the GNU C compiler... (cached) yes checking whether gcc accepts -g... (cached) yes checking for gcc option to accept ISO C89... (cached) none needed checking whether gcc understands -c and -o together... (cached) yes checking how to run the C preprocessor... (cached) gcc -E checking how to make hard links... (cached) ln checking whether ln -s works... (cached) yes checking for grep that handles long lines and -e... (cached) /usr/bin/grep checking for egrep... (cached) /usr/bin/grep -E checking for ANSI C header files... (cached) yes checking for sys/types.h... (cached) yes checking for sys/stat.h... (cached) yes checking for stdlib.h... (cached) yes checking for string.h... (cached) yes checking for memory.h... (cached) yes checking for strings.h... (cached) yes checking for inttypes.h... (cached) yes checking for stdint.h... (cached) yes checking for unistd.h... (cached) yes checking for minix/config.h... (cached) no checking whether it is safe to define __EXTENSIONS__... (cached) yes checking whether _XOPEN_SOURCE should be defined... (cached) no checking for a BSD-compatible install... (cached) /usr/bin/install -c checking whether build environment is sane... yes checking for a thread-safe mkdir -p... (cached) /usr/bin/mkdir -p checking for gawk... (cached) gawk checking whether make sets $(MAKE)... (cached) yes checking whether make supports the include directive... yes (GNU style) checking whether make supports nested variables... (cached) yes checking dependency style of gcc... (cached) gcc3 checking for C/C++ restrict keyword... (cached) __restrict configure: ** Regexp (Output) checking that generated files are newer than configure... done configure: creating ./config.status config.status: creating Makefile config.status: creating link.sh config.status: creating config.h config.status: executing depfiles commands configure: ** Regexp (Done) make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/regexp' /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K boot -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/regexp/regexp.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1117d000 - 0x1119dfff 0x80000000 - 0x800bffff 0x1565f18000 - 0x1565f32fff 0x1565f33000 - 0x1565f33fff 0x1565f34000 - 0x1565f34fff 0x1565f35000 - 0x1565f36fff 0x1565f37000 - 0x1565f38fff 0x1565f39000 - 0x1565f3ffff 0x1565f40000 - 0x1565f40fff 0x1565f41000 - 0x1565f41fff 0x1565f43000 - 0x1565f44fff 0x1565f45000 - 0x1565f83fff 0x1565f84000 - 0x1565f85fff 0x1565f86000 - 0x1565f8cfff 0x1565f8d000 - 0x1565f8dfff 0x1565f8e000 - 0x1565fb3fff 0x1565fb4000 - 0x1565fb7fff 0x1565fb8000 - 0x1565fb8fff 0x1565fb9000 - 0x1565fbafff 0x1565fbb000 - 0x1565fbbfff 0x1565fbc000 - 0x1565fbcfff 0x1565fbd000 - 0x1565fbdfff 0x1565fbe000 - 0x1565fc1fff 0x1565fc2000 - 0x1565fc2fff 0x1565fc3000 - 0x1565fc3fff 0x1565fc4000 - 0x1565fc5fff 0x1565fc6000 - 0x1565fc6fff 0x1565fc7000 - 0x1565fc7fff 0x1565fc8000 - 0x1566133fff 0x1566134000 - 0x1566136fff 0x1566137000 - 0x1566137fff 0x1566138000 - 0x156613afff 0x156613b000 - 0x156614dfff 0x156614e000 - 0x156614efff 0x156614f000 - 0x156614ffff 0x1566150000 - 0x156626dfff 0x156626e000 - 0x1566270fff 0x1566271000 - 0x1566273fff 0x1566274000 - 0x1566278fff 0x1566279000 - 0x15662cdfff 0x15662ce000 - 0x1566978fff 0x3fffa0f000 - 0x3fffa30fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/regexp/regexp.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/regexp/regexp.fas The following functions were used but not defined: REGEXP:REGEXP-COMPILE REGEXP:REGEXP-EXEC 0 errors, 0 warnings /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K boot -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -C /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit/modprep /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/regexp/regexi.c ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x12eb9000 - 0x12ed9fff 0x80000000 - 0x800bffff 0x15587bb000 - 0x15587d5fff 0x15587d6000 - 0x15587d6fff 0x15587d7000 - 0x15587d7fff 0x15587d8000 - 0x15587d9fff 0x15587da000 - 0x15587dbfff 0x15587dc000 - 0x15587e2fff 0x15587e3000 - 0x15587e3fff 0x15587e4000 - 0x15587e4fff 0x15587e6000 - 0x15587e7fff 0x15587e8000 - 0x1558826fff 0x1558827000 - 0x1558828fff 0x1558829000 - 0x155882ffff 0x1558830000 - 0x1558830fff 0x1558831000 - 0x1558856fff 0x1558857000 - 0x155885afff 0x155885b000 - 0x155885bfff 0x155885c000 - 0x155885dfff 0x155885e000 - 0x155885efff 0x155885f000 - 0x155885ffff 0x1558860000 - 0x1558860fff 0x1558861000 - 0x1558864fff 0x1558865000 - 0x1558865fff 0x1558866000 - 0x1558866fff 0x1558867000 - 0x1558868fff 0x1558869000 - 0x1558869fff 0x155886a000 - 0x155886afff 0x155886b000 - 0x15589d6fff 0x15589d7000 - 0x15589d9fff 0x15589da000 - 0x15589dafff 0x15589db000 - 0x15589ddfff 0x15589de000 - 0x15589f0fff 0x15589f1000 - 0x15589f1fff 0x15589f2000 - 0x15589f2fff 0x15589f3000 - 0x1558b10fff 0x1558b11000 - 0x1558b13fff 0x1558b14000 - 0x1558b16fff 0x1558b17000 - 0x1558b1bfff 0x1558b1c000 - 0x1558b70fff 0x1558b71000 - 0x155921bfff 0x3fff8bd000 - 0x3fff8defff ;; MODPREP: "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/regexp/regexi.c" --> #P"regexi.m.c" ;; MODPREP: reading "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/regexp/regexi.c": 6,375 bytes, 161 lines ;; MODPREP: 11 objects, 3 DEFUNs ;; packages: ("REGEXP") MODPREP: wrote regexi.m.c (11,423 bytes) gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I. -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit \ -c regexi.m.c -o regexi.o /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/regexp/regexi.c: In function ‘C_subr_regexp_regexp_exec’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/regexp/regexi.c:120: warning: this statement may fall through [-Wimplicit-fallthrough=] 120 | with_string_0(string,Symbol_value(S(utf_8)),stringz, { | /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/regexp/regexi.c:120: note: here ln -s /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/regexp/preload.lisp . make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/regexp' mkdir -p readline m=`cd ../modules/readline; pwd`; \ if test -f $m/configure && { test ! -f readline/config.status || test -n "`find $m/configure -prune -newer readline/config.status`"; } ; then ( cd readline ;\ cache=`echo readline/ | sed -e 's,[^/][^/]*//*,../,g'`config.cache; \ if test -f ${cache} ; then \ . ${cache}; \ if test "${ac_cv_env_CC_set}" = set; then CC="${ac_cv_env_CC_value}"; export CC; fi; \ if test "${ac_cv_env_CFLAGS_set}" = set; then CFLAGS="${ac_cv_env_CFLAGS_value}"; export CFLAGS; fi; \ if test "${ac_cv_env_LDFLAGS_set}" = set; then LDFLAGS="${ac_cv_env_LDFLAGS_value}"; export LDFLAGS; fi; \ if test "${ac_cv_env_CLFLAGS_set}" = set; then CLFLAGS="${ac_cv_env_CLFLAGS_value}"; export CLFLAGS; fi; \ if test "${ac_cv_env_LIBS_set}" = set; then LIBS="${ac_cv_env_LIBS_value}"; export LIBS; fi; \ if test "${ac_cv_env_CPPFLAGS_set}" = set; then CPPFLAGS="${ac_cv_env_CPPFLAGS_value}"; export CPPFLAGS; fi; \ if test "${ac_cv_env_CPP_set}" = set; then CPP="${ac_cv_env_CPP_value}"; export CPP; fi; \ if test "${ac_cv_env_CXX_set}" = set; then CXX="${ac_cv_env_CXX_value}"; export CXX; fi; \ if test "${ac_cv_env_CXXFLAGS_set}" = set; then CXXFLAGS="${ac_cv_env_CXXFLAGS_value}"; export CXXFLAGS; fi; \ if test "${ac_cv_env_X_LIBS_set}" = set; then X_LIBS="${ac_cv_env_X_LIBS_value}"; export X_LIBS; fi; \ /bin/sh $m/configure --with-clisp="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K boot -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" --cache-file=${cache} --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm';\ else \ /bin/sh $m/configure --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm'; \ fi ) ;\ fi; \ if test -f $m/Makefile && { test ! -f readline/Makefile || test -n "`find $m/Makefile -prune -newer readline/Makefile`"; } ; then \ sed "s,srcdir = .,srcdir = $m," "$m/Makefile" > readline/Makefile ; \ fi ; \ CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K boot -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" ; \ cd readline ; make clisp-module CC="gcc" CPPFLAGS="-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib" CFLAGS="-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC" CLFLAGS="-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic" LIBS="-Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl " RANLIB="ranlib" CLISP="$CLISP -q" SHREXT=.so configure: loading cache ../config.cache configure: ** Readline (Common) checking how to remove colons from paths... (cached) echo $x checking for CLISP version... (cached) 2.49.93+ (2018-02-18) (built 3813886800) (memory 3828276446) checking for CLISP libdir... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/ checking for CLISP linking set... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build checking for CLISP... (cached) yes checking for FFI in CLISP... yes checking for gcc... (cached) gcc checking whether the C compiler works... yes checking for C compiler default output file name... a.out checking for suffix of executables... checking whether we are cross compiling... no checking for suffix of object files... (cached) o checking whether we are using the GNU C compiler... (cached) yes checking whether gcc accepts -g... (cached) yes checking for gcc option to accept ISO C89... (cached) none needed checking whether gcc understands -c and -o together... (cached) yes checking how to run the C preprocessor... (cached) gcc -E checking how to make hard links... (cached) ln checking whether ln -s works... (cached) yes checking for grep that handles long lines and -e... (cached) /usr/bin/grep checking for egrep... (cached) /usr/bin/grep -E checking for ANSI C header files... (cached) yes checking for sys/types.h... (cached) yes checking for sys/stat.h... (cached) yes checking for stdlib.h... (cached) yes checking for string.h... (cached) yes checking for memory.h... (cached) yes checking for strings.h... (cached) yes checking for inttypes.h... (cached) yes checking for stdint.h... (cached) yes checking for unistd.h... (cached) yes checking for minix/config.h... (cached) no checking whether it is safe to define __EXTENSIONS__... (cached) yes checking whether _XOPEN_SOURCE should be defined... (cached) no configure: ** Readline (Headers, Variables & Functions) checking for library containing tgetent... (cached) -lncurses checking build system type... (cached) riscv64-unknown-linux-gnu checking host system type... (cached) riscv64-unknown-linux-gnu checking for ld used by gcc... (cached) /usr/bin/ld checking if the linker (/usr/bin/ld) is GNU ld... (cached) yes checking for shared library run path origin... (cached) done checking host CPU and C ABI... (cached) riscv64-lp64d checking for the common suffixes of directories in the library search path... (cached) lib,lib checking for readline/readline.h... (cached) yes checking for readline... (cached) yes checking for rl_filename_completion_function... (cached) yes checking for filename_completion_function declaration... (cached) extern char* rl_filename_completion_function(const char*, int); checking whether rl_already_prompted is declared... (cached) yes checking whether rl_readline_name is declared... (cached) yes checking whether rl_gnu_readline_p is declared... (cached) yes checking whether rl_deprep_term_function is declared... (cached) yes checking for readline 4.1 or newer... found GNU readline 4.1 or newer checking whether rl_library_version is declared... yes checking whether rl_readline_version is declared... yes checking whether rl_editing_mode is declared... yes checking whether rl_insert_mode is declared... yes checking whether rl_readline_state is declared... yes checking whether rl_line_buffer is declared... yes checking whether rl_point is declared... yes checking whether rl_end is declared... yes checking whether rl_mark is declared... yes checking whether rl_done is declared... yes checking whether rl_num_chars_to_read is declared... yes checking whether rl_pending_input is declared... yes checking whether rl_dispatching is declared... yes checking whether rl_erase_empty_line is declared... yes checking whether rl_prompt is declared... yes checking whether rl_terminal_name is declared... yes checking whether rl_display_prompt is declared... yes checking whether rl_instream is declared... yes checking whether rl_outstream is declared... yes checking whether rl_last_func is declared... yes checking whether rl_startup_hook is declared... yes checking whether rl_pre_input_hook is declared... yes checking whether rl_prefer_env_winsize is declared... yes checking whether rl_gnu_readline_p is declared... (cached) yes checking whether rl_readline_name is declared... (cached) yes checking whether rl_explicit_arg is declared... yes checking whether rl_numeric_arg is declared... yes checking whether rl_executing_macro is declared... yes checking whether rl_completion_type is declared... yes checking whether rl_filename_quoting_desired is declared... yes checking whether rl_attempted_completion_over is declared... yes checking whether rl_completion_invoking_key is declared... yes checking whether rl_completion_query_items is declared... yes checking whether rl_completion_append_character is declared... yes checking whether rl_completion_suppress_append is declared... yes checking whether rl_completion_quote_character is declared... yes checking whether rl_completion_found_quote is declared... yes checking whether rl_completion_suppress_quote is declared... yes checking whether rl_sort_completion_matches is declared... yes checking whether rl_completion_mark_symlink_dirs is declared... yes checking whether rl_ignore_completion_duplicates is declared... yes checking whether rl_inhibit_completion is declared... yes checking whether rl_event_hook is declared... yes checking whether rl_getc_function is declared... yes checking whether rl_input_available_hook is declared... yes checking whether rl_free_keymap is declared... yes checking for rl_set_prompt... yes checking for rl_initialize... yes checking for rl_read_init_file... yes checking for rl_add_defun... yes checking for rl_make_bare_keymap... yes checking for rl_copy_keymap... yes checking for rl_make_keymap... yes checking for rl_discard_keymap... yes checking for rl_get_keymap... yes checking for rl_set_keymap... yes checking for rl_get_keymap_by_name... yes checking for rl_bind_key... yes checking for rl_bind_key_in_map... yes checking for rl_bind_key_if_unbound... yes checking for rl_bind_key_if_unbound_in_map... yes checking for rl_unbind_key... yes checking for rl_unbind_key_in_map... yes checking for rl_unbind_function_in_map... yes checking for rl_unbind_command_in_map... yes checking for rl_bind_keyseq... yes checking for rl_bind_keyseq_in_map... yes checking for rl_bind_keyseq_if_unbound... yes checking for rl_bind_keyseq_if_unbound_in_map... yes checking for rl_generic_bind... yes checking for rl_parse_and_bind... yes checking for rl_named_function... yes checking for rl_function_of_keyseq... yes checking for rl_invoking_keyseqs... yes checking for rl_invoking_keyseqs_in_map... yes checking for rl_function_dumper... yes checking for rl_list_funmap_names... yes checking for rl_funmap_names... yes checking for rl_add_funmap_entry... yes checking for rl_begin_undo_group... yes checking for rl_end_undo_group... yes checking for rl_add_undo... yes checking for rl_free_undo_list... yes checking for rl_do_undo... yes checking for rl_modifying... yes checking for rl_redisplay... yes checking for rl_forced_update_display... yes checking for rl_on_new_line... yes checking for rl_on_new_line_with_prompt... yes checking for rl_clear_visible_line... yes checking for rl_reset_line_state... yes checking for rl_crlf... yes checking for rl_show_char... yes checking for rl_message... yes checking for rl_clear_message... yes checking for rl_save_prompt... yes checking for rl_restore_prompt... yes checking for rl_expand_prompt... yes checking for rl_insert_text... yes checking for rl_delete_text... yes checking for rl_copy_text... yes checking for rl_kill_text... yes checking for rl_push_macro_input... yes checking for rl_read_key... yes checking for rl_getc... yes checking for rl_stuff_char... yes checking for rl_execute_next... yes checking for rl_clear_pending_input... yes checking for rl_set_keyboard_input_timeout... yes checking for rl_prep_terminal... yes checking for rl_deprep_terminal... yes checking for rl_tty_set_default_bindings... yes checking for rl_reset_terminal... yes checking for rl_replace_line... yes checking for rl_extend_line_buffer... yes checking for rl_ding... yes checking for rl_alphabetic... yes checking for rl_free... yes checking for rl_display_match_list... yes checking for rl_variable_value... yes checking for rl_variable_bind... yes checking for rl_macro_dumper... yes checking for rl_variable_dumper... yes checking for rl_echo_signal_char... yes checking for rl_set_paren_blink_timeout... yes checking for rl_clear_history... yes checking for rl_get_termcap... yes checking for rl_resize_terminal... yes checking for rl_set_screen_size... yes checking for rl_get_screen_size... yes checking for rl_reset_screen_size... yes checking for rl_callback_handler_install... yes checking for rl_callback_read_char... yes checking for rl_callback_handler_remove... yes checking for using_history... yes checking for add_history... yes checking for clear_history... yes checking for stifle_history... yes checking for unstifle_history... yes checking for history_is_stifled... yes checking for where_history... yes checking for history_total_bytes... yes checking for history_set_pos... yes checking for history_search... yes checking for history_search_prefix... yes checking for history_search_pos... yes checking for read_history... yes checking for read_history_range... yes checking for write_history... yes checking for append_history... yes checking for history_truncate_file... yes checking for tilde_expand... yes checking for rl_free_keymap... yes configure: ** Readline (Output) configure: updating cache ../config.cache configure: creating ./config.status config.status: creating Makefile config.status: creating link.sh config.status: creating config.h configure: ** Readline (Done) make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/readline' /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K boot -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/readline/readline.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3ce1000 - 0x3d01fff 0x80000000 - 0x800bffff 0x158457f000 - 0x1584599fff 0x158459a000 - 0x158459afff 0x158459b000 - 0x158459bfff 0x158459c000 - 0x158459dfff 0x158459e000 - 0x158459ffff 0x15845a0000 - 0x15845a6fff 0x15845a7000 - 0x15845a7fff 0x15845a8000 - 0x15845a8fff 0x15845aa000 - 0x15845abfff 0x15845ac000 - 0x15845eafff 0x15845eb000 - 0x15845ecfff 0x15845ed000 - 0x15845f3fff 0x15845f4000 - 0x15845f4fff 0x15845f5000 - 0x158461afff 0x158461b000 - 0x158461efff 0x158461f000 - 0x158461ffff 0x1584620000 - 0x1584621fff 0x1584622000 - 0x1584622fff 0x1584623000 - 0x1584623fff 0x1584624000 - 0x1584624fff 0x1584625000 - 0x1584628fff 0x1584629000 - 0x1584629fff 0x158462a000 - 0x158462afff 0x158462b000 - 0x158462cfff 0x158462d000 - 0x158462dfff 0x158462e000 - 0x158462efff 0x158462f000 - 0x158479afff 0x158479b000 - 0x158479dfff 0x158479e000 - 0x158479efff 0x158479f000 - 0x15847a1fff 0x15847a2000 - 0x15847b4fff 0x15847b5000 - 0x15847b5fff 0x15847b6000 - 0x15847b6fff 0x15847b7000 - 0x15848d4fff 0x15848d5000 - 0x15848d7fff 0x15848d8000 - 0x15848dafff 0x15848db000 - 0x15848dffff 0x15848e0000 - 0x1584934fff 0x1584935000 - 0x1584fdffff 0x3fffc8c000 - 0x3fffcadfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/readline/readline.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/readline/readline.fas ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/readline/readline.c 0 errors, 0 warnings gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit -c readline.c make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/readline' rm -rf base MAKE=make CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K boot -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" with_dynamic_modules=no ./clisp-link add boot base i18n syscalls regexp readline || (rm -rf base ; exit 1) make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/i18n' make[1]: Nothing to be done for 'clisp-module'. make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/i18n' make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls' make[1]: Nothing to be done for 'clisp-module'. make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls' make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/regexp' make[1]: Nothing to be done for 'clisp-module'. make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/regexp' make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/readline' make[1]: Nothing to be done for 'clisp-module'. make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/readline' gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit -c modules.c gcc -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic modules.o readline.o -lreadline -lncurses regexi.o calls.o -lm -lcrypt gettext.o lisp.a -Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl -o lisp.run boot/lisp.run -B . -M boot/lispinit.mem -norc -q -i i18n/preload.lisp -i syscalls/preload.lisp -i regexp/preload.lisp -x (saveinitmem "base/lispinit.mem") Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3d9f000 - 0x3dbffff 0x80000000 - 0x800bffff 0x158412f000 - 0x1584149fff 0x158414a000 - 0x158414afff 0x158414b000 - 0x158414bfff 0x158414c000 - 0x158414dfff 0x158414e000 - 0x158414ffff 0x1584150000 - 0x1584156fff 0x1584157000 - 0x1584157fff 0x1584158000 - 0x1584158fff 0x158415a000 - 0x158415bfff 0x158415c000 - 0x158419afff 0x158419b000 - 0x158419cfff 0x158419d000 - 0x15841a3fff 0x15841a4000 - 0x15841a4fff 0x15841a5000 - 0x15841cafff 0x15841cb000 - 0x15841cefff 0x15841cf000 - 0x15841cffff 0x15841d0000 - 0x15841d1fff 0x15841d2000 - 0x15841d2fff 0x15841d3000 - 0x15841d3fff 0x15841d4000 - 0x15841d4fff 0x15841d5000 - 0x15841d8fff 0x15841d9000 - 0x15841d9fff 0x15841da000 - 0x15841dafff 0x15841db000 - 0x15841dcfff 0x15841dd000 - 0x15841ddfff 0x15841de000 - 0x15841defff 0x15841df000 - 0x158434afff 0x158434b000 - 0x158434dfff 0x158434e000 - 0x158434efff 0x158434f000 - 0x1584351fff 0x1584352000 - 0x1584364fff 0x1584365000 - 0x1584365fff 0x1584366000 - 0x1584366fff 0x1584367000 - 0x1584484fff 0x1584485000 - 0x1584487fff 0x1584488000 - 0x158448afff 0x158448b000 - 0x158448ffff 0x1584490000 - 0x15844e4fff 0x15844e5000 - 0x1584b8ffff 0x3fffa70000 - 0x3fffa90fff ;; Loading file i18n/preload.lisp ... ;; Loaded file i18n/preload.lisp ;; Loading file syscalls/preload.lisp ... ;; Loaded file syscalls/preload.lisp ;; Loading file regexp/preload.lisp ... ;; Loaded file regexp/preload.lisp ;; Wrote the memory image into base/lispinit.mem (3,310,952 bytes) Bytes permanently allocated: 173,664 Bytes currently in use: 3,134,440 Bytes available until next GC: 1,562,288 3134440 ; 1562288 ; 173664 ; 1 ; 256632 ; 39840 base/lisp.run -B . -M base/lispinit.mem -norc -q -i i18n/i18n -i syscalls/posix -i regexp/regexp -i readline/readline -x (saveinitmem "base/lispinit.mem") Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x13582000 - 0x135a2fff 0x80000000 - 0x800bffff 0x157bac5000 - 0x157badffff 0x157bae0000 - 0x157bae0fff 0x157bae1000 - 0x157bae1fff 0x157bae2000 - 0x157bae3fff 0x157bae4000 - 0x157bae5fff 0x157bae6000 - 0x157baecfff 0x157baed000 - 0x157baedfff 0x157baee000 - 0x157baeefff 0x157baf0000 - 0x157baf1fff 0x157baf2000 - 0x157bb30fff 0x157bb31000 - 0x157bb32fff 0x157bb33000 - 0x157bb39fff 0x157bb3a000 - 0x157bb3afff 0x157bb3b000 - 0x157bbc4fff 0x157bbc5000 - 0x157bbc5fff 0x157bbc6000 - 0x157bbc6fff 0x157bbc7000 - 0x157bbf6fff 0x157bbf7000 - 0x157bbf7fff 0x157bbf8000 - 0x157bbf8fff 0x157bbf9000 - 0x157bbf9fff 0x157bbfa000 - 0x157bc01fff 0x157bc02000 - 0x157bc27fff 0x157bc28000 - 0x157bc2bfff 0x157bc2c000 - 0x157bc2cfff 0x157bc2d000 - 0x157bc2efff 0x157bc2f000 - 0x157bc2ffff 0x157bc30000 - 0x157bc30fff 0x157bc31000 - 0x157bc31fff 0x157bc32000 - 0x157bc35fff 0x157bc36000 - 0x157bc36fff 0x157bc37000 - 0x157bc37fff 0x157bc38000 - 0x157bc39fff 0x157bc3a000 - 0x157bc3bfff 0x157bc3c000 - 0x157bc3cfff 0x157bc3d000 - 0x157bc3dfff 0x157bc3e000 - 0x157bda9fff 0x157bdaa000 - 0x157bdacfff 0x157bdad000 - 0x157bdadfff 0x157bdae000 - 0x157bdaefff 0x157bdaf000 - 0x157bdc1fff 0x157bdc2000 - 0x157bdc2fff 0x157bdc3000 - 0x157bdc3fff 0x157bdc4000 - 0x157bee1fff 0x157bee2000 - 0x157bee4fff 0x157bee5000 - 0x157bee7fff 0x157bee8000 - 0x157beecfff 0x157beed000 - 0x157bf41fff 0x157bf42000 - 0x157c5ecfff 0x3fffa71000 - 0x3fffa91fff ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/i18n/i18n.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/i18n/i18n.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls/posix.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls/posix.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/regexp/regexp.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/regexp/regexp.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/readline/readline.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/readline/readline.fas ;; Wrote the memory image into base/lispinit.mem (3,793,344 bytes) Bytes permanently allocated: 180,216 Bytes currently in use: 3,605,024 Bytes available until next GC: 1,797,580 3605024 ; 1797580 ; 180216 ; 2 ; 1575032 ; 155050 mkdir -p asdf m=`cd ../modules/asdf; pwd`; \ if test -f $m/configure && { test ! -f asdf/config.status || test -n "`find $m/configure -prune -newer asdf/config.status`"; } ; then ( cd asdf ;\ cache=`echo asdf/ | sed -e 's,[^/][^/]*//*,../,g'`config.cache; \ if test -f ${cache} ; then \ . ${cache}; \ if test "${ac_cv_env_CC_set}" = set; then CC="${ac_cv_env_CC_value}"; export CC; fi; \ if test "${ac_cv_env_CFLAGS_set}" = set; then CFLAGS="${ac_cv_env_CFLAGS_value}"; export CFLAGS; fi; \ if test "${ac_cv_env_LDFLAGS_set}" = set; then LDFLAGS="${ac_cv_env_LDFLAGS_value}"; export LDFLAGS; fi; \ if test "${ac_cv_env_CLFLAGS_set}" = set; then CLFLAGS="${ac_cv_env_CLFLAGS_value}"; export CLFLAGS; fi; \ if test "${ac_cv_env_LIBS_set}" = set; then LIBS="${ac_cv_env_LIBS_value}"; export LIBS; fi; \ if test "${ac_cv_env_CPPFLAGS_set}" = set; then CPPFLAGS="${ac_cv_env_CPPFLAGS_value}"; export CPPFLAGS; fi; \ if test "${ac_cv_env_CPP_set}" = set; then CPP="${ac_cv_env_CPP_value}"; export CPP; fi; \ if test "${ac_cv_env_CXX_set}" = set; then CXX="${ac_cv_env_CXX_value}"; export CXX; fi; \ if test "${ac_cv_env_CXXFLAGS_set}" = set; then CXXFLAGS="${ac_cv_env_CXXFLAGS_value}"; export CXXFLAGS; fi; \ if test "${ac_cv_env_X_LIBS_set}" = set; then X_LIBS="${ac_cv_env_X_LIBS_value}"; export X_LIBS; fi; \ /bin/sh $m/configure --with-clisp="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" --cache-file=${cache} --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm';\ else \ /bin/sh $m/configure --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm'; \ fi ) ;\ fi; \ if test -f $m/Makefile && { test ! -f asdf/Makefile || test -n "`find $m/Makefile -prune -newer asdf/Makefile`"; } ; then \ sed "s,srcdir = .,srcdir = $m," "$m/Makefile" > asdf/Makefile ; \ fi ; \ CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" ; \ cd asdf ; make clisp-module CC="gcc" CPPFLAGS="-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib" CFLAGS="-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC" CLFLAGS="-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic" LIBS="-Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl " RANLIB="ranlib" CLISP="$CLISP -q" SHREXT=.so make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/asdf' /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -m 2MW -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/asdf/asdf.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x3cbfd000 - 0x3cc1dfff 0x80000000 - 0x800bffff 0x158e0f9000 - 0x158e113fff 0x158e114000 - 0x158e114fff 0x158e115000 - 0x158e115fff 0x158e116000 - 0x158e117fff 0x158e118000 - 0x158e119fff 0x158e11a000 - 0x158e120fff 0x158e121000 - 0x158e121fff 0x158e122000 - 0x158e122fff 0x158e124000 - 0x158e125fff 0x158e126000 - 0x158e164fff 0x158e165000 - 0x158e166fff 0x158e167000 - 0x158e16dfff 0x158e16e000 - 0x158e16efff 0x158e16f000 - 0x158e1f8fff 0x158e1f9000 - 0x158e1f9fff 0x158e1fa000 - 0x158e1fafff 0x158e1fb000 - 0x158e22afff 0x158e22b000 - 0x158e22bfff 0x158e22c000 - 0x158e22cfff 0x158e22d000 - 0x158e22dfff 0x158e22e000 - 0x158e235fff 0x158e236000 - 0x158e25bfff 0x158e25c000 - 0x158e25ffff 0x158e260000 - 0x158e260fff 0x158e261000 - 0x158e262fff 0x158e263000 - 0x158e263fff 0x158e264000 - 0x158e264fff 0x158e265000 - 0x158e265fff 0x158e266000 - 0x158e269fff 0x158e26a000 - 0x158e26afff 0x158e26b000 - 0x158e26bfff 0x158e26c000 - 0x158e26dfff 0x158e26e000 - 0x158e26ffff 0x158e270000 - 0x158e270fff 0x158e271000 - 0x158e271fff 0x158e272000 - 0x158e3ddfff 0x158e3de000 - 0x158e3e0fff 0x158e3e1000 - 0x158e3e1fff 0x158e3e2000 - 0x158e3e2fff 0x158e3e3000 - 0x158e3f5fff 0x158e3f6000 - 0x158e3f6fff 0x158e3f7000 - 0x158e3f7fff 0x158e3f8000 - 0x158e515fff 0x158e516000 - 0x158e518fff 0x158e519000 - 0x158e51bfff 0x158e51c000 - 0x158e520fff 0x158e521000 - 0x158e575fff 0x158e576000 - 0x158ec20fff 0x3fffd06000 - 0x3fffd27fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/asdf/asdf.lisp ... WARNING: DEPRECATED-FUNCTION-STYLE-WARNING: Using deprecated function ASDF/BACKWARD-INTERFACE:EXPLAIN -- please update your code to use a newer API. The docstring for this function says: Display a message describing an action. DEPRECATED. Use ASDF:ACTION-DESCRIPTION and/or ASDF::FORMAT-ACTION instead. WARNING: DEPRECATED-FUNCTION-STYLE-WARNING: Using deprecated function ASDF/BACKWARD-INTERFACE:EXPLAIN -- please update your code to use a newer API. The docstring for this function says: Display a message describing an action. DEPRECATED. Use ASDF:ACTION-DESCRIPTION and/or ASDF::FORMAT-ACTION instead. WARNING: DEPRECATED-FUNCTION-STYLE-WARNING: Using deprecated function ASDF/BACKWARD-INTERFACE:EXPLAIN -- please update your code to use a newer API. The docstring for this function says: Display a message describing an action. DEPRECATED. Use ASDF:ACTION-DESCRIPTION and/or ASDF::FORMAT-ACTION instead. ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/asdf/asdf.fas 0 errors, 3 warnings ln -s /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/asdf/link.sh . make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/asdf' mkdir -p berkeley-db m=`cd ../modules/berkeley-db; pwd`; \ if test -f $m/configure && { test ! -f berkeley-db/config.status || test -n "`find $m/configure -prune -newer berkeley-db/config.status`"; } ; then ( cd berkeley-db ;\ cache=`echo berkeley-db/ | sed -e 's,[^/][^/]*//*,../,g'`config.cache; \ if test -f ${cache} ; then \ . ${cache}; \ if test "${ac_cv_env_CC_set}" = set; then CC="${ac_cv_env_CC_value}"; export CC; fi; \ if test "${ac_cv_env_CFLAGS_set}" = set; then CFLAGS="${ac_cv_env_CFLAGS_value}"; export CFLAGS; fi; \ if test "${ac_cv_env_LDFLAGS_set}" = set; then LDFLAGS="${ac_cv_env_LDFLAGS_value}"; export LDFLAGS; fi; \ if test "${ac_cv_env_CLFLAGS_set}" = set; then CLFLAGS="${ac_cv_env_CLFLAGS_value}"; export CLFLAGS; fi; \ if test "${ac_cv_env_LIBS_set}" = set; then LIBS="${ac_cv_env_LIBS_value}"; export LIBS; fi; \ if test "${ac_cv_env_CPPFLAGS_set}" = set; then CPPFLAGS="${ac_cv_env_CPPFLAGS_value}"; export CPPFLAGS; fi; \ if test "${ac_cv_env_CPP_set}" = set; then CPP="${ac_cv_env_CPP_value}"; export CPP; fi; \ if test "${ac_cv_env_CXX_set}" = set; then CXX="${ac_cv_env_CXX_value}"; export CXX; fi; \ if test "${ac_cv_env_CXXFLAGS_set}" = set; then CXXFLAGS="${ac_cv_env_CXXFLAGS_value}"; export CXXFLAGS; fi; \ if test "${ac_cv_env_X_LIBS_set}" = set; then X_LIBS="${ac_cv_env_X_LIBS_value}"; export X_LIBS; fi; \ /bin/sh $m/configure --with-clisp="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" --cache-file=${cache} --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm';\ else \ /bin/sh $m/configure --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm'; \ fi ) ;\ fi; \ if test -f $m/Makefile && { test ! -f berkeley-db/Makefile || test -n "`find $m/Makefile -prune -newer berkeley-db/Makefile`"; } ; then \ sed "s,srcdir = .,srcdir = $m," "$m/Makefile" > berkeley-db/Makefile ; \ fi ; \ CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" ; \ cd berkeley-db ; make clisp-module CC="gcc" CPPFLAGS="-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib" CFLAGS="-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC" CLFLAGS="-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic" LIBS="-Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl " RANLIB="ranlib" CLISP="$CLISP -q" SHREXT=.so configure: loading cache ../config.cache configure: ** Berkeley-DB (Common) checking how to remove colons from paths... (cached) echo $x checking for CLISP version... (cached) 2.49.93+ (2018-02-18) (built 3813886800) (memory 3828276446) checking for CLISP libdir... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/ checking for CLISP linking set... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build checking for CLISP... (cached) yes checking for gcc... (cached) gcc checking whether the C compiler works... yes checking for C compiler default output file name... a.out checking for suffix of executables... checking whether we are cross compiling... no checking for suffix of object files... (cached) o checking whether we are using the GNU C compiler... (cached) yes checking whether gcc accepts -g... (cached) yes checking for gcc option to accept ISO C89... (cached) none needed checking whether gcc understands -c and -o together... (cached) yes checking how to run the C preprocessor... (cached) gcc -E checking how to make hard links... (cached) ln checking whether ln -s works... (cached) yes checking for grep that handles long lines and -e... (cached) /usr/bin/grep checking for egrep... (cached) /usr/bin/grep -E checking for ANSI C header files... (cached) yes checking for sys/types.h... (cached) yes checking for sys/stat.h... (cached) yes checking for stdlib.h... (cached) yes checking for string.h... (cached) yes checking for memory.h... (cached) yes checking for strings.h... (cached) yes checking for inttypes.h... (cached) yes checking for stdint.h... (cached) yes checking for unistd.h... (cached) yes checking for minix/config.h... (cached) no checking whether it is safe to define __EXTENSIONS__... (cached) yes checking whether _XOPEN_SOURCE should be defined... (cached) no checking build system type... (cached) riscv64-unknown-linux-gnu checking host system type... (cached) riscv64-unknown-linux-gnu checking for ld used by gcc... (cached) /usr/bin/ld checking if the linker (/usr/bin/ld) is GNU ld... (cached) yes checking for shared library run path origin... (cached) done checking host CPU and C ABI... (cached) riscv64-lp64d checking for the common suffixes of directories in the library search path... (cached) lib,lib checking how to link with libdb... /usr/lib64/libdb.so -L/usr/lib64 checking for special C compiler options needed for large files... (cached) no checking for _FILE_OFFSET_BITS value needed for large files... (cached) no configure: ** Berkeley-DB (Headers) checking db.h usability... yes checking db.h presence... yes checking for db.h... yes configure: ** Berkeley-DB (Functions) checking for library containing db_env_create... none required checking for DB_ENV.get_home... yes checking for DB_ENV.set_msgcall... yes checking size of db_recno_t... 4 checking whether DB->stat() accepts TXNid... yes checking whether DB_ENV->set_errcall() accepts DBE... yes checking whether DB->get_transactional() accepts just 1 argument... yes checking for DB_LOCK_STAT.st_nconflicts... no checking for DB_LOCK_STAT.st_lock_wait... yes checking for DB_LOCK_STAT.st_nnowaits... no checking for DB_LOCK_STAT.st_lock_nowait... yes checking for DB_ENV.mutex_set_tas_spins... yes checking for DB_ENV.mutex_get_tas_spins... yes checking for DB_ENV.mutex_set_align... yes checking for DB_ENV.mutex_get_align... yes checking whether DB_LOCK_READ_UNCOMMITTED is declared... yes checking for DB_ENV.log_set_config... yes checking for DB_ENV.get_intermediate_dir_mode... yes checking for DB_TXN_ACTIVE.gid... yes checking for DB_TXN_ACTIVE.status... yes checking for db_full_version... yes checking for DB.compact... yes configure: ** Berkeley-DB (Output) configure: updating cache ../config.cache configure: creating ./config.status config.status: creating Makefile config.status: creating link.sh config.status: creating config.h configure: ** Berkeley-DB (Done) make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/berkeley-db' /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -C /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit/modprep /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x42dc000 - 0x42fcfff 0x80000000 - 0x800bffff 0x1589a6b000 - 0x1589a85fff 0x1589a86000 - 0x1589a86fff 0x1589a87000 - 0x1589a87fff 0x1589a88000 - 0x1589a89fff 0x1589a8a000 - 0x1589a8bfff 0x1589a8c000 - 0x1589a92fff 0x1589a93000 - 0x1589a93fff 0x1589a94000 - 0x1589a94fff 0x1589a96000 - 0x1589a97fff 0x1589a98000 - 0x1589ad6fff 0x1589ad7000 - 0x1589ad8fff 0x1589ad9000 - 0x1589adffff 0x1589ae0000 - 0x1589ae0fff 0x1589ae1000 - 0x1589b6afff 0x1589b6b000 - 0x1589b6bfff 0x1589b6c000 - 0x1589b6cfff 0x1589b6d000 - 0x1589b9cfff 0x1589b9d000 - 0x1589b9dfff 0x1589b9e000 - 0x1589b9efff 0x1589b9f000 - 0x1589b9ffff 0x1589ba0000 - 0x1589ba7fff 0x1589ba8000 - 0x1589bcdfff 0x1589bce000 - 0x1589bd1fff 0x1589bd2000 - 0x1589bd2fff 0x1589bd3000 - 0x1589bd4fff 0x1589bd5000 - 0x1589bd5fff 0x1589bd6000 - 0x1589bd6fff 0x1589bd7000 - 0x1589bd7fff 0x1589bd8000 - 0x1589bdbfff 0x1589bdc000 - 0x1589bdcfff 0x1589bdd000 - 0x1589bddfff 0x1589bde000 - 0x1589bdffff 0x1589be0000 - 0x1589be1fff 0x1589be2000 - 0x1589be2fff 0x1589be3000 - 0x1589be3fff 0x1589be4000 - 0x1589d4ffff 0x1589d50000 - 0x1589d52fff 0x1589d53000 - 0x1589d53fff 0x1589d54000 - 0x1589d54fff 0x1589d55000 - 0x1589d67fff 0x1589d68000 - 0x1589d68fff 0x1589d69000 - 0x1589d69fff 0x1589d6a000 - 0x1589e87fff 0x1589e88000 - 0x1589e8afff 0x1589e8b000 - 0x1589e8dfff 0x1589e8e000 - 0x1589e92fff 0x1589e93000 - 0x1589ee7fff 0x1589ee8000 - 0x158a592fff 0x3fffcc3000 - 0x3fffce4fff ;; MODPREP: "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c" --> #P"bdb.m.c" ;; MODPREP: reading "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c": 108,559 bytes, 2,714 lines ;; MODPREP: 285 objects, 62 DEFUNs, 1 DEFVAR (1 init) ;; packages: ("BDB") MODPREP: wrote bdb.m.c (211,538 bytes) gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I. -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit \ -c bdb.m.c -o bdb.o /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c: In function ‘error_callback’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c:150:43: warning: unused parameter ‘dbe’ [-Wunused-parameter] 150 | static void error_callback (const DB_ENV* dbe, | ~~~~~~~~~~~~~~^~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c: In function ‘C_subr_bdb_txn_recover’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c:2760:49: warning: passing argument 4 of ‘dbe->txn_recover’ from incompatible pointer type [-Wincompatible-pointer-types] 2760 | status = dbe->txn_recover(dbe,preplist,tx_max,&retnum,flags); | ^~~~~~~ | | | u_int32_t * {aka unsigned int *} /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c:2760:49: note: expected ‘long int *’ but argument is of type ‘u_int32_t *’ {aka ‘unsigned int *’} /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c: In function ‘C_subr_bdb_dbe_get_options’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c:1175:103: warning: this statement may fall through [-Wimplicit-fallthrough=] 1175 | case DB_ENCRYPT_AES: VALUES1(`:ENCRYPT-AES`); | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c:1176:7: note: here 1176 | case 0: VALUES1(NIL); | ^~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c:1176:97: warning: this statement may fall through [-Wimplicit-fallthrough=] 1176 | case 0: VALUES1(NIL); | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c:1177:7: note: here 1177 | default: NOTREACHED; | ^~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c: In function ‘dbt_to_object’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c:1384:10: warning: this statement may fall through [-Wimplicit-fallthrough=] 1384 | if (key_type == -1) { | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c:1409:5: note: here 1409 | default: NOTREACHED; | ^~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c: In function ‘C_subr_bdb_db_get_options’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c:2119:103: warning: this statement may fall through [-Wimplicit-fallthrough=] 2119 | case DB_ENCRYPT_AES: VALUES1(`:ENCRYPT-AES`); | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c:2120:7: note: here 2120 | case 0: VALUES1(NIL); | ^~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c:2120:97: warning: this statement may fall through [-Wimplicit-fallthrough=] 2120 | case 0: VALUES1(NIL); | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/bdb.c:2121:7: note: here 2121 | default: NOTREACHED; | ^~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/dbi.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x419f000 - 0x41bffff 0x80000000 - 0x800bffff 0x158999a000 - 0x15899b4fff 0x15899b5000 - 0x15899b5fff 0x15899b6000 - 0x15899b6fff 0x15899b7000 - 0x15899b8fff 0x15899b9000 - 0x15899bafff 0x15899bb000 - 0x15899c1fff 0x15899c2000 - 0x15899c2fff 0x15899c3000 - 0x15899c3fff 0x15899c5000 - 0x15899c6fff 0x15899c7000 - 0x1589a05fff 0x1589a06000 - 0x1589a07fff 0x1589a08000 - 0x1589a0efff 0x1589a0f000 - 0x1589a0ffff 0x1589a10000 - 0x1589a99fff 0x1589a9a000 - 0x1589a9afff 0x1589a9b000 - 0x1589a9bfff 0x1589a9c000 - 0x1589acbfff 0x1589acc000 - 0x1589accfff 0x1589acd000 - 0x1589acdfff 0x1589ace000 - 0x1589acefff 0x1589acf000 - 0x1589ad6fff 0x1589ad7000 - 0x1589afcfff 0x1589afd000 - 0x1589b00fff 0x1589b01000 - 0x1589b01fff 0x1589b02000 - 0x1589b03fff 0x1589b04000 - 0x1589b04fff 0x1589b05000 - 0x1589b05fff 0x1589b06000 - 0x1589b06fff 0x1589b07000 - 0x1589b0afff 0x1589b0b000 - 0x1589b0bfff 0x1589b0c000 - 0x1589b0cfff 0x1589b0d000 - 0x1589b0efff 0x1589b0f000 - 0x1589b10fff 0x1589b11000 - 0x1589b11fff 0x1589b12000 - 0x1589b12fff 0x1589b13000 - 0x1589c7efff 0x1589c7f000 - 0x1589c81fff 0x1589c82000 - 0x1589c82fff 0x1589c83000 - 0x1589c83fff 0x1589c84000 - 0x1589c96fff 0x1589c97000 - 0x1589c97fff 0x1589c98000 - 0x1589c98fff 0x1589c99000 - 0x1589db6fff 0x1589db7000 - 0x1589db9fff 0x1589dba000 - 0x1589dbcfff 0x1589dbd000 - 0x1589dc1fff 0x1589dc2000 - 0x1589e16fff 0x1589e17000 - 0x158a4c1fff 0x3fffdf1000 - 0x3fffe12fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/dbi.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/berkeley-db/dbi.fas The following functions were used but not defined: BDB:DBE-CLOSE BDB:DB-CLOSE BDB:DBC-CLOSE BDB:LOCK-CLOSE BDB:LOGC-CLOSE BDB:TXN-ABORT BDB:TXN-COMMIT 0 errors, 0 warnings ln -s /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/berkeley-db/preload.lisp . make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/berkeley-db' mkdir -p bindings/glibc m=`cd ../modules/bindings/glibc; pwd`; \ if test -f $m/configure && { test ! -f bindings/glibc/config.status || test -n "`find $m/configure -prune -newer bindings/glibc/config.status`"; } ; then ( cd bindings/glibc ;\ cache=`echo bindings/glibc/ | sed -e 's,[^/][^/]*//*,../,g'`config.cache; \ if test -f ${cache} ; then \ . ${cache}; \ if test "${ac_cv_env_CC_set}" = set; then CC="${ac_cv_env_CC_value}"; export CC; fi; \ if test "${ac_cv_env_CFLAGS_set}" = set; then CFLAGS="${ac_cv_env_CFLAGS_value}"; export CFLAGS; fi; \ if test "${ac_cv_env_LDFLAGS_set}" = set; then LDFLAGS="${ac_cv_env_LDFLAGS_value}"; export LDFLAGS; fi; \ if test "${ac_cv_env_CLFLAGS_set}" = set; then CLFLAGS="${ac_cv_env_CLFLAGS_value}"; export CLFLAGS; fi; \ if test "${ac_cv_env_LIBS_set}" = set; then LIBS="${ac_cv_env_LIBS_value}"; export LIBS; fi; \ if test "${ac_cv_env_CPPFLAGS_set}" = set; then CPPFLAGS="${ac_cv_env_CPPFLAGS_value}"; export CPPFLAGS; fi; \ if test "${ac_cv_env_CPP_set}" = set; then CPP="${ac_cv_env_CPP_value}"; export CPP; fi; \ if test "${ac_cv_env_CXX_set}" = set; then CXX="${ac_cv_env_CXX_value}"; export CXX; fi; \ if test "${ac_cv_env_CXXFLAGS_set}" = set; then CXXFLAGS="${ac_cv_env_CXXFLAGS_value}"; export CXXFLAGS; fi; \ if test "${ac_cv_env_X_LIBS_set}" = set; then X_LIBS="${ac_cv_env_X_LIBS_value}"; export X_LIBS; fi; \ /bin/sh $m/configure --with-clisp="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" --cache-file=${cache} --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm';\ else \ /bin/sh $m/configure --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm'; \ fi ) ;\ fi; \ if test -f $m/Makefile && { test ! -f bindings/glibc/Makefile || test -n "`find $m/Makefile -prune -newer bindings/glibc/Makefile`"; } ; then \ sed "s,srcdir = .,srcdir = $m," "$m/Makefile" > bindings/glibc/Makefile ; \ fi ; \ CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" ; \ cd bindings/glibc ; make clisp-module CC="gcc" CPPFLAGS="-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib" CFLAGS="-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC" CLFLAGS="-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic" LIBS="-Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl " RANLIB="ranlib" CLISP="$CLISP -q" SHREXT=.so make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc' /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/bindings/glibc/linux.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x1984c000 - 0x1986cfff 0x80000000 - 0x800bffff 0x155b2fb000 - 0x155b315fff 0x155b316000 - 0x155b316fff 0x155b317000 - 0x155b317fff 0x155b318000 - 0x155b319fff 0x155b31a000 - 0x155b31bfff 0x155b31c000 - 0x155b322fff 0x155b323000 - 0x155b323fff 0x155b324000 - 0x155b324fff 0x155b326000 - 0x155b327fff 0x155b328000 - 0x155b366fff 0x155b367000 - 0x155b368fff 0x155b369000 - 0x155b36ffff 0x155b370000 - 0x155b370fff 0x155b371000 - 0x155b3fafff 0x155b3fb000 - 0x155b3fbfff 0x155b3fc000 - 0x155b3fcfff 0x155b3fd000 - 0x155b42cfff 0x155b42d000 - 0x155b42dfff 0x155b42e000 - 0x155b42efff 0x155b42f000 - 0x155b42ffff 0x155b430000 - 0x155b437fff 0x155b438000 - 0x155b45dfff 0x155b45e000 - 0x155b461fff 0x155b462000 - 0x155b462fff 0x155b463000 - 0x155b464fff 0x155b465000 - 0x155b465fff 0x155b466000 - 0x155b466fff 0x155b467000 - 0x155b467fff 0x155b468000 - 0x155b46bfff 0x155b46c000 - 0x155b46cfff 0x155b46d000 - 0x155b46dfff 0x155b46e000 - 0x155b46ffff 0x155b470000 - 0x155b471fff 0x155b472000 - 0x155b472fff 0x155b473000 - 0x155b473fff 0x155b474000 - 0x155b5dffff 0x155b5e0000 - 0x155b5e2fff 0x155b5e3000 - 0x155b5e3fff 0x155b5e4000 - 0x155b5e4fff 0x155b5e5000 - 0x155b5f7fff 0x155b5f8000 - 0x155b5f8fff 0x155b5f9000 - 0x155b5f9fff 0x155b5fa000 - 0x155b717fff 0x155b718000 - 0x155b71afff 0x155b71b000 - 0x155b71dfff 0x155b71e000 - 0x155b722fff 0x155b723000 - 0x155b777fff 0x155b778000 - 0x155be22fff 0x3fff963000 - 0x3fff984fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/bindings/glibc/linux.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc/linux.fas ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc/linux.c 0 errors, 0 warnings gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I$(/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -b)/linkkit -c linux.c linux.c: In function ‘module__linux__init_function_2’: linux.c:979:3: warning: ‘readdir_r’ is deprecated [-Wdeprecated-declarations] 979 | register_foreign_function((void*)&readdir_r,"readdir_r",1024); | ^~~~~~~~~~~~~~~~~~~~~~~~~ In file included from linux.c:23: /usr/include/dirent.h:183:12: note: declared here 183 | extern int readdir_r (DIR *__restrict __dirp, | ^~~~~~~~~ linux.c:980:3: warning: ‘readdir64_r’ is deprecated [-Wdeprecated-declarations] 980 | register_foreign_function((void*)&readdir64_r,"readdir64_r",1024); | ^~~~~~~~~~~~~~~~~~~~~~~~~ In file included from linux.c:23: /usr/include/dirent.h:201:12: note: declared here 201 | extern int readdir64_r (DIR *__restrict __dirp, | ^~~~~~~~~~~ linux.c:1033:3: warning: ‘sigpause’ is deprecated: Use the sigsuspend function instead [-Wdeprecated-declarations] 1033 | register_foreign_function((void*)&sigpause,"sigpause",1024); | ^~~~~~~~~~~~~~~~~~~~~~~~~ In file included from /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib/signal.h:52, from /usr/include/sys/wait.h:36, from /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib/sys/wait.h:28, from linux.c:17: /usr/include/signal.h:151:12: note: declared here 151 | extern int sigpause (int __sig) __asm__ ("__xpg_sigpause") | ^~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/bindings/glibc/wrap.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x3cf000 - 0x3effff 0x80000000 - 0x800bffff 0x15816a6000 - 0x15816c0fff 0x15816c1000 - 0x15816c1fff 0x15816c2000 - 0x15816c2fff 0x15816c3000 - 0x15816c4fff 0x15816c5000 - 0x15816c6fff 0x15816c7000 - 0x15816cdfff 0x15816ce000 - 0x15816cefff 0x15816cf000 - 0x15816cffff 0x15816d1000 - 0x15816d2fff 0x15816d3000 - 0x1581711fff 0x1581712000 - 0x1581713fff 0x1581714000 - 0x158171afff 0x158171b000 - 0x158171bfff 0x158171c000 - 0x15817a5fff 0x15817a6000 - 0x15817a6fff 0x15817a7000 - 0x15817a7fff 0x15817a8000 - 0x15817d7fff 0x15817d8000 - 0x15817d8fff 0x15817d9000 - 0x15817d9fff 0x15817da000 - 0x15817dafff 0x15817db000 - 0x15817e2fff 0x15817e3000 - 0x1581808fff 0x1581809000 - 0x158180cfff 0x158180d000 - 0x158180dfff 0x158180e000 - 0x158180ffff 0x1581810000 - 0x1581810fff 0x1581811000 - 0x1581811fff 0x1581812000 - 0x1581812fff 0x1581813000 - 0x1581816fff 0x1581817000 - 0x1581817fff 0x1581818000 - 0x1581818fff 0x1581819000 - 0x158181afff 0x158181b000 - 0x158181cfff 0x158181d000 - 0x158181dfff 0x158181e000 - 0x158181efff 0x158181f000 - 0x158198afff 0x158198b000 - 0x158198dfff 0x158198e000 - 0x158198efff 0x158198f000 - 0x158198ffff 0x1581990000 - 0x15819a2fff 0x15819a3000 - 0x15819a3fff 0x15819a4000 - 0x15819a4fff 0x15819a5000 - 0x1581ac2fff 0x1581ac3000 - 0x1581ac5fff 0x1581ac6000 - 0x1581ac8fff 0x1581ac9000 - 0x1581acdfff 0x1581ace000 - 0x1581b22fff 0x1581b23000 - 0x15821cdfff 0x3fffbc4000 - 0x3fffbe5fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/bindings/glibc/wrap.lisp ... ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc/linux.lib ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc/linux.lib ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc/wrap.fas 0 errors, 0 warnings ln -s /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/bindings/glibc/link.sh . make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc' mkdir -p clx/new-clx m=`cd ../modules/clx/new-clx; pwd`; \ if test -f $m/configure && { test ! -f clx/new-clx/config.status || test -n "`find $m/configure -prune -newer clx/new-clx/config.status`"; } ; then ( cd clx/new-clx ;\ cache=`echo clx/new-clx/ | sed -e 's,[^/][^/]*//*,../,g'`config.cache; \ if test -f ${cache} ; then \ . ${cache}; \ if test "${ac_cv_env_CC_set}" = set; then CC="${ac_cv_env_CC_value}"; export CC; fi; \ if test "${ac_cv_env_CFLAGS_set}" = set; then CFLAGS="${ac_cv_env_CFLAGS_value}"; export CFLAGS; fi; \ if test "${ac_cv_env_LDFLAGS_set}" = set; then LDFLAGS="${ac_cv_env_LDFLAGS_value}"; export LDFLAGS; fi; \ if test "${ac_cv_env_CLFLAGS_set}" = set; then CLFLAGS="${ac_cv_env_CLFLAGS_value}"; export CLFLAGS; fi; \ if test "${ac_cv_env_LIBS_set}" = set; then LIBS="${ac_cv_env_LIBS_value}"; export LIBS; fi; \ if test "${ac_cv_env_CPPFLAGS_set}" = set; then CPPFLAGS="${ac_cv_env_CPPFLAGS_value}"; export CPPFLAGS; fi; \ if test "${ac_cv_env_CPP_set}" = set; then CPP="${ac_cv_env_CPP_value}"; export CPP; fi; \ if test "${ac_cv_env_CXX_set}" = set; then CXX="${ac_cv_env_CXX_value}"; export CXX; fi; \ if test "${ac_cv_env_CXXFLAGS_set}" = set; then CXXFLAGS="${ac_cv_env_CXXFLAGS_value}"; export CXXFLAGS; fi; \ if test "${ac_cv_env_X_LIBS_set}" = set; then X_LIBS="${ac_cv_env_X_LIBS_value}"; export X_LIBS; fi; \ /bin/sh $m/configure --with-clisp="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" --cache-file=${cache} --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm';\ else \ /bin/sh $m/configure --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm'; \ fi ) ;\ fi; \ if test -f $m/Makefile && { test ! -f clx/new-clx/Makefile || test -n "`find $m/Makefile -prune -newer clx/new-clx/Makefile`"; } ; then \ sed "s,srcdir = .,srcdir = $m," "$m/Makefile" > clx/new-clx/Makefile ; \ fi ; \ CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" ; \ cd clx/new-clx ; make clisp-module CC="gcc" CPPFLAGS="-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib" CFLAGS="-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC" CLFLAGS="-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic" LIBS="-Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl " RANLIB="ranlib" CLISP="$CLISP -q" SHREXT=.so configure: loading cache ../../config.cache configure: ** NEW CLX checking how to remove colons from paths... (cached) echo $x checking for CLISP version... (cached) 2.49.93+ (2018-02-18) (built 3813886800) (memory 3828276446) checking for CLISP libdir... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/ checking for CLISP linking set... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build checking for CLISP... (cached) yes checking for gcc... (cached) gcc checking whether the C compiler works... yes checking for C compiler default output file name... a.out checking for suffix of executables... checking whether we are cross compiling... no checking for suffix of object files... (cached) o checking whether we are using the GNU C compiler... (cached) yes checking whether gcc accepts -g... (cached) yes checking for gcc option to accept ISO C89... (cached) none needed checking whether gcc understands -c and -o together... (cached) yes checking how to run the C preprocessor... (cached) gcc -E checking how to make hard links... (cached) ln checking whether ln -s works... (cached) yes checking for grep that handles long lines and -e... (cached) /usr/bin/grep checking for egrep... (cached) /usr/bin/grep -E checking for ANSI C header files... (cached) yes checking for sys/types.h... (cached) yes checking for sys/stat.h... (cached) yes checking for stdlib.h... (cached) yes checking for string.h... (cached) yes checking for memory.h... (cached) yes checking for strings.h... (cached) yes checking for inttypes.h... (cached) yes checking for stdint.h... (cached) yes checking for unistd.h... (cached) yes checking for minix/config.h... (cached) no checking whether it is safe to define __EXTENSIONS__... (cached) yes checking whether _XOPEN_SOURCE should be defined... (cached) no checking whether time.h and sys/time.h may both be included... yes checking for netdb.h... (cached) yes checking for netinet/in.h... (cached) yes checking for X... (cached) libraries , headers checking for gethostbyname... (cached) yes checking for connect... (cached) yes checking for remove... (cached) yes checking for shmat... (cached) yes checking for IceConnectionNumber in -lICE... (cached) yes checking for special C compiler options needed for large files... (cached) no checking for _FILE_OFFSET_BITS value needed for large files... (cached) no checking size of KeySym... 8 checking for XGetAtomNames... yes checking for Xpm library... yes checking for X shape extension... yes checking if XauGetAuthByAddr needs -lXau... yes configure: ** NEW CLX (output) configure: updating cache ../../config.cache configure: creating ./config.status config.status: creating Makefile config.status: creating link.sh config.status: creating config.h configure: ** NEW CLX (done) make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clx/new-clx' /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -i /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx-preload.lisp -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x2c595000 - 0x2c5b5fff 0x80000000 - 0x800bffff 0x157b913000 - 0x157b92dfff 0x157b92e000 - 0x157b92efff 0x157b92f000 - 0x157b92ffff 0x157b930000 - 0x157b931fff 0x157b932000 - 0x157b933fff 0x157b934000 - 0x157b93afff 0x157b93b000 - 0x157b93bfff 0x157b93c000 - 0x157b93cfff 0x157b93e000 - 0x157b93ffff 0x157b940000 - 0x157b97efff 0x157b97f000 - 0x157b980fff 0x157b981000 - 0x157b987fff 0x157b988000 - 0x157b988fff 0x157b989000 - 0x157ba12fff 0x157ba13000 - 0x157ba13fff 0x157ba14000 - 0x157ba14fff 0x157ba15000 - 0x157ba44fff 0x157ba45000 - 0x157ba45fff 0x157ba46000 - 0x157ba46fff 0x157ba47000 - 0x157ba47fff 0x157ba48000 - 0x157ba4ffff 0x157ba50000 - 0x157ba75fff 0x157ba76000 - 0x157ba79fff 0x157ba7a000 - 0x157ba7afff 0x157ba7b000 - 0x157ba7cfff 0x157ba7d000 - 0x157ba7dfff 0x157ba7e000 - 0x157ba7efff 0x157ba7f000 - 0x157ba7ffff 0x157ba80000 - 0x157ba83fff 0x157ba84000 - 0x157ba84fff 0x157ba85000 - 0x157ba85fff 0x157ba86000 - 0x157ba87fff 0x157ba88000 - 0x157ba89fff 0x157ba8a000 - 0x157ba8afff 0x157ba8b000 - 0x157ba8bfff 0x157ba8c000 - 0x157bbf7fff 0x157bbf8000 - 0x157bbfafff 0x157bbfb000 - 0x157bbfbfff 0x157bbfc000 - 0x157bbfcfff 0x157bbfd000 - 0x157bc0ffff 0x157bc10000 - 0x157bc10fff 0x157bc11000 - 0x157bc11fff 0x157bc12000 - 0x157bd2ffff 0x157bd30000 - 0x157bd32fff 0x157bd33000 - 0x157bd35fff 0x157bd36000 - 0x157bd3afff 0x157bd3b000 - 0x157bd8ffff 0x157bd90000 - 0x157c43afff 0x3fffd98000 - 0x3fffdb9fff ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx-preload.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx-preload.lisp ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.lisp ... WARNING: PROCLAIM(VALUES): # is locked Ignore the lock and proceed ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clx/new-clx/clx.fas The following functions were used but not defined: XLIB::%GCONTEXT-KEY->MASK XLIB::ATOM-NAME XLIB::INTERN-ATOM XLIB::LOOKUP-WINDOW XLIB::WINDOW-ID XLIB::SET-WM-HINTS XLIB::VISUAL-INFO XLIB::LOOKUP-RESOURCE-ID XLIB::DRAWABLE-ID XLIB::GCONTEXT-ID XLIB::CURSOR-ID XLIB::FONT-ID XLIB::LOOKUP-COLORMAP XLIB::WINDOW-DISPLAY XLIB::COLORMAP-ID XLIB::CARD8->CHAR XLIB::GET-PROPERTY XLIB::CHAR->CARD8 XLIB::CHANGE-PROPERTY XLIB::SCREEN-ROOT XLIB::DISPLAY-DEFAULT-SCREEN XLIB::LIST-PROPERTIES XLIB::ROTATE-PROPERTIES XLIB::COLORMAP-VISUAL-INFO XLIB::DISPLAY-DISPLAY XLIB::DISPLAY-HOST XLIB::DISPLAY-PROTOCOL-MAJOR-VERSION XLIB::DISPLAY-PROTOCOL-MINOR-VERSION XLIB::DISPLAY-RELEASE-NUMBER XLIB::DISPLAY-VENDOR-NAME XLIB::DRAWABLE-HEIGHT XLIB::DRAWABLE-WIDTH XLIB::DRAWABLE-X XLIB::DRAWABLE-Y XLIB::%UNTRACED-COLOR-RED XLIB::%UNTRACED-COLOR-GREEN XLIB::%UNTRACED-COLOR-BLUE XLIB::%UNTRACED-DISPLAY-DISPLAY XLIB::%UNTRACED-DISPLAY-VENDOR-NAME XLIB::%UNTRACED-DISPLAY-RELEASE-NUMBER XLIB::%UNTRACED-DISPLAY-PROTOCOL-MAJOR-VERSION XLIB::%UNTRACED-DISPLAY-PROTOCOL-MINOR-VERSION XLIB::%UNTRACED-COLORMAP-VISUAL-INFO XLIB::%UNTRACED-VISUAL-INFO-CLASS XLIB::CLOSED-DISPLAY-P XLIB::%UNTRACED-DRAWABLE-WIDTH XLIB::%UNTRACED-DRAWABLE-HEIGHT XLIB::%UNTRACED-DRAWABLE-X XLIB::%UNTRACED-DRAWABLE-Y XLIB::%UNTRACED-DISPLAY-HOST XLIB::OPEN-DISPLAY XLIB::SET-DISPLAY-DEFAULT-SCREEN XLIB::CREATE-IMAGE XLIB::MAKE-EVENT-MASK 0 errors, 1 warning /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -i /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx-preload.lisp -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/image.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x4662000 - 0x4682fff 0x80000000 - 0x800bffff 0x1580552000 - 0x158056cfff 0x158056d000 - 0x158056dfff 0x158056e000 - 0x158056efff 0x158056f000 - 0x1580570fff 0x1580571000 - 0x1580572fff 0x1580573000 - 0x1580579fff 0x158057a000 - 0x158057afff 0x158057b000 - 0x158057bfff 0x158057d000 - 0x158057efff 0x158057f000 - 0x15805bdfff 0x15805be000 - 0x15805bffff 0x15805c0000 - 0x15805c6fff 0x15805c7000 - 0x15805c7fff 0x15805c8000 - 0x1580651fff 0x1580652000 - 0x1580652fff 0x1580653000 - 0x1580653fff 0x1580654000 - 0x1580683fff 0x1580684000 - 0x1580684fff 0x1580685000 - 0x1580685fff 0x1580686000 - 0x1580686fff 0x1580687000 - 0x158068efff 0x158068f000 - 0x15806b4fff 0x15806b5000 - 0x15806b8fff 0x15806b9000 - 0x15806b9fff 0x15806ba000 - 0x15806bbfff 0x15806bc000 - 0x15806bcfff 0x15806bd000 - 0x15806bdfff 0x15806be000 - 0x15806befff 0x15806bf000 - 0x15806c2fff 0x15806c3000 - 0x15806c3fff 0x15806c4000 - 0x15806c4fff 0x15806c5000 - 0x15806c6fff 0x15806c7000 - 0x15806c8fff 0x15806c9000 - 0x15806c9fff 0x15806ca000 - 0x15806cafff 0x15806cb000 - 0x1580836fff 0x1580837000 - 0x1580839fff 0x158083a000 - 0x158083afff 0x158083b000 - 0x158083bfff 0x158083c000 - 0x158084efff 0x158084f000 - 0x158084ffff 0x1580850000 - 0x1580850fff 0x1580851000 - 0x158096efff 0x158096f000 - 0x1580971fff 0x1580972000 - 0x1580974fff 0x1580975000 - 0x1580979fff 0x158097a000 - 0x15809cefff 0x15809cf000 - 0x1581079fff 0x3fffb09000 - 0x3fffb2afff ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx-preload.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx-preload.lisp ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/image.lisp ... ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clx/new-clx/clx.lib ... WARNING: PROCLAIM(VALUES): # is locked Ignore the lock and proceed ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clx/new-clx/clx.lib ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clx/new-clx/image.fas The following functions were used but not defined: XLIB::CREATE-PIXMAP XLIB::CREATE-GCONTEXT XLIB::PUT-IMAGE XLIB::COPY-AREA XLIB::FREE-GCONTEXT 0 errors, 1 warning /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -i /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx-preload.lisp -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/resource.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x2b9ed000 - 0x2ba0dfff 0x80000000 - 0x800bffff 0x15672a6000 - 0x15672c0fff 0x15672c1000 - 0x15672c1fff 0x15672c2000 - 0x15672c2fff 0x15672c3000 - 0x15672c4fff 0x15672c5000 - 0x15672c6fff 0x15672c7000 - 0x15672cdfff 0x15672ce000 - 0x15672cefff 0x15672cf000 - 0x15672cffff 0x15672d1000 - 0x15672d2fff 0x15672d3000 - 0x1567311fff 0x1567312000 - 0x1567313fff 0x1567314000 - 0x156731afff 0x156731b000 - 0x156731bfff 0x156731c000 - 0x15673a5fff 0x15673a6000 - 0x15673a6fff 0x15673a7000 - 0x15673a7fff 0x15673a8000 - 0x15673d7fff 0x15673d8000 - 0x15673d8fff 0x15673d9000 - 0x15673d9fff 0x15673da000 - 0x15673dafff 0x15673db000 - 0x15673e2fff 0x15673e3000 - 0x1567408fff 0x1567409000 - 0x156740cfff 0x156740d000 - 0x156740dfff 0x156740e000 - 0x156740ffff 0x1567410000 - 0x1567410fff 0x1567411000 - 0x1567411fff 0x1567412000 - 0x1567412fff 0x1567413000 - 0x1567416fff 0x1567417000 - 0x1567417fff 0x1567418000 - 0x1567418fff 0x1567419000 - 0x156741afff 0x156741b000 - 0x156741cfff 0x156741d000 - 0x156741dfff 0x156741e000 - 0x156741efff 0x156741f000 - 0x156758afff 0x156758b000 - 0x156758dfff 0x156758e000 - 0x156758efff 0x156758f000 - 0x156758ffff 0x1567590000 - 0x15675a2fff 0x15675a3000 - 0x15675a3fff 0x15675a4000 - 0x15675a4fff 0x15675a5000 - 0x15676c2fff 0x15676c3000 - 0x15676c5fff 0x15676c6000 - 0x15676c8fff 0x15676c9000 - 0x15676cdfff 0x15676ce000 - 0x1567722fff 0x1567723000 - 0x1567dcdfff 0x3fffbd0000 - 0x3fffbf1fff ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx-preload.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx-preload.lisp ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/resource.lisp ... ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clx/new-clx/clx.lib ... WARNING: PROCLAIM(VALUES): # is locked Ignore the lock and proceed ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clx/new-clx/clx.lib ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clx/new-clx/resource.fas The following functions were used but not defined: XLIB::CARD8->CHAR XLIB::DISPLAY-DEFAULT-SCREEN XLIB::SCREEN-ROOT XLIB::DISPLAY-ROOTS XLIB::GET-PROPERTY 0 errors, 1 warning ../../ccmp2c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f > genclx.c gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -DWANT_XPM=1 -DWANT_XSHAPE=1 genclx.c -o genclx ./genclx -l -o clx.d > clx.d rm -f genclx.c rm -f genclx /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -C /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit/modprep clx.d clx.c Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x2392d000 - 0x2394dfff 0x80000000 - 0x800bffff 0x157b2d7000 - 0x157b2f1fff 0x157b2f2000 - 0x157b2f2fff 0x157b2f3000 - 0x157b2f3fff 0x157b2f4000 - 0x157b2f5fff 0x157b2f6000 - 0x157b2f7fff 0x157b2f8000 - 0x157b2fefff 0x157b2ff000 - 0x157b2fffff 0x157b300000 - 0x157b300fff 0x157b302000 - 0x157b303fff 0x157b304000 - 0x157b342fff 0x157b343000 - 0x157b344fff 0x157b345000 - 0x157b34bfff 0x157b34c000 - 0x157b34cfff 0x157b34d000 - 0x157b3d6fff 0x157b3d7000 - 0x157b3d7fff 0x157b3d8000 - 0x157b3d8fff 0x157b3d9000 - 0x157b408fff 0x157b409000 - 0x157b409fff 0x157b40a000 - 0x157b40afff 0x157b40b000 - 0x157b40bfff 0x157b40c000 - 0x157b413fff 0x157b414000 - 0x157b439fff 0x157b43a000 - 0x157b43dfff 0x157b43e000 - 0x157b43efff 0x157b43f000 - 0x157b440fff 0x157b441000 - 0x157b441fff 0x157b442000 - 0x157b442fff 0x157b443000 - 0x157b443fff 0x157b444000 - 0x157b447fff 0x157b448000 - 0x157b448fff 0x157b449000 - 0x157b449fff 0x157b44a000 - 0x157b44bfff 0x157b44c000 - 0x157b44dfff 0x157b44e000 - 0x157b44efff 0x157b44f000 - 0x157b44ffff 0x157b450000 - 0x157b5bbfff 0x157b5bc000 - 0x157b5befff 0x157b5bf000 - 0x157b5bffff 0x157b5c0000 - 0x157b5c0fff 0x157b5c1000 - 0x157b5d3fff 0x157b5d4000 - 0x157b5d4fff 0x157b5d5000 - 0x157b5d5fff 0x157b5d6000 - 0x157b6f3fff 0x157b6f4000 - 0x157b6f6fff 0x157b6f7000 - 0x157b6f9fff 0x157b6fa000 - 0x157b6fefff 0x157b6ff000 - 0x157b753fff 0x157b754000 - 0x157bdfefff 0x3fffc18000 - 0x3fffc39fff ;; MODPREP: "clx.d" --> #P"clx.c" ;; MODPREP: reading "clx.d": 359,209 bytes, 8,807 lines WARNING: "clx.d":1841:XLIB:OPEN-DISPLAY: emulating signature (1 0 &ALLOW-OTHER-KEYS) WARNING: "clx.d":3608:XLIB:COPY-AREA: emulating signature (9 0) WARNING: "clx.d":3628:XLIB:COPY-PLANE: emulating signature (10 0) WARNING: "clx.d":3697:XLIB:DRAW-LINE: emulating signature (6 1) WARNING: "clx.d":3783:XLIB:DRAW-RECTANGLE: emulating signature (6 1) WARNING: "clx.d":3820:XLIB:DRAW-ARC: emulating signature (8 1) WARNING: "clx.d":4031:XLIB:DRAW-GLYPH: emulating signature (5 0 &KEY) WARNING: "clx.d":4038:XLIB:DRAW-GLYPHS: emulating signature (5 0 &KEY) WARNING: "clx.d":4044:XLIB:DRAW-IMAGE-GLYPH: emulating signature (5 0 &KEY) WARNING: "clx.d":4049:XLIB:DRAW-IMAGE-GLYPHS: emulating signature (5 0 &KEY) WARNING: "clx.d":5417:XLIB:CHANGE-PROPERTY: emulating signature (5 0 &KEY) WARNING: "clx.d":6172:XLIB:QUEUE-EVENT: emulating signature (2 0 &ALLOW-OTHER-KEYS) WARNING: "clx.d":6268:XLIB:SEND-EVENT: emulating signature (3 0 &ALLOW-OTHER-KEYS) WARNING: "clx.d":6414:XLIB:WARP-POINTER-IF-INSIDE: emulating signature (6 2) WARNING: "clx.d":6434:XLIB:WARP-POINTER-RELATIVE-IF-INSIDE: emulating signature (5 2) ;; MODPREP: 552 objects, 410 DEFUNs (15 emulated), 1 DEFVAR (1 init) ;; packages: ("XPM" "XLIB") MODPREP: wrote clx.c (605,000 bytes) gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit -c clx.c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘get_color’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:1652:33: warning: unused parameter ‘dpy’ [-Wunused-parameter] 1652 | { | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_make_event_mask’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:1765:143: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 1765 | DEFUN(XLIB:MAKE-EVENT-MASK,&rest keys) { | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_make_state_mask’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:1774:143: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 1774 | DEFUN(XLIB:MAKE-STATE-MASK, &rest args) { | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_open_display’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:1840:137: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 1840 | DEFUN(XLIB:OPEN-DISPLAY, host &allow-other-keys) | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_set_gcontext_display’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:2138:6: warning: unused variable ‘gcon’ [-Wunused-variable] 2138 | Display *dpy_new = get_display(STACK_1); | ^~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_display_trace’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:2330:121: warning: unused parameter ‘argcount’ [-Wunused-parameter] 2330 | { /* I do not think I will support this function, since | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:2330:139: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 2330 | { /* I do not think I will support this function, since | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_copy_gcontext_components’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:3462:161: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 3462 | DEFUN(XLIB:COPY-GCONTEXT-COMPONENTS, gc1 gc2 &rest rest) | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_copy_area’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:3608:131: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 3608 | { | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_copy_plane’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:3628:133: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 3628 | { /* WAS: invoke (XCopyPlane, 10, 'v', "D1dgiiiiidii"); */ | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_draw_line’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:3697:131: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 3697 | { | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_draw_rectangle’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:3783:141: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 3783 | { | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_draw_arc’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:3820:129: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 3820 | int fill_p = missingp(STACK_0); | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_draw_glyph’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:4031:133: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 4031 | { NOTIMPLEMENTED; } | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_draw_glyphs’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:4038:135: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 4038 | { | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_draw_image_glyph’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:4044:145: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 4044 | { NOTIMPLEMENTED; } | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_draw_image_glyphs’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:4049:147: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 4049 | { | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_put_image’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:4369:22: warning: variable ‘bg’ set but not used [-Wunused-but-set-variable] 4369 | | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:4369:19: warning: variable ‘fg’ set but not used [-Wunused-but-set-variable] 4369 | | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_text_extents’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:4744:7: warning: unused variable ‘start’ [-Wunused-variable] 4744 | int start = get_uint16_0 (STACK_2); | ^~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_text_width’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:4792:9: warning: unused variable ‘start’ [-Wunused-variable] 4792 | int start = get_uint16_0 (STACK_2); | ^~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:4814:9: warning: unused variable ‘end’ [-Wunused-variable] 4814 | int end = missingp(STACK_1) ? vector_length (STACK_3) : get_uint16 (STACK_1); | ^~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:4813:9: warning: unused variable ‘start’ [-Wunused-variable] 4813 | int start = get_uint16_0 (STACK_2); | ^~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_change_property’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:5417:143: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 5417 | { | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_queue_event’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:6172:135: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 6172 | { | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_send_event’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:6268:133: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 6268 | { | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_global_pointer_position’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:6341:7: warning: variable ‘same_screen_p’ set but not used [-Wunused-but-set-variable] 6341 | | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_warp_pointer_if_inside’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:6414:157: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 6414 | { | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_warp_pointer_relative_if_inside’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:6434:175: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 6434 | { | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_set_pointer_mapping’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:7009:7: warning: variable ‘result’ set but not used [-Wunused-but-set-variable] 7009 | int result; | ^~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘keycode2keysym’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:7254:3: warning: ‘XKeycodeToKeysym’ is deprecated [-Wdeprecated-declarations] 7254 | /* There is a comment in MIT-CLX, translate.lisp, which I want to quote here: | ^~ In file included from /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:415: /usr/include/X11/Xlib.h:1687:15: note: declared here 1687 | extern KeySym XKeycodeToKeysym( | ^~~~~~~~~~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:7254:2: warning: ‘XKeycodeToKeysym’ is deprecated [-Wdeprecated-declarations] 7254 | /* There is a comment in MIT-CLX, translate.lisp, which I want to quote here: | ^~ In file included from /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:415: /usr/include/X11/Xlib.h:1687:15: note: declared here 1687 | extern KeySym XKeycodeToKeysym( | ^~~~~~~~~~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_keysym__3Echaracter’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:7365:12: warning: variable ‘dpy’ set but not used [-Wunused-but-set-variable] 7365 | KeySym keysym; | ^~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_keysym’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:7414:125: warning: unused parameter ‘rest_args_pointer’ [-Wunused-parameter] 7414 | if (uint8_p(STACK_(argcount))) { | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f: In function ‘C_subr_xlib_default_keysym_index’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:8084:12: warning: unused variable ‘dpy’ [-Wunused-variable] 8084 | Display *dpy = pop_display(); | ^~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:8083:11: warning: unused variable ‘keycode’ [-Wunused-variable] 8083 | KeyCode keycode = get_uint8(popSTACK()); | ^~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:8082:7: warning: unused variable ‘state’ [-Wunused-variable] 8082 | int state = get_uint32(popSTACK()); | ^~~~~ At top level: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:4208:13: warning: ‘handle_image_z’ defined but not used [-Wunused-function] 4208 | GC gcontext, Drawable drawable, | ^ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx.f:588:15: warning: ‘get_aint32’ defined but not used [-Wunused-function] 588 | { /* This is special routine, which accepts either an uint32 or a sint32. | ^~~~~~~~~~ ln -s /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/clx/new-clx/clx-preload.lisp . make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clx/new-clx' mkdir -p dbus m=`cd ../modules/dbus; pwd`; \ if test -f $m/configure && { test ! -f dbus/config.status || test -n "`find $m/configure -prune -newer dbus/config.status`"; } ; then ( cd dbus ;\ cache=`echo dbus/ | sed -e 's,[^/][^/]*//*,../,g'`config.cache; \ if test -f ${cache} ; then \ . ${cache}; \ if test "${ac_cv_env_CC_set}" = set; then CC="${ac_cv_env_CC_value}"; export CC; fi; \ if test "${ac_cv_env_CFLAGS_set}" = set; then CFLAGS="${ac_cv_env_CFLAGS_value}"; export CFLAGS; fi; \ if test "${ac_cv_env_LDFLAGS_set}" = set; then LDFLAGS="${ac_cv_env_LDFLAGS_value}"; export LDFLAGS; fi; \ if test "${ac_cv_env_CLFLAGS_set}" = set; then CLFLAGS="${ac_cv_env_CLFLAGS_value}"; export CLFLAGS; fi; \ if test "${ac_cv_env_LIBS_set}" = set; then LIBS="${ac_cv_env_LIBS_value}"; export LIBS; fi; \ if test "${ac_cv_env_CPPFLAGS_set}" = set; then CPPFLAGS="${ac_cv_env_CPPFLAGS_value}"; export CPPFLAGS; fi; \ if test "${ac_cv_env_CPP_set}" = set; then CPP="${ac_cv_env_CPP_value}"; export CPP; fi; \ if test "${ac_cv_env_CXX_set}" = set; then CXX="${ac_cv_env_CXX_value}"; export CXX; fi; \ if test "${ac_cv_env_CXXFLAGS_set}" = set; then CXXFLAGS="${ac_cv_env_CXXFLAGS_value}"; export CXXFLAGS; fi; \ if test "${ac_cv_env_X_LIBS_set}" = set; then X_LIBS="${ac_cv_env_X_LIBS_value}"; export X_LIBS; fi; \ /bin/sh $m/configure --with-clisp="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" --cache-file=${cache} --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm';\ else \ /bin/sh $m/configure --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm'; \ fi ) ;\ fi; \ if test -f $m/Makefile && { test ! -f dbus/Makefile || test -n "`find $m/Makefile -prune -newer dbus/Makefile`"; } ; then \ sed "s,srcdir = .,srcdir = $m," "$m/Makefile" > dbus/Makefile ; \ fi ; \ CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" ; \ cd dbus ; make clisp-module CC="gcc" CPPFLAGS="-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib" CFLAGS="-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC" CLFLAGS="-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic" LIBS="-Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl " RANLIB="ranlib" CLISP="$CLISP -q" SHREXT=.so configure: loading cache ../config.cache configure: ** Dbus (Common) checking how to remove colons from paths... (cached) echo $x checking for CLISP version... (cached) 2.49.93+ (2018-02-18) (built 3813886800) (memory 3828276446) checking for CLISP libdir... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/ checking for CLISP linking set... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build checking for CLISP... (cached) yes checking for FFI in CLISP... (cached) yes checking for gcc... (cached) gcc checking whether the C compiler works... yes checking for C compiler default output file name... a.out checking for suffix of executables... checking whether we are cross compiling... no checking for suffix of object files... (cached) o checking whether we are using the GNU C compiler... (cached) yes checking whether gcc accepts -g... (cached) yes checking for gcc option to accept ISO C89... (cached) none needed checking whether gcc understands -c and -o together... (cached) yes checking how to run the C preprocessor... (cached) gcc -E checking how to make hard links... (cached) ln checking whether ln -s works... (cached) yes checking for grep that handles long lines and -e... (cached) /usr/bin/grep checking for egrep... (cached) /usr/bin/grep -E checking for ANSI C header files... (cached) yes checking for sys/types.h... (cached) yes checking for sys/stat.h... (cached) yes checking for stdlib.h... (cached) yes checking for string.h... (cached) yes checking for memory.h... (cached) yes checking for strings.h... (cached) yes checking for inttypes.h... (cached) yes checking for stdint.h... (cached) yes checking for unistd.h... (cached) yes checking for minix/config.h... (cached) no checking whether it is safe to define __EXTENSIONS__... (cached) yes checking whether _XOPEN_SOURCE should be defined... (cached) no configure: ** Dbus (Headers and Libraries) checking for pkg-config... /usr/bin/pkg-config checking pkg-config is at least version 0.9.0... yes checking for DBUS... yes checking for dbus_int64_t... yes checking for dbus_int32_t... yes checking for dbus_uint32_t... yes checking for dbus_int16_t... yes checking for dbus_unichar_t... yes checking for dbus_bool_t... yes configure: ** Dbus (Functions) checking for dbus_error_init... yes checking for dbus_error_free... yes checking for dbus_set_error... yes checking for dbus_set_error_const... yes checking for dbus_move_error... yes checking for dbus_error_has_name... yes checking for dbus_error_is_set... yes checking for dbus_parse_address... yes checking for dbus_address_entry_get_value... yes checking for dbus_address_entry_get_method... yes checking for dbus_address_entries_free... yes checking for dbus_address_escape_value... yes checking for dbus_address_unescape_value... yes checking for dbus_malloc... yes checking for dbus_malloc0... yes checking for dbus_realloc... yes checking for dbus_free... yes checking for dbus_free_string_array... yes checking for dbus_shutdown... yes checking for dbus_message_new... yes checking for dbus_message_new_method_call... yes checking for dbus_message_new_method_return... yes checking for dbus_message_new_signal... yes checking for dbus_message_new_error... yes checking for dbus_message_copy... yes checking for dbus_message_ref... yes checking for dbus_message_unref... yes checking for dbus_message_get_type... yes checking for dbus_message_set_path... yes checking for dbus_message_get_path... yes checking for dbus_message_has_path... yes checking for dbus_message_set_interface... yes checking for dbus_message_get_interface... yes checking for dbus_message_has_interface... yes checking for dbus_message_set_member... yes checking for dbus_message_get_member... yes checking for dbus_message_has_member... yes checking for dbus_message_set_error_name... yes checking for dbus_message_get_error_name... yes checking for dbus_message_set_destination... yes checking for dbus_message_get_destination... yes checking for dbus_message_set_sender... yes checking for dbus_message_get_sender... yes checking for dbus_message_get_signature... yes checking for dbus_message_set_no_reply... yes checking for dbus_message_get_no_reply... yes checking for dbus_message_is_method_call... yes checking for dbus_message_is_signal... yes checking for dbus_message_is_error... yes checking for dbus_message_has_destination... yes checking for dbus_message_has_sender... yes checking for dbus_message_has_signature... yes checking for dbus_message_get_serial... yes checking for dbus_message_set_serial... yes checking for dbus_message_set_reply_serial... yes checking for dbus_message_get_reply_serial... yes checking for dbus_message_set_auto_start... yes checking for dbus_message_get_auto_start... yes checking for dbus_message_get_path_decomposed... yes checking for dbus_message_append_args... yes checking for dbus_message_append_args_valist... yes checking for dbus_message_get_args... yes checking for dbus_message_get_args_valist... yes checking for dbus_message_iter_init... yes checking for dbus_message_iter_has_next... yes checking for dbus_message_iter_next... yes checking for dbus_message_iter_get_signature... yes checking for dbus_message_iter_get_arg_type... yes checking for dbus_message_iter_get_element_type... yes checking for dbus_message_iter_recurse... yes checking for dbus_message_iter_get_basic... yes checking for dbus_message_iter_get_fixed_array... yes checking for dbus_message_iter_init_append... yes checking for dbus_message_iter_append_basic... yes checking for dbus_message_iter_append_fixed_array... yes checking for dbus_message_iter_open_container... yes checking for dbus_message_iter_close_container... yes checking for dbus_message_lock... yes checking for dbus_set_error_from_message... yes checking for dbus_message_allocate_data_slot... yes checking for dbus_message_free_data_slot... yes checking for dbus_message_set_data... yes checking for dbus_message_get_data... yes checking for dbus_message_type_from_string... yes checking for dbus_message_type_to_string... yes checking for dbus_message_marshal... yes checking for dbus_message_demarshal... yes checking for dbus_message_demarshal_bytes_needed... yes checking for dbus_connection_open... yes checking for dbus_connection_open_private... yes checking for dbus_connection_ref... yes checking for dbus_connection_unref... yes checking for dbus_connection_close... yes checking for dbus_connection_get_is_connected... yes checking for dbus_connection_get_is_authenticated... yes checking for dbus_connection_get_is_anonymous... yes checking for dbus_connection_get_server_id... yes checking for dbus_connection_set_exit_on_disconnect... yes checking for dbus_connection_flush... yes checking for dbus_connection_read_write_dispatch... yes checking for dbus_connection_read_write... yes checking for dbus_connection_borrow_message... yes checking for dbus_connection_return_message... yes checking for dbus_connection_steal_borrowed_message... yes checking for dbus_connection_pop_message... yes checking for dbus_connection_get_dispatch_status... yes checking for dbus_connection_dispatch... yes checking for dbus_connection_has_messages_to_send... yes checking for dbus_connection_send... yes checking for dbus_connection_send_with_reply... yes checking for dbus_connection_send_with_reply_and_block... yes checking for dbus_connection_set_watch_functions... yes checking for dbus_connection_set_timeout_functions... yes checking for dbus_connection_set_wakeup_main_function... yes checking for dbus_connection_set_dispatch_status_function... yes checking for dbus_connection_get_unix_user... yes checking for dbus_connection_get_unix_process_id... yes checking for dbus_connection_get_adt_audit_session_data... yes checking for dbus_connection_set_unix_user_function... yes checking for dbus_connection_get_windows_user... yes checking for dbus_connection_set_windows_user_function... yes checking for dbus_connection_set_allow_anonymous... yes checking for dbus_connection_set_route_peer_messages... yes checking for dbus_connection_add_filter... yes checking for dbus_connection_remove_filter... yes checking for dbus_connection_allocate_data_slot... yes checking for dbus_connection_free_data_slot... yes checking for dbus_connection_set_data... yes checking for dbus_connection_get_data... yes checking for dbus_connection_set_change_sigpipe... yes checking for dbus_connection_set_max_message_size... yes checking for dbus_connection_get_max_message_size... yes checking for dbus_connection_set_max_received_size... yes checking for dbus_connection_get_max_received_size... yes checking for dbus_connection_get_outgoing_size... yes checking for dbus_connection_preallocate_send... yes checking for dbus_connection_free_preallocated_send... yes checking for dbus_connection_send_preallocated... yes checking for dbus_connection_try_register_object_path... yes checking for dbus_connection_register_object_path... yes checking for dbus_connection_try_register_fallback... yes checking for dbus_connection_register_fallback... yes checking for dbus_connection_unregister_object_path... yes checking for dbus_connection_get_object_path_data... yes checking for dbus_connection_list_registered... yes checking for dbus_connection_get_unix_fd... yes checking for dbus_connection_get_socket... yes checking for dbus_get_local_machine_id... yes checking for dbus_watch_get_fd... yes checking for dbus_watch_get_unix_fd... yes checking for dbus_watch_get_socket... yes checking for dbus_watch_get_flags... yes checking for dbus_watch_get_data... yes checking for dbus_watch_set_data... yes checking for dbus_watch_handle... yes checking for dbus_watch_get_enabled... yes checking for dbus_timeout_get_interval... yes checking for dbus_timeout_get_data... yes checking for dbus_timeout_set_data... yes checking for dbus_timeout_handle... yes checking for dbus_timeout_get_enabled... yes checking for dbus_bus_get... yes checking for dbus_bus_get_private... yes checking for dbus_bus_register... yes checking for dbus_bus_set_unique_name... yes checking for dbus_bus_get_unique_name... yes checking for dbus_bus_get_unix_user... yes checking for dbus_bus_get_id... yes checking for dbus_bus_request_name... yes checking for dbus_bus_release_name... yes checking for dbus_bus_name_has_owner... yes checking for dbus_bus_start_service_by_name... yes checking for dbus_bus_add_match... yes checking for dbus_bus_remove_match... yes checking for dbus_pending_call_ref... yes checking for dbus_pending_call_unref... yes checking for dbus_pending_call_set_notify... yes checking for dbus_pending_call_cancel... yes checking for dbus_pending_call_get_completed... yes checking for dbus_pending_call_steal_reply... yes checking for dbus_pending_call_block... yes checking for dbus_pending_call_allocate_data_slot... yes checking for dbus_pending_call_free_data_slot... yes checking for dbus_pending_call_set_data... yes checking for dbus_pending_call_get_data... yes checking for dbus_server_listen... yes checking for dbus_server_ref... yes checking for dbus_server_unref... yes checking for dbus_server_disconnect... yes checking for dbus_server_get_is_connected... yes checking for dbus_server_get_address... yes checking for dbus_server_get_id... yes checking for dbus_server_set_new_connection_function... yes checking for dbus_server_set_watch_functions... yes checking for dbus_server_set_timeout_functions... yes checking for dbus_server_set_auth_mechanisms... yes checking for dbus_server_allocate_data_slot... yes checking for dbus_server_free_data_slot... yes checking for dbus_server_set_data... yes checking for dbus_server_get_data... yes checking for dbus_signature_iter_init... yes checking for dbus_signature_iter_get_current_type... yes checking for dbus_signature_iter_get_signature... yes checking for dbus_signature_iter_get_element_type... yes checking for dbus_signature_iter_next... yes checking for dbus_signature_iter_recurse... yes checking for dbus_signature_validate... yes checking for dbus_signature_validate_single... yes checking for dbus_type_is_basic... yes checking for dbus_type_is_container... yes checking for dbus_type_is_fixed... yes checking for dbus_threads_init... yes checking for dbus_threads_init_default... yes configure: ** Dbus (Output) configure: updating cache ../config.cache configure: creating ./config.status config.status: creating Makefile config.status: creating link.sh config.status: creating config.h configure: ** Dbus (Done) make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dbus' /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/dbus/dbus.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x3ec47000 - 0x3ec67fff 0x80000000 - 0x800bffff 0x155caa8000 - 0x155cac2fff 0x155cac3000 - 0x155cac3fff 0x155cac4000 - 0x155cac4fff 0x155cac5000 - 0x155cac6fff 0x155cac7000 - 0x155cac8fff 0x155cac9000 - 0x155cacffff 0x155cad0000 - 0x155cad0fff 0x155cad1000 - 0x155cad1fff 0x155cad3000 - 0x155cad4fff 0x155cad5000 - 0x155cb13fff 0x155cb14000 - 0x155cb15fff 0x155cb16000 - 0x155cb1cfff 0x155cb1d000 - 0x155cb1dfff 0x155cb1e000 - 0x155cba7fff 0x155cba8000 - 0x155cba8fff 0x155cba9000 - 0x155cba9fff 0x155cbaa000 - 0x155cbd9fff 0x155cbda000 - 0x155cbdafff 0x155cbdb000 - 0x155cbdbfff 0x155cbdc000 - 0x155cbdcfff 0x155cbdd000 - 0x155cbe4fff 0x155cbe5000 - 0x155cc0afff 0x155cc0b000 - 0x155cc0efff 0x155cc0f000 - 0x155cc0ffff 0x155cc10000 - 0x155cc11fff 0x155cc12000 - 0x155cc12fff 0x155cc13000 - 0x155cc13fff 0x155cc14000 - 0x155cc14fff 0x155cc15000 - 0x155cc18fff 0x155cc19000 - 0x155cc19fff 0x155cc1a000 - 0x155cc1afff 0x155cc1b000 - 0x155cc1cfff 0x155cc1d000 - 0x155cc1efff 0x155cc1f000 - 0x155cc1ffff 0x155cc20000 - 0x155cc20fff 0x155cc21000 - 0x155cd8cfff 0x155cd8d000 - 0x155cd8ffff 0x155cd90000 - 0x155cd90fff 0x155cd91000 - 0x155cd91fff 0x155cd92000 - 0x155cda4fff 0x155cda5000 - 0x155cda5fff 0x155cda6000 - 0x155cda6fff 0x155cda7000 - 0x155cec4fff 0x155cec5000 - 0x155cec7fff 0x155cec8000 - 0x155cecafff 0x155cecb000 - 0x155cecffff 0x155ced0000 - 0x155cf24fff 0x155cf25000 - 0x155d5cffff 0x3fffed2000 - 0x3fffef3fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/dbus/dbus.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dbus/dbus.fas ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dbus/dbus.c 0 errors, 0 warnings gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit -I/usr/include/dbus-1.0 -I/usr/lib64/dbus-1.0/include -c dbus.c dbus.c: In function ‘module__dbus__init_function_2’: dbus.c:913:3: warning: ‘dbus_watch_get_fd’ is deprecated [-Wdeprecated-declarations] 913 | register_foreign_function((void*)&dbus_watch_get_fd,"dbus_watch_get_fd",1024); | ^~~~~~~~~~~~~~~~~~~~~~~~~ In file included from /usr/include/dbus-1.0/dbus/dbus-bus.h:30, from /usr/include/dbus-1.0/dbus/dbus.h:31, from dbus.c:6: /usr/include/dbus-1.0/dbus/dbus-connection.h:481:38: note: declared here 481 | DBUS_DEPRECATED int dbus_watch_get_fd (DBusWatch *watch); | ^~~~~~~~~~~~~~~~~ make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dbus' mkdir -p fastcgi m=`cd ../modules/fastcgi; pwd`; \ if test -f $m/configure && { test ! -f fastcgi/config.status || test -n "`find $m/configure -prune -newer fastcgi/config.status`"; } ; then ( cd fastcgi ;\ cache=`echo fastcgi/ | sed -e 's,[^/][^/]*//*,../,g'`config.cache; \ if test -f ${cache} ; then \ . ${cache}; \ if test "${ac_cv_env_CC_set}" = set; then CC="${ac_cv_env_CC_value}"; export CC; fi; \ if test "${ac_cv_env_CFLAGS_set}" = set; then CFLAGS="${ac_cv_env_CFLAGS_value}"; export CFLAGS; fi; \ if test "${ac_cv_env_LDFLAGS_set}" = set; then LDFLAGS="${ac_cv_env_LDFLAGS_value}"; export LDFLAGS; fi; \ if test "${ac_cv_env_CLFLAGS_set}" = set; then CLFLAGS="${ac_cv_env_CLFLAGS_value}"; export CLFLAGS; fi; \ if test "${ac_cv_env_LIBS_set}" = set; then LIBS="${ac_cv_env_LIBS_value}"; export LIBS; fi; \ if test "${ac_cv_env_CPPFLAGS_set}" = set; then CPPFLAGS="${ac_cv_env_CPPFLAGS_value}"; export CPPFLAGS; fi; \ if test "${ac_cv_env_CPP_set}" = set; then CPP="${ac_cv_env_CPP_value}"; export CPP; fi; \ if test "${ac_cv_env_CXX_set}" = set; then CXX="${ac_cv_env_CXX_value}"; export CXX; fi; \ if test "${ac_cv_env_CXXFLAGS_set}" = set; then CXXFLAGS="${ac_cv_env_CXXFLAGS_value}"; export CXXFLAGS; fi; \ if test "${ac_cv_env_X_LIBS_set}" = set; then X_LIBS="${ac_cv_env_X_LIBS_value}"; export X_LIBS; fi; \ /bin/sh $m/configure --with-clisp="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" --cache-file=${cache} --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm';\ else \ /bin/sh $m/configure --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm'; \ fi ) ;\ fi; \ if test -f $m/Makefile && { test ! -f fastcgi/Makefile || test -n "`find $m/Makefile -prune -newer fastcgi/Makefile`"; } ; then \ sed "s,srcdir = .,srcdir = $m," "$m/Makefile" > fastcgi/Makefile ; \ fi ; \ CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" ; \ cd fastcgi ; make clisp-module CC="gcc" CPPFLAGS="-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib" CFLAGS="-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC" CLFLAGS="-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic" LIBS="-Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl " RANLIB="ranlib" CLISP="$CLISP -q" SHREXT=.so configure: loading cache ../config.cache configure: ** FastCGI (Common) checking how to remove colons from paths... (cached) echo $x checking for CLISP version... (cached) 2.49.93+ (2018-02-18) (built 3813886800) (memory 3828276446) checking for CLISP libdir... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/ checking for CLISP linking set... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build checking for CLISP... (cached) yes checking for FFI in CLISP... (cached) yes checking for gcc... (cached) gcc checking whether the C compiler works... yes checking for C compiler default output file name... a.out checking for suffix of executables... checking whether we are cross compiling... no checking for suffix of object files... (cached) o checking whether we are using the GNU C compiler... (cached) yes checking whether gcc accepts -g... (cached) yes checking for gcc option to accept ISO C89... (cached) none needed checking whether gcc understands -c and -o together... (cached) yes checking how to run the C preprocessor... (cached) gcc -E checking how to make hard links... (cached) ln checking whether ln -s works... (cached) yes checking for grep that handles long lines and -e... (cached) /usr/bin/grep checking for egrep... (cached) /usr/bin/grep -E checking for ANSI C header files... (cached) yes checking for sys/types.h... (cached) yes checking for sys/stat.h... (cached) yes checking for stdlib.h... (cached) yes checking for string.h... (cached) yes checking for memory.h... (cached) yes checking for strings.h... (cached) yes checking for inttypes.h... (cached) yes checking for stdint.h... (cached) yes checking for unistd.h... (cached) yes checking for minix/config.h... (cached) no checking whether it is safe to define __EXTENSIONS__... (cached) yes checking whether _XOPEN_SOURCE should be defined... (cached) no configure: ** FastCGI (Programs) checking whether ln -s works... yes checking whether make sets $(MAKE)... (cached) yes checking build system type... (cached) riscv64-unknown-linux-gnu checking host system type... (cached) riscv64-unknown-linux-gnu checking for ld used by gcc... (cached) /usr/bin/ld checking if the linker (/usr/bin/ld) is GNU ld... (cached) yes checking for shared library run path origin... (cached) done checking host CPU and C ABI... (cached) riscv64-lp64d checking for the common suffixes of directories in the library search path... (cached) lib,lib checking how to link with libfcgi... /usr/lib64/libfcgi.so -L/usr/lib64 configure: ** FastCGI (Headers) checking fcgi_stdio.h usability... yes checking fcgi_stdio.h presence... yes checking for fcgi_stdio.h... yes configure: ** FastCGI (Types) checking for size_t... (cached) yes configure: ** FastCGI (Functions) checking for strchr... yes configure: ** FastCGI (Output) configure: updating cache ../config.cache configure: creating ./config.status config.status: creating Makefile config.status: creating link.sh config.status: creating config.h configure: ** FastCGI (Done) make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/fastcgi' /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/fastcgi/fastcgi.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x1d3a3000 - 0x1d3c3fff 0x80000000 - 0x800bffff 0x1592c06000 - 0x1592c20fff 0x1592c21000 - 0x1592c21fff 0x1592c22000 - 0x1592c22fff 0x1592c23000 - 0x1592c24fff 0x1592c25000 - 0x1592c26fff 0x1592c27000 - 0x1592c2dfff 0x1592c2e000 - 0x1592c2efff 0x1592c2f000 - 0x1592c2ffff 0x1592c31000 - 0x1592c32fff 0x1592c33000 - 0x1592c71fff 0x1592c72000 - 0x1592c73fff 0x1592c74000 - 0x1592c7afff 0x1592c7b000 - 0x1592c7bfff 0x1592c7c000 - 0x1592d05fff 0x1592d06000 - 0x1592d06fff 0x1592d07000 - 0x1592d07fff 0x1592d08000 - 0x1592d37fff 0x1592d38000 - 0x1592d38fff 0x1592d39000 - 0x1592d39fff 0x1592d3a000 - 0x1592d3afff 0x1592d3b000 - 0x1592d42fff 0x1592d43000 - 0x1592d68fff 0x1592d69000 - 0x1592d6cfff 0x1592d6d000 - 0x1592d6dfff 0x1592d6e000 - 0x1592d6ffff 0x1592d70000 - 0x1592d70fff 0x1592d71000 - 0x1592d71fff 0x1592d72000 - 0x1592d72fff 0x1592d73000 - 0x1592d76fff 0x1592d77000 - 0x1592d77fff 0x1592d78000 - 0x1592d78fff 0x1592d79000 - 0x1592d7afff 0x1592d7b000 - 0x1592d7cfff 0x1592d7d000 - 0x1592d7dfff 0x1592d7e000 - 0x1592d7efff 0x1592d7f000 - 0x1592eeafff 0x1592eeb000 - 0x1592eedfff 0x1592eee000 - 0x1592eeefff 0x1592eef000 - 0x1592eeffff 0x1592ef0000 - 0x1592f02fff 0x1592f03000 - 0x1592f03fff 0x1592f04000 - 0x1592f04fff 0x1592f05000 - 0x1593022fff 0x1593023000 - 0x1593025fff 0x1593026000 - 0x1593028fff 0x1593029000 - 0x159302dfff 0x159302e000 - 0x1593082fff 0x1593083000 - 0x159372dfff 0x3fffb60000 - 0x3fffb81fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/fastcgi/fastcgi.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/fastcgi/fastcgi.fas ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/fastcgi/fastcgi.c 0 errors, 0 warnings gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit -I.. -c fastcgi.c gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit -I.. -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/fastcgi/fastcgi_wrappers.c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/fastcgi/fastcgi_wrappers.c:53:8: warning: no previous declaration for ‘fcgi_getenv’ [-Wmissing-declarations] 53 | char * fcgi_getenv(char * var) { | ^~~~~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/fastcgi/fastcgi_wrappers.c:71:9: warning: no previous declaration for ‘fcgi_env’ [-Wmissing-declarations] 71 | char ** fcgi_env() { | ^~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/fastcgi/fastcgi_wrappers.c:113:8: warning: no previous declaration for ‘fcgi_read_stdin’ [-Wmissing-declarations] 113 | char * fcgi_read_stdin() { | ^~~~~~~~~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/fastcgi/fastcgi_wrappers.c: In function ‘read_stdio’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/fastcgi/fastcgi_wrappers.c:126:10: warning: pointer targets in returning ‘unsigned char *’ from a function with return type ‘char *’ differ in signedness [-Wpointer-sign] 126 | return buf; | ^~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/fastcgi/fastcgi_wrappers.c: At top level: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/fastcgi/fastcgi_wrappers.c:130:5: warning: no previous declaration for ‘fcgi_write_stdout’ [-Wmissing-declarations] 130 | int fcgi_write_stdout(char * data, int len) { | ^~~~~~~~~~~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/fastcgi/fastcgi_wrappers.c:133:5: warning: no previous declaration for ‘fcgi_write_stderr’ [-Wmissing-declarations] 133 | int fcgi_write_stderr(char * data, int len) { | ^~~~~~~~~~~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/fastcgi/fastcgi_wrappers.c:147:5: warning: no previous declaration for ‘fcgi_is_cgi_wrapper’ [-Wmissing-declarations] 147 | int fcgi_is_cgi_wrapper() { | ^~~~~~~~~~~~~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/fastcgi/fastcgi_wrappers.c:150:5: warning: no previous declaration for ‘fcgi_accept_wrapper’ [-Wmissing-declarations] 150 | int fcgi_accept_wrapper() { | ^~~~~~~~~~~~~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/fastcgi/fastcgi_wrappers.c:153:6: warning: no previous declaration for ‘fcgi_finish_wrapper’ [-Wmissing-declarations] 153 | void fcgi_finish_wrapper() { | ^~~~~~~~~~~~~~~~~~~ make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/fastcgi' mkdir -p gdbm m=`cd ../modules/gdbm; pwd`; \ if test -f $m/configure && { test ! -f gdbm/config.status || test -n "`find $m/configure -prune -newer gdbm/config.status`"; } ; then ( cd gdbm ;\ cache=`echo gdbm/ | sed -e 's,[^/][^/]*//*,../,g'`config.cache; \ if test -f ${cache} ; then \ . ${cache}; \ if test "${ac_cv_env_CC_set}" = set; then CC="${ac_cv_env_CC_value}"; export CC; fi; \ if test "${ac_cv_env_CFLAGS_set}" = set; then CFLAGS="${ac_cv_env_CFLAGS_value}"; export CFLAGS; fi; \ if test "${ac_cv_env_LDFLAGS_set}" = set; then LDFLAGS="${ac_cv_env_LDFLAGS_value}"; export LDFLAGS; fi; \ if test "${ac_cv_env_CLFLAGS_set}" = set; then CLFLAGS="${ac_cv_env_CLFLAGS_value}"; export CLFLAGS; fi; \ if test "${ac_cv_env_LIBS_set}" = set; then LIBS="${ac_cv_env_LIBS_value}"; export LIBS; fi; \ if test "${ac_cv_env_CPPFLAGS_set}" = set; then CPPFLAGS="${ac_cv_env_CPPFLAGS_value}"; export CPPFLAGS; fi; \ if test "${ac_cv_env_CPP_set}" = set; then CPP="${ac_cv_env_CPP_value}"; export CPP; fi; \ if test "${ac_cv_env_CXX_set}" = set; then CXX="${ac_cv_env_CXX_value}"; export CXX; fi; \ if test "${ac_cv_env_CXXFLAGS_set}" = set; then CXXFLAGS="${ac_cv_env_CXXFLAGS_value}"; export CXXFLAGS; fi; \ if test "${ac_cv_env_X_LIBS_set}" = set; then X_LIBS="${ac_cv_env_X_LIBS_value}"; export X_LIBS; fi; \ /bin/sh $m/configure --with-clisp="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" --cache-file=${cache} --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm';\ else \ /bin/sh $m/configure --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm'; \ fi ) ;\ fi; \ if test -f $m/Makefile && { test ! -f gdbm/Makefile || test -n "`find $m/Makefile -prune -newer gdbm/Makefile`"; } ; then \ sed "s,srcdir = .,srcdir = $m," "$m/Makefile" > gdbm/Makefile ; \ fi ; \ CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" ; \ cd gdbm ; make clisp-module CC="gcc" CPPFLAGS="-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib" CFLAGS="-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC" CLFLAGS="-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic" LIBS="-Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl " RANLIB="ranlib" CLISP="$CLISP -q" SHREXT=.so configure: loading cache ../config.cache configure: ** Gdbm (Common) checking how to remove colons from paths... (cached) echo $x checking for CLISP version... (cached) 2.49.93+ (2018-02-18) (built 3813886800) (memory 3828276446) checking for CLISP libdir... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/ checking for CLISP linking set... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build checking for CLISP... (cached) yes checking for gcc... (cached) gcc checking whether the C compiler works... yes checking for C compiler default output file name... a.out checking for suffix of executables... checking whether we are cross compiling... no checking for suffix of object files... (cached) o checking whether we are using the GNU C compiler... (cached) yes checking whether gcc accepts -g... (cached) yes checking for gcc option to accept ISO C89... (cached) none needed checking whether gcc understands -c and -o together... (cached) yes checking how to run the C preprocessor... (cached) gcc -E checking how to make hard links... (cached) ln checking whether ln -s works... (cached) yes checking for grep that handles long lines and -e... (cached) /usr/bin/grep checking for egrep... (cached) /usr/bin/grep -E checking for ANSI C header files... (cached) yes checking for sys/types.h... (cached) yes checking for sys/stat.h... (cached) yes checking for stdlib.h... (cached) yes checking for string.h... (cached) yes checking for memory.h... (cached) yes checking for strings.h... (cached) yes checking for inttypes.h... (cached) yes checking for stdint.h... (cached) yes checking for unistd.h... (cached) yes checking for minix/config.h... (cached) no checking whether it is safe to define __EXTENSIONS__... (cached) yes checking whether _XOPEN_SOURCE should be defined... (cached) no checking build system type... (cached) riscv64-unknown-linux-gnu checking host system type... (cached) riscv64-unknown-linux-gnu checking for ld used by gcc... (cached) /usr/bin/ld checking if the linker (/usr/bin/ld) is GNU ld... (cached) yes checking for shared library run path origin... (cached) done checking host CPU and C ABI... (cached) riscv64-lp64d checking for the common suffixes of directories in the library search path... (cached) lib,lib checking how to link with libgdbm... /usr/lib64/libgdbm.so -L/usr/lib64 configure: ** Gdbm (Headers) checking gdbm.h usability... yes checking gdbm.h presence... yes checking for gdbm.h... yes configure: ** Gdbm (Functions) checking for library containing gdbm_open... none required checking for gdbm_open... yes checking for gdbm_close... yes checking for gdbm_fdesc... yes checking for gdbm_store... yes checking for gdbm_fetch... yes checking for gdbm_delete... yes checking for gdbm_firstkey... yes checking for gdbm_nextkey... yes checking for gdbm_reorganize... yes checking for gdbm_sync... yes checking for gdbm_exists... yes checking for gdbm_setopt... yes checking for gdbm_count... yes configure: ** Gdbm (Output) configure: updating cache ../config.cache configure: creating ./config.status config.status: creating Makefile config.status: creating link.sh config.status: creating config.h configure: ** Gdbm (Done) make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gdbm' /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/gdbm/gdbm.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x3c66000 - 0x3c86fff 0x80000000 - 0x800bffff 0x15604a8000 - 0x15604c2fff 0x15604c3000 - 0x15604c3fff 0x15604c4000 - 0x15604c4fff 0x15604c5000 - 0x15604c6fff 0x15604c7000 - 0x15604c8fff 0x15604c9000 - 0x15604cffff 0x15604d0000 - 0x15604d0fff 0x15604d1000 - 0x15604d1fff 0x15604d3000 - 0x15604d4fff 0x15604d5000 - 0x1560513fff 0x1560514000 - 0x1560515fff 0x1560516000 - 0x156051cfff 0x156051d000 - 0x156051dfff 0x156051e000 - 0x15605a7fff 0x15605a8000 - 0x15605a8fff 0x15605a9000 - 0x15605a9fff 0x15605aa000 - 0x15605d9fff 0x15605da000 - 0x15605dafff 0x15605db000 - 0x15605dbfff 0x15605dc000 - 0x15605dcfff 0x15605dd000 - 0x15605e4fff 0x15605e5000 - 0x156060afff 0x156060b000 - 0x156060efff 0x156060f000 - 0x156060ffff 0x1560610000 - 0x1560611fff 0x1560612000 - 0x1560612fff 0x1560613000 - 0x1560613fff 0x1560614000 - 0x1560614fff 0x1560615000 - 0x1560618fff 0x1560619000 - 0x1560619fff 0x156061a000 - 0x156061afff 0x156061b000 - 0x156061cfff 0x156061d000 - 0x156061efff 0x156061f000 - 0x156061ffff 0x1560620000 - 0x1560620fff 0x1560621000 - 0x156078cfff 0x156078d000 - 0x156078ffff 0x1560790000 - 0x1560790fff 0x1560791000 - 0x1560791fff 0x1560792000 - 0x15607a4fff 0x15607a5000 - 0x15607a5fff 0x15607a6000 - 0x15607a6fff 0x15607a7000 - 0x15608c4fff 0x15608c5000 - 0x15608c7fff 0x15608c8000 - 0x15608cafff 0x15608cb000 - 0x15608cffff 0x15608d0000 - 0x1560924fff 0x1560925000 - 0x1560fcffff 0x3fffa9e000 - 0x3fffabffff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/gdbm/gdbm.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gdbm/gdbm.fas 0 errors, 0 warnings /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -C /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit/modprep /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/gdbm/gdbm.c ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x1f994000 - 0x1f9b4fff 0x80000000 - 0x800bffff 0x1574d2b000 - 0x1574d45fff 0x1574d46000 - 0x1574d46fff 0x1574d47000 - 0x1574d47fff 0x1574d48000 - 0x1574d49fff 0x1574d4a000 - 0x1574d4bfff 0x1574d4c000 - 0x1574d52fff 0x1574d53000 - 0x1574d53fff 0x1574d54000 - 0x1574d54fff 0x1574d56000 - 0x1574d57fff 0x1574d58000 - 0x1574d96fff 0x1574d97000 - 0x1574d98fff 0x1574d99000 - 0x1574d9ffff 0x1574da0000 - 0x1574da0fff 0x1574da1000 - 0x1574e2afff 0x1574e2b000 - 0x1574e2bfff 0x1574e2c000 - 0x1574e2cfff 0x1574e2d000 - 0x1574e5cfff 0x1574e5d000 - 0x1574e5dfff 0x1574e5e000 - 0x1574e5efff 0x1574e5f000 - 0x1574e5ffff 0x1574e60000 - 0x1574e67fff 0x1574e68000 - 0x1574e8dfff 0x1574e8e000 - 0x1574e91fff 0x1574e92000 - 0x1574e92fff 0x1574e93000 - 0x1574e94fff 0x1574e95000 - 0x1574e95fff 0x1574e96000 - 0x1574e96fff 0x1574e97000 - 0x1574e97fff 0x1574e98000 - 0x1574e9bfff 0x1574e9c000 - 0x1574e9cfff 0x1574e9d000 - 0x1574e9dfff 0x1574e9e000 - 0x1574e9ffff 0x1574ea0000 - 0x1574ea1fff 0x1574ea2000 - 0x1574ea2fff 0x1574ea3000 - 0x1574ea3fff 0x1574ea4000 - 0x157500ffff 0x1575010000 - 0x1575012fff 0x1575013000 - 0x1575013fff 0x1575014000 - 0x1575014fff 0x1575015000 - 0x1575027fff 0x1575028000 - 0x1575028fff 0x1575029000 - 0x1575029fff 0x157502a000 - 0x1575147fff 0x1575148000 - 0x157514afff 0x157514b000 - 0x157514dfff 0x157514e000 - 0x1575152fff 0x1575153000 - 0x15751a7fff 0x15751a8000 - 0x1575852fff 0x3fffb87000 - 0x3fffba8fff ;; MODPREP: "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/gdbm/gdbm.c" --> #P"gdbm.m.c" ;; MODPREP: reading "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/gdbm/gdbm.c": 20,012 bytes, 482 lines ;; MODPREP: 92 objects, 15 DEFUNs, 1 DEFVAR (1 init) ;; packages: ("GDBM") MODPREP: wrote gdbm.m.c (67,440 bytes) gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I. -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit \ -c gdbm.m.c -o gdbm.o ln -s /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/gdbm/preload.lisp . make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gdbm' mkdir -p gtk2 m=`cd ../modules/gtk2; pwd`; \ if test -f $m/configure && { test ! -f gtk2/config.status || test -n "`find $m/configure -prune -newer gtk2/config.status`"; } ; then ( cd gtk2 ;\ cache=`echo gtk2/ | sed -e 's,[^/][^/]*//*,../,g'`config.cache; \ if test -f ${cache} ; then \ . ${cache}; \ if test "${ac_cv_env_CC_set}" = set; then CC="${ac_cv_env_CC_value}"; export CC; fi; \ if test "${ac_cv_env_CFLAGS_set}" = set; then CFLAGS="${ac_cv_env_CFLAGS_value}"; export CFLAGS; fi; \ if test "${ac_cv_env_LDFLAGS_set}" = set; then LDFLAGS="${ac_cv_env_LDFLAGS_value}"; export LDFLAGS; fi; \ if test "${ac_cv_env_CLFLAGS_set}" = set; then CLFLAGS="${ac_cv_env_CLFLAGS_value}"; export CLFLAGS; fi; \ if test "${ac_cv_env_LIBS_set}" = set; then LIBS="${ac_cv_env_LIBS_value}"; export LIBS; fi; \ if test "${ac_cv_env_CPPFLAGS_set}" = set; then CPPFLAGS="${ac_cv_env_CPPFLAGS_value}"; export CPPFLAGS; fi; \ if test "${ac_cv_env_CPP_set}" = set; then CPP="${ac_cv_env_CPP_value}"; export CPP; fi; \ if test "${ac_cv_env_CXX_set}" = set; then CXX="${ac_cv_env_CXX_value}"; export CXX; fi; \ if test "${ac_cv_env_CXXFLAGS_set}" = set; then CXXFLAGS="${ac_cv_env_CXXFLAGS_value}"; export CXXFLAGS; fi; \ if test "${ac_cv_env_X_LIBS_set}" = set; then X_LIBS="${ac_cv_env_X_LIBS_value}"; export X_LIBS; fi; \ /bin/sh $m/configure --with-clisp="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" --cache-file=${cache} --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm';\ else \ /bin/sh $m/configure --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm'; \ fi ) ;\ fi; \ if test -f $m/Makefile && { test ! -f gtk2/Makefile || test -n "`find $m/Makefile -prune -newer gtk2/Makefile`"; } ; then \ sed "s,srcdir = .,srcdir = $m," "$m/Makefile" > gtk2/Makefile ; \ fi ; \ CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" ; \ cd gtk2 ; make clisp-module CC="gcc" CPPFLAGS="-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib" CFLAGS="-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC" CLFLAGS="-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic" LIBS="-Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl " RANLIB="ranlib" CLISP="$CLISP -q" SHREXT=.so configure: loading cache ../config.cache configure: ** GTK2 (Common) checking how to remove colons from paths... (cached) echo $x checking for CLISP version... (cached) 2.49.93+ (2018-02-18) (built 3813886800) (memory 3828276446) checking for CLISP libdir... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/ checking for CLISP linking set... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build checking for CLISP... (cached) yes checking for FFI in CLISP... (cached) yes checking for gcc... (cached) gcc checking whether the C compiler works... yes checking for C compiler default output file name... a.out checking for suffix of executables... checking whether we are cross compiling... no checking for suffix of object files... (cached) o checking whether we are using the GNU C compiler... (cached) yes checking whether gcc accepts -g... (cached) yes checking for gcc option to accept ISO C89... (cached) none needed checking whether gcc understands -c and -o together... (cached) yes checking how to run the C preprocessor... (cached) gcc -E checking how to make hard links... (cached) ln checking whether ln -s works... (cached) yes checking for grep that handles long lines and -e... (cached) /usr/bin/grep checking for egrep... (cached) /usr/bin/grep -E checking for ANSI C header files... (cached) yes checking for sys/types.h... (cached) yes checking for sys/stat.h... (cached) yes checking for stdlib.h... (cached) yes checking for string.h... (cached) yes checking for memory.h... (cached) yes checking for strings.h... (cached) yes checking for inttypes.h... (cached) yes checking for stdint.h... (cached) yes checking for unistd.h... (cached) yes checking for minix/config.h... (cached) no checking whether it is safe to define __EXTENSIONS__... (cached) yes checking whether _XOPEN_SOURCE should be defined... (cached) no checking for pkg-config... (cached) /usr/bin/pkg-config checking pkg-config is at least version 0.9.0... yes checking for pkg-config... (cached) /usr/bin/pkg-config checking pkg-config is at least version 0.7... yes checking for GTK+ - version >= 2.0.0... yes (version 2.24.32) checking for LIBGLADE... yes configure: ** GTK2 (Output) configure: updating cache ../config.cache configure: creating ./config.status config.status: creating Makefile config.status: creating link.sh config.status: creating config.h configure: ** GTK2 (Done) make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gtk2' /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/gtk2/gtk.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x6bf3000 - 0x6c13fff 0x80000000 - 0x800bffff 0x15737ff000 - 0x1573819fff 0x157381a000 - 0x157381afff 0x157381b000 - 0x157381bfff 0x157381c000 - 0x157381dfff 0x157381e000 - 0x157381ffff 0x1573820000 - 0x1573826fff 0x1573827000 - 0x1573827fff 0x1573828000 - 0x1573828fff 0x157382a000 - 0x157382bfff 0x157382c000 - 0x157386afff 0x157386b000 - 0x157386cfff 0x157386d000 - 0x1573873fff 0x1573874000 - 0x1573874fff 0x1573875000 - 0x15738fefff 0x15738ff000 - 0x15738fffff 0x1573900000 - 0x1573900fff 0x1573901000 - 0x1573930fff 0x1573931000 - 0x1573931fff 0x1573932000 - 0x1573932fff 0x1573933000 - 0x1573933fff 0x1573934000 - 0x157393bfff 0x157393c000 - 0x1573961fff 0x1573962000 - 0x1573965fff 0x1573966000 - 0x1573966fff 0x1573967000 - 0x1573968fff 0x1573969000 - 0x1573969fff 0x157396a000 - 0x157396afff 0x157396b000 - 0x157396bfff 0x157396c000 - 0x157396ffff 0x1573970000 - 0x1573970fff 0x1573971000 - 0x1573971fff 0x1573972000 - 0x1573973fff 0x1573974000 - 0x1573975fff 0x1573976000 - 0x1573976fff 0x1573977000 - 0x1573977fff 0x1573978000 - 0x1573ae3fff 0x1573ae4000 - 0x1573ae6fff 0x1573ae7000 - 0x1573ae7fff 0x1573ae8000 - 0x1573ae8fff 0x1573ae9000 - 0x1573afbfff 0x1573afc000 - 0x1573afcfff 0x1573afd000 - 0x1573afdfff 0x1573afe000 - 0x1573c1bfff 0x1573c1c000 - 0x1573c1efff 0x1573c1f000 - 0x1573c21fff 0x1573c22000 - 0x1573c26fff 0x1573c27000 - 0x1573c7bfff 0x1573c7c000 - 0x1574326fff 0x3fffe85000 - 0x3fffea6fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/gtk2/gtk.lisp ... ;; Reading 31,362 bytes from /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/gtk2/gtk-server.cfg ;; Defined 335 functions ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gtk2/gtk.fas ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gtk2/gtk.c 0 errors, 0 warnings gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit -I/usr/include/gtk-2.0 -I/usr/lib64/gtk-2.0/include -I/usr/include/pango-1.0 -I/usr/include/glib-2.0 -I/usr/lib64/glib-2.0/include -I/usr/include/harfbuzz -I/usr/include/freetype2 -I/usr/include/libpng16 -I/usr/include/libmount -I/usr/include/blkid -I/usr/include/fribidi -I/usr/include/libxml2 -I/usr/include/cairo -I/usr/include/pixman-1 -I/usr/include/gdk-pixbuf-2.0 -I/usr/include/atk-1.0 -pthread \ -I/usr/include/libglade-2.0 -I/usr/include/gtk-2.0 -I/usr/lib64/gtk-2.0/include -I/usr/include/pango-1.0 -I/usr/include/glib-2.0 -I/usr/lib64/glib-2.0/include -I/usr/include/harfbuzz -I/usr/include/freetype2 -I/usr/include/libpng16 -I/usr/include/libmount -I/usr/include/blkid -I/usr/include/fribidi -I/usr/include/libxml2 -I/usr/include/cairo -I/usr/include/pixman-1 -I/usr/include/gdk-pixbuf-2.0 -I/usr/include/atk-1.0 -pthread -c gtk.c In file included from /usr/include/gtk-2.0/gtk/gtkobject.h:37, from /usr/include/gtk-2.0/gtk/gtkwidget.h:36, from /usr/include/gtk-2.0/gtk/gtkcontainer.h:35, from /usr/include/gtk-2.0/gtk/gtkbin.h:35, from /usr/include/gtk-2.0/gtk/gtkwindow.h:36, from /usr/include/gtk-2.0/gtk/gtkdialog.h:35, from /usr/include/gtk-2.0/gtk/gtkaboutdialog.h:32, from /usr/include/gtk-2.0/gtk/gtk.h:33, from gtk.c:104: /usr/include/gtk-2.0/gtk/gtktypeutils.h:236:1: warning: ‘GTypeDebugFlags’ is deprecated [-Wdeprecated-declarations] 236 | void gtk_type_init (GTypeDebugFlags debug_flags); | ^~~~ In file included from /usr/include/glib-2.0/gobject/gobject.h:24, from /usr/include/glib-2.0/gobject/gbinding.h:29, from /usr/include/glib-2.0/glib-object.h:22, from /usr/include/glib-2.0/gio/gioenums.h:28, from /usr/include/glib-2.0/gio/giotypes.h:28, from /usr/include/glib-2.0/gio/gio.h:26, from /usr/include/gtk-2.0/gdk/gdkapplaunchcontext.h:30, from /usr/include/gtk-2.0/gdk/gdk.h:32, from /usr/include/gtk-2.0/gtk/gtk.h:32, from gtk.c:104: /usr/include/glib-2.0/gobject/gtype.h:679:1: note: declared here 679 | { | ^ In file included from /usr/include/gtk-2.0/gtk/gtktoolitem.h:31, from /usr/include/gtk-2.0/gtk/gtktoolbutton.h:30, from /usr/include/gtk-2.0/gtk/gtkmenutoolbutton.h:30, from /usr/include/gtk-2.0/gtk/gtk.h:126, from gtk.c:104: /usr/include/gtk-2.0/gtk/gtktooltips.h:73:3: warning: ‘GTimeVal’ is deprecated: Use 'GDateTime' instead [-Wdeprecated-declarations] 73 | GTimeVal last_popdown; | ^~~~~~~~ In file included from /usr/include/glib-2.0/glib/galloca.h:32, from /usr/include/glib-2.0/glib.h:30, from /usr/include/glib-2.0/gobject/gbinding.h:28, from /usr/include/glib-2.0/glib-object.h:22, from /usr/include/glib-2.0/gio/gioenums.h:28, from /usr/include/glib-2.0/gio/giotypes.h:28, from /usr/include/glib-2.0/gio/gio.h:26, from /usr/include/gtk-2.0/gdk/gdkapplaunchcontext.h:30, from /usr/include/gtk-2.0/gdk/gdk.h:32, from /usr/include/gtk-2.0/gtk/gtk.h:32, from gtk.c:104: /usr/include/glib-2.0/glib/gtypes.h:547:8: note: declared here 547 | struct _GTimeVal | ^~~~~~~~~ ln -s /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/gtk2/preload.lisp . make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gtk2' mkdir -p libsvm m=`cd ../modules/libsvm; pwd`; \ if test -f $m/configure && { test ! -f libsvm/config.status || test -n "`find $m/configure -prune -newer libsvm/config.status`"; } ; then ( cd libsvm ;\ cache=`echo libsvm/ | sed -e 's,[^/][^/]*//*,../,g'`config.cache; \ if test -f ${cache} ; then \ . ${cache}; \ if test "${ac_cv_env_CC_set}" = set; then CC="${ac_cv_env_CC_value}"; export CC; fi; \ if test "${ac_cv_env_CFLAGS_set}" = set; then CFLAGS="${ac_cv_env_CFLAGS_value}"; export CFLAGS; fi; \ if test "${ac_cv_env_LDFLAGS_set}" = set; then LDFLAGS="${ac_cv_env_LDFLAGS_value}"; export LDFLAGS; fi; \ if test "${ac_cv_env_CLFLAGS_set}" = set; then CLFLAGS="${ac_cv_env_CLFLAGS_value}"; export CLFLAGS; fi; \ if test "${ac_cv_env_LIBS_set}" = set; then LIBS="${ac_cv_env_LIBS_value}"; export LIBS; fi; \ if test "${ac_cv_env_CPPFLAGS_set}" = set; then CPPFLAGS="${ac_cv_env_CPPFLAGS_value}"; export CPPFLAGS; fi; \ if test "${ac_cv_env_CPP_set}" = set; then CPP="${ac_cv_env_CPP_value}"; export CPP; fi; \ if test "${ac_cv_env_CXX_set}" = set; then CXX="${ac_cv_env_CXX_value}"; export CXX; fi; \ if test "${ac_cv_env_CXXFLAGS_set}" = set; then CXXFLAGS="${ac_cv_env_CXXFLAGS_value}"; export CXXFLAGS; fi; \ if test "${ac_cv_env_X_LIBS_set}" = set; then X_LIBS="${ac_cv_env_X_LIBS_value}"; export X_LIBS; fi; \ /bin/sh $m/configure --with-clisp="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" --cache-file=${cache} --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm';\ else \ /bin/sh $m/configure --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm'; \ fi ) ;\ fi; \ if test -f $m/Makefile && { test ! -f libsvm/Makefile || test -n "`find $m/Makefile -prune -newer libsvm/Makefile`"; } ; then \ sed "s,srcdir = .,srcdir = $m," "$m/Makefile" > libsvm/Makefile ; \ fi ; \ CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" ; \ cd libsvm ; make clisp-module CC="gcc" CPPFLAGS="-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib" CFLAGS="-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC" CLFLAGS="-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic" LIBS="-Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl " RANLIB="ranlib" CLISP="$CLISP -q" SHREXT=.so configure: loading cache ../config.cache configure: ** LibSVM (Common) checking how to remove colons from paths... (cached) echo $x checking for CLISP version... (cached) 2.49.93+ (2018-02-18) (built 3813886800) (memory 3828276446) checking for CLISP libdir... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/ checking for CLISP linking set... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build checking for CLISP... (cached) yes checking for FFI in CLISP... (cached) yes checking for gcc... (cached) gcc checking whether the C compiler works... yes checking for C compiler default output file name... a.out checking for suffix of executables... checking whether we are cross compiling... no checking for suffix of object files... (cached) o checking whether we are using the GNU C compiler... (cached) yes checking whether gcc accepts -g... (cached) yes checking for gcc option to accept ISO C89... (cached) none needed checking whether gcc understands -c and -o together... (cached) yes checking how to run the C preprocessor... (cached) gcc -E checking how to make hard links... (cached) ln checking whether ln -s works... (cached) yes checking for grep that handles long lines and -e... (cached) /usr/bin/grep checking for egrep... (cached) /usr/bin/grep -E checking for ANSI C header files... (cached) yes checking for sys/types.h... (cached) yes checking for sys/stat.h... (cached) yes checking for stdlib.h... (cached) yes checking for string.h... (cached) yes checking for memory.h... (cached) yes checking for strings.h... (cached) yes checking for inttypes.h... (cached) yes checking for stdint.h... (cached) yes checking for unistd.h... (cached) yes checking for minix/config.h... (cached) no checking whether it is safe to define __EXTENSIONS__... (cached) yes checking whether _XOPEN_SOURCE should be defined... (cached) no checking build system type... (cached) riscv64-unknown-linux-gnu checking host system type... (cached) riscv64-unknown-linux-gnu checking for ld used by gcc... (cached) /usr/bin/ld checking if the linker (/usr/bin/ld) is GNU ld... (cached) yes checking for shared library run path origin... (cached) done checking host CPU and C ABI... (cached) riscv64-lp64d checking for the common suffixes of directories in the library search path... (cached) lib,lib checking how to link with libsvm... /usr/lib64/libsvm.so -L/usr/lib64 configure: ** LibSVM (Headers) checking svm.h usability... yes checking svm.h presence... yes checking for svm.h... yes configure: ** LibSVM (Functions) checking for library containing svm_train... none required checking for svm_check_parameter... yes checking for svm_check_probability_model... yes checking for svm_cross_validation... yes checking for svm_destroy_model... no checking for svm_destroy_param... yes checking for svm_free_and_destroy_model... yes checking for svm_get_labels... yes checking for svm_get_nr_class... yes checking for svm_get_svm_type... yes checking for svm_get_svr_probability... yes checking for svm_load_model... yes checking for svm_predict... yes checking for svm_predict_probability... yes checking for svm_predict_values... yes checking for svm_save_model... yes checking for svm_train... yes checking for svm_set_print_string_function... yes configure: ** Libsvm (Output) configure: updating cache ../config.cache configure: creating ./config.status config.status: creating Makefile config.status: creating link.sh config.status: creating config.h configure: ** Libsvm (Done) make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/libsvm' /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/libsvm/libsvm.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x14d6000 - 0x14f6fff 0x80000000 - 0x800bffff 0x1586bd7000 - 0x1586bf1fff 0x1586bf2000 - 0x1586bf2fff 0x1586bf3000 - 0x1586bf3fff 0x1586bf4000 - 0x1586bf5fff 0x1586bf6000 - 0x1586bf7fff 0x1586bf8000 - 0x1586bfefff 0x1586bff000 - 0x1586bfffff 0x1586c00000 - 0x1586c00fff 0x1586c02000 - 0x1586c03fff 0x1586c04000 - 0x1586c42fff 0x1586c43000 - 0x1586c44fff 0x1586c45000 - 0x1586c4bfff 0x1586c4c000 - 0x1586c4cfff 0x1586c4d000 - 0x1586cd6fff 0x1586cd7000 - 0x1586cd7fff 0x1586cd8000 - 0x1586cd8fff 0x1586cd9000 - 0x1586d08fff 0x1586d09000 - 0x1586d09fff 0x1586d0a000 - 0x1586d0afff 0x1586d0b000 - 0x1586d0bfff 0x1586d0c000 - 0x1586d13fff 0x1586d14000 - 0x1586d39fff 0x1586d3a000 - 0x1586d3dfff 0x1586d3e000 - 0x1586d3efff 0x1586d3f000 - 0x1586d40fff 0x1586d41000 - 0x1586d41fff 0x1586d42000 - 0x1586d42fff 0x1586d43000 - 0x1586d43fff 0x1586d44000 - 0x1586d47fff 0x1586d48000 - 0x1586d48fff 0x1586d49000 - 0x1586d49fff 0x1586d4a000 - 0x1586d4bfff 0x1586d4c000 - 0x1586d4dfff 0x1586d4e000 - 0x1586d4efff 0x1586d4f000 - 0x1586d4ffff 0x1586d50000 - 0x1586ebbfff 0x1586ebc000 - 0x1586ebefff 0x1586ebf000 - 0x1586ebffff 0x1586ec0000 - 0x1586ec0fff 0x1586ec1000 - 0x1586ed3fff 0x1586ed4000 - 0x1586ed4fff 0x1586ed5000 - 0x1586ed5fff 0x1586ed6000 - 0x1586ff3fff 0x1586ff4000 - 0x1586ff6fff 0x1586ff7000 - 0x1586ff9fff 0x1586ffa000 - 0x1586ffefff 0x1586fff000 - 0x1587053fff 0x1587054000 - 0x15876fefff 0x3fffe29000 - 0x3fffe4afff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/libsvm/libsvm.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/libsvm/libsvm.fas ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/libsvm/libsvm.c 0 errors, 0 warnings gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit -c libsvm.c libsvm.c:18:6: warning: no previous declaration for ‘svm_destroy_model’ [-Wmissing-declarations] 18 | void svm_destroy_model (struct svm_model *model){ svm_free_and_destroy_model(&model); } | ^~~~~~~~~~~~~~~~~ ln -s /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/libsvm/preload.lisp . make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/libsvm' mkdir -p pari m=`cd ../modules/pari; pwd`; \ if test -f $m/configure && { test ! -f pari/config.status || test -n "`find $m/configure -prune -newer pari/config.status`"; } ; then ( cd pari ;\ cache=`echo pari/ | sed -e 's,[^/][^/]*//*,../,g'`config.cache; \ if test -f ${cache} ; then \ . ${cache}; \ if test "${ac_cv_env_CC_set}" = set; then CC="${ac_cv_env_CC_value}"; export CC; fi; \ if test "${ac_cv_env_CFLAGS_set}" = set; then CFLAGS="${ac_cv_env_CFLAGS_value}"; export CFLAGS; fi; \ if test "${ac_cv_env_LDFLAGS_set}" = set; then LDFLAGS="${ac_cv_env_LDFLAGS_value}"; export LDFLAGS; fi; \ if test "${ac_cv_env_CLFLAGS_set}" = set; then CLFLAGS="${ac_cv_env_CLFLAGS_value}"; export CLFLAGS; fi; \ if test "${ac_cv_env_LIBS_set}" = set; then LIBS="${ac_cv_env_LIBS_value}"; export LIBS; fi; \ if test "${ac_cv_env_CPPFLAGS_set}" = set; then CPPFLAGS="${ac_cv_env_CPPFLAGS_value}"; export CPPFLAGS; fi; \ if test "${ac_cv_env_CPP_set}" = set; then CPP="${ac_cv_env_CPP_value}"; export CPP; fi; \ if test "${ac_cv_env_CXX_set}" = set; then CXX="${ac_cv_env_CXX_value}"; export CXX; fi; \ if test "${ac_cv_env_CXXFLAGS_set}" = set; then CXXFLAGS="${ac_cv_env_CXXFLAGS_value}"; export CXXFLAGS; fi; \ if test "${ac_cv_env_X_LIBS_set}" = set; then X_LIBS="${ac_cv_env_X_LIBS_value}"; export X_LIBS; fi; \ /bin/sh $m/configure --with-clisp="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" --cache-file=${cache} --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm';\ else \ /bin/sh $m/configure --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm'; \ fi ) ;\ fi; \ if test -f $m/Makefile && { test ! -f pari/Makefile || test -n "`find $m/Makefile -prune -newer pari/Makefile`"; } ; then \ sed "s,srcdir = .,srcdir = $m," "$m/Makefile" > pari/Makefile ; \ fi ; \ CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" ; \ cd pari ; make clisp-module CC="gcc" CPPFLAGS="-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib" CFLAGS="-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC" CLFLAGS="-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic" LIBS="-Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl " RANLIB="ranlib" CLISP="$CLISP -q" SHREXT=.so configure: loading cache ../config.cache configure: ** PARI (Common) checking how to remove colons from paths... (cached) echo $x checking for CLISP version... (cached) 2.49.93+ (2018-02-18) (built 3813886800) (memory 3828276446) checking for CLISP libdir... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/ checking for CLISP linking set... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build checking for CLISP... (cached) yes checking for FFI in CLISP... (cached) yes checking for gcc... (cached) gcc checking whether the C compiler works... yes checking for C compiler default output file name... a.out checking for suffix of executables... checking whether we are cross compiling... no checking for suffix of object files... (cached) o checking whether we are using the GNU C compiler... (cached) yes checking whether gcc accepts -g... (cached) yes checking for gcc option to accept ISO C89... (cached) none needed checking whether gcc understands -c and -o together... (cached) yes checking how to run the C preprocessor... (cached) gcc -E checking how to make hard links... (cached) ln checking whether ln -s works... (cached) yes checking for grep that handles long lines and -e... (cached) /usr/bin/grep checking for egrep... (cached) /usr/bin/grep -E checking for ANSI C header files... (cached) yes checking for sys/types.h... (cached) yes checking for sys/stat.h... (cached) yes checking for stdlib.h... (cached) yes checking for string.h... (cached) yes checking for memory.h... (cached) yes checking for strings.h... (cached) yes checking for inttypes.h... (cached) yes checking for stdint.h... (cached) yes checking for unistd.h... (cached) yes checking for minix/config.h... (cached) no checking whether it is safe to define __EXTENSIONS__... (cached) yes checking whether _XOPEN_SOURCE should be defined... (cached) no checking build system type... (cached) riscv64-unknown-linux-gnu checking host system type... (cached) riscv64-unknown-linux-gnu checking for ld used by gcc... (cached) /usr/bin/ld checking if the linker (/usr/bin/ld) is GNU ld... (cached) yes checking for shared library run path origin... (cached) done checking host CPU and C ABI... (cached) riscv64-lp64d checking for the common suffixes of directories in the library search path... (cached) lib,lib checking how to link with libpari... /usr/lib64/libpari.so -L/usr/lib64 configure: ** PARI (Headers) checking pari/pari.h usability... yes checking pari/pari.h presence... yes checking for pari/pari.h... yes configure: ** PARI (Functions) checking for library containing pari_kernel_init... none required checking for pari_init... yes checking for pari_init_opts... yes checking for pari_close... yes configure: ** PARI (Output) configure: updating cache ../config.cache configure: creating ./config.status config.status: creating Makefile config.status: creating link.sh config.status: creating config.h configure: ** PARI (Done) make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pari' /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pari/desc2lisp.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x387f1000 - 0x38811fff 0x80000000 - 0x800bffff 0x1587861000 - 0x158787bfff 0x158787c000 - 0x158787cfff 0x158787d000 - 0x158787dfff 0x158787e000 - 0x158787ffff 0x1587880000 - 0x1587881fff 0x1587882000 - 0x1587888fff 0x1587889000 - 0x1587889fff 0x158788a000 - 0x158788afff 0x158788c000 - 0x158788dfff 0x158788e000 - 0x15878ccfff 0x15878cd000 - 0x15878cefff 0x15878cf000 - 0x15878d5fff 0x15878d6000 - 0x15878d6fff 0x15878d7000 - 0x1587960fff 0x1587961000 - 0x1587961fff 0x1587962000 - 0x1587962fff 0x1587963000 - 0x1587992fff 0x1587993000 - 0x1587993fff 0x1587994000 - 0x1587994fff 0x1587995000 - 0x1587995fff 0x1587996000 - 0x158799dfff 0x158799e000 - 0x15879c3fff 0x15879c4000 - 0x15879c7fff 0x15879c8000 - 0x15879c8fff 0x15879c9000 - 0x15879cafff 0x15879cb000 - 0x15879cbfff 0x15879cc000 - 0x15879ccfff 0x15879cd000 - 0x15879cdfff 0x15879ce000 - 0x15879d1fff 0x15879d2000 - 0x15879d2fff 0x15879d3000 - 0x15879d3fff 0x15879d4000 - 0x15879d5fff 0x15879d6000 - 0x15879d7fff 0x15879d8000 - 0x15879d8fff 0x15879d9000 - 0x15879d9fff 0x15879da000 - 0x1587b45fff 0x1587b46000 - 0x1587b48fff 0x1587b49000 - 0x1587b49fff 0x1587b4a000 - 0x1587b4afff 0x1587b4b000 - 0x1587b5dfff 0x1587b5e000 - 0x1587b5efff 0x1587b5f000 - 0x1587b5ffff 0x1587b60000 - 0x1587c7dfff 0x1587c7e000 - 0x1587c80fff 0x1587c81000 - 0x1587c83fff 0x1587c84000 - 0x1587c88fff 0x1587c89000 - 0x1587cddfff 0x1587cde000 - 0x1588388fff 0x3ffff67000 - 0x3ffff88fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pari/desc2lisp.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pari/desc2lisp.fas 0 errors, 0 warnings /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -i desc2lisp -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pari/pari.lisp -o ./ /usr/share/pari Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x39195000 - 0x391b5fff 0x80000000 - 0x800bffff 0x15721b0000 - 0x15721cafff 0x15721cb000 - 0x15721cbfff 0x15721cc000 - 0x15721ccfff 0x15721cd000 - 0x15721cefff 0x15721cf000 - 0x15721d0fff 0x15721d1000 - 0x15721d7fff 0x15721d8000 - 0x15721d8fff 0x15721d9000 - 0x15721d9fff 0x15721db000 - 0x15721dcfff 0x15721dd000 - 0x157221bfff 0x157221c000 - 0x157221dfff 0x157221e000 - 0x1572224fff 0x1572225000 - 0x1572225fff 0x1572226000 - 0x15722affff 0x15722b0000 - 0x15722b0fff 0x15722b1000 - 0x15722b1fff 0x15722b2000 - 0x15722e1fff 0x15722e2000 - 0x15722e2fff 0x15722e3000 - 0x15722e3fff 0x15722e4000 - 0x15722e4fff 0x15722e5000 - 0x15722ecfff 0x15722ed000 - 0x1572312fff 0x1572313000 - 0x1572316fff 0x1572317000 - 0x1572317fff 0x1572318000 - 0x1572319fff 0x157231a000 - 0x157231afff 0x157231b000 - 0x157231bfff 0x157231c000 - 0x157231cfff 0x157231d000 - 0x1572320fff 0x1572321000 - 0x1572321fff 0x1572322000 - 0x1572322fff 0x1572323000 - 0x1572324fff 0x1572325000 - 0x1572326fff 0x1572327000 - 0x1572327fff 0x1572328000 - 0x1572328fff 0x1572329000 - 0x1572494fff 0x1572495000 - 0x1572497fff 0x1572498000 - 0x1572498fff 0x1572499000 - 0x1572499fff 0x157249a000 - 0x15724acfff 0x15724ad000 - 0x15724adfff 0x15724ae000 - 0x15724aefff 0x15724af000 - 0x15725ccfff 0x15725cd000 - 0x15725cffff 0x15725d0000 - 0x15725d2fff 0x15725d3000 - 0x15725d7fff 0x15725d8000 - 0x157262cfff 0x157262d000 - 0x1572cd7fff 0x3fffe6b000 - 0x3fffe8cfff ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pari/desc2lisp.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pari/desc2lisp.fas ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pari/pari.lisp ... Reading "/usr/share/pari/pari.desc" (1,553,877 bytes) WARNING: Existing name: "arg" (arg :INTERNAL) WARNING: Existing name: "arity" (arity :INTERNAL) WARNING: Existing name: "default" (default :INTERNAL) WARNING: Existing name: "digits" (digits :INTERNAL) WARNING: Existing name: "prime" (prime :INTERNAL) WARNING: Existing name: "shift" (shift :INTERNAL) WARNING: Existing name: "sign" (sign :INTERNAL) Read 1,379 functions Ignored: non-basic: 147 no C-name: 102 programming/internals: 53 obsolete: 49 sums: 38 wrapped: 35 graphic: 35 programming/control: 29 programming/parallel: 11 Classes: basic: 1,232 gp2c_internal: 72 default: 46 header: 19 gp: 6 gp2c: 4 Sections: number_fields: 190 number_theoretical: 121 programming/specific: 90 linear_algebra: 88 elliptic_curves: 87 nil: 76 modular_forms: 71 transcendental: 70 algebras: 69 conversions: 61 polynomials: 60 programming/internals: 53 symbolic_operators: 47 default: 47 member_functions: 45 sums: 38 graphic: 35 modular_symbols: 32 programming/control: 29 l_functions: 28 combinatorics: 20 operators: 11 programming/parallel: 11 Emitted 1,019 functions WARNING: parse-prototype("Ser":"GDnDGDP"): mismatch: params= ((precdl long :IN :NONE pari-series-precision) (nil pari-gen :IN :NONE nil) (varno long :IN :NONE -1) (nil pari-gen)) arglist=(s (v 'x) (d seriesprecision)) in #S(desc :lisp-name Ser :function "Ser" :class "basic" :section "conversions" :c-name "Ser0" :prototype "GDnDGDP" :help ("Ser(s,{v='x},{d=seriesprecision}): convert s into a power series with" " variable v and precision d, starting with the constant coefficient.") :iterator nil :doc ("transforms the object $s$ into a power series with main variable $v$" " ($x$ by default) and precision (number of significant terms) equal to" " $d \\geq 0$ ($d = \\kbd{seriesprecision}$ by default). If $s$ is a" " scalar, this gives a constant power series in $v$ with precision \\kbd{d}." " If $s$ is a polynomial, the polynomial is truncated to $d$ terms if needed" " \\bprog" " ? \\ps" " seriesprecision = 16 significant terms" " ? Ser(1) \\\\ 16 terms by default" " %1 = 1 + O(x^16)" " ? Ser(1, 'y, 5)" " %2 = 1 + O(y^5)" " ? Ser(x^2,, 5)" " %3 = x^2 + O(x^7)" " ? T = polcyclo(100)" " %4 = x^40 - x^30 + x^20 - x^10 + 1" " ? Ser(T, 'x, 11)" " %5 = 1 - x^10 + O(x^11)" " @eprog\\noindent The function is more or less equivalent with multiplication by" " $1 + O(v^d)$ in theses cases, only faster." " " " For the remaining types, vectors and power series, we first explain what" " occurs if $d$ is omitted. In this case, the function uses exactly the amount" " of information given in the input:" " " " \\item If $s$ is already a power series in $v$, we return it verbatim;" " " " \\item If $s$ is a vector, the coefficients of the vector are" " understood to be the coefficients of the power series starting from the" " constant term (as in \\tet{Polrev}$(x)$); in other words we convert" " \\typ{VEC} / \\typ{COL} to the power series whose significant terms are exactly" " given by the vector entries." " " " On the other hand, if $d$ is explicitly given, we abide by its value" " and return a series, truncated or extended with zeros as needed, with" " $d$ significant terms." " " " \\bprog" " ? v = [1,2,3];" " ? Ser(v, t) \\\\ 3 terms: seriesprecision is ignored!" " %7 = 1 + 2*t + 3*t^2 + O(t^3)" " ? Ser(v, t, 7) \\\\ 7 terms as explicitly requested" " %8 = 1 + 2*t + 3*t^2 + O(t^7)" " ? s = 1+x+O(x^2);" " ? Ser(s)" " %10 = 1 + x + O(x^2) \\\\ 2 terms: seriesprecision is ignored" " ? Ser(s, x, 7) \\\\ extend to 7 terms" " %11 = 1 + x + O(x^7)" " ? Ser(s, x, 1) \\\\ truncate to 1 term" " %12 = 1 + O(x)" " @eprog\\noindent" " The warning given for \\kbd{Pol} also applies here: this is not a substitution" " function." "") :wrapper nil :description nil :obsolete nil :variant nil) WARNING: parse-prototype("polsturm":"lGDGDG"): mismatch: params= ((nil pari-gen :IN :NONE nil) (nil pari-gen :IN :NONE nil) (nil pari-gen)) arglist=(T (ab)) in #S(desc :lisp-name polsturm :function "polsturm" :class "basic" :section "polynomials" :c-name "sturmpart" :prototype "lGDGDG" :help ("polsturm(T,{ab}): number of distinct real roots of the polynomial" " T (in the interval ab = [a,b] if present).") :iterator nil :doc ("number of distinct real roots of the real polynomial \\var{T}. If" " the argument \\var{ab} is present, it must be a vector $[a,b]$ with" " two real components (of type \\typ{INT}, \\typ{REAL}, \\typ{FRAC}" " or \\typ{INFINITY}) and we count roots belonging to that closed interval." " " " If possible, you should stick to exact inputs, that is avoid \\typ{REAL}s in" " $T$ and the bounds $a,b$: the result is then guaranteed and we use a fast" " algorithm (Uspensky's method, relying on Descartes's rule of sign, see" " \\tet{polrootsreal}). Otherwise, the polynomial is rescaled and rounded first" " and the result may be wrong due to that initial error. If only $a$ or $b$ is" " inexact, on the other hand, the interval is first thickened using rational" " endpoints and the result remains guaranteed unless there exist a root" " \\emph{very} close to a nonrational endpoint (which may be missed or unduly" " included)." " \\bprog" " ? T = (x-1)*(x-2)*(x-3);" " ? polsturm(T)" " %2 = 3" " ? polsturm(T, [-oo,2])" " %3 = 2" " ? polsturm(T, [1/2,+oo])" " %4 = 3" " ? polsturm(T, [1, Pi]) \\\\ Pi inexact: not recommended !" " %5 = 3" " ? polsturm(T*1., [0, 4]) \\\\ T*1. inexact: not recommended !" " %6 = 3" " ? polsturm(T^2, [0, 4]) \\\\ not squarefree: roots are not repeated!" " %7 = 3" " @eprog" " %\\syn{NO}" " " " The library syntax is \\fun{long}{RgX_sturmpart}{GEN T, GEN ab} or" " \\fun{long}{sturm}{GEN T} (for the case \\kbd{ab = NULL}). The function" " \\fun{long}{sturmpart}{GEN T, GEN a, GEN b} is obsolete and deprecated." "") :wrapper nil :description nil :obsolete nil :variant nil) ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pari/pari.fas ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pari/pari.c 0 errors, 9 warnings gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pari -c pari.c pari.c:7:7: warning: no previous declaration for ‘get_entry_doc’ [-Wmissing-declarations] 7 | char* get_entry_doc (char* s) { entree *e = is_entry(s); return e==NULL?NULL:(char*)e->help; } | ^~~~~~~~~~~~~ pari.c:10:6: warning: no previous declaration for ‘get_integer_data’ [-Wmissing-declarations] 10 | void get_integer_data (GEN x, ulong len, ulong *data) | ^~~~~~~~~~~~~~~~ pari.c:12:6: warning: no previous declaration for ‘set_integer_data’ [-Wmissing-declarations] 12 | void set_integer_data (GEN x, ulong len, ulong *data) { | ^~~~~~~~~~~~~~~~ gcc -I. -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pari -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pari/cpari.c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pari/cpari.c:18:6: warning: no previous declaration for ‘clisp_out_putc’ [-Wmissing-declarations] 18 | void clisp_out_putc(char c) { | ^~~~~~~~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pari/cpari.c:22:6: warning: no previous declaration for ‘clisp_out_puts’ [-Wmissing-declarations] 22 | void clisp_out_puts(const char *s) { | ^~~~~~~~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pari/cpari.c:27:6: warning: no previous declaration for ‘clisp_out_flush’ [-Wmissing-declarations] 27 | void clisp_out_flush(void) { | ^~~~~~~~~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pari/cpari.c:32:6: warning: no previous declaration for ‘clisp_err_putc’ [-Wmissing-declarations] 32 | void clisp_err_putc(char c) { | ^~~~~~~~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pari/cpari.c:36:6: warning: no previous declaration for ‘clisp_err_puts’ [-Wmissing-declarations] 36 | void clisp_err_puts(const char *s) { | ^~~~~~~~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pari/cpari.c:41:6: warning: no previous declaration for ‘clisp_err_flush’ [-Wmissing-declarations] 41 | void clisp_err_flush(void) { | ^~~~~~~~~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pari/cpari.c:45:6: warning: no previous declaration for ‘clisp_err_recover’ [-Wmissing-declarations] 45 | void clisp_err_recover(long errnum) { | ^~~~~~~~~~~~~~~~~ ln -s /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pari/preload.lisp . make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pari' mkdir -p pcre m=`cd ../modules/pcre; pwd`; \ if test -f $m/configure && { test ! -f pcre/config.status || test -n "`find $m/configure -prune -newer pcre/config.status`"; } ; then ( cd pcre ;\ cache=`echo pcre/ | sed -e 's,[^/][^/]*//*,../,g'`config.cache; \ if test -f ${cache} ; then \ . ${cache}; \ if test "${ac_cv_env_CC_set}" = set; then CC="${ac_cv_env_CC_value}"; export CC; fi; \ if test "${ac_cv_env_CFLAGS_set}" = set; then CFLAGS="${ac_cv_env_CFLAGS_value}"; export CFLAGS; fi; \ if test "${ac_cv_env_LDFLAGS_set}" = set; then LDFLAGS="${ac_cv_env_LDFLAGS_value}"; export LDFLAGS; fi; \ if test "${ac_cv_env_CLFLAGS_set}" = set; then CLFLAGS="${ac_cv_env_CLFLAGS_value}"; export CLFLAGS; fi; \ if test "${ac_cv_env_LIBS_set}" = set; then LIBS="${ac_cv_env_LIBS_value}"; export LIBS; fi; \ if test "${ac_cv_env_CPPFLAGS_set}" = set; then CPPFLAGS="${ac_cv_env_CPPFLAGS_value}"; export CPPFLAGS; fi; \ if test "${ac_cv_env_CPP_set}" = set; then CPP="${ac_cv_env_CPP_value}"; export CPP; fi; \ if test "${ac_cv_env_CXX_set}" = set; then CXX="${ac_cv_env_CXX_value}"; export CXX; fi; \ if test "${ac_cv_env_CXXFLAGS_set}" = set; then CXXFLAGS="${ac_cv_env_CXXFLAGS_value}"; export CXXFLAGS; fi; \ if test "${ac_cv_env_X_LIBS_set}" = set; then X_LIBS="${ac_cv_env_X_LIBS_value}"; export X_LIBS; fi; \ /bin/sh $m/configure --with-clisp="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" --cache-file=${cache} --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm';\ else \ /bin/sh $m/configure --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm'; \ fi ) ;\ fi; \ if test -f $m/Makefile && { test ! -f pcre/Makefile || test -n "`find $m/Makefile -prune -newer pcre/Makefile`"; } ; then \ sed "s,srcdir = .,srcdir = $m," "$m/Makefile" > pcre/Makefile ; \ fi ; \ CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" ; \ cd pcre ; make clisp-module CC="gcc" CPPFLAGS="-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib" CFLAGS="-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC" CLFLAGS="-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic" LIBS="-Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl " RANLIB="ranlib" CLISP="$CLISP -q" SHREXT=.so configure: loading cache ../config.cache configure: ** PCRE (Common) checking how to remove colons from paths... (cached) echo $x checking for CLISP version... (cached) 2.49.93+ (2018-02-18) (built 3813886800) (memory 3828276446) checking for CLISP libdir... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/ checking for CLISP linking set... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build checking for CLISP... (cached) yes checking for gcc... (cached) gcc checking whether the C compiler works... yes checking for C compiler default output file name... a.out checking for suffix of executables... checking whether we are cross compiling... no checking for suffix of object files... (cached) o checking whether we are using the GNU C compiler... (cached) yes checking whether gcc accepts -g... (cached) yes checking for gcc option to accept ISO C89... (cached) none needed checking whether gcc understands -c and -o together... (cached) yes checking how to run the C preprocessor... (cached) gcc -E checking how to make hard links... (cached) ln checking whether ln -s works... (cached) yes checking for grep that handles long lines and -e... (cached) /usr/bin/grep checking for egrep... (cached) /usr/bin/grep -E checking for ANSI C header files... (cached) yes checking for sys/types.h... (cached) yes checking for sys/stat.h... (cached) yes checking for stdlib.h... (cached) yes checking for string.h... (cached) yes checking for memory.h... (cached) yes checking for strings.h... (cached) yes checking for inttypes.h... (cached) yes checking for stdint.h... (cached) yes checking for unistd.h... (cached) yes checking for minix/config.h... (cached) no checking whether it is safe to define __EXTENSIONS__... (cached) yes checking whether _XOPEN_SOURCE should be defined... (cached) no checking build system type... (cached) riscv64-unknown-linux-gnu checking host system type... (cached) riscv64-unknown-linux-gnu checking for ld used by gcc... (cached) /usr/bin/ld checking if the linker (/usr/bin/ld) is GNU ld... (cached) yes checking for shared library run path origin... (cached) done checking host CPU and C ABI... (cached) riscv64-lp64d checking for the common suffixes of directories in the library search path... (cached) lib,lib checking how to link with libpcre... /usr/lib64/libpcre.so -L/usr/lib64 configure: ** PCRE (Headers) checking pcre.h usability... yes checking pcre.h presence... yes checking for pcre.h... yes configure: ** PCRE (Functions) checking for library containing pcre_compile... none required checking for pcre_get_stringnumber... yes checking for pcre_config... yes checking for pcre_dfa_exec... yes configure: ** PCRE (Output) configure: updating cache ../config.cache configure: creating ./config.status config.status: creating Makefile config.status: creating link.sh config.status: creating config.h configure: ** PCRE (Done) make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pcre' /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pcre/pcre.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x2521f000 - 0x2523ffff 0x80000000 - 0x800bffff 0x156cc0a000 - 0x156cc24fff 0x156cc25000 - 0x156cc25fff 0x156cc26000 - 0x156cc26fff 0x156cc27000 - 0x156cc28fff 0x156cc29000 - 0x156cc2afff 0x156cc2b000 - 0x156cc31fff 0x156cc32000 - 0x156cc32fff 0x156cc33000 - 0x156cc33fff 0x156cc35000 - 0x156cc36fff 0x156cc37000 - 0x156cc75fff 0x156cc76000 - 0x156cc77fff 0x156cc78000 - 0x156cc7efff 0x156cc7f000 - 0x156cc7ffff 0x156cc80000 - 0x156cd09fff 0x156cd0a000 - 0x156cd0afff 0x156cd0b000 - 0x156cd0bfff 0x156cd0c000 - 0x156cd3bfff 0x156cd3c000 - 0x156cd3cfff 0x156cd3d000 - 0x156cd3dfff 0x156cd3e000 - 0x156cd3efff 0x156cd3f000 - 0x156cd46fff 0x156cd47000 - 0x156cd6cfff 0x156cd6d000 - 0x156cd70fff 0x156cd71000 - 0x156cd71fff 0x156cd72000 - 0x156cd73fff 0x156cd74000 - 0x156cd74fff 0x156cd75000 - 0x156cd75fff 0x156cd76000 - 0x156cd76fff 0x156cd77000 - 0x156cd7afff 0x156cd7b000 - 0x156cd7bfff 0x156cd7c000 - 0x156cd7cfff 0x156cd7d000 - 0x156cd7efff 0x156cd7f000 - 0x156cd80fff 0x156cd81000 - 0x156cd81fff 0x156cd82000 - 0x156cd82fff 0x156cd83000 - 0x156ceeefff 0x156ceef000 - 0x156cef1fff 0x156cef2000 - 0x156cef2fff 0x156cef3000 - 0x156cef3fff 0x156cef4000 - 0x156cf06fff 0x156cf07000 - 0x156cf07fff 0x156cf08000 - 0x156cf08fff 0x156cf09000 - 0x156d026fff 0x156d027000 - 0x156d029fff 0x156d02a000 - 0x156d02cfff 0x156d02d000 - 0x156d031fff 0x156d032000 - 0x156d086fff 0x156d087000 - 0x156d731fff 0x3fffd89000 - 0x3fffdaafff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pcre/pcre.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pcre/pcre.fas The following functions were used but not defined: PCRE:PCRE-NAME-TO-INDEX PCRE:PCRE-COMPILE PCRE:PCRE-EXEC 0 errors, 0 warnings /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -C /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit/modprep /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pcre/cpcre.c ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0xd178000 - 0xd198fff 0x80000000 - 0x800bffff 0x156b8a5000 - 0x156b8bffff 0x156b8c0000 - 0x156b8c0fff 0x156b8c1000 - 0x156b8c1fff 0x156b8c2000 - 0x156b8c3fff 0x156b8c4000 - 0x156b8c5fff 0x156b8c6000 - 0x156b8ccfff 0x156b8cd000 - 0x156b8cdfff 0x156b8ce000 - 0x156b8cefff 0x156b8d0000 - 0x156b8d1fff 0x156b8d2000 - 0x156b910fff 0x156b911000 - 0x156b912fff 0x156b913000 - 0x156b919fff 0x156b91a000 - 0x156b91afff 0x156b91b000 - 0x156b9a4fff 0x156b9a5000 - 0x156b9a5fff 0x156b9a6000 - 0x156b9a6fff 0x156b9a7000 - 0x156b9d6fff 0x156b9d7000 - 0x156b9d7fff 0x156b9d8000 - 0x156b9d8fff 0x156b9d9000 - 0x156b9d9fff 0x156b9da000 - 0x156b9e1fff 0x156b9e2000 - 0x156ba07fff 0x156ba08000 - 0x156ba0bfff 0x156ba0c000 - 0x156ba0cfff 0x156ba0d000 - 0x156ba0efff 0x156ba0f000 - 0x156ba0ffff 0x156ba10000 - 0x156ba10fff 0x156ba11000 - 0x156ba11fff 0x156ba12000 - 0x156ba15fff 0x156ba16000 - 0x156ba16fff 0x156ba17000 - 0x156ba17fff 0x156ba18000 - 0x156ba19fff 0x156ba1a000 - 0x156ba1bfff 0x156ba1c000 - 0x156ba1cfff 0x156ba1d000 - 0x156ba1dfff 0x156ba1e000 - 0x156bb89fff 0x156bb8a000 - 0x156bb8cfff 0x156bb8d000 - 0x156bb8dfff 0x156bb8e000 - 0x156bb8efff 0x156bb8f000 - 0x156bba1fff 0x156bba2000 - 0x156bba2fff 0x156bba3000 - 0x156bba3fff 0x156bba4000 - 0x156bcc1fff 0x156bcc2000 - 0x156bcc4fff 0x156bcc5000 - 0x156bcc7fff 0x156bcc8000 - 0x156bcccfff 0x156bccd000 - 0x156bd21fff 0x156bd22000 - 0x156c3ccfff 0x3fffb20000 - 0x3fffb41fff ;; MODPREP: "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pcre/cpcre.c" --> #P"cpcre.m.c" ;; MODPREP: reading "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pcre/cpcre.c": 18,210 bytes, 423 lines ;; MODPREP: 92 objects, 7 DEFUNs, 1 DEFVAR (1 init) ;; packages: ("PCRE") MODPREP: wrote cpcre.m.c (64,369 bytes) gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I. -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit \ -c cpcre.m.c -o cpcre.o ln -s /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/pcre/preload.lisp . make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pcre' mkdir -p postgresql m=`cd ../modules/postgresql; pwd`; \ if test -f $m/configure && { test ! -f postgresql/config.status || test -n "`find $m/configure -prune -newer postgresql/config.status`"; } ; then ( cd postgresql ;\ cache=`echo postgresql/ | sed -e 's,[^/][^/]*//*,../,g'`config.cache; \ if test -f ${cache} ; then \ . ${cache}; \ if test "${ac_cv_env_CC_set}" = set; then CC="${ac_cv_env_CC_value}"; export CC; fi; \ if test "${ac_cv_env_CFLAGS_set}" = set; then CFLAGS="${ac_cv_env_CFLAGS_value}"; export CFLAGS; fi; \ if test "${ac_cv_env_LDFLAGS_set}" = set; then LDFLAGS="${ac_cv_env_LDFLAGS_value}"; export LDFLAGS; fi; \ if test "${ac_cv_env_CLFLAGS_set}" = set; then CLFLAGS="${ac_cv_env_CLFLAGS_value}"; export CLFLAGS; fi; \ if test "${ac_cv_env_LIBS_set}" = set; then LIBS="${ac_cv_env_LIBS_value}"; export LIBS; fi; \ if test "${ac_cv_env_CPPFLAGS_set}" = set; then CPPFLAGS="${ac_cv_env_CPPFLAGS_value}"; export CPPFLAGS; fi; \ if test "${ac_cv_env_CPP_set}" = set; then CPP="${ac_cv_env_CPP_value}"; export CPP; fi; \ if test "${ac_cv_env_CXX_set}" = set; then CXX="${ac_cv_env_CXX_value}"; export CXX; fi; \ if test "${ac_cv_env_CXXFLAGS_set}" = set; then CXXFLAGS="${ac_cv_env_CXXFLAGS_value}"; export CXXFLAGS; fi; \ if test "${ac_cv_env_X_LIBS_set}" = set; then X_LIBS="${ac_cv_env_X_LIBS_value}"; export X_LIBS; fi; \ /bin/sh $m/configure --with-clisp="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" --cache-file=${cache} --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm';\ else \ /bin/sh $m/configure --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm'; \ fi ) ;\ fi; \ if test -f $m/Makefile && { test ! -f postgresql/Makefile || test -n "`find $m/Makefile -prune -newer postgresql/Makefile`"; } ; then \ sed "s,srcdir = .,srcdir = $m," "$m/Makefile" > postgresql/Makefile ; \ fi ; \ CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" ; \ cd postgresql ; make clisp-module CC="gcc" CPPFLAGS="-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib" CFLAGS="-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC" CLFLAGS="-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic" LIBS="-Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl " RANLIB="ranlib" CLISP="$CLISP -q" SHREXT=.so configure: loading cache ../config.cache configure: ** PostgreSQL (Common) checking how to remove colons from paths... (cached) echo $x checking for CLISP version... (cached) 2.49.93+ (2018-02-18) (built 3813886800) (memory 3828276446) checking for CLISP libdir... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/ checking for CLISP linking set... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build checking for CLISP... (cached) yes checking for FFI in CLISP... (cached) yes checking for gcc... (cached) gcc checking whether the C compiler works... yes checking for C compiler default output file name... a.out checking for suffix of executables... checking whether we are cross compiling... no checking for suffix of object files... (cached) o checking whether we are using the GNU C compiler... (cached) yes checking whether gcc accepts -g... (cached) yes checking for gcc option to accept ISO C89... (cached) none needed checking whether gcc understands -c and -o together... (cached) yes checking how to run the C preprocessor... (cached) gcc -E checking how to make hard links... (cached) ln checking whether ln -s works... (cached) yes checking for grep that handles long lines and -e... (cached) /usr/bin/grep checking for egrep... (cached) /usr/bin/grep -E checking for ANSI C header files... (cached) yes checking for sys/types.h... (cached) yes checking for sys/stat.h... (cached) yes checking for stdlib.h... (cached) yes checking for string.h... (cached) yes checking for memory.h... (cached) yes checking for strings.h... (cached) yes checking for inttypes.h... (cached) yes checking for stdint.h... (cached) yes checking for unistd.h... (cached) yes checking for minix/config.h... (cached) no checking whether it is safe to define __EXTENSIONS__... (cached) yes checking whether _XOPEN_SOURCE should be defined... (cached) no checking build system type... (cached) riscv64-unknown-linux-gnu checking host system type... (cached) riscv64-unknown-linux-gnu checking for ld used by gcc... (cached) /usr/bin/ld checking if the linker (/usr/bin/ld) is GNU ld... (cached) yes checking for shared library run path origin... (cached) done checking host CPU and C ABI... (cached) riscv64-lp64d checking for the common suffixes of directories in the library search path... (cached) lib,lib checking how to link with libpq... /usr/lib64/libpq.so -L/usr/lib64 configure: ** PostgreSQL (Headers) checking postgres_ext.h usability... yes checking postgres_ext.h presence... yes checking for postgres_ext.h... yes checking postgresql/postgres_ext.h usability... no checking postgresql/postgres_ext.h presence... no checking for postgresql/postgres_ext.h... no checking pgsql/postgres_ext.h usability... no checking pgsql/postgres_ext.h presence... no checking for pgsql/postgres_ext.h... no configure: ** PostgreSQL (Functions) checking for library containing PQconnectdb... none required checking for Oid... yes checking for pqbool... no checking for PQconnectStart... yes checking for PQconnectPoll... yes checking for PQconnectdb... yes checking for PQsetdbLogin... yes checking for PQfinish... yes checking for PQconndefaults... yes checking for PQconninfoFree... yes checking for PQresetStart... yes checking for PQresetPoll... yes checking for PQreset... yes checking for PQgetCancel... yes checking for PQfreeCancel... yes checking for PQcancel... yes checking for PQrequestCancel... yes checking for PQdb... yes checking for PQuser... yes checking for PQpass... yes checking for PQhost... yes checking for PQport... yes checking for PQtty... yes checking for PQoptions... yes checking for PQstatus... yes checking for PQtransactionStatus... yes checking for PQparameterStatus... yes checking for PQprotocolVersion... yes checking for PQserverVersion... yes checking for PQerrorMessage... yes checking for PQsocket... yes checking for PQbackendPID... yes checking for PQconnectionNeedsPassword... yes checking for PQconnectionUsedPassword... yes checking for PQconninfoParse... yes checking for PQclientEncoding... yes checking for PQsetClientEncoding... yes checking for PQgetssl... yes checking for PQinitSSL... yes checking for PQinitOpenSSL... yes checking for PQsetErrorVerbosity... yes checking for PQtrace... yes checking for PQuntrace... yes checking for PQsetNoticeReceiver... yes checking for PQsetNoticeProcessor... yes checking for PQexec... yes checking for PQexecParams... yes checking for PQprepare... yes checking for PQexecPrepared... yes checking for PQsendQuery... yes checking for PQsendQueryParams... yes checking for PQsendPrepare... yes checking for PQsendQueryPrepared... yes checking for PQgetResult... yes checking for PQisBusy... yes checking for PQconsumeInput... yes checking for PQnotifies... yes checking for PQputCopyData... yes checking for PQputCopyEnd... yes checking for PQgetCopyData... yes checking for PQgetline... yes checking for PQputline... yes checking for PQgetlineAsync... yes checking for PQputnbytes... yes checking for PQendcopy... yes checking for PQsetnonblocking... yes checking for PQisnonblocking... yes checking for PQflush... yes checking for PQfn... yes checking for PQresultStatus... yes checking for PQresStatus... yes checking for PQresultErrorMessage... yes checking for PQisthreadsafe... yes checking for PQnparams... yes checking for PQparamtype... yes checking for PQdescribePrepared... yes checking for PQdescribePortal... yes checking for PQsendDescribePrepared... yes checking for PQsendDescribePortal... yes checking for PQresultErrorField... yes checking for PQntuples... yes checking for PQnfields... yes checking for PQbinaryTuples... yes checking for PQfname... yes checking for PQfnumber... yes checking for PQftable... yes checking for PQftablecol... yes checking for PQfformat... yes checking for PQftype... yes checking for PQfsize... yes checking for PQfmod... yes checking for PQcmdStatus... yes checking for PQoidStatus... yes checking for PQoidValue... yes checking for PQcmdTuples... yes checking for PQgetvalue... yes checking for PQgetlength... yes checking for PQgetisnull... yes checking for PQclear... yes checking for PQfreemem... yes checking for PQmakeEmptyPGresult... yes checking for PQescapeString... yes checking for PQescapeBytea... yes checking for PQcopyResult... yes checking for PQsetResultAttrs... yes checking for PQresultAlloc... yes checking for PQsetvalue... yes checking for PQescapeStringConn... yes checking for PQescapeByteaConn... yes checking for PQunescapeBytea... yes checking for PQprint... yes checking for PQdisplayTuples... yes checking for PQprintTuples... yes checking for lo_open... yes checking for lo_close... yes checking for lo_read... yes checking for lo_write... yes checking for lo_lseek... yes checking for lo_creat... yes checking for lo_tell... yes checking for lo_unlink... yes checking for lo_import... yes checking for lo_import_with_oid... yes checking for lo_export... yes checking for lo_create... yes checking for lo_truncate... yes checking for PQmblen... yes checking for PQdsplen... yes checking for PQenv2encoding... yes checking for PQencryptPassword... yes checking for pg_char_to_encoding... yes checking for pg_encoding_to_char... yes checking for pg_valid_server_encoding_id... yes configure: ** PostgreSQL (Output) configure: updating cache ../config.cache configure: creating ./config.status config.status: creating Makefile config.status: creating link.sh config.status: creating config.h configure: ** PostgreSQL (Done) make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/postgresql' /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/postgresql/postgresql.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x1b610000 - 0x1b630fff 0x80000000 - 0x800bffff 0x158ea0b000 - 0x158ea25fff 0x158ea26000 - 0x158ea26fff 0x158ea27000 - 0x158ea27fff 0x158ea28000 - 0x158ea29fff 0x158ea2a000 - 0x158ea2bfff 0x158ea2c000 - 0x158ea32fff 0x158ea33000 - 0x158ea33fff 0x158ea34000 - 0x158ea34fff 0x158ea36000 - 0x158ea37fff 0x158ea38000 - 0x158ea76fff 0x158ea77000 - 0x158ea78fff 0x158ea79000 - 0x158ea7ffff 0x158ea80000 - 0x158ea80fff 0x158ea81000 - 0x158eb0afff 0x158eb0b000 - 0x158eb0bfff 0x158eb0c000 - 0x158eb0cfff 0x158eb0d000 - 0x158eb3cfff 0x158eb3d000 - 0x158eb3dfff 0x158eb3e000 - 0x158eb3efff 0x158eb3f000 - 0x158eb3ffff 0x158eb40000 - 0x158eb47fff 0x158eb48000 - 0x158eb6dfff 0x158eb6e000 - 0x158eb71fff 0x158eb72000 - 0x158eb72fff 0x158eb73000 - 0x158eb74fff 0x158eb75000 - 0x158eb75fff 0x158eb76000 - 0x158eb76fff 0x158eb77000 - 0x158eb77fff 0x158eb78000 - 0x158eb7bfff 0x158eb7c000 - 0x158eb7cfff 0x158eb7d000 - 0x158eb7dfff 0x158eb7e000 - 0x158eb7ffff 0x158eb80000 - 0x158eb81fff 0x158eb82000 - 0x158eb82fff 0x158eb83000 - 0x158eb83fff 0x158eb84000 - 0x158eceffff 0x158ecf0000 - 0x158ecf2fff 0x158ecf3000 - 0x158ecf3fff 0x158ecf4000 - 0x158ecf4fff 0x158ecf5000 - 0x158ed07fff 0x158ed08000 - 0x158ed08fff 0x158ed09000 - 0x158ed09fff 0x158ed0a000 - 0x158ee27fff 0x158ee28000 - 0x158ee2afff 0x158ee2b000 - 0x158ee2dfff 0x158ee2e000 - 0x158ee32fff 0x158ee33000 - 0x158ee87fff 0x158ee88000 - 0x158f532fff 0x3fffd2d000 - 0x3fffd4efff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/postgresql/postgresql.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/postgresql/postgresql.fas ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/postgresql/postgresql.c 0 errors, 0 warnings gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -I/usr/include/libsvm -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit \ -c postgresql.c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/postgresql/sql.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x24a25000 - 0x24a45fff 0x80000000 - 0x800bffff 0x1567ff6000 - 0x1568010fff 0x1568011000 - 0x1568011fff 0x1568012000 - 0x1568012fff 0x1568013000 - 0x1568014fff 0x1568015000 - 0x1568016fff 0x1568017000 - 0x156801dfff 0x156801e000 - 0x156801efff 0x156801f000 - 0x156801ffff 0x1568021000 - 0x1568022fff 0x1568023000 - 0x1568061fff 0x1568062000 - 0x1568063fff 0x1568064000 - 0x156806afff 0x156806b000 - 0x156806bfff 0x156806c000 - 0x15680f5fff 0x15680f6000 - 0x15680f6fff 0x15680f7000 - 0x15680f7fff 0x15680f8000 - 0x1568127fff 0x1568128000 - 0x1568128fff 0x1568129000 - 0x1568129fff 0x156812a000 - 0x156812afff 0x156812b000 - 0x1568132fff 0x1568133000 - 0x1568158fff 0x1568159000 - 0x156815cfff 0x156815d000 - 0x156815dfff 0x156815e000 - 0x156815ffff 0x1568160000 - 0x1568160fff 0x1568161000 - 0x1568161fff 0x1568162000 - 0x1568162fff 0x1568163000 - 0x1568166fff 0x1568167000 - 0x1568167fff 0x1568168000 - 0x1568168fff 0x1568169000 - 0x156816afff 0x156816b000 - 0x156816cfff 0x156816d000 - 0x156816dfff 0x156816e000 - 0x156816efff 0x156816f000 - 0x15682dafff 0x15682db000 - 0x15682ddfff 0x15682de000 - 0x15682defff 0x15682df000 - 0x15682dffff 0x15682e0000 - 0x15682f2fff 0x15682f3000 - 0x15682f3fff 0x15682f4000 - 0x15682f4fff 0x15682f5000 - 0x1568412fff 0x1568413000 - 0x1568415fff 0x1568416000 - 0x1568418fff 0x1568419000 - 0x156841dfff 0x156841e000 - 0x1568472fff 0x1568473000 - 0x1568b1dfff 0x3fff905000 - 0x3fff926fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/postgresql/sql.lisp ... ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/postgresql/postgresql.lib ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/postgresql/postgresql.lib ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/postgresql/sql.fas 0 errors, 0 warnings make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/postgresql' mkdir -p rawsock m=`cd ../modules/rawsock; pwd`; \ if test -f $m/configure && { test ! -f rawsock/config.status || test -n "`find $m/configure -prune -newer rawsock/config.status`"; } ; then ( cd rawsock ;\ cache=`echo rawsock/ | sed -e 's,[^/][^/]*//*,../,g'`config.cache; \ if test -f ${cache} ; then \ . ${cache}; \ if test "${ac_cv_env_CC_set}" = set; then CC="${ac_cv_env_CC_value}"; export CC; fi; \ if test "${ac_cv_env_CFLAGS_set}" = set; then CFLAGS="${ac_cv_env_CFLAGS_value}"; export CFLAGS; fi; \ if test "${ac_cv_env_LDFLAGS_set}" = set; then LDFLAGS="${ac_cv_env_LDFLAGS_value}"; export LDFLAGS; fi; \ if test "${ac_cv_env_CLFLAGS_set}" = set; then CLFLAGS="${ac_cv_env_CLFLAGS_value}"; export CLFLAGS; fi; \ if test "${ac_cv_env_LIBS_set}" = set; then LIBS="${ac_cv_env_LIBS_value}"; export LIBS; fi; \ if test "${ac_cv_env_CPPFLAGS_set}" = set; then CPPFLAGS="${ac_cv_env_CPPFLAGS_value}"; export CPPFLAGS; fi; \ if test "${ac_cv_env_CPP_set}" = set; then CPP="${ac_cv_env_CPP_value}"; export CPP; fi; \ if test "${ac_cv_env_CXX_set}" = set; then CXX="${ac_cv_env_CXX_value}"; export CXX; fi; \ if test "${ac_cv_env_CXXFLAGS_set}" = set; then CXXFLAGS="${ac_cv_env_CXXFLAGS_value}"; export CXXFLAGS; fi; \ if test "${ac_cv_env_X_LIBS_set}" = set; then X_LIBS="${ac_cv_env_X_LIBS_value}"; export X_LIBS; fi; \ /bin/sh $m/configure --with-clisp="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" --cache-file=${cache} --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm';\ else \ /bin/sh $m/configure --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm'; \ fi ) ;\ fi; \ if test -f $m/Makefile && { test ! -f rawsock/Makefile || test -n "`find $m/Makefile -prune -newer rawsock/Makefile`"; } ; then \ sed "s,srcdir = .,srcdir = $m," "$m/Makefile" > rawsock/Makefile ; \ fi ; \ CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" ; \ cd rawsock ; make clisp-module CC="gcc" CPPFLAGS="-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib" CFLAGS="-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC" CLFLAGS="-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic" LIBS="-Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl " RANLIB="ranlib" CLISP="$CLISP -q" SHREXT=.so configure: loading cache ../config.cache configure: ** Rawsock (Common) checking how to remove colons from paths... (cached) echo $x checking for CLISP version... (cached) 2.49.93+ (2018-02-18) (built 3813886800) (memory 3828276446) checking for CLISP libdir... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/ checking for CLISP linking set... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build checking for CLISP... (cached) yes checking for gcc... (cached) gcc checking whether the C compiler works... yes checking for C compiler default output file name... a.out checking for suffix of executables... checking whether we are cross compiling... no checking for suffix of object files... (cached) o checking whether we are using the GNU C compiler... (cached) yes checking whether gcc accepts -g... (cached) yes checking for gcc option to accept ISO C89... (cached) none needed checking whether gcc understands -c and -o together... (cached) yes checking how to run the C preprocessor... (cached) gcc -E checking how to make hard links... (cached) ln checking whether ln -s works... (cached) yes checking for grep that handles long lines and -e... (cached) /usr/bin/grep checking for egrep... (cached) /usr/bin/grep -E checking for ANSI C header files... (cached) yes checking for sys/types.h... (cached) yes checking for sys/stat.h... (cached) yes checking for stdlib.h... (cached) yes checking for string.h... (cached) yes checking for memory.h... (cached) yes checking for strings.h... (cached) yes checking for inttypes.h... (cached) yes checking for stdint.h... (cached) yes checking for unistd.h... (cached) yes checking for minix/config.h... (cached) no checking whether it is safe to define __EXTENSIONS__... (cached) yes checking whether _XOPEN_SOURCE should be defined... (cached) no configure: ** Rawsock (Headers) checking for sys/socket.h... (cached) yes checking for library containing setsockopt... (cached) none needed checking build system type... (cached) riscv64-unknown-linux-gnu checking host system type... (cached) riscv64-unknown-linux-gnu checking for IPv4 sockets... (cached) yes checking for IPv6 sockets... (cached) yes checking for setsockopt... (cached) yes checking for getsockopt... (cached) yes checking for netinet/tcp.h... (cached) yes checking for setsockopt declaration... (cached) extern int setsockopt (int, int, int, const void*, unsigned int); checking linux/if_packet.h usability... yes checking linux/if_packet.h presence... yes checking for linux/if_packet.h... yes checking for netdb.h... (cached) yes checking asm/types.h usability... yes checking asm/types.h presence... yes checking for asm/types.h... yes checking for sys/ioctl.h... (cached) yes checking stropts.h usability... no checking stropts.h presence... no checking for stropts.h... no checking poll.h usability... yes checking poll.h presence... yes checking for poll.h... yes checking for sys/un.h... (cached) yes checking ifaddrs.h usability... yes checking ifaddrs.h presence... yes checking for ifaddrs.h... yes checking for net/if.h... yes checking for netinet/if_ether.h... yes checking for linux/netlink.h... yes checking for struct msghdr.msg_flags... yes checking for struct msghdr.msg_control... yes checking for struct if_nameindex... yes configure: ** Rawsock (Functions) checking for socketpair... yes checking for sockatmark... yes checking for recvmsg... yes checking for sendmsg... yes checking for htonl... yes checking for htons... yes checking for ntohl... yes checking for ntohs... yes checking for readv... yes checking for writev... yes checking for getnameinfo... yes checking for getaddrinfo... yes checking for freeaddrinfo... yes checking for gai_strerror... yes checking for endprotoent... yes checking for getprotobyname... yes checking for getprotobynumber... yes checking for getprotoent... yes checking for setprotoent... yes checking for if_nametoindex... yes checking for if_indextoname... yes checking for if_nameindex... yes checking for if_freenameindex... yes checking for endnetent... yes checking for getnetbyaddr... yes checking for getnetbyname... yes checking for getnetent... yes checking for setnetent... yes checking for getifaddrs... yes checking for freeifaddrs... yes configure: ** Rawsock (Output) configure: updating cache ../config.cache configure: creating ./config.status config.status: creating Makefile config.status: creating link.sh config.status: creating config.h configure: ** Rawsock (Done) make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/rawsock' /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/rawsock/sock.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x31b84000 - 0x31ba4fff 0x80000000 - 0x800bffff 0x1589b3d000 - 0x1589b57fff 0x1589b58000 - 0x1589b58fff 0x1589b59000 - 0x1589b59fff 0x1589b5a000 - 0x1589b5bfff 0x1589b5c000 - 0x1589b5dfff 0x1589b5e000 - 0x1589b64fff 0x1589b65000 - 0x1589b65fff 0x1589b66000 - 0x1589b66fff 0x1589b68000 - 0x1589b69fff 0x1589b6a000 - 0x1589ba8fff 0x1589ba9000 - 0x1589baafff 0x1589bab000 - 0x1589bb1fff 0x1589bb2000 - 0x1589bb2fff 0x1589bb3000 - 0x1589c3cfff 0x1589c3d000 - 0x1589c3dfff 0x1589c3e000 - 0x1589c3efff 0x1589c3f000 - 0x1589c6efff 0x1589c6f000 - 0x1589c6ffff 0x1589c70000 - 0x1589c70fff 0x1589c71000 - 0x1589c71fff 0x1589c72000 - 0x1589c79fff 0x1589c7a000 - 0x1589c9ffff 0x1589ca0000 - 0x1589ca3fff 0x1589ca4000 - 0x1589ca4fff 0x1589ca5000 - 0x1589ca6fff 0x1589ca7000 - 0x1589ca7fff 0x1589ca8000 - 0x1589ca8fff 0x1589ca9000 - 0x1589ca9fff 0x1589caa000 - 0x1589cadfff 0x1589cae000 - 0x1589caefff 0x1589caf000 - 0x1589caffff 0x1589cb0000 - 0x1589cb1fff 0x1589cb2000 - 0x1589cb3fff 0x1589cb4000 - 0x1589cb4fff 0x1589cb5000 - 0x1589cb5fff 0x1589cb6000 - 0x1589e21fff 0x1589e22000 - 0x1589e24fff 0x1589e25000 - 0x1589e25fff 0x1589e26000 - 0x1589e26fff 0x1589e27000 - 0x1589e39fff 0x1589e3a000 - 0x1589e3afff 0x1589e3b000 - 0x1589e3bfff 0x1589e3c000 - 0x1589f59fff 0x1589f5a000 - 0x1589f5cfff 0x1589f5d000 - 0x1589f5ffff 0x1589f60000 - 0x1589f64fff 0x1589f65000 - 0x1589fb9fff 0x1589fba000 - 0x158a664fff 0x3fffdaa000 - 0x3fffdcbfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/rawsock/sock.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/rawsock/sock.fas The following functions were used but not defined: RAWSOCK:SOCKET RAWSOCK:MAKE-SOCKADDR RAWSOCK:CONNECT RAWSOCK:SOCK-CLOSE RAWSOCK:GETNAMEINFO 0 errors, 0 warnings /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -C /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit/modprep /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/rawsock/rawsock.c ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x3e33000 - 0x3e53fff 0x80000000 - 0x800bffff 0x156165a000 - 0x1561674fff 0x1561675000 - 0x1561675fff 0x1561676000 - 0x1561676fff 0x1561677000 - 0x1561678fff 0x1561679000 - 0x156167afff 0x156167b000 - 0x1561681fff 0x1561682000 - 0x1561682fff 0x1561683000 - 0x1561683fff 0x1561685000 - 0x1561686fff 0x1561687000 - 0x15616c5fff 0x15616c6000 - 0x15616c7fff 0x15616c8000 - 0x15616cefff 0x15616cf000 - 0x15616cffff 0x15616d0000 - 0x1561759fff 0x156175a000 - 0x156175afff 0x156175b000 - 0x156175bfff 0x156175c000 - 0x156178bfff 0x156178c000 - 0x156178cfff 0x156178d000 - 0x156178dfff 0x156178e000 - 0x156178efff 0x156178f000 - 0x1561796fff 0x1561797000 - 0x15617bcfff 0x15617bd000 - 0x15617c0fff 0x15617c1000 - 0x15617c1fff 0x15617c2000 - 0x15617c3fff 0x15617c4000 - 0x15617c4fff 0x15617c5000 - 0x15617c5fff 0x15617c6000 - 0x15617c6fff 0x15617c7000 - 0x15617cafff 0x15617cb000 - 0x15617cbfff 0x15617cc000 - 0x15617ccfff 0x15617cd000 - 0x15617cefff 0x15617cf000 - 0x15617d0fff 0x15617d1000 - 0x15617d1fff 0x15617d2000 - 0x15617d2fff 0x15617d3000 - 0x156193efff 0x156193f000 - 0x1561941fff 0x1561942000 - 0x1561942fff 0x1561943000 - 0x1561943fff 0x1561944000 - 0x1561956fff 0x1561957000 - 0x1561957fff 0x1561958000 - 0x1561958fff 0x1561959000 - 0x1561a76fff 0x1561a77000 - 0x1561a79fff 0x1561a7a000 - 0x1561a7cfff 0x1561a7d000 - 0x1561a81fff 0x1561a82000 - 0x1561ad6fff 0x1561ad7000 - 0x1562181fff 0x3fffd18000 - 0x3fffd39fff ;; MODPREP: "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/rawsock/rawsock.c" --> #P"rawsock.m.c" ;; MODPREP: reading "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/rawsock/rawsock.c": 59,766 bytes, 1,489 lines WARNING: "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/rawsock/rawsock.c" :612: fixed object case ":DECnet" WARNING: truncated a very long tag (from 3,587 to 2,000) for ("(OR NULL INTEGER (MEMBER" ("defined(IPPROTO_IP)" . ":IPPROTO-IP") ("defined(IPPROTO_IPV6)" . ":IPPROTO-IPV6") ("defined(IPPROTO_ICMP)" . ":IPPROTO-ICMP") ("defined(IPPROTO_RAW)" . ":IPPROTO-RAW") ("defined(IPPROTO_TCP)" . ":IPPROTO-TCP") ..) ;; MODPREP: 270 objects, 39 DEFUNs ;; packages: ("RAWSOCK") MODPREP: wrote rawsock.m.c (222,472 bytes) gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I. -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit \ -c rawsock.m.c -o rawsock.o /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/rawsock/rawsock.c: In function ‘C_subr_rawsock_recvfrom’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/rawsock/rawsock.c:962:9: warning: unused variable ‘buffer’ [-Wunused-variable] 962 | void *buffer; | ^~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/rawsock/rawsock.c: In function ‘C_subr_rawsock_sock_read’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/rawsock/rawsock.c:1051:13: warning: unused variable ‘pinned_count’ [-Wunused-variable] 1051 | ssize_t pinned_count = retval; | ^~~~~~~~~~~~ /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/rawsock/rawsock.c: In function ‘C_subr_rawsock_sock_write’: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/rawsock/rawsock.c:1125:13: warning: unused variable ‘pinned_count’ [-Wunused-variable] 1125 | ssize_t pinned_count = retval; | ^~~~~~~~~~~~ In file included from /usr/include/string.h:519, from /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib/string.h:41, from /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/rawsock/rawsock.c:19: In function ‘strncpy’, inlined from ‘configdev’ at /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/rawsock/rawsock.c:1150:3, inlined from ‘C_subr_rawsock_configdev’ at /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/rawsock/rawsock.c:1181:2673: /usr/include/bits/string_fortified.h:91:10: warning: ‘__builtin_strncpy’ specified bound 16 equals destination size [-Wstringop-truncation] 91 | return __builtin___strncpy_chk (__dest, __src, __len, __bos (__dest)); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ In function ‘strncpy’, inlined from ‘configdev’ at /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/rawsock/rawsock.c:1159:3, inlined from ‘C_subr_rawsock_configdev’ at /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/rawsock/rawsock.c:1181:2673: /usr/include/bits/string_fortified.h:91:10: warning: ‘__builtin_strncpy’ specified bound 16 equals destination size [-Wstringop-truncation] 91 | return __builtin___strncpy_chk (__dest, __src, __len, __bos (__dest)); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ln -s /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/rawsock/preload.lisp . make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/rawsock' mkdir -p zlib m=`cd ../modules/zlib; pwd`; \ if test -f $m/configure && { test ! -f zlib/config.status || test -n "`find $m/configure -prune -newer zlib/config.status`"; } ; then ( cd zlib ;\ cache=`echo zlib/ | sed -e 's,[^/][^/]*//*,../,g'`config.cache; \ if test -f ${cache} ; then \ . ${cache}; \ if test "${ac_cv_env_CC_set}" = set; then CC="${ac_cv_env_CC_value}"; export CC; fi; \ if test "${ac_cv_env_CFLAGS_set}" = set; then CFLAGS="${ac_cv_env_CFLAGS_value}"; export CFLAGS; fi; \ if test "${ac_cv_env_LDFLAGS_set}" = set; then LDFLAGS="${ac_cv_env_LDFLAGS_value}"; export LDFLAGS; fi; \ if test "${ac_cv_env_CLFLAGS_set}" = set; then CLFLAGS="${ac_cv_env_CLFLAGS_value}"; export CLFLAGS; fi; \ if test "${ac_cv_env_LIBS_set}" = set; then LIBS="${ac_cv_env_LIBS_value}"; export LIBS; fi; \ if test "${ac_cv_env_CPPFLAGS_set}" = set; then CPPFLAGS="${ac_cv_env_CPPFLAGS_value}"; export CPPFLAGS; fi; \ if test "${ac_cv_env_CPP_set}" = set; then CPP="${ac_cv_env_CPP_value}"; export CPP; fi; \ if test "${ac_cv_env_CXX_set}" = set; then CXX="${ac_cv_env_CXX_value}"; export CXX; fi; \ if test "${ac_cv_env_CXXFLAGS_set}" = set; then CXXFLAGS="${ac_cv_env_CXXFLAGS_value}"; export CXXFLAGS; fi; \ if test "${ac_cv_env_X_LIBS_set}" = set; then X_LIBS="${ac_cv_env_X_LIBS_value}"; export X_LIBS; fi; \ /bin/sh $m/configure --with-clisp="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" --cache-file=${cache} --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm';\ else \ /bin/sh $m/configure --srcdir=$m '--disable-option-checking' '--prefix=/usr' '--libdir=/usr/lib64' '--mandir=/usr/share/man' '--infodir=/usr/share/info' '--docdir=/usr/share/doc/clisp' '--with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline' '--with-ffcall' '--with-libsigsegv-prefix=/usr' '--with-libffcall-prefix=/usr' 'CFLAGS=-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack' 'LDFLAGS=-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack' 'CPPFLAGS=-I/usr/include/libsvm'; \ fi ) ;\ fi; \ if test -f $m/Makefile && { test ! -f zlib/Makefile || test -n "`find $m/Makefile -prune -newer zlib/Makefile`"; } ; then \ sed "s,srcdir = .,srcdir = $m," "$m/Makefile" > zlib/Makefile ; \ fi ; \ CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" ; \ cd zlib ; make clisp-module CC="gcc" CPPFLAGS="-I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib" CFLAGS="-O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC" CLFLAGS="-Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic" LIBS="-Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl " RANLIB="ranlib" CLISP="$CLISP -q" SHREXT=.so configure: loading cache ../config.cache configure: ** Zlib (Common) checking how to remove colons from paths... (cached) echo $x checking for CLISP version... (cached) 2.49.93+ (2018-02-18) (built 3813886800) (memory 3828276446) checking for CLISP libdir... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/ checking for CLISP linking set... (cached) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build checking for CLISP... (cached) yes checking for FFI in CLISP... (cached) yes checking for gcc... (cached) gcc checking whether the C compiler works... yes checking for C compiler default output file name... a.out checking for suffix of executables... checking whether we are cross compiling... no checking for suffix of object files... (cached) o checking whether we are using the GNU C compiler... (cached) yes checking whether gcc accepts -g... (cached) yes checking for gcc option to accept ISO C89... (cached) none needed checking whether gcc understands -c and -o together... (cached) yes checking how to run the C preprocessor... (cached) gcc -E checking how to make hard links... (cached) ln checking whether ln -s works... (cached) yes checking for grep that handles long lines and -e... (cached) /usr/bin/grep checking for egrep... (cached) /usr/bin/grep -E checking for ANSI C header files... (cached) yes checking for sys/types.h... (cached) yes checking for sys/stat.h... (cached) yes checking for stdlib.h... (cached) yes checking for string.h... (cached) yes checking for memory.h... (cached) yes checking for strings.h... (cached) yes checking for inttypes.h... (cached) yes checking for stdint.h... (cached) yes checking for unistd.h... (cached) yes checking for minix/config.h... (cached) no checking whether it is safe to define __EXTENSIONS__... (cached) yes checking whether _XOPEN_SOURCE should be defined... (cached) no checking build system type... (cached) riscv64-unknown-linux-gnu checking host system type... (cached) riscv64-unknown-linux-gnu checking for ld used by gcc... (cached) /usr/bin/ld checking if the linker (/usr/bin/ld) is GNU ld... (cached) yes checking for shared library run path origin... (cached) done checking host CPU and C ABI... (cached) riscv64-lp64d checking for the common suffixes of directories in the library search path... (cached) lib,lib checking how to link with libz... /usr/lib64/libz.so -L/usr/lib64 configure: ** Zlib (Headers) checking zlib.h usability... yes checking zlib.h presence... yes checking for zlib.h... yes configure: ** Zlib (Functions) checking for library containing compress2... none required checking for compressBound... yes configure: ** Zlib (Output) configure: updating cache ../config.cache configure: creating ./config.status config.status: creating Makefile config.status: creating link.sh config.status: creating config.h configure: ** Zlib (Done) make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/zlib' /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -K base -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -c /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/zlib/zlib.lisp -o ./ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x347af000 - 0x347cffff 0x80000000 - 0x800bffff 0x1566156000 - 0x1566170fff 0x1566171000 - 0x1566171fff 0x1566172000 - 0x1566172fff 0x1566173000 - 0x1566174fff 0x1566175000 - 0x1566176fff 0x1566177000 - 0x156617dfff 0x156617e000 - 0x156617efff 0x156617f000 - 0x156617ffff 0x1566181000 - 0x1566182fff 0x1566183000 - 0x15661c1fff 0x15661c2000 - 0x15661c3fff 0x15661c4000 - 0x15661cafff 0x15661cb000 - 0x15661cbfff 0x15661cc000 - 0x1566255fff 0x1566256000 - 0x1566256fff 0x1566257000 - 0x1566257fff 0x1566258000 - 0x1566287fff 0x1566288000 - 0x1566288fff 0x1566289000 - 0x1566289fff 0x156628a000 - 0x156628afff 0x156628b000 - 0x1566292fff 0x1566293000 - 0x15662b8fff 0x15662b9000 - 0x15662bcfff 0x15662bd000 - 0x15662bdfff 0x15662be000 - 0x15662bffff 0x15662c0000 - 0x15662c0fff 0x15662c1000 - 0x15662c1fff 0x15662c2000 - 0x15662c2fff 0x15662c3000 - 0x15662c6fff 0x15662c7000 - 0x15662c7fff 0x15662c8000 - 0x15662c8fff 0x15662c9000 - 0x15662cafff 0x15662cb000 - 0x15662ccfff 0x15662cd000 - 0x15662cdfff 0x15662ce000 - 0x15662cefff 0x15662cf000 - 0x156643afff 0x156643b000 - 0x156643dfff 0x156643e000 - 0x156643efff 0x156643f000 - 0x156643ffff 0x1566440000 - 0x1566452fff 0x1566453000 - 0x1566453fff 0x1566454000 - 0x1566454fff 0x1566455000 - 0x1566572fff 0x1566573000 - 0x1566575fff 0x1566576000 - 0x1566578fff 0x1566579000 - 0x156657dfff 0x156657e000 - 0x15665d2fff 0x15665d3000 - 0x1566c7dfff 0x3fffd07000 - 0x3fffd28fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/zlib/zlib.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/zlib/zlib.fas ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/zlib/zlib.c 0 errors, 0 warnings gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit -c zlib.c make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/zlib' rm -rf full rm -rf dynmod; mkdir dynmod MAKE=make CLISP="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clisp -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc" ./clisp-link add base full asdf berkeley-db bindings/glibc clx/new-clx dbus fastcgi gdbm gtk2 libsvm pari pcre postgresql rawsock zlib || (rm -rf full ; exit 1) make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/asdf' make[1]: Nothing to be done for 'clisp-module'. make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/asdf' make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/berkeley-db' make[1]: Nothing to be done for 'clisp-module'. make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/berkeley-db' gcc -shared -fPIC -DPIC bdb.o /usr/lib64/libdb.so -L/usr/lib64 -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -Wl,-soname -Wl,lib-bdb.so -o /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dynmod/lib-bdb.so make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc' make[1]: Nothing to be done for 'clisp-module'. make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc' gcc -shared -fPIC -DPIC linux.o -lm -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -Wl,-soname -Wl,lib-linux.so -o /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dynmod/lib-linux.so /usr/bin/ld: linux.o: in function `module__linux__init_function_2': /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc/linux.c:963: warning: the use of `tmpnam' is dangerous, better use `mkstemp' /usr/bin/ld: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc/linux.c:964: warning: the use of `tmpnam_r' is dangerous, better use `mkstemp' /usr/bin/ld: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc/linux.c:965: warning: the use of `tempnam' is dangerous, better use `mkstemp' /usr/bin/ld: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc/linux.c:689: warning: the use of `mktemp' is dangerous, better use `mkstemp' or `mkdtemp' make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clx/new-clx' make[1]: Nothing to be done for 'clisp-module'. make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clx/new-clx' gcc -shared -fPIC -DPIC clx.o -lXpm -lXext -lXau -lSM -lICE -lX11 -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -Wl,-soname -Wl,lib-clx.so -o /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dynmod/lib-clx.so make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dbus' make[1]: Nothing to be done for 'clisp-module'. make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dbus' gcc -shared -fPIC -DPIC dbus.o -ldbus-1 -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -Wl,-soname -Wl,lib-dbus.so -o /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dynmod/lib-dbus.so make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/fastcgi' make[1]: Nothing to be done for 'clisp-module'. make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/fastcgi' gcc -shared -fPIC -DPIC fastcgi.o fastcgi_wrappers.o /usr/lib64/libfcgi.so -L/usr/lib64 -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -Wl,-soname -Wl,lib-fastcgi.so -o /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dynmod/lib-fastcgi.so make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gdbm' make[1]: Nothing to be done for 'clisp-module'. make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gdbm' gcc -shared -fPIC -DPIC gdbm.o /usr/lib64/libgdbm.so -L/usr/lib64 -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -Wl,-soname -Wl,lib-gdbm.so -o /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dynmod/lib-gdbm.so make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gtk2' make[1]: Nothing to be done for 'clisp-module'. make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gtk2' gcc -shared -fPIC -DPIC gtk.o -lgtk-x11-2.0 -lgdk-x11-2.0 -lpangocairo-1.0 -latk-1.0 -lcairo -lgdk_pixbuf-2.0 -lgio-2.0 -lpangoft2-1.0 -lpango-1.0 -lgobject-2.0 -lglib-2.0 -lharfbuzz -lfontconfig -lfreetype -lglade-2.0 -lgtk-x11-2.0 -lgdk-x11-2.0 -lpangocairo-1.0 -latk-1.0 -lcairo -lgdk_pixbuf-2.0 -lgio-2.0 -lpangoft2-1.0 -lpango-1.0 -lgobject-2.0 -lglib-2.0 -lharfbuzz -lfontconfig -lfreetype -lxml2 -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -Wl,-soname -Wl,lib-gtk.so -o /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dynmod/lib-gtk.so make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/libsvm' make[1]: Nothing to be done for 'clisp-module'. make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/libsvm' gcc -shared -fPIC -DPIC libsvm.o -lm /usr/lib64/libsvm.so -L/usr/lib64 -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -Wl,-soname -Wl,lib-libsvm.so -o /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dynmod/lib-libsvm.so make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pari' make[1]: Nothing to be done for 'clisp-module'. make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pari' gcc -shared -fPIC -DPIC cpari.o pari.o -lm /usr/lib64/libpari.so -L/usr/lib64 -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -Wl,-soname -Wl,lib-pari.so -o /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dynmod/lib-pari.so make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pcre' make[1]: Nothing to be done for 'clisp-module'. make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pcre' gcc -shared -fPIC -DPIC cpcre.o /usr/lib64/libpcre.so -L/usr/lib64 -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -Wl,-soname -Wl,lib-pcre.so -o /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dynmod/lib-pcre.so make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/postgresql' make[1]: Nothing to be done for 'clisp-module'. make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/postgresql' gcc -shared -fPIC -DPIC postgresql.o /usr/lib64/libpq.so -L/usr/lib64 -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -Wl,-soname -Wl,lib-postgresql.so -o /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dynmod/lib-postgresql.so make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/rawsock' make[1]: Nothing to be done for 'clisp-module'. make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/rawsock' gcc -shared -fPIC -DPIC rawsock.o -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -Wl,-soname -Wl,lib-rawsock.so -o /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dynmod/lib-rawsock.so make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/zlib' make[1]: Nothing to be done for 'clisp-module'. make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/zlib' gcc -shared -fPIC -DPIC zlib.o /usr/lib64/libz.so -L/usr/lib64 -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -Wl,-soname -Wl,lib-zlib.so -o /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dynmod/lib-zlib.so gcc -I/usr/include/libsvm -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gllib -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gllib -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -I/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/linkkit -c modules.c gcc -O2 -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -fstack-protector-strong -specs=/usr/lib/rpm/redhat/redhat-annobin-cc1 -fasynchronous-unwind-tables -fstack-clash-protection -Wa,--noexecstack -no-integrated-cpp -W -Wswitch -Wcomment -Wpointer-arith -Wreturn-type -Wmissing-declarations -Wimplicit -Wno-sign-compare -Wno-format-nonliteral -Wno-shift-negative-value -O2 -fwrapv -fno-strict-aliasing -DNO_ASM -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -fPIC -DPIC -Wl,--as-needed -Wl,-z,relro -Wl,-z,noexecstack -Wl,--export-dynamic modules.o zlib.o /usr/lib64/libz.so -L/usr/lib64 rawsock.o postgresql.o /usr/lib64/libpq.so -L/usr/lib64 cpcre.o /usr/lib64/libpcre.so -L/usr/lib64 cpari.o pari.o -lm /usr/lib64/libpari.so -L/usr/lib64 libsvm.o -lm /usr/lib64/libsvm.so -L/usr/lib64 gtk.o -lgtk-x11-2.0 -lgdk-x11-2.0 -lpangocairo-1.0 -latk-1.0 -lcairo -lgdk_pixbuf-2.0 -lgio-2.0 -lpangoft2-1.0 -lpango-1.0 -lgobject-2.0 -lglib-2.0 -lharfbuzz -lfontconfig -lfreetype -lglade-2.0 -lgtk-x11-2.0 -lgdk-x11-2.0 -lpangocairo-1.0 -latk-1.0 -lcairo -lgdk_pixbuf-2.0 -lgio-2.0 -lpangoft2-1.0 -lpango-1.0 -lgobject-2.0 -lglib-2.0 -lharfbuzz -lfontconfig -lfreetype -lxml2 gdbm.o /usr/lib64/libgdbm.so -L/usr/lib64 fastcgi.o fastcgi_wrappers.o /usr/lib64/libfcgi.so -L/usr/lib64 dbus.o -ldbus-1 clx.o -lXpm -lXext -lXau -lSM -lICE -lX11 linux.o -lm bdb.o /usr/lib64/libdb.so -L/usr/lib64 readline.o -lreadline -lncurses regexi.o calls.o -lm -lcrypt gettext.o lisp.a -Wl,--whole-archive libgnu.a -Wl,--no-whole-archive -lreadline -lncurses -ldl -lffcall -lsigsegv /usr/lib64/libunistring.so -L/usr/lib64 -ldl -o lisp.run /usr/bin/ld: linux.o: in function `module__linux__init_function_2': /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc/linux.c:963: warning: the use of `tmpnam' is dangerous, better use `mkstemp' /usr/bin/ld: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc/linux.c:964: warning: the use of `tmpnam_r' is dangerous, better use `mkstemp' /usr/bin/ld: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc/linux.c:965: warning: the use of `tempnam' is dangerous, better use `mkstemp' /usr/bin/ld: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc/linux.c:689: warning: the use of `mktemp' is dangerous, better use `mkstemp' or `mkdtemp' base/lisp.run -B . -M base/lispinit.mem -norc -q -i berkeley-db/preload.lisp -i clx/new-clx/clx-preload.lisp -i gdbm/preload.lisp -i gtk2/preload -i libsvm/preload -i pari/preload.lisp -i pcre/preload.lisp -i rawsock/preload.lisp -x (saveinitmem "full/lispinit.mem") Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x310fa000 - 0x3111afff 0x80000000 - 0x800bffff 0x158bebe000 - 0x158bed8fff 0x158bed9000 - 0x158bed9fff 0x158beda000 - 0x158bedafff 0x158bedb000 - 0x158bedcfff 0x158bedd000 - 0x158bedefff 0x158bedf000 - 0x158bee5fff 0x158bee6000 - 0x158bee6fff 0x158bee7000 - 0x158bee7fff 0x158bee9000 - 0x158beeafff 0x158beeb000 - 0x158bf29fff 0x158bf2a000 - 0x158bf2bfff 0x158bf2c000 - 0x158bf32fff 0x158bf33000 - 0x158bf33fff 0x158bf34000 - 0x158bfbdfff 0x158bfbe000 - 0x158bfbefff 0x158bfbf000 - 0x158bfbffff 0x158bfc0000 - 0x158bfeffff 0x158bff0000 - 0x158bff0fff 0x158bff1000 - 0x158bff1fff 0x158bff2000 - 0x158bff2fff 0x158bff3000 - 0x158bffafff 0x158bffb000 - 0x158c020fff 0x158c021000 - 0x158c024fff 0x158c025000 - 0x158c025fff 0x158c026000 - 0x158c027fff 0x158c028000 - 0x158c028fff 0x158c029000 - 0x158c029fff 0x158c02a000 - 0x158c02afff 0x158c02b000 - 0x158c02efff 0x158c02f000 - 0x158c02ffff 0x158c030000 - 0x158c030fff 0x158c031000 - 0x158c032fff 0x158c033000 - 0x158c034fff 0x158c035000 - 0x158c035fff 0x158c036000 - 0x158c036fff 0x158c037000 - 0x158c1a2fff 0x158c1a3000 - 0x158c1a5fff 0x158c1a6000 - 0x158c1a6fff 0x158c1a7000 - 0x158c1a7fff 0x158c1a8000 - 0x158c1bafff 0x158c1bb000 - 0x158c1bbfff 0x158c1bc000 - 0x158c1bcfff 0x158c1bd000 - 0x158c2dafff 0x158c2db000 - 0x158c2ddfff 0x158c2de000 - 0x158c2e0fff 0x158c2e1000 - 0x158c2e5fff 0x158c2e6000 - 0x158c33afff 0x158c33b000 - 0x158c9e5fff 0x3fffc21000 - 0x3fffc41fff ;; Loading file berkeley-db/preload.lisp ... ;; Loaded file berkeley-db/preload.lisp ;; Loading file clx/new-clx/clx-preload.lisp ... ;; Loaded file clx/new-clx/clx-preload.lisp ;; Loading file gdbm/preload.lisp ... ;; Loaded file gdbm/preload.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gtk2/preload.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gtk2/preload.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/libsvm/preload.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/libsvm/preload.lisp ;; Loading file pari/preload.lisp ... ;; Loaded file pari/preload.lisp ;; Loading file pcre/preload.lisp ... ;; Loaded file pcre/preload.lisp ;; Loading file rawsock/preload.lisp ... ;; Loaded file rawsock/preload.lisp ;; Wrote the memory image into full/lispinit.mem (3,798,944 bytes) Bytes permanently allocated: 180,216 Bytes currently in use: 3,610,624 Bytes available until next GC: 1,800,380 3610624 ; 1800380 ; 180216 ; 1 ; 581984 ; 64944 full/lisp.run -B . -M full/lispinit.mem -norc -q -i asdf/asdf -i berkeley-db/dbi -i bindings/glibc/linux -i bindings/glibc/wrap -i clx/new-clx/clx -i clx/new-clx/image -i clx/new-clx/resource -i dbus/dbus -i fastcgi/fastcgi -i gdbm/gdbm -i gtk2/gtk -i libsvm/libsvm -i pari/pari -i pcre/pcre -i postgresql/postgresql -i postgresql/sql -i rawsock/sock -i zlib/zlib -x (saveinitmem "full/lispinit.mem") Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x227fff 0x228000 - 0x259fff 0x25a000 - 0x29cfff 0x29d000 - 0x2c3fff 0x13073000 - 0x130b4fff 0x80000000 - 0x800bffff 0x155b1ef000 - 0x155b209fff 0x155b20a000 - 0x155b20afff 0x155b20b000 - 0x155b20bfff 0x155b20c000 - 0x155b20dfff 0x155b20e000 - 0x155b20ffff 0x155b210000 - 0x155b216fff 0x155b217000 - 0x155b217fff 0x155b218000 - 0x155b218fff 0x155b21a000 - 0x155b21bfff 0x155b21c000 - 0x155b22efff 0x155b22f000 - 0x155b22ffff 0x155b230000 - 0x155b230fff 0x155b231000 - 0x155b272fff 0x155b273000 - 0x155b275fff 0x155b276000 - 0x155b276fff 0x155b277000 - 0x155b2b1fff 0x155b2b2000 - 0x155b2b2fff 0x155b2b3000 - 0x155b2b3fff 0x155b2b4000 - 0x155b2b4fff 0x155b2b5000 - 0x155b920fff 0x155b921000 - 0x155b922fff 0x155b923000 - 0x155b950fff 0x155b951000 - 0x155b951fff 0x155b952000 - 0x155b95cfff 0x155b95d000 - 0x155b95dfff 0x155b95e000 - 0x155b95efff 0x155b95f000 - 0x155b95ffff 0x155b960000 - 0x155bd5bfff 0x155bd5c000 - 0x155bd5cfff 0x155bd5d000 - 0x155bd62fff 0x155bd63000 - 0x155bd67fff 0x155bd68000 - 0x155bd6bfff 0x155bd6c000 - 0x155be12fff 0x155be13000 - 0x155be16fff 0x155be17000 - 0x155be18fff 0x155be19000 - 0x155be38fff 0x155be39000 - 0x155be39fff 0x155be3a000 - 0x155be3afff 0x155be3b000 - 0x155be84fff 0x155be85000 - 0x155be86fff 0x155be87000 - 0x155be87fff 0x155be88000 - 0x155be88fff 0x155be89000 - 0x155bf93fff 0x155bf94000 - 0x155bf94fff 0x155bf95000 - 0x155bf95fff 0x155bf96000 - 0x155bf96fff 0x155bf97000 - 0x155bf97fff 0x155bf98000 - 0x155bfadfff 0x155bfae000 - 0x155bfaefff 0x155bfaf000 - 0x155bfaffff 0x155bfb0000 - 0x155bfbafff 0x155bfbb000 - 0x155bfbbfff 0x155bfbc000 - 0x155bfbcfff 0x155bfbd000 - 0x155bfbefff 0x155bfbf000 - 0x155bfc7fff 0x155bfc8000 - 0x155bfc8fff 0x155bfc9000 - 0x155bfc9fff 0x155bfca000 - 0x155c00afff 0x155c00b000 - 0x155c00bfff 0x155c00c000 - 0x155c00cfff 0x155c00d000 - 0x155c00dfff 0x155c00e000 - 0x155c00efff 0x155c00f000 - 0x155c01bfff 0x155c01c000 - 0x155c01cfff 0x155c01d000 - 0x155c01dfff 0x155c01e000 - 0x155c02bfff 0x155c02c000 - 0x155c02cfff 0x155c02d000 - 0x155c02dfff 0x155c02e000 - 0x155c02efff 0x155c02f000 - 0x155c030fff 0x155c031000 - 0x155c031fff 0x155c032000 - 0x155c032fff 0x155c033000 - 0x155c144fff 0x155c145000 - 0x155c145fff 0x155c146000 - 0x155c14afff 0x155c14b000 - 0x155c14cfff 0x155c14d000 - 0x155c1d6fff 0x155c1d7000 - 0x155c1d7fff 0x155c1d8000 - 0x155c1d8fff 0x155c1d9000 - 0x155c323fff 0x155c324000 - 0x155c329fff 0x155c32a000 - 0x155c32dfff 0x155c32e000 - 0x155c36cfff 0x155c36d000 - 0x155c36efff 0x155c36f000 - 0x155c375fff 0x155c376000 - 0x155c376fff 0x155c377000 - 0x155c3a6fff 0x155c3a7000 - 0x155c3a7fff 0x155c3a8000 - 0x155c3a8fff 0x155c3a9000 - 0x155c3a9fff 0x155c3aa000 - 0x155c3b1fff 0x155c3b2000 - 0x155c3d7fff 0x155c3d8000 - 0x155c3dbfff 0x155c3dc000 - 0x155c3dcfff 0x155c3dd000 - 0x155c3defff 0x155c3df000 - 0x155c3dffff 0x155c3e0000 - 0x155c3e0fff 0x155c3e1000 - 0x155c3e1fff 0x155c3e2000 - 0x155c3e3fff 0x155c3e4000 - 0x155c3e7fff 0x155c3e8000 - 0x155c3e8fff 0x155c3e9000 - 0x155c3e9fff 0x155c3ea000 - 0x155c3ebfff 0x155c3ec000 - 0x155c3ecfff 0x155c3ed000 - 0x155c3edfff 0x155c3ee000 - 0x155c559fff 0x155c55a000 - 0x155c55cfff 0x155c55d000 - 0x155c55dfff 0x155c55e000 - 0x155c55efff 0x155c55f000 - 0x155c571fff 0x155c572000 - 0x155c572fff 0x155c573000 - 0x155c573fff 0x155c574000 - 0x155c691fff 0x155c692000 - 0x155c694fff 0x155c695000 - 0x155c697fff 0x155c698000 - 0x155c69afff 0x155c69b000 - 0x155c70afff 0x155c70b000 - 0x155c712fff 0x155c713000 - 0x155c717fff 0x155c718000 - 0x155c719fff 0x155c71a000 - 0x155c909fff 0x155c90a000 - 0x155c90afff 0x155c90b000 - 0x155c932fff 0x155c933000 - 0x155c936fff 0x155c937000 - 0x155c93bfff 0x155c93c000 - 0x155c978fff 0x155c979000 - 0x155c979fff 0x155c97a000 - 0x155c97afff 0x155c97b000 - 0x155c97cfff 0x155c97d000 - 0x155c9befff 0x155c9bf000 - 0x155c9bffff 0x155c9c0000 - 0x155c9c0fff 0x155c9c1000 - 0x155c9c2fff 0x155c9c3000 - 0x155c9c4fff 0x155c9c5000 - 0x155c9dafff 0x155c9db000 - 0x155c9dbfff 0x155c9dc000 - 0x155c9dcfff 0x155c9dd000 - 0x155c9e0fff 0x155c9e1000 - 0x155ca44fff 0x155ca45000 - 0x155ca45fff 0x155ca46000 - 0x155ca46fff 0x155ca47000 - 0x155ca47fff 0x155ca48000 - 0x155cbe6fff 0x155cbe7000 - 0x155cbf0fff 0x155cbf1000 - 0x155cbf4fff 0x155cbf5000 - 0x155cbfafff 0x155cbfb000 - 0x155cbfcfff 0x155cbfd000 - 0x155cbfdfff 0x155cbfe000 - 0x155cbfefff 0x155cbff000 - 0x155cbfffff 0x155cc00000 - 0x155cc0afff 0x155cc0b000 - 0x155cc0bfff 0x155cc0c000 - 0x155cc0cfff 0x155cc0d000 - 0x155cc0dfff 0x155cc0e000 - 0x155cc11fff 0x155cc12000 - 0x155cc12fff 0x155cc13000 - 0x155cc13fff 0x155cc14000 - 0x155cc35fff 0x155cc36000 - 0x155cc38fff 0x155cc39000 - 0x155cc39fff 0x155cc3a000 - 0x155cd0efff 0x155cd0f000 - 0x155cd11fff 0x155cd12000 - 0x155cd13fff 0x155cd14000 - 0x155cea2fff 0x155cea3000 - 0x155cea8fff 0x155cea9000 - 0x155ceabfff 0x155ceac000 - 0x155ceaffff 0x155ceb0000 - 0x155cec2fff 0x155cec3000 - 0x155cec3fff 0x155cec4000 - 0x155cec4fff 0x155cec5000 - 0x155cf07fff 0x155cf08000 - 0x155cf0afff 0x155cf0b000 - 0x155cf0bfff 0x155cf0c000 - 0x155cf47fff 0x155cf48000 - 0x155cf48fff 0x155cf49000 - 0x155cf4afff 0x155cf4b000 - 0x155cf4bfff 0x155cf4c000 - 0x155cf53fff 0x155cf54000 - 0x155cf54fff 0x155cf55000 - 0x155cf55fff 0x155cf56000 - 0x155cf57fff 0x155cf58000 - 0x155cf58fff 0x155cf59000 - 0x155cf59fff 0x155cf5a000 - 0x155cf65fff 0x155cf66000 - 0x155cf66fff 0x155cf67000 - 0x155cf67fff 0x155cf68000 - 0x155cf69fff 0x155cf6a000 - 0x155cf71fff 0x155cf72000 - 0x155cf72fff 0x155cf73000 - 0x155cf73fff 0x155cf74000 - 0x155cf7bfff 0x155cf7c000 - 0x155cf7cfff 0x155cf7d000 - 0x155cf7dfff 0x155cf7e000 - 0x155cf7ffff 0x155cf80000 - 0x155cf80fff 0x155cf81000 - 0x155cf81fff 0x155cf82000 - 0x155cf83fff 0x155cf84000 - 0x155cf84fff 0x155cf85000 - 0x155cf85fff 0x155cf86000 - 0x155cfb1fff 0x155cfb2000 - 0x155cfb2fff 0x155cfb3000 - 0x155cfb3fff 0x155cfb4000 - 0x155cfb9fff 0x155cfba000 - 0x155cfbafff 0x155cfbb000 - 0x155cfbbfff 0x155cfbc000 - 0x155cfbdfff 0x155cfbe000 - 0x155d0e8fff 0x155d0e9000 - 0x155d0f0fff 0x155d0f1000 - 0x155d0f2fff 0x155d0f3000 - 0x155d0f3fff 0x155d0f4000 - 0x155d198fff 0x155d199000 - 0x155d199fff 0x155d19a000 - 0x155d19afff 0x155d19b000 - 0x155d19bfff 0x155d19c000 - 0x155d22ffff 0x155d230000 - 0x155d230fff 0x155d231000 - 0x155d236fff 0x155d237000 - 0x155d237fff 0x155d238000 - 0x155d2cdfff 0x155d2ce000 - 0x155d2d0fff 0x155d2d1000 - 0x155d2d2fff 0x155d2d3000 - 0x155d2d3fff 0x155d2d4000 - 0x155d2f4fff 0x155d2f5000 - 0x155d2f5fff 0x155d2f6000 - 0x155d2f6fff 0x155d2f7000 - 0x155d2f8fff 0x155d2f9000 - 0x155d39dfff 0x155d39e000 - 0x155d39efff 0x155d39f000 - 0x155d3a9fff 0x155d3aa000 - 0x155d3acfff 0x155d3ad000 - 0x155d3bcfff 0x155d3bd000 - 0x155d3bdfff 0x155d3be000 - 0x155d3befff 0x155d3bf000 - 0x155d3bffff 0x155d3c0000 - 0x155d3c2fff 0x155d3c3000 - 0x155d3c3fff 0x155d3c4000 - 0x155d3c4fff 0x155d3c5000 - 0x155d3cffff 0x155d3d0000 - 0x155d3d0fff 0x155d3d1000 - 0x155d3d1fff 0x155d3d2000 - 0x155d3d4fff 0x155d3d5000 - 0x155d3d5fff 0x155d3d6000 - 0x155d3d6fff 0x155d3d7000 - 0x155d3e6fff 0x155d3e7000 - 0x155d3e7fff 0x155d3e8000 - 0x155d3e8fff 0x155d3e9000 - 0x155d3eafff 0x155d3eb000 - 0x155d3f5fff 0x155d3f6000 - 0x155d3f6fff 0x155d3f7000 - 0x155d3f7fff 0x155d3f8000 - 0x155d3f8fff 0x155d3f9000 - 0x155d40ffff 0x155d410000 - 0x155d410fff 0x155d411000 - 0x155d411fff 0x155d412000 - 0x155d467fff 0x155d468000 - 0x155d468fff 0x155d469000 - 0x155d46cfff 0x155d46d000 - 0x155d46dfff 0x155d46e000 - 0x155d46ffff 0x155d470000 - 0x155d470fff 0x155d471000 - 0x155d471fff 0x155d472000 - 0x155d47cfff 0x155d47d000 - 0x155d47dfff 0x155d47e000 - 0x155d47efff 0x155d47f000 - 0x155d480fff 0x155d481000 - 0x155d486fff 0x155d487000 - 0x155d487fff 0x155d488000 - 0x155d488fff 0x155d489000 - 0x155d4bdfff 0x155d4be000 - 0x155d4befff 0x155d4bf000 - 0x155d4bffff 0x155d4c0000 - 0x155d4e1fff 0x155d4e2000 - 0x155d4e2fff 0x155d4e3000 - 0x155d4e3fff 0x155d4e4000 - 0x155d4e5fff 0x155d4e6000 - 0x155d4fffff 0x155d500000 - 0x155d500fff 0x155d501000 - 0x155d501fff 0x155d502000 - 0x155d508fff 0x155d509000 - 0x155d509fff 0x155d50a000 - 0x155d50afff 0x155d50b000 - 0x155d50cfff 0x155d50d000 - 0x155d52dfff 0x155d52e000 - 0x155d52efff 0x155d52f000 - 0x155d52ffff 0x155d530000 - 0x155d530fff 0x155d531000 - 0x155d545fff 0x155d546000 - 0x155d546fff 0x155d547000 - 0x155d548fff 0x155d549000 - 0x155d549fff 0x155d54a000 - 0x155d557fff 0x155d558000 - 0x155d558fff 0x155d559000 - 0x155d559fff 0x155d55a000 - 0x155d561fff 0x155d562000 - 0x155d562fff 0x155d563000 - 0x155d563fff 0x155d564000 - 0x155d564fff 0x155d565000 - 0x155d61dfff 0x155d61e000 - 0x155d61efff 0x155d61f000 - 0x155d61ffff 0x155d620000 - 0x155d63cfff 0x155d63d000 - 0x155d63dfff 0x155d63e000 - 0x155d63efff 0x155d63f000 - 0x155d640fff 0x155d641000 - 0x155d6fbfff 0x155d6fc000 - 0x155d6fcfff 0x155d6fd000 - 0x155d6fdfff 0x155d6fe000 - 0x155d702fff 0x155d703000 - 0x155d72cfff 0x155d72d000 - 0x155d72dfff 0x155d72e000 - 0x155d730fff 0x155d731000 - 0x155d731fff 0x155d732000 - 0x155d780fff 0x155d781000 - 0x155d781fff 0x155d782000 - 0x155d782fff 0x155d783000 - 0x155d783fff 0x155d784000 - 0x155d788fff 0x155d789000 - 0x155d789fff 0x155d78a000 - 0x155d78afff 0x155d78b000 - 0x155d78cfff 0x155d78d000 - 0x155d7acfff 0x155d7ad000 - 0x155d7adfff 0x155d7ae000 - 0x155d7aefff 0x155d7af000 - 0x155d7c9fff 0x155d7ca000 - 0x155d7cafff 0x155d7cb000 - 0x155d7cbfff 0x155d7cc000 - 0x155d7d4fff 0x155d7d5000 - 0x155d829fff 0x155d82a000 - 0x155ded4fff 0x3fffa39000 - 0x3fffa59fff ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/asdf/asdf.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/asdf/asdf.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/berkeley-db/dbi.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/berkeley-db/dbi.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc/linux.fas ... WARNING: FFI:DEF-C-CONST(SIGUNUSED): CPP constant SIGUNUSED is not defined ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc/linux.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc/wrap.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/bindings/glibc/wrap.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clx/new-clx/clx.fas ... WARNING: PROCLAIM(VALUES): # is locked Ignore the lock and proceed ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clx/new-clx/clx.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clx/new-clx/image.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clx/new-clx/image.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clx/new-clx/resource.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clx/new-clx/resource.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dbus/dbus.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dbus/dbus.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/fastcgi/fastcgi.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/fastcgi/fastcgi.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gdbm/gdbm.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gdbm/gdbm.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gtk2/gtk.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/gtk2/gtk.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/libsvm/libsvm.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/libsvm/libsvm.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pari/pari.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pari/pari.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pcre/pcre.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/pcre/pcre.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/postgresql/postgresql.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/postgresql/postgresql.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/postgresql/sql.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/postgresql/sql.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/rawsock/sock.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/rawsock/sock.fas ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/zlib/zlib.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/zlib/zlib.fas ;; Wrote the memory image into full/lispinit.mem (9,901,152 bytes) Bytes permanently allocated: 209,952 Bytes currently in use: 9,672,840 Bytes available until next GC: 4,831,488 9672840 ; 4831488 ; 209952 ; 23 ; 61886592 ; 2022846 ===> make SUCCEEDED mkdir stage ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/init.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1a028000 - 0x1a048fff 0x80000000 - 0x800bffff 0x157144d000 - 0x1571467fff 0x1571468000 - 0x1571468fff 0x1571469000 - 0x1571469fff 0x157146a000 - 0x157146bfff 0x157146c000 - 0x157146dfff 0x157146e000 - 0x1571474fff 0x1571475000 - 0x1571475fff 0x1571476000 - 0x1571476fff 0x1571478000 - 0x1571479fff 0x157147a000 - 0x15714b8fff 0x15714b9000 - 0x15714bafff 0x15714bb000 - 0x15714c1fff 0x15714c2000 - 0x15714c2fff 0x15714c3000 - 0x15714e8fff 0x15714e9000 - 0x15714ecfff 0x15714ed000 - 0x15714edfff 0x15714ee000 - 0x15714effff 0x15714f0000 - 0x15714f0fff 0x15714f1000 - 0x15714f1fff 0x15714f2000 - 0x15714f2fff 0x15714f3000 - 0x15714f6fff 0x15714f7000 - 0x15714f7fff 0x15714f8000 - 0x15714f8fff 0x15714f9000 - 0x15714fafff 0x15714fb000 - 0x15714fbfff 0x15714fc000 - 0x15714fcfff 0x15714fd000 - 0x1571668fff 0x1571669000 - 0x157166bfff 0x157166c000 - 0x157166cfff 0x157166d000 - 0x157166ffff 0x1571670000 - 0x1571682fff 0x1571683000 - 0x1571683fff 0x1571684000 - 0x1571684fff 0x1571685000 - 0x15717a2fff 0x15717a3000 - 0x15717a5fff 0x15717a6000 - 0x15717a8fff 0x15717a9000 - 0x15717adfff 0x15717ae000 - 0x1571802fff 0x1571803000 - 0x1571eadfff 0x3ffff03000 - 0x3ffff23fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/init.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/init.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/defseq.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xefcd000 - 0xefedfff 0x80000000 - 0x800bffff 0x156d4d0000 - 0x156d4eafff 0x156d4eb000 - 0x156d4ebfff 0x156d4ec000 - 0x156d4ecfff 0x156d4ed000 - 0x156d4eefff 0x156d4ef000 - 0x156d4f0fff 0x156d4f1000 - 0x156d4f7fff 0x156d4f8000 - 0x156d4f8fff 0x156d4f9000 - 0x156d4f9fff 0x156d4fb000 - 0x156d4fcfff 0x156d4fd000 - 0x156d53bfff 0x156d53c000 - 0x156d53dfff 0x156d53e000 - 0x156d544fff 0x156d545000 - 0x156d545fff 0x156d546000 - 0x156d56bfff 0x156d56c000 - 0x156d56ffff 0x156d570000 - 0x156d570fff 0x156d571000 - 0x156d572fff 0x156d573000 - 0x156d573fff 0x156d574000 - 0x156d574fff 0x156d575000 - 0x156d575fff 0x156d576000 - 0x156d579fff 0x156d57a000 - 0x156d57afff 0x156d57b000 - 0x156d57bfff 0x156d57c000 - 0x156d57dfff 0x156d57e000 - 0x156d57efff 0x156d57f000 - 0x156d57ffff 0x156d580000 - 0x156d6ebfff 0x156d6ec000 - 0x156d6eefff 0x156d6ef000 - 0x156d6effff 0x156d6f0000 - 0x156d6f2fff 0x156d6f3000 - 0x156d705fff 0x156d706000 - 0x156d706fff 0x156d707000 - 0x156d707fff 0x156d708000 - 0x156d825fff 0x156d826000 - 0x156d828fff 0x156d829000 - 0x156d82bfff 0x156d82c000 - 0x156d830fff 0x156d831000 - 0x156d885fff 0x156d886000 - 0x156df30fff 0x3fffb48000 - 0x3fffb68fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/defseq.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/defseq.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/backquote.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x899b000 - 0x89bbfff 0x80000000 - 0x800bffff 0x15680d4000 - 0x15680eefff 0x15680ef000 - 0x15680effff 0x15680f0000 - 0x15680f0fff 0x15680f1000 - 0x15680f2fff 0x15680f3000 - 0x15680f4fff 0x15680f5000 - 0x15680fbfff 0x15680fc000 - 0x15680fcfff 0x15680fd000 - 0x15680fdfff 0x15680ff000 - 0x1568100fff 0x1568101000 - 0x156813ffff 0x1568140000 - 0x1568141fff 0x1568142000 - 0x1568148fff 0x1568149000 - 0x1568149fff 0x156814a000 - 0x156816ffff 0x1568170000 - 0x1568173fff 0x1568174000 - 0x1568174fff 0x1568175000 - 0x1568176fff 0x1568177000 - 0x1568177fff 0x1568178000 - 0x1568178fff 0x1568179000 - 0x1568179fff 0x156817a000 - 0x156817dfff 0x156817e000 - 0x156817efff 0x156817f000 - 0x156817ffff 0x1568180000 - 0x1568181fff 0x1568182000 - 0x1568182fff 0x1568183000 - 0x1568183fff 0x1568184000 - 0x15682effff 0x15682f0000 - 0x15682f2fff 0x15682f3000 - 0x15682f3fff 0x15682f4000 - 0x15682f6fff 0x15682f7000 - 0x1568309fff 0x156830a000 - 0x156830afff 0x156830b000 - 0x156830bfff 0x156830c000 - 0x1568429fff 0x156842a000 - 0x156842cfff 0x156842d000 - 0x156842ffff 0x1568430000 - 0x1568434fff 0x1568435000 - 0x1568489fff 0x156848a000 - 0x1568b34fff 0x3fff998000 - 0x3fff9b8fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/backquote.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/backquote.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/defmacro.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x8f53000 - 0x8f73fff 0x80000000 - 0x800bffff 0x157cda3000 - 0x157cdbdfff 0x157cdbe000 - 0x157cdbefff 0x157cdbf000 - 0x157cdbffff 0x157cdc0000 - 0x157cdc1fff 0x157cdc2000 - 0x157cdc3fff 0x157cdc4000 - 0x157cdcafff 0x157cdcb000 - 0x157cdcbfff 0x157cdcc000 - 0x157cdccfff 0x157cdce000 - 0x157cdcffff 0x157cdd0000 - 0x157ce0efff 0x157ce0f000 - 0x157ce10fff 0x157ce11000 - 0x157ce17fff 0x157ce18000 - 0x157ce18fff 0x157ce19000 - 0x157ce3efff 0x157ce3f000 - 0x157ce42fff 0x157ce43000 - 0x157ce43fff 0x157ce44000 - 0x157ce45fff 0x157ce46000 - 0x157ce46fff 0x157ce47000 - 0x157ce47fff 0x157ce48000 - 0x157ce48fff 0x157ce49000 - 0x157ce4cfff 0x157ce4d000 - 0x157ce4dfff 0x157ce4e000 - 0x157ce4efff 0x157ce4f000 - 0x157ce50fff 0x157ce51000 - 0x157ce51fff 0x157ce52000 - 0x157ce52fff 0x157ce53000 - 0x157cfbefff 0x157cfbf000 - 0x157cfc1fff 0x157cfc2000 - 0x157cfc2fff 0x157cfc3000 - 0x157cfc5fff 0x157cfc6000 - 0x157cfd8fff 0x157cfd9000 - 0x157cfd9fff 0x157cfda000 - 0x157cfdafff 0x157cfdb000 - 0x157d0f8fff 0x157d0f9000 - 0x157d0fbfff 0x157d0fc000 - 0x157d0fefff 0x157d0ff000 - 0x157d103fff 0x157d104000 - 0x157d158fff 0x157d159000 - 0x157d803fff 0x3fffafd000 - 0x3fffb1dfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/defmacro.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/defmacro.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/macros1.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2be0b000 - 0x2be2bfff 0x80000000 - 0x800bffff 0x156ee3d000 - 0x156ee57fff 0x156ee58000 - 0x156ee58fff 0x156ee59000 - 0x156ee59fff 0x156ee5a000 - 0x156ee5bfff 0x156ee5c000 - 0x156ee5dfff 0x156ee5e000 - 0x156ee64fff 0x156ee65000 - 0x156ee65fff 0x156ee66000 - 0x156ee66fff 0x156ee68000 - 0x156ee69fff 0x156ee6a000 - 0x156eea8fff 0x156eea9000 - 0x156eeaafff 0x156eeab000 - 0x156eeb1fff 0x156eeb2000 - 0x156eeb2fff 0x156eeb3000 - 0x156eed8fff 0x156eed9000 - 0x156eedcfff 0x156eedd000 - 0x156eeddfff 0x156eede000 - 0x156eedffff 0x156eee0000 - 0x156eee0fff 0x156eee1000 - 0x156eee1fff 0x156eee2000 - 0x156eee2fff 0x156eee3000 - 0x156eee6fff 0x156eee7000 - 0x156eee7fff 0x156eee8000 - 0x156eee8fff 0x156eee9000 - 0x156eeeafff 0x156eeeb000 - 0x156eeebfff 0x156eeec000 - 0x156eeecfff 0x156eeed000 - 0x156f058fff 0x156f059000 - 0x156f05bfff 0x156f05c000 - 0x156f05cfff 0x156f05d000 - 0x156f05ffff 0x156f060000 - 0x156f072fff 0x156f073000 - 0x156f073fff 0x156f074000 - 0x156f074fff 0x156f075000 - 0x156f192fff 0x156f193000 - 0x156f195fff 0x156f196000 - 0x156f198fff 0x156f199000 - 0x156f19dfff 0x156f19e000 - 0x156f1f2fff 0x156f1f3000 - 0x156f89dfff 0x3fffb56000 - 0x3fffb76fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/macros1.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/macros1.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/macros2.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x302c5000 - 0x302e5fff 0x80000000 - 0x800bffff 0x158056e000 - 0x1580588fff 0x1580589000 - 0x1580589fff 0x158058a000 - 0x158058afff 0x158058b000 - 0x158058cfff 0x158058d000 - 0x158058efff 0x158058f000 - 0x1580595fff 0x1580596000 - 0x1580596fff 0x1580597000 - 0x1580597fff 0x1580599000 - 0x158059afff 0x158059b000 - 0x15805d9fff 0x15805da000 - 0x15805dbfff 0x15805dc000 - 0x15805e2fff 0x15805e3000 - 0x15805e3fff 0x15805e4000 - 0x1580609fff 0x158060a000 - 0x158060dfff 0x158060e000 - 0x158060efff 0x158060f000 - 0x1580610fff 0x1580611000 - 0x1580611fff 0x1580612000 - 0x1580612fff 0x1580613000 - 0x1580613fff 0x1580614000 - 0x1580617fff 0x1580618000 - 0x1580618fff 0x1580619000 - 0x1580619fff 0x158061a000 - 0x158061bfff 0x158061c000 - 0x158061cfff 0x158061d000 - 0x158061dfff 0x158061e000 - 0x1580789fff 0x158078a000 - 0x158078cfff 0x158078d000 - 0x158078dfff 0x158078e000 - 0x1580790fff 0x1580791000 - 0x15807a3fff 0x15807a4000 - 0x15807a4fff 0x15807a5000 - 0x15807a5fff 0x15807a6000 - 0x15808c3fff 0x15808c4000 - 0x15808c6fff 0x15808c7000 - 0x15808c9fff 0x15808ca000 - 0x15808cefff 0x15808cf000 - 0x1580923fff 0x1580924000 - 0x1580fcefff 0x3fffaf6000 - 0x3fffb16fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/macros2.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/macros2.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/defs1.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x16e5c000 - 0x16e7cfff 0x80000000 - 0x800bffff 0x158e3e6000 - 0x158e400fff 0x158e401000 - 0x158e401fff 0x158e402000 - 0x158e402fff 0x158e403000 - 0x158e404fff 0x158e405000 - 0x158e406fff 0x158e407000 - 0x158e40dfff 0x158e40e000 - 0x158e40efff 0x158e40f000 - 0x158e40ffff 0x158e411000 - 0x158e412fff 0x158e413000 - 0x158e451fff 0x158e452000 - 0x158e453fff 0x158e454000 - 0x158e45afff 0x158e45b000 - 0x158e45bfff 0x158e45c000 - 0x158e481fff 0x158e482000 - 0x158e485fff 0x158e486000 - 0x158e486fff 0x158e487000 - 0x158e488fff 0x158e489000 - 0x158e489fff 0x158e48a000 - 0x158e48afff 0x158e48b000 - 0x158e48bfff 0x158e48c000 - 0x158e48ffff 0x158e490000 - 0x158e490fff 0x158e491000 - 0x158e491fff 0x158e492000 - 0x158e493fff 0x158e494000 - 0x158e494fff 0x158e495000 - 0x158e495fff 0x158e496000 - 0x158e601fff 0x158e602000 - 0x158e604fff 0x158e605000 - 0x158e605fff 0x158e606000 - 0x158e608fff 0x158e609000 - 0x158e61bfff 0x158e61c000 - 0x158e61cfff 0x158e61d000 - 0x158e61dfff 0x158e61e000 - 0x158e73bfff 0x158e73c000 - 0x158e73efff 0x158e73f000 - 0x158e741fff 0x158e742000 - 0x158e746fff 0x158e747000 - 0x158e79bfff 0x158e79c000 - 0x158ee46fff 0x3fffe08000 - 0x3fffe28fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/defs1.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/defs1.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/lambdalist.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x38b3c000 - 0x38b5cfff 0x80000000 - 0x800bffff 0x1555bd1000 - 0x1555bebfff 0x1555bec000 - 0x1555becfff 0x1555bed000 - 0x1555bedfff 0x1555bee000 - 0x1555beffff 0x1555bf0000 - 0x1555bf1fff 0x1555bf2000 - 0x1555bf8fff 0x1555bf9000 - 0x1555bf9fff 0x1555bfa000 - 0x1555bfafff 0x1555bfc000 - 0x1555bfdfff 0x1555bfe000 - 0x1555c3cfff 0x1555c3d000 - 0x1555c3efff 0x1555c3f000 - 0x1555c45fff 0x1555c46000 - 0x1555c46fff 0x1555c47000 - 0x1555c6cfff 0x1555c6d000 - 0x1555c70fff 0x1555c71000 - 0x1555c71fff 0x1555c72000 - 0x1555c73fff 0x1555c74000 - 0x1555c74fff 0x1555c75000 - 0x1555c75fff 0x1555c76000 - 0x1555c76fff 0x1555c77000 - 0x1555c7afff 0x1555c7b000 - 0x1555c7bfff 0x1555c7c000 - 0x1555c7cfff 0x1555c7d000 - 0x1555c7efff 0x1555c7f000 - 0x1555c7ffff 0x1555c80000 - 0x1555c80fff 0x1555c81000 - 0x1555decfff 0x1555ded000 - 0x1555deffff 0x1555df0000 - 0x1555df0fff 0x1555df1000 - 0x1555df3fff 0x1555df4000 - 0x1555e06fff 0x1555e07000 - 0x1555e07fff 0x1555e08000 - 0x1555e08fff 0x1555e09000 - 0x1555f26fff 0x1555f27000 - 0x1555f29fff 0x1555f2a000 - 0x1555f2cfff 0x1555f2d000 - 0x1555f31fff 0x1555f32000 - 0x1555f86fff 0x1555f87000 - 0x1556631fff 0x3fff7f4000 - 0x3fff814fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/lambdalist.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/lambdalist.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/places.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x17142000 - 0x17162fff 0x80000000 - 0x800bffff 0x1582b5a000 - 0x1582b74fff 0x1582b75000 - 0x1582b75fff 0x1582b76000 - 0x1582b76fff 0x1582b77000 - 0x1582b78fff 0x1582b79000 - 0x1582b7afff 0x1582b7b000 - 0x1582b81fff 0x1582b82000 - 0x1582b82fff 0x1582b83000 - 0x1582b83fff 0x1582b85000 - 0x1582b86fff 0x1582b87000 - 0x1582bc5fff 0x1582bc6000 - 0x1582bc7fff 0x1582bc8000 - 0x1582bcefff 0x1582bcf000 - 0x1582bcffff 0x1582bd0000 - 0x1582bf5fff 0x1582bf6000 - 0x1582bf9fff 0x1582bfa000 - 0x1582bfafff 0x1582bfb000 - 0x1582bfcfff 0x1582bfd000 - 0x1582bfdfff 0x1582bfe000 - 0x1582bfefff 0x1582bff000 - 0x1582bfffff 0x1582c00000 - 0x1582c03fff 0x1582c04000 - 0x1582c04fff 0x1582c05000 - 0x1582c05fff 0x1582c06000 - 0x1582c07fff 0x1582c08000 - 0x1582c08fff 0x1582c09000 - 0x1582c09fff 0x1582c0a000 - 0x1582d75fff 0x1582d76000 - 0x1582d78fff 0x1582d79000 - 0x1582d79fff 0x1582d7a000 - 0x1582d7cfff 0x1582d7d000 - 0x1582d8ffff 0x1582d90000 - 0x1582d90fff 0x1582d91000 - 0x1582d91fff 0x1582d92000 - 0x1582eaffff 0x1582eb0000 - 0x1582eb2fff 0x1582eb3000 - 0x1582eb5fff 0x1582eb6000 - 0x1582ebafff 0x1582ebb000 - 0x1582f0ffff 0x1582f10000 - 0x15835bafff 0x3ffff06000 - 0x3ffff26fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/places.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/places.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/floatprint.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xce89000 - 0xcea9fff 0x80000000 - 0x800bffff 0x1580e9d000 - 0x1580eb7fff 0x1580eb8000 - 0x1580eb8fff 0x1580eb9000 - 0x1580eb9fff 0x1580eba000 - 0x1580ebbfff 0x1580ebc000 - 0x1580ebdfff 0x1580ebe000 - 0x1580ec4fff 0x1580ec5000 - 0x1580ec5fff 0x1580ec6000 - 0x1580ec6fff 0x1580ec8000 - 0x1580ec9fff 0x1580eca000 - 0x1580f08fff 0x1580f09000 - 0x1580f0afff 0x1580f0b000 - 0x1580f11fff 0x1580f12000 - 0x1580f12fff 0x1580f13000 - 0x1580f38fff 0x1580f39000 - 0x1580f3cfff 0x1580f3d000 - 0x1580f3dfff 0x1580f3e000 - 0x1580f3ffff 0x1580f40000 - 0x1580f40fff 0x1580f41000 - 0x1580f41fff 0x1580f42000 - 0x1580f42fff 0x1580f43000 - 0x1580f46fff 0x1580f47000 - 0x1580f47fff 0x1580f48000 - 0x1580f48fff 0x1580f49000 - 0x1580f4afff 0x1580f4b000 - 0x1580f4bfff 0x1580f4c000 - 0x1580f4cfff 0x1580f4d000 - 0x15810b8fff 0x15810b9000 - 0x15810bbfff 0x15810bc000 - 0x15810bcfff 0x15810bd000 - 0x15810bffff 0x15810c0000 - 0x15810d2fff 0x15810d3000 - 0x15810d3fff 0x15810d4000 - 0x15810d4fff 0x15810d5000 - 0x15811f2fff 0x15811f3000 - 0x15811f5fff 0x15811f6000 - 0x15811f8fff 0x15811f9000 - 0x15811fdfff 0x15811fe000 - 0x1581252fff 0x1581253000 - 0x15818fdfff 0x3fffb59000 - 0x3fffb79fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/floatprint.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/floatprint.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/defpackage.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xfac2000 - 0xfae2fff 0x80000000 - 0x800bffff 0x155e529000 - 0x155e543fff 0x155e544000 - 0x155e544fff 0x155e545000 - 0x155e545fff 0x155e546000 - 0x155e547fff 0x155e548000 - 0x155e549fff 0x155e54a000 - 0x155e550fff 0x155e551000 - 0x155e551fff 0x155e552000 - 0x155e552fff 0x155e554000 - 0x155e555fff 0x155e556000 - 0x155e594fff 0x155e595000 - 0x155e596fff 0x155e597000 - 0x155e59dfff 0x155e59e000 - 0x155e59efff 0x155e59f000 - 0x155e5c4fff 0x155e5c5000 - 0x155e5c8fff 0x155e5c9000 - 0x155e5c9fff 0x155e5ca000 - 0x155e5cbfff 0x155e5cc000 - 0x155e5ccfff 0x155e5cd000 - 0x155e5cdfff 0x155e5ce000 - 0x155e5cefff 0x155e5cf000 - 0x155e5d2fff 0x155e5d3000 - 0x155e5d3fff 0x155e5d4000 - 0x155e5d4fff 0x155e5d5000 - 0x155e5d6fff 0x155e5d7000 - 0x155e5d7fff 0x155e5d8000 - 0x155e5d8fff 0x155e5d9000 - 0x155e744fff 0x155e745000 - 0x155e747fff 0x155e748000 - 0x155e748fff 0x155e749000 - 0x155e74bfff 0x155e74c000 - 0x155e75efff 0x155e75f000 - 0x155e75ffff 0x155e760000 - 0x155e760fff 0x155e761000 - 0x155e87efff 0x155e87f000 - 0x155e881fff 0x155e882000 - 0x155e884fff 0x155e885000 - 0x155e889fff 0x155e88a000 - 0x155e8defff 0x155e8df000 - 0x155ef89fff 0x3fff87d000 - 0x3fff89dfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/defpackage.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/defpackage.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/type.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x307e8000 - 0x30808fff 0x80000000 - 0x800bffff 0x1590900000 - 0x159091afff 0x159091b000 - 0x159091bfff 0x159091c000 - 0x159091cfff 0x159091d000 - 0x159091efff 0x159091f000 - 0x1590920fff 0x1590921000 - 0x1590927fff 0x1590928000 - 0x1590928fff 0x1590929000 - 0x1590929fff 0x159092b000 - 0x159092cfff 0x159092d000 - 0x159096bfff 0x159096c000 - 0x159096dfff 0x159096e000 - 0x1590974fff 0x1590975000 - 0x1590975fff 0x1590976000 - 0x159099bfff 0x159099c000 - 0x159099ffff 0x15909a0000 - 0x15909a0fff 0x15909a1000 - 0x15909a2fff 0x15909a3000 - 0x15909a3fff 0x15909a4000 - 0x15909a4fff 0x15909a5000 - 0x15909a5fff 0x15909a6000 - 0x15909a9fff 0x15909aa000 - 0x15909aafff 0x15909ab000 - 0x15909abfff 0x15909ac000 - 0x15909adfff 0x15909ae000 - 0x15909aefff 0x15909af000 - 0x15909affff 0x15909b0000 - 0x1590b1bfff 0x1590b1c000 - 0x1590b1efff 0x1590b1f000 - 0x1590b1ffff 0x1590b20000 - 0x1590b22fff 0x1590b23000 - 0x1590b35fff 0x1590b36000 - 0x1590b36fff 0x1590b37000 - 0x1590b37fff 0x1590b38000 - 0x1590c55fff 0x1590c56000 - 0x1590c58fff 0x1590c59000 - 0x1590c5bfff 0x1590c5c000 - 0x1590c60fff 0x1590c61000 - 0x1590cb5fff 0x1590cb6000 - 0x1591360fff 0x3fffe60000 - 0x3fffe80fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/type.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/type.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/subtypep.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x32b33000 - 0x32b53fff 0x80000000 - 0x800bffff 0x1567481000 - 0x156749bfff 0x156749c000 - 0x156749cfff 0x156749d000 - 0x156749dfff 0x156749e000 - 0x156749ffff 0x15674a0000 - 0x15674a1fff 0x15674a2000 - 0x15674a8fff 0x15674a9000 - 0x15674a9fff 0x15674aa000 - 0x15674aafff 0x15674ac000 - 0x15674adfff 0x15674ae000 - 0x15674ecfff 0x15674ed000 - 0x15674eefff 0x15674ef000 - 0x15674f5fff 0x15674f6000 - 0x15674f6fff 0x15674f7000 - 0x156751cfff 0x156751d000 - 0x1567520fff 0x1567521000 - 0x1567521fff 0x1567522000 - 0x1567523fff 0x1567524000 - 0x1567524fff 0x1567525000 - 0x1567525fff 0x1567526000 - 0x1567526fff 0x1567527000 - 0x156752afff 0x156752b000 - 0x156752bfff 0x156752c000 - 0x156752cfff 0x156752d000 - 0x156752efff 0x156752f000 - 0x156752ffff 0x1567530000 - 0x1567530fff 0x1567531000 - 0x156769cfff 0x156769d000 - 0x156769ffff 0x15676a0000 - 0x15676a0fff 0x15676a1000 - 0x15676a3fff 0x15676a4000 - 0x15676b6fff 0x15676b7000 - 0x15676b7fff 0x15676b8000 - 0x15676b8fff 0x15676b9000 - 0x15677d6fff 0x15677d7000 - 0x15677d9fff 0x15677da000 - 0x15677dcfff 0x15677dd000 - 0x15677e1fff 0x15677e2000 - 0x1567836fff 0x1567837000 - 0x1567ee1fff 0x3fffb61000 - 0x3fffb81fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/subtypep.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/subtypep.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-package.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1c947000 - 0x1c967fff 0x80000000 - 0x800bffff 0x1562837000 - 0x1562851fff 0x1562852000 - 0x1562852fff 0x1562853000 - 0x1562853fff 0x1562854000 - 0x1562855fff 0x1562856000 - 0x1562857fff 0x1562858000 - 0x156285efff 0x156285f000 - 0x156285ffff 0x1562860000 - 0x1562860fff 0x1562862000 - 0x1562863fff 0x1562864000 - 0x15628a2fff 0x15628a3000 - 0x15628a4fff 0x15628a5000 - 0x15628abfff 0x15628ac000 - 0x15628acfff 0x15628ad000 - 0x15628d2fff 0x15628d3000 - 0x15628d6fff 0x15628d7000 - 0x15628d7fff 0x15628d8000 - 0x15628d9fff 0x15628da000 - 0x15628dafff 0x15628db000 - 0x15628dbfff 0x15628dc000 - 0x15628dcfff 0x15628dd000 - 0x15628e0fff 0x15628e1000 - 0x15628e1fff 0x15628e2000 - 0x15628e2fff 0x15628e3000 - 0x15628e4fff 0x15628e5000 - 0x15628e5fff 0x15628e6000 - 0x15628e6fff 0x15628e7000 - 0x1562a52fff 0x1562a53000 - 0x1562a55fff 0x1562a56000 - 0x1562a56fff 0x1562a57000 - 0x1562a59fff 0x1562a5a000 - 0x1562a6cfff 0x1562a6d000 - 0x1562a6dfff 0x1562a6e000 - 0x1562a6efff 0x1562a6f000 - 0x1562b8cfff 0x1562b8d000 - 0x1562b8ffff 0x1562b90000 - 0x1562b92fff 0x1562b93000 - 0x1562b97fff 0x1562b98000 - 0x1562becfff 0x1562bed000 - 0x1563297fff 0x3fff973000 - 0x3fff993fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-package.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-package.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-macros.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x21afb000 - 0x21b1bfff 0x80000000 - 0x800bffff 0x1558617000 - 0x1558631fff 0x1558632000 - 0x1558632fff 0x1558633000 - 0x1558633fff 0x1558634000 - 0x1558635fff 0x1558636000 - 0x1558637fff 0x1558638000 - 0x155863efff 0x155863f000 - 0x155863ffff 0x1558640000 - 0x1558640fff 0x1558642000 - 0x1558643fff 0x1558644000 - 0x1558682fff 0x1558683000 - 0x1558684fff 0x1558685000 - 0x155868bfff 0x155868c000 - 0x155868cfff 0x155868d000 - 0x15586b2fff 0x15586b3000 - 0x15586b6fff 0x15586b7000 - 0x15586b7fff 0x15586b8000 - 0x15586b9fff 0x15586ba000 - 0x15586bafff 0x15586bb000 - 0x15586bbfff 0x15586bc000 - 0x15586bcfff 0x15586bd000 - 0x15586c0fff 0x15586c1000 - 0x15586c1fff 0x15586c2000 - 0x15586c2fff 0x15586c3000 - 0x15586c4fff 0x15586c5000 - 0x15586c5fff 0x15586c6000 - 0x15586c6fff 0x15586c7000 - 0x1558832fff 0x1558833000 - 0x1558835fff 0x1558836000 - 0x1558836fff 0x1558837000 - 0x1558839fff 0x155883a000 - 0x155884cfff 0x155884d000 - 0x155884dfff 0x155884e000 - 0x155884efff 0x155884f000 - 0x155896cfff 0x155896d000 - 0x155896ffff 0x1558970000 - 0x1558972fff 0x1558973000 - 0x1558977fff 0x1558978000 - 0x15589ccfff 0x15589cd000 - 0x1559077fff 0x3fff9f3000 - 0x3fffa13fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-macros.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-macros.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-class0.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x13496000 - 0x134b6fff 0x80000000 - 0x800bffff 0x156d7ea000 - 0x156d804fff 0x156d805000 - 0x156d805fff 0x156d806000 - 0x156d806fff 0x156d807000 - 0x156d808fff 0x156d809000 - 0x156d80afff 0x156d80b000 - 0x156d811fff 0x156d812000 - 0x156d812fff 0x156d813000 - 0x156d813fff 0x156d815000 - 0x156d816fff 0x156d817000 - 0x156d855fff 0x156d856000 - 0x156d857fff 0x156d858000 - 0x156d85efff 0x156d85f000 - 0x156d85ffff 0x156d860000 - 0x156d885fff 0x156d886000 - 0x156d889fff 0x156d88a000 - 0x156d88afff 0x156d88b000 - 0x156d88cfff 0x156d88d000 - 0x156d88dfff 0x156d88e000 - 0x156d88efff 0x156d88f000 - 0x156d88ffff 0x156d890000 - 0x156d893fff 0x156d894000 - 0x156d894fff 0x156d895000 - 0x156d895fff 0x156d896000 - 0x156d897fff 0x156d898000 - 0x156d898fff 0x156d899000 - 0x156d899fff 0x156d89a000 - 0x156da05fff 0x156da06000 - 0x156da08fff 0x156da09000 - 0x156da09fff 0x156da0a000 - 0x156da0cfff 0x156da0d000 - 0x156da1ffff 0x156da20000 - 0x156da20fff 0x156da21000 - 0x156da21fff 0x156da22000 - 0x156db3ffff 0x156db40000 - 0x156db42fff 0x156db43000 - 0x156db45fff 0x156db46000 - 0x156db4afff 0x156db4b000 - 0x156db9ffff 0x156dba0000 - 0x156e24afff 0x3fffb11000 - 0x3fffb31fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class0.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-class0.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-metaobject1.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x5efc000 - 0x5f1cfff 0x80000000 - 0x800bffff 0x155e1f3000 - 0x155e20dfff 0x155e20e000 - 0x155e20efff 0x155e20f000 - 0x155e20ffff 0x155e210000 - 0x155e211fff 0x155e212000 - 0x155e213fff 0x155e214000 - 0x155e21afff 0x155e21b000 - 0x155e21bfff 0x155e21c000 - 0x155e21cfff 0x155e21e000 - 0x155e21ffff 0x155e220000 - 0x155e25efff 0x155e25f000 - 0x155e260fff 0x155e261000 - 0x155e267fff 0x155e268000 - 0x155e268fff 0x155e269000 - 0x155e28efff 0x155e28f000 - 0x155e292fff 0x155e293000 - 0x155e293fff 0x155e294000 - 0x155e295fff 0x155e296000 - 0x155e296fff 0x155e297000 - 0x155e297fff 0x155e298000 - 0x155e298fff 0x155e299000 - 0x155e29cfff 0x155e29d000 - 0x155e29dfff 0x155e29e000 - 0x155e29efff 0x155e29f000 - 0x155e2a0fff 0x155e2a1000 - 0x155e2a1fff 0x155e2a2000 - 0x155e2a2fff 0x155e2a3000 - 0x155e40efff 0x155e40f000 - 0x155e411fff 0x155e412000 - 0x155e412fff 0x155e413000 - 0x155e415fff 0x155e416000 - 0x155e428fff 0x155e429000 - 0x155e429fff 0x155e42a000 - 0x155e42afff 0x155e42b000 - 0x155e548fff 0x155e549000 - 0x155e54bfff 0x155e54c000 - 0x155e54efff 0x155e54f000 - 0x155e553fff 0x155e554000 - 0x155e5a8fff 0x155e5a9000 - 0x155ec53fff 0x3fffcd6000 - 0x3fffcf6fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-metaobject1.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-metaobject1.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-slotdef1.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1e4b8000 - 0x1e4d8fff 0x80000000 - 0x800bffff 0x157f416000 - 0x157f430fff 0x157f431000 - 0x157f431fff 0x157f432000 - 0x157f432fff 0x157f433000 - 0x157f434fff 0x157f435000 - 0x157f436fff 0x157f437000 - 0x157f43dfff 0x157f43e000 - 0x157f43efff 0x157f43f000 - 0x157f43ffff 0x157f441000 - 0x157f442fff 0x157f443000 - 0x157f481fff 0x157f482000 - 0x157f483fff 0x157f484000 - 0x157f48afff 0x157f48b000 - 0x157f48bfff 0x157f48c000 - 0x157f4b1fff 0x157f4b2000 - 0x157f4b5fff 0x157f4b6000 - 0x157f4b6fff 0x157f4b7000 - 0x157f4b8fff 0x157f4b9000 - 0x157f4b9fff 0x157f4ba000 - 0x157f4bafff 0x157f4bb000 - 0x157f4bbfff 0x157f4bc000 - 0x157f4bffff 0x157f4c0000 - 0x157f4c0fff 0x157f4c1000 - 0x157f4c1fff 0x157f4c2000 - 0x157f4c3fff 0x157f4c4000 - 0x157f4c4fff 0x157f4c5000 - 0x157f4c5fff 0x157f4c6000 - 0x157f631fff 0x157f632000 - 0x157f634fff 0x157f635000 - 0x157f635fff 0x157f636000 - 0x157f638fff 0x157f639000 - 0x157f64bfff 0x157f64c000 - 0x157f64cfff 0x157f64d000 - 0x157f64dfff 0x157f64e000 - 0x157f76bfff 0x157f76c000 - 0x157f76efff 0x157f76f000 - 0x157f771fff 0x157f772000 - 0x157f776fff 0x157f777000 - 0x157f7cbfff 0x157f7cc000 - 0x157fe76fff 0x3fffd3c000 - 0x3fffd5cfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slotdef1.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-slotdef1.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-stablehash1.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3ec94000 - 0x3ecb4fff 0x80000000 - 0x800bffff 0x156ad0a000 - 0x156ad24fff 0x156ad25000 - 0x156ad25fff 0x156ad26000 - 0x156ad26fff 0x156ad27000 - 0x156ad28fff 0x156ad29000 - 0x156ad2afff 0x156ad2b000 - 0x156ad31fff 0x156ad32000 - 0x156ad32fff 0x156ad33000 - 0x156ad33fff 0x156ad35000 - 0x156ad36fff 0x156ad37000 - 0x156ad75fff 0x156ad76000 - 0x156ad77fff 0x156ad78000 - 0x156ad7efff 0x156ad7f000 - 0x156ad7ffff 0x156ad80000 - 0x156ada5fff 0x156ada6000 - 0x156ada9fff 0x156adaa000 - 0x156adaafff 0x156adab000 - 0x156adacfff 0x156adad000 - 0x156adadfff 0x156adae000 - 0x156adaefff 0x156adaf000 - 0x156adaffff 0x156adb0000 - 0x156adb3fff 0x156adb4000 - 0x156adb4fff 0x156adb5000 - 0x156adb5fff 0x156adb6000 - 0x156adb7fff 0x156adb8000 - 0x156adb8fff 0x156adb9000 - 0x156adb9fff 0x156adba000 - 0x156af25fff 0x156af26000 - 0x156af28fff 0x156af29000 - 0x156af29fff 0x156af2a000 - 0x156af2cfff 0x156af2d000 - 0x156af3ffff 0x156af40000 - 0x156af40fff 0x156af41000 - 0x156af41fff 0x156af42000 - 0x156b05ffff 0x156b060000 - 0x156b062fff 0x156b063000 - 0x156b065fff 0x156b066000 - 0x156b06afff 0x156b06b000 - 0x156b0bffff 0x156b0c0000 - 0x156b76afff 0x3fffd46000 - 0x3fffd66fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-stablehash1.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-stablehash1.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-specializer1.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2ab6d000 - 0x2ab8dfff 0x80000000 - 0x800bffff 0x15579b5000 - 0x15579cffff 0x15579d0000 - 0x15579d0fff 0x15579d1000 - 0x15579d1fff 0x15579d2000 - 0x15579d3fff 0x15579d4000 - 0x15579d5fff 0x15579d6000 - 0x15579dcfff 0x15579dd000 - 0x15579ddfff 0x15579de000 - 0x15579defff 0x15579e0000 - 0x15579e1fff 0x15579e2000 - 0x1557a20fff 0x1557a21000 - 0x1557a22fff 0x1557a23000 - 0x1557a29fff 0x1557a2a000 - 0x1557a2afff 0x1557a2b000 - 0x1557a50fff 0x1557a51000 - 0x1557a54fff 0x1557a55000 - 0x1557a55fff 0x1557a56000 - 0x1557a57fff 0x1557a58000 - 0x1557a58fff 0x1557a59000 - 0x1557a59fff 0x1557a5a000 - 0x1557a5afff 0x1557a5b000 - 0x1557a5efff 0x1557a5f000 - 0x1557a5ffff 0x1557a60000 - 0x1557a60fff 0x1557a61000 - 0x1557a62fff 0x1557a63000 - 0x1557a63fff 0x1557a64000 - 0x1557a64fff 0x1557a65000 - 0x1557bd0fff 0x1557bd1000 - 0x1557bd3fff 0x1557bd4000 - 0x1557bd4fff 0x1557bd5000 - 0x1557bd7fff 0x1557bd8000 - 0x1557beafff 0x1557beb000 - 0x1557bebfff 0x1557bec000 - 0x1557becfff 0x1557bed000 - 0x1557d0afff 0x1557d0b000 - 0x1557d0dfff 0x1557d0e000 - 0x1557d10fff 0x1557d11000 - 0x1557d15fff 0x1557d16000 - 0x1557d6afff 0x1557d6b000 - 0x1558415fff 0x3fff993000 - 0x3fff9b3fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-specializer1.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-specializer1.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-class1.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2f50a000 - 0x2f52afff 0x80000000 - 0x800bffff 0x1563ae0000 - 0x1563afafff 0x1563afb000 - 0x1563afbfff 0x1563afc000 - 0x1563afcfff 0x1563afd000 - 0x1563afefff 0x1563aff000 - 0x1563b00fff 0x1563b01000 - 0x1563b07fff 0x1563b08000 - 0x1563b08fff 0x1563b09000 - 0x1563b09fff 0x1563b0b000 - 0x1563b0cfff 0x1563b0d000 - 0x1563b4bfff 0x1563b4c000 - 0x1563b4dfff 0x1563b4e000 - 0x1563b54fff 0x1563b55000 - 0x1563b55fff 0x1563b56000 - 0x1563b7bfff 0x1563b7c000 - 0x1563b7ffff 0x1563b80000 - 0x1563b80fff 0x1563b81000 - 0x1563b82fff 0x1563b83000 - 0x1563b83fff 0x1563b84000 - 0x1563b84fff 0x1563b85000 - 0x1563b85fff 0x1563b86000 - 0x1563b89fff 0x1563b8a000 - 0x1563b8afff 0x1563b8b000 - 0x1563b8bfff 0x1563b8c000 - 0x1563b8dfff 0x1563b8e000 - 0x1563b8efff 0x1563b8f000 - 0x1563b8ffff 0x1563b90000 - 0x1563cfbfff 0x1563cfc000 - 0x1563cfefff 0x1563cff000 - 0x1563cfffff 0x1563d00000 - 0x1563d02fff 0x1563d03000 - 0x1563d15fff 0x1563d16000 - 0x1563d16fff 0x1563d17000 - 0x1563d17fff 0x1563d18000 - 0x1563e35fff 0x1563e36000 - 0x1563e38fff 0x1563e39000 - 0x1563e3bfff 0x1563e3c000 - 0x1563e40fff 0x1563e41000 - 0x1563e95fff 0x1563e96000 - 0x1564540fff 0x3fffc19000 - 0x3fffc39fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class1.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-class1.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-class2.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x36cc8000 - 0x36ce8fff 0x80000000 - 0x800bffff 0x158d7da000 - 0x158d7f4fff 0x158d7f5000 - 0x158d7f5fff 0x158d7f6000 - 0x158d7f6fff 0x158d7f7000 - 0x158d7f8fff 0x158d7f9000 - 0x158d7fafff 0x158d7fb000 - 0x158d801fff 0x158d802000 - 0x158d802fff 0x158d803000 - 0x158d803fff 0x158d805000 - 0x158d806fff 0x158d807000 - 0x158d845fff 0x158d846000 - 0x158d847fff 0x158d848000 - 0x158d84efff 0x158d84f000 - 0x158d84ffff 0x158d850000 - 0x158d875fff 0x158d876000 - 0x158d879fff 0x158d87a000 - 0x158d87afff 0x158d87b000 - 0x158d87cfff 0x158d87d000 - 0x158d87dfff 0x158d87e000 - 0x158d87efff 0x158d87f000 - 0x158d87ffff 0x158d880000 - 0x158d883fff 0x158d884000 - 0x158d884fff 0x158d885000 - 0x158d885fff 0x158d886000 - 0x158d887fff 0x158d888000 - 0x158d888fff 0x158d889000 - 0x158d889fff 0x158d88a000 - 0x158d9f5fff 0x158d9f6000 - 0x158d9f8fff 0x158d9f9000 - 0x158d9f9fff 0x158d9fa000 - 0x158d9fcfff 0x158d9fd000 - 0x158da0ffff 0x158da10000 - 0x158da10fff 0x158da11000 - 0x158da11fff 0x158da12000 - 0x158db2ffff 0x158db30000 - 0x158db32fff 0x158db33000 - 0x158db35fff 0x158db36000 - 0x158db3afff 0x158db3b000 - 0x158db8ffff 0x158db90000 - 0x158e23afff 0x3fff910000 - 0x3fff930fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class2.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-class2.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-class3.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x380eb000 - 0x3810bfff 0x80000000 - 0x800bffff 0x1590b6f000 - 0x1590b89fff 0x1590b8a000 - 0x1590b8afff 0x1590b8b000 - 0x1590b8bfff 0x1590b8c000 - 0x1590b8dfff 0x1590b8e000 - 0x1590b8ffff 0x1590b90000 - 0x1590b96fff 0x1590b97000 - 0x1590b97fff 0x1590b98000 - 0x1590b98fff 0x1590b9a000 - 0x1590b9bfff 0x1590b9c000 - 0x1590bdafff 0x1590bdb000 - 0x1590bdcfff 0x1590bdd000 - 0x1590be3fff 0x1590be4000 - 0x1590be4fff 0x1590be5000 - 0x1590c0afff 0x1590c0b000 - 0x1590c0efff 0x1590c0f000 - 0x1590c0ffff 0x1590c10000 - 0x1590c11fff 0x1590c12000 - 0x1590c12fff 0x1590c13000 - 0x1590c13fff 0x1590c14000 - 0x1590c14fff 0x1590c15000 - 0x1590c18fff 0x1590c19000 - 0x1590c19fff 0x1590c1a000 - 0x1590c1afff 0x1590c1b000 - 0x1590c1cfff 0x1590c1d000 - 0x1590c1dfff 0x1590c1e000 - 0x1590c1efff 0x1590c1f000 - 0x1590d8afff 0x1590d8b000 - 0x1590d8dfff 0x1590d8e000 - 0x1590d8efff 0x1590d8f000 - 0x1590d91fff 0x1590d92000 - 0x1590da4fff 0x1590da5000 - 0x1590da5fff 0x1590da6000 - 0x1590da6fff 0x1590da7000 - 0x1590ec4fff 0x1590ec5000 - 0x1590ec7fff 0x1590ec8000 - 0x1590ecafff 0x1590ecb000 - 0x1590ecffff 0x1590ed0000 - 0x1590f24fff 0x1590f25000 - 0x15915cffff 0x3fff994000 - 0x3fff9b4fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class3.lisp ... WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-class3.fas 0 errors, 19 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/defstruct.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x38b31000 - 0x38b51fff 0x80000000 - 0x800bffff 0x155ebba000 - 0x155ebd4fff 0x155ebd5000 - 0x155ebd5fff 0x155ebd6000 - 0x155ebd6fff 0x155ebd7000 - 0x155ebd8fff 0x155ebd9000 - 0x155ebdafff 0x155ebdb000 - 0x155ebe1fff 0x155ebe2000 - 0x155ebe2fff 0x155ebe3000 - 0x155ebe3fff 0x155ebe5000 - 0x155ebe6fff 0x155ebe7000 - 0x155ec25fff 0x155ec26000 - 0x155ec27fff 0x155ec28000 - 0x155ec2efff 0x155ec2f000 - 0x155ec2ffff 0x155ec30000 - 0x155ec55fff 0x155ec56000 - 0x155ec59fff 0x155ec5a000 - 0x155ec5afff 0x155ec5b000 - 0x155ec5cfff 0x155ec5d000 - 0x155ec5dfff 0x155ec5e000 - 0x155ec5efff 0x155ec5f000 - 0x155ec5ffff 0x155ec60000 - 0x155ec63fff 0x155ec64000 - 0x155ec64fff 0x155ec65000 - 0x155ec65fff 0x155ec66000 - 0x155ec67fff 0x155ec68000 - 0x155ec68fff 0x155ec69000 - 0x155ec69fff 0x155ec6a000 - 0x155edd5fff 0x155edd6000 - 0x155edd8fff 0x155edd9000 - 0x155edd9fff 0x155edda000 - 0x155eddcfff 0x155eddd000 - 0x155edeffff 0x155edf0000 - 0x155edf0fff 0x155edf1000 - 0x155edf1fff 0x155edf2000 - 0x155ef0ffff 0x155ef10000 - 0x155ef12fff 0x155ef13000 - 0x155ef15fff 0x155ef16000 - 0x155ef1afff 0x155ef1b000 - 0x155ef6ffff 0x155ef70000 - 0x155f61afff 0x3fffb8d000 - 0x3fffbadfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/defstruct.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/defstruct.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/format.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1e8db000 - 0x1e8fbfff 0x80000000 - 0x800bffff 0x157d7d9000 - 0x157d7f3fff 0x157d7f4000 - 0x157d7f4fff 0x157d7f5000 - 0x157d7f5fff 0x157d7f6000 - 0x157d7f7fff 0x157d7f8000 - 0x157d7f9fff 0x157d7fa000 - 0x157d800fff 0x157d801000 - 0x157d801fff 0x157d802000 - 0x157d802fff 0x157d804000 - 0x157d805fff 0x157d806000 - 0x157d844fff 0x157d845000 - 0x157d846fff 0x157d847000 - 0x157d84dfff 0x157d84e000 - 0x157d84efff 0x157d84f000 - 0x157d874fff 0x157d875000 - 0x157d878fff 0x157d879000 - 0x157d879fff 0x157d87a000 - 0x157d87bfff 0x157d87c000 - 0x157d87cfff 0x157d87d000 - 0x157d87dfff 0x157d87e000 - 0x157d87efff 0x157d87f000 - 0x157d882fff 0x157d883000 - 0x157d883fff 0x157d884000 - 0x157d884fff 0x157d885000 - 0x157d886fff 0x157d887000 - 0x157d887fff 0x157d888000 - 0x157d888fff 0x157d889000 - 0x157d9f4fff 0x157d9f5000 - 0x157d9f7fff 0x157d9f8000 - 0x157d9f8fff 0x157d9f9000 - 0x157d9fbfff 0x157d9fc000 - 0x157da0efff 0x157da0f000 - 0x157da0ffff 0x157da10000 - 0x157da10fff 0x157da11000 - 0x157db2efff 0x157db2f000 - 0x157db31fff 0x157db32000 - 0x157db34fff 0x157db35000 - 0x157db39fff 0x157db3a000 - 0x157db8efff 0x157db8f000 - 0x157e239fff 0x3fff9f2000 - 0x3fffa12fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/format.lisp ... WARNING: in FORMATTER-MAIN-1 in lines 2028..2526 : variable ADD-FILL is not used. Misspelled or missing IGNORE declaration? ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/format.fas 0 errors, 1 warning ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/international.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2623f000 - 0x2625ffff 0x80000000 - 0x800bffff 0x1593487000 - 0x15934a1fff 0x15934a2000 - 0x15934a2fff 0x15934a3000 - 0x15934a3fff 0x15934a4000 - 0x15934a5fff 0x15934a6000 - 0x15934a7fff 0x15934a8000 - 0x15934aefff 0x15934af000 - 0x15934affff 0x15934b0000 - 0x15934b0fff 0x15934b2000 - 0x15934b3fff 0x15934b4000 - 0x15934f2fff 0x15934f3000 - 0x15934f4fff 0x15934f5000 - 0x15934fbfff 0x15934fc000 - 0x15934fcfff 0x15934fd000 - 0x1593522fff 0x1593523000 - 0x1593526fff 0x1593527000 - 0x1593527fff 0x1593528000 - 0x1593529fff 0x159352a000 - 0x159352afff 0x159352b000 - 0x159352bfff 0x159352c000 - 0x159352cfff 0x159352d000 - 0x1593530fff 0x1593531000 - 0x1593531fff 0x1593532000 - 0x1593532fff 0x1593533000 - 0x1593534fff 0x1593535000 - 0x1593535fff 0x1593536000 - 0x1593536fff 0x1593537000 - 0x15936a2fff 0x15936a3000 - 0x15936a5fff 0x15936a6000 - 0x15936a6fff 0x15936a7000 - 0x15936a9fff 0x15936aa000 - 0x15936bcfff 0x15936bd000 - 0x15936bdfff 0x15936be000 - 0x15936befff 0x15936bf000 - 0x15937dcfff 0x15937dd000 - 0x15937dffff 0x15937e0000 - 0x15937e2fff 0x15937e3000 - 0x15937e7fff 0x15937e8000 - 0x159383cfff 0x159383d000 - 0x1593ee7fff 0x3fff981000 - 0x3fff9a1fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/international.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/international.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/savemem.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3c53f000 - 0x3c55ffff 0x80000000 - 0x800bffff 0x1593160000 - 0x159317afff 0x159317b000 - 0x159317bfff 0x159317c000 - 0x159317cfff 0x159317d000 - 0x159317efff 0x159317f000 - 0x1593180fff 0x1593181000 - 0x1593187fff 0x1593188000 - 0x1593188fff 0x1593189000 - 0x1593189fff 0x159318b000 - 0x159318cfff 0x159318d000 - 0x15931cbfff 0x15931cc000 - 0x15931cdfff 0x15931ce000 - 0x15931d4fff 0x15931d5000 - 0x15931d5fff 0x15931d6000 - 0x15931fbfff 0x15931fc000 - 0x15931fffff 0x1593200000 - 0x1593200fff 0x1593201000 - 0x1593202fff 0x1593203000 - 0x1593203fff 0x1593204000 - 0x1593204fff 0x1593205000 - 0x1593205fff 0x1593206000 - 0x1593209fff 0x159320a000 - 0x159320afff 0x159320b000 - 0x159320bfff 0x159320c000 - 0x159320dfff 0x159320e000 - 0x159320efff 0x159320f000 - 0x159320ffff 0x1593210000 - 0x159337bfff 0x159337c000 - 0x159337efff 0x159337f000 - 0x159337ffff 0x1593380000 - 0x1593382fff 0x1593383000 - 0x1593395fff 0x1593396000 - 0x1593396fff 0x1593397000 - 0x1593397fff 0x1593398000 - 0x15934b5fff 0x15934b6000 - 0x15934b8fff 0x15934b9000 - 0x15934bbfff 0x15934bc000 - 0x15934c0fff 0x15934c1000 - 0x1593515fff 0x1593516000 - 0x1593bc0fff 0x3fffcac000 - 0x3fffcccfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/savemem.lisp ... WARNING: in SAVEINITMEM in lines 31..106 : Mixing &OPTIONAL and &KEY in lambda list (&OPTIONAL (FILENAME "lispinit.mem") &KEY ((:QUIET *QUIET*) NIL) (INIT-FUNCTION NIL INIT-FUNCTION-P) ((:VERBOSE *SAVEINITMEM-VERBOSE*) *SAVEINITMEM-VERBOSE*) ((:NORC *NORC*) NIL) ((:DOCUMENTATION *IMAGE-DOC*) (DOCUMENTATION INIT-FUNCTION 'FUNCTION)) ((:SCRIPT *SCRIPT*) (NULL INIT-FUNCTION)) KEEP-GLOBAL-HANDLERS (START-PACKAGE *PACKAGE*) (LOCKED-PACKAGES *SYSTEM-PACKAGE-LIST*) EXECUTABLE) is bad design ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/savemem.fas 0 errors, 1 warning ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/functions.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xed38000 - 0xed58fff 0x80000000 - 0x800bffff 0x158cb3e000 - 0x158cb58fff 0x158cb59000 - 0x158cb59fff 0x158cb5a000 - 0x158cb5afff 0x158cb5b000 - 0x158cb5cfff 0x158cb5d000 - 0x158cb5efff 0x158cb5f000 - 0x158cb65fff 0x158cb66000 - 0x158cb66fff 0x158cb67000 - 0x158cb67fff 0x158cb69000 - 0x158cb6afff 0x158cb6b000 - 0x158cba9fff 0x158cbaa000 - 0x158cbabfff 0x158cbac000 - 0x158cbb2fff 0x158cbb3000 - 0x158cbb3fff 0x158cbb4000 - 0x158cbd9fff 0x158cbda000 - 0x158cbddfff 0x158cbde000 - 0x158cbdefff 0x158cbdf000 - 0x158cbe0fff 0x158cbe1000 - 0x158cbe1fff 0x158cbe2000 - 0x158cbe2fff 0x158cbe3000 - 0x158cbe3fff 0x158cbe4000 - 0x158cbe7fff 0x158cbe8000 - 0x158cbe8fff 0x158cbe9000 - 0x158cbe9fff 0x158cbea000 - 0x158cbebfff 0x158cbec000 - 0x158cbecfff 0x158cbed000 - 0x158cbedfff 0x158cbee000 - 0x158cd59fff 0x158cd5a000 - 0x158cd5cfff 0x158cd5d000 - 0x158cd5dfff 0x158cd5e000 - 0x158cd60fff 0x158cd61000 - 0x158cd73fff 0x158cd74000 - 0x158cd74fff 0x158cd75000 - 0x158cd75fff 0x158cd76000 - 0x158ce93fff 0x158ce94000 - 0x158ce96fff 0x158ce97000 - 0x158ce99fff 0x158ce9a000 - 0x158ce9efff 0x158ce9f000 - 0x158cef3fff 0x158cef4000 - 0x158d59efff 0x3fff918000 - 0x3fff938fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/functions.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/functions.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/trace.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xcd24000 - 0xcd44fff 0x80000000 - 0x800bffff 0x156bd87000 - 0x156bda1fff 0x156bda2000 - 0x156bda2fff 0x156bda3000 - 0x156bda3fff 0x156bda4000 - 0x156bda5fff 0x156bda6000 - 0x156bda7fff 0x156bda8000 - 0x156bdaefff 0x156bdaf000 - 0x156bdaffff 0x156bdb0000 - 0x156bdb0fff 0x156bdb2000 - 0x156bdb3fff 0x156bdb4000 - 0x156bdf2fff 0x156bdf3000 - 0x156bdf4fff 0x156bdf5000 - 0x156bdfbfff 0x156bdfc000 - 0x156bdfcfff 0x156bdfd000 - 0x156be22fff 0x156be23000 - 0x156be26fff 0x156be27000 - 0x156be27fff 0x156be28000 - 0x156be29fff 0x156be2a000 - 0x156be2afff 0x156be2b000 - 0x156be2bfff 0x156be2c000 - 0x156be2cfff 0x156be2d000 - 0x156be30fff 0x156be31000 - 0x156be31fff 0x156be32000 - 0x156be32fff 0x156be33000 - 0x156be34fff 0x156be35000 - 0x156be35fff 0x156be36000 - 0x156be36fff 0x156be37000 - 0x156bfa2fff 0x156bfa3000 - 0x156bfa5fff 0x156bfa6000 - 0x156bfa6fff 0x156bfa7000 - 0x156bfa9fff 0x156bfaa000 - 0x156bfbcfff 0x156bfbd000 - 0x156bfbdfff 0x156bfbe000 - 0x156bfbefff 0x156bfbf000 - 0x156c0dcfff 0x156c0dd000 - 0x156c0dffff 0x156c0e0000 - 0x156c0e2fff 0x156c0e3000 - 0x156c0e7fff 0x156c0e8000 - 0x156c13cfff 0x156c13d000 - 0x156c7e7fff 0x3fffdbd000 - 0x3fffdddfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/trace.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/trace.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/cmacros.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2334f000 - 0x2336ffff 0x80000000 - 0x800bffff 0x157ee33000 - 0x157ee4dfff 0x157ee4e000 - 0x157ee4efff 0x157ee4f000 - 0x157ee4ffff 0x157ee50000 - 0x157ee51fff 0x157ee52000 - 0x157ee53fff 0x157ee54000 - 0x157ee5afff 0x157ee5b000 - 0x157ee5bfff 0x157ee5c000 - 0x157ee5cfff 0x157ee5e000 - 0x157ee5ffff 0x157ee60000 - 0x157ee9efff 0x157ee9f000 - 0x157eea0fff 0x157eea1000 - 0x157eea7fff 0x157eea8000 - 0x157eea8fff 0x157eea9000 - 0x157eecefff 0x157eecf000 - 0x157eed2fff 0x157eed3000 - 0x157eed3fff 0x157eed4000 - 0x157eed5fff 0x157eed6000 - 0x157eed6fff 0x157eed7000 - 0x157eed7fff 0x157eed8000 - 0x157eed8fff 0x157eed9000 - 0x157eedcfff 0x157eedd000 - 0x157eeddfff 0x157eede000 - 0x157eedefff 0x157eedf000 - 0x157eee0fff 0x157eee1000 - 0x157eee1fff 0x157eee2000 - 0x157eee2fff 0x157eee3000 - 0x157f04efff 0x157f04f000 - 0x157f051fff 0x157f052000 - 0x157f052fff 0x157f053000 - 0x157f055fff 0x157f056000 - 0x157f068fff 0x157f069000 - 0x157f069fff 0x157f06a000 - 0x157f06afff 0x157f06b000 - 0x157f188fff 0x157f189000 - 0x157f18bfff 0x157f18c000 - 0x157f18efff 0x157f18f000 - 0x157f193fff 0x157f194000 - 0x157f1e8fff 0x157f1e9000 - 0x157f893fff 0x3fffce0000 - 0x3fffd00fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/cmacros.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/cmacros.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/compiler.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x8a56000 - 0x8a76fff 0x80000000 - 0x800bffff 0x15604e5000 - 0x15604fffff 0x1560500000 - 0x1560500fff 0x1560501000 - 0x1560501fff 0x1560502000 - 0x1560503fff 0x1560504000 - 0x1560505fff 0x1560506000 - 0x156050cfff 0x156050d000 - 0x156050dfff 0x156050e000 - 0x156050efff 0x1560510000 - 0x1560511fff 0x1560512000 - 0x1560550fff 0x1560551000 - 0x1560552fff 0x1560553000 - 0x1560559fff 0x156055a000 - 0x156055afff 0x156055b000 - 0x1560580fff 0x1560581000 - 0x1560584fff 0x1560585000 - 0x1560585fff 0x1560586000 - 0x1560587fff 0x1560588000 - 0x1560588fff 0x1560589000 - 0x1560589fff 0x156058a000 - 0x156058afff 0x156058b000 - 0x156058efff 0x156058f000 - 0x156058ffff 0x1560590000 - 0x1560590fff 0x1560591000 - 0x1560592fff 0x1560593000 - 0x1560593fff 0x1560594000 - 0x1560594fff 0x1560595000 - 0x1560700fff 0x1560701000 - 0x1560703fff 0x1560704000 - 0x1560704fff 0x1560705000 - 0x1560707fff 0x1560708000 - 0x156071afff 0x156071b000 - 0x156071bfff 0x156071c000 - 0x156071cfff 0x156071d000 - 0x156083afff 0x156083b000 - 0x156083dfff 0x156083e000 - 0x1560840fff 0x1560841000 - 0x1560845fff 0x1560846000 - 0x156089afff 0x156089b000 - 0x1560f45fff 0x3fffe71000 - 0x3fffe91fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/compiler.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/compiler.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/defs2.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x15421000 - 0x15441fff 0x80000000 - 0x800bffff 0x1591d3b000 - 0x1591d55fff 0x1591d56000 - 0x1591d56fff 0x1591d57000 - 0x1591d57fff 0x1591d58000 - 0x1591d59fff 0x1591d5a000 - 0x1591d5bfff 0x1591d5c000 - 0x1591d62fff 0x1591d63000 - 0x1591d63fff 0x1591d64000 - 0x1591d64fff 0x1591d66000 - 0x1591d67fff 0x1591d68000 - 0x1591da6fff 0x1591da7000 - 0x1591da8fff 0x1591da9000 - 0x1591daffff 0x1591db0000 - 0x1591db0fff 0x1591db1000 - 0x1591dd6fff 0x1591dd7000 - 0x1591ddafff 0x1591ddb000 - 0x1591ddbfff 0x1591ddc000 - 0x1591dddfff 0x1591dde000 - 0x1591ddefff 0x1591ddf000 - 0x1591ddffff 0x1591de0000 - 0x1591de0fff 0x1591de1000 - 0x1591de4fff 0x1591de5000 - 0x1591de5fff 0x1591de6000 - 0x1591de6fff 0x1591de7000 - 0x1591de8fff 0x1591de9000 - 0x1591de9fff 0x1591dea000 - 0x1591deafff 0x1591deb000 - 0x1591f56fff 0x1591f57000 - 0x1591f59fff 0x1591f5a000 - 0x1591f5afff 0x1591f5b000 - 0x1591f5dfff 0x1591f5e000 - 0x1591f70fff 0x1591f71000 - 0x1591f71fff 0x1591f72000 - 0x1591f72fff 0x1591f73000 - 0x1592090fff 0x1592091000 - 0x1592093fff 0x1592094000 - 0x1592096fff 0x1592097000 - 0x159209bfff 0x159209c000 - 0x15920f0fff 0x15920f1000 - 0x159279bfff 0x3fffa98000 - 0x3fffab8fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/defs2.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/defs2.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/loop.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3d73f000 - 0x3d75ffff 0x80000000 - 0x800bffff 0x157fc50000 - 0x157fc6afff 0x157fc6b000 - 0x157fc6bfff 0x157fc6c000 - 0x157fc6cfff 0x157fc6d000 - 0x157fc6efff 0x157fc6f000 - 0x157fc70fff 0x157fc71000 - 0x157fc77fff 0x157fc78000 - 0x157fc78fff 0x157fc79000 - 0x157fc79fff 0x157fc7b000 - 0x157fc7cfff 0x157fc7d000 - 0x157fcbbfff 0x157fcbc000 - 0x157fcbdfff 0x157fcbe000 - 0x157fcc4fff 0x157fcc5000 - 0x157fcc5fff 0x157fcc6000 - 0x157fcebfff 0x157fcec000 - 0x157fceffff 0x157fcf0000 - 0x157fcf0fff 0x157fcf1000 - 0x157fcf2fff 0x157fcf3000 - 0x157fcf3fff 0x157fcf4000 - 0x157fcf4fff 0x157fcf5000 - 0x157fcf5fff 0x157fcf6000 - 0x157fcf9fff 0x157fcfa000 - 0x157fcfafff 0x157fcfb000 - 0x157fcfbfff 0x157fcfc000 - 0x157fcfdfff 0x157fcfe000 - 0x157fcfefff 0x157fcff000 - 0x157fcfffff 0x157fd00000 - 0x157fe6bfff 0x157fe6c000 - 0x157fe6efff 0x157fe6f000 - 0x157fe6ffff 0x157fe70000 - 0x157fe72fff 0x157fe73000 - 0x157fe85fff 0x157fe86000 - 0x157fe86fff 0x157fe87000 - 0x157fe87fff 0x157fe88000 - 0x157ffa5fff 0x157ffa6000 - 0x157ffa8fff 0x157ffa9000 - 0x157ffabfff 0x157ffac000 - 0x157ffb0fff 0x157ffb1000 - 0x1580005fff 0x1580006000 - 0x15806b0fff 0x3fffd57000 - 0x3fffd77fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/loop.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/loop.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3d4c5000 - 0x3d4e5fff 0x80000000 - 0x800bffff 0x157cd56000 - 0x157cd70fff 0x157cd71000 - 0x157cd71fff 0x157cd72000 - 0x157cd72fff 0x157cd73000 - 0x157cd74fff 0x157cd75000 - 0x157cd76fff 0x157cd77000 - 0x157cd7dfff 0x157cd7e000 - 0x157cd7efff 0x157cd7f000 - 0x157cd7ffff 0x157cd81000 - 0x157cd82fff 0x157cd83000 - 0x157cdc1fff 0x157cdc2000 - 0x157cdc3fff 0x157cdc4000 - 0x157cdcafff 0x157cdcb000 - 0x157cdcbfff 0x157cdcc000 - 0x157cdf1fff 0x157cdf2000 - 0x157cdf5fff 0x157cdf6000 - 0x157cdf6fff 0x157cdf7000 - 0x157cdf8fff 0x157cdf9000 - 0x157cdf9fff 0x157cdfa000 - 0x157cdfafff 0x157cdfb000 - 0x157cdfbfff 0x157cdfc000 - 0x157cdfffff 0x157ce00000 - 0x157ce00fff 0x157ce01000 - 0x157ce01fff 0x157ce02000 - 0x157ce03fff 0x157ce04000 - 0x157ce04fff 0x157ce05000 - 0x157ce05fff 0x157ce06000 - 0x157cf71fff 0x157cf72000 - 0x157cf74fff 0x157cf75000 - 0x157cf75fff 0x157cf76000 - 0x157cf78fff 0x157cf79000 - 0x157cf8bfff 0x157cf8c000 - 0x157cf8cfff 0x157cf8d000 - 0x157cf8dfff 0x157cf8e000 - 0x157d0abfff 0x157d0ac000 - 0x157d0aefff 0x157d0af000 - 0x157d0b1fff 0x157d0b2000 - 0x157d0b6fff 0x157d0b7000 - 0x157d10bfff 0x157d10c000 - 0x157d7b6fff 0x3fffac1000 - 0x3fffae1fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-stablehash2.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x13e52000 - 0x13e72fff 0x80000000 - 0x800bffff 0x158d284000 - 0x158d29efff 0x158d29f000 - 0x158d29ffff 0x158d2a0000 - 0x158d2a0fff 0x158d2a1000 - 0x158d2a2fff 0x158d2a3000 - 0x158d2a4fff 0x158d2a5000 - 0x158d2abfff 0x158d2ac000 - 0x158d2acfff 0x158d2ad000 - 0x158d2adfff 0x158d2af000 - 0x158d2b0fff 0x158d2b1000 - 0x158d2effff 0x158d2f0000 - 0x158d2f1fff 0x158d2f2000 - 0x158d2f8fff 0x158d2f9000 - 0x158d2f9fff 0x158d2fa000 - 0x158d31ffff 0x158d320000 - 0x158d323fff 0x158d324000 - 0x158d324fff 0x158d325000 - 0x158d326fff 0x158d327000 - 0x158d327fff 0x158d328000 - 0x158d328fff 0x158d329000 - 0x158d329fff 0x158d32a000 - 0x158d32dfff 0x158d32e000 - 0x158d32efff 0x158d32f000 - 0x158d32ffff 0x158d330000 - 0x158d331fff 0x158d332000 - 0x158d332fff 0x158d333000 - 0x158d333fff 0x158d334000 - 0x158d49ffff 0x158d4a0000 - 0x158d4a2fff 0x158d4a3000 - 0x158d4a3fff 0x158d4a4000 - 0x158d4a6fff 0x158d4a7000 - 0x158d4b9fff 0x158d4ba000 - 0x158d4bafff 0x158d4bb000 - 0x158d4bbfff 0x158d4bc000 - 0x158d5d9fff 0x158d5da000 - 0x158d5dcfff 0x158d5dd000 - 0x158d5dffff 0x158d5e0000 - 0x158d5e4fff 0x158d5e5000 - 0x158d639fff 0x158d63a000 - 0x158dce4fff 0x3fffd16000 - 0x3fffd36fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-stablehash2.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-stablehash2.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-specializer2.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3d1e1000 - 0x3d201fff 0x80000000 - 0x800bffff 0x155f8de000 - 0x155f8f8fff 0x155f8f9000 - 0x155f8f9fff 0x155f8fa000 - 0x155f8fafff 0x155f8fb000 - 0x155f8fcfff 0x155f8fd000 - 0x155f8fefff 0x155f8ff000 - 0x155f905fff 0x155f906000 - 0x155f906fff 0x155f907000 - 0x155f907fff 0x155f909000 - 0x155f90afff 0x155f90b000 - 0x155f949fff 0x155f94a000 - 0x155f94bfff 0x155f94c000 - 0x155f952fff 0x155f953000 - 0x155f953fff 0x155f954000 - 0x155f979fff 0x155f97a000 - 0x155f97dfff 0x155f97e000 - 0x155f97efff 0x155f97f000 - 0x155f980fff 0x155f981000 - 0x155f981fff 0x155f982000 - 0x155f982fff 0x155f983000 - 0x155f983fff 0x155f984000 - 0x155f987fff 0x155f988000 - 0x155f988fff 0x155f989000 - 0x155f989fff 0x155f98a000 - 0x155f98bfff 0x155f98c000 - 0x155f98cfff 0x155f98d000 - 0x155f98dfff 0x155f98e000 - 0x155faf9fff 0x155fafa000 - 0x155fafcfff 0x155fafd000 - 0x155fafdfff 0x155fafe000 - 0x155fb00fff 0x155fb01000 - 0x155fb13fff 0x155fb14000 - 0x155fb14fff 0x155fb15000 - 0x155fb15fff 0x155fb16000 - 0x155fc33fff 0x155fc34000 - 0x155fc36fff 0x155fc37000 - 0x155fc39fff 0x155fc3a000 - 0x155fc3efff 0x155fc3f000 - 0x155fc93fff 0x155fc94000 - 0x156033efff 0x3fffc82000 - 0x3fffca2fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-specializer2.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-specializer2.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-specializer3.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3578000 - 0x3598fff 0x80000000 - 0x800bffff 0x157b8e2000 - 0x157b8fcfff 0x157b8fd000 - 0x157b8fdfff 0x157b8fe000 - 0x157b8fefff 0x157b8ff000 - 0x157b900fff 0x157b901000 - 0x157b902fff 0x157b903000 - 0x157b909fff 0x157b90a000 - 0x157b90afff 0x157b90b000 - 0x157b90bfff 0x157b90d000 - 0x157b90efff 0x157b90f000 - 0x157b94dfff 0x157b94e000 - 0x157b94ffff 0x157b950000 - 0x157b956fff 0x157b957000 - 0x157b957fff 0x157b958000 - 0x157b97dfff 0x157b97e000 - 0x157b981fff 0x157b982000 - 0x157b982fff 0x157b983000 - 0x157b984fff 0x157b985000 - 0x157b985fff 0x157b986000 - 0x157b986fff 0x157b987000 - 0x157b987fff 0x157b988000 - 0x157b98bfff 0x157b98c000 - 0x157b98cfff 0x157b98d000 - 0x157b98dfff 0x157b98e000 - 0x157b98ffff 0x157b990000 - 0x157b990fff 0x157b991000 - 0x157b991fff 0x157b992000 - 0x157bafdfff 0x157bafe000 - 0x157bb00fff 0x157bb01000 - 0x157bb01fff 0x157bb02000 - 0x157bb04fff 0x157bb05000 - 0x157bb17fff 0x157bb18000 - 0x157bb18fff 0x157bb19000 - 0x157bb19fff 0x157bb1a000 - 0x157bc37fff 0x157bc38000 - 0x157bc3afff 0x157bc3b000 - 0x157bc3dfff 0x157bc3e000 - 0x157bc42fff 0x157bc43000 - 0x157bc97fff 0x157bc98000 - 0x157c342fff 0x3fffc0e000 - 0x3fffc2efff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-specializer3.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-specializer3.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-class4.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xaa82000 - 0xaaa2fff 0x80000000 - 0x800bffff 0x1591b24000 - 0x1591b3efff 0x1591b3f000 - 0x1591b3ffff 0x1591b40000 - 0x1591b40fff 0x1591b41000 - 0x1591b42fff 0x1591b43000 - 0x1591b44fff 0x1591b45000 - 0x1591b4bfff 0x1591b4c000 - 0x1591b4cfff 0x1591b4d000 - 0x1591b4dfff 0x1591b4f000 - 0x1591b50fff 0x1591b51000 - 0x1591b8ffff 0x1591b90000 - 0x1591b91fff 0x1591b92000 - 0x1591b98fff 0x1591b99000 - 0x1591b99fff 0x1591b9a000 - 0x1591bbffff 0x1591bc0000 - 0x1591bc3fff 0x1591bc4000 - 0x1591bc4fff 0x1591bc5000 - 0x1591bc6fff 0x1591bc7000 - 0x1591bc7fff 0x1591bc8000 - 0x1591bc8fff 0x1591bc9000 - 0x1591bc9fff 0x1591bca000 - 0x1591bcdfff 0x1591bce000 - 0x1591bcefff 0x1591bcf000 - 0x1591bcffff 0x1591bd0000 - 0x1591bd1fff 0x1591bd2000 - 0x1591bd2fff 0x1591bd3000 - 0x1591bd3fff 0x1591bd4000 - 0x1591d3ffff 0x1591d40000 - 0x1591d42fff 0x1591d43000 - 0x1591d43fff 0x1591d44000 - 0x1591d46fff 0x1591d47000 - 0x1591d59fff 0x1591d5a000 - 0x1591d5afff 0x1591d5b000 - 0x1591d5bfff 0x1591d5c000 - 0x1591e79fff 0x1591e7a000 - 0x1591e7cfff 0x1591e7d000 - 0x1591e7ffff 0x1591e80000 - 0x1591e84fff 0x1591e85000 - 0x1591ed9fff 0x1591eda000 - 0x1592584fff 0x3fffee6000 - 0x3ffff06fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class4.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-class4.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-class5.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xa115000 - 0xa135fff 0x80000000 - 0x800bffff 0x15615bb000 - 0x15615d5fff 0x15615d6000 - 0x15615d6fff 0x15615d7000 - 0x15615d7fff 0x15615d8000 - 0x15615d9fff 0x15615da000 - 0x15615dbfff 0x15615dc000 - 0x15615e2fff 0x15615e3000 - 0x15615e3fff 0x15615e4000 - 0x15615e4fff 0x15615e6000 - 0x15615e7fff 0x15615e8000 - 0x1561626fff 0x1561627000 - 0x1561628fff 0x1561629000 - 0x156162ffff 0x1561630000 - 0x1561630fff 0x1561631000 - 0x1561656fff 0x1561657000 - 0x156165afff 0x156165b000 - 0x156165bfff 0x156165c000 - 0x156165dfff 0x156165e000 - 0x156165efff 0x156165f000 - 0x156165ffff 0x1561660000 - 0x1561660fff 0x1561661000 - 0x1561664fff 0x1561665000 - 0x1561665fff 0x1561666000 - 0x1561666fff 0x1561667000 - 0x1561668fff 0x1561669000 - 0x1561669fff 0x156166a000 - 0x156166afff 0x156166b000 - 0x15617d6fff 0x15617d7000 - 0x15617d9fff 0x15617da000 - 0x15617dafff 0x15617db000 - 0x15617ddfff 0x15617de000 - 0x15617f0fff 0x15617f1000 - 0x15617f1fff 0x15617f2000 - 0x15617f2fff 0x15617f3000 - 0x1561910fff 0x1561911000 - 0x1561913fff 0x1561914000 - 0x1561916fff 0x1561917000 - 0x156191bfff 0x156191c000 - 0x1561970fff 0x1561971000 - 0x156201bfff 0x3fffe6d000 - 0x3fffe8dfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class5.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-class5.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-class6.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1731b000 - 0x1733bfff 0x80000000 - 0x800bffff 0x15762c9000 - 0x15762e3fff 0x15762e4000 - 0x15762e4fff 0x15762e5000 - 0x15762e5fff 0x15762e6000 - 0x15762e7fff 0x15762e8000 - 0x15762e9fff 0x15762ea000 - 0x15762f0fff 0x15762f1000 - 0x15762f1fff 0x15762f2000 - 0x15762f2fff 0x15762f4000 - 0x15762f5fff 0x15762f6000 - 0x1576334fff 0x1576335000 - 0x1576336fff 0x1576337000 - 0x157633dfff 0x157633e000 - 0x157633efff 0x157633f000 - 0x1576364fff 0x1576365000 - 0x1576368fff 0x1576369000 - 0x1576369fff 0x157636a000 - 0x157636bfff 0x157636c000 - 0x157636cfff 0x157636d000 - 0x157636dfff 0x157636e000 - 0x157636efff 0x157636f000 - 0x1576372fff 0x1576373000 - 0x1576373fff 0x1576374000 - 0x1576374fff 0x1576375000 - 0x1576376fff 0x1576377000 - 0x1576377fff 0x1576378000 - 0x1576378fff 0x1576379000 - 0x15764e4fff 0x15764e5000 - 0x15764e7fff 0x15764e8000 - 0x15764e8fff 0x15764e9000 - 0x15764ebfff 0x15764ec000 - 0x15764fefff 0x15764ff000 - 0x15764fffff 0x1576500000 - 0x1576500fff 0x1576501000 - 0x157661efff 0x157661f000 - 0x1576621fff 0x1576622000 - 0x1576624fff 0x1576625000 - 0x1576629fff 0x157662a000 - 0x157667efff 0x157667f000 - 0x1576d29fff 0x3fffb5f000 - 0x3fffb7ffff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-class6.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-class6.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-slotdef2.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1101a000 - 0x1103afff 0x80000000 - 0x800bffff 0x158bdf6000 - 0x158be10fff 0x158be11000 - 0x158be11fff 0x158be12000 - 0x158be12fff 0x158be13000 - 0x158be14fff 0x158be15000 - 0x158be16fff 0x158be17000 - 0x158be1dfff 0x158be1e000 - 0x158be1efff 0x158be1f000 - 0x158be1ffff 0x158be21000 - 0x158be22fff 0x158be23000 - 0x158be61fff 0x158be62000 - 0x158be63fff 0x158be64000 - 0x158be6afff 0x158be6b000 - 0x158be6bfff 0x158be6c000 - 0x158be91fff 0x158be92000 - 0x158be95fff 0x158be96000 - 0x158be96fff 0x158be97000 - 0x158be98fff 0x158be99000 - 0x158be99fff 0x158be9a000 - 0x158be9afff 0x158be9b000 - 0x158be9bfff 0x158be9c000 - 0x158be9ffff 0x158bea0000 - 0x158bea0fff 0x158bea1000 - 0x158bea1fff 0x158bea2000 - 0x158bea3fff 0x158bea4000 - 0x158bea4fff 0x158bea5000 - 0x158bea5fff 0x158bea6000 - 0x158c011fff 0x158c012000 - 0x158c014fff 0x158c015000 - 0x158c015fff 0x158c016000 - 0x158c018fff 0x158c019000 - 0x158c02bfff 0x158c02c000 - 0x158c02cfff 0x158c02d000 - 0x158c02dfff 0x158c02e000 - 0x158c14bfff 0x158c14c000 - 0x158c14efff 0x158c14f000 - 0x158c151fff 0x158c152000 - 0x158c156fff 0x158c157000 - 0x158c1abfff 0x158c1ac000 - 0x158c856fff 0x3fffeb5000 - 0x3fffed5fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slotdef2.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-slotdef2.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-slotdef3.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2d961000 - 0x2d981fff 0x80000000 - 0x800bffff 0x1579acb000 - 0x1579ae5fff 0x1579ae6000 - 0x1579ae6fff 0x1579ae7000 - 0x1579ae7fff 0x1579ae8000 - 0x1579ae9fff 0x1579aea000 - 0x1579aebfff 0x1579aec000 - 0x1579af2fff 0x1579af3000 - 0x1579af3fff 0x1579af4000 - 0x1579af4fff 0x1579af6000 - 0x1579af7fff 0x1579af8000 - 0x1579b36fff 0x1579b37000 - 0x1579b38fff 0x1579b39000 - 0x1579b3ffff 0x1579b40000 - 0x1579b40fff 0x1579b41000 - 0x1579b66fff 0x1579b67000 - 0x1579b6afff 0x1579b6b000 - 0x1579b6bfff 0x1579b6c000 - 0x1579b6dfff 0x1579b6e000 - 0x1579b6efff 0x1579b6f000 - 0x1579b6ffff 0x1579b70000 - 0x1579b70fff 0x1579b71000 - 0x1579b74fff 0x1579b75000 - 0x1579b75fff 0x1579b76000 - 0x1579b76fff 0x1579b77000 - 0x1579b78fff 0x1579b79000 - 0x1579b79fff 0x1579b7a000 - 0x1579b7afff 0x1579b7b000 - 0x1579ce6fff 0x1579ce7000 - 0x1579ce9fff 0x1579cea000 - 0x1579ceafff 0x1579ceb000 - 0x1579cedfff 0x1579cee000 - 0x1579d00fff 0x1579d01000 - 0x1579d01fff 0x1579d02000 - 0x1579d02fff 0x1579d03000 - 0x1579e20fff 0x1579e21000 - 0x1579e23fff 0x1579e24000 - 0x1579e26fff 0x1579e27000 - 0x1579e2bfff 0x1579e2c000 - 0x1579e80fff 0x1579e81000 - 0x157a52bfff 0x3fff87a000 - 0x3fff89afff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slotdef3.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-slotdef3.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-slots1.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x398f9000 - 0x39919fff 0x80000000 - 0x800bffff 0x1571d3b000 - 0x1571d55fff 0x1571d56000 - 0x1571d56fff 0x1571d57000 - 0x1571d57fff 0x1571d58000 - 0x1571d59fff 0x1571d5a000 - 0x1571d5bfff 0x1571d5c000 - 0x1571d62fff 0x1571d63000 - 0x1571d63fff 0x1571d64000 - 0x1571d64fff 0x1571d66000 - 0x1571d67fff 0x1571d68000 - 0x1571da6fff 0x1571da7000 - 0x1571da8fff 0x1571da9000 - 0x1571daffff 0x1571db0000 - 0x1571db0fff 0x1571db1000 - 0x1571dd6fff 0x1571dd7000 - 0x1571ddafff 0x1571ddb000 - 0x1571ddbfff 0x1571ddc000 - 0x1571dddfff 0x1571dde000 - 0x1571ddefff 0x1571ddf000 - 0x1571ddffff 0x1571de0000 - 0x1571de0fff 0x1571de1000 - 0x1571de4fff 0x1571de5000 - 0x1571de5fff 0x1571de6000 - 0x1571de6fff 0x1571de7000 - 0x1571de8fff 0x1571de9000 - 0x1571de9fff 0x1571dea000 - 0x1571deafff 0x1571deb000 - 0x1571f56fff 0x1571f57000 - 0x1571f59fff 0x1571f5a000 - 0x1571f5afff 0x1571f5b000 - 0x1571f5dfff 0x1571f5e000 - 0x1571f70fff 0x1571f71000 - 0x1571f71fff 0x1571f72000 - 0x1571f72fff 0x1571f73000 - 0x1572090fff 0x1572091000 - 0x1572093fff 0x1572094000 - 0x1572096fff 0x1572097000 - 0x157209bfff 0x157209c000 - 0x15720f0fff 0x15720f1000 - 0x157279bfff 0x3fffb83000 - 0x3fffba3fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slots1.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-slots1.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-slots2.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2cf16000 - 0x2cf36fff 0x80000000 - 0x800bffff 0x156d185000 - 0x156d19ffff 0x156d1a0000 - 0x156d1a0fff 0x156d1a1000 - 0x156d1a1fff 0x156d1a2000 - 0x156d1a3fff 0x156d1a4000 - 0x156d1a5fff 0x156d1a6000 - 0x156d1acfff 0x156d1ad000 - 0x156d1adfff 0x156d1ae000 - 0x156d1aefff 0x156d1b0000 - 0x156d1b1fff 0x156d1b2000 - 0x156d1f0fff 0x156d1f1000 - 0x156d1f2fff 0x156d1f3000 - 0x156d1f9fff 0x156d1fa000 - 0x156d1fafff 0x156d1fb000 - 0x156d220fff 0x156d221000 - 0x156d224fff 0x156d225000 - 0x156d225fff 0x156d226000 - 0x156d227fff 0x156d228000 - 0x156d228fff 0x156d229000 - 0x156d229fff 0x156d22a000 - 0x156d22afff 0x156d22b000 - 0x156d22efff 0x156d22f000 - 0x156d22ffff 0x156d230000 - 0x156d230fff 0x156d231000 - 0x156d232fff 0x156d233000 - 0x156d233fff 0x156d234000 - 0x156d234fff 0x156d235000 - 0x156d3a0fff 0x156d3a1000 - 0x156d3a3fff 0x156d3a4000 - 0x156d3a4fff 0x156d3a5000 - 0x156d3a7fff 0x156d3a8000 - 0x156d3bafff 0x156d3bb000 - 0x156d3bbfff 0x156d3bc000 - 0x156d3bcfff 0x156d3bd000 - 0x156d4dafff 0x156d4db000 - 0x156d4ddfff 0x156d4de000 - 0x156d4e0fff 0x156d4e1000 - 0x156d4e5fff 0x156d4e6000 - 0x156d53afff 0x156d53b000 - 0x156dbe5fff 0x3fffd0e000 - 0x3fffd2efff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-slots2.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-slots2.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-method1.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1d7b1000 - 0x1d7d1fff 0x80000000 - 0x800bffff 0x156829c000 - 0x15682b6fff 0x15682b7000 - 0x15682b7fff 0x15682b8000 - 0x15682b8fff 0x15682b9000 - 0x15682bafff 0x15682bb000 - 0x15682bcfff 0x15682bd000 - 0x15682c3fff 0x15682c4000 - 0x15682c4fff 0x15682c5000 - 0x15682c5fff 0x15682c7000 - 0x15682c8fff 0x15682c9000 - 0x1568307fff 0x1568308000 - 0x1568309fff 0x156830a000 - 0x1568310fff 0x1568311000 - 0x1568311fff 0x1568312000 - 0x1568337fff 0x1568338000 - 0x156833bfff 0x156833c000 - 0x156833cfff 0x156833d000 - 0x156833efff 0x156833f000 - 0x156833ffff 0x1568340000 - 0x1568340fff 0x1568341000 - 0x1568341fff 0x1568342000 - 0x1568345fff 0x1568346000 - 0x1568346fff 0x1568347000 - 0x1568347fff 0x1568348000 - 0x1568349fff 0x156834a000 - 0x156834afff 0x156834b000 - 0x156834bfff 0x156834c000 - 0x15684b7fff 0x15684b8000 - 0x15684bafff 0x15684bb000 - 0x15684bbfff 0x15684bc000 - 0x15684befff 0x15684bf000 - 0x15684d1fff 0x15684d2000 - 0x15684d2fff 0x15684d3000 - 0x15684d3fff 0x15684d4000 - 0x15685f1fff 0x15685f2000 - 0x15685f4fff 0x15685f5000 - 0x15685f7fff 0x15685f8000 - 0x15685fcfff 0x15685fd000 - 0x1568651fff 0x1568652000 - 0x1568cfcfff 0x3fffc8e000 - 0x3fffcaefff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method1.lisp ... WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-method1.fas 0 errors, 5 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-method2.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x25d5d000 - 0x25d7dfff 0x80000000 - 0x800bffff 0x1587a08000 - 0x1587a22fff 0x1587a23000 - 0x1587a23fff 0x1587a24000 - 0x1587a24fff 0x1587a25000 - 0x1587a26fff 0x1587a27000 - 0x1587a28fff 0x1587a29000 - 0x1587a2ffff 0x1587a30000 - 0x1587a30fff 0x1587a31000 - 0x1587a31fff 0x1587a33000 - 0x1587a34fff 0x1587a35000 - 0x1587a73fff 0x1587a74000 - 0x1587a75fff 0x1587a76000 - 0x1587a7cfff 0x1587a7d000 - 0x1587a7dfff 0x1587a7e000 - 0x1587aa3fff 0x1587aa4000 - 0x1587aa7fff 0x1587aa8000 - 0x1587aa8fff 0x1587aa9000 - 0x1587aaafff 0x1587aab000 - 0x1587aabfff 0x1587aac000 - 0x1587aacfff 0x1587aad000 - 0x1587aadfff 0x1587aae000 - 0x1587ab1fff 0x1587ab2000 - 0x1587ab2fff 0x1587ab3000 - 0x1587ab3fff 0x1587ab4000 - 0x1587ab5fff 0x1587ab6000 - 0x1587ab6fff 0x1587ab7000 - 0x1587ab7fff 0x1587ab8000 - 0x1587c23fff 0x1587c24000 - 0x1587c26fff 0x1587c27000 - 0x1587c27fff 0x1587c28000 - 0x1587c2afff 0x1587c2b000 - 0x1587c3dfff 0x1587c3e000 - 0x1587c3efff 0x1587c3f000 - 0x1587c3ffff 0x1587c40000 - 0x1587d5dfff 0x1587d5e000 - 0x1587d60fff 0x1587d61000 - 0x1587d63fff 0x1587d64000 - 0x1587d68fff 0x1587d69000 - 0x1587dbdfff 0x1587dbe000 - 0x1588468fff 0x3fffcff000 - 0x3fffd1ffff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method2.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-method2.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-method3.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x35dcb000 - 0x35debfff 0x80000000 - 0x800bffff 0x1587e13000 - 0x1587e2dfff 0x1587e2e000 - 0x1587e2efff 0x1587e2f000 - 0x1587e2ffff 0x1587e30000 - 0x1587e31fff 0x1587e32000 - 0x1587e33fff 0x1587e34000 - 0x1587e3afff 0x1587e3b000 - 0x1587e3bfff 0x1587e3c000 - 0x1587e3cfff 0x1587e3e000 - 0x1587e3ffff 0x1587e40000 - 0x1587e7efff 0x1587e7f000 - 0x1587e80fff 0x1587e81000 - 0x1587e87fff 0x1587e88000 - 0x1587e88fff 0x1587e89000 - 0x1587eaefff 0x1587eaf000 - 0x1587eb2fff 0x1587eb3000 - 0x1587eb3fff 0x1587eb4000 - 0x1587eb5fff 0x1587eb6000 - 0x1587eb6fff 0x1587eb7000 - 0x1587eb7fff 0x1587eb8000 - 0x1587eb8fff 0x1587eb9000 - 0x1587ebcfff 0x1587ebd000 - 0x1587ebdfff 0x1587ebe000 - 0x1587ebefff 0x1587ebf000 - 0x1587ec0fff 0x1587ec1000 - 0x1587ec1fff 0x1587ec2000 - 0x1587ec2fff 0x1587ec3000 - 0x158802efff 0x158802f000 - 0x1588031fff 0x1588032000 - 0x1588032fff 0x1588033000 - 0x1588035fff 0x1588036000 - 0x1588048fff 0x1588049000 - 0x1588049fff 0x158804a000 - 0x158804afff 0x158804b000 - 0x1588168fff 0x1588169000 - 0x158816bfff 0x158816c000 - 0x158816efff 0x158816f000 - 0x1588173fff 0x1588174000 - 0x15881c8fff 0x15881c9000 - 0x1588873fff 0x3fff7ff000 - 0x3fff81ffff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method3.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-method3.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-method4.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1c0dd000 - 0x1c0fdfff 0x80000000 - 0x800bffff 0x1592ccb000 - 0x1592ce5fff 0x1592ce6000 - 0x1592ce6fff 0x1592ce7000 - 0x1592ce7fff 0x1592ce8000 - 0x1592ce9fff 0x1592cea000 - 0x1592cebfff 0x1592cec000 - 0x1592cf2fff 0x1592cf3000 - 0x1592cf3fff 0x1592cf4000 - 0x1592cf4fff 0x1592cf6000 - 0x1592cf7fff 0x1592cf8000 - 0x1592d36fff 0x1592d37000 - 0x1592d38fff 0x1592d39000 - 0x1592d3ffff 0x1592d40000 - 0x1592d40fff 0x1592d41000 - 0x1592d66fff 0x1592d67000 - 0x1592d6afff 0x1592d6b000 - 0x1592d6bfff 0x1592d6c000 - 0x1592d6dfff 0x1592d6e000 - 0x1592d6efff 0x1592d6f000 - 0x1592d6ffff 0x1592d70000 - 0x1592d70fff 0x1592d71000 - 0x1592d74fff 0x1592d75000 - 0x1592d75fff 0x1592d76000 - 0x1592d76fff 0x1592d77000 - 0x1592d78fff 0x1592d79000 - 0x1592d79fff 0x1592d7a000 - 0x1592d7afff 0x1592d7b000 - 0x1592ee6fff 0x1592ee7000 - 0x1592ee9fff 0x1592eea000 - 0x1592eeafff 0x1592eeb000 - 0x1592eedfff 0x1592eee000 - 0x1592f00fff 0x1592f01000 - 0x1592f01fff 0x1592f02000 - 0x1592f02fff 0x1592f03000 - 0x1593020fff 0x1593021000 - 0x1593023fff 0x1593024000 - 0x1593026fff 0x1593027000 - 0x159302bfff 0x159302c000 - 0x1593080fff 0x1593081000 - 0x159372bfff 0x3fff844000 - 0x3fff864fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-method4.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-method4.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-methcomb1.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xfc45000 - 0xfc65fff 0x80000000 - 0x800bffff 0x156ef70000 - 0x156ef8afff 0x156ef8b000 - 0x156ef8bfff 0x156ef8c000 - 0x156ef8cfff 0x156ef8d000 - 0x156ef8efff 0x156ef8f000 - 0x156ef90fff 0x156ef91000 - 0x156ef97fff 0x156ef98000 - 0x156ef98fff 0x156ef99000 - 0x156ef99fff 0x156ef9b000 - 0x156ef9cfff 0x156ef9d000 - 0x156efdbfff 0x156efdc000 - 0x156efddfff 0x156efde000 - 0x156efe4fff 0x156efe5000 - 0x156efe5fff 0x156efe6000 - 0x156f00bfff 0x156f00c000 - 0x156f00ffff 0x156f010000 - 0x156f010fff 0x156f011000 - 0x156f012fff 0x156f013000 - 0x156f013fff 0x156f014000 - 0x156f014fff 0x156f015000 - 0x156f015fff 0x156f016000 - 0x156f019fff 0x156f01a000 - 0x156f01afff 0x156f01b000 - 0x156f01bfff 0x156f01c000 - 0x156f01dfff 0x156f01e000 - 0x156f01efff 0x156f01f000 - 0x156f01ffff 0x156f020000 - 0x156f18bfff 0x156f18c000 - 0x156f18efff 0x156f18f000 - 0x156f18ffff 0x156f190000 - 0x156f192fff 0x156f193000 - 0x156f1a5fff 0x156f1a6000 - 0x156f1a6fff 0x156f1a7000 - 0x156f1a7fff 0x156f1a8000 - 0x156f2c5fff 0x156f2c6000 - 0x156f2c8fff 0x156f2c9000 - 0x156f2cbfff 0x156f2cc000 - 0x156f2d0fff 0x156f2d1000 - 0x156f325fff 0x156f326000 - 0x156f9d0fff 0x3fffbc2000 - 0x3fffbe2fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb1.lisp ... WARNING: Redefining metaobject class # has no effect. ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-methcomb1.fas 0 errors, 1 warning ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-methcomb2.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1f590000 - 0x1f5b0fff 0x80000000 - 0x800bffff 0x157c416000 - 0x157c430fff 0x157c431000 - 0x157c431fff 0x157c432000 - 0x157c432fff 0x157c433000 - 0x157c434fff 0x157c435000 - 0x157c436fff 0x157c437000 - 0x157c43dfff 0x157c43e000 - 0x157c43efff 0x157c43f000 - 0x157c43ffff 0x157c441000 - 0x157c442fff 0x157c443000 - 0x157c481fff 0x157c482000 - 0x157c483fff 0x157c484000 - 0x157c48afff 0x157c48b000 - 0x157c48bfff 0x157c48c000 - 0x157c4b1fff 0x157c4b2000 - 0x157c4b5fff 0x157c4b6000 - 0x157c4b6fff 0x157c4b7000 - 0x157c4b8fff 0x157c4b9000 - 0x157c4b9fff 0x157c4ba000 - 0x157c4bafff 0x157c4bb000 - 0x157c4bbfff 0x157c4bc000 - 0x157c4bffff 0x157c4c0000 - 0x157c4c0fff 0x157c4c1000 - 0x157c4c1fff 0x157c4c2000 - 0x157c4c3fff 0x157c4c4000 - 0x157c4c4fff 0x157c4c5000 - 0x157c4c5fff 0x157c4c6000 - 0x157c631fff 0x157c632000 - 0x157c634fff 0x157c635000 - 0x157c635fff 0x157c636000 - 0x157c638fff 0x157c639000 - 0x157c64bfff 0x157c64c000 - 0x157c64cfff 0x157c64d000 - 0x157c64dfff 0x157c64e000 - 0x157c76bfff 0x157c76c000 - 0x157c76efff 0x157c76f000 - 0x157c771fff 0x157c772000 - 0x157c776fff 0x157c777000 - 0x157c7cbfff 0x157c7cc000 - 0x157ce76fff 0x3fffd81000 - 0x3fffda1fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb2.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-methcomb2.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-methcomb3.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x91b9000 - 0x91d9fff 0x80000000 - 0x800bffff 0x1588eca000 - 0x1588ee4fff 0x1588ee5000 - 0x1588ee5fff 0x1588ee6000 - 0x1588ee6fff 0x1588ee7000 - 0x1588ee8fff 0x1588ee9000 - 0x1588eeafff 0x1588eeb000 - 0x1588ef1fff 0x1588ef2000 - 0x1588ef2fff 0x1588ef3000 - 0x1588ef3fff 0x1588ef5000 - 0x1588ef6fff 0x1588ef7000 - 0x1588f35fff 0x1588f36000 - 0x1588f37fff 0x1588f38000 - 0x1588f3efff 0x1588f3f000 - 0x1588f3ffff 0x1588f40000 - 0x1588f65fff 0x1588f66000 - 0x1588f69fff 0x1588f6a000 - 0x1588f6afff 0x1588f6b000 - 0x1588f6cfff 0x1588f6d000 - 0x1588f6dfff 0x1588f6e000 - 0x1588f6efff 0x1588f6f000 - 0x1588f6ffff 0x1588f70000 - 0x1588f73fff 0x1588f74000 - 0x1588f74fff 0x1588f75000 - 0x1588f75fff 0x1588f76000 - 0x1588f77fff 0x1588f78000 - 0x1588f78fff 0x1588f79000 - 0x1588f79fff 0x1588f7a000 - 0x15890e5fff 0x15890e6000 - 0x15890e8fff 0x15890e9000 - 0x15890e9fff 0x15890ea000 - 0x15890ecfff 0x15890ed000 - 0x15890fffff 0x1589100000 - 0x1589100fff 0x1589101000 - 0x1589101fff 0x1589102000 - 0x158921ffff 0x1589220000 - 0x1589222fff 0x1589223000 - 0x1589225fff 0x1589226000 - 0x158922afff 0x158922b000 - 0x158927ffff 0x1589280000 - 0x158992afff 0x3ffff36000 - 0x3ffff56fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb3.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-methcomb3.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-methcomb4.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x237b8000 - 0x237d8fff 0x80000000 - 0x800bffff 0x158ac7a000 - 0x158ac94fff 0x158ac95000 - 0x158ac95fff 0x158ac96000 - 0x158ac96fff 0x158ac97000 - 0x158ac98fff 0x158ac99000 - 0x158ac9afff 0x158ac9b000 - 0x158aca1fff 0x158aca2000 - 0x158aca2fff 0x158aca3000 - 0x158aca3fff 0x158aca5000 - 0x158aca6fff 0x158aca7000 - 0x158ace5fff 0x158ace6000 - 0x158ace7fff 0x158ace8000 - 0x158aceefff 0x158acef000 - 0x158aceffff 0x158acf0000 - 0x158ad15fff 0x158ad16000 - 0x158ad19fff 0x158ad1a000 - 0x158ad1afff 0x158ad1b000 - 0x158ad1cfff 0x158ad1d000 - 0x158ad1dfff 0x158ad1e000 - 0x158ad1efff 0x158ad1f000 - 0x158ad1ffff 0x158ad20000 - 0x158ad23fff 0x158ad24000 - 0x158ad24fff 0x158ad25000 - 0x158ad25fff 0x158ad26000 - 0x158ad27fff 0x158ad28000 - 0x158ad28fff 0x158ad29000 - 0x158ad29fff 0x158ad2a000 - 0x158ae95fff 0x158ae96000 - 0x158ae98fff 0x158ae99000 - 0x158ae99fff 0x158ae9a000 - 0x158ae9cfff 0x158ae9d000 - 0x158aeaffff 0x158aeb0000 - 0x158aeb0fff 0x158aeb1000 - 0x158aeb1fff 0x158aeb2000 - 0x158afcffff 0x158afd0000 - 0x158afd2fff 0x158afd3000 - 0x158afd5fff 0x158afd6000 - 0x158afdafff 0x158afdb000 - 0x158b02ffff 0x158b030000 - 0x158b6dafff 0x3fffd57000 - 0x3fffd77fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-methcomb4.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-methcomb4.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-genfun1.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x245f7000 - 0x24617fff 0x80000000 - 0x800bffff 0x158a85b000 - 0x158a875fff 0x158a876000 - 0x158a876fff 0x158a877000 - 0x158a877fff 0x158a878000 - 0x158a879fff 0x158a87a000 - 0x158a87bfff 0x158a87c000 - 0x158a882fff 0x158a883000 - 0x158a883fff 0x158a884000 - 0x158a884fff 0x158a886000 - 0x158a887fff 0x158a888000 - 0x158a8c6fff 0x158a8c7000 - 0x158a8c8fff 0x158a8c9000 - 0x158a8cffff 0x158a8d0000 - 0x158a8d0fff 0x158a8d1000 - 0x158a8f6fff 0x158a8f7000 - 0x158a8fafff 0x158a8fb000 - 0x158a8fbfff 0x158a8fc000 - 0x158a8fdfff 0x158a8fe000 - 0x158a8fefff 0x158a8ff000 - 0x158a8fffff 0x158a900000 - 0x158a900fff 0x158a901000 - 0x158a904fff 0x158a905000 - 0x158a905fff 0x158a906000 - 0x158a906fff 0x158a907000 - 0x158a908fff 0x158a909000 - 0x158a909fff 0x158a90a000 - 0x158a90afff 0x158a90b000 - 0x158aa76fff 0x158aa77000 - 0x158aa79fff 0x158aa7a000 - 0x158aa7afff 0x158aa7b000 - 0x158aa7dfff 0x158aa7e000 - 0x158aa90fff 0x158aa91000 - 0x158aa91fff 0x158aa92000 - 0x158aa92fff 0x158aa93000 - 0x158abb0fff 0x158abb1000 - 0x158abb3fff 0x158abb4000 - 0x158abb6fff 0x158abb7000 - 0x158abbbfff 0x158abbc000 - 0x158ac10fff 0x158ac11000 - 0x158b2bbfff 0x3fff888000 - 0x3fff8a8fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun1.lisp ... WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. WARNING: Redefining metaobject class # has no effect. ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-genfun1.fas 0 errors, 3 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-genfun2a.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3427000 - 0x3447fff 0x80000000 - 0x800bffff 0x1561e1c000 - 0x1561e36fff 0x1561e37000 - 0x1561e37fff 0x1561e38000 - 0x1561e38fff 0x1561e39000 - 0x1561e3afff 0x1561e3b000 - 0x1561e3cfff 0x1561e3d000 - 0x1561e43fff 0x1561e44000 - 0x1561e44fff 0x1561e45000 - 0x1561e45fff 0x1561e47000 - 0x1561e48fff 0x1561e49000 - 0x1561e87fff 0x1561e88000 - 0x1561e89fff 0x1561e8a000 - 0x1561e90fff 0x1561e91000 - 0x1561e91fff 0x1561e92000 - 0x1561eb7fff 0x1561eb8000 - 0x1561ebbfff 0x1561ebc000 - 0x1561ebcfff 0x1561ebd000 - 0x1561ebefff 0x1561ebf000 - 0x1561ebffff 0x1561ec0000 - 0x1561ec0fff 0x1561ec1000 - 0x1561ec1fff 0x1561ec2000 - 0x1561ec5fff 0x1561ec6000 - 0x1561ec6fff 0x1561ec7000 - 0x1561ec7fff 0x1561ec8000 - 0x1561ec9fff 0x1561eca000 - 0x1561ecafff 0x1561ecb000 - 0x1561ecbfff 0x1561ecc000 - 0x1562037fff 0x1562038000 - 0x156203afff 0x156203b000 - 0x156203bfff 0x156203c000 - 0x156203efff 0x156203f000 - 0x1562051fff 0x1562052000 - 0x1562052fff 0x1562053000 - 0x1562053fff 0x1562054000 - 0x1562171fff 0x1562172000 - 0x1562174fff 0x1562175000 - 0x1562177fff 0x1562178000 - 0x156217cfff 0x156217d000 - 0x15621d1fff 0x15621d2000 - 0x156287cfff 0x3fffc6c000 - 0x3fffc8cfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun2a.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-genfun2a.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-genfun2b.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2babd000 - 0x2baddfff 0x80000000 - 0x800bffff 0x1577cb7000 - 0x1577cd1fff 0x1577cd2000 - 0x1577cd2fff 0x1577cd3000 - 0x1577cd3fff 0x1577cd4000 - 0x1577cd5fff 0x1577cd6000 - 0x1577cd7fff 0x1577cd8000 - 0x1577cdefff 0x1577cdf000 - 0x1577cdffff 0x1577ce0000 - 0x1577ce0fff 0x1577ce2000 - 0x1577ce3fff 0x1577ce4000 - 0x1577d22fff 0x1577d23000 - 0x1577d24fff 0x1577d25000 - 0x1577d2bfff 0x1577d2c000 - 0x1577d2cfff 0x1577d2d000 - 0x1577d52fff 0x1577d53000 - 0x1577d56fff 0x1577d57000 - 0x1577d57fff 0x1577d58000 - 0x1577d59fff 0x1577d5a000 - 0x1577d5afff 0x1577d5b000 - 0x1577d5bfff 0x1577d5c000 - 0x1577d5cfff 0x1577d5d000 - 0x1577d60fff 0x1577d61000 - 0x1577d61fff 0x1577d62000 - 0x1577d62fff 0x1577d63000 - 0x1577d64fff 0x1577d65000 - 0x1577d65fff 0x1577d66000 - 0x1577d66fff 0x1577d67000 - 0x1577ed2fff 0x1577ed3000 - 0x1577ed5fff 0x1577ed6000 - 0x1577ed6fff 0x1577ed7000 - 0x1577ed9fff 0x1577eda000 - 0x1577eecfff 0x1577eed000 - 0x1577eedfff 0x1577eee000 - 0x1577eeefff 0x1577eef000 - 0x157800cfff 0x157800d000 - 0x157800ffff 0x1578010000 - 0x1578012fff 0x1578013000 - 0x1578017fff 0x1578018000 - 0x157806cfff 0x157806d000 - 0x1578717fff 0x3fffe21000 - 0x3fffe41fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun2b.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-genfun2b.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-genfun3.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3d494000 - 0x3d4b4fff 0x80000000 - 0x800bffff 0x1586bc1000 - 0x1586bdbfff 0x1586bdc000 - 0x1586bdcfff 0x1586bdd000 - 0x1586bddfff 0x1586bde000 - 0x1586bdffff 0x1586be0000 - 0x1586be1fff 0x1586be2000 - 0x1586be8fff 0x1586be9000 - 0x1586be9fff 0x1586bea000 - 0x1586beafff 0x1586bec000 - 0x1586bedfff 0x1586bee000 - 0x1586c2cfff 0x1586c2d000 - 0x1586c2efff 0x1586c2f000 - 0x1586c35fff 0x1586c36000 - 0x1586c36fff 0x1586c37000 - 0x1586c5cfff 0x1586c5d000 - 0x1586c60fff 0x1586c61000 - 0x1586c61fff 0x1586c62000 - 0x1586c63fff 0x1586c64000 - 0x1586c64fff 0x1586c65000 - 0x1586c65fff 0x1586c66000 - 0x1586c66fff 0x1586c67000 - 0x1586c6afff 0x1586c6b000 - 0x1586c6bfff 0x1586c6c000 - 0x1586c6cfff 0x1586c6d000 - 0x1586c6efff 0x1586c6f000 - 0x1586c6ffff 0x1586c70000 - 0x1586c70fff 0x1586c71000 - 0x1586ddcfff 0x1586ddd000 - 0x1586ddffff 0x1586de0000 - 0x1586de0fff 0x1586de1000 - 0x1586de3fff 0x1586de4000 - 0x1586df6fff 0x1586df7000 - 0x1586df7fff 0x1586df8000 - 0x1586df8fff 0x1586df9000 - 0x1586f16fff 0x1586f17000 - 0x1586f19fff 0x1586f1a000 - 0x1586f1cfff 0x1586f1d000 - 0x1586f21fff 0x1586f22000 - 0x1586f76fff 0x1586f77000 - 0x1587621fff 0x3fff8b4000 - 0x3fff8d4fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun3.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-genfun3.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-genfun4.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x804b000 - 0x806bfff 0x80000000 - 0x800bffff 0x1569eec000 - 0x1569f06fff 0x1569f07000 - 0x1569f07fff 0x1569f08000 - 0x1569f08fff 0x1569f09000 - 0x1569f0afff 0x1569f0b000 - 0x1569f0cfff 0x1569f0d000 - 0x1569f13fff 0x1569f14000 - 0x1569f14fff 0x1569f15000 - 0x1569f15fff 0x1569f17000 - 0x1569f18fff 0x1569f19000 - 0x1569f57fff 0x1569f58000 - 0x1569f59fff 0x1569f5a000 - 0x1569f60fff 0x1569f61000 - 0x1569f61fff 0x1569f62000 - 0x1569f87fff 0x1569f88000 - 0x1569f8bfff 0x1569f8c000 - 0x1569f8cfff 0x1569f8d000 - 0x1569f8efff 0x1569f8f000 - 0x1569f8ffff 0x1569f90000 - 0x1569f90fff 0x1569f91000 - 0x1569f91fff 0x1569f92000 - 0x1569f95fff 0x1569f96000 - 0x1569f96fff 0x1569f97000 - 0x1569f97fff 0x1569f98000 - 0x1569f99fff 0x1569f9a000 - 0x1569f9afff 0x1569f9b000 - 0x1569f9bfff 0x1569f9c000 - 0x156a107fff 0x156a108000 - 0x156a10afff 0x156a10b000 - 0x156a10bfff 0x156a10c000 - 0x156a10efff 0x156a10f000 - 0x156a121fff 0x156a122000 - 0x156a122fff 0x156a123000 - 0x156a123fff 0x156a124000 - 0x156a241fff 0x156a242000 - 0x156a244fff 0x156a245000 - 0x156a247fff 0x156a248000 - 0x156a24cfff 0x156a24d000 - 0x156a2a1fff 0x156a2a2000 - 0x156a94cfff 0x3fff8bc000 - 0x3fff8dcfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun4.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-genfun4.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-genfun5.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x24cf9000 - 0x24d19fff 0x80000000 - 0x800bffff 0x157b87b000 - 0x157b895fff 0x157b896000 - 0x157b896fff 0x157b897000 - 0x157b897fff 0x157b898000 - 0x157b899fff 0x157b89a000 - 0x157b89bfff 0x157b89c000 - 0x157b8a2fff 0x157b8a3000 - 0x157b8a3fff 0x157b8a4000 - 0x157b8a4fff 0x157b8a6000 - 0x157b8a7fff 0x157b8a8000 - 0x157b8e6fff 0x157b8e7000 - 0x157b8e8fff 0x157b8e9000 - 0x157b8effff 0x157b8f0000 - 0x157b8f0fff 0x157b8f1000 - 0x157b916fff 0x157b917000 - 0x157b91afff 0x157b91b000 - 0x157b91bfff 0x157b91c000 - 0x157b91dfff 0x157b91e000 - 0x157b91efff 0x157b91f000 - 0x157b91ffff 0x157b920000 - 0x157b920fff 0x157b921000 - 0x157b924fff 0x157b925000 - 0x157b925fff 0x157b926000 - 0x157b926fff 0x157b927000 - 0x157b928fff 0x157b929000 - 0x157b929fff 0x157b92a000 - 0x157b92afff 0x157b92b000 - 0x157ba96fff 0x157ba97000 - 0x157ba99fff 0x157ba9a000 - 0x157ba9afff 0x157ba9b000 - 0x157ba9dfff 0x157ba9e000 - 0x157bab0fff 0x157bab1000 - 0x157bab1fff 0x157bab2000 - 0x157bab2fff 0x157bab3000 - 0x157bbd0fff 0x157bbd1000 - 0x157bbd3fff 0x157bbd4000 - 0x157bbd6fff 0x157bbd7000 - 0x157bbdbfff 0x157bbdc000 - 0x157bc30fff 0x157bc31000 - 0x157c2dbfff 0x3fff925000 - 0x3fff945fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-genfun5.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-genfun5.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-dependent.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x9c1c000 - 0x9c3cfff 0x80000000 - 0x800bffff 0x1572d00000 - 0x1572d1afff 0x1572d1b000 - 0x1572d1bfff 0x1572d1c000 - 0x1572d1cfff 0x1572d1d000 - 0x1572d1efff 0x1572d1f000 - 0x1572d20fff 0x1572d21000 - 0x1572d27fff 0x1572d28000 - 0x1572d28fff 0x1572d29000 - 0x1572d29fff 0x1572d2b000 - 0x1572d2cfff 0x1572d2d000 - 0x1572d6bfff 0x1572d6c000 - 0x1572d6dfff 0x1572d6e000 - 0x1572d74fff 0x1572d75000 - 0x1572d75fff 0x1572d76000 - 0x1572d9bfff 0x1572d9c000 - 0x1572d9ffff 0x1572da0000 - 0x1572da0fff 0x1572da1000 - 0x1572da2fff 0x1572da3000 - 0x1572da3fff 0x1572da4000 - 0x1572da4fff 0x1572da5000 - 0x1572da5fff 0x1572da6000 - 0x1572da9fff 0x1572daa000 - 0x1572daafff 0x1572dab000 - 0x1572dabfff 0x1572dac000 - 0x1572dadfff 0x1572dae000 - 0x1572daefff 0x1572daf000 - 0x1572daffff 0x1572db0000 - 0x1572f1bfff 0x1572f1c000 - 0x1572f1efff 0x1572f1f000 - 0x1572f1ffff 0x1572f20000 - 0x1572f22fff 0x1572f23000 - 0x1572f35fff 0x1572f36000 - 0x1572f36fff 0x1572f37000 - 0x1572f37fff 0x1572f38000 - 0x1573055fff 0x1573056000 - 0x1573058fff 0x1573059000 - 0x157305bfff 0x157305c000 - 0x1573060fff 0x1573061000 - 0x15730b5fff 0x15730b6000 - 0x1573760fff 0x3fffaa1000 - 0x3fffac1fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-dependent.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-dependent.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-print.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3ee07000 - 0x3ee27fff 0x80000000 - 0x800bffff 0x1575492000 - 0x15754acfff 0x15754ad000 - 0x15754adfff 0x15754ae000 - 0x15754aefff 0x15754af000 - 0x15754b0fff 0x15754b1000 - 0x15754b2fff 0x15754b3000 - 0x15754b9fff 0x15754ba000 - 0x15754bafff 0x15754bb000 - 0x15754bbfff 0x15754bd000 - 0x15754befff 0x15754bf000 - 0x15754fdfff 0x15754fe000 - 0x15754fffff 0x1575500000 - 0x1575506fff 0x1575507000 - 0x1575507fff 0x1575508000 - 0x157552dfff 0x157552e000 - 0x1575531fff 0x1575532000 - 0x1575532fff 0x1575533000 - 0x1575534fff 0x1575535000 - 0x1575535fff 0x1575536000 - 0x1575536fff 0x1575537000 - 0x1575537fff 0x1575538000 - 0x157553bfff 0x157553c000 - 0x157553cfff 0x157553d000 - 0x157553dfff 0x157553e000 - 0x157553ffff 0x1575540000 - 0x1575540fff 0x1575541000 - 0x1575541fff 0x1575542000 - 0x15756adfff 0x15756ae000 - 0x15756b0fff 0x15756b1000 - 0x15756b1fff 0x15756b2000 - 0x15756b4fff 0x15756b5000 - 0x15756c7fff 0x15756c8000 - 0x15756c8fff 0x15756c9000 - 0x15756c9fff 0x15756ca000 - 0x15757e7fff 0x15757e8000 - 0x15757eafff 0x15757eb000 - 0x15757edfff 0x15757ee000 - 0x15757f2fff 0x15757f3000 - 0x1575847fff 0x1575848000 - 0x1575ef2fff 0x3fffa06000 - 0x3fffa26fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-print.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-print.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clos-custom.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x728a000 - 0x72aafff 0x80000000 - 0x800bffff 0x15574c5000 - 0x15574dffff 0x15574e0000 - 0x15574e0fff 0x15574e1000 - 0x15574e1fff 0x15574e2000 - 0x15574e3fff 0x15574e4000 - 0x15574e5fff 0x15574e6000 - 0x15574ecfff 0x15574ed000 - 0x15574edfff 0x15574ee000 - 0x15574eefff 0x15574f0000 - 0x15574f1fff 0x15574f2000 - 0x1557530fff 0x1557531000 - 0x1557532fff 0x1557533000 - 0x1557539fff 0x155753a000 - 0x155753afff 0x155753b000 - 0x1557560fff 0x1557561000 - 0x1557564fff 0x1557565000 - 0x1557565fff 0x1557566000 - 0x1557567fff 0x1557568000 - 0x1557568fff 0x1557569000 - 0x1557569fff 0x155756a000 - 0x155756afff 0x155756b000 - 0x155756efff 0x155756f000 - 0x155756ffff 0x1557570000 - 0x1557570fff 0x1557571000 - 0x1557572fff 0x1557573000 - 0x1557573fff 0x1557574000 - 0x1557574fff 0x1557575000 - 0x15576e0fff 0x15576e1000 - 0x15576e3fff 0x15576e4000 - 0x15576e4fff 0x15576e5000 - 0x15576e7fff 0x15576e8000 - 0x15576fafff 0x15576fb000 - 0x15576fbfff 0x15576fc000 - 0x15576fcfff 0x15576fd000 - 0x155781afff 0x155781b000 - 0x155781dfff 0x155781e000 - 0x1557820fff 0x1557821000 - 0x1557825fff 0x1557826000 - 0x155787afff 0x155787b000 - 0x1557f25fff 0x3ffff6b000 - 0x3ffff8bfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clos-custom.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clos-custom.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/documentation.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x20c69000 - 0x20c89fff 0x80000000 - 0x800bffff 0x1565bf0000 - 0x1565c0afff 0x1565c0b000 - 0x1565c0bfff 0x1565c0c000 - 0x1565c0cfff 0x1565c0d000 - 0x1565c0efff 0x1565c0f000 - 0x1565c10fff 0x1565c11000 - 0x1565c17fff 0x1565c18000 - 0x1565c18fff 0x1565c19000 - 0x1565c19fff 0x1565c1b000 - 0x1565c1cfff 0x1565c1d000 - 0x1565c5bfff 0x1565c5c000 - 0x1565c5dfff 0x1565c5e000 - 0x1565c64fff 0x1565c65000 - 0x1565c65fff 0x1565c66000 - 0x1565c8bfff 0x1565c8c000 - 0x1565c8ffff 0x1565c90000 - 0x1565c90fff 0x1565c91000 - 0x1565c92fff 0x1565c93000 - 0x1565c93fff 0x1565c94000 - 0x1565c94fff 0x1565c95000 - 0x1565c95fff 0x1565c96000 - 0x1565c99fff 0x1565c9a000 - 0x1565c9afff 0x1565c9b000 - 0x1565c9bfff 0x1565c9c000 - 0x1565c9dfff 0x1565c9e000 - 0x1565c9efff 0x1565c9f000 - 0x1565c9ffff 0x1565ca0000 - 0x1565e0bfff 0x1565e0c000 - 0x1565e0efff 0x1565e0f000 - 0x1565e0ffff 0x1565e10000 - 0x1565e12fff 0x1565e13000 - 0x1565e25fff 0x1565e26000 - 0x1565e26fff 0x1565e27000 - 0x1565e27fff 0x1565e28000 - 0x1565f45fff 0x1565f46000 - 0x1565f48fff 0x1565f49000 - 0x1565f4bfff 0x1565f4c000 - 0x1565f50fff 0x1565f51000 - 0x1565fa5fff 0x1565fa6000 - 0x1566650fff 0x3fffbfe000 - 0x3fffc1efff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/documentation.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/documentation.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/fill-out.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x29f7e000 - 0x29f9efff 0x80000000 - 0x800bffff 0x1571214000 - 0x157122efff 0x157122f000 - 0x157122ffff 0x1571230000 - 0x1571230fff 0x1571231000 - 0x1571232fff 0x1571233000 - 0x1571234fff 0x1571235000 - 0x157123bfff 0x157123c000 - 0x157123cfff 0x157123d000 - 0x157123dfff 0x157123f000 - 0x1571240fff 0x1571241000 - 0x157127ffff 0x1571280000 - 0x1571281fff 0x1571282000 - 0x1571288fff 0x1571289000 - 0x1571289fff 0x157128a000 - 0x15712affff 0x15712b0000 - 0x15712b3fff 0x15712b4000 - 0x15712b4fff 0x15712b5000 - 0x15712b6fff 0x15712b7000 - 0x15712b7fff 0x15712b8000 - 0x15712b8fff 0x15712b9000 - 0x15712b9fff 0x15712ba000 - 0x15712bdfff 0x15712be000 - 0x15712befff 0x15712bf000 - 0x15712bffff 0x15712c0000 - 0x15712c1fff 0x15712c2000 - 0x15712c2fff 0x15712c3000 - 0x15712c3fff 0x15712c4000 - 0x157142ffff 0x1571430000 - 0x1571432fff 0x1571433000 - 0x1571433fff 0x1571434000 - 0x1571436fff 0x1571437000 - 0x1571449fff 0x157144a000 - 0x157144afff 0x157144b000 - 0x157144bfff 0x157144c000 - 0x1571569fff 0x157156a000 - 0x157156cfff 0x157156d000 - 0x157156ffff 0x1571570000 - 0x1571574fff 0x1571575000 - 0x15715c9fff 0x15715ca000 - 0x1571c74fff 0x3ffff54000 - 0x3ffff74fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/fill-out.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/fill-out.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/disassem.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1a390000 - 0x1a3b0fff 0x80000000 - 0x800bffff 0x157e2db000 - 0x157e2f5fff 0x157e2f6000 - 0x157e2f6fff 0x157e2f7000 - 0x157e2f7fff 0x157e2f8000 - 0x157e2f9fff 0x157e2fa000 - 0x157e2fbfff 0x157e2fc000 - 0x157e302fff 0x157e303000 - 0x157e303fff 0x157e304000 - 0x157e304fff 0x157e306000 - 0x157e307fff 0x157e308000 - 0x157e346fff 0x157e347000 - 0x157e348fff 0x157e349000 - 0x157e34ffff 0x157e350000 - 0x157e350fff 0x157e351000 - 0x157e376fff 0x157e377000 - 0x157e37afff 0x157e37b000 - 0x157e37bfff 0x157e37c000 - 0x157e37dfff 0x157e37e000 - 0x157e37efff 0x157e37f000 - 0x157e37ffff 0x157e380000 - 0x157e380fff 0x157e381000 - 0x157e384fff 0x157e385000 - 0x157e385fff 0x157e386000 - 0x157e386fff 0x157e387000 - 0x157e388fff 0x157e389000 - 0x157e389fff 0x157e38a000 - 0x157e38afff 0x157e38b000 - 0x157e4f6fff 0x157e4f7000 - 0x157e4f9fff 0x157e4fa000 - 0x157e4fafff 0x157e4fb000 - 0x157e4fdfff 0x157e4fe000 - 0x157e510fff 0x157e511000 - 0x157e511fff 0x157e512000 - 0x157e512fff 0x157e513000 - 0x157e630fff 0x157e631000 - 0x157e633fff 0x157e634000 - 0x157e636fff 0x157e637000 - 0x157e63bfff 0x157e63c000 - 0x157e690fff 0x157e691000 - 0x157ed3bfff 0x3fffb8e000 - 0x3fffbaefff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/disassem.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/disassem.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/condition.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x16c9c000 - 0x16cbcfff 0x80000000 - 0x800bffff 0x1577753000 - 0x157776dfff 0x157776e000 - 0x157776efff 0x157776f000 - 0x157776ffff 0x1577770000 - 0x1577771fff 0x1577772000 - 0x1577773fff 0x1577774000 - 0x157777afff 0x157777b000 - 0x157777bfff 0x157777c000 - 0x157777cfff 0x157777e000 - 0x157777ffff 0x1577780000 - 0x15777befff 0x15777bf000 - 0x15777c0fff 0x15777c1000 - 0x15777c7fff 0x15777c8000 - 0x15777c8fff 0x15777c9000 - 0x15777eefff 0x15777ef000 - 0x15777f2fff 0x15777f3000 - 0x15777f3fff 0x15777f4000 - 0x15777f5fff 0x15777f6000 - 0x15777f6fff 0x15777f7000 - 0x15777f7fff 0x15777f8000 - 0x15777f8fff 0x15777f9000 - 0x15777fcfff 0x15777fd000 - 0x15777fdfff 0x15777fe000 - 0x15777fefff 0x15777ff000 - 0x1577800fff 0x1577801000 - 0x1577801fff 0x1577802000 - 0x1577802fff 0x1577803000 - 0x157796efff 0x157796f000 - 0x1577971fff 0x1577972000 - 0x1577972fff 0x1577973000 - 0x1577975fff 0x1577976000 - 0x1577988fff 0x1577989000 - 0x1577989fff 0x157798a000 - 0x157798afff 0x157798b000 - 0x1577aa8fff 0x1577aa9000 - 0x1577aabfff 0x1577aac000 - 0x1577aaefff 0x1577aaf000 - 0x1577ab3fff 0x1577ab4000 - 0x1577b08fff 0x1577b09000 - 0x15781b3fff 0x3fffad6000 - 0x3fffaf6fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/condition.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/condition.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/loadform.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x18b9a000 - 0x18bbafff 0x80000000 - 0x800bffff 0x157f19c000 - 0x157f1b6fff 0x157f1b7000 - 0x157f1b7fff 0x157f1b8000 - 0x157f1b8fff 0x157f1b9000 - 0x157f1bafff 0x157f1bb000 - 0x157f1bcfff 0x157f1bd000 - 0x157f1c3fff 0x157f1c4000 - 0x157f1c4fff 0x157f1c5000 - 0x157f1c5fff 0x157f1c7000 - 0x157f1c8fff 0x157f1c9000 - 0x157f207fff 0x157f208000 - 0x157f209fff 0x157f20a000 - 0x157f210fff 0x157f211000 - 0x157f211fff 0x157f212000 - 0x157f237fff 0x157f238000 - 0x157f23bfff 0x157f23c000 - 0x157f23cfff 0x157f23d000 - 0x157f23efff 0x157f23f000 - 0x157f23ffff 0x157f240000 - 0x157f240fff 0x157f241000 - 0x157f241fff 0x157f242000 - 0x157f245fff 0x157f246000 - 0x157f246fff 0x157f247000 - 0x157f247fff 0x157f248000 - 0x157f249fff 0x157f24a000 - 0x157f24afff 0x157f24b000 - 0x157f24bfff 0x157f24c000 - 0x157f3b7fff 0x157f3b8000 - 0x157f3bafff 0x157f3bb000 - 0x157f3bbfff 0x157f3bc000 - 0x157f3befff 0x157f3bf000 - 0x157f3d1fff 0x157f3d2000 - 0x157f3d2fff 0x157f3d3000 - 0x157f3d3fff 0x157f3d4000 - 0x157f4f1fff 0x157f4f2000 - 0x157f4f4fff 0x157f4f5000 - 0x157f4f7fff 0x157f4f8000 - 0x157f4fcfff 0x157f4fd000 - 0x157f551fff 0x157f552000 - 0x157fbfcfff 0x3ffff90000 - 0x3ffffb0fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/loadform.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/loadform.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/gstream.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x226c9000 - 0x226e9fff 0x80000000 - 0x800bffff 0x158be58000 - 0x158be72fff 0x158be73000 - 0x158be73fff 0x158be74000 - 0x158be74fff 0x158be75000 - 0x158be76fff 0x158be77000 - 0x158be78fff 0x158be79000 - 0x158be7ffff 0x158be80000 - 0x158be80fff 0x158be81000 - 0x158be81fff 0x158be83000 - 0x158be84fff 0x158be85000 - 0x158bec3fff 0x158bec4000 - 0x158bec5fff 0x158bec6000 - 0x158beccfff 0x158becd000 - 0x158becdfff 0x158bece000 - 0x158bef3fff 0x158bef4000 - 0x158bef7fff 0x158bef8000 - 0x158bef8fff 0x158bef9000 - 0x158befafff 0x158befb000 - 0x158befbfff 0x158befc000 - 0x158befcfff 0x158befd000 - 0x158befdfff 0x158befe000 - 0x158bf01fff 0x158bf02000 - 0x158bf02fff 0x158bf03000 - 0x158bf03fff 0x158bf04000 - 0x158bf05fff 0x158bf06000 - 0x158bf06fff 0x158bf07000 - 0x158bf07fff 0x158bf08000 - 0x158c073fff 0x158c074000 - 0x158c076fff 0x158c077000 - 0x158c077fff 0x158c078000 - 0x158c07afff 0x158c07b000 - 0x158c08dfff 0x158c08e000 - 0x158c08efff 0x158c08f000 - 0x158c08ffff 0x158c090000 - 0x158c1adfff 0x158c1ae000 - 0x158c1b0fff 0x158c1b1000 - 0x158c1b3fff 0x158c1b4000 - 0x158c1b8fff 0x158c1b9000 - 0x158c20dfff 0x158c20e000 - 0x158c8b8fff 0x3fffd01000 - 0x3fffd21fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gstream.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/gstream.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/xcharin.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2c5eb000 - 0x2c60bfff 0x80000000 - 0x800bffff 0x158c492000 - 0x158c4acfff 0x158c4ad000 - 0x158c4adfff 0x158c4ae000 - 0x158c4aefff 0x158c4af000 - 0x158c4b0fff 0x158c4b1000 - 0x158c4b2fff 0x158c4b3000 - 0x158c4b9fff 0x158c4ba000 - 0x158c4bafff 0x158c4bb000 - 0x158c4bbfff 0x158c4bd000 - 0x158c4befff 0x158c4bf000 - 0x158c4fdfff 0x158c4fe000 - 0x158c4fffff 0x158c500000 - 0x158c506fff 0x158c507000 - 0x158c507fff 0x158c508000 - 0x158c52dfff 0x158c52e000 - 0x158c531fff 0x158c532000 - 0x158c532fff 0x158c533000 - 0x158c534fff 0x158c535000 - 0x158c535fff 0x158c536000 - 0x158c536fff 0x158c537000 - 0x158c537fff 0x158c538000 - 0x158c53bfff 0x158c53c000 - 0x158c53cfff 0x158c53d000 - 0x158c53dfff 0x158c53e000 - 0x158c53ffff 0x158c540000 - 0x158c540fff 0x158c541000 - 0x158c541fff 0x158c542000 - 0x158c6adfff 0x158c6ae000 - 0x158c6b0fff 0x158c6b1000 - 0x158c6b1fff 0x158c6b2000 - 0x158c6b4fff 0x158c6b5000 - 0x158c6c7fff 0x158c6c8000 - 0x158c6c8fff 0x158c6c9000 - 0x158c6c9fff 0x158c6ca000 - 0x158c7e7fff 0x158c7e8000 - 0x158c7eafff 0x158c7eb000 - 0x158c7edfff 0x158c7ee000 - 0x158c7f2fff 0x158c7f3000 - 0x158c847fff 0x158c848000 - 0x158cef2fff 0x3fffc2f000 - 0x3fffc4ffff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/xcharin.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/xcharin.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/keyboard.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3b513000 - 0x3b533fff 0x80000000 - 0x800bffff 0x15629ea000 - 0x1562a04fff 0x1562a05000 - 0x1562a05fff 0x1562a06000 - 0x1562a06fff 0x1562a07000 - 0x1562a08fff 0x1562a09000 - 0x1562a0afff 0x1562a0b000 - 0x1562a11fff 0x1562a12000 - 0x1562a12fff 0x1562a13000 - 0x1562a13fff 0x1562a15000 - 0x1562a16fff 0x1562a17000 - 0x1562a55fff 0x1562a56000 - 0x1562a57fff 0x1562a58000 - 0x1562a5efff 0x1562a5f000 - 0x1562a5ffff 0x1562a60000 - 0x1562a85fff 0x1562a86000 - 0x1562a89fff 0x1562a8a000 - 0x1562a8afff 0x1562a8b000 - 0x1562a8cfff 0x1562a8d000 - 0x1562a8dfff 0x1562a8e000 - 0x1562a8efff 0x1562a8f000 - 0x1562a8ffff 0x1562a90000 - 0x1562a93fff 0x1562a94000 - 0x1562a94fff 0x1562a95000 - 0x1562a95fff 0x1562a96000 - 0x1562a97fff 0x1562a98000 - 0x1562a98fff 0x1562a99000 - 0x1562a99fff 0x1562a9a000 - 0x1562c05fff 0x1562c06000 - 0x1562c08fff 0x1562c09000 - 0x1562c09fff 0x1562c0a000 - 0x1562c0cfff 0x1562c0d000 - 0x1562c1ffff 0x1562c20000 - 0x1562c20fff 0x1562c21000 - 0x1562c21fff 0x1562c22000 - 0x1562d3ffff 0x1562d40000 - 0x1562d42fff 0x1562d43000 - 0x1562d45fff 0x1562d46000 - 0x1562d4afff 0x1562d4b000 - 0x1562d9ffff 0x1562da0000 - 0x156344afff 0x3fffe38000 - 0x3fffe58fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/keyboard.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/keyboard.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/screen.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xb3a3000 - 0xb3c3fff 0x80000000 - 0x800bffff 0x158ae7b000 - 0x158ae95fff 0x158ae96000 - 0x158ae96fff 0x158ae97000 - 0x158ae97fff 0x158ae98000 - 0x158ae99fff 0x158ae9a000 - 0x158ae9bfff 0x158ae9c000 - 0x158aea2fff 0x158aea3000 - 0x158aea3fff 0x158aea4000 - 0x158aea4fff 0x158aea6000 - 0x158aea7fff 0x158aea8000 - 0x158aee6fff 0x158aee7000 - 0x158aee8fff 0x158aee9000 - 0x158aeeffff 0x158aef0000 - 0x158aef0fff 0x158aef1000 - 0x158af16fff 0x158af17000 - 0x158af1afff 0x158af1b000 - 0x158af1bfff 0x158af1c000 - 0x158af1dfff 0x158af1e000 - 0x158af1efff 0x158af1f000 - 0x158af1ffff 0x158af20000 - 0x158af20fff 0x158af21000 - 0x158af24fff 0x158af25000 - 0x158af25fff 0x158af26000 - 0x158af26fff 0x158af27000 - 0x158af28fff 0x158af29000 - 0x158af29fff 0x158af2a000 - 0x158af2afff 0x158af2b000 - 0x158b096fff 0x158b097000 - 0x158b099fff 0x158b09a000 - 0x158b09afff 0x158b09b000 - 0x158b09dfff 0x158b09e000 - 0x158b0b0fff 0x158b0b1000 - 0x158b0b1fff 0x158b0b2000 - 0x158b0b2fff 0x158b0b3000 - 0x158b1d0fff 0x158b1d1000 - 0x158b1d3fff 0x158b1d4000 - 0x158b1d6fff 0x158b1d7000 - 0x158b1dbfff 0x158b1dc000 - 0x158b230fff 0x158b231000 - 0x158b8dbfff 0x3fffa0d000 - 0x3fffa2dfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/screen.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/screen.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/runprog.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3cdef000 - 0x3ce0ffff 0x80000000 - 0x800bffff 0x1581eab000 - 0x1581ec5fff 0x1581ec6000 - 0x1581ec6fff 0x1581ec7000 - 0x1581ec7fff 0x1581ec8000 - 0x1581ec9fff 0x1581eca000 - 0x1581ecbfff 0x1581ecc000 - 0x1581ed2fff 0x1581ed3000 - 0x1581ed3fff 0x1581ed4000 - 0x1581ed4fff 0x1581ed6000 - 0x1581ed7fff 0x1581ed8000 - 0x1581f16fff 0x1581f17000 - 0x1581f18fff 0x1581f19000 - 0x1581f1ffff 0x1581f20000 - 0x1581f20fff 0x1581f21000 - 0x1581f46fff 0x1581f47000 - 0x1581f4afff 0x1581f4b000 - 0x1581f4bfff 0x1581f4c000 - 0x1581f4dfff 0x1581f4e000 - 0x1581f4efff 0x1581f4f000 - 0x1581f4ffff 0x1581f50000 - 0x1581f50fff 0x1581f51000 - 0x1581f54fff 0x1581f55000 - 0x1581f55fff 0x1581f56000 - 0x1581f56fff 0x1581f57000 - 0x1581f58fff 0x1581f59000 - 0x1581f59fff 0x1581f5a000 - 0x1581f5afff 0x1581f5b000 - 0x15820c6fff 0x15820c7000 - 0x15820c9fff 0x15820ca000 - 0x15820cafff 0x15820cb000 - 0x15820cdfff 0x15820ce000 - 0x15820e0fff 0x15820e1000 - 0x15820e1fff 0x15820e2000 - 0x15820e2fff 0x15820e3000 - 0x1582200fff 0x1582201000 - 0x1582203fff 0x1582204000 - 0x1582206fff 0x1582207000 - 0x158220bfff 0x158220c000 - 0x1582260fff 0x1582261000 - 0x158290bfff 0x3fffe6d000 - 0x3fffe8dfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/runprog.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/runprog.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/query.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2b4d5000 - 0x2b4f5fff 0x80000000 - 0x800bffff 0x15724e8000 - 0x1572502fff 0x1572503000 - 0x1572503fff 0x1572504000 - 0x1572504fff 0x1572505000 - 0x1572506fff 0x1572507000 - 0x1572508fff 0x1572509000 - 0x157250ffff 0x1572510000 - 0x1572510fff 0x1572511000 - 0x1572511fff 0x1572513000 - 0x1572514fff 0x1572515000 - 0x1572553fff 0x1572554000 - 0x1572555fff 0x1572556000 - 0x157255cfff 0x157255d000 - 0x157255dfff 0x157255e000 - 0x1572583fff 0x1572584000 - 0x1572587fff 0x1572588000 - 0x1572588fff 0x1572589000 - 0x157258afff 0x157258b000 - 0x157258bfff 0x157258c000 - 0x157258cfff 0x157258d000 - 0x157258dfff 0x157258e000 - 0x1572591fff 0x1572592000 - 0x1572592fff 0x1572593000 - 0x1572593fff 0x1572594000 - 0x1572595fff 0x1572596000 - 0x1572596fff 0x1572597000 - 0x1572597fff 0x1572598000 - 0x1572703fff 0x1572704000 - 0x1572706fff 0x1572707000 - 0x1572707fff 0x1572708000 - 0x157270afff 0x157270b000 - 0x157271dfff 0x157271e000 - 0x157271efff 0x157271f000 - 0x157271ffff 0x1572720000 - 0x157283dfff 0x157283e000 - 0x1572840fff 0x1572841000 - 0x1572843fff 0x1572844000 - 0x1572848fff 0x1572849000 - 0x157289dfff 0x157289e000 - 0x1572f48fff 0x3ffff49000 - 0x3ffff69fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/query.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/query.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/reploop.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xf9db000 - 0xf9fbfff 0x80000000 - 0x800bffff 0x1591c48000 - 0x1591c62fff 0x1591c63000 - 0x1591c63fff 0x1591c64000 - 0x1591c64fff 0x1591c65000 - 0x1591c66fff 0x1591c67000 - 0x1591c68fff 0x1591c69000 - 0x1591c6ffff 0x1591c70000 - 0x1591c70fff 0x1591c71000 - 0x1591c71fff 0x1591c73000 - 0x1591c74fff 0x1591c75000 - 0x1591cb3fff 0x1591cb4000 - 0x1591cb5fff 0x1591cb6000 - 0x1591cbcfff 0x1591cbd000 - 0x1591cbdfff 0x1591cbe000 - 0x1591ce3fff 0x1591ce4000 - 0x1591ce7fff 0x1591ce8000 - 0x1591ce8fff 0x1591ce9000 - 0x1591ceafff 0x1591ceb000 - 0x1591cebfff 0x1591cec000 - 0x1591cecfff 0x1591ced000 - 0x1591cedfff 0x1591cee000 - 0x1591cf1fff 0x1591cf2000 - 0x1591cf2fff 0x1591cf3000 - 0x1591cf3fff 0x1591cf4000 - 0x1591cf5fff 0x1591cf6000 - 0x1591cf6fff 0x1591cf7000 - 0x1591cf7fff 0x1591cf8000 - 0x1591e63fff 0x1591e64000 - 0x1591e66fff 0x1591e67000 - 0x1591e67fff 0x1591e68000 - 0x1591e6afff 0x1591e6b000 - 0x1591e7dfff 0x1591e7e000 - 0x1591e7efff 0x1591e7f000 - 0x1591e7ffff 0x1591e80000 - 0x1591f9dfff 0x1591f9e000 - 0x1591fa0fff 0x1591fa1000 - 0x1591fa3fff 0x1591fa4000 - 0x1591fa8fff 0x1591fa9000 - 0x1591ffdfff 0x1591ffe000 - 0x15926a8fff 0x3fff8ba000 - 0x3fff8dafff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/reploop.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/reploop.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/dribble.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x15b36000 - 0x15b56fff 0x80000000 - 0x800bffff 0x158a396000 - 0x158a3b0fff 0x158a3b1000 - 0x158a3b1fff 0x158a3b2000 - 0x158a3b2fff 0x158a3b3000 - 0x158a3b4fff 0x158a3b5000 - 0x158a3b6fff 0x158a3b7000 - 0x158a3bdfff 0x158a3be000 - 0x158a3befff 0x158a3bf000 - 0x158a3bffff 0x158a3c1000 - 0x158a3c2fff 0x158a3c3000 - 0x158a401fff 0x158a402000 - 0x158a403fff 0x158a404000 - 0x158a40afff 0x158a40b000 - 0x158a40bfff 0x158a40c000 - 0x158a431fff 0x158a432000 - 0x158a435fff 0x158a436000 - 0x158a436fff 0x158a437000 - 0x158a438fff 0x158a439000 - 0x158a439fff 0x158a43a000 - 0x158a43afff 0x158a43b000 - 0x158a43bfff 0x158a43c000 - 0x158a43ffff 0x158a440000 - 0x158a440fff 0x158a441000 - 0x158a441fff 0x158a442000 - 0x158a443fff 0x158a444000 - 0x158a444fff 0x158a445000 - 0x158a445fff 0x158a446000 - 0x158a5b1fff 0x158a5b2000 - 0x158a5b4fff 0x158a5b5000 - 0x158a5b5fff 0x158a5b6000 - 0x158a5b8fff 0x158a5b9000 - 0x158a5cbfff 0x158a5cc000 - 0x158a5ccfff 0x158a5cd000 - 0x158a5cdfff 0x158a5ce000 - 0x158a6ebfff 0x158a6ec000 - 0x158a6eefff 0x158a6ef000 - 0x158a6f1fff 0x158a6f2000 - 0x158a6f6fff 0x158a6f7000 - 0x158a74bfff 0x158a74c000 - 0x158adf6fff 0x3fffd7b000 - 0x3fffd9bfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/dribble.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/dribble.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/complete.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xac36000 - 0xac56fff 0x80000000 - 0x800bffff 0x155ee67000 - 0x155ee81fff 0x155ee82000 - 0x155ee82fff 0x155ee83000 - 0x155ee83fff 0x155ee84000 - 0x155ee85fff 0x155ee86000 - 0x155ee87fff 0x155ee88000 - 0x155ee8efff 0x155ee8f000 - 0x155ee8ffff 0x155ee90000 - 0x155ee90fff 0x155ee92000 - 0x155ee93fff 0x155ee94000 - 0x155eed2fff 0x155eed3000 - 0x155eed4fff 0x155eed5000 - 0x155eedbfff 0x155eedc000 - 0x155eedcfff 0x155eedd000 - 0x155ef02fff 0x155ef03000 - 0x155ef06fff 0x155ef07000 - 0x155ef07fff 0x155ef08000 - 0x155ef09fff 0x155ef0a000 - 0x155ef0afff 0x155ef0b000 - 0x155ef0bfff 0x155ef0c000 - 0x155ef0cfff 0x155ef0d000 - 0x155ef10fff 0x155ef11000 - 0x155ef11fff 0x155ef12000 - 0x155ef12fff 0x155ef13000 - 0x155ef14fff 0x155ef15000 - 0x155ef15fff 0x155ef16000 - 0x155ef16fff 0x155ef17000 - 0x155f082fff 0x155f083000 - 0x155f085fff 0x155f086000 - 0x155f086fff 0x155f087000 - 0x155f089fff 0x155f08a000 - 0x155f09cfff 0x155f09d000 - 0x155f09dfff 0x155f09e000 - 0x155f09efff 0x155f09f000 - 0x155f1bcfff 0x155f1bd000 - 0x155f1bffff 0x155f1c0000 - 0x155f1c2fff 0x155f1c3000 - 0x155f1c7fff 0x155f1c8000 - 0x155f21cfff 0x155f21d000 - 0x155f8c7fff 0x3fff97d000 - 0x3fff99dfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/complete.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/complete.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/pprint.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1dc40000 - 0x1dc60fff 0x80000000 - 0x800bffff 0x1587b87000 - 0x1587ba1fff 0x1587ba2000 - 0x1587ba2fff 0x1587ba3000 - 0x1587ba3fff 0x1587ba4000 - 0x1587ba5fff 0x1587ba6000 - 0x1587ba7fff 0x1587ba8000 - 0x1587baefff 0x1587baf000 - 0x1587baffff 0x1587bb0000 - 0x1587bb0fff 0x1587bb2000 - 0x1587bb3fff 0x1587bb4000 - 0x1587bf2fff 0x1587bf3000 - 0x1587bf4fff 0x1587bf5000 - 0x1587bfbfff 0x1587bfc000 - 0x1587bfcfff 0x1587bfd000 - 0x1587c22fff 0x1587c23000 - 0x1587c26fff 0x1587c27000 - 0x1587c27fff 0x1587c28000 - 0x1587c29fff 0x1587c2a000 - 0x1587c2afff 0x1587c2b000 - 0x1587c2bfff 0x1587c2c000 - 0x1587c2cfff 0x1587c2d000 - 0x1587c30fff 0x1587c31000 - 0x1587c31fff 0x1587c32000 - 0x1587c32fff 0x1587c33000 - 0x1587c34fff 0x1587c35000 - 0x1587c35fff 0x1587c36000 - 0x1587c36fff 0x1587c37000 - 0x1587da2fff 0x1587da3000 - 0x1587da5fff 0x1587da6000 - 0x1587da6fff 0x1587da7000 - 0x1587da9fff 0x1587daa000 - 0x1587dbcfff 0x1587dbd000 - 0x1587dbdfff 0x1587dbe000 - 0x1587dbefff 0x1587dbf000 - 0x1587edcfff 0x1587edd000 - 0x1587edffff 0x1587ee0000 - 0x1587ee2fff 0x1587ee3000 - 0x1587ee7fff 0x1587ee8000 - 0x1587f3cfff 0x1587f3d000 - 0x15885e7fff 0x3fffb25000 - 0x3fffb45fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/pprint.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/pprint.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/describe.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xe2d6000 - 0xe2f6fff 0x80000000 - 0x800bffff 0x1566f33000 - 0x1566f4dfff 0x1566f4e000 - 0x1566f4efff 0x1566f4f000 - 0x1566f4ffff 0x1566f50000 - 0x1566f51fff 0x1566f52000 - 0x1566f53fff 0x1566f54000 - 0x1566f5afff 0x1566f5b000 - 0x1566f5bfff 0x1566f5c000 - 0x1566f5cfff 0x1566f5e000 - 0x1566f5ffff 0x1566f60000 - 0x1566f9efff 0x1566f9f000 - 0x1566fa0fff 0x1566fa1000 - 0x1566fa7fff 0x1566fa8000 - 0x1566fa8fff 0x1566fa9000 - 0x1566fcefff 0x1566fcf000 - 0x1566fd2fff 0x1566fd3000 - 0x1566fd3fff 0x1566fd4000 - 0x1566fd5fff 0x1566fd6000 - 0x1566fd6fff 0x1566fd7000 - 0x1566fd7fff 0x1566fd8000 - 0x1566fd8fff 0x1566fd9000 - 0x1566fdcfff 0x1566fdd000 - 0x1566fddfff 0x1566fde000 - 0x1566fdefff 0x1566fdf000 - 0x1566fe0fff 0x1566fe1000 - 0x1566fe1fff 0x1566fe2000 - 0x1566fe2fff 0x1566fe3000 - 0x156714efff 0x156714f000 - 0x1567151fff 0x1567152000 - 0x1567152fff 0x1567153000 - 0x1567155fff 0x1567156000 - 0x1567168fff 0x1567169000 - 0x1567169fff 0x156716a000 - 0x156716afff 0x156716b000 - 0x1567288fff 0x1567289000 - 0x156728bfff 0x156728c000 - 0x156728efff 0x156728f000 - 0x1567293fff 0x1567294000 - 0x15672e8fff 0x15672e9000 - 0x1567993fff 0x3fffc63000 - 0x3fffc83fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/describe.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/describe.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/room.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x8b5d000 - 0x8b7dfff 0x80000000 - 0x800bffff 0x15820c5000 - 0x15820dffff 0x15820e0000 - 0x15820e0fff 0x15820e1000 - 0x15820e1fff 0x15820e2000 - 0x15820e3fff 0x15820e4000 - 0x15820e5fff 0x15820e6000 - 0x15820ecfff 0x15820ed000 - 0x15820edfff 0x15820ee000 - 0x15820eefff 0x15820f0000 - 0x15820f1fff 0x15820f2000 - 0x1582130fff 0x1582131000 - 0x1582132fff 0x1582133000 - 0x1582139fff 0x158213a000 - 0x158213afff 0x158213b000 - 0x1582160fff 0x1582161000 - 0x1582164fff 0x1582165000 - 0x1582165fff 0x1582166000 - 0x1582167fff 0x1582168000 - 0x1582168fff 0x1582169000 - 0x1582169fff 0x158216a000 - 0x158216afff 0x158216b000 - 0x158216efff 0x158216f000 - 0x158216ffff 0x1582170000 - 0x1582170fff 0x1582171000 - 0x1582172fff 0x1582173000 - 0x1582173fff 0x1582174000 - 0x1582174fff 0x1582175000 - 0x15822e0fff 0x15822e1000 - 0x15822e3fff 0x15822e4000 - 0x15822e4fff 0x15822e5000 - 0x15822e7fff 0x15822e8000 - 0x15822fafff 0x15822fb000 - 0x15822fbfff 0x15822fc000 - 0x15822fcfff 0x15822fd000 - 0x158241afff 0x158241b000 - 0x158241dfff 0x158241e000 - 0x1582420fff 0x1582421000 - 0x1582425fff 0x1582426000 - 0x158247afff 0x158247b000 - 0x1582b25fff 0x3fff862000 - 0x3fff882fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/room.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/room.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/edit.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2b6ab000 - 0x2b6cbfff 0x80000000 - 0x800bffff 0x156e911000 - 0x156e92bfff 0x156e92c000 - 0x156e92cfff 0x156e92d000 - 0x156e92dfff 0x156e92e000 - 0x156e92ffff 0x156e930000 - 0x156e931fff 0x156e932000 - 0x156e938fff 0x156e939000 - 0x156e939fff 0x156e93a000 - 0x156e93afff 0x156e93c000 - 0x156e93dfff 0x156e93e000 - 0x156e97cfff 0x156e97d000 - 0x156e97efff 0x156e97f000 - 0x156e985fff 0x156e986000 - 0x156e986fff 0x156e987000 - 0x156e9acfff 0x156e9ad000 - 0x156e9b0fff 0x156e9b1000 - 0x156e9b1fff 0x156e9b2000 - 0x156e9b3fff 0x156e9b4000 - 0x156e9b4fff 0x156e9b5000 - 0x156e9b5fff 0x156e9b6000 - 0x156e9b6fff 0x156e9b7000 - 0x156e9bafff 0x156e9bb000 - 0x156e9bbfff 0x156e9bc000 - 0x156e9bcfff 0x156e9bd000 - 0x156e9befff 0x156e9bf000 - 0x156e9bffff 0x156e9c0000 - 0x156e9c0fff 0x156e9c1000 - 0x156eb2cfff 0x156eb2d000 - 0x156eb2ffff 0x156eb30000 - 0x156eb30fff 0x156eb31000 - 0x156eb33fff 0x156eb34000 - 0x156eb46fff 0x156eb47000 - 0x156eb47fff 0x156eb48000 - 0x156eb48fff 0x156eb49000 - 0x156ec66fff 0x156ec67000 - 0x156ec69fff 0x156ec6a000 - 0x156ec6cfff 0x156ec6d000 - 0x156ec71fff 0x156ec72000 - 0x156ecc6fff 0x156ecc7000 - 0x156f371fff 0x3fffd21000 - 0x3fffd41fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/edit.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/edit.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/macros3.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x27b81000 - 0x27ba1fff 0x80000000 - 0x800bffff 0x1560281000 - 0x156029bfff 0x156029c000 - 0x156029cfff 0x156029d000 - 0x156029dfff 0x156029e000 - 0x156029ffff 0x15602a0000 - 0x15602a1fff 0x15602a2000 - 0x15602a8fff 0x15602a9000 - 0x15602a9fff 0x15602aa000 - 0x15602aafff 0x15602ac000 - 0x15602adfff 0x15602ae000 - 0x15602ecfff 0x15602ed000 - 0x15602eefff 0x15602ef000 - 0x15602f5fff 0x15602f6000 - 0x15602f6fff 0x15602f7000 - 0x156031cfff 0x156031d000 - 0x1560320fff 0x1560321000 - 0x1560321fff 0x1560322000 - 0x1560323fff 0x1560324000 - 0x1560324fff 0x1560325000 - 0x1560325fff 0x1560326000 - 0x1560326fff 0x1560327000 - 0x156032afff 0x156032b000 - 0x156032bfff 0x156032c000 - 0x156032cfff 0x156032d000 - 0x156032efff 0x156032f000 - 0x156032ffff 0x1560330000 - 0x1560330fff 0x1560331000 - 0x156049cfff 0x156049d000 - 0x156049ffff 0x15604a0000 - 0x15604a0fff 0x15604a1000 - 0x15604a3fff 0x15604a4000 - 0x15604b6fff 0x15604b7000 - 0x15604b7fff 0x15604b8000 - 0x15604b8fff 0x15604b9000 - 0x15605d6fff 0x15605d7000 - 0x15605d9fff 0x15605da000 - 0x15605dcfff 0x15605dd000 - 0x15605e1fff 0x15605e2000 - 0x1560636fff 0x1560637000 - 0x1560ce1fff 0x3fffd97000 - 0x3fffdb7fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/macros3.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/macros3.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/clhs.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1075c000 - 0x1077cfff 0x80000000 - 0x800bffff 0x158ead2000 - 0x158eaecfff 0x158eaed000 - 0x158eaedfff 0x158eaee000 - 0x158eaeefff 0x158eaef000 - 0x158eaf0fff 0x158eaf1000 - 0x158eaf2fff 0x158eaf3000 - 0x158eaf9fff 0x158eafa000 - 0x158eafafff 0x158eafb000 - 0x158eafbfff 0x158eafd000 - 0x158eafefff 0x158eaff000 - 0x158eb3dfff 0x158eb3e000 - 0x158eb3ffff 0x158eb40000 - 0x158eb46fff 0x158eb47000 - 0x158eb47fff 0x158eb48000 - 0x158eb6dfff 0x158eb6e000 - 0x158eb71fff 0x158eb72000 - 0x158eb72fff 0x158eb73000 - 0x158eb74fff 0x158eb75000 - 0x158eb75fff 0x158eb76000 - 0x158eb76fff 0x158eb77000 - 0x158eb77fff 0x158eb78000 - 0x158eb7bfff 0x158eb7c000 - 0x158eb7cfff 0x158eb7d000 - 0x158eb7dfff 0x158eb7e000 - 0x158eb7ffff 0x158eb80000 - 0x158eb80fff 0x158eb81000 - 0x158eb81fff 0x158eb82000 - 0x158ecedfff 0x158ecee000 - 0x158ecf0fff 0x158ecf1000 - 0x158ecf1fff 0x158ecf2000 - 0x158ecf4fff 0x158ecf5000 - 0x158ed07fff 0x158ed08000 - 0x158ed08fff 0x158ed09000 - 0x158ed09fff 0x158ed0a000 - 0x158ee27fff 0x158ee28000 - 0x158ee2afff 0x158ee2b000 - 0x158ee2dfff 0x158ee2e000 - 0x158ee32fff 0x158ee33000 - 0x158ee87fff 0x158ee88000 - 0x158f532fff 0x3fffc2d000 - 0x3fffc4dfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/clhs.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/clhs.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/inspect.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x26651000 - 0x26671fff 0x80000000 - 0x800bffff 0x1586a57000 - 0x1586a71fff 0x1586a72000 - 0x1586a72fff 0x1586a73000 - 0x1586a73fff 0x1586a74000 - 0x1586a75fff 0x1586a76000 - 0x1586a77fff 0x1586a78000 - 0x1586a7efff 0x1586a7f000 - 0x1586a7ffff 0x1586a80000 - 0x1586a80fff 0x1586a82000 - 0x1586a83fff 0x1586a84000 - 0x1586ac2fff 0x1586ac3000 - 0x1586ac4fff 0x1586ac5000 - 0x1586acbfff 0x1586acc000 - 0x1586accfff 0x1586acd000 - 0x1586af2fff 0x1586af3000 - 0x1586af6fff 0x1586af7000 - 0x1586af7fff 0x1586af8000 - 0x1586af9fff 0x1586afa000 - 0x1586afafff 0x1586afb000 - 0x1586afbfff 0x1586afc000 - 0x1586afcfff 0x1586afd000 - 0x1586b00fff 0x1586b01000 - 0x1586b01fff 0x1586b02000 - 0x1586b02fff 0x1586b03000 - 0x1586b04fff 0x1586b05000 - 0x1586b05fff 0x1586b06000 - 0x1586b06fff 0x1586b07000 - 0x1586c72fff 0x1586c73000 - 0x1586c75fff 0x1586c76000 - 0x1586c76fff 0x1586c77000 - 0x1586c79fff 0x1586c7a000 - 0x1586c8cfff 0x1586c8d000 - 0x1586c8dfff 0x1586c8e000 - 0x1586c8efff 0x1586c8f000 - 0x1586dacfff 0x1586dad000 - 0x1586daffff 0x1586db0000 - 0x1586db2fff 0x1586db3000 - 0x1586db7fff 0x1586db8000 - 0x1586e0cfff 0x1586e0d000 - 0x15874b7fff 0x3fffa63000 - 0x3fffa83fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/inspect.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/inspect.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/gray.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x17386000 - 0x173a6fff 0x80000000 - 0x800bffff 0x156f6be000 - 0x156f6d8fff 0x156f6d9000 - 0x156f6d9fff 0x156f6da000 - 0x156f6dafff 0x156f6db000 - 0x156f6dcfff 0x156f6dd000 - 0x156f6defff 0x156f6df000 - 0x156f6e5fff 0x156f6e6000 - 0x156f6e6fff 0x156f6e7000 - 0x156f6e7fff 0x156f6e9000 - 0x156f6eafff 0x156f6eb000 - 0x156f729fff 0x156f72a000 - 0x156f72bfff 0x156f72c000 - 0x156f732fff 0x156f733000 - 0x156f733fff 0x156f734000 - 0x156f759fff 0x156f75a000 - 0x156f75dfff 0x156f75e000 - 0x156f75efff 0x156f75f000 - 0x156f760fff 0x156f761000 - 0x156f761fff 0x156f762000 - 0x156f762fff 0x156f763000 - 0x156f763fff 0x156f764000 - 0x156f767fff 0x156f768000 - 0x156f768fff 0x156f769000 - 0x156f769fff 0x156f76a000 - 0x156f76bfff 0x156f76c000 - 0x156f76cfff 0x156f76d000 - 0x156f76dfff 0x156f76e000 - 0x156f8d9fff 0x156f8da000 - 0x156f8dcfff 0x156f8dd000 - 0x156f8ddfff 0x156f8de000 - 0x156f8e0fff 0x156f8e1000 - 0x156f8f3fff 0x156f8f4000 - 0x156f8f4fff 0x156f8f5000 - 0x156f8f5fff 0x156f8f6000 - 0x156fa13fff 0x156fa14000 - 0x156fa16fff 0x156fa17000 - 0x156fa19fff 0x156fa1a000 - 0x156fa1efff 0x156fa1f000 - 0x156fa73fff 0x156fa74000 - 0x157011efff 0x3fffc24000 - 0x3fffc44fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/gray.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/gray.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/case-sensitive.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x10809000 - 0x10829fff 0x80000000 - 0x800bffff 0x1584121000 - 0x158413bfff 0x158413c000 - 0x158413cfff 0x158413d000 - 0x158413dfff 0x158413e000 - 0x158413ffff 0x1584140000 - 0x1584141fff 0x1584142000 - 0x1584148fff 0x1584149000 - 0x1584149fff 0x158414a000 - 0x158414afff 0x158414c000 - 0x158414dfff 0x158414e000 - 0x158418cfff 0x158418d000 - 0x158418efff 0x158418f000 - 0x1584195fff 0x1584196000 - 0x1584196fff 0x1584197000 - 0x15841bcfff 0x15841bd000 - 0x15841c0fff 0x15841c1000 - 0x15841c1fff 0x15841c2000 - 0x15841c3fff 0x15841c4000 - 0x15841c4fff 0x15841c5000 - 0x15841c5fff 0x15841c6000 - 0x15841c6fff 0x15841c7000 - 0x15841cafff 0x15841cb000 - 0x15841cbfff 0x15841cc000 - 0x15841ccfff 0x15841cd000 - 0x15841cefff 0x15841cf000 - 0x15841cffff 0x15841d0000 - 0x15841d0fff 0x15841d1000 - 0x158433cfff 0x158433d000 - 0x158433ffff 0x1584340000 - 0x1584340fff 0x1584341000 - 0x1584343fff 0x1584344000 - 0x1584356fff 0x1584357000 - 0x1584357fff 0x1584358000 - 0x1584358fff 0x1584359000 - 0x1584476fff 0x1584477000 - 0x1584479fff 0x158447a000 - 0x158447cfff 0x158447d000 - 0x1584481fff 0x1584482000 - 0x15844d6fff 0x15844d7000 - 0x1584b81fff 0x3fffba9000 - 0x3fffbc9fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/case-sensitive.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/case-sensitive.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/foreign1.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3d633000 - 0x3d653fff 0x80000000 - 0x800bffff 0x156dae1000 - 0x156dafbfff 0x156dafc000 - 0x156dafcfff 0x156dafd000 - 0x156dafdfff 0x156dafe000 - 0x156dafffff 0x156db00000 - 0x156db01fff 0x156db02000 - 0x156db08fff 0x156db09000 - 0x156db09fff 0x156db0a000 - 0x156db0afff 0x156db0c000 - 0x156db0dfff 0x156db0e000 - 0x156db4cfff 0x156db4d000 - 0x156db4efff 0x156db4f000 - 0x156db55fff 0x156db56000 - 0x156db56fff 0x156db57000 - 0x156db7cfff 0x156db7d000 - 0x156db80fff 0x156db81000 - 0x156db81fff 0x156db82000 - 0x156db83fff 0x156db84000 - 0x156db84fff 0x156db85000 - 0x156db85fff 0x156db86000 - 0x156db86fff 0x156db87000 - 0x156db8afff 0x156db8b000 - 0x156db8bfff 0x156db8c000 - 0x156db8cfff 0x156db8d000 - 0x156db8efff 0x156db8f000 - 0x156db8ffff 0x156db90000 - 0x156db90fff 0x156db91000 - 0x156dcfcfff 0x156dcfd000 - 0x156dcfffff 0x156dd00000 - 0x156dd00fff 0x156dd01000 - 0x156dd03fff 0x156dd04000 - 0x156dd16fff 0x156dd17000 - 0x156dd17fff 0x156dd18000 - 0x156dd18fff 0x156dd19000 - 0x156de36fff 0x156de37000 - 0x156de39fff 0x156de3a000 - 0x156de3cfff 0x156de3d000 - 0x156de41fff 0x156de42000 - 0x156de96fff 0x156de97000 - 0x156e541fff 0x3fffb07000 - 0x3fffb27fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/foreign1.lisp ... WARNING: DEFINE-COMPILER-MACRO: redefining compiler macro PARSE-C-TYPE in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/foreign1.lisp, was defined in top-level ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/foreign1.fas 0 errors, 1 warning ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/exporting.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x11684000 - 0x116a4fff 0x80000000 - 0x800bffff 0x1579176000 - 0x1579190fff 0x1579191000 - 0x1579191fff 0x1579192000 - 0x1579192fff 0x1579193000 - 0x1579194fff 0x1579195000 - 0x1579196fff 0x1579197000 - 0x157919dfff 0x157919e000 - 0x157919efff 0x157919f000 - 0x157919ffff 0x15791a1000 - 0x15791a2fff 0x15791a3000 - 0x15791e1fff 0x15791e2000 - 0x15791e3fff 0x15791e4000 - 0x15791eafff 0x15791eb000 - 0x15791ebfff 0x15791ec000 - 0x1579211fff 0x1579212000 - 0x1579215fff 0x1579216000 - 0x1579216fff 0x1579217000 - 0x1579218fff 0x1579219000 - 0x1579219fff 0x157921a000 - 0x157921afff 0x157921b000 - 0x157921bfff 0x157921c000 - 0x157921ffff 0x1579220000 - 0x1579220fff 0x1579221000 - 0x1579221fff 0x1579222000 - 0x1579223fff 0x1579224000 - 0x1579224fff 0x1579225000 - 0x1579225fff 0x1579226000 - 0x1579391fff 0x1579392000 - 0x1579394fff 0x1579395000 - 0x1579395fff 0x1579396000 - 0x1579398fff 0x1579399000 - 0x15793abfff 0x15793ac000 - 0x15793acfff 0x15793ad000 - 0x15793adfff 0x15793ae000 - 0x15794cbfff 0x15794cc000 - 0x15794cefff 0x15794cf000 - 0x15794d1fff 0x15794d2000 - 0x15794d6fff 0x15794d7000 - 0x157952bfff 0x157952c000 - 0x1579bd6fff 0x3fff985000 - 0x3fff9a5fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/exporting.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/exporting.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/german.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x318de000 - 0x318fefff 0x80000000 - 0x800bffff 0x156fb78000 - 0x156fb92fff 0x156fb93000 - 0x156fb93fff 0x156fb94000 - 0x156fb94fff 0x156fb95000 - 0x156fb96fff 0x156fb97000 - 0x156fb98fff 0x156fb99000 - 0x156fb9ffff 0x156fba0000 - 0x156fba0fff 0x156fba1000 - 0x156fba1fff 0x156fba3000 - 0x156fba4fff 0x156fba5000 - 0x156fbe3fff 0x156fbe4000 - 0x156fbe5fff 0x156fbe6000 - 0x156fbecfff 0x156fbed000 - 0x156fbedfff 0x156fbee000 - 0x156fc13fff 0x156fc14000 - 0x156fc17fff 0x156fc18000 - 0x156fc18fff 0x156fc19000 - 0x156fc1afff 0x156fc1b000 - 0x156fc1bfff 0x156fc1c000 - 0x156fc1cfff 0x156fc1d000 - 0x156fc1dfff 0x156fc1e000 - 0x156fc21fff 0x156fc22000 - 0x156fc22fff 0x156fc23000 - 0x156fc23fff 0x156fc24000 - 0x156fc25fff 0x156fc26000 - 0x156fc26fff 0x156fc27000 - 0x156fc27fff 0x156fc28000 - 0x156fd93fff 0x156fd94000 - 0x156fd96fff 0x156fd97000 - 0x156fd97fff 0x156fd98000 - 0x156fd9afff 0x156fd9b000 - 0x156fdadfff 0x156fdae000 - 0x156fdaefff 0x156fdaf000 - 0x156fdaffff 0x156fdb0000 - 0x156fecdfff 0x156fece000 - 0x156fed0fff 0x156fed1000 - 0x156fed3fff 0x156fed4000 - 0x156fed8fff 0x156fed9000 - 0x156ff2dfff 0x156ff2e000 - 0x15705d8fff 0x3fff9ea000 - 0x3fffa0afff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/german.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/german.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/french.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2ccae000 - 0x2cccefff 0x80000000 - 0x800bffff 0x155e9e7000 - 0x155ea01fff 0x155ea02000 - 0x155ea02fff 0x155ea03000 - 0x155ea03fff 0x155ea04000 - 0x155ea05fff 0x155ea06000 - 0x155ea07fff 0x155ea08000 - 0x155ea0efff 0x155ea0f000 - 0x155ea0ffff 0x155ea10000 - 0x155ea10fff 0x155ea12000 - 0x155ea13fff 0x155ea14000 - 0x155ea52fff 0x155ea53000 - 0x155ea54fff 0x155ea55000 - 0x155ea5bfff 0x155ea5c000 - 0x155ea5cfff 0x155ea5d000 - 0x155ea82fff 0x155ea83000 - 0x155ea86fff 0x155ea87000 - 0x155ea87fff 0x155ea88000 - 0x155ea89fff 0x155ea8a000 - 0x155ea8afff 0x155ea8b000 - 0x155ea8bfff 0x155ea8c000 - 0x155ea8cfff 0x155ea8d000 - 0x155ea90fff 0x155ea91000 - 0x155ea91fff 0x155ea92000 - 0x155ea92fff 0x155ea93000 - 0x155ea94fff 0x155ea95000 - 0x155ea95fff 0x155ea96000 - 0x155ea96fff 0x155ea97000 - 0x155ec02fff 0x155ec03000 - 0x155ec05fff 0x155ec06000 - 0x155ec06fff 0x155ec07000 - 0x155ec09fff 0x155ec0a000 - 0x155ec1cfff 0x155ec1d000 - 0x155ec1dfff 0x155ec1e000 - 0x155ec1efff 0x155ec1f000 - 0x155ed3cfff 0x155ed3d000 - 0x155ed3ffff 0x155ed40000 - 0x155ed42fff 0x155ed43000 - 0x155ed47fff 0x155ed48000 - 0x155ed9cfff 0x155ed9d000 - 0x155f447fff 0x3fffe15000 - 0x3fffe35fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/french.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/french.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/spanish.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x26e19000 - 0x26e39fff 0x80000000 - 0x800bffff 0x156e9ea000 - 0x156ea04fff 0x156ea05000 - 0x156ea05fff 0x156ea06000 - 0x156ea06fff 0x156ea07000 - 0x156ea08fff 0x156ea09000 - 0x156ea0afff 0x156ea0b000 - 0x156ea11fff 0x156ea12000 - 0x156ea12fff 0x156ea13000 - 0x156ea13fff 0x156ea15000 - 0x156ea16fff 0x156ea17000 - 0x156ea55fff 0x156ea56000 - 0x156ea57fff 0x156ea58000 - 0x156ea5efff 0x156ea5f000 - 0x156ea5ffff 0x156ea60000 - 0x156ea85fff 0x156ea86000 - 0x156ea89fff 0x156ea8a000 - 0x156ea8afff 0x156ea8b000 - 0x156ea8cfff 0x156ea8d000 - 0x156ea8dfff 0x156ea8e000 - 0x156ea8efff 0x156ea8f000 - 0x156ea8ffff 0x156ea90000 - 0x156ea93fff 0x156ea94000 - 0x156ea94fff 0x156ea95000 - 0x156ea95fff 0x156ea96000 - 0x156ea97fff 0x156ea98000 - 0x156ea98fff 0x156ea99000 - 0x156ea99fff 0x156ea9a000 - 0x156ec05fff 0x156ec06000 - 0x156ec08fff 0x156ec09000 - 0x156ec09fff 0x156ec0a000 - 0x156ec0cfff 0x156ec0d000 - 0x156ec1ffff 0x156ec20000 - 0x156ec20fff 0x156ec21000 - 0x156ec21fff 0x156ec22000 - 0x156ed3ffff 0x156ed40000 - 0x156ed42fff 0x156ed43000 - 0x156ed45fff 0x156ed46000 - 0x156ed4afff 0x156ed4b000 - 0x156ed9ffff 0x156eda0000 - 0x156f44afff 0x3fffc33000 - 0x3fffc53fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/spanish.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/spanish.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/russian.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x10946000 - 0x10966fff 0x80000000 - 0x800bffff 0x155d55d000 - 0x155d577fff 0x155d578000 - 0x155d578fff 0x155d579000 - 0x155d579fff 0x155d57a000 - 0x155d57bfff 0x155d57c000 - 0x155d57dfff 0x155d57e000 - 0x155d584fff 0x155d585000 - 0x155d585fff 0x155d586000 - 0x155d586fff 0x155d588000 - 0x155d589fff 0x155d58a000 - 0x155d5c8fff 0x155d5c9000 - 0x155d5cafff 0x155d5cb000 - 0x155d5d1fff 0x155d5d2000 - 0x155d5d2fff 0x155d5d3000 - 0x155d5f8fff 0x155d5f9000 - 0x155d5fcfff 0x155d5fd000 - 0x155d5fdfff 0x155d5fe000 - 0x155d5fffff 0x155d600000 - 0x155d600fff 0x155d601000 - 0x155d601fff 0x155d602000 - 0x155d602fff 0x155d603000 - 0x155d606fff 0x155d607000 - 0x155d607fff 0x155d608000 - 0x155d608fff 0x155d609000 - 0x155d60afff 0x155d60b000 - 0x155d60bfff 0x155d60c000 - 0x155d60cfff 0x155d60d000 - 0x155d778fff 0x155d779000 - 0x155d77bfff 0x155d77c000 - 0x155d77cfff 0x155d77d000 - 0x155d77ffff 0x155d780000 - 0x155d792fff 0x155d793000 - 0x155d793fff 0x155d794000 - 0x155d794fff 0x155d795000 - 0x155d8b2fff 0x155d8b3000 - 0x155d8b5fff 0x155d8b6000 - 0x155d8b8fff 0x155d8b9000 - 0x155d8bdfff 0x155d8be000 - 0x155d912fff 0x155d913000 - 0x155dfbdfff 0x3fff8c0000 - 0x3fff8e0fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/russian.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/russian.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/danish.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x36e21000 - 0x36e41fff 0x80000000 - 0x800bffff 0x1561992000 - 0x15619acfff 0x15619ad000 - 0x15619adfff 0x15619ae000 - 0x15619aefff 0x15619af000 - 0x15619b0fff 0x15619b1000 - 0x15619b2fff 0x15619b3000 - 0x15619b9fff 0x15619ba000 - 0x15619bafff 0x15619bb000 - 0x15619bbfff 0x15619bd000 - 0x15619befff 0x15619bf000 - 0x15619fdfff 0x15619fe000 - 0x15619fffff 0x1561a00000 - 0x1561a06fff 0x1561a07000 - 0x1561a07fff 0x1561a08000 - 0x1561a2dfff 0x1561a2e000 - 0x1561a31fff 0x1561a32000 - 0x1561a32fff 0x1561a33000 - 0x1561a34fff 0x1561a35000 - 0x1561a35fff 0x1561a36000 - 0x1561a36fff 0x1561a37000 - 0x1561a37fff 0x1561a38000 - 0x1561a3bfff 0x1561a3c000 - 0x1561a3cfff 0x1561a3d000 - 0x1561a3dfff 0x1561a3e000 - 0x1561a3ffff 0x1561a40000 - 0x1561a40fff 0x1561a41000 - 0x1561a41fff 0x1561a42000 - 0x1561badfff 0x1561bae000 - 0x1561bb0fff 0x1561bb1000 - 0x1561bb1fff 0x1561bb2000 - 0x1561bb4fff 0x1561bb5000 - 0x1561bc7fff 0x1561bc8000 - 0x1561bc8fff 0x1561bc9000 - 0x1561bc9fff 0x1561bca000 - 0x1561ce7fff 0x1561ce8000 - 0x1561ceafff 0x1561ceb000 - 0x1561cedfff 0x1561cee000 - 0x1561cf2fff 0x1561cf3000 - 0x1561d47fff 0x1561d48000 - 0x15623f2fff 0x3fffa7a000 - 0x3fffa9afff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/danish.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/danish.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/dutch.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x17877000 - 0x17897fff 0x80000000 - 0x800bffff 0x158bfc0000 - 0x158bfdafff 0x158bfdb000 - 0x158bfdbfff 0x158bfdc000 - 0x158bfdcfff 0x158bfdd000 - 0x158bfdefff 0x158bfdf000 - 0x158bfe0fff 0x158bfe1000 - 0x158bfe7fff 0x158bfe8000 - 0x158bfe8fff 0x158bfe9000 - 0x158bfe9fff 0x158bfeb000 - 0x158bfecfff 0x158bfed000 - 0x158c02bfff 0x158c02c000 - 0x158c02dfff 0x158c02e000 - 0x158c034fff 0x158c035000 - 0x158c035fff 0x158c036000 - 0x158c05bfff 0x158c05c000 - 0x158c05ffff 0x158c060000 - 0x158c060fff 0x158c061000 - 0x158c062fff 0x158c063000 - 0x158c063fff 0x158c064000 - 0x158c064fff 0x158c065000 - 0x158c065fff 0x158c066000 - 0x158c069fff 0x158c06a000 - 0x158c06afff 0x158c06b000 - 0x158c06bfff 0x158c06c000 - 0x158c06dfff 0x158c06e000 - 0x158c06efff 0x158c06f000 - 0x158c06ffff 0x158c070000 - 0x158c1dbfff 0x158c1dc000 - 0x158c1defff 0x158c1df000 - 0x158c1dffff 0x158c1e0000 - 0x158c1e2fff 0x158c1e3000 - 0x158c1f5fff 0x158c1f6000 - 0x158c1f6fff 0x158c1f7000 - 0x158c1f7fff 0x158c1f8000 - 0x158c315fff 0x158c316000 - 0x158c318fff 0x158c319000 - 0x158c31bfff 0x158c31c000 - 0x158c320fff 0x158c321000 - 0x158c375fff 0x158c376000 - 0x158ca20fff 0x3fffdd1000 - 0x3fffdf1fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/dutch.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/dutch.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c ../src/deprecated.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1a1db000 - 0x1a1fbfff 0x80000000 - 0x800bffff 0x15846a1000 - 0x15846bbfff 0x15846bc000 - 0x15846bcfff 0x15846bd000 - 0x15846bdfff 0x15846be000 - 0x15846bffff 0x15846c0000 - 0x15846c1fff 0x15846c2000 - 0x15846c8fff 0x15846c9000 - 0x15846c9fff 0x15846ca000 - 0x15846cafff 0x15846cc000 - 0x15846cdfff 0x15846ce000 - 0x158470cfff 0x158470d000 - 0x158470efff 0x158470f000 - 0x1584715fff 0x1584716000 - 0x1584716fff 0x1584717000 - 0x158473cfff 0x158473d000 - 0x1584740fff 0x1584741000 - 0x1584741fff 0x1584742000 - 0x1584743fff 0x1584744000 - 0x1584744fff 0x1584745000 - 0x1584745fff 0x1584746000 - 0x1584746fff 0x1584747000 - 0x158474afff 0x158474b000 - 0x158474bfff 0x158474c000 - 0x158474cfff 0x158474d000 - 0x158474efff 0x158474f000 - 0x158474ffff 0x1584750000 - 0x1584750fff 0x1584751000 - 0x15848bcfff 0x15848bd000 - 0x15848bffff 0x15848c0000 - 0x15848c0fff 0x15848c1000 - 0x15848c3fff 0x15848c4000 - 0x15848d6fff 0x15848d7000 - 0x15848d7fff 0x15848d8000 - 0x15848d8fff 0x15848d9000 - 0x15849f6fff 0x15849f7000 - 0x15849f9fff 0x15849fa000 - 0x15849fcfff 0x15849fd000 - 0x1584a01fff 0x1584a02000 - 0x1584a56fff 0x1584a57000 - 0x1585101fff 0x3fffa09000 - 0x3fffa29fff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/src/deprecated.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/deprecated.fas 0 errors, 0 warnings ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -m 1MW -M lispinit.mem -q -d -c config.lisp -o stage/ Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x29265000 - 0x29285fff 0x80000000 - 0x800bffff 0x1572b6e000 - 0x1572b88fff 0x1572b89000 - 0x1572b89fff 0x1572b8a000 - 0x1572b8afff 0x1572b8b000 - 0x1572b8cfff 0x1572b8d000 - 0x1572b8efff 0x1572b8f000 - 0x1572b95fff 0x1572b96000 - 0x1572b96fff 0x1572b97000 - 0x1572b97fff 0x1572b99000 - 0x1572b9afff 0x1572b9b000 - 0x1572bd9fff 0x1572bda000 - 0x1572bdbfff 0x1572bdc000 - 0x1572be2fff 0x1572be3000 - 0x1572be3fff 0x1572be4000 - 0x1572c09fff 0x1572c0a000 - 0x1572c0dfff 0x1572c0e000 - 0x1572c0efff 0x1572c0f000 - 0x1572c10fff 0x1572c11000 - 0x1572c11fff 0x1572c12000 - 0x1572c12fff 0x1572c13000 - 0x1572c13fff 0x1572c14000 - 0x1572c17fff 0x1572c18000 - 0x1572c18fff 0x1572c19000 - 0x1572c19fff 0x1572c1a000 - 0x1572c1bfff 0x1572c1c000 - 0x1572c1cfff 0x1572c1d000 - 0x1572c1dfff 0x1572c1e000 - 0x1572d89fff 0x1572d8a000 - 0x1572d8cfff 0x1572d8d000 - 0x1572d8dfff 0x1572d8e000 - 0x1572d90fff 0x1572d91000 - 0x1572da3fff 0x1572da4000 - 0x1572da4fff 0x1572da5000 - 0x1572da5fff 0x1572da6000 - 0x1572ec3fff 0x1572ec4000 - 0x1572ec6fff 0x1572ec7000 - 0x1572ec9fff 0x1572eca000 - 0x1572ecefff 0x1572ecf000 - 0x1572f23fff 0x1572f24000 - 0x15735cefff 0x3fff89c000 - 0x3fff8bcfff ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/config.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/stage/config.fas 0 errors, 0 warnings cmp -s init.fas stage/init.fas || (echo "Test failed." ; exit 1) cmp -s defseq.fas stage/defseq.fas || (echo "Test failed." ; exit 1) cmp -s backquote.fas stage/backquote.fas || (echo "Test failed." ; exit 1) cmp -s defmacro.fas stage/defmacro.fas || (echo "Test failed." ; exit 1) cmp -s macros1.fas stage/macros1.fas || (echo "Test failed." ; exit 1) cmp -s macros2.fas stage/macros2.fas || (echo "Test failed." ; exit 1) cmp -s defs1.fas stage/defs1.fas || (echo "Test failed." ; exit 1) cmp -s lambdalist.fas stage/lambdalist.fas || (echo "Test failed." ; exit 1) cmp -s places.fas stage/places.fas || (echo "Test failed." ; exit 1) cmp -s floatprint.fas stage/floatprint.fas || (echo "Test failed." ; exit 1) cmp -s defpackage.fas stage/defpackage.fas || (echo "Test failed." ; exit 1) cmp -s type.fas stage/type.fas || (echo "Test failed." ; exit 1) cmp -s subtypep.fas stage/subtypep.fas || (echo "Test failed." ; exit 1) cmp -s clos-package.fas stage/clos-package.fas || (echo "Test failed." ; exit 1) cmp -s clos-macros.fas stage/clos-macros.fas || (echo "Test failed." ; exit 1) cmp -s clos-class0.fas stage/clos-class0.fas || (echo "Test failed." ; exit 1) cmp -s clos-metaobject1.fas stage/clos-metaobject1.fas || (echo "Test failed." ; exit 1) cmp -s clos-slotdef1.fas stage/clos-slotdef1.fas || (echo "Test failed." ; exit 1) cmp -s clos-stablehash1.fas stage/clos-stablehash1.fas || (echo "Test failed." ; exit 1) cmp -s clos-specializer1.fas stage/clos-specializer1.fas || (echo "Test failed." ; exit 1) cmp -s clos-class1.fas stage/clos-class1.fas || (echo "Test failed." ; exit 1) cmp -s clos-class2.fas stage/clos-class2.fas || (echo "Test failed." ; exit 1) cmp -s clos-class3.fas stage/clos-class3.fas || (echo "Test failed." ; exit 1) cmp -s defstruct.fas stage/defstruct.fas || (echo "Test failed." ; exit 1) cmp -s format.fas stage/format.fas || (echo "Test failed." ; exit 1) cmp -s international.fas stage/international.fas || (echo "Test failed." ; exit 1) cmp -s savemem.fas stage/savemem.fas || (echo "Test failed." ; exit 1) cmp -s functions.fas stage/functions.fas || (echo "Test failed." ; exit 1) cmp -s trace.fas stage/trace.fas || (echo "Test failed." ; exit 1) cmp -s cmacros.fas stage/cmacros.fas || (echo "Test failed." ; exit 1) cmp -s compiler.fas stage/compiler.fas || (echo "Test failed." ; exit 1) cmp -s defs2.fas stage/defs2.fas || (echo "Test failed." ; exit 1) cmp -s loop.fas stage/loop.fas || (echo "Test failed." ; exit 1) cmp -s clos.fas stage/clos.fas || (echo "Test failed." ; exit 1) cmp -s clos-stablehash2.fas stage/clos-stablehash2.fas || (echo "Test failed." ; exit 1) cmp -s clos-specializer2.fas stage/clos-specializer2.fas || (echo "Test failed." ; exit 1) cmp -s clos-specializer3.fas stage/clos-specializer3.fas || (echo "Test failed." ; exit 1) cmp -s clos-class4.fas stage/clos-class4.fas || (echo "Test failed." ; exit 1) cmp -s clos-class5.fas stage/clos-class5.fas || (echo "Test failed." ; exit 1) cmp -s clos-class6.fas stage/clos-class6.fas || (echo "Test failed." ; exit 1) cmp -s clos-slotdef2.fas stage/clos-slotdef2.fas || (echo "Test failed." ; exit 1) cmp -s clos-slotdef3.fas stage/clos-slotdef3.fas || (echo "Test failed." ; exit 1) cmp -s clos-slots1.fas stage/clos-slots1.fas || (echo "Test failed." ; exit 1) cmp -s clos-slots2.fas stage/clos-slots2.fas || (echo "Test failed." ; exit 1) cmp -s clos-method1.fas stage/clos-method1.fas || (echo "Test failed." ; exit 1) cmp -s clos-method2.fas stage/clos-method2.fas || (echo "Test failed." ; exit 1) cmp -s clos-method3.fas stage/clos-method3.fas || (echo "Test failed." ; exit 1) cmp -s clos-method4.fas stage/clos-method4.fas || (echo "Test failed." ; exit 1) cmp -s clos-methcomb1.fas stage/clos-methcomb1.fas || (echo "Test failed." ; exit 1) cmp -s clos-methcomb2.fas stage/clos-methcomb2.fas || (echo "Test failed." ; exit 1) cmp -s clos-methcomb3.fas stage/clos-methcomb3.fas || (echo "Test failed." ; exit 1) cmp -s clos-methcomb4.fas stage/clos-methcomb4.fas || (echo "Test failed." ; exit 1) cmp -s clos-genfun1.fas stage/clos-genfun1.fas || (echo "Test failed." ; exit 1) cmp -s clos-genfun2a.fas stage/clos-genfun2a.fas || (echo "Test failed." ; exit 1) cmp -s clos-genfun2b.fas stage/clos-genfun2b.fas || (echo "Test failed." ; exit 1) cmp -s clos-genfun3.fas stage/clos-genfun3.fas || (echo "Test failed." ; exit 1) cmp -s clos-genfun4.fas stage/clos-genfun4.fas || (echo "Test failed." ; exit 1) cmp -s clos-genfun5.fas stage/clos-genfun5.fas || (echo "Test failed." ; exit 1) cmp -s clos-dependent.fas stage/clos-dependent.fas || (echo "Test failed." ; exit 1) cmp -s clos-print.fas stage/clos-print.fas || (echo "Test failed." ; exit 1) cmp -s clos-custom.fas stage/clos-custom.fas || (echo "Test failed." ; exit 1) cmp -s documentation.fas stage/documentation.fas || (echo "Test failed." ; exit 1) cmp -s fill-out.fas stage/fill-out.fas || (echo "Test failed." ; exit 1) cmp -s disassem.fas stage/disassem.fas || (echo "Test failed." ; exit 1) cmp -s condition.fas stage/condition.fas || (echo "Test failed." ; exit 1) cmp -s loadform.fas stage/loadform.fas || (echo "Test failed." ; exit 1) cmp -s gstream.fas stage/gstream.fas || (echo "Test failed." ; exit 1) cmp -s xcharin.fas stage/xcharin.fas || (echo "Test failed." ; exit 1) cmp -s keyboard.fas stage/keyboard.fas || (echo "Test failed." ; exit 1) cmp -s screen.fas stage/screen.fas || (echo "Test failed." ; exit 1) cmp -s runprog.fas stage/runprog.fas || (echo "Test failed." ; exit 1) cmp -s query.fas stage/query.fas || (echo "Test failed." ; exit 1) cmp -s reploop.fas stage/reploop.fas || (echo "Test failed." ; exit 1) cmp -s dribble.fas stage/dribble.fas || (echo "Test failed." ; exit 1) cmp -s complete.fas stage/complete.fas || (echo "Test failed." ; exit 1) cmp -s pprint.fas stage/pprint.fas || (echo "Test failed." ; exit 1) cmp -s describe.fas stage/describe.fas || (echo "Test failed." ; exit 1) cmp -s room.fas stage/room.fas || (echo "Test failed." ; exit 1) cmp -s edit.fas stage/edit.fas || (echo "Test failed." ; exit 1) cmp -s macros3.fas stage/macros3.fas || (echo "Test failed." ; exit 1) cmp -s clhs.fas stage/clhs.fas || (echo "Test failed." ; exit 1) cmp -s inspect.fas stage/inspect.fas || (echo "Test failed." ; exit 1) cmp -s gray.fas stage/gray.fas || (echo "Test failed." ; exit 1) cmp -s case-sensitive.fas stage/case-sensitive.fas || (echo "Test failed." ; exit 1) cmp -s foreign1.fas stage/foreign1.fas || (echo "Test failed." ; exit 1) cmp -s exporting.fas stage/exporting.fas || (echo "Test failed." ; exit 1) cmp -s german.fas stage/german.fas || (echo "Test failed." ; exit 1) cmp -s french.fas stage/french.fas || (echo "Test failed." ; exit 1) cmp -s spanish.fas stage/spanish.fas || (echo "Test failed." ; exit 1) cmp -s russian.fas stage/russian.fas || (echo "Test failed." ; exit 1) cmp -s danish.fas stage/danish.fas || (echo "Test failed." ; exit 1) cmp -s dutch.fas stage/dutch.fas || (echo "Test failed." ; exit 1) cmp -s deprecated.fas stage/deprecated.fas || (echo "Test failed." ; exit 1) cmp -s config.fas stage/config.fas || (echo "Test failed." ; exit 1) echo "Test passed." Test passed. rm -f fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (dolist (s (quote (*terminal-io* *standard-output* *error-output* *query-io* *debug-io* *trace-output*))) (format t "~S = ~S~%" s (symbol-value s))) (values))' 2>&1 | cat > fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *terminal-io* "~&Line1 to *terminal-io*") (format *terminal-io* "~&Line2 to *terminal-io*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *terminal-io* "~&Line1 to *terminal-io*") (format *standard-output* "~&Line2 to *standard-output*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *terminal-io* "~&Line1 to *terminal-io*") (format *error-output* "~&Line2 to *error-output*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *terminal-io* "~&Line1 to *terminal-io*") (format *query-io* "~&Line2 to *query-io*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *terminal-io* "~&Line1 to *terminal-io*") (format *debug-io* "~&Line2 to *debug-io*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *terminal-io* "~&Line1 to *terminal-io*") (format *trace-output* "~&Line2 to *trace-output*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *standard-output* "~&Line1 to *standard-output*") (format *terminal-io* "~&Line2 to *terminal-io*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *standard-output* "~&Line1 to *standard-output*") (format *standard-output* "~&Line2 to *standard-output*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *standard-output* "~&Line1 to *standard-output*") (format *error-output* "~&Line2 to *error-output*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *standard-output* "~&Line1 to *standard-output*") (format *query-io* "~&Line2 to *query-io*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *standard-output* "~&Line1 to *standard-output*") (format *debug-io* "~&Line2 to *debug-io*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *standard-output* "~&Line1 to *standard-output*") (format *trace-output* "~&Line2 to *trace-output*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *error-output* "~&Line1 to *error-output*") (format *terminal-io* "~&Line2 to *terminal-io*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *error-output* "~&Line1 to *error-output*") (format *standard-output* "~&Line2 to *standard-output*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *error-output* "~&Line1 to *error-output*") (format *error-output* "~&Line2 to *error-output*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *error-output* "~&Line1 to *error-output*") (format *query-io* "~&Line2 to *query-io*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *error-output* "~&Line1 to *error-output*") (format *debug-io* "~&Line2 to *debug-io*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *error-output* "~&Line1 to *error-output*") (format *trace-output* "~&Line2 to *trace-output*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *query-io* "~&Line1 to *query-io*") (format *terminal-io* "~&Line2 to *terminal-io*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *query-io* "~&Line1 to *query-io*") (format *standard-output* "~&Line2 to *standard-output*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *query-io* "~&Line1 to *query-io*") (format *error-output* "~&Line2 to *error-output*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *query-io* "~&Line1 to *query-io*") (format *query-io* "~&Line2 to *query-io*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *query-io* "~&Line1 to *query-io*") (format *debug-io* "~&Line2 to *debug-io*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *query-io* "~&Line1 to *query-io*") (format *trace-output* "~&Line2 to *trace-output*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *debug-io* "~&Line1 to *debug-io*") (format *terminal-io* "~&Line2 to *terminal-io*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *debug-io* "~&Line1 to *debug-io*") (format *standard-output* "~&Line2 to *standard-output*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *debug-io* "~&Line1 to *debug-io*") (format *error-output* "~&Line2 to *error-output*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *debug-io* "~&Line1 to *debug-io*") (format *query-io* "~&Line2 to *query-io*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *debug-io* "~&Line1 to *debug-io*") (format *debug-io* "~&Line2 to *debug-io*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *debug-io* "~&Line1 to *debug-io*") (format *trace-output* "~&Line2 to *trace-output*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *trace-output* "~&Line1 to *trace-output*") (format *terminal-io* "~&Line2 to *terminal-io*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *trace-output* "~&Line1 to *trace-output*") (format *standard-output* "~&Line2 to *standard-output*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *trace-output* "~&Line1 to *trace-output*") (format *error-output* "~&Line2 to *error-output*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *trace-output* "~&Line1 to *trace-output*") (format *query-io* "~&Line2 to *query-io*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *trace-output* "~&Line1 to *trace-output*") (format *debug-io* "~&Line2 to *debug-io*") (values))' 2>&1 | cat >> fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (format *trace-output* "~&Line1 to *trace-output*") (format *trace-output* "~&Line2 to *trace-output*") (values))' 2>&1 | cat >> fresh-line.out if grep 'Line1.*Line2' fresh-line.out > /dev/null; then exit 1; fi rm -f fresh-line.out ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem 0>/dev/null Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x11d6f000 - 0x11d8ffff 0x80000000 - 0x800bffff 0x155b8f7000 - 0x155b911fff 0x155b912000 - 0x155b912fff 0x155b913000 - 0x155b913fff 0x155b914000 - 0x155b915fff 0x155b916000 - 0x155b917fff 0x155b918000 - 0x155b91efff 0x155b91f000 - 0x155b91ffff 0x155b920000 - 0x155b920fff 0x155b922000 - 0x155b923fff 0x155b924000 - 0x155b962fff 0x155b963000 - 0x155b964fff 0x155b965000 - 0x155b96bfff 0x155b96c000 - 0x155b96cfff 0x155b96d000 - 0x155b992fff 0x155b993000 - 0x155b996fff 0x155b997000 - 0x155b997fff 0x155b998000 - 0x155b999fff 0x155b99a000 - 0x155b99afff 0x155b99b000 - 0x155b99bfff 0x155b99c000 - 0x155b99cfff 0x155b99d000 - 0x155b9a0fff 0x155b9a1000 - 0x155b9a1fff 0x155b9a2000 - 0x155b9a2fff 0x155b9a3000 - 0x155b9a4fff 0x155b9a5000 - 0x155b9a5fff 0x155b9a6000 - 0x155b9a6fff 0x155b9a7000 - 0x155bb12fff 0x155bb13000 - 0x155bb15fff 0x155bb16000 - 0x155bb16fff 0x155bb17000 - 0x155bb19fff 0x155bb1a000 - 0x155bb2cfff 0x155bb2d000 - 0x155bb2dfff 0x155bb2e000 - 0x155bb2efff 0x155bb2f000 - 0x155bc4cfff 0x155bc4d000 - 0x155bc4ffff 0x155bc50000 - 0x155bc52fff 0x155bc53000 - 0x155bc57fff 0x155bc58000 - 0x155bcacfff 0x155bcad000 - 0x155c357fff 0x3fffb16000 - 0x3fffb36fff output=`echo '(princ (+ 11 99))' | ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem - | tr -d '\r'`; test "$output" = 110 || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x16eed000 - 0x16f0dfff 0x80000000 - 0x800bffff 0x1566bfc000 - 0x1566c16fff 0x1566c17000 - 0x1566c17fff 0x1566c18000 - 0x1566c18fff 0x1566c19000 - 0x1566c1afff 0x1566c1b000 - 0x1566c1cfff 0x1566c1d000 - 0x1566c23fff 0x1566c24000 - 0x1566c24fff 0x1566c25000 - 0x1566c25fff 0x1566c27000 - 0x1566c28fff 0x1566c29000 - 0x1566c67fff 0x1566c68000 - 0x1566c69fff 0x1566c6a000 - 0x1566c70fff 0x1566c71000 - 0x1566c71fff 0x1566c72000 - 0x1566c97fff 0x1566c98000 - 0x1566c9bfff 0x1566c9c000 - 0x1566c9cfff 0x1566c9d000 - 0x1566c9efff 0x1566c9f000 - 0x1566c9ffff 0x1566ca0000 - 0x1566ca0fff 0x1566ca1000 - 0x1566ca1fff 0x1566ca2000 - 0x1566ca5fff 0x1566ca6000 - 0x1566ca6fff 0x1566ca7000 - 0x1566ca7fff 0x1566ca8000 - 0x1566ca9fff 0x1566caa000 - 0x1566caafff 0x1566cab000 - 0x1566cabfff 0x1566cac000 - 0x1566e17fff 0x1566e18000 - 0x1566e1afff 0x1566e1b000 - 0x1566e1bfff 0x1566e1c000 - 0x1566e1efff 0x1566e1f000 - 0x1566e31fff 0x1566e32000 - 0x1566e32fff 0x1566e33000 - 0x1566e33fff 0x1566e34000 - 0x1566f51fff 0x1566f52000 - 0x1566f54fff 0x1566f55000 - 0x1566f57fff 0x1566f58000 - 0x1566f5cfff 0x1566f5d000 - 0x1566fb1fff 0x1566fb2000 - 0x156765cfff 0x3fffe0b000 - 0x3fffe2bfff test "`echo '(+ foo bar)' | ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(setq foo 11 bar 99)' -repl | tr -d '\r'| tr '\n' '_'`" = '99_[1]> _110_' || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xa8b000 - 0xaabfff 0x80000000 - 0x800bffff 0x158b534000 - 0x158b54efff 0x158b54f000 - 0x158b54ffff 0x158b550000 - 0x158b550fff 0x158b551000 - 0x158b552fff 0x158b553000 - 0x158b554fff 0x158b555000 - 0x158b55bfff 0x158b55c000 - 0x158b55cfff 0x158b55d000 - 0x158b55dfff 0x158b55f000 - 0x158b560fff 0x158b561000 - 0x158b59ffff 0x158b5a0000 - 0x158b5a1fff 0x158b5a2000 - 0x158b5a8fff 0x158b5a9000 - 0x158b5a9fff 0x158b5aa000 - 0x158b5cffff 0x158b5d0000 - 0x158b5d3fff 0x158b5d4000 - 0x158b5d4fff 0x158b5d5000 - 0x158b5d6fff 0x158b5d7000 - 0x158b5d7fff 0x158b5d8000 - 0x158b5d8fff 0x158b5d9000 - 0x158b5d9fff 0x158b5da000 - 0x158b5ddfff 0x158b5de000 - 0x158b5defff 0x158b5df000 - 0x158b5dffff 0x158b5e0000 - 0x158b5e1fff 0x158b5e2000 - 0x158b5e2fff 0x158b5e3000 - 0x158b5e3fff 0x158b5e4000 - 0x158b74ffff 0x158b750000 - 0x158b752fff 0x158b753000 - 0x158b753fff 0x158b754000 - 0x158b756fff 0x158b757000 - 0x158b769fff 0x158b76a000 - 0x158b76afff 0x158b76b000 - 0x158b76bfff 0x158b76c000 - 0x158b889fff 0x158b88a000 - 0x158b88cfff 0x158b88d000 - 0x158b88ffff 0x158b890000 - 0x158b894fff 0x158b895000 - 0x158b8e9fff 0x158b8ea000 - 0x158bf94fff 0x3fffe70000 - 0x3fffe90fff rm -f script.lisp; echo '(error "loading script.lisp")' > script.lisp if ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(load "script.lisp")' -repl < /dev/null; then exit 1; else :; fi Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1e1c4000 - 0x1e1e4fff 0x80000000 - 0x800bffff 0x1562dee000 - 0x1562e08fff 0x1562e09000 - 0x1562e09fff 0x1562e0a000 - 0x1562e0afff 0x1562e0b000 - 0x1562e0cfff 0x1562e0d000 - 0x1562e0efff 0x1562e0f000 - 0x1562e15fff 0x1562e16000 - 0x1562e16fff 0x1562e17000 - 0x1562e17fff 0x1562e19000 - 0x1562e1afff 0x1562e1b000 - 0x1562e59fff 0x1562e5a000 - 0x1562e5bfff 0x1562e5c000 - 0x1562e62fff 0x1562e63000 - 0x1562e63fff 0x1562e64000 - 0x1562e89fff 0x1562e8a000 - 0x1562e8dfff 0x1562e8e000 - 0x1562e8efff 0x1562e8f000 - 0x1562e90fff 0x1562e91000 - 0x1562e91fff 0x1562e92000 - 0x1562e92fff 0x1562e93000 - 0x1562e93fff 0x1562e94000 - 0x1562e97fff 0x1562e98000 - 0x1562e98fff 0x1562e99000 - 0x1562e99fff 0x1562e9a000 - 0x1562e9bfff 0x1562e9c000 - 0x1562e9cfff 0x1562e9d000 - 0x1562e9dfff 0x1562e9e000 - 0x1563009fff 0x156300a000 - 0x156300cfff 0x156300d000 - 0x156300dfff 0x156300e000 - 0x1563010fff 0x1563011000 - 0x1563023fff 0x1563024000 - 0x1563024fff 0x1563025000 - 0x1563025fff 0x1563026000 - 0x1563143fff 0x1563144000 - 0x1563146fff 0x1563147000 - 0x1563149fff 0x156314a000 - 0x156314efff 0x156314f000 - 0x15631a3fff 0x15631a4000 - 0x156384efff 0x3fffa4a000 - 0x3fffa6afff ;; Loading file script.lisp ... *** - loading script.lisp The following restarts are available: SKIP :R1 skip (ERROR loading script.lisp) RETRY :R2 retry (ERROR loading script.lisp) STOP :R3 stop loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/script.lisp ABORT :R4 Abort main loop rm -f script.lisp; echo '(eval-when (:compile-toplevel) (princ *args*))' > script.lisp output=`./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -q -M lispinit.mem -c script.lisp foo bar`; test "$output" = '(foo bar)' || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x34d000 - 0x36dfff 0x80000000 - 0x800bffff 0x157170f000 - 0x1571729fff 0x157172a000 - 0x157172afff 0x157172b000 - 0x157172bfff 0x157172c000 - 0x157172dfff 0x157172e000 - 0x157172ffff 0x1571730000 - 0x1571736fff 0x1571737000 - 0x1571737fff 0x1571738000 - 0x1571738fff 0x157173a000 - 0x157173bfff 0x157173c000 - 0x157177afff 0x157177b000 - 0x157177cfff 0x157177d000 - 0x1571783fff 0x1571784000 - 0x1571784fff 0x1571785000 - 0x15717aafff 0x15717ab000 - 0x15717aefff 0x15717af000 - 0x15717affff 0x15717b0000 - 0x15717b1fff 0x15717b2000 - 0x15717b2fff 0x15717b3000 - 0x15717b3fff 0x15717b4000 - 0x15717b4fff 0x15717b5000 - 0x15717b8fff 0x15717b9000 - 0x15717b9fff 0x15717ba000 - 0x15717bafff 0x15717bb000 - 0x15717bcfff 0x15717bd000 - 0x15717bdfff 0x15717be000 - 0x15717befff 0x15717bf000 - 0x157192afff 0x157192b000 - 0x157192dfff 0x157192e000 - 0x157192efff 0x157192f000 - 0x1571931fff 0x1571932000 - 0x1571944fff 0x1571945000 - 0x1571945fff 0x1571946000 - 0x1571946fff 0x1571947000 - 0x1571a64fff 0x1571a65000 - 0x1571a67fff 0x1571a68000 - 0x1571a6afff 0x1571a6b000 - 0x1571a6ffff 0x1571a70000 - 0x1571ac4fff 0x1571ac5000 - 0x157216ffff 0x3fff9d8000 - 0x3fff9f8fff (echo '(progn (setf (stream-element-type *standard-input*) (quote (unsigned-byte 8))) (exit 42))' | ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -; test $? = 42) || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xd6d0000 - 0xd6f0fff 0x80000000 - 0x800bffff 0x157a855000 - 0x157a86ffff 0x157a870000 - 0x157a870fff 0x157a871000 - 0x157a871fff 0x157a872000 - 0x157a873fff 0x157a874000 - 0x157a875fff 0x157a876000 - 0x157a87cfff 0x157a87d000 - 0x157a87dfff 0x157a87e000 - 0x157a87efff 0x157a880000 - 0x157a881fff 0x157a882000 - 0x157a8c0fff 0x157a8c1000 - 0x157a8c2fff 0x157a8c3000 - 0x157a8c9fff 0x157a8ca000 - 0x157a8cafff 0x157a8cb000 - 0x157a8f0fff 0x157a8f1000 - 0x157a8f4fff 0x157a8f5000 - 0x157a8f5fff 0x157a8f6000 - 0x157a8f7fff 0x157a8f8000 - 0x157a8f8fff 0x157a8f9000 - 0x157a8f9fff 0x157a8fa000 - 0x157a8fafff 0x157a8fb000 - 0x157a8fefff 0x157a8ff000 - 0x157a8fffff 0x157a900000 - 0x157a900fff 0x157a901000 - 0x157a902fff 0x157a903000 - 0x157a903fff 0x157a904000 - 0x157a904fff 0x157a905000 - 0x157aa70fff 0x157aa71000 - 0x157aa73fff 0x157aa74000 - 0x157aa74fff 0x157aa75000 - 0x157aa77fff 0x157aa78000 - 0x157aa8afff 0x157aa8b000 - 0x157aa8bfff 0x157aa8c000 - 0x157aa8cfff 0x157aa8d000 - 0x157abaafff 0x157abab000 - 0x157abadfff 0x157abae000 - 0x157abb0fff 0x157abb1000 - 0x157abb5fff 0x157abb6000 - 0x157ac0afff 0x157ac0b000 - 0x157b2b5fff 0x3fffda1000 - 0x3fffdc1fff output=`echo '(setf (stream-element-type *standard-output*) (quote (unsigned-byte 8))) (write-sequence (convert-string-to-bytes "42" charset:ascii) *standard-output*) (setf (stream-element-type *standard-output*) (quote character)) (terpri)' | ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem - | tr -d '\r'`; test "$output" = 42 || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x35b23000 - 0x35b43fff 0x80000000 - 0x800bffff 0x155edb7000 - 0x155edd1fff 0x155edd2000 - 0x155edd2fff 0x155edd3000 - 0x155edd3fff 0x155edd4000 - 0x155edd5fff 0x155edd6000 - 0x155edd7fff 0x155edd8000 - 0x155eddefff 0x155eddf000 - 0x155eddffff 0x155ede0000 - 0x155ede0fff 0x155ede2000 - 0x155ede3fff 0x155ede4000 - 0x155ee22fff 0x155ee23000 - 0x155ee24fff 0x155ee25000 - 0x155ee2bfff 0x155ee2c000 - 0x155ee2cfff 0x155ee2d000 - 0x155ee52fff 0x155ee53000 - 0x155ee56fff 0x155ee57000 - 0x155ee57fff 0x155ee58000 - 0x155ee59fff 0x155ee5a000 - 0x155ee5afff 0x155ee5b000 - 0x155ee5bfff 0x155ee5c000 - 0x155ee5cfff 0x155ee5d000 - 0x155ee60fff 0x155ee61000 - 0x155ee61fff 0x155ee62000 - 0x155ee62fff 0x155ee63000 - 0x155ee64fff 0x155ee65000 - 0x155ee65fff 0x155ee66000 - 0x155ee66fff 0x155ee67000 - 0x155efd2fff 0x155efd3000 - 0x155efd5fff 0x155efd6000 - 0x155efd6fff 0x155efd7000 - 0x155efd9fff 0x155efda000 - 0x155efecfff 0x155efed000 - 0x155efedfff 0x155efee000 - 0x155efeefff 0x155efef000 - 0x155f10cfff 0x155f10d000 - 0x155f10ffff 0x155f110000 - 0x155f112fff 0x155f113000 - 0x155f117fff 0x155f118000 - 0x155f16cfff 0x155f16d000 - 0x155f817fff 0x3fffe47000 - 0x3fffe67fff rm -f script.lisp; echo '(+ 11 99)' > script.lisp output=`./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem < script.lisp | tr -d '\r'`; test "$output" = 110 || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x8349000 - 0x8369fff 0x80000000 - 0x800bffff 0x15901a9000 - 0x15901c3fff 0x15901c4000 - 0x15901c4fff 0x15901c5000 - 0x15901c5fff 0x15901c6000 - 0x15901c7fff 0x15901c8000 - 0x15901c9fff 0x15901ca000 - 0x15901d0fff 0x15901d1000 - 0x15901d1fff 0x15901d2000 - 0x15901d2fff 0x15901d4000 - 0x15901d5fff 0x15901d6000 - 0x1590214fff 0x1590215000 - 0x1590216fff 0x1590217000 - 0x159021dfff 0x159021e000 - 0x159021efff 0x159021f000 - 0x1590244fff 0x1590245000 - 0x1590248fff 0x1590249000 - 0x1590249fff 0x159024a000 - 0x159024bfff 0x159024c000 - 0x159024cfff 0x159024d000 - 0x159024dfff 0x159024e000 - 0x159024efff 0x159024f000 - 0x1590252fff 0x1590253000 - 0x1590253fff 0x1590254000 - 0x1590254fff 0x1590255000 - 0x1590256fff 0x1590257000 - 0x1590257fff 0x1590258000 - 0x1590258fff 0x1590259000 - 0x15903c4fff 0x15903c5000 - 0x15903c7fff 0x15903c8000 - 0x15903c8fff 0x15903c9000 - 0x15903cbfff 0x15903cc000 - 0x15903defff 0x15903df000 - 0x15903dffff 0x15903e0000 - 0x15903e0fff 0x15903e1000 - 0x15904fefff 0x15904ff000 - 0x1590501fff 0x1590502000 - 0x1590504fff 0x1590505000 - 0x1590509fff 0x159050a000 - 0x159055efff 0x159055f000 - 0x1590c09fff 0x3fffa27000 - 0x3fffa47fff rm -f script.lisp; echo '(princ (+ 11 99))' > script.lisp output=`./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem script.lisp | tr -d '\r'`; test "$output" = 110 || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2a49e000 - 0x2a4befff 0x80000000 - 0x800bffff 0x1590047000 - 0x1590061fff 0x1590062000 - 0x1590062fff 0x1590063000 - 0x1590063fff 0x1590064000 - 0x1590065fff 0x1590066000 - 0x1590067fff 0x1590068000 - 0x159006efff 0x159006f000 - 0x159006ffff 0x1590070000 - 0x1590070fff 0x1590072000 - 0x1590073fff 0x1590074000 - 0x15900b2fff 0x15900b3000 - 0x15900b4fff 0x15900b5000 - 0x15900bbfff 0x15900bc000 - 0x15900bcfff 0x15900bd000 - 0x15900e2fff 0x15900e3000 - 0x15900e6fff 0x15900e7000 - 0x15900e7fff 0x15900e8000 - 0x15900e9fff 0x15900ea000 - 0x15900eafff 0x15900eb000 - 0x15900ebfff 0x15900ec000 - 0x15900ecfff 0x15900ed000 - 0x15900f0fff 0x15900f1000 - 0x15900f1fff 0x15900f2000 - 0x15900f2fff 0x15900f3000 - 0x15900f4fff 0x15900f5000 - 0x15900f5fff 0x15900f6000 - 0x15900f6fff 0x15900f7000 - 0x1590262fff 0x1590263000 - 0x1590265fff 0x1590266000 - 0x1590266fff 0x1590267000 - 0x1590269fff 0x159026a000 - 0x159027cfff 0x159027d000 - 0x159027dfff 0x159027e000 - 0x159027efff 0x159027f000 - 0x159039cfff 0x159039d000 - 0x159039ffff 0x15903a0000 - 0x15903a2fff 0x15903a3000 - 0x15903a7fff 0x15903a8000 - 0x15903fcfff 0x15903fd000 - 0x1590aa7fff 0x3fffd9b000 - 0x3fffdbbfff rm -f script.lisp; echo '(+ foo bar)' > script.lisp output=`./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(setq foo 11 bar 99)' -repl < script.lisp | tr -d '\r'| tr '\n' '_'`; test "$output" = 99_110_ || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xf5c8000 - 0xf5e8fff 0x80000000 - 0x800bffff 0x156c137000 - 0x156c151fff 0x156c152000 - 0x156c152fff 0x156c153000 - 0x156c153fff 0x156c154000 - 0x156c155fff 0x156c156000 - 0x156c157fff 0x156c158000 - 0x156c15efff 0x156c15f000 - 0x156c15ffff 0x156c160000 - 0x156c160fff 0x156c162000 - 0x156c163fff 0x156c164000 - 0x156c1a2fff 0x156c1a3000 - 0x156c1a4fff 0x156c1a5000 - 0x156c1abfff 0x156c1ac000 - 0x156c1acfff 0x156c1ad000 - 0x156c1d2fff 0x156c1d3000 - 0x156c1d6fff 0x156c1d7000 - 0x156c1d7fff 0x156c1d8000 - 0x156c1d9fff 0x156c1da000 - 0x156c1dafff 0x156c1db000 - 0x156c1dbfff 0x156c1dc000 - 0x156c1dcfff 0x156c1dd000 - 0x156c1e0fff 0x156c1e1000 - 0x156c1e1fff 0x156c1e2000 - 0x156c1e2fff 0x156c1e3000 - 0x156c1e4fff 0x156c1e5000 - 0x156c1e5fff 0x156c1e6000 - 0x156c1e6fff 0x156c1e7000 - 0x156c352fff 0x156c353000 - 0x156c355fff 0x156c356000 - 0x156c356fff 0x156c357000 - 0x156c359fff 0x156c35a000 - 0x156c36cfff 0x156c36d000 - 0x156c36dfff 0x156c36e000 - 0x156c36efff 0x156c36f000 - 0x156c48cfff 0x156c48d000 - 0x156c48ffff 0x156c490000 - 0x156c492fff 0x156c493000 - 0x156c497fff 0x156c498000 - 0x156c4ecfff 0x156c4ed000 - 0x156cb97fff 0x3fffbe8000 - 0x3fffc08fff rm -f script.lisp; echo '(progn (setf (stream-element-type *standard-input*) (quote (unsigned-byte 8))) (exit 42))' > script.lisp (./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem < script.lisp; test $? = 42) || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x29f6000 - 0x2a16fff 0x80000000 - 0x800bffff 0x1584078000 - 0x1584092fff 0x1584093000 - 0x1584093fff 0x1584094000 - 0x1584094fff 0x1584095000 - 0x1584096fff 0x1584097000 - 0x1584098fff 0x1584099000 - 0x158409ffff 0x15840a0000 - 0x15840a0fff 0x15840a1000 - 0x15840a1fff 0x15840a3000 - 0x15840a4fff 0x15840a5000 - 0x15840e3fff 0x15840e4000 - 0x15840e5fff 0x15840e6000 - 0x15840ecfff 0x15840ed000 - 0x15840edfff 0x15840ee000 - 0x1584113fff 0x1584114000 - 0x1584117fff 0x1584118000 - 0x1584118fff 0x1584119000 - 0x158411afff 0x158411b000 - 0x158411bfff 0x158411c000 - 0x158411cfff 0x158411d000 - 0x158411dfff 0x158411e000 - 0x1584121fff 0x1584122000 - 0x1584122fff 0x1584123000 - 0x1584123fff 0x1584124000 - 0x1584125fff 0x1584126000 - 0x1584126fff 0x1584127000 - 0x1584127fff 0x1584128000 - 0x1584293fff 0x1584294000 - 0x1584296fff 0x1584297000 - 0x1584297fff 0x1584298000 - 0x158429afff 0x158429b000 - 0x15842adfff 0x15842ae000 - 0x15842aefff 0x15842af000 - 0x15842affff 0x15842b0000 - 0x15843cdfff 0x15843ce000 - 0x15843d0fff 0x15843d1000 - 0x15843d3fff 0x15843d4000 - 0x15843d8fff 0x15843d9000 - 0x158442dfff 0x158442e000 - 0x1584ad8fff 0x3fffe63000 - 0x3fffe83fff (./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem script.lisp; test $? = 42) || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xd394000 - 0xd3b4fff 0x80000000 - 0x800bffff 0x1556da1000 - 0x1556dbbfff 0x1556dbc000 - 0x1556dbcfff 0x1556dbd000 - 0x1556dbdfff 0x1556dbe000 - 0x1556dbffff 0x1556dc0000 - 0x1556dc1fff 0x1556dc2000 - 0x1556dc8fff 0x1556dc9000 - 0x1556dc9fff 0x1556dca000 - 0x1556dcafff 0x1556dcc000 - 0x1556dcdfff 0x1556dce000 - 0x1556e0cfff 0x1556e0d000 - 0x1556e0efff 0x1556e0f000 - 0x1556e15fff 0x1556e16000 - 0x1556e16fff 0x1556e17000 - 0x1556e3cfff 0x1556e3d000 - 0x1556e40fff 0x1556e41000 - 0x1556e41fff 0x1556e42000 - 0x1556e43fff 0x1556e44000 - 0x1556e44fff 0x1556e45000 - 0x1556e45fff 0x1556e46000 - 0x1556e46fff 0x1556e47000 - 0x1556e4afff 0x1556e4b000 - 0x1556e4bfff 0x1556e4c000 - 0x1556e4cfff 0x1556e4d000 - 0x1556e4efff 0x1556e4f000 - 0x1556e4ffff 0x1556e50000 - 0x1556e50fff 0x1556e51000 - 0x1556fbcfff 0x1556fbd000 - 0x1556fbffff 0x1556fc0000 - 0x1556fc0fff 0x1556fc1000 - 0x1556fc3fff 0x1556fc4000 - 0x1556fd6fff 0x1556fd7000 - 0x1556fd7fff 0x1556fd8000 - 0x1556fd8fff 0x1556fd9000 - 0x15570f6fff 0x15570f7000 - 0x15570f9fff 0x15570fa000 - 0x15570fcfff 0x15570fd000 - 0x1557101fff 0x1557102000 - 0x1557156fff 0x1557157000 - 0x1557801fff 0x3fffa1b000 - 0x3fffa3bfff rm -f script.lisp; echo '(setf (stream-element-type *standard-output*) (quote (unsigned-byte 8))) (write-sequence (convert-string-to-bytes "42" charset:ascii) *standard-output*) (setf (stream-element-type *standard-output*) (quote character)) (terpri)' > script.lisp output=`./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem script.lisp | tr -d '\r'`; test "$output" = 42 || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x5434000 - 0x5454fff 0x80000000 - 0x800bffff 0x1592fcb000 - 0x1592fe5fff 0x1592fe6000 - 0x1592fe6fff 0x1592fe7000 - 0x1592fe7fff 0x1592fe8000 - 0x1592fe9fff 0x1592fea000 - 0x1592febfff 0x1592fec000 - 0x1592ff2fff 0x1592ff3000 - 0x1592ff3fff 0x1592ff4000 - 0x1592ff4fff 0x1592ff6000 - 0x1592ff7fff 0x1592ff8000 - 0x1593036fff 0x1593037000 - 0x1593038fff 0x1593039000 - 0x159303ffff 0x1593040000 - 0x1593040fff 0x1593041000 - 0x1593066fff 0x1593067000 - 0x159306afff 0x159306b000 - 0x159306bfff 0x159306c000 - 0x159306dfff 0x159306e000 - 0x159306efff 0x159306f000 - 0x159306ffff 0x1593070000 - 0x1593070fff 0x1593071000 - 0x1593074fff 0x1593075000 - 0x1593075fff 0x1593076000 - 0x1593076fff 0x1593077000 - 0x1593078fff 0x1593079000 - 0x1593079fff 0x159307a000 - 0x159307afff 0x159307b000 - 0x15931e6fff 0x15931e7000 - 0x15931e9fff 0x15931ea000 - 0x15931eafff 0x15931eb000 - 0x15931edfff 0x15931ee000 - 0x1593200fff 0x1593201000 - 0x1593201fff 0x1593202000 - 0x1593202fff 0x1593203000 - 0x1593320fff 0x1593321000 - 0x1593323fff 0x1593324000 - 0x1593326fff 0x1593327000 - 0x159332bfff 0x159332c000 - 0x1593380fff 0x1593381000 - 0x1593a2bfff 0x3fffb25000 - 0x3fffb45fff rm -f script.lisp; echo '(with-open-stream (s (make-stream :output :element-type (quote (unsigned-byte 8)))) (write-sequence (convert-string-to-bytes "42" charset:ascii) s) (values))' > script.lisp output=`./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem < script.lisp | tr -d '\r'`; test "$output" = 42 || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2d706000 - 0x2d726fff 0x80000000 - 0x800bffff 0x158c944000 - 0x158c95efff 0x158c95f000 - 0x158c95ffff 0x158c960000 - 0x158c960fff 0x158c961000 - 0x158c962fff 0x158c963000 - 0x158c964fff 0x158c965000 - 0x158c96bfff 0x158c96c000 - 0x158c96cfff 0x158c96d000 - 0x158c96dfff 0x158c96f000 - 0x158c970fff 0x158c971000 - 0x158c9affff 0x158c9b0000 - 0x158c9b1fff 0x158c9b2000 - 0x158c9b8fff 0x158c9b9000 - 0x158c9b9fff 0x158c9ba000 - 0x158c9dffff 0x158c9e0000 - 0x158c9e3fff 0x158c9e4000 - 0x158c9e4fff 0x158c9e5000 - 0x158c9e6fff 0x158c9e7000 - 0x158c9e7fff 0x158c9e8000 - 0x158c9e8fff 0x158c9e9000 - 0x158c9e9fff 0x158c9ea000 - 0x158c9edfff 0x158c9ee000 - 0x158c9eefff 0x158c9ef000 - 0x158c9effff 0x158c9f0000 - 0x158c9f1fff 0x158c9f2000 - 0x158c9f2fff 0x158c9f3000 - 0x158c9f3fff 0x158c9f4000 - 0x158cb5ffff 0x158cb60000 - 0x158cb62fff 0x158cb63000 - 0x158cb63fff 0x158cb64000 - 0x158cb66fff 0x158cb67000 - 0x158cb79fff 0x158cb7a000 - 0x158cb7afff 0x158cb7b000 - 0x158cb7bfff 0x158cb7c000 - 0x158cc99fff 0x158cc9a000 - 0x158cc9cfff 0x158cc9d000 - 0x158cc9ffff 0x158cca0000 - 0x158cca4fff 0x158cca5000 - 0x158ccf9fff 0x158ccfa000 - 0x158d3a4fff 0x3ffff5a000 - 0x3ffff7afff output=`./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem script.lisp | tr -d '\r'`; test "$output" = 42 || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x6d83000 - 0x6da3fff 0x80000000 - 0x800bffff 0x15723a0000 - 0x15723bafff 0x15723bb000 - 0x15723bbfff 0x15723bc000 - 0x15723bcfff 0x15723bd000 - 0x15723befff 0x15723bf000 - 0x15723c0fff 0x15723c1000 - 0x15723c7fff 0x15723c8000 - 0x15723c8fff 0x15723c9000 - 0x15723c9fff 0x15723cb000 - 0x15723ccfff 0x15723cd000 - 0x157240bfff 0x157240c000 - 0x157240dfff 0x157240e000 - 0x1572414fff 0x1572415000 - 0x1572415fff 0x1572416000 - 0x157243bfff 0x157243c000 - 0x157243ffff 0x1572440000 - 0x1572440fff 0x1572441000 - 0x1572442fff 0x1572443000 - 0x1572443fff 0x1572444000 - 0x1572444fff 0x1572445000 - 0x1572445fff 0x1572446000 - 0x1572449fff 0x157244a000 - 0x157244afff 0x157244b000 - 0x157244bfff 0x157244c000 - 0x157244dfff 0x157244e000 - 0x157244efff 0x157244f000 - 0x157244ffff 0x1572450000 - 0x15725bbfff 0x15725bc000 - 0x15725befff 0x15725bf000 - 0x15725bffff 0x15725c0000 - 0x15725c2fff 0x15725c3000 - 0x15725d5fff 0x15725d6000 - 0x15725d6fff 0x15725d7000 - 0x15725d7fff 0x15725d8000 - 0x15726f5fff 0x15726f6000 - 0x15726f8fff 0x15726f9000 - 0x15726fbfff 0x15726fc000 - 0x1572700fff 0x1572701000 - 0x1572755fff 0x1572756000 - 0x1572e00fff 0x3fff865000 - 0x3fff885fff rm -f script.lisp; nohup ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x 42 2>&1 > script.lisp; output_last_line=`sed -n -e '$p' script.lisp | tr -d '\r'`; test "$output_last_line" = 42 || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xded0000 - 0xdef0fff 0x80000000 - 0x800bffff 0x159456d000 - 0x1594587fff 0x1594588000 - 0x1594588fff 0x1594589000 - 0x1594589fff 0x159458a000 - 0x159458bfff 0x159458c000 - 0x159458dfff 0x159458e000 - 0x1594594fff 0x1594595000 - 0x1594595fff 0x1594596000 - 0x1594596fff 0x1594598000 - 0x1594599fff 0x159459a000 - 0x15945d8fff 0x15945d9000 - 0x15945dafff 0x15945db000 - 0x15945e1fff 0x15945e2000 - 0x15945e2fff 0x15945e3000 - 0x1594608fff 0x1594609000 - 0x159460cfff 0x159460d000 - 0x159460dfff 0x159460e000 - 0x159460ffff 0x1594610000 - 0x1594610fff 0x1594611000 - 0x1594611fff 0x1594612000 - 0x1594612fff 0x1594613000 - 0x1594616fff 0x1594617000 - 0x1594617fff 0x1594618000 - 0x1594618fff 0x1594619000 - 0x159461afff 0x159461b000 - 0x159461bfff 0x159461c000 - 0x159461cfff 0x159461d000 - 0x1594788fff 0x1594789000 - 0x159478bfff 0x159478c000 - 0x159478cfff 0x159478d000 - 0x159478ffff 0x1594790000 - 0x15947a2fff 0x15947a3000 - 0x15947a3fff 0x15947a4000 - 0x15947a4fff 0x15947a5000 - 0x15948c2fff 0x15948c3000 - 0x15948c5fff 0x15948c6000 - 0x15948c8fff 0x15948c9000 - 0x15948cdfff 0x15948ce000 - 0x1594922fff 0x1594923000 - 0x1594fcdfff 0x3ffffc1000 - 0x3ffffe1fff rm -f script.lisp script.fas script.lib output="`./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (setq *error-output* *standard-output*) (error "myerror"))' | tr -d '\r'`"; test "$output" = '*** - myerror' || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3bf43000 - 0x3bf63fff 0x80000000 - 0x800bffff 0x1567e0b000 - 0x1567e25fff 0x1567e26000 - 0x1567e26fff 0x1567e27000 - 0x1567e27fff 0x1567e28000 - 0x1567e29fff 0x1567e2a000 - 0x1567e2bfff 0x1567e2c000 - 0x1567e32fff 0x1567e33000 - 0x1567e33fff 0x1567e34000 - 0x1567e34fff 0x1567e36000 - 0x1567e37fff 0x1567e38000 - 0x1567e76fff 0x1567e77000 - 0x1567e78fff 0x1567e79000 - 0x1567e7ffff 0x1567e80000 - 0x1567e80fff 0x1567e81000 - 0x1567ea6fff 0x1567ea7000 - 0x1567eaafff 0x1567eab000 - 0x1567eabfff 0x1567eac000 - 0x1567eadfff 0x1567eae000 - 0x1567eaefff 0x1567eaf000 - 0x1567eaffff 0x1567eb0000 - 0x1567eb0fff 0x1567eb1000 - 0x1567eb4fff 0x1567eb5000 - 0x1567eb5fff 0x1567eb6000 - 0x1567eb6fff 0x1567eb7000 - 0x1567eb8fff 0x1567eb9000 - 0x1567eb9fff 0x1567eba000 - 0x1567ebafff 0x1567ebb000 - 0x1568026fff 0x1568027000 - 0x1568029fff 0x156802a000 - 0x156802afff 0x156802b000 - 0x156802dfff 0x156802e000 - 0x1568040fff 0x1568041000 - 0x1568041fff 0x1568042000 - 0x1568042fff 0x1568043000 - 0x1568160fff 0x1568161000 - 0x1568163fff 0x1568164000 - 0x1568166fff 0x1568167000 - 0x156816bfff 0x156816c000 - 0x15681c0fff 0x15681c1000 - 0x156886bfff 0x3fffea6000 - 0x3fffec6fff if ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(progn (setq *error-output* *standard-output*) (error "myerror"))'; then exit 1; fi Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x36f65000 - 0x36f85fff 0x80000000 - 0x800bffff 0x15846ab000 - 0x15846c5fff 0x15846c6000 - 0x15846c6fff 0x15846c7000 - 0x15846c7fff 0x15846c8000 - 0x15846c9fff 0x15846ca000 - 0x15846cbfff 0x15846cc000 - 0x15846d2fff 0x15846d3000 - 0x15846d3fff 0x15846d4000 - 0x15846d4fff 0x15846d6000 - 0x15846d7fff 0x15846d8000 - 0x1584716fff 0x1584717000 - 0x1584718fff 0x1584719000 - 0x158471ffff 0x1584720000 - 0x1584720fff 0x1584721000 - 0x1584746fff 0x1584747000 - 0x158474afff 0x158474b000 - 0x158474bfff 0x158474c000 - 0x158474dfff 0x158474e000 - 0x158474efff 0x158474f000 - 0x158474ffff 0x1584750000 - 0x1584750fff 0x1584751000 - 0x1584754fff 0x1584755000 - 0x1584755fff 0x1584756000 - 0x1584756fff 0x1584757000 - 0x1584758fff 0x1584759000 - 0x1584759fff 0x158475a000 - 0x158475afff 0x158475b000 - 0x15848c6fff 0x15848c7000 - 0x15848c9fff 0x15848ca000 - 0x15848cafff 0x15848cb000 - 0x15848cdfff 0x15848ce000 - 0x15848e0fff 0x15848e1000 - 0x15848e1fff 0x15848e2000 - 0x15848e2fff 0x15848e3000 - 0x1584a00fff 0x1584a01000 - 0x1584a03fff 0x1584a04000 - 0x1584a06fff 0x1584a07000 - 0x1584a0bfff 0x1584a0c000 - 0x1584a60fff 0x1584a61000 - 0x158510bfff 0x3fffbe2000 - 0x3fffc02fff *** - myerror ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(truename (make-stream :output))' Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x21170000 - 0x21190fff 0x80000000 - 0x800bffff 0x1580eb7000 - 0x1580ed1fff 0x1580ed2000 - 0x1580ed2fff 0x1580ed3000 - 0x1580ed3fff 0x1580ed4000 - 0x1580ed5fff 0x1580ed6000 - 0x1580ed7fff 0x1580ed8000 - 0x1580edefff 0x1580edf000 - 0x1580edffff 0x1580ee0000 - 0x1580ee0fff 0x1580ee2000 - 0x1580ee3fff 0x1580ee4000 - 0x1580f22fff 0x1580f23000 - 0x1580f24fff 0x1580f25000 - 0x1580f2bfff 0x1580f2c000 - 0x1580f2cfff 0x1580f2d000 - 0x1580f52fff 0x1580f53000 - 0x1580f56fff 0x1580f57000 - 0x1580f57fff 0x1580f58000 - 0x1580f59fff 0x1580f5a000 - 0x1580f5afff 0x1580f5b000 - 0x1580f5bfff 0x1580f5c000 - 0x1580f5cfff 0x1580f5d000 - 0x1580f60fff 0x1580f61000 - 0x1580f61fff 0x1580f62000 - 0x1580f62fff 0x1580f63000 - 0x1580f64fff 0x1580f65000 - 0x1580f65fff 0x1580f66000 - 0x1580f66fff 0x1580f67000 - 0x15810d2fff 0x15810d3000 - 0x15810d5fff 0x15810d6000 - 0x15810d6fff 0x15810d7000 - 0x15810d9fff 0x15810da000 - 0x15810ecfff 0x15810ed000 - 0x15810edfff 0x15810ee000 - 0x15810eefff 0x15810ef000 - 0x158120cfff 0x158120d000 - 0x158120ffff 0x1581210000 - 0x1581212fff 0x1581213000 - 0x1581217fff 0x1581218000 - 0x158126cfff 0x158126d000 - 0x1581917fff 0x3fff9e0000 - 0x3fffa00fff #P"/proc/107987/fd/1" ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -q -M lispinit.mem -x '(truename (make-stream :output))'|cat Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1c17e000 - 0x1c19efff 0x80000000 - 0x800bffff 0x157c3e7000 - 0x157c401fff 0x157c402000 - 0x157c402fff 0x157c403000 - 0x157c403fff 0x157c404000 - 0x157c405fff 0x157c406000 - 0x157c407fff 0x157c408000 - 0x157c40efff 0x157c40f000 - 0x157c40ffff 0x157c410000 - 0x157c410fff 0x157c412000 - 0x157c413fff 0x157c414000 - 0x157c452fff 0x157c453000 - 0x157c454fff 0x157c455000 - 0x157c45bfff 0x157c45c000 - 0x157c45cfff 0x157c45d000 - 0x157c482fff 0x157c483000 - 0x157c486fff 0x157c487000 - 0x157c487fff 0x157c488000 - 0x157c489fff 0x157c48a000 - 0x157c48afff 0x157c48b000 - 0x157c48bfff 0x157c48c000 - 0x157c48cfff 0x157c48d000 - 0x157c490fff 0x157c491000 - 0x157c491fff 0x157c492000 - 0x157c492fff 0x157c493000 - 0x157c494fff 0x157c495000 - 0x157c495fff 0x157c496000 - 0x157c496fff 0x157c497000 - 0x157c602fff 0x157c603000 - 0x157c605fff 0x157c606000 - 0x157c606fff 0x157c607000 - 0x157c609fff 0x157c60a000 - 0x157c61cfff 0x157c61d000 - 0x157c61dfff 0x157c61e000 - 0x157c61efff 0x157c61f000 - 0x157c73cfff 0x157c73d000 - 0x157c73ffff 0x157c740000 - 0x157c742fff 0x157c743000 - 0x157c747fff 0x157c748000 - 0x157c79cfff 0x157c79d000 - 0x157ce47fff 0x3fffcb7000 - 0x3fffcd7fff #P"/proc/107989/fd/1" mkdir tests cd tests && ln -s ../../tests/Makefile . cd tests && ln -s ../../tests/*.lisp . cd tests && ln -s ../../tests/*.tst . cd tests && make SHELL='/bin/sh' LEXE=.run make[1]: Entering directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests' rm -f *.erg LC_MESSAGES=en_US ../lisp.run -E utf-8 -norc -B ../ -N ../locale -M ../lispinit.mem -m 30MW -L english -c tests Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1601000 - 0x1621fff 0x80000000 - 0x800bffff 0x15666e5000 - 0x15666fffff 0x1566700000 - 0x1566700fff 0x1566701000 - 0x1566701fff 0x1566702000 - 0x1566703fff 0x1566704000 - 0x1566705fff 0x1566706000 - 0x156670cfff 0x156670d000 - 0x156670dfff 0x156670e000 - 0x156670efff 0x156670f000 - 0x156670ffff 0x1566710000 - 0x1566711fff 0x1566712000 - 0x1566750fff 0x1566751000 - 0x1566752fff 0x1566753000 - 0x1566759fff 0x156675a000 - 0x156675afff 0x156675b000 - 0x1566780fff 0x1566781000 - 0x1566784fff 0x1566785000 - 0x1566785fff 0x1566786000 - 0x1566787fff 0x1566788000 - 0x1566788fff 0x1566789000 - 0x1566789fff 0x156678a000 - 0x156678afff 0x156678b000 - 0x156678efff 0x156678f000 - 0x156678ffff 0x1566790000 - 0x1566790fff 0x1566791000 - 0x1566792fff 0x1566793000 - 0x1566793fff 0x1566794000 - 0x1566794fff 0x1566795000 - 0x1566900fff 0x1566901000 - 0x1566903fff 0x1566904000 - 0x1566904fff 0x1566905000 - 0x1566907fff 0x1566908000 - 0x156691afff 0x156691b000 - 0x156691bfff 0x156691c000 - 0x156691cfff 0x156691d000 - 0x1566a3afff 0x1566a3b000 - 0x1566a3dfff 0x1566a3e000 - 0x1566a40fff 0x1566a41000 - 0x1566a45fff 0x1566a46000 - 0x1566a9afff 0x1566a9b000 - 0x1567145fff 0x1567146000 - 0x1567148fff 0x1567149000 - 0x156714afff 0x156714b000 - 0x156714bfff 0x156714c000 - 0x156714cfff 0x3ffff53000 - 0x3ffff73fff i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I \ `+' / I 8 8 8 8 8 8 \ `-+-' / 8 8 8 ooooo 8oooo `-__|__-' 8 8 8 8 8 | 8 o 8 8 o 8 8 ------+------ ooooo 8oooooo ooo8ooo ooooo 8 Welcome to GNU CLISP 2.49.93+ (2018-02-18) Copyright (c) Bruno Haible, Michael Stoll 1992-1993 Copyright (c) Bruno Haible, Marcus Daniels 1994-1997 Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998 Copyright (c) Bruno Haible, Sam Steingold 1999-2000 Copyright (c) Sam Steingold, Bruno Haible 2001-2018 Type :h and hit Enter for context help. ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/tests.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/tests.fas 0 errors, 0 warnings Bye. LC_MESSAGES=en_US ../lisp.run -E utf-8 -norc -B ../ -N ../locale -M ../lispinit.mem -m 30MW -L english -i tests -x "(time (run-all-tests))" Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x22501000 - 0x22521fff 0x80000000 - 0x800bffff 0x155f461000 - 0x155f47bfff 0x155f47c000 - 0x155f47cfff 0x155f47d000 - 0x155f47dfff 0x155f47e000 - 0x155f47ffff 0x155f480000 - 0x155f481fff 0x155f482000 - 0x155f488fff 0x155f489000 - 0x155f489fff 0x155f48a000 - 0x155f48afff 0x155f48b000 - 0x155f48bfff 0x155f48c000 - 0x155f48dfff 0x155f48e000 - 0x155f4ccfff 0x155f4cd000 - 0x155f4cefff 0x155f4cf000 - 0x155f4d5fff 0x155f4d6000 - 0x155f4d6fff 0x155f4d7000 - 0x155f4fcfff 0x155f4fd000 - 0x155f500fff 0x155f501000 - 0x155f501fff 0x155f502000 - 0x155f503fff 0x155f504000 - 0x155f504fff 0x155f505000 - 0x155f505fff 0x155f506000 - 0x155f506fff 0x155f507000 - 0x155f50afff 0x155f50b000 - 0x155f50bfff 0x155f50c000 - 0x155f50cfff 0x155f50d000 - 0x155f50efff 0x155f50f000 - 0x155f50ffff 0x155f510000 - 0x155f510fff 0x155f511000 - 0x155f67cfff 0x155f67d000 - 0x155f67ffff 0x155f680000 - 0x155f680fff 0x155f681000 - 0x155f683fff 0x155f684000 - 0x155f696fff 0x155f697000 - 0x155f697fff 0x155f698000 - 0x155f698fff 0x155f699000 - 0x155f7b6fff 0x155f7b7000 - 0x155f7b9fff 0x155f7ba000 - 0x155f7bcfff 0x155f7bd000 - 0x155f7c1fff 0x155f7c2000 - 0x155f816fff 0x155f817000 - 0x155fec1fff 0x155fec2000 - 0x155fec4fff 0x155fec5000 - 0x155fec6fff 0x155fec7000 - 0x155fec7fff 0x155fec8000 - 0x155fec8fff 0x3fffaf9000 - 0x3fffb19fff i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I \ `+' / I 8 8 8 8 8 8 \ `-+-' / 8 8 8 ooooo 8oooo `-__|__-' 8 8 8 8 8 | 8 o 8 8 o 8 8 ------+------ ooooo 8oooooo ooo8ooo ooooo 8 Welcome to GNU CLISP 2.49.93+ (2018-02-18) Copyright (c) Bruno Haible, Michael Stoll 1992-1993 Copyright (c) Bruno Haible, Marcus Daniels 1994-1997 Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998 Copyright (c) Bruno Haible, Sam Steingold 1999-2000 Copyright (c) Sam Steingold, Bruno Haible 2001-2018 Type :h and hit Enter for context help. ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/tests.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/tests.fas RUN-TEST: started # ((LAMBDA (A B) (+ A (* B 3))) 4 5) EQL-OK: 19 ((LAMBDA (A &OPTIONAL (B 2)) (+ A (* B 3))) 4 5) EQL-OK: 19 ((LAMBDA (&OPTIONAL (A 2 B) (C 3 D) &REST X) (LIST A B C D X))) EQUAL-OK: (2 NIL 3 NIL NIL) ((LAMBDA (A B &KEY C D) (LIST A B C D)) 1 2) EQUAL-OK: (1 2 NIL NIL) ((LAMBDA (A &OPTIONAL (B 3) &REST X &KEY C (D A)) (LIST A B C D X)) 1) EQUAL-OK: (1 3 NIL 1 NIL) ((LAMBDA (X &AUX (A 3) (B 4)) (+ X (* A B))) 2) EQL-OK: 14 ((LAMBDA (X Y &OPTIONAL A B &REST Z &KEY C (D Y) &AUX (U 3) (V 4)) (+ X Y A (* B (CAR Z)) C (* D U) V)) 3 4 5 2 7 :C 6 :D 8) [SIMPLE-PROGRAM-ERROR]: :LAMBDA: keyword arguments in (7 :C 6 :D 8) should occur pairwise EQL-OK: ERROR ((LAMBDA (X Y) ((LAMBDA (A B) (LIST A B)) 'U 'V)) 5 6) EQUAL-OK: (U V) ((LAMBDA (X &ALLOW-OTHER-KEYS) (LIST X Y)) 2 :Y 3) [SIMPLE-SOURCE-PROGRAM-ERROR]: FUNCTION: Lambda list marker &ALLOW-OTHER-KEYS not allowed here. EQL-OK: ERROR LAMBDA-LIST-KEYWORDS EQUAL-OK: (&OPTIONAL &REST &KEY &ALLOW-OTHER-KEYS &AUX &BODY &WHOLE &ENVIRONMENT) (LET ((S (PRIN1-TO-STRING LAMBDA-PARAMETERS-LIMIT))) (OR (EQUAL S "65536") (EQUAL S "4294967296") (EQUAL S "4096"))) EQL-OK: T (TYPEP 'NIL 'NULL) EQL-OK: T (TYPEP '(A B C) 'NULL) EQL-OK: NIL (TYPEP 'ABC 'SYMBOL) EQL-OK: T (TYPEP 4 'ATOM) EQL-OK: T (TYPEP 55 'CONS) EQL-OK: NIL (TYPEP '(A (B C)) 'LIST) EQL-OK: T (TYPEP 5/8 'NUMBER) EQL-OK: T (TYPEP -800 'INTEGER) EQL-OK: T (TYPEP 5/7 'RATIONAL) EQL-OK: T (TYPEP 2.718 'FLOAT) EQL-OK: T (TYPEP #C(1.23 3.56) 'FLOAT) EQL-OK: NIL (TYPEP #\a 'CHARACTER) EQL-OK: T (TYPEP "abc" 'STRING) EQL-OK: T (TYPEP '#(1 2 3) 'STRING) EQL-OK: NIL (TYPEP '#(A B C) 'BIT-VECTOR) EQL-OK: NIL (TYPEP '#(A B C) 'VECTOR) EQL-OK: T (TYPEP "abc" 'VECTOR) EQL-OK: T (TYPEP '#(1 2 3 4) 'SIMPLE-VECTOR) EQL-OK: T (TYPEP 3 'SIMPLE-VECTOR) EQL-OK: NIL (TYPEP "a b cd" 'SIMPLE-STRING) EQL-OK: T (TYPEP 'ABC 'SIMPLE-STRING) EQL-OK: NIL (TYPEP #*1101 'SIMPLE-BIT-VECTOR) EQL-OK: T (TYPEP '#(1 0 0 1) 'SIMPLE-BIT-VECTOR) EQL-OK: NIL (TYPEP '#2A((A B) (C D)) 'ARRAY) EQL-OK: T (SETQ X 7) EQL-OK: 7 (TYPEP X 'COMPILED-FUNCTION) EQL-OK: NIL (TYPEP X 'COMMON) [SIMPLE-ERROR]: TYPEP: invalid type specification COMMON EQL-OK: ERROR (SUBTYPEP 'CHARACTER 'NUMBER) EQL-OK: NIL (SUBTYPEP 'NUMBER 'CHARACTER) EQL-OK: NIL (SUBTYPEP 'STRING 'NUMBER) EQL-OK: NIL (SUBTYPEP 'COMPLEX 'NUMBER) EQL-OK: T (SUBTYPEP 'FLOAT 'NUMBER) EQL-OK: T (SUBTYPEP 'FIXNUM 'NUMBER) EQL-OK: T (SUBTYPEP 'RATIONAL 'NUMBER) EQL-OK: T (SUBTYPEP 'FLOAT 'COMPLEX) EQL-OK: NIL (SUBTYPEP 'INTEGER 'RATIONAL) EQL-OK: T (SUBTYPEP 'NUMBER 'VECTOR) EQL-OK: NIL (SUBTYPEP 'VECTOR 'ARRAY) EQL-OK: T (SUBTYPEP 'NUMBER 'ARRAY) EQL-OK: NIL (NULL 'NIL) EQL-OK: T (SYMBOLP *STANDARD-INPUT*) EQL-OK: NIL (SYMBOLP 'CAR) EQL-OK: T (ATOM 'ABC) EQL-OK: T (CONSP (ACONS 'X 'Y 'A)) EQL-OK: T (LISTP '(((A . B) . C))) EQL-OK: T (LISTP 'A) EQL-OK: NIL (LISTP NIL) EQL-OK: T (LISTP '(A B C)) EQL-OK: T (NUMBERP #*101) EQL-OK: NIL (NUMBERP -5) EQL-OK: T (INTEGERP 5) EQL-OK: T (INTEGERP #\+) EQL-OK: NIL (RATIONALP 0) EQL-OK: T (FLOATP -5) EQL-OK: NIL (FLOATP (READ-FROM-STRING "1.0e30")) EQL-OK: T (FLOATP 123.4) EQL-OK: T (COMPLEXP 1/2) EQL-OK: NIL (COMPLEXP #C(2 3)) EQL-OK: T (CHARACTERP #\1) EQL-OK: T (STRINGP "abc") EQL-OK: T (STRINGP :+*/-) EQL-OK: NIL (BIT-VECTOR-P (READ-FROM-STRING "#5*01110")) EQL-OK: T (VECTORP "abc") EQL-OK: T (SIMPLE-VECTOR-P #*101) EQL-OK: NIL (SIMPLE-STRING-P "abc") EQL-OK: T (SIMPLE-STRING-P :+*/-) EQL-OK: NIL (SIMPLE-BIT-VECTOR-P #*101) EQL-OK: T (ARRAYP (READ-FROM-STRING "#7(2 4 3)")) EQL-OK: T (ARRAYP '(READ-FROM-STRING "#1a 5.77")) EQL-OK: NIL (PACKAGEP (READ-FROM-STRING "#5*01110")) EQL-OK: NIL (PACKAGEP *PACKAGE*) EQL-OK: T (FUNCTIONP 'ATOM) EQL-OK: NIL (COMPILED-FUNCTION-P 'DO) EQL-OK: NIL (EQ '(1 2 3 4 5) (COPY-LIST '(1 2 3 4 5))) EQL-OK: NIL (SETQ X '((1 . A) (2 . B) (3 . C))) EQUAL-OK: ((1 . A) (2 . B) (3 . C)) (EQ (CADR X) (CADR (COPY-ALIST X))) EQL-OK: NIL (EQ #\A #\A) EQL-OK: T (EQ "Foo" "Foo") EQL-OK: NIL (EQ "Foo" (COPY-SEQ "Foo")) EQL-OK: NIL (EQL #C(3.0 -4.0) #C(3 -4)) EQL-OK: NIL (EQL (CONS 'A 'B) (CONS 'A 'C)) EQL-OK: NIL (EQUAL '(1 2 3 4 5) (COPY-LIST '(1 2 3 4 5))) EQL-OK: T (EQUAL X (COPY-ALIST X)) EQL-OK: T (EQUAL 3 3) EQL-OK: T (EQUAL 3 3.0) EQL-OK: NIL (EQUAL 3.0 3.0) EQL-OK: T (EQUAL #C(3 -4) #C(3 -4)) EQL-OK: T (EQUALP '(1 2 3 4 5) (COPY-LIST '(1 2 3 4 5))) EQL-OK: T (EQUALP " foo" " FOO") EQL-OK: T (EQUALP " fou" " FOO") EQL-OK: NIL (EQUALP '(0 1) '(#P"")) EQL-OK: NIL (NOT 1) EQL-OK: NIL (NOT NIL) EQL-OK: T (AND (EQ 1 2) (EQ 2 3) (EQ 3 4) (EQ 4 4)) EQL-OK: NIL (AND (EQ 1 2) (EQ 3 3) (EQ 3 4) (EQ 4 4)) EQL-OK: NIL (OR (EQ 2 2) (EQ 3 3) (EQ 3 4) (EQ 4 4)) EQL-OK: T (OR (EQ 1 2) (EQ 2 3) (EQ 3 4) (EQ 4 5)) EQL-OK: NIL (SETQ LI1 '(A (B) ((C) (D)))) EQUAL-OK: (A (B) ((C) (D))) (SETQ VEC1 '#(0 1 2 3)) EQUALP-OK: #(0 1 2 3) (SETF (NTH 1 LI1) 'UU) EQL-OK: UU (EVAL 'LI1) EQUAL-OK: (A UU ((C) (D))) (SETF (ELT LI1 1) 'OO) EQL-OK: OO (SETF (ELT VEC1 1) 'OO) EQL-OK: OO (EVAL 'LI1) EQUAL-OK: (A OO ((C) (D))) (EVAL 'VEC1) EQUALP-OK: #(0 OO 2 3) (SETF (REST LI1) '((WW))) EQUAL-OK: ((WW)) (EVAL 'LI1) EQUAL-OK: (A (WW)) (SETF (FIRST LI1) 'AA) EQL-OK: AA (FIRST LI1) EQL-OK: AA (SETF (SECOND LI1) 'BB) EQL-OK: BB (EVAL 'LI1) EQUAL-OK: (AA BB) (SETF (REST LI1) '(2 3 4 5 6 7 8 9 10)) EQUAL-OK: (2 3 4 5 6 7 8 9 10) (SETF (SECOND LI1) 22) EQL-OK: 22 (EVAL 'LI1) EQUAL-OK: (AA 22 3 4 5 6 7 8 9 10) (SETF (THIRD LI1) '33) EQL-OK: 33 (SETF (FOURTH LI1) '44) EQL-OK: 44 (SETF (FIFTH LI1) '55) EQL-OK: 55 (SETF (SIXTH LI1) '66) EQL-OK: 66 (SETF (SEVENTH LI1) '77) EQL-OK: 77 (SETF (EIGHTH LI1) '88) EQL-OK: 88 (SETF (NINTH LI1) '99) EQL-OK: 99 (SETF (TENTH LI1) '1010) EQL-OK: 1010 (EVAL 'LI1) EQUAL-OK: (AA 22 33 44 55 66 77 88 99 1010) (SETF (FIRST LI1) '(((A)))) EQUAL-OK: (((A))) (SETF (CAAAR LI1) 'UU) EQL-OK: UU (CAAAR LI1) EQL-OK: UU (CAR LI1) EQUAL-OK: ((UU)) (SETF (CAAR LI1) 'OO) EQL-OK: OO (EVAL 'LI1) EQUAL-OK: ((OO) 22 33 44 55 66 77 88 99 1010) (SETF (CAR LI1) 'II) EQL-OK: II (EVAL 'LI1) EQUAL-OK: (II 22 33 44 55 66 77 88 99 1010) (SETF (CDDDR LI1) 'PP) EQL-OK: PP (EVAL 'LI1) EQUAL-OK: (II 22 33 . PP) (SETF (CADDR LI1) '333) EQL-OK: 333 (EVAL 'LI1) EQUAL-OK: (II 22 333 . PP) (SETF (SVREF VEC1 2) 'KK) EQL-OK: KK (EVAL 'VEC1) EQUALP-OK: #(0 OO KK 3) (SETF (GET 'A 'B) 'UU) EQL-OK: UU (GET 'A 'B) EQL-OK: UU (SETF (GETF (CADR (SETQ XX '(AAA (I1 V1 I2 V2)))) 'I2) 'V222) EQL-OK: V222 (EVAL 'XX) EQUAL-OK: (AAA (I1 V1 I2 V222)) (GETF (CADR XX) 'I2) EQL-OK: V222 (GETF (CADR XX) 'I1) EQL-OK: V1 (SETF (DOCUMENTATION 'BEISPIEL 'TYP1) "doc 1") EQUAL-OK: "doc 1" (SETF (DOCUMENTATION 'BEISPIEL 'TYP2) "doc 2") EQUAL-OK: "doc 2" (DOCUMENTATION 'BEISPIEL 'TYP2) EQUAL-OK: "doc 2" (SETF (DOCUMENTATION 'BEISPIEL 'TYP2) "doc 3") EQUAL-OK: "doc 3" (DOCUMENTATION 'BEISPIEL 'TYP2) EQUAL-OK: "doc 3" (SYMBOL-PLIST 'BEISPIEL) EQUAL-OK: (SYSTEM::DOC (TYP2 "doc 3" TYP1 "doc 1")) (SETF (SYMBOL-VALUE 'XX) 'VOELLIGNEU) EQL-OK: VOELLIGNEU (EVAL 'XX) EQL-OK: VOELLIGNEU (LET ((X (LIST 'A 'B 'C))) (RPLACD (LAST X) X) (LIST-LENGTH X)) EQL-OK: NIL (MAPCAR #'(LAMBDA (X) (LIST X)) '(A B C)) EQUAL-OK: ((A) (B) (C)) (MAPC #'(LAMBDA (X Y Z) (LIST X Y Z)) '(A B C) '(1 2 3) '(U I V)) EQUAL-OK: (A B C) (MAPL #'(LAMBDA (X Y Z) (LIST X Y Z)) '(A B C) '(1 2 3) '(U I V)) EQUAL-OK: (A B C) (MAPLIST #'(LAMBDA (X Y Z) (LIST X Y Z)) '(A B C) '(1 2 3) '(U I V)) EQUAL-OK: (((A B C) (1 2 3) (U I V)) ((B C) (2 3) (I V)) ((C) (3) (V))) (MAPCON #'(LAMBDA (X Y Z) (LIST X Y Z)) '(A B) '(1 2 3) '(U I V)) EQUAL-OK: ((A B) (1 2 3) (U I V) (B) (2 3) (I V)) (MAPCAN #'(LAMBDA (X Y Z) (LIST X Y Z)) '(A B C) '(1 2 3) '(U I V)) EQUAL-OK: (A 1 U B 2 I C 3 V) (FUNCALL (COMPILE NIL (LAMBDA (X) (FLET ((FOO (Y) (+ Y 1))) (FOO (* 2 X))))) 3) EQL-OK: 7 (LET ((NOT-A-GLOBALLY-SPECIAL-VAR 3)) (PROGV '(NOT-A-GLOBALLY-SPECIAL-VAR) '(4) (LIST NOT-A-GLOBALLY-SPECIAL-VAR (SYMBOL-VALUE 'NOT-A-GLOBALLY-SPECIAL-VAR)))) EQUAL-OK: (3 4) (FLET ((CONS (X Y) `(KONS ,X ,Y))) (LET ((CONS (SYMBOL-FUNCTION '+))) (FUNCALL #'CONS (FUNCALL 'CONS 1 2) (FUNCALL CONS 1 2)))) EQUAL-OK: (KONS (1 . 2) 3) (LET* ((N (MIN (1- LAMBDA-PARAMETERS-LIMIT) (CASE (READ-FROM-STRING (SOFTWARE-TYPE)) ((G++ I686-PC-MINGW32-G++) 256) (I686-PC-MINGW32-GCC 512) (T 1024)))) (VARS (LOOP REPEAT N COLLECT (GENSYM)))) (EVAL `(= ,N (FLET ((%F ,VARS (+ ,@VARS))) (%F ,@(LOOP FOR E IN VARS COLLECT 1)))))) EQL-OK: T (LET ((LS (LOOP FOR I FROM 1 TO (MIN (1- MULTIPLE-VALUES-LIMIT) 100000) COLLECT I))) (EQUAL LS (MULTIPLE-VALUE-LIST (VALUES-LIST LS)))) EQL-OK: T (KEYWORDP 36) EQL-OK: NIL (KEYWORDP :RENAME) EQL-OK: T (ZEROP -456) EQL-OK: NIL (ZEROP 0) EQL-OK: T (PLUSP 3) EQL-OK: T (PLUSP 3453786543987565) EQL-OK: T (MINUSP -456) EQL-OK: T (ODDP -1) EQL-OK: T (ODDP 0) EQL-OK: NIL (EVENP -456) EQL-OK: T (EVENP -345) EQL-OK: NIL (= 5/2 2.5) EQL-OK: T (/= 3.0 3) EQL-OK: NIL (/= 3.0 #C(3.0 1.0)) EQL-OK: T (< 3.0 3) EQL-OK: NIL (< 3 3.0 3 #C(3.0 0.0)) [SIMPLE-TYPE-ERROR]: <: #1=#C(3.0 0.0) is not a real number EQL-OK: ERROR (< -5 -4 -2 0 4 5) EQL-OK: T (> 8 7 6 5 4) EQL-OK: T (> 3 3.0 3 #C(3.0 0.0)) [SIMPLE-TYPE-ERROR]: >: #1=#C(3.0 0.0) is not a real number EQL-OK: ERROR (<= 3.0 3) EQL-OK: T (<= 3 3) EQL-OK: T (<= 1 3 3 2 5) EQL-OK: NIL (<= 5/2 2.5) EQL-OK: T (>= -5 -4 -2 0 4 5) EQL-OK: NIL (MAX 1 3 2 -7) EQL-OK: 3 (+ 1 1/2 0.5 #C(3.0 5.5)) EQL-OK: #C(5.0 5.5) (- 3 0 3 5 -6) EQL-OK: 1 (- #C(0 6) 1/4 0.5 7) EQUALP-OK: #C(-7.75 6.0) (* 7 6 5 4 3 2 1) EQL-OK: 5040 (* 2 2 2.0 2) EQL-OK: 16.0 (/ -8) EQL-OK: -1/8 (/ 4 2) EQL-OK: 2 (1+ 0) EQL-OK: 1 (1+ #C(0 1)) EQL-OK: #C(1 1) (1- 5.0) EQL-OK: 4.0 (CONJUGATE #C(3/5 4/5)) EQL-OK: #C(3/5 -4/5) (GCD 91 -49) EQL-OK: 7 (LCM 14 35) EQL-OK: 70 (PRIN1-TO-STRING (EXP 1)) EQUAL-OK: "2.7182817" (EXPT #C(0 1) 2) EQL-OK: -1 (PRIN1-TO-STRING (EXPT 2 #C(0 1))) EQUAL-OK: "#C(0.7692389 0.63896126)" (PRIN1-TO-STRING (LOG -3 10)) EQUAL-OK: "#C(0.47712126 1.3643764)" (LOG 3 0) [SIMPLE-DIVISION-BY-ZERO]: LOG: division by zero EQL-OK: ERROR (SQRT 9) EQUALP-OK: 3.0 (SQRT -9.0) EQUALP-OK: #C(0.0 3.0) (ISQRT 9) EQL-OK: 3 (ISQRT 26) EQL-OK: 5 (ABS 6) EQL-OK: 6 (ABS -6) EQL-OK: 6 (SIGNUM 0) EQL-OK: 0 (SIGNUM -4) EQL-OK: -1 (SIGNUM 4) EQL-OK: 1 (PRIN1-TO-STRING (SIN (* 8 (/ PI 2)))) EQUAL-OK: "2.0066230454737344098L-19" (LET* ((FUDGE 2) (VAL (TAN (/ PI 2))) (REF (COS (/ PI 2))) (REL-ERR (ABS (/ (- (/ VAL) REF) REF)))) (< REL-ERR (* FUDGE LONG-FLOAT-EPSILON))) EQL-OK: T (PRIN1-TO-STRING (SIN (EXPT 10 3))) EQUAL-OK: "0.82687956" (COS 0) EQUALP-OK: 1.0 (PRIN1-TO-STRING (COS (/ PI 2))) EQUAL-OK: "-2.5082788068421680123L-20" (PRIN1-TO-STRING (TAN 1)) EQUAL-OK: "1.5574077" (PRIN1-TO-STRING (TAN (/ PI 2))) EQUAL-OK: "-3.9867976290042641156L19" (PRIN1-TO-STRING (CIS -1)) EQUAL-OK: "#C(0.5403023 -0.84147096)" (CIS 2.5) EQL-OK: #C(-0.8011436 0.5984721) (PRIN1-TO-STRING (ASIN -1)) EQUAL-OK: "-1.5707964" (ASIN 0) EQUALP-OK: 0.0 (ASIN 2) EQL-OK: #C(1.5707964 -1.316958) (PRIN1-TO-STRING (ACOS 0)) EQUAL-OK: "1.5707964" (PRIN1-TO-STRING (ACOS -1)) EQUAL-OK: "3.1415927" (PRIN1-TO-STRING (ACOS 2)) EQUAL-OK: "#C(0 1.316958)" (ACOS 1.00001) EQUALP-OK: #C(0.0 0.0044751023) (ATAN 1) EQL-OK: 0.7853981 (PRIN1-TO-STRING PI) EQUAL-OK: "3.1415926535897932385L0" (SINH 0) EQUALP-OK: 0.0 (PRIN1-TO-STRING (SINH #C(5.0 -9.6))) EQUAL-OK: "#C(-73.06699 12.93681)" (COSH 0) EQUALP-OK: 1.0 (PRIN1-TO-STRING (COSH 1)) EQUAL-OK: "1.5430807" (TANH 50) EQL-OK: 1.0 (PRIN1-TO-STRING (TANH 0.00753)) EQUAL-OK: "0.0075298576" (PRIN1-TO-STRING (ASINH 0.5)) EQUAL-OK: "0.48121184" (PRIN1-TO-STRING (ASINH 3/7)) EQUAL-OK: "0.4164307" (ACOSH 0) EQL-OK: #C(0 1.5707964) (ACOSH 1) EQL-OK: 0 (ACOSH -1) EQL-OK: #C(0 3.1415927) (PRIN1-TO-STRING (ATANH 0.5)) EQUAL-OK: "0.54930615" (PRIN1-TO-STRING (ATANH 3/7)) EQUAL-OK: "0.4581453" (= (SIN (* #C(0 1) 5)) (* #C(0 1) (SINH 5))) EQL-OK: T (= (COS (* #C(0 1) 5)) (COSH 5)) EQL-OK: T (= (TAN (* #C(0 1) 5)) (* #C(0 1) (TANH 5))) EQL-OK: T (= (SINH (* #C(0 1) 5)) (* #C(0 1) (SIN 5))) EQL-OK: T (= (COSH (* #C(0 1) 5)) (COS 5)) EQL-OK: T (= (TANH (* #C(0 1) 5)) (* #C(0 1) (TAN 5))) EQL-OK: T (FLOAT 1) EQL-OK: 1.0 (FLOAT 0.5) EQL-OK: 0.5 (RATIONAL 2) EQL-OK: 2 (RATIONAL 2.0) EQL-OK: 2 (RATIONAL 2.5) EQL-OK: 5/2 (RATIONALIZE 2.5) EQL-OK: 5/2 (RATIONALIZE 7/3) EQL-OK: 7/3 (RATIONALIZE PI) EQL-OK: 8717442233/2774848045 (NUMERATOR 5/2) EQL-OK: 5 (NUMERATOR (/ 8 -6)) EQL-OK: -4 (DENOMINATOR 5/2) EQL-OK: 2 (DENOMINATOR (/ 8 -6)) EQL-OK: 3 (GCD (NUMERATOR 7/9) (DENOMINATOR 7/9)) EQL-OK: 1 (FLOOR 2.6) EQL-OK: 2 (FLOOR 2.5) EQL-OK: 2 (CEILING 2.6) EQL-OK: 3 (CEILING 2.5) EQL-OK: 3 (CEILING 2.4) EQL-OK: 3 (TRUNCATE 2.6) EQL-OK: 2 (TRUNCATE 2.5) EQL-OK: 2 (TRUNCATE 2.4) EQL-OK: 2 (ROUND 2.6) EQL-OK: 3 (ROUND 2.5) EQL-OK: 2 (ROUND 2.4) EQL-OK: 2 (MOD 13 4) EQL-OK: 1 (MOD -13 4) EQL-OK: 3 (PRIN1-TO-STRING (REM 13.4 1)) EQUAL-OK: "0.39999962" (FFLOOR 2.6) EQUALP-OK: 2 (FFLOOR 2.5) EQUALP-OK: 2 (FFLOOR 2.4) EQUALP-OK: 2 (FCEILING -0.3) EQUALP-OK: 0 (FCEILING -0.7) EQUALP-OK: 0 (FCEILING -2.4) EQUALP-OK: -2 (FTRUNCATE 2.5) EQL-OK: 2.0 (FTRUNCATE 2.4) EQL-OK: 2.0 (FROUND -0.7) EQL-OK: -1.0 (FROUND -2.4) EQL-OK: -2.0 (DECODE-FLOAT 35.0) EQL-OK: 0.546875 (DECODE-FLOAT 3.5s0) EQL-OK: 0.875s0 (SCALE-FLOAT 2.5 5) EQL-OK: 80.0 (SCALE-FLOAT 0.7541 2) EQL-OK: 3.0164 (FLOAT-RADIX 2.5) EQL-OK: 2 (FLOAT-RADIX 3.5d0) EQL-OK: 2 (COMPLEX 1/4 7.3) EQUALP-OK: #C(0.25 7.3) (COMPLEX 1 0) EQL-OK: 1 (REALPART 5) EQL-OK: 5 (REALPART #C(1.4 0.0)) EQL-OK: 1.4 (IMAGPART 5) EQL-OK: 0 (IMAGPART #C(1.4 0.0)) EQL-OK: 0.0 (LOGCOUNT 13) EQL-OK: 3 (LOGCOUNT -13) EQL-OK: 2 (INTEGER-LENGTH 0) EQL-OK: 0 (INTEGER-LENGTH 1) EQL-OK: 1 BOOLE-CLR EQL-OK: 0 BOOLE-SET EQL-OK: 15 BOOLE-1 EQL-OK: 10 BOOLE-2 EQL-OK: 12 BOOLE-C1 EQL-OK: 5 BOOLE-C2 EQL-OK: 3 BOOLE-AND EQL-OK: 8 BOOLE-IOR EQL-OK: 14 BOOLE-XOR EQL-OK: 6 BOOLE-EQV EQL-OK: 9 BOOLE-NAND EQL-OK: 7 BOOLE-NOR EQL-OK: 1 BOOLE-ANDC1 EQL-OK: 4 BOOLE-ANDC2 EQL-OK: 2 BOOLE-ORC1 EQL-OK: 13 BOOLE-ORC2 EQL-OK: 11 (LET ((S (PRIN1-TO-STRING MOST-POSITIVE-FIXNUM))) (OR (EQUAL S "16777215") (EQUAL S "33554431") (EQUAL S "67108863") (EQUAL S "4294967295") (EQUAL S "8589934591") (EQUAL S "17179869183") (EQUAL S "34359738367") (EQUAL S "68719476735") (EQUAL S "549755813887") (EQUAL S "1099511627775") (EQUAL S "2199023255551") (EQUAL S "281474976710655") (EQUAL S "4503599627370495") (EQUAL S "36028797018963967") (EQUAL S "72057594037927935") (EQUAL S "288230376151711743"))) EQL-OK: T (LET ((S (PRIN1-TO-STRING MOST-NEGATIVE-FIXNUM))) (OR (EQUAL S "-16777216") (EQUAL S "-33554432") (EQUAL S "-67108864") (EQUAL S "-4294967296") (EQUAL S "-8589934592") (EQUAL S "-17179869184") (EQUAL S "-34359738368") (EQUAL S "-68719476736") (EQUAL S "-549755813888") (EQUAL S "-1099511627776") (EQUAL S "-2199023255552") (EQUAL S "-281474976710656") (EQUAL S "-4503599627370496") (EQUAL S "-36028797018963968") (EQUAL S "-72057594037927936") (EQUAL S "-288230376151711744"))) EQL-OK: T (PRIN1-TO-STRING MOST-POSITIVE-SHORT-FLOAT) EQUAL-OK: "3.4028s38" (PRIN1-TO-STRING LEAST-POSITIVE-SHORT-FLOAT) EQUAL-OK: "1.1755s-38" (PRIN1-TO-STRING LEAST-NEGATIVE-SHORT-FLOAT) EQUAL-OK: "-1.1755s-38" (PRIN1-TO-STRING MOST-NEGATIVE-SHORT-FLOAT) EQUAL-OK: "-3.4028s38" (LET ((S (PRIN1-TO-STRING MOST-POSITIVE-SINGLE-FLOAT))) (OR (EQUAL S "1.7014117E38") (EQUAL S "3.4028235E38"))) EQL-OK: T (LET ((S (PRIN1-TO-STRING LEAST-POSITIVE-SINGLE-FLOAT))) (OR (EQUAL S "2.938736E-39") (EQUAL S "1.1754944E-38"))) EQL-OK: T (LET ((S (PRIN1-TO-STRING LEAST-NEGATIVE-SINGLE-FLOAT))) (OR (EQUAL S "-2.938736E-39") (EQUAL S "-1.1754944E-38"))) EQL-OK: T (LET ((S (PRIN1-TO-STRING MOST-NEGATIVE-SINGLE-FLOAT))) (OR (EQUAL S "-1.7014117E38") (EQUAL S "-3.4028235E38"))) EQL-OK: T (LET ((S (PRIN1-TO-STRING MOST-POSITIVE-DOUBLE-FLOAT))) (OR (EQUAL S "8.988465674311579d307") (EQUAL S "1.7976931348623157d308"))) EQL-OK: T (LET ((S (PRIN1-TO-STRING LEAST-POSITIVE-DOUBLE-FLOAT))) (OR (EQUAL S "5.562684646268004d-309") (EQUAL S "2.2250738585072014d-308"))) EQL-OK: T (LET ((S (PRIN1-TO-STRING LEAST-NEGATIVE-DOUBLE-FLOAT))) (OR (EQUAL S "-5.562684646268004d-309") (EQUAL S "-2.2250738585072014d-308"))) EQL-OK: T (LET ((S (PRIN1-TO-STRING MOST-NEGATIVE-DOUBLE-FLOAT))) (OR (EQUAL S "-8.988465674311579d307") (EQUAL S "-1.7976931348623157d308"))) EQL-OK: T (PRIN1-TO-STRING MOST-POSITIVE-LONG-FLOAT) EQUAL-OK: "8.8080652584198167656L646456992" (PRIN1-TO-STRING LEAST-POSITIVE-LONG-FLOAT) EQUAL-OK: "5.676615526003731344L-646456994" (PRIN1-TO-STRING LEAST-NEGATIVE-LONG-FLOAT) EQUAL-OK: "-5.676615526003731344L-646456994" (PRIN1-TO-STRING MOST-NEGATIVE-LONG-FLOAT) EQUAL-OK: "-8.8080652584198167656L646456992" (PRIN1-TO-STRING SHORT-FLOAT-EPSILON) EQUAL-OK: "7.6295s-6" (PRIN1-TO-STRING SINGLE-FLOAT-EPSILON) EQUAL-OK: "5.960465E-8" (LET ((S (PRIN1-TO-STRING DOUBLE-FLOAT-EPSILON))) (OR (EQUAL S "1.1102230246251568d-16"))) EQL-OK: T (PRIN1-TO-STRING LONG-FLOAT-EPSILON) EQUAL-OK: "5.4210108624275221706L-20" (PRIN1-TO-STRING SHORT-FLOAT-NEGATIVE-EPSILON) EQUAL-OK: "3.81476s-6" (PRIN1-TO-STRING SINGLE-FLOAT-NEGATIVE-EPSILON) EQUAL-OK: "2.9802326E-8" (LET ((S (PRIN1-TO-STRING DOUBLE-FLOAT-NEGATIVE-EPSILON))) (OR (EQUAL S "5.551115123125784d-17"))) EQL-OK: T (PRIN1-TO-STRING LONG-FLOAT-NEGATIVE-EPSILON) EQUAL-OK: "2.7105054312137610853L-20" (/ 1 0) [SIMPLE-DIVISION-BY-ZERO]: /: division by zero EQL-OK: ERROR (/ 1 0.0s0) [SIMPLE-DIVISION-BY-ZERO]: /: division by zero EQL-OK: ERROR (/ 1 0.0) [SIMPLE-DIVISION-BY-ZERO]: /: division by zero EQL-OK: ERROR (/ 1 0.0d0) [SIMPLE-DIVISION-BY-ZERO]: /: division by zero EQL-OK: ERROR (/ 1 0.0L0) [SIMPLE-DIVISION-BY-ZERO]: /: division by zero EQL-OK: ERROR (EXPT 10.0s0 1000) [SIMPLE-FLOATING-POINT-OVERFLOW]: EXPT: floating point overflow EQL-OK: ERROR (EXPT 10.0 1000) [SIMPLE-FLOATING-POINT-OVERFLOW]: EXPT: floating point overflow EQL-OK: ERROR (EXPT 10.0d0 1000) [SIMPLE-FLOATING-POINT-OVERFLOW]: EXPT: floating point overflow EQL-OK: ERROR (EXPT 10.0L0 1000000000) [SIMPLE-FLOATING-POINT-OVERFLOW]: EXPT: floating point overflow EQL-OK: ERROR (STANDARD-CHAR-P #\a) EQL-OK: T (STANDARD-CHAR-P 1) [SIMPLE-TYPE-ERROR]: STANDARD-CHAR-P: argument 1 is not a character EQL-OK: ERROR (GRAPHIC-CHAR-P #\a) EQL-OK: T (GRAPHIC-CHAR-P 1) [SIMPLE-TYPE-ERROR]: GRAPHIC-CHAR-P: argument 1 is not a character EQL-OK: ERROR (STRING-CHAR-P #\a) EQL-OK: T (STRING-CHAR-P #\1) EQL-OK: T (STRING-CHAR-P "") [SIMPLE-TYPE-ERROR]: STRING-CHAR-P: argument #1="" is not a character EQL-OK: ERROR (ALPHA-CHAR-P #\a) EQL-OK: T (ALPHA-CHAR-P #\$) EQL-OK: NIL (UPPER-CASE-P #\a) EQL-OK: NIL (LOWER-CASE-P #\A) EQL-OK: NIL (BOTH-CASE-P #\a) EQL-OK: T (BOTH-CASE-P #\$) EQL-OK: NIL (DIGIT-CHAR-P #\a) EQL-OK: NIL (DIGIT-CHAR-P #\5) EQL-OK: 5 (ALPHANUMERICP #\a) EQL-OK: T (ALPHANUMERICP #\$) EQL-OK: NIL (CHAR= #\d #\d) EQL-OK: T (CHAR/= #\d #\d) EQL-OK: NIL (CHAR< #\z #\0) EQL-OK: NIL (CHAR-EQUAL #\d #\d) EQL-OK: T (CHAR-NOT-EQUAL #\d #\d) EQL-OK: NIL (CHAR-LESSP #\d #\x) EQL-OK: T (CHAR-LESSP #\d #\d) EQL-OK: NIL (CHAR-NOT-GREATERP #\d #\d) EQL-OK: T (CHAR-GREATERP #\e #\d) EQL-OK: T (CHAR-NOT-LESSP #\e #\d) EQL-OK: T (CHAR-UPCASE #\a) EQL-OK: #\A (CHAR-UPCASE #\=) EQL-OK: #\= (CHAR= (CHAR-DOWNCASE (CHAR-UPCASE #\x)) #\x) EQL-OK: T (CHAR-DOWNCASE #\A) EQL-OK: #\a (CHAR= (CHAR-UPCASE (CHAR-DOWNCASE #\X)) #\X) EQL-OK: T (DIGIT-CHAR 7) EQL-OK: #\7 (DIGIT-CHAR 12) EQL-OK: NIL CHAR-CODE-LIMIT EQL-OK: 1114112 (ELT (SYMBOL-NAME 'ABC) 0) EQL-OK: #\A (SUBSEQ '(A B C D E) 2) EQUAL-OK: (C D E) (COPY-SEQ '#(A B C)) EQUALP-OK: #(A B C) (COPY-SEQ '((A B) C (D E))) EQUAL-OK: ((A B) C (D E)) (LENGTH '#(A B C D E F)) EQL-OK: 6 (LENGTH '(A B C D E F)) EQL-OK: 6 (NREVERSE '(A (B (C) D))) EQUAL-OK: ((B (C) D) A) (REVERSE '(1 2 3 4)) EQUAL-OK: (4 3 2 1) (MAKE-SEQUENCE 'VECTOR 4 :INITIAL-ELEMENT 'O) EQUALP-OK: #(O O O O) (MAKE-SEQUENCE 'LIST 4 :INITIAL-ELEMENT 'O) EQUAL-OK: (O O O O) (EQUALP (MAKE-SEQUENCE 'STRING 5 :INITIAL-ELEMENT #\a) (MAKE-STRING 5 :INITIAL-ELEMENT #\a)) EQL-OK: T (CONCATENATE 'LIST '(A B C) '(1 2)) EQUAL-OK: (A B C 1 2) (MAP 'LIST 'LIST '(#\a #\b #\c) '(#\1 #\2 #\3)) EQUAL-OK: ((#\a #\1) (#\b #\2) (#\c #\3)) (MAP 'LIST 'LIST '(A B C) '(1 2 3)) EQUAL-OK: ((A 1) (B 2) (C 3)) (MAKE-SEQUENCE '(VECTOR T 5) 5 :INITIAL-ELEMENT 'A) EQUALP-OK: #(A A A A A) (MAKE-SEQUENCE '(VECTOR T 5) 6 :INITIAL-ELEMENT 'A) [SIMPLE-TYPE-ERROR]: MAKE-SEQUENCE: sequence type forces length 5, but result has length 6 EQL-OK: ERROR (MAKE-SEQUENCE '(OR (VECTOR T 5) (VECTOR T 10)) 5 :INITIAL-ELEMENT 'A) EQUALP-OK: #(A A A A A) (MAKE-SEQUENCE '(OR (VECTOR T 5) (VECTOR T 10)) 6 :INITIAL-ELEMENT 'A) [SIMPLE-TYPE-ERROR]: MAKE-SEQUENCE: the result #1=#(A A A A A A) is not of type #2=(OR (VECTOR T 5) (VECTOR T 10)) EQL-OK: ERROR (MAKE-SEQUENCE '(VECTOR T 5) 5 :INITIAL-ELEMENT #\A :UPDATE #'(LAMBDA (C) (CODE-CHAR (1+ (CHAR-CODE C))))) EQUALP-OK: #(#\A #\B #\C #\D #\E) (MAKE-SEQUENCE '(VECTOR T 5) 6 :INITIAL-ELEMENT #\A :UPDATE #'(LAMBDA (C) (CODE-CHAR (1+ (CHAR-CODE C))))) [SIMPLE-TYPE-ERROR]: MAKE-SEQUENCE: sequence type forces length 5, but result has length 6 EQL-OK: ERROR (MAKE-SEQUENCE '(OR (VECTOR T 5) (VECTOR T 10)) 5 :INITIAL-ELEMENT #\A :UPDATE #'(LAMBDA (C) (CODE-CHAR (1+ (CHAR-CODE C))))) EQUALP-OK: #(#\A #\B #\C #\D #\E) (MAKE-SEQUENCE '(OR (VECTOR T 5) (VECTOR T 10)) 6 :INITIAL-ELEMENT #\A :UPDATE #'(LAMBDA (C) (CODE-CHAR (1+ (CHAR-CODE C))))) [SIMPLE-TYPE-ERROR]: MAKE-SEQUENCE: the result #1=#(#\A #\B #\C #\D #\E #\F) is not of type #2=(OR (VECTOR T 5) (VECTOR T 10)) EQL-OK: ERROR (COERCE #(A B C D E) '(VECTOR T 5)) EQUALP-OK: #(A B C D E) (COERCE #(A B C D E F) '(VECTOR T 5)) [SIMPLE-TYPE-ERROR]: COERCE: sequence type forces length 5, but result has length 6 EQL-OK: ERROR (COERCE #(A B C D E) '(OR (VECTOR T 5) (VECTOR T 10))) EQUALP-OK: #(A B C D E) (COERCE #(A B C D E F) '(OR (VECTOR T 5) (VECTOR T 10))) [SIMPLE-TYPE-ERROR]: COERCE: the result #1=#(A B C D E F) is not of type #2=(OR (VECTOR T 5) (VECTOR T 10)) EQL-OK: ERROR (COERCE '(A B C D E) '(VECTOR T 5)) EQUALP-OK: #(A B C D E) (COERCE '(A B C D E F) '(VECTOR T 5)) [SIMPLE-TYPE-ERROR]: COERCE: sequence type forces length 5, but result has length 6 EQL-OK: ERROR (COERCE '(A B C D E) '(OR (VECTOR T 5) (VECTOR T 10))) EQUALP-OK: #(A B C D E) (COERCE '(A B C D E F) '(OR (VECTOR T 5) (VECTOR T 10))) [SIMPLE-TYPE-ERROR]: COERCE: the result #1=#(A B C D E F) is not of type #2=(OR (VECTOR T 5) (VECTOR T 10)) EQL-OK: ERROR (SYSTEM::COERCED-SUBSEQ #(A B C D E) '(VECTOR T 5)) EQUALP-OK: #(A B C D E) (SYSTEM::COERCED-SUBSEQ #(A B C D E F) '(VECTOR T 5)) [SIMPLE-TYPE-ERROR]: SYSTEM::COERCED-SUBSEQ: sequence type forces length 5, but result has length 6 EQL-OK: ERROR (SYSTEM::COERCED-SUBSEQ #(A B C D E) '(OR (VECTOR T 5) (VECTOR T 10))) EQUALP-OK: #(A B C D E) (SYSTEM::COERCED-SUBSEQ #(A B C D E F) '(OR (VECTOR T 5) (VECTOR T 10))) [SIMPLE-TYPE-ERROR]: SYSTEM::COERCED-SUBSEQ: the result #1=#(A B C D E F) is not of type #2=(OR (VECTOR T 5) (VECTOR T 10)) EQL-OK: ERROR (SYSTEM::COERCED-SUBSEQ '(A B C D E) '(VECTOR T 5)) EQUALP-OK: #(A B C D E) (SYSTEM::COERCED-SUBSEQ '(A B C D E F) '(VECTOR T 5)) [SIMPLE-TYPE-ERROR]: SYSTEM::COERCED-SUBSEQ: sequence type forces length 5, but result has length 6 EQL-OK: ERROR (SYSTEM::COERCED-SUBSEQ '(A B C D E) '(OR (VECTOR T 5) (VECTOR T 10))) EQUALP-OK: #(A B C D E) (SYSTEM::COERCED-SUBSEQ '(A B C D E F) '(OR (VECTOR T 5) (VECTOR T 10))) [SIMPLE-TYPE-ERROR]: SYSTEM::COERCED-SUBSEQ: the result #1=#(A B C D E F) is not of type #2=(OR (VECTOR T 5) (VECTOR T 10)) EQL-OK: ERROR (CONCATENATE '(VECTOR T 5) '(A B C) '(D E)) EQUALP-OK: #(A B C D E) (CONCATENATE '(VECTOR T 5) '(A B C) '(D E F)) [SIMPLE-TYPE-ERROR]: CONCATENATE: sequence type forces length 5, but result has length 6 EQL-OK: ERROR (CONCATENATE '(OR (VECTOR T 5) (VECTOR T 10)) '(A B C) '(D E)) EQUALP-OK: #(A B C D E) (CONCATENATE '(OR (VECTOR T 5) (VECTOR T 10)) '(A B C) '(D E F)) [SIMPLE-TYPE-ERROR]: CONCATENATE: the result #1=#(A B C D E F) is not of type #2=(OR (VECTOR T 5) (VECTOR T 10)) EQL-OK: ERROR (MAP '(VECTOR T 5) #'IDENTITY '(A B C D E)) EQUALP-OK: #(A B C D E) (MAP '(VECTOR T 5) #'IDENTITY '(A B C D E F)) [SIMPLE-TYPE-ERROR]: MAP: sequence type forces length 5, but result has length 6 EQL-OK: ERROR (MAP '(OR (VECTOR T 5) (VECTOR T 10)) #'IDENTITY '(A B C D E)) EQUALP-OK: #(A B C D E) (MAP '(OR (VECTOR T 5) (VECTOR T 10)) #'IDENTITY '(A B C D E F)) [SIMPLE-TYPE-ERROR]: MAP: the result #1=#(A B C D E F) is not of type #2=(OR (VECTOR T 5) (VECTOR T 10)) EQL-OK: ERROR (MERGE '(VECTOR T 5) '(A B C D E) 'NIL #'<) EQUALP-OK: #(A B C D E) (MERGE '(VECTOR T 5) '(A B C D E F) 'NIL #'<) [SIMPLE-TYPE-ERROR]: MERGE: sequence type forces length 5, but result has length 6 EQL-OK: ERROR (MERGE '(OR (VECTOR T 5) (VECTOR T 10)) '(A B C D E) 'NIL #'<) EQUALP-OK: #(A B C D E) (MERGE '(OR (VECTOR T 5) (VECTOR T 10)) '(A B C D E F) 'NIL #'<) [SIMPLE-TYPE-ERROR]: MERGE: the result #1=#(A B C D E F) is not of type #2=(OR (VECTOR T 5) (VECTOR T 10)) EQL-OK: ERROR (SOME 'NULL '(A B NIL T E)) EQL-OK: T (EVERY 'ATOM '(A 8 #(A B))) EQL-OK: T (NOTANY 'EQ '(A B C D E 4) '(I J K L M 4)) EQL-OK: NIL (NOTEVERY 'EQ '#(U) '(A X U)) EQL-OK: T (REDUCE 'LIST '(A) :FROM-END NIL :INITIAL-VALUE NIL) EQUAL-OK: (NIL A) (REDUCE 'LIST '(A B C D) :FROM-END NIL :INITIAL-VALUE 'III) EQUAL-OK: ((((III A) B) C) D) (REDUCE 'LIST '(A B C D) :FROM-END T) EQUAL-OK: (A (B (C D))) (FILL '#(A B C D) 'I :START 1 :END 3) EQUALP-OK: #(A I I D) (REPLACE '#(A B C D) '#(I J) :START1 1) EQUALP-OK: #(A I J D) (REMOVE 'NUMBERP '#(Y A 4 A C 9 A D 2 3) :COUNT 1 :FROM-END T) EQUALP-OK: #(Y A 4 A C 9 A D 2 3) (REMOVE 'A '(A 1 B A 2 A) :START 1) EQUAL-OK: (A 1 B 2) (REMOVE-DUPLICATES '(A B C A D A) :START 1) EQUAL-OK: (A B C D A) (REMOVE-IF 'NUMBERP '#(Y A 4 A C 9 A D 2 3)) EQUALP-OK: #(Y A A C A D) (REMOVE-IF-NOT 'NUMBERP '#(Y A 4 A C 9 A D 2 3)) EQUALP-OK: #(4 9 2 3) (REMOVE-IF-NOT 'NUMBERP '#(Y A 4 A C 9 A D 2 3) :COUNT 2 :FROM-END NIL) EQUALP-OK: #(4 A C 9 A D 2 3) (DELETE '(A) '((A B) (C D) (A)) :TEST 'EQUAL) EQUAL-OK: ((A B) (C D)) (DELETE-IF #'(LAMBDA (X) (EQ (CAR X) 'A)) '((A B) (C D) (A))) EQUAL-OK: ((C D)) (DELETE-IF-NOT 'NUMBERP '(A 3 B 4)) EQUAL-OK: (3 4) (NSUBSTITUTE 'NEW '(1 OLD) '((0 OLD) (1 OLD) (2 OLD)) :TEST-NOT 'EQUAL :FROM-END T) EQUAL-OK: (NEW (1 OLD) NEW) (NSUBSTITUTE 'NEW 'OLD '(0 OLD 1 OLD 2 OLD) :END 2) EQUAL-OK: (0 NEW 1 OLD 2 OLD) (NSUBSTITUTE-IF 'NEW 'NUMBERP '(0 A 1 B 2 C 3 D) :COUNT 2 :END 5) EQUAL-OK: (NEW A NEW B 2 C 3 D) (NSUBSTITUTE-IF-NOT 'NEW 'NUMBERP '(0 A 1 B 2 C 3 D) :COUNT 2 :FROM-END T) EQUAL-OK: (0 A 1 B 2 NEW 3 NEW) (SUBSTITUTE 'NEW '(2 OLD) '((1 OLD) (2 OLD) (3 OLD) (4 OLD)) :TEST 'EQUAL :START 3) EQUAL-OK: ((1 OLD) (2 OLD) (3 OLD) (4 OLD)) (SUBSTITUTE-IF 'NEW 'NUMBERP '(A 1 B 2 D 3)) EQUAL-OK: (A NEW B NEW D NEW) (SUBSTITUTE-IF-NOT 'NEW 'NUMBERP '(A 1 B 2 D 3) :COUNT 2 :FROM-END T) EQUAL-OK: (A 1 NEW 2 NEW 3) (FIND '0 '((0 A) (1 A) (2 A) (0 B)) :TEST '= :FROM-END T :KEY 'CAR :START 1) EQUAL-OK: (0 B) (FIND-IF 'NUMBERP '((A 0) (B 1) (C 2)) :KEY 'CADR :START 3) EQL-OK: NIL (POSITION 'A '((0 A) (1 B) (2 A) (3 B)) :TEST #'(LAMBDA (X Y) (EQ X (CADR Y))) :START 1) EQL-OK: 2 (POSITION 'A '((0 A) (1 B) (2 A) (3 B)) :KEY 'CADR) EQL-OK: 0 (POSITION-IF 'NUMBERP '((0 X) (1 7.0) (2 8)) :FROM-END T :START 1 :KEY 'CADR) EQL-OK: 2 (COUNT '(A) '(A (A) A (A) A B) :TEST-NOT 'EQUAL :KEY #'(LAMBDA (X) (IF (ATOM X) (LIST X)))) EQL-OK: 3 (COUNT-IF-NOT 'NUMBERP '#(A 3 B 5 7 C D) :START 2 :END 5) EQL-OK: 1 (MISMATCH '(A B C 3 4 5) '(A B X 3 4 B) :START1 1 :START2 5 :END1 2 :TEST-NOT 'EQ) EQL-OK: 1 (MISMATCH '(A B C 3 4 5) '(U B X 3 4 5) :FROM-END T) EQL-OK: 3 (SEARCH "ABCD" "0ABIABJBCBC" :END1 3 :START1 1 :START2 0 :FROM-END T) EQL-OK: 9 (SEARCH '(#\A #\B #\C #\D) "0ABIABJBCBC" :END1 2 :START2 0 :FROM-END T) EQL-OK: 4 (SEARCH '(A B C D) '(0 A B I A B J B C B C) :END1 2 :START2 2) EQL-OK: 4 (SORT '((U 3) (I 1) (A 7) (K 3) (C 4) (B 6)) '< :KEY 'CADR) EQUAL-OK: ((I 1) (U 3) (K 3) (C 4) (B 6) (A 7)) (STABLE-SORT '((B 4) (A 3) (A 2) (B 1) (C 9) (B 2)) 'STRING< :KEY 'CAR) EQUAL-OK: ((A 3) (A 2) (B 4) (B 1) (B 2) (C 9)) (MERGE 'LIST '(5 1 4 4 7) '(2 3 5 6 8 9) '<) EQUAL-OK: (2 3 5 1 4 4 5 6 7 8 9) (MERGE 'LIST '(1 4 4 7) '(2 3 5 6 8 9) '<) EQUAL-OK: (1 2 3 4 4 5 6 7 8 9) (CAR '(A B C D E F G)) EQL-OK: A (CDR '(A B C D E F G)) EQUAL-OK: (B C D E F G) (CADR '(A B C D E F G)) EQL-OK: B (CDDR '(A B C D E F G)) EQUAL-OK: (C D E F G) (CADDR '(A B C D E F G)) EQL-OK: C (CDDDR '(A B C D E F G)) EQUAL-OK: (D E F G) (CADDDR '(A B C D E F G)) EQL-OK: D (CDDDDR '(A B C D E F G)) EQUAL-OK: (E F G) (CAADR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: ((U V W) X) (CADAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (6 7) (CDAAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (5) (CDADR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (Y) (CDDAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQL-OK: NIL (CAAAAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (1 2 3) (CAADAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQL-OK: 6 (CAADDR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (Q W E) (CADAAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQL-OK: 5 (CADADR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQL-OK: Y (CADDAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQL-OK: NIL (CADDDR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (A B C) (CDAAAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (4) (CDAADR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (X) (CDADAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (7) (CONS 1 2) EQUAL-OK: (1 . 2) (CONS 'A (CONS 'B (CONS 'C 'NIL))) EQUAL-OK: (A B C) (CONS 'A '(B C D)) EQUAL-OK: (A B C D) (TREE-EQUAL 5 (+ 2 3) :TEST #'EQL) EQL-OK: T (ENDP 'NIL) EQL-OK: T (ENDP '(A . B)) EQL-OK: NIL (LIST-LENGTH '(A B C D)) EQL-OK: 4 (LET ((X (LIST 'A 'B 'C))) (RPLACD (LAST X) X) (LIST-LENGTH X)) EQL-OK: NIL (NTH 0 '(A B C D)) EQL-OK: A (FIRST '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 1 (SECOND '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 2 (THIRD '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 3 (FOURTH '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 4 (FIFTH '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 5 (SIXTH '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 6 (SEVENTH '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 7 (EIGHTH '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 8 (NINTH '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 9 (TENTH '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 10 (REST '(A . B)) EQL-OK: B (NTHCDR 1 '(A B C D)) EQUAL-OK: (B C D) (LAST '(1 2 3 4 5)) EQUAL-OK: (5) (LAST '(1 2 3 . 4)) EQUAL-OK: (3 . 4) (LIST 'A 'B 'C 'D) EQUAL-OK: (A B C D) (LIST* 'A 'B 'C 'D) EQUAL-OK: (A B C . D) (MAKE-LIST 4 :INITIAL-ELEMENT 'O) EQUAL-OK: (O O O O) (MAKE-LIST 3 :INITIAL-ELEMENT 'RAH) EQUAL-OK: (RAH RAH RAH) (APPEND '(A B C) '(D E F) 'NIL '(G)) EQUAL-OK: (A B C D E F G) (COPY-LIST '(1 2 3 4 5)) EQUAL-OK: (1 2 3 4 5) (COPY-LIST '(1 2 3 . 4)) EQUAL-OK: (1 2 3 . 4) (COPY-ALIST '(A B)) EQUAL-OK: (A B) (COPY-ALIST '((1 . A) (2 . B) (3 . C))) EQUAL-OK: ((1 . A) (2 . B) (3 . C)) (COPY-ALIST '((A B) C (D E))) EQUAL-OK: ((A B) C (D E)) (COPY-TREE '(A B (C (D) (E F)) G)) EQUAL-OK: (A B (C (D) (E F)) G) (REVAPPEND '(A B C) '(D E F)) EQUAL-OK: (C B A D E F) (REVAPPEND '(A B C) 'I) EQUAL-OK: (C B A . I) (NRECONC '(A B C) '(I J)) EQUAL-OK: (C B A I J) (SETQ AA NIL) EQL-OK: NIL (PUSH '1 AA) EQUAL-OK: (1) (PUSH '2 AA) EQUAL-OK: (2 1) (POP AA) EQL-OK: 2 (POP AA) EQL-OK: 1 (POP AA) EQL-OK: NIL (SETQ AA '(B A)) EQUAL-OK: (B A) (PUSHNEW 'A AA) EQUAL-OK: (B A) (PUSHNEW 'C AA) EQUAL-OK: (C B A) (PUSHNEW 'U (CAR (SETQ XX '(NIL KKK)))) EQUAL-OK: (U) (PUSHNEW 'U (CAR XX)) EQUAL-OK: (U) (PUSHNEW 'V (CAR XX)) EQUAL-OK: (V U) (EVAL 'XX) EQUAL-OK: ((V U) KKK) (BUTLAST '(A B C) 2) EQUAL-OK: (A) (NBUTLAST '(A B C D) 6) EQL-OK: NIL (NBUTLAST '(A B C D) 1) EQUAL-OK: (A B C) (LDIFF (SETQ XX '(A B C D E)) (CDDR XX)) EQUAL-OK: (A B) (LDIFF (SETQ XX '(A B C D . E)) (CDDR XX)) EQUAL-OK: (A B) (LDIFF '(A B C D . E) 'E) EQUAL-OK: (A B C D) (LDIFF '(1 . 2) 3) EQUAL-OK: (1 . 2) (LET ((LISTS '#((A B C) (A B C . D))) (LD-RES #(#(NIL (A B) (A B C) (A B C) (A B C) (A B C) (A B C)) #(NIL (A B) (A B C . D) (A B C . D) (A B C . D) (A B C) (A B C . D)))) (TP-RES #(#(T T NIL NIL T NIL NIL) #(T T NIL NIL NIL T NIL)))) (DOTIMES (I (LENGTH LISTS)) (LET* ((LIST (AREF LISTS I)) (L-R (AREF LD-RES I)) (T-R (AREF TP-RES I)) (OBJECTS (VECTOR LIST (CDDR LIST) (COPY-LIST (CDDR LIST)) '(F G H) 'NIL 'D 'X))) (DOTIMES (J (LENGTH OBJECTS)) (LET ((OBJECT (AREF OBJECTS J))) (UNLESS (EQUAL (TAILP OBJECT LIST) (AREF T-R J)) (ERROR "(tailp ~s ~s): ~s; should be: ~s" OBJECT LIST (TAILP OBJECT LIST) (AREF T-R J))) (UNLESS (EQUAL (LDIFF LIST OBJECT) (AREF L-R J)) (ERROR "(ldiff ~s ~s): ~s; should be: ~s" LIST OBJECT (LDIFF LIST OBJECT) (AREF L-R J)))))))) EQL-OK: NIL (TAILP 10203040506070 (LIST* 'A 'B (1- 10203040506071))) EQL-OK: T (NSUBST 'A 'B '(U B (B) C) :TEST-NOT #'(LAMBDA (X Y) (NOT (EQL X Y)))) EQUAL-OK: (U A (A) C) (NSUBST-IF 'OO 'NUMBERP '(A B C (3 (4) 0))) EQUAL-OK: (A B C (OO (OO) OO)) (NSUBST-IF-NOT 'OO #'(LAMBDA (X) (OR (LIST X) (SYMBOLP X))) '(A B C (3 (4) 0))) EQUAL-OK: (A B C (3 (4) 0)) (SUBST 'A 'B '(U B (B) C) :TEST-NOT #'(LAMBDA (X Y) (NOT (EQL X Y))) :KEY #'(LAMBDA (U) (IF (LISTP U) (CAR U)))) EQUAL-OK: (U . A) (SUBST-IF 'NUMMMER 'NUMBERP '((A (7 (V 6))))) EQUAL-OK: ((A (NUMMMER (V NUMMMER)))) (SUBST-IF-NOT 'NUMMMER #'(LAMBDA (X) (OR (LISTP X) (NUMBERP X))) '((A (7 (V 6))))) EQUAL-OK: ((NUMMMER (7 (NUMMMER 6)))) (NSUBLIS '(((A) . UU) (A . II)) '(I (A) A) :TEST #'(LAMBDA (X Y) (IF (LISTP Y) (EQL X (CAR Y))))) EQUAL-OK: (I (UU) UU) (SUBLIS '(((A) . UU) (A . II)) '(I (A) A) :TEST #'(LAMBDA (X Y) (IF (LISTP Y) (EQL X (CAR Y))))) EQUAL-OK: (I (UU) UU) (MEMBER 'A '((A) (B) (A) (C)) :KEY 'CAR) EQUAL-OK: ((A) (B) (A) (C)) (MEMBER-IF 'NUMBERP '((A) (B) (3) (C)) :KEY 'CAR) EQUAL-OK: ((3) (C)) (MEMBER-IF-NOT 'NUMBERP '((8) (A) (B) (3) (C)) :KEY 'CAR) EQUAL-OK: ((A) (B) (3) (C)) (TAILP (CDDR (SETQ XX '(U I A B))) XX) EQL-OK: T (TAILP 'D '(A B C . D)) EQL-OK: T (ADJOIN 'A '((A) B C) :TEST 'EQUAL) EQUAL-OK: (A (A) B C) (NUNION '(A B C D) '(U I B A)) EQUAL-OK: (C D U I B A) (UNION '(A B C D) '(A D I V)) EQUAL-OK: (B C A D I V) (INTERSECTION '((A 1) (A 2) (A 3)) '((A 4) (A 2) (B 6) (C 7)) :TEST 'EQUAL) EQUAL-OK: ((A 2)) (NINTERSECTION '(A B C D) '(C D E F G) :TEST-NOT 'EQL) EQUAL-OK: (A B C D) (NSET-DIFFERENCE '(A B C D) '(I J C)) EQUAL-OK: (A B D) (NSET-EXCLUSIVE-OR '(A B C) '(I A D C)) EQUAL-OK: (B I D) (SET-DIFFERENCE '(ANTON BERTA AUTO BERLIN) '(AMERILLA) :TEST #'(LAMBDA (X Y) (EQL (ELT (SYMBOL-NAME X) 0) (ELT (SYMBOL-NAME Y) 0)))) EQUAL-OK: (BERTA BERLIN) (SET-EXCLUSIVE-OR '(ANTON ANNA EMIL) '(BERTA AUTO AUGUST) :TEST #'(LAMBDA (X Y) (EQL (ELT (SYMBOL-NAME X) 0) (ELT (SYMBOL-NAME Y) 0)))) EQUAL-OK: (EMIL BERTA) (SUBSETP '(A B) '(B A U I C D)) EQL-OK: T (ACONS 'A 'B '((C . D))) EQUAL-OK: ((A . B) (C . D)) (ACONS 'A 'B NIL) EQUAL-OK: ((A . B)) (ASSOC 'A '((B C) A ((A) U) (A I)) :TEST-NOT #'(LAMBDA (X Y) (IF (ATOM Y) (EQL Y X)))) EQUAL-OK: (B C) (ASSOC-IF 'SYMBOLP '((A . 3) (3 . A))) EQUAL-OK: (A . 3) (ASSOC-IF-NOT 'NUMBERP '((A . 3) (3 . A))) EQUAL-OK: (A . 3) (PAIRLIS '(A B C) '(1 2 3)) EQUAL-OK: ((C . 3) (B . 2) (A . 1)) (RASSOC 'A '((1 . B) (2 . A))) EQUAL-OK: (2 . A) (RASSOC-IF 'SYMBOLP '((1 . 3) (2 . A))) EQUAL-OK: (2 . A) (RASSOC-IF-NOT 'SYMBOLP '((1 . 3) (2 . A))) EQUAL-OK: (1 . 3) (HASH-TABLE-P (MAKE-HASH-TABLE :TEST #'EQL :REHASH-SIZE 2 :SIZE 20)) EQL-OK: T (HASH-TABLE-P (MAKE-HASH-TABLE :TEST #'EQL :REHASH-SIZE 1.1 :SIZE 20)) EQL-OK: T (DEFUN TEST-HASH-TABLE-ITERATOR (HASH-TABLE) (LET ((ALL-ENTRIES 'NIL) (GENERATED-ENTRIES 'NIL) (UNIQUE (LIST NIL))) (MAPHASH #'(LAMBDA (KEY VALUE) (PUSH (LIST KEY VALUE) ALL-ENTRIES)) HASH-TABLE) (WITH-HASH-TABLE-ITERATOR (GENERATOR-FN HASH-TABLE) (LOOP (MULTIPLE-VALUE-BIND (MORE? KEY VALUE) (GENERATOR-FN) (UNLESS MORE? (RETURN)) (UNLESS (EQL VALUE (GETHASH KEY HASH-TABLE UNIQUE)) (ERROR "Key ~S not found for value ~S" KEY VALUE)) (PUSH (LIST KEY VALUE) GENERATED-ENTRIES)))) (UNLESS (= (LENGTH ALL-ENTRIES) (LENGTH GENERATED-ENTRIES) (LENGTH (UNION ALL-ENTRIES GENERATED-ENTRIES :KEY #'CAR :TEST (HASH-TABLE-TEST HASH-TABLE)))) (ERROR "Generated entries and Maphash entries don't correspond")) T)) EQL-OK: TEST-HASH-TABLE-ITERATOR (LET ((TAB (MAKE-HASH-TABLE :TEST #'EQUAL))) (SETF (GETHASH "Richard" TAB) "Gabriel") (SETF (GETHASH "Bruno" TAB) "Haible") (SETF (GETHASH "Michael" TAB) "Stoll") (SETF (GETHASH "Linus" TAB) "Torvalds") (SETF (GETHASH "Richard" TAB) "Stallman") (TEST-HASH-TABLE-ITERATOR TAB)) EQL-OK: T (GETHASH "foo" (READ-FROM-STRING (PRIN1-TO-STRING (MAKE-HASH-TABLE :TEST 'EQUALP :INITIAL-CONTENTS '(("FOO" . "bar")))))) EQUAL-OK: "bar" (DEFSTRUCT (ICE-CREAM-FACTORY (:CONSTRUCTOR MAKE-FACTORY) (:CONSTRUCTOR FABRICATE-FACTORY (&KEY (CAPACITY 5) LOCATION (LOCAL-FLAVORS (CASE LOCATION ((HAWAII) '(PINEAPPLE MACADAMIA GUAVA)) ((MASSACHUSETTS) '(LOBSTER BAKED-BEAN)) ((CALIFORNIA) '(GINGER LOTUS AVOCADO BEAN-SPROUT GARLIC)) ((TEXAS) '(JALAPENO BARBECUE)))) (FLAVORS (SUBSEQ (APPEND LOCAL-FLAVORS '(VANILLA CHOCOLATE STRAWBERRY PISTACHIO MAPLE-WALNUT PEPPERMINT)) 0 CAPACITY)) ((:OWN OWNER))))) (CAPACITY 3) (FLAVORS '(VANILLA CHOCOLATE STRAWBERRY MANGO)) (OWNER 'ME)) EQL-OK: ICE-CREAM-FACTORY (LET ((HOUSTON (FABRICATE-FACTORY :CAPACITY 4 :LOCATION 'TEXAS))) (ICE-CREAM-FACTORY-FLAVORS HOUSTON)) EQUAL-OK: (JALAPENO BARBECUE VANILLA CHOCOLATE) (LET ((CAMBRIDGE (FABRICATE-FACTORY :LOCATION 'MASSACHUSETTS))) (ICE-CREAM-FACTORY-FLAVORS CAMBRIDGE)) EQUAL-OK: (LOBSTER BAKED-BEAN VANILLA CHOCOLATE STRAWBERRY) (LET ((SEATTLE (FABRICATE-FACTORY :LOCAL-FLAVORS '(SALMON)))) (ICE-CREAM-FACTORY-FLAVORS SEATTLE)) EQUAL-OK: (SALMON VANILLA CHOCOLATE STRAWBERRY PISTACHIO) (LET ((WHEATON (FABRICATE-FACTORY :CAPACITY 4 :LOCATION 'ILLINOIS))) (ICE-CREAM-FACTORY-FLAVORS WHEATON)) EQUAL-OK: (VANILLA CHOCOLATE STRAWBERRY PISTACHIO) (LET ((PITTSBURGH (FABRICATE-FACTORY :CAPACITY 4))) (ICE-CREAM-FACTORY-FLAVORS PITTSBURGH)) EQUAL-OK: (VANILLA CHOCOLATE STRAWBERRY PISTACHIO) (LET ((CLEVELAND (MAKE-FACTORY :CAPACITY 4))) (ICE-CREAM-FACTORY-FLAVORS CLEVELAND)) EQUAL-OK: (VANILLA CHOCOLATE STRAWBERRY MANGO) (PROGN (DEFVAR *X* 'GLOBAL-X) (LET ((Y 'LOCAL-Y)) (DEFSTRUCT BAZ (*X* 'X-INIT) (Y *X*) (Z Y)))) EQL-OK: BAZ (MAKE-BAZ) EQUALP-OK: #S(BAZ :*X* X-INIT :Y GLOBAL-X :Z LOCAL-Y) (CONSTANTP -5) EQL-OK: T (CONSTANTP (READ-FROM-STRING "1.0e30")) EQL-OK: T (STREAMP *STANDARD-INPUT*) EQL-OK: T (INPUT-STREAM-P *TERMINAL-IO*) EQL-OK: T (READTABLEP *READTABLE*) EQL-OK: T (READTABLEP 'PROGN) EQL-OK: NIL (GET-DISPATCH-MACRO-CHARACTER #\# #\0) EQL-OK: NIL (STRINGP (SHOW (LISP-IMPLEMENTATION-TYPE))) "CLISP" EQL-OK: T (STRINGP (SHOW (LISP-IMPLEMENTATION-VERSION))) "2.49.93+ (2018-02-18) (built 3813886800) (memory 3828276446)" EQL-OK: T (STRINGP (SHOW (MACHINE-INSTANCE))) "fedora-riscv-4.gcc143.osuosl.org [192.168.122.172]" EQL-OK: T (STRINGP (SHOW (MACHINE-TYPE))) "RISCV64" EQL-OK: T (STRINGP (SHOW (MACHINE-VERSION))) "RISCV64" EQL-OK: T (SYSTEM::FIXNUMP 10) EQL-OK: T (MODULE-INFO "clisp" T) EQUAL-OK: "clisp" (UNINTERN 'X) EQL-OK: T RUN-TEST: finished "alltest" (0 errors out of 636 tests) RUN-TEST: started # (FORMAT T "~%double-float arrays~%") double-float arrays EQL-OK: NIL (EQUALP (SETQ DA1 (MAKE-ARRAY '(4 2 3) :INITIAL-CONTENTS '(((1.0d0 2.0d0 3.0d0) (4.0d0 5.0d0 6.0d0)) ((7.0d0 8.0d0 9.0d0) (10.0d0 11.0d0 12.0d0)) ((13.0d0 14.0d0 15.0d0) (16.0d0 17.0d0 18.0d0)) ((19.0d0 20.0d0 21.0d0) (22.0d0 23.0d0 24.0d0))) :ELEMENT-TYPE 'DOUBLE-FLOAT)) '#3A(((1.0d0 2.0d0 3.0d0) (4.0d0 5.0d0 6.0d0)) ((7.0d0 8.0d0 9.0d0) (10.0d0 11.0d0 12.0d0)) ((13.0d0 14.0d0 15.0d0) (16.0d0 17.0d0 18.0d0)) ((19.0d0 20.0d0 21.0d0) (22.0d0 23.0d0 24.0d0)))) EQL-OK: T (AREF DA1 0 0 0) EQL-OK: 1.0d0 (AREF DA1 0 0 1) EQL-OK: 2.0d0 (AREF DA1 0 0 2) EQL-OK: 3.0d0 (AREF DA1 0 1 0) EQL-OK: 4.0d0 (AREF DA1 0 1 1) EQL-OK: 5.0d0 (AREF DA1 0 1 2) EQL-OK: 6.0d0 (AREF DA1 1 0 0) EQL-OK: 7.0d0 (AREF DA1 1 0 1) EQL-OK: 8.0d0 (AREF DA1 1 0 2) EQL-OK: 9.0d0 (AREF DA1 1 1 0) EQL-OK: 10.0d0 (AREF DA1 1 1 1) EQL-OK: 11.0d0 (AREF DA1 1 1 2) EQL-OK: 12.0d0 (AREF DA1 2 0 0) EQL-OK: 13.0d0 (AREF DA1 2 0 1) EQL-OK: 14.0d0 (AREF DA1 2 0 2) EQL-OK: 15.0d0 (AREF DA1 2 1 0) EQL-OK: 16.0d0 (AREF DA1 2 1 1) EQL-OK: 17.0d0 (AREF DA1 2 1 2) EQL-OK: 18.0d0 (AREF DA1 3 0 0) EQL-OK: 19.0d0 (AREF DA1 3 0 1) EQL-OK: 20.0d0 (AREF DA1 3 0 2) EQL-OK: 21.0d0 (AREF DA1 3 1 0) EQL-OK: 22.0d0 (AREF DA1 3 1 1) EQL-OK: 23.0d0 (AREF DA1 3 1 1) EQL-OK: 23.0d0 (FORMAT T "~%single-float arrays~%") single-float arrays EQL-OK: NIL (EQUALP (SETQ FA1 (MAKE-ARRAY '(4 2 3) :INITIAL-CONTENTS '(((1.0 2.0 3.0) (4.0 5.0 6.0)) ((7.0 8.0 9.0) (10.0 11.0 12.0)) ((13.0 14.0 15.0) (16.0 17.0 18.0)) ((19.0 20.0 21.0) (22.0 23.0 24.0))) :ELEMENT-TYPE 'SINGLE-FLOAT)) '#3A(((1.0 2.0 3.0) (4.0 5.0 6.0)) ((7.0 8.0 9.0) (10.0 11.0 12.0)) ((13.0 14.0 15.0) (16.0 17.0 18.0)) ((19.0 20.0 21.0) (22.0 23.0 24.0)))) EQL-OK: T (AREF FA1 0 0 0) EQL-OK: 1.0 (AREF FA1 0 0 1) EQL-OK: 2.0 (AREF FA1 0 0 2) EQL-OK: 3.0 (AREF FA1 0 1 0) EQL-OK: 4.0 (AREF FA1 0 1 1) EQL-OK: 5.0 (AREF FA1 0 1 2) EQL-OK: 6.0 (AREF FA1 1 0 0) EQL-OK: 7.0 (AREF FA1 1 0 1) EQL-OK: 8.0 (AREF FA1 1 0 2) EQL-OK: 9.0 (AREF FA1 1 1 0) EQL-OK: 10.0 (AREF FA1 1 1 1) EQL-OK: 11.0 (AREF FA1 1 1 2) EQL-OK: 12.0 (AREF FA1 2 0 0) EQL-OK: 13.0 (AREF FA1 2 0 1) EQL-OK: 14.0 (AREF FA1 2 0 2) EQL-OK: 15.0 (AREF FA1 2 1 0) EQL-OK: 16.0 (AREF FA1 2 1 1) EQL-OK: 17.0 (AREF FA1 2 1 2) EQL-OK: 18.0 (AREF FA1 3 0 0) EQL-OK: 19.0 (AREF FA1 3 0 1) EQL-OK: 20.0 (AREF FA1 3 0 2) EQL-OK: 21.0 (AREF FA1 3 1 0) EQL-OK: 22.0 (AREF FA1 3 1 1) EQL-OK: 23.0 (AREF FA1 3 1 1) EQL-OK: 23.0 (FORMAT T "~%array limits~%") array limits EQL-OK: NIL (LET ((S (PRIN1-TO-STRING ARRAY-RANK-LIMIT))) (OR (EQUAL S "4294967296") (EQUAL S "65536") (EQUAL S (PRIN1-TO-STRING LAMBDA-PARAMETERS-LIMIT)))) EQL-OK: T (LET ((S (PRIN1-TO-STRING ARRAY-DIMENSION-LIMIT))) (OR (EQUAL S "4294967296") (EQUAL S (PRIN1-TO-STRING MOST-POSITIVE-FIXNUM)))) EQL-OK: T (LET ((S (PRIN1-TO-STRING ARRAY-TOTAL-SIZE-LIMIT))) (OR (EQUAL S "4294967296") (EQUAL S (PRIN1-TO-STRING MOST-POSITIVE-FIXNUM)))) EQL-OK: T (<= ARRAY-DIMENSION-LIMIT ARRAY-TOTAL-SIZE-LIMIT) EQL-OK: T (FORMAT T "~%simple vectors~%") simple vectors EQL-OK: NIL (EQUALP (SETQ SV (VECTOR 'A 'B 'C 1.0s0 3.7d0 4.1)) '#(A B C 1.0s0 3.7d0 4.1)) EQL-OK: T (SVREF SV 0) EQL-OK: A (SVREF SV 1) EQL-OK: B (SVREF SV 2) EQL-OK: C (SVREF SV 3) EQL-OK: 1.0s0 (SVREF SV 4) EQL-OK: 3.7d0 (FORMAT T "~%set elements~%") set elements EQL-OK: NIL (SETF (SVREF SV 0) 'TEST) EQL-OK: TEST (EQUALP SV '#(TEST B C 1.0s0 3.7d0 4.1)) EQL-OK: T (FORMAT T "~%test array-element-type~%") test array-element-type EQL-OK: NIL (ARRAY-ELEMENT-TYPE SV) EQL-OK: T (ARRAY-ELEMENT-TYPE DA1) EQL-OK: T (FORMAT T "~%test rank~%") test rank EQL-OK: NIL (ARRAY-RANK DA1) EQL-OK: 3 (ARRAY-RANK FA1) EQL-OK: 3 (FORMAT T "~%test individual dimensions~%") test individual dimensions EQL-OK: NIL (ARRAY-DIMENSION DA1 0) EQL-OK: 4 (ARRAY-DIMENSION DA1 1) EQL-OK: 2 (ARRAY-DIMENSION DA1 2) EQL-OK: 3 (ARRAY-DIMENSION DA1 3) [SIMPLE-TYPE-ERROR]: ARRAY-DIMENSION: 3 is not an nonnegative integer less than the rank of #3A(((1.0d0 2.0d0 3.0d0) (4.0d0 5.0d0 6.0d0)) ((7.0d0 8.0d0 9.0d0) (10.0d0 11.0d0 12.0d0)) ((13.0d0 14.0d0 15.0d0) (16.0d0 17.0d0 18.0d0)) ((19.0d0 20.0d0 21.0d0) (22.0d0 23.0d0 24.0d0))) EQL-OK: ERROR (FORMAT T "~%0-dim. array pseudo-scalar with contents mod 5~%") 0-dim. array pseudo-scalar with contents mod 5 EQL-OK: NIL (PROGN (SETQ ZERO (MAKE-ARRAY 'NIL :ELEMENT-TYPE '(MOD 5))) T) EQL-OK: T (ARRAY-RANK ZERO) EQL-OK: 0 (SETF (AREF ZERO) 4) EQL-OK: 4 (SETF (AREF ZERO) 1.0) [SIMPLE-TYPE-ERROR]: SYSTEM::STORE: #1=1.0 does not fit into #0A4, bad type EQL-OK: ERROR (FORMAT T "~%3-dim general array~%") 3-dim general array EQL-OK: NIL (EQUALP (SETQ A1 (MAKE-ARRAY '(4 2 3) :INITIAL-CONTENTS '(((A B C) (1 2 3)) ((D E F) (3 1 2)) ((G H I) (2 3 1)) ((J K L) (0 0 0))))) '#3A(((A B C) (1 2 3)) ((D E F) (3 1 2)) ((G H I) (2 3 1)) ((J K L) (0 0 0)))) EQL-OK: T (AREF A1 0 0 0) EQL-OK: A (AREF A1 0 0 1) EQL-OK: B (AREF A1 0 0 2) EQL-OK: C (AREF A1 0 1 0) EQL-OK: 1 (AREF A1 0 1 1) EQL-OK: 2 (AREF A1 0 1 2) EQL-OK: 3 (AREF A1 1 0 0) EQL-OK: D (AREF A1 1 0 1) EQL-OK: E (AREF A1 1 0 2) EQL-OK: F (AREF A1 1 1 0) EQL-OK: 3 (AREF A1 1 1 1) EQL-OK: 1 (AREF A1 1 1 2) EQL-OK: 2 (AREF A1 2 0 0) EQL-OK: G (AREF A1 2 0 1) EQL-OK: H (AREF A1 2 0 2) EQL-OK: I (AREF A1 2 1 0) EQL-OK: 2 (AREF A1 2 1 1) EQL-OK: 3 (AREF A1 2 1 2) EQL-OK: 1 (AREF A1 3 0 0) EQL-OK: J (AREF A1 3 0 1) EQL-OK: K (AREF A1 3 0 2) EQL-OK: L (AREF A1 3 1 0) EQL-OK: 0 (AREF A1 3 1 1) EQL-OK: 0 (AREF A1 3 1 1) EQL-OK: 0 (FORMAT T "~%2-dim adjustable displaced array~%") 2-dim adjustable displaced array EQL-OK: NIL (PROGN (SETQ M (MAKE-ARRAY '(4 4) :ADJUSTABLE T :INITIAL-CONTENTS '((ALPHA BETA GAMMA DELTA) (EPSILON ZETA ETA THETA) (IOTA KAPPA LAMBDA MU) (NU XI OMICRON PI)))) T) EQL-OK: T (AREF M 0 0) EQL-OK: ALPHA (AREF M 0 1) EQL-OK: BETA (AREF M 0 2) EQL-OK: GAMMA (AREF M 0 3) EQL-OK: DELTA (AREF M 1 0) EQL-OK: EPSILON (AREF M 1 1) EQL-OK: ZETA (AREF M 1 2) EQL-OK: ETA (AREF M 1 3) EQL-OK: THETA (AREF M 2 0) EQL-OK: IOTA (AREF M 2 1) EQL-OK: KAPPA (AREF M 2 2) EQL-OK: LAMBDA (AREF M 2 3) EQL-OK: MU (AREF M 3 0) EQL-OK: NU (AREF M 3 1) EQL-OK: XI (AREF M 3 2) EQL-OK: OMICRON (AREF M 3 3) EQL-OK: PI (FORMAT T "~%sisplaced~%") sisplaced EQL-OK: NIL (EQUALP (SETQ MD0 (MAKE-ARRAY 4 :DISPLACED-TO M)) '#(ALPHA BETA GAMMA DELTA)) EQL-OK: T (EQUALP (SETQ MD1 (MAKE-ARRAY 4 :DISPLACED-TO M :DISPLACED-INDEX-OFFSET 4)) '#(EPSILON ZETA ETA THETA)) EQL-OK: T (EQUALP (SETQ MD2 (MAKE-ARRAY 4 :DISPLACED-TO M :DISPLACED-INDEX-OFFSET 8)) '#(IOTA KAPPA LAMBDA MU)) EQL-OK: T (FORMAT T "~%adjust m~%") adjust m EQL-OK: NIL (PROGN (ADJUST-ARRAY M '(3 5) :INITIAL-ELEMENT 'BAZ) T) EQL-OK: T (AREF M 0 0) EQL-OK: ALPHA (AREF M 0 1) EQL-OK: BETA (AREF M 0 2) EQL-OK: GAMMA (AREF M 0 3) EQL-OK: DELTA (AREF M 0 4) EQL-OK: BAZ (AREF M 1 0) EQL-OK: EPSILON (AREF M 1 1) EQL-OK: ZETA (AREF M 1 2) EQL-OK: ETA (AREF M 1 3) EQL-OK: THETA (AREF M 1 4) EQL-OK: BAZ (AREF M 2 0) EQL-OK: IOTA (AREF M 2 1) EQL-OK: KAPPA (AREF M 2 2) EQL-OK: LAMBDA (FORMAT T "~%Test interaction of the keywords~%") Test interaction of the keywords EQL-OK: NIL (PROGN (SETQ DV (MAKE-ARRAY 10 :ELEMENT-TYPE 'DOUBLE-FLOAT :INITIAL-CONTENTS '(0.0d0 1.0d0 2.0d0 3.0d0 4.0d0 5.0d0 6.0d0 7.0d0 8.0d0 9.0d0))) T) EQL-OK: T (AREF DV 0) EQL-OK: 0.0d0 (AREF DV 1) EQL-OK: 1.0d0 (AREF DV 2) EQL-OK: 2.0d0 (AREF DV 3) EQL-OK: 3.0d0 (AREF DV 4) EQL-OK: 4.0d0 (AREF DV 5) EQL-OK: 5.0d0 (AREF DV 6) EQL-OK: 6.0d0 (AREF DV 7) EQL-OK: 7.0d0 (AREF DV 8) EQL-OK: 8.0d0 (AREF DV 9) EQL-OK: 9.0d0 (SETF (AREF DV 5) -5.0d0) EQL-OK: -5.0d0 (FORMAT T "~%test indeces~%") test indeces EQL-OK: NIL (DEFUN ARRAY-INDEX-TEST (A &REST SUBS) (UNLESS (APPLY #'ARRAY-IN-BOUNDS-P A SUBS) (RETURN-FROM ARRAY-INDEX-TEST 'ERROR)) (= (APPLY #'ARRAY-ROW-MAJOR-INDEX A SUBS) (APPLY #'+ (MAPLIST #'(LAMBDA (X Y) (* (CAR X) (APPLY #'* (CDR Y)))) SUBS (ARRAY-DIMENSIONS A))))) EQL-OK: ARRAY-INDEX-TEST (ARRAY-INDEX-TEST (MAKE-ARRAY '(5 4 3 2 1)) 4 2 2 1 0) EQL-OK: T (ARRAY-INDEX-TEST (MAKE-ARRAY '(5 4 3 2 1)) 3 4 2 1 2) EQL-OK: ERROR (FORMAT T "~%bitvectors~%") bitvectors EQL-OK: NIL (SETQ BVZERO (MAKE-ARRAY 100 :ELEMENT-TYPE 'BIT :INITIAL-ELEMENT 0)) EQUAL-OK: #*0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 (SETQ BVONE (MAKE-ARRAY 100 :ELEMENT-TYPE 'BIT :INITIAL-ELEMENT 1)) EQUAL-OK: #*1111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111 (SETQ BV3 (MAKE-ARRAY 100 :ELEMENT-TYPE 'BIT :INITIAL-ELEMENT 0)) EQUAL-OK: #*0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 (SETQ BV2 (MAKE-ARRAY 100 :ELEMENT-TYPE 'BIT :INITIAL-ELEMENT 0)) EQUAL-OK: #*0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 (SETQ BV1 (MAKE-ARRAY 100 :ELEMENT-TYPE 'BIT :INITIAL-ELEMENT 0)) EQUAL-OK: #*0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 (FORMAT T "~%set bitvectors~%") set bitvectors EQL-OK: NIL (DOTIMES (I 50 BV1) (SETF (SBIT BV1 (* I 2)) 1)) EQUAL-OK: #*1010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010 (DOTIMES (I 50 BV2) (SETF (BIT BV2 (* I 2)) 1)) EQUAL-OK: #*1010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010 (EQUALP BV1 BV2) EQL-OK: T (DOTIMES (I 25 BV3) (SETF (SBIT BV3 (* I 4)) 1)) EQUAL-OK: #*1000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000 (BIT-AND BV1 BV3) EQUAL-OK: #*1000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000 (BIT-IOR BV1 BV3) EQUAL-OK: #*1010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010 (BIT-XOR BV1 BV3) EQUAL-OK: #*0010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010 (BIT-EQV BV1 BV3) EQUAL-OK: #*1101110111011101110111011101110111011101110111011101110111011101110111011101110111011101110111011101 (BIT-NAND BV1 BV3) EQUAL-OK: #*0111011101110111011101110111011101110111011101110111011101110111011101110111011101110111011101110111 (BIT-ANDC1 BV1 BV3) EQUAL-OK: #*0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 (BIT-ANDC2 BV1 BV3) EQUAL-OK: #*0010001000100010001000100010001000100010001000100010001000100010001000100010001000100010001000100010 (BIT-ORC1 BV1 BV3) EQUAL-OK: #*1101110111011101110111011101110111011101110111011101110111011101110111011101110111011101110111011101 (BIT-ORC2 BV1 BV3) EQUAL-OK: #*1111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111 (BIT-NOT BV1) EQUAL-OK: #*0101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101010101 (BIT-NOT BVZERO) EQUAL-OK: #*1111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111 (BIT-NOT BVONE) EQUAL-OK: #*0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 (LET* ((S1 (MAKE-ARRAY NIL :INITIAL-ELEMENT 0 :ELEMENT-TYPE 'BIT)) (S2 (MAKE-ARRAY NIL :INITIAL-ELEMENT 1 :ELEMENT-TYPE 'BIT))) (LIST (BIT-XOR S1 S2) S1 S2)) EQUALP-OK: (#0A1 #0A0 #0A1) (LET* ((A1 (MAKE-ARRAY '(2 2) :ELEMENT-TYPE 'BIT :INITIAL-CONTENTS '((0 1) (0 1)))) (A2 (MAKE-ARRAY '(2 2) :ELEMENT-TYPE 'BIT :INITIAL-CONTENTS '((0 0) (1 1)))) (RESULT (BIT-AND A1 A2))) (LIST A1 A2 RESULT)) EQUALP-OK: (#2A((0 1) (0 1)) #2A((0 0) (1 1)) #2A((0 0) (0 1))) (FORMAT T "~%test operations with fill-pointer~%") test operations with fill-pointer EQL-OK: NIL (MAKE-ARRAY '(3 4 5) :FILL-POINTER T) [SIMPLE-ERROR]: MAKE-ARRAY: :FILL-POINTER may not be specified for an array of rank 3 EQL-OK: ERROR (EQUALP (MAKE-ARRAY 5 :FILL-POINTER 5) '#(NIL NIL NIL NIL NIL)) EQL-OK: T (MAKE-ARRAY 5 :FILL-POINTER -5) [SIMPLE-TYPE-ERROR]: MAKE-ARRAY: fill-pointer -5 should be a nonnegative fixnum EQL-OK: ERROR (FORMAT T "~%general vector with fillpointer~%") general vector with fillpointer EQL-OK: NIL (PROGN (SETQ VMF (MAKE-ARRAY 5 :FILL-POINTER 0)) T) EQL-OK: T (FILL-POINTER VMF) EQL-OK: 0 (VECTOR-PUSH 'A VMF) EQL-OK: 0 (FILL-POINTER VMF) EQL-OK: 1 (VECTOR-PUSH 'B VMF) EQL-OK: 1 (VECTOR-PUSH 'C VMF) EQL-OK: 2 (VECTOR-PUSH 'D VMF) EQL-OK: 3 (VECTOR-PUSH 'E VMF) EQL-OK: 4 (VECTOR-PUSH 'VOLL VMF) EQL-OK: NIL (VECTOR-POP VMF) EQL-OK: E (VECTOR-POP VMF) EQL-OK: D (VECTOR-POP VMF) EQL-OK: C (VECTOR-POP VMF) EQL-OK: B (VECTOR-POP VMF) EQL-OK: A (VECTOR-POP VMF) [SIMPLE-ERROR]: VECTOR-POP: #() has length zero EQL-OK: ERROR (FORMAT T "~%adjustable general vector with fillpointer~%") adjustable general vector with fillpointer EQL-OK: NIL (PROGN (SETQ VMFA (MAKE-ARRAY 5 :FILL-POINTER 0 :ADJUSTABLE T)) T) EQL-OK: T (FILL-POINTER VMFA) EQL-OK: 0 (VECTOR-PUSH-EXTEND 'A VMFA) EQL-OK: 0 (FILL-POINTER VMFA) EQL-OK: 1 (VECTOR-PUSH-EXTEND 'B VMFA) EQL-OK: 1 (VECTOR-PUSH-EXTEND 'C VMFA) EQL-OK: 2 (VECTOR-PUSH-EXTEND 'D VMFA) EQL-OK: 3 (VECTOR-PUSH-EXTEND 'E VMFA) EQL-OK: 4 (VECTOR-PUSH-EXTEND 'VOLL VMFA) EQL-OK: 5 (VECTOR-POP VMFA) EQL-OK: VOLL (VECTOR-POP VMFA) EQL-OK: E (VECTOR-POP VMFA) EQL-OK: D (VECTOR-POP VMFA) EQL-OK: C (VECTOR-POP VMFA) EQL-OK: B (VECTOR-POP VMFA) EQL-OK: A (FORMAT T "~%Doppeltgen. Vector mit Fillpointer ~%") Doppeltgen. Vector mit Fillpointer EQL-OK: NIL (PROGN (SETQ VMFD (MAKE-ARRAY 5 :FILL-POINTER 0 :ELEMENT-TYPE 'DOUBLE-FLOAT)) T) EQL-OK: T (FILL-POINTER VMFD) EQL-OK: 0 (VECTOR-PUSH 0.0d0 VMFD) EQL-OK: 0 (FILL-POINTER VMFD) EQL-OK: 1 (VECTOR-PUSH 1.0d0 VMFD) EQL-OK: 1 (VECTOR-PUSH 2.0d0 VMFD) EQL-OK: 2 (VECTOR-PUSH 3.0d0 VMFD) EQL-OK: 3 (VECTOR-PUSH 4.0d0 VMFD) EQL-OK: 4 (VECTOR-PUSH 5.0d0 VMFD) EQL-OK: NIL (VECTOR-POP VMFD) EQL-OK: 4.0d0 (VECTOR-POP VMFD) EQL-OK: 3.0d0 (VECTOR-POP VMFD) EQL-OK: 2.0d0 (VECTOR-POP VMFD) EQL-OK: 1.0d0 (VECTOR-POP VMFD) EQL-OK: 0.0d0 (VECTOR-POP VMFD) [SIMPLE-ERROR]: VECTOR-POP: #() has length zero EQL-OK: ERROR (PROGN (SETQ VMFAD (MAKE-ARRAY 5 :FILL-POINTER 0 :ELEMENT-TYPE 'DOUBLE-FLOAT :ADJUSTABLE T)) T) EQL-OK: T (FILL-POINTER VMFAD) EQL-OK: 0 (VECTOR-PUSH-EXTEND 0.0d0 VMFAD) EQL-OK: 0 (FILL-POINTER VMFAD) EQL-OK: 1 (VECTOR-PUSH-EXTEND 1.0d0 VMFAD) EQL-OK: 1 (VECTOR-PUSH-EXTEND 2.0d0 VMFAD) EQL-OK: 2 (VECTOR-PUSH-EXTEND 3.0d0 VMFAD) EQL-OK: 3 (VECTOR-PUSH-EXTEND 4.0d0 VMFAD) EQL-OK: 4 (VECTOR-PUSH-EXTEND 5.0d0 VMFAD) EQL-OK: 5 (SETF (FILL-POINTER VMFAD) 3) EQL-OK: 3 (AREF VMFAD 5) EQL-OK: 5.0d0 (ELT VMFAD 5) [SIMPLE-TYPE-ERROR]: ELT: index 5 for #(0.0d0 1.0d0 2.0d0) is out of range EQL-OK: ERROR (SETF (FILL-POINTER VMFAD) 6) EQL-OK: 6 VMFAD EQUALP-OK: #(0.0d0 1.0d0 2.0d0 3.0d0 4.0d0 5.0d0) (REVERSE VMFAD) EQUALP-OK: #(5.0d0 4.0d0 3.0d0 2.0d0 1.0d0 0.0d0) (NREVERSE VMFAD) EQUALP-OK: #(5.0d0 4.0d0 3.0d0 2.0d0 1.0d0 0.0d0) VMFAD EQUALP-OK: #(5.0d0 4.0d0 3.0d0 2.0d0 1.0d0 0.0d0) (VECTOR-POP VMFAD) EQL-OK: 0.0d0 (VECTOR-POP VMFAD) EQL-OK: 1.0d0 (VECTOR-POP VMFAD) EQL-OK: 2.0d0 (VECTOR-POP VMFAD) EQL-OK: 3.0d0 (VECTOR-POP VMFAD) EQL-OK: 4.0d0 (VECTOR-POP VMFAD) EQL-OK: 5.0d0 (VECTOR-PUSH-EXTEND 5.0s0 VMFAD) EQL-OK: 0 (UPGRADED-ARRAY-ELEMENT-TYPE NIL) EQL-OK: NIL (ARRAYP (SETQ NIL-ARR (MAKE-ARRAY '(10 20) :ELEMENT-TYPE NIL))) EQL-OK: T (ARRAY-ELEMENT-TYPE (SETQ NIL-VEC (MAKE-ARRAY 4 :ELEMENT-TYPE NIL :DISPLACED-TO NIL-ARR :DISPLACED-INDEX-OFFSET 2))) EQL-OK: NIL (TYPEP NIL-VEC 'SEQUENCE) EQL-OK: T (AREF NIL-ARR 2 2) [SIMPLE-ERROR]: AREF: cannot retrieve values from an array of element type NIL EQL-OK: ERROR (SETF (AREF NIL-VEC 1) 0) [SIMPLE-TYPE-ERROR]: SYSTEM::STORE: 0 does not fit into #A(NIL (4)), bad type EQL-OK: ERROR (FILL NIL-VEC 1) [SIMPLE-TYPE-ERROR]: FILL: 1 does not fit into #A(NIL (4)), bad type EQL-OK: ERROR (REPLACE NIL-VEC #(0 1 0 1)) [SIMPLE-TYPE-ERROR]: REPLACE: 0 cannot be stored in an array of element type NIL EQL-OK: ERROR (REPLACE #(0 1 0 1) NIL-VEC) [SIMPLE-ERROR]: REPLACE: cannot retrieve values from an array of element type NIL EQL-OK: ERROR (PROGN (COPY-SEQ NIL-VEC)) EQUAL-OK: #A(NIL (4)) (SETQ NIL-VEC NIL NIL-ARR NIL) EQL-OK: NIL (ADJUSTABLE-ARRAY-P (SETQ ADA (ADJUST-ARRAY (MAKE-ARRAY '(2 3) :ADJUSTABLE T :INITIAL-CONTENTS '((A B C) (1 2 3))) '(4 6)))) EQL-OK: T (ARRAY-DIMENSIONS ADA) EQUAL-OK: (4 6) (AREF ADA 1 1) EQL-OK: 2 (SETQ BETA (MAKE-ARRAY '(2 3) :ADJUSTABLE T)) EQUALP-OK: #2A((NIL NIL NIL) (NIL NIL NIL)) (ADJUST-ARRAY BETA '(4 6) :DISPLACED-TO ADA) EQUALP-OK: #2A((A B C NIL NIL NIL) (1 2 3 NIL NIL NIL) (NIL NIL NIL NIL NIL NIL) (NIL NIL NIL NIL NIL NIL)) (ARRAY-DIMENSIONS BETA) EQUAL-OK: (4 6) (AREF BETA 1 1) EQL-OK: 2 (ADJUST-ARRAY #2A((ALPHA BETA GAMMA DELTA) (EPSILON ZETA ETA THETA) (IOTA KAPPA LAMBDA MU) (NU XI OMICRON PI)) '(3 5) :INITIAL-ELEMENT 'BAZ) EQUALP-OK: #2A((ALPHA BETA GAMMA DELTA BAZ) (EPSILON ZETA ETA THETA BAZ) (IOTA KAPPA LAMBDA MU BAZ)) (ADJUST-ARRAY #(1 2 3 4) '(6)) EQUALP-OK: #(1 2 3 4 NIL NIL) (LET* ((A1 (MAKE-ARRAY 5 :INITIAL-CONTENTS '(A B C D E) :FILL-POINTER 3)) (A2 (ADJUST-ARRAY A1 8 :FILL-POINTER 5 :INITIAL-ELEMENT 'X))) (ASSERT (IF (ADJUSTABLE-ARRAY-P A1) (EQ A1 A2) (EQUAL (ARRAY-DIMENSIONS A1) '(5)))) (ASSERT (NOT (ARRAY-DISPLACEMENT A2))) (LIST (ARRAY-DIMENSIONS A2) (FILL-POINTER A2) A2 (AREF A2 5) (AREF A2 6) (AREF A2 7))) EQUALP-OK: ((8) 5 #(A B C D E) X X X) (EQUAL (MAKE-STRING 0) (MAKE-ARRAY 0 :ELEMENT-TYPE NIL)) EQL-OK: T (EQUALP (MAKE-ARRAY '(1 2 0)) (MAKE-ARRAY '(1 2 0) :ELEMENT-TYPE NIL)) EQL-OK: T (ROW-MAJOR-AREF "abcd" 3) EQL-OK: #\d (SETF (ROW-MAJOR-AREF "abcd" 3) 17) [SIMPLE-TYPE-ERROR]: SYSTEM::ROW-MAJOR-STORE: 17 does not fit into "abcd", bad type EQL-OK: ERROR (LET* ((A1 (MAKE-ARRAY 5 :INITIAL-CONTENTS "abcde" :FILL-POINTER 3 :ADJUSTABLE T :ELEMENT-TYPE 'CHARACTER)) (A2 (ADJUST-ARRAY A1 8 :FILL-POINTER 5 :INITIAL-ELEMENT #\x :ELEMENT-TYPE 'CHARACTER))) (ASSERT (OR (NOT (ADJUSTABLE-ARRAY-P A1)) (EQ A1 A2))) (ASSERT (OR (ADJUSTABLE-ARRAY-P A1) (EQUAL (ARRAY-DIMENSIONS A1) '(5)))) (ASSERT (EQUAL (ARRAY-DIMENSIONS A2) '(8))) (ASSERT (NOT (ARRAY-DISPLACEMENT A2))) (ASSERT (EQUAL (LIST (AREF A2 5) (AREF A2 6) (AREF A2 7)) '(#\x #\x #\x))) (LIST (FILL-POINTER A2) A2)) EQUAL-OK: (5 "abcde") RUN-TEST: finished "array" (0 errors out of 290 tests) RUN-TEST: started # (SETF X '(A B C)) EQUAL-OK: (A B C) `(X ,X ,@X FOO ,(CADR X) BAR ,(CDR X) BAZ ,@(CDR X) ,.X) EQUAL-OK: (X (A B C) A B C FOO B BAR (B C) BAZ B C A B C) (READ-FROM-STRING "`,@x") [SIMPLE-READER-ERROR]: READ: the syntax `,@form is invalid EQL-OK: ERROR `(,X . ,X) EQUAL-OK: ((A B C) A B C) (READ-FROM-STRING "`(,x . ,@x)") [SIMPLE-READER-ERROR]: READ: the syntax `( ... . ,@form) is invalid EQL-OK: ERROR (READ-FROM-STRING ",x") [SIMPLE-READER-ERROR]: READ: comma is illegal outside of backquote EQL-OK: ERROR (READ-FROM-STRING "`#1A(1 2 ,(+ 2 2) 4)") [SIMPLE-READER-ERROR]: READ: unquotes may not occur in arrays EQL-OK: ERROR (DEFSTRUCT FOO (A B)) EQL-OK: FOO (READ-FROM-STRING "`#S(FOO :A ,'A :B ,'B)") [SIMPLE-READER-ERROR]: READ: unquotes may not occur in structures EQL-OK: ERROR (READ-FROM-STRING "``(,,,x)") [SIMPLE-READER-ERROR]: READ: more commas out than backquotes in, is illegal EQL-OK: ERROR (LET ((LIST '(A B C D))) `(FOO `(BAR ,@',(MAPCAR #'(LAMBDA (SYM) `(BAZ ',SYM ,SYM)) LIST)))) EQUAL-OK: (FOO '(BAR (BAZ 'A A) (BAZ 'B B) (BAZ 'C C) (BAZ 'D D))) `#(1 2 3 4) EQUALP-OK: #(1 2 3 4) `#(,@X) EQUALP-OK: #(A B C) (SETF A 10 B 20 C 30) EQL-OK: 30 `(,A ,B ,C) EQUAL-OK: (10 20 30) (EVAL ``(,,@X)) EQUAL-OK: (10 20 30) (EVAL ``(,,@(MAPCAR #'(LAMBDA (Z) `(LIST ',Z)) X))) EQUAL-OK: ((A) (B) (C)) (EVAL ``(,@,@(MAPCAR #'(LAMBDA (Z) `(LIST ',Z)) X))) EQUAL-OK: (A B C) (EVAL (EVAL ```(,,@,@(MAPCAR #'(LAMBDA (Z) `(LIST ',Z)) X)))) EQUAL-OK: (10 20 30) (SETF AA (LIST 10) BB (LIST 20) CC (LIST 30)) EQUAL-OK: (30) (SETF XX '(AA BB CC)) EQUAL-OK: (AA BB CC) (EVAL (EVAL ```(,,@,@(MAPCAR #'(LAMBDA (Z) `(LIST ',Z)) XX)))) EQUAL-OK: ((10) (20) (30)) (EVAL (EVAL ```(,@,@,@(MAPCAR #'(LAMBDA (Z) `(LIST ',Z)) XX)))) EQUAL-OK: (10 20 30) (EVAL (EVAL ```(ALPHA ,@,@,@(MAPCAR #'(LAMBDA (Z) `(LIST ',Z)) XX) OMEGA))) EQUAL-OK: (ALPHA 10 20 30 OMEGA) (EVAL (EVAL ```(ALPHA ,.,.,.(MAPCAR #'(LAMBDA (Z) `(LIST ',Z)) XX) OMEGA))) EQUAL-OK: (ALPHA 10 20 30 OMEGA) AA EQUAL-OK: (10 20 30 OMEGA) BB EQUAL-OK: (20 30 OMEGA) CC EQUAL-OK: (30 OMEGA) ``````````,,,,,,,,,,'X EQL-OK: X ``````````,',',',',',',',',','X EQUAL-OK: '''''''''X (LET ((X 3)) `````(,(,(,(,(,(INCF X)))))) X) EQL-OK: 4 (FORMAT NIL "~a" ``,,`,3) EQUAL-OK: "3" (FORMAT NIL "~a" '``,,`,3) EQUAL-OK: "``,,`,3" (FORMAT NIL "~a" '``,(,.ALPHA ,`,`(,@42) . ,OMEGA)) EQUAL-OK: "``,(,.ALPHA ,`,`(,@42) . ,OMEGA)" `(2 3 . #(,(+ 2 2) ,@(LIST 5))) EQUALP-OK: (2 3 . #(4 5)) (ARRAY-ELEMENT-TYPE `#(1 2 3)) EQUAL-OK: (UNSIGNED-BYTE 8) (MACROEXPAND-1 '`(C1)) EQUAL-OK: '(C1) (MACROEXPAND-1 '`(,(F1))) EQUAL-OK: (LIST (F1)) (MACROEXPAND-1 '`(,@(F1))) EQUAL-OK: (F1) (MACROEXPAND-1 '`(,.(F1))) EQUAL-OK: (F1) (MACROEXPAND-1 '`(C1 C2)) EQUAL-OK: '(C1 C2) (MACROEXPAND-1 '`(,(F1) C2)) EQUAL-OK: (CONS (F1) '(C2)) (MACROEXPAND-1 '`(,@(F1) C2)) EQUAL-OK: (APPEND (F1) '(C2)) (MACROEXPAND-1 '`(,.(F1) C2)) EQUAL-OK: (NCONC (F1) '(C2)) (MACROEXPAND-1 '`(C1 ,(F2))) EQUAL-OK: (LIST 'C1 (F2)) (MACROEXPAND-1 '`(,(F1) ,(F2))) EQUAL-OK: (LIST (F1) (F2)) (MACROEXPAND-1 '`(,@(F1) ,(F2))) EQUAL-OK: (APPEND (F1) (LIST (F2))) (MACROEXPAND-1 '`(,.(F1) ,(F2))) EQUAL-OK: (NCONC (F1) (LIST (F2))) (MACROEXPAND-1 '`(C1 ,@(F2))) EQUAL-OK: (CONS 'C1 (F2)) (MACROEXPAND-1 '`(,(F1) ,@(F2))) EQUAL-OK: (CONS (F1) (F2)) (MACROEXPAND-1 '`(,@(F1) ,@(F2))) EQUAL-OK: (APPEND (F1) (F2)) (MACROEXPAND-1 '`(,.(F1) ,@(F2))) EQUAL-OK: (NCONC (F1) (F2)) (MACROEXPAND-1 '`(C1 ,.(F2))) EQUAL-OK: (CONS 'C1 (F2)) (MACROEXPAND-1 '`(,(F1) ,.(F2))) EQUAL-OK: (CONS (F1) (F2)) (MACROEXPAND-1 '`(,@(F1) ,.(F2))) EQUAL-OK: (APPEND (F1) (F2)) (MACROEXPAND-1 '`(,.(F1) ,.(F2))) EQUAL-OK: (NCONC (F1) (F2)) (MACROEXPAND-1 '`(,@(F1) ,@(F2) ,@(F3))) EQUAL-OK: (APPEND (F1) (F2) (F3)) (MACROEXPAND-1 '`(,(F1) ,@(F2) ,.(F3))) EQUAL-OK: (CONS (F1) (APPEND (F2) (F3))) (MACROEXPAND-1 '`(,.(F1) ,.(F2) ,@(F3))) EQUAL-OK: (NCONC (F1) (F2) (F3)) (MACROEXPAND-1 '``(,.(F1) ,.(F2) ,.,@(F3))) EQUAL-OK: `(NCONC (F1) (F2) ,@(F3)) (MACROEXPAND-1 '`#(A B)) EQUALP-OK: #(A B) (MACROEXPAND-1 '`#(,(F1) ,(F2))) EQUAL-OK: (VECTOR (F1) (F2)) (MACROEXPAND-1 '`#(,(F1) ,@(F2))) EQUAL-OK: (MULTIPLE-VALUE-CALL #'VECTOR (VALUES (F1)) (VALUES-LIST (F2))) (MACROEXPAND-1 '`#(A ,(F1) ,@(F2) C D)) EQUAL-OK: (MULTIPLE-VALUE-CALL #'VECTOR 'A (VALUES (F1)) (VALUES-LIST (F2)) 'C 'D) (MACROEXPAND-1 '``#(,,@(F1) ,,@(F2))) EQUAL-OK: `(VECTOR ,@(F1) ,@(F2)) (MACROEXPAND-1 '``#(,,.(F1) ,,@(F2))) EQUAL-OK: `(VECTOR ,.(F1) ,@(F2)) (MACROEXPAND-1 '``#(,.,.(F1) ,.,@(F2) ,@,.(F3) ,@,@(F4))) EQUAL-OK: `(MULTIPLE-VALUE-CALL #'VECTOR (VALUES-LIST (NCONC ,.(F1))) (VALUES-LIST (NCONC ,@(F2))) (VALUES-LIST (APPEND ,.(F3))) (VALUES-LIST (APPEND ,@(F4)))) (MACROEXPAND-1 '`(,@NIL ,@(F1))) EQUAL-OK: (F1) (MACROEXPAND-1 '`(,@(F1) ,@NIL)) EQUAL-OK: (F1) (MACROEXPAND-1 '`(,.NIL ,.(F1))) EQUAL-OK: (F1) (MACROEXPAND-1 '`(,.(F1) ,.NIL)) EQUAL-OK: (F1) (LET ((Q '(R S)) (R '(3 5)) (S '(4 6))) (FLET ((R (X) (REDUCE #'* X))) (MACROEXPAND-1 ``(,,Q)))) EQUAL-OK: (LIST (R S)) (LET ((Q '(R S)) (R '(3 5)) (S '(4 6))) (FLET ((R (X) (REDUCE #'* X))) (MACROEXPAND-1 ``(,@,Q)))) EQUAL-OK: (R S) (LET ((Q '(R S)) (R '(3 5)) (S '(4 6))) (FLET ((R (X) (REDUCE #'* X))) (MACROEXPAND-1 ``(,,@Q)))) EQUAL-OK: (LIST R S) (LET ((Q '(R S)) (R '(3 5)) (S '(4 6))) (FLET ((R (X) (REDUCE #'* X))) (MACROEXPAND-1 ``(,@,@Q)))) EQUAL-OK: (APPEND R S) (LET ((P '(UNION X Y)) (Q '((UNION X Y) (LIST 'SQRT 9))) (R '(UNION X Y)) (S '((UNION X Y)))) (MACROEXPAND-1 ``(FOO ,,P))) EQUAL-OK: (LIST 'FOO (UNION X Y)) (LET ((P '(UNION X Y)) (Q '((UNION X Y) (LIST 'SQRT 9))) (R '(UNION X Y)) (S '((UNION X Y)))) (MACROEXPAND-1 ``(FOO ,,@Q))) EQUAL-OK: (LIST 'FOO (UNION X Y) (LIST 'SQRT 9)) (LET ((P '(UNION X Y)) (Q '((UNION X Y) (LIST 'SQRT 9))) (R '(UNION X Y)) (S '((UNION X Y)))) (MACROEXPAND-1 ``(FOO ,',R))) EQUAL-OK: '(FOO (UNION X Y)) (LET ((P '(UNION X Y)) (Q '((UNION X Y) (LIST 'SQRT 9))) (R '(UNION X Y)) (S '((UNION X Y)))) (MACROEXPAND-1 ``(FOO ,',@S))) EQUAL-OK: '(FOO (UNION X Y)) (LET ((P '(UNION X Y)) (Q '((UNION X Y) (LIST 'SQRT 9))) (R '(UNION X Y)) (S '((UNION X Y)))) (MACROEXPAND-1 ``(FOO ,@,P))) EQUAL-OK: (CONS 'FOO (UNION X Y)) (LET ((P '(UNION X Y)) (Q '((UNION X Y) (LIST 'SQRT 9))) (R '(UNION X Y)) (S '((UNION X Y)))) (MACROEXPAND-1 ``(FOO ,@,@Q))) EQUAL-OK: (CONS 'FOO (APPEND (UNION X Y) (LIST 'SQRT 9))) (LET ((P '(UNION X Y)) (Q '((UNION X Y) (LIST 'SQRT 9))) (R '(UNION X Y)) (S '((UNION X Y)))) (MACROEXPAND-1 ``(FOO ,@',R))) EQUAL-OK: '(FOO UNION X Y) (LET ((P '(UNION X Y)) (Q '((UNION X Y) (LIST 'SQRT 9))) (R '(UNION X Y)) (S '((UNION X Y)))) (MACROEXPAND-1 ``(FOO ,@',@S))) EQUAL-OK: (CONS 'FOO '(UNION X Y)) (LET ((O 1)) (DECLARE (SPECIAL O)) (EVAL (LET ((A 2) (B 3)) (DECLARE (SPECIAL A B)) ``(,O ,@',(MAPCAR #'SYMBOL-VALUE '(A B)))))) EQUAL-OK: (1 2 3) (LET ((O 1)) (DECLARE (SPECIAL O)) (EVAL (LET ((A 2) (B 3)) (DECLARE (SPECIAL A B)) ``(,O ,@',(MAPCAR #'SYMBOL-VALUE '(A B)) FOUR)))) EQUAL-OK: (1 2 3 FOUR) (LET ((ENV 1)) (EVAL (LET ((GET-CODE '(:A 12 :B 45 :DOUBLE (* %BUFFER 2)))) `(DEFUN GET-MACRO (DISPLAY EVENT-KEY VARIABLE) `(LET ((%BUFFER ,DISPLAY)) (DECLARE (IGNORABLE %BUFFER)) ,(GETF `(:DISPLAY (THE T ,DISPLAY) :EVENT-KEY (THE T ,EVENT-KEY) ,@',(MAPCAR #'(LAMBDA (FORM) (INCF ENV ENV) FORM) GET-CODE)) VARIABLE))))) (LIST (EVAL (GET-MACRO 1234 5678 :DISPLAY)) (EVAL (GET-MACRO 1234 5678 :EVENT-KEY)) (EVAL (GET-MACRO 1234 5678 :A)) (EVAL (GET-MACRO 1234 5678 :DOUBLE)) ENV)) EQUAL-OK: (1234 5678 12 2468 64) (PROGN (DEFMACRO DEFINE-SETF (VAR &REST VALUES) "define a setf function name (setf ) that will set the variable `var' to the sum of the given values plus the one given when setf'ed." `(DEFSETF ,(INTERN (SYMBOL-NAME VAR)) NIL (VALUE) `(SETF ,',VAR (+ ,VALUE ,@',VALUES)))) (DEFVAR *AVAR* NIL) (DEFINE-SETF *AVAR* 1 2 3) (LIST (SETF (*AVAR*) 4) *AVAR*)) EQUAL-OK: (10 10) (LET ((A 12)) (MACROLET ((B NIL (LET ((C 19)) ``(,A ,@',@(LIST C))))) (B))) EQUAL-OK: (12 . 19) (UNINTERN 'X) EQL-OK: T RUN-TEST: finished "backquot" (0 errors out of 89 tests) RUN-TEST: started # (DEFUN CLISP-TEST-BIN-I/O (&KEY (NUM 10) (FILE-NAME "bin-io-tst") (TYPE 'UNSIGNED-BYTE) (SIZE 40) (ENDIANNESS :LITTLE) (INT-LIST (ECASE TYPE (UNSIGNED-BYTE (LOOP :WITH MAX = (ASH 1 SIZE) :REPEAT NUM :COLLECT (RANDOM MAX))) (SIGNED-BYTE (LOOP :WITH MAX = (ASH 1 SIZE) :AND TOP = (ASH 1 (1- SIZE)) :REPEAT NUM :COLLECT (- (RANDOM MAX) TOP))))) (FLOAT-LIST (LOOP :REPEAT NUM :COLLECT (RANDOM 1.0d0)))) (LET ((ELTYPE (LIST TYPE SIZE))) (WITH-OPEN-FILE (FOO FILE-NAME :DIRECTION :OUTPUT :ELEMENT-TYPE 'UNSIGNED-BYTE) (DOLIST (NUM INT-LIST) (WRITE-INTEGER NUM FOO ELTYPE ENDIANNESS)) (DOLIST (NUM FLOAT-LIST) (WRITE-FLOAT NUM FOO 'DOUBLE-FLOAT ENDIANNESS))) (UNWIND-PROTECT (WITH-OPEN-FILE (FOO FILE-NAME :DIRECTION :INPUT :ELEMENT-TYPE 'UNSIGNED-BYTE) (LIST (FILE-LENGTH FOO) INT-LIST FLOAT-LIST (LOOP :FOR NUM :IN INT-LIST :FOR NN = (READ-INTEGER FOO ELTYPE ENDIANNESS) :COLLECT NN :UNLESS (= NN NUM) :DO (ERROR "~s/~s: wrote: ~s read: ~s" ENDIANNESS ELTYPE NUM NN)) (LOOP :FOR NUM :IN FLOAT-LIST :FOR NN = (READ-FLOAT FOO 'DOUBLE-FLOAT ENDIANNESS) :COLLECT NN :UNLESS (= NN NUM) :DO (ERROR "~s: wrote: ~s read: ~s" ENDIANNESS NUM NN)))) (DELETE-FILE FILE-NAME)))) EQL-OK: CLISP-TEST-BIN-I/O (DOLIST (E '(:LITTLE :BIG)) (DOLIST (S '(UNSIGNED-BYTE SIGNED-BYTE)) (CLISP-TEST-BIN-I/O :ENDIANNESS E :TYPE S))) EQL-OK: NIL (LET ((VEC (MAKE-ARRAY 8 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-CONTENTS '(63 240 0 0 0 0 0 0)))) (WITH-OPEN-FILE (FOO "bin-io-tst" :DIRECTION :OUTPUT :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) (WRITE-SEQUENCE VEC FOO)) (UNWIND-PROTECT (WITH-OPEN-FILE (FOO "bin-io-tst" :DIRECTION :INPUT :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) (READ-FLOAT FOO 'DOUBLE-FLOAT :BIG)) (DELETE-FILE "bin-io-tst"))) EQL-OK: 1.0d0 (PROGN (DEFCLASS LIST-INPUT-STREAM (FUNDAMENTAL-INPUT-STREAM) ((LIST :INITARG :LIST))) (DEFMETHOD STREAM-ELEMENT-TYPE ((STREAM LIST-INPUT-STREAM)) T) (DEFMETHOD STREAM-READ-CHAR ((STREAM LIST-INPUT-STREAM)) (WITH-SLOTS (LIST) STREAM (IF LIST (LET ((RET (POP LIST))) (TYPECASE RET (INTEGER (CODE-CHAR RET)) (CHARACTER RET) (T (COERCE RET 'CHARACTER)))) :EOF))) (DEFMETHOD STREAM-UNREAD-CHAR ((STREAM LIST-INPUT-STREAM) (CHAR CHARACTER)) (WITH-SLOTS (LIST) STREAM (PUSH CHAR LIST))) (DEFMETHOD STREAM-READ-BYTE ((STREAM LIST-INPUT-STREAM)) (WITH-SLOTS (LIST) STREAM (IF LIST (LET ((RET (POP LIST))) (TYPECASE RET (INTEGER RET) (CHARACTER (CHAR-CODE RET)) (T (COERCE RET 'INTEGER)))) :EOF))) (DEFUN LIST->INTEGER (LIST TYPE ENDIANNESS) (READ-INTEGER (MAKE-INSTANCE 'LIST-INPUT-STREAM :LIST LIST) TYPE ENDIANNESS)) (DEFUN LIST->FLOAT (LIST TYPE ENDIANNESS) (READ-FLOAT (MAKE-INSTANCE 'LIST-INPUT-STREAM :LIST LIST) TYPE ENDIANNESS))) EQL-OK: LIST->FLOAT (LIST->FLOAT '(63 240 0 0 0 0 0 0) 'DOUBLE-FLOAT :BIG) EQL-OK: 1.0d0 (LIST->FLOAT '(0 0 0 0 0 0 240 63) 'DOUBLE-FLOAT :LITTLE) EQL-OK: 1.0d0 (LIST->INTEGER '(0 1) '(UNSIGNED-BYTE 16) :BIG) EQL-OK: 1 (LIST->INTEGER '(1 0) '(UNSIGNED-BYTE 16) :BIG) EQL-OK: 256 (LIST->INTEGER '(1 0) '(UNSIGNED-BYTE 16) :LITTLE) EQL-OK: 1 (LIST->INTEGER '(0 1) '(UNSIGNED-BYTE 16) :LITTLE) EQL-OK: 256 (PROGN (DEFCLASS LIST-OUTPUT-STREAM (FUNDAMENTAL-OUTPUT-STREAM) ((LIST :INITFORM NIL))) (DEFMETHOD STREAM-ELEMENT-TYPE ((STREAM LIST-OUTPUT-STREAM)) T) (DEFMETHOD STREAM-WRITE-CHAR ((STREAM LIST-OUTPUT-STREAM) (CHAR CHARACTER)) (WITH-SLOTS (LIST) STREAM (PUSH CHAR LIST))) (DEFMETHOD STREAM-WRITE-BYTE ((STREAM LIST-OUTPUT-STREAM) (BYTE INTEGER)) (WITH-SLOTS (LIST) STREAM (PUSH BYTE LIST))) (DEFUN INTEGER->LIST (INTEGER TYPE ENDIANNESS) (LET ((OUT (MAKE-INSTANCE 'LIST-OUTPUT-STREAM))) (WRITE-INTEGER INTEGER OUT TYPE ENDIANNESS) (WITH-SLOTS (LIST) OUT (REVERSE LIST)))) (DEFUN FLOAT->LIST (FLOAT TYPE ENDIANNESS) (LET ((OUT (MAKE-INSTANCE 'LIST-OUTPUT-STREAM))) (WRITE-FLOAT FLOAT OUT TYPE ENDIANNESS) (WITH-SLOTS (LIST) OUT (REVERSE LIST))))) EQL-OK: FLOAT->LIST (FLOAT->LIST 1.0d0 'DOUBLE-FLOAT :BIG) EQUAL-OK: (63 240 0 0 0 0 0 0) (FLOAT->LIST 1.0d0 'DOUBLE-FLOAT :LITTLE) EQUAL-OK: (0 0 0 0 0 0 240 63) (INTEGER->LIST 1 '(UNSIGNED-BYTE 16) :BIG) EQUAL-OK: (0 1) (INTEGER->LIST 1 '(UNSIGNED-BYTE 16) :LITTLE) EQUAL-OK: (1 0) RUN-TEST: finished "bin-io" (0 errors out of 15 tests) RUN-TEST: started # CHAR-CODE-LIMIT EQL-OK: 1114112 (STANDARD-CHAR-P #\a) EQL-OK: T (STANDARD-CHAR-P #\$) EQL-OK: T (STANDARD-CHAR-P #\.) EQL-OK: T (STANDARD-CHAR-P #\A) EQL-OK: T (STANDARD-CHAR-P 1) [SIMPLE-TYPE-ERROR]: STANDARD-CHAR-P: argument 1 is not a character EQL-OK: ERROR (STANDARD-CHAR-P #\\) EQL-OK: T (STANDARD-CHAR-P #\5) EQL-OK: T (STANDARD-CHAR-P #\)) EQL-OK: T (STANDARD-CHAR-P #\%) EQL-OK: T (STANDARD-CHAR-P #\Backspace) EQL-OK: NIL (STANDARD-CHAR-P #\Page) EQL-OK: NIL (STANDARD-CHAR-P #\Return) EQL-OK: NIL (GRAPHIC-CHAR-P #\a) EQL-OK: T (GRAPHIC-CHAR-P #\$) EQL-OK: T (GRAPHIC-CHAR-P #\.) EQL-OK: T (GRAPHIC-CHAR-P #\A) EQL-OK: T (GRAPHIC-CHAR-P 1) [SIMPLE-TYPE-ERROR]: GRAPHIC-CHAR-P: argument 1 is not a character EQL-OK: ERROR (GRAPHIC-CHAR-P #\\) EQL-OK: T (GRAPHIC-CHAR-P #\5) EQL-OK: T (GRAPHIC-CHAR-P #\)) EQL-OK: T (GRAPHIC-CHAR-P #\%) EQL-OK: T (GRAPHIC-CHAR-P #\Backspace) EQL-OK: NIL (GRAPHIC-CHAR-P #\Page) EQL-OK: NIL (GRAPHIC-CHAR-P #\Return) EQL-OK: NIL (STRING-CHAR-P #\a) EQL-OK: T (STRING-CHAR-P #\$) EQL-OK: T (STRING-CHAR-P #\.) EQL-OK: T (STRING-CHAR-P #\A) EQL-OK: T (STRING-CHAR-P 1) [SIMPLE-TYPE-ERROR]: STRING-CHAR-P: argument 1 is not a character EQL-OK: ERROR (STRING-CHAR-P #\\) EQL-OK: T (STRING-CHAR-P #\5) EQL-OK: T (STRING-CHAR-P #\)) EQL-OK: T (STRING-CHAR-P #\%) EQL-OK: T (STRING-CHAR-P #\Backspace) EQL-OK: T (STRING-CHAR-P #\Page) EQL-OK: T (STRING-CHAR-P #\Return) EQL-OK: T (ALPHA-CHAR-P #\a) EQL-OK: T (ALPHA-CHAR-P #\$) EQL-OK: NIL (ALPHA-CHAR-P #\.) EQL-OK: NIL (ALPHA-CHAR-P #\A) EQL-OK: T (ALPHA-CHAR-P 1) [SIMPLE-TYPE-ERROR]: ALPHA-CHAR-P: argument 1 is not a character EQL-OK: ERROR (ALPHA-CHAR-P #\\) EQL-OK: NIL (ALPHA-CHAR-P #\5) EQL-OK: NIL (ALPHA-CHAR-P #\)) EQL-OK: NIL (ALPHA-CHAR-P #\%) EQL-OK: NIL (ALPHA-CHAR-P #\Backspace) EQL-OK: NIL (ALPHA-CHAR-P #\Page) EQL-OK: NIL (ALPHA-CHAR-P #\Return) EQL-OK: NIL (UPPER-CASE-P #\a) EQL-OK: NIL (UPPER-CASE-P #\$) EQL-OK: NIL (UPPER-CASE-P #\.) EQL-OK: NIL (UPPER-CASE-P #\A) EQL-OK: T (UPPER-CASE-P 1) [SIMPLE-TYPE-ERROR]: UPPER-CASE-P: argument 1 is not a character EQL-OK: ERROR (UPPER-CASE-P #\\) EQL-OK: NIL (UPPER-CASE-P #\5) EQL-OK: NIL (UPPER-CASE-P #\)) EQL-OK: NIL (UPPER-CASE-P #\%) EQL-OK: NIL (UPPER-CASE-P #\Backspace) EQL-OK: NIL (UPPER-CASE-P #\Page) EQL-OK: NIL (UPPER-CASE-P #\Return) EQL-OK: NIL (LOWER-CASE-P #\a) EQL-OK: T (LOWER-CASE-P #\$) EQL-OK: NIL (LOWER-CASE-P #\.) EQL-OK: NIL (LOWER-CASE-P #\A) EQL-OK: NIL (LOWER-CASE-P 1) [SIMPLE-TYPE-ERROR]: LOWER-CASE-P: argument 1 is not a character EQL-OK: ERROR (LOWER-CASE-P #\\) EQL-OK: NIL (LOWER-CASE-P #\5) EQL-OK: NIL (LOWER-CASE-P #\)) EQL-OK: NIL (LOWER-CASE-P #\%) EQL-OK: NIL (LOWER-CASE-P #\Backspace) EQL-OK: NIL (LOWER-CASE-P #\Page) EQL-OK: NIL (LOWER-CASE-P #\Return) EQL-OK: NIL (BOTH-CASE-P #\a) EQL-OK: T (BOTH-CASE-P #\$) EQL-OK: NIL (BOTH-CASE-P #\.) EQL-OK: NIL (BOTH-CASE-P #\A) EQL-OK: T (BOTH-CASE-P 1) [SIMPLE-TYPE-ERROR]: BOTH-CASE-P: argument 1 is not a character EQL-OK: ERROR (BOTH-CASE-P #\\) EQL-OK: NIL (BOTH-CASE-P #\5) EQL-OK: NIL (BOTH-CASE-P #\)) EQL-OK: NIL (BOTH-CASE-P #\%) EQL-OK: NIL (BOTH-CASE-P #\Backspace) EQL-OK: NIL (BOTH-CASE-P #\Page) EQL-OK: NIL (BOTH-CASE-P #\Return) EQL-OK: NIL (DIGIT-CHAR-P #\a) EQL-OK: NIL (DIGIT-CHAR-P #\$) EQL-OK: NIL (DIGIT-CHAR-P #\.) EQL-OK: NIL (DIGIT-CHAR-P #\A) EQL-OK: NIL (DIGIT-CHAR-P 1) [SIMPLE-TYPE-ERROR]: DIGIT-CHAR-P: argument 1 is not a character EQL-OK: ERROR (DIGIT-CHAR-P #\\) EQL-OK: NIL (DIGIT-CHAR-P #\5) EQL-OK: 5 (DIGIT-CHAR-P #\)) EQL-OK: NIL (DIGIT-CHAR-P #\%) EQL-OK: NIL (DIGIT-CHAR-P #\Backspace) EQL-OK: NIL (DIGIT-CHAR-P #\Page) EQL-OK: NIL (DIGIT-CHAR-P #\Return) EQL-OK: NIL (DIGIT-CHAR-P #\5 4) EQL-OK: NIL (DIGIT-CHAR-P #\5 8) EQL-OK: 5 (DIGIT-CHAR-P #\E 16) EQL-OK: 14 (DIGIT-CHAR-P #\R 35) EQL-OK: 27 (DIGIT-CHAR-P #\5 4) EQL-OK: NIL (DIGIT-CHAR-P #\5 5) EQL-OK: NIL (DIGIT-CHAR-P #\5 6) EQL-OK: 5 (DIGIT-CHAR-P #\1 2) EQL-OK: 1 (ALPHANUMERICP #\a) EQL-OK: T (ALPHANUMERICP #\$) EQL-OK: NIL (ALPHANUMERICP #\.) EQL-OK: NIL (ALPHANUMERICP #\A) EQL-OK: T (ALPHANUMERICP 1) [SIMPLE-TYPE-ERROR]: ALPHANUMERICP: argument 1 is not a character EQL-OK: ERROR (ALPHANUMERICP #\\) EQL-OK: NIL (ALPHANUMERICP #\5) EQL-OK: T (ALPHANUMERICP #\)) EQL-OK: NIL (ALPHANUMERICP #\%) EQL-OK: NIL (ALPHANUMERICP #\Backspace) EQL-OK: NIL (ALPHANUMERICP #\Page) EQL-OK: NIL (ALPHANUMERICP #\Return) EQL-OK: NIL (ALPHANUMERICP #\5 4) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too many arguments given to ALPHANUMERICP: #1=(ALPHANUMERICP #\5 4) EQL-OK: ERROR (ALPHANUMERICP #\5 8) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too many arguments given to ALPHANUMERICP: #1=(ALPHANUMERICP #\5 8) EQL-OK: ERROR (ALPHANUMERICP #\E 16) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too many arguments given to ALPHANUMERICP: #1=(ALPHANUMERICP #\E 16) EQL-OK: ERROR (ALPHANUMERICP #\R 35) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too many arguments given to ALPHANUMERICP: #1=(ALPHANUMERICP #\R 35) EQL-OK: ERROR (CHAR= #\d #\d) EQL-OK: T (CHAR/= #\d #\d) EQL-OK: NIL (CHAR= #\d #\x) EQL-OK: NIL (CHAR/= #\d #\x) EQL-OK: T (CHAR= #\d #\D) EQL-OK: NIL (CHAR/= #\d #\D) EQL-OK: T (CHAR= #\d #\d #\d #\d) EQL-OK: T (CHAR/= #\d #\d #\d #\d) EQL-OK: NIL (CHAR= #\d #\d #\x #\d) EQL-OK: NIL (CHAR/= #\d #\d #\x #\d) EQL-OK: NIL (CHAR= #\d #\y #\x #\c) EQL-OK: NIL (CHAR/= #\d #\y #\x #\c) EQL-OK: T (CHAR= #\d #\c #\d) EQL-OK: NIL (CHAR/= #\d #\c #\d) EQL-OK: NIL (CHAR< #\d #\x) EQL-OK: T (CHAR<= #\d #\x) EQL-OK: T (CHAR< #\d #\d) EQL-OK: NIL (CHAR<= #\d #\d) EQL-OK: T (CHAR< #\a #\e #\y #\z) EQL-OK: T (CHAR<= #\a #\e #\y #\z) EQL-OK: T (CHAR< #\a #\e #\e #\y) EQL-OK: NIL (CHAR<= #\a #\e #\e #\y) EQL-OK: T (CHAR> #\e #\d) EQL-OK: T (CHAR>= #\e #\d) EQL-OK: T (CHAR> #\d #\c #\b #\a) EQL-OK: T (CHAR>= #\d #\c #\b #\a) EQL-OK: T (CHAR> #\d #\d #\b #\a) EQL-OK: NIL (CHAR>= #\d #\d #\b #\a) EQL-OK: T (CHAR> #\e #\d #\b #\c #\a) EQL-OK: NIL (CHAR>= #\e #\d #\b #\c #\a) EQL-OK: NIL (CHAR> #\z #\A) EQL-OK: T (CHAR> #\Z #\a) EQL-OK: NIL (CHAR< #\9 #\a) EQL-OK: T (CHAR> #\9 #\a) EQL-OK: NIL (CHAR> #\z #\0) EQL-OK: T (CHAR< #\z #\0) EQL-OK: NIL (CHAR-EQUAL #\d #\d) EQL-OK: T (CHAR-NOT-EQUAL #\d #\d) EQL-OK: NIL (CHAR-EQUAL #\d #\x) EQL-OK: NIL (CHAR-NOT-EQUAL #\d #\x) EQL-OK: T (CHAR-EQUAL #\d #\D) EQL-OK: T (CHAR-NOT-EQUAL #\d #\D) EQL-OK: NIL (CHAR-EQUAL #\d #\d #\d #\d) EQL-OK: T (CHAR-NOT-EQUAL #\d #\d #\d #\d) EQL-OK: NIL (CHAR-EQUAL #\d #\d #\x #\d) EQL-OK: NIL (CHAR-NOT-EQUAL #\d #\d #\x #\d) EQL-OK: NIL (CHAR-EQUAL #\d #\y #\x #\c) EQL-OK: NIL (CHAR-NOT-EQUAL #\d #\y #\x #\c) EQL-OK: T (CHAR-EQUAL #\d #\c #\d) EQL-OK: NIL (CHAR-NOT-EQUAL #\d #\c #\d) EQL-OK: NIL (CHAR-LESSP #\d #\x) EQL-OK: T (CHAR-NOT-GREATERP #\d #\x) EQL-OK: T (CHAR-LESSP #\d #\d) EQL-OK: NIL (CHAR-NOT-GREATERP #\d #\d) EQL-OK: T (CHAR-LESSP #\a #\e #\y #\z) EQL-OK: T (CHAR-NOT-GREATERP #\a #\e #\y #\z) EQL-OK: T (CHAR-LESSP #\a #\e #\e #\y) EQL-OK: NIL (CHAR-NOT-GREATERP #\a #\e #\e #\y) EQL-OK: T (CHAR-GREATERP #\e #\d) EQL-OK: T (CHAR-NOT-LESSP #\e #\d) EQL-OK: T (CHAR-GREATERP #\d #\c #\b #\a) EQL-OK: T (CHAR-NOT-LESSP #\d #\c #\b #\a) EQL-OK: T (CHAR-GREATERP #\d #\d #\b #\a) EQL-OK: NIL (CHAR-NOT-LESSP #\d #\d #\b #\a) EQL-OK: T (CHAR-GREATERP #\e #\d #\b #\c #\a) EQL-OK: NIL (CHAR-NOT-LESSP #\e #\d #\b #\c #\a) EQL-OK: NIL (CHAR-GREATERP #\z #\A) EQL-OK: T (CHAR-GREATERP #\Z #\a) EQL-OK: T (CHAR-LESSP #\9 #\a) EQL-OK: T (CHAR-GREATERP #\9 #\a) EQL-OK: NIL (CHAR-GREATERP #\z #\0) EQL-OK: T (CHAR-LESSP #\z #\0) EQL-OK: NIL (CHAR-EQUAL #\A #\a) EQL-OK: T (CHAR-UPCASE #\a) EQL-OK: #\A (CHAR-UPCASE #\A) EQL-OK: #\A (CHAR-UPCASE #\5) EQL-OK: #\5 (CHAR-UPCASE #\;) EQL-OK: #\; (CHAR-UPCASE #\=) EQL-OK: #\= (CHAR= (CHAR-DOWNCASE (CHAR-UPCASE #\x)) #\x) EQL-OK: T (CHAR-DOWNCASE #\A) EQL-OK: #\a (CHAR-DOWNCASE #\a) EQL-OK: #\a (CHAR-DOWNCASE #\%) EQL-OK: #\% (CHAR-DOWNCASE #\+) EQL-OK: #\+ (CHAR-DOWNCASE #\-) EQL-OK: #\- (CHAR= (CHAR-UPCASE (CHAR-DOWNCASE #\X)) #\X) EQL-OK: T (DIGIT-CHAR 7) EQL-OK: #\7 (DIGIT-CHAR 12) EQL-OK: NIL (DIGIT-CHAR 'A) [SIMPLE-TYPE-ERROR]: DIGIT-CHAR: the weight argument should be an integer, not A EQL-OK: ERROR (DIGIT-CHAR 12 16) EQL-OK: #\C (DIGIT-CHAR 6 2) EQL-OK: NIL (DIGIT-CHAR 1 2) EQL-OK: #\1 CHAR-CONTROL-BIT EQL-OK: 1 CHAR-META-BIT EQL-OK: 2 CHAR-SUPER-BIT EQL-OK: 4 CHAR-HYPER-BIT EQL-OK: 8 (CHAR-NAME #\Space) EQUAL-OK: "Space" (CHAR-NAME #\Newline) EQUAL-OK: "Newline" (LET ((WRONG-CODES NIL)) (DOTIMES (CODE CHAR-CODE-LIMIT) (LET ((C (CODE-CHAR CODE))) (UNLESS (AND (OR (EQL C (NAME-CHAR (CHAR-NAME C))))) (PUSH CODE WRONG-CODES)))) WRONG-CODES) EQL-OK: NIL (LOOP :FOR I :FROM 0 :BELOW CHAR-CODE-LIMIT :FOR X = (CODE-CHAR I) :UNLESS (OR (NOT (CHARACTERP X)) (IF (OR (DIGIT-CHAR-P X) (ALPHA-CHAR-P X)) (ALPHANUMERICP X) (NOT (ALPHANUMERICP X)))) :COLLECT (LIST I X :DIGIT (DIGIT-CHAR-P X) :ALPHA (ALPHA-CHAR-P X) :ALPHANUMERICP (ALPHANUMERICP X))) EQL-OK: NIL (LOCALLY (DECLARE (COMPILE)) (LOOP :FOR I :FROM 0 :BELOW CHAR-CODE-LIMIT :FOR X = (CODE-CHAR I) :UNLESS (EQ (CHAR-INVERTCASE (CHAR-INVERTCASE X)) X) :COLLECT X)) EQL-OK: NIL RUN-TEST: finished "characters" (0 errors out of 221 tests) RUN-TEST: started # (USE-PACKAGE "CLOS") EQL-OK: T (UNINTERN ') EQL-OK: T (PROGN (DEFCLASS NIL ((X :INITFORM 0 :ACCESSOR X-VAL :READER GET-X :WRITER SET-X :INITARG :X) (Y :INITFORM 1 :ACCESSOR Y-VAL :READER GET-Y :WRITER SET-Y :INITARG :Y))) NIL) EQL-OK: NIL (PROGN (DEFCLASS () ((Z :INITFORM 0 :ACCESSOR Z-VAL :READER GET-Z :WRITER SET-Z :INITARG :Z))) NIL) EQL-OK: NIL (DEFPARAMETER A (MAKE-INSTANCE (FIND-CLASS ') :X 10)) EQL-OK: A (LET (CACHE) (DEFMETHOD SLOT-MISSING ((CLASS T) (OBJ ) (SLOT-NAME T) (OPERATION T) &OPTIONAL (NEW-VALUE NIL NEW-VALUE-P)) (SETF CACHE (LIST SLOT-NAME OPERATION NEW-VALUE NEW-VALUE-P))) (LIST (SLOT-BOUNDP A 'ABCD) CACHE (SLOT-VALUE A 'ABCD) CACHE)) EQUAL-OK: (T (ABCD SLOT-BOUNDP NIL NIL) (ABCD SLOT-VALUE NIL NIL) (ABCD SLOT-VALUE NIL NIL)) (X-VAL A) EQL-OK: 10 (Y-VAL A) EQL-OK: 1 (SETF (X-VAL A) 20) EQL-OK: 20 (X-VAL A) EQL-OK: 20 (GET-X A) EQL-OK: 20 (SET-X 10 A) EQL-OK: 10 (X-VAL A) EQL-OK: 10 (WITH-SLOTS (X Y) A (+ X Y)) EQL-OK: 11 (DEFUN FOO (Z) (WITH-SLOTS (X Y) Z (+ X Y))) EQL-OK: FOO (FOO A) EQL-OK: 11 (COMPILE 'FOO) EQL-OK: FOO (FOO A) EQL-OK: 11 (SYMBOL-CLEANUP 'FOO) EQL-OK: T (X-VAL (REINITIALIZE-INSTANCE A :X 20)) EQL-OK: 20 (X-VAL (REINITIALIZE-INSTANCE A :X 30)) EQL-OK: 30 (X-VAL (REINITIALIZE-INSTANCE A :X 50)) EQL-OK: 50 (X-VAL (REINITIALIZE-INSTANCE A :X 80)) EQL-OK: 80 (X-VAL (REINITIALIZE-INSTANCE A :Y 20)) EQL-OK: 80 (Y-VAL (REINITIALIZE-INSTANCE A :X 30)) EQL-OK: 20 (X-VAL (REINITIALIZE-INSTANCE A :Y 50)) EQL-OK: 30 (Y-VAL (REINITIALIZE-INSTANCE A :X 80)) EQL-OK: 50 (DEFPARAMETER B (MAKE-INSTANCE (FIND-CLASS ') :X 10 :Y 20 :Z 30)) EQL-OK: B (X-VAL B) EQL-OK: 10 (Y-VAL B) EQL-OK: 20 (Z-VAL B) EQL-OK: 30 (LET* ((FN (DEFGENERIC F (X Y) (:METHOD ((X T) (Y T)) (LIST X Y)))) (METH1 (DEFMETHOD F ((I INTEGER) (J NUMBER)) (+ I J))) (METH2 (DEFMETHOD F ((S1 STRING) (S2 STRING)) (CONCATENATE 'STRING S1 S2)))) (LAMBDA NIL (DEFMETHOD F ((X LIST) (Y LIST)) (APPEND X Y))) (LIST (EQ METH1 (FIND-METHOD #'F NIL (LIST (FIND-CLASS 'INTEGER) (FIND-CLASS 'NUMBER)))) (EQ METH2 (FIND-METHOD #'F NIL (LIST (FIND-CLASS 'STRING) (FIND-CLASS 'STRING)))))) EQUAL-OK: (T T) (F T T) EQUAL-OK: (T T) (F 2 3) EQL-OK: 5 (F 2 3.0) EQL-OK: 5.0 (F 2.0 3) EQUAL-OK: (2.0 3) (F "ab" "cd") EQUAL-OK: "abcd" (F 1 "abc") EQUAL-OK: (1 "abc") (PROGN (DEFGENERIC F (X Y) (:METHOD ((X T) (Y T)) (LIST X Y)) (:METHOD ((I NUMBER) (J INTEGER)) (LIST (CALL-NEXT-METHOD) (- I J))) (:METHOD ((I INTEGER) (J NUMBER)) (LIST (CALL-NEXT-METHOD) (+ I J)))) NIL) WARNING: Redefining an already called generic function # WARNING: Replacing method #1=# #3=#)> in # EQL-OK: NIL (F 'X 'Y) EQUAL-OK: (X Y) (F 1 2) EQUAL-OK: (((1 2) -1) 3) (F 1 2.0) EQUAL-OK: ((1 2.0) 3.0) (F 1.0 2) EQUAL-OK: ((1.0 2) -1.0) (PROGN (DEFGENERIC G (X) (:METHOD ((X NULL)) (CONS 'NULL (CALL-NEXT-METHOD))) (:METHOD ((X LIST)) (IF (NEXT-METHOD-P) (CONS 'LIST (CALL-NEXT-METHOD)) '(LIST$))) (:METHOD ((X SYMBOL)) (IF (NEXT-METHOD-P) (CONS 'SYMBOL (CALL-NEXT-METHOD)) '(SYMBOL$)))) NIL) EQL-OK: NIL (G 'X) EQUAL-OK: (SYMBOL$) (G '(X)) EQUAL-OK: (LIST$) (G 'NIL) EQUAL-OK: (NULL SYMBOL LIST$) (DEFPARAMETER *HL* NIL) EQL-OK: *HL* (PROGN (DEFGENERIC HGEN (X) (:METHOD ((X INTEGER)) (SETF *HL* (CONS 'I-PRIMARY-1 *HL*)) (CALL-NEXT-METHOD) (SETF *HL* (CONS 'I-PRIMARY-2 *HL*))) (:METHOD :BEFORE ((X INTEGER)) (SETF *HL* (CONS 'I-BEFORE *HL*))) (:METHOD :AFTER ((X INTEGER)) (SETF *HL* (CONS 'I-AFTER *HL*))) (:METHOD :AROUND ((X INTEGER)) (SETF *HL* (CONS 'I-AROUND-1 *HL*)) (CALL-NEXT-METHOD) (SETF *HL* (CONS 'I-AROUND-2 *HL*))) (:METHOD ((X NUMBER)) (SETF *HL* (CONS 'N-PRIMARY-1 *HL*)) (CALL-NEXT-METHOD) (SETF *HL* (CONS 'N-PRIMARY-2 *HL*))) (:METHOD :BEFORE ((X NUMBER)) (SETF *HL* (CONS 'N-BEFORE *HL*))) (:METHOD :AFTER ((X NUMBER)) (SETF *HL* (CONS 'N-AFTER *HL*))) (:METHOD :AROUND ((X NUMBER)) (SETF *HL* (CONS 'N-AROUND-1 *HL*)) (CALL-NEXT-METHOD) (SETF *HL* (CONS 'N-AROUND-2 *HL*))) (:METHOD ((X T)) (SETF *HL* (CONS 'INNERMOST *HL*)))) (DEFUN H (X) (SETF *HL* 'NIL) (HGEN X) (REVERSE *HL*))) EQL-OK: H (H 'ABC) EQUAL-OK: (INNERMOST) (H 3.14) EQUAL-OK: (N-AROUND-1 N-BEFORE N-PRIMARY-1 INNERMOST N-PRIMARY-2 N-AFTER N-AROUND-2) (H 3) EQUAL-OK: (I-AROUND-1 N-AROUND-1 I-BEFORE N-BEFORE I-PRIMARY-1 N-PRIMARY-1 INNERMOST N-PRIMARY-2 I-PRIMARY-2 N-AFTER I-AFTER N-AROUND-2 I-AROUND-2) (PROGN (DEFGENERIC TESTGF00 (&REST ARGS &KEY) (:METHOD (&REST ARGS))) (TESTGF00 'A 'B)) [SIMPLE-KEYWORD-ERROR]: TESTGF00--1: illegal keyword/value pair A, B in argument list. The allowed keywords are NIL EQL-OK: ERROR (LET ((METHODS NIL)) (DEFGENERIC FOO136 (MODE OBJECT)) (DEFMETHOD FOO136 (MODE (OBJECT T)) (IF (EQ MODE 'STORE) (PUSH #'CALL-NEXT-METHOD METHODS) (IF (EQ MODE 'LIST) (LIST 'T) (CONS (LIST 'T) (FUNCALL MODE))))) (DEFMETHOD FOO136 (MODE (OBJECT NUMBER)) (IF (EQ MODE 'STORE) (PROGN (PUSH #'CALL-NEXT-METHOD METHODS) (CALL-NEXT-METHOD)) (IF (EQ MODE 'LIST) (CONS 'NUMBER (CALL-NEXT-METHOD)) (CONS (CONS 'NUMBER (CALL-NEXT-METHOD 'LIST OBJECT)) (FUNCALL MODE))))) (DEFMETHOD FOO136 (MODE (OBJECT REAL)) (IF (EQ MODE 'STORE) (PROGN (PUSH #'CALL-NEXT-METHOD METHODS) (CALL-NEXT-METHOD)) (IF (EQ MODE 'LIST) (CONS 'REAL (CALL-NEXT-METHOD)) (CONS (CONS 'REAL (CALL-NEXT-METHOD 'LIST OBJECT)) (FUNCALL MODE))))) (DEFMETHOD FOO136 (MODE (OBJECT RATIONAL)) (IF (EQ MODE 'STORE) (PROGN (PUSH #'CALL-NEXT-METHOD METHODS) (CALL-NEXT-METHOD)) (IF (EQ MODE 'LIST) (CONS 'RATIONAL (CALL-NEXT-METHOD)) (CONS (CONS 'RATIONAL (CALL-NEXT-METHOD 'LIST OBJECT)) (FUNCALL MODE))))) (DEFMETHOD FOO136 (MODE (OBJECT INTEGER)) (IF (EQ MODE 'STORE) (PROGN (PUSH #'CALL-NEXT-METHOD METHODS) (CALL-NEXT-METHOD)) (IF (EQ MODE 'LIST) (CONS 'INTEGER (CALL-NEXT-METHOD)) (CONS (CONS 'INTEGER (CALL-NEXT-METHOD 'LIST OBJECT)) (FUNCALL MODE))))) (FOO136 'STORE 3) (MULTIPLE-VALUE-BIND (T-ERROR-METHOD NUMBER-T-METHOD REAL-NUMBER-METHOD RATIONAL-REAL-METHOD INTEGER-RATIONAL-METHOD) (VALUES-LIST METHODS) (FOO136 #'(LAMBDA NIL (FUNCALL NUMBER-T-METHOD #'(LAMBDA NIL (FUNCALL INTEGER-RATIONAL-METHOD #'(LAMBDA NIL (FUNCALL REAL-NUMBER-METHOD #'(LAMBDA NIL NIL) 5)) 5)) 5)) 5))) EQUAL-OK: ((INTEGER RATIONAL REAL NUMBER T) (T) (RATIONAL REAL NUMBER T) (NUMBER T)) (UNINTERN ') EQL-OK: T (PROGN (DEFCLASS NIL ((X :INITFORM 0 :ACCESSOR X-VAL :INITARG :X) (Y :INITFORM 1 :ACCESSOR Y-VAL :INITARG :Y))) NIL) WARNING: Adding method #>)> to an already called generic function # WARNING: Adding method # #2=#>)> to an already called generic function # WARNING: Adding method #>)> to an already called generic function # EQL-OK: NIL (DEFPARAMETER A (MAKE-INSTANCE (FIND-CLASS ') :X 10)) EQL-OK: A (DEFPARAMETER B (MAKE-INSTANCE (FIND-CLASS ') :Y 20 :X 10)) EQL-OK: B (DEFPARAMETER C (MAKE-INSTANCE (FIND-CLASS '))) EQL-OK: C (X-VAL A) EQL-OK: 10 (Y-VAL A) EQL-OK: 1 (X-VAL B) EQL-OK: 10 (Y-VAL B) EQL-OK: 20 (X-VAL C) EQL-OK: 0 (Y-VAL C) EQL-OK: 1 (UNINTERN ') EQL-OK: T (LET* ((C (DEFCLASS NIL ((X :INITFORM 0 :ACCESSOR X-VAL :INITARG :X) (Y :INITFORM 1 :ACCESSOR Y-VAL :INITARG :Y)))) (M (DEFMETHOD INITIALIZE-INSTANCE :AFTER ((INSTANCE ) &REST INITVALUES) (IF (= (X-VAL INSTANCE) 0) (SETF (X-VAL INSTANCE) (Y-VAL INSTANCE)))))) (EQ M (FIND-METHOD #'INITIALIZE-INSTANCE '(:AFTER) (LIST C)))) WARNING: Adding method #>)> to an already called generic function # WARNING: Adding method #>)> to an already called generic function # EQL-OK: T (X-VAL (MAKE-INSTANCE (FIND-CLASS '))) EQL-OK: 1 (X-VAL (MAKE-INSTANCE (FIND-CLASS ') :X 10)) EQL-OK: 10 (X-VAL (MAKE-INSTANCE (FIND-CLASS ') :Y 20)) EQL-OK: 20 (X-VAL (MAKE-INSTANCE (FIND-CLASS ') :X 10 :Y 20)) EQL-OK: 10 (LET ((M (DEFMETHOD INITIALIZE-INSTANCE ((INST ) &REST IGNORE) (CALL-NEXT-METHOD) 123))) (EQ M (FIND-METHOD #'INITIALIZE-INSTANCE NIL (LIST (FIND-CLASS '))))) EQL-OK: T (X-VAL (MAKE-INSTANCE (FIND-CLASS ') :X 101 :Y 120)) EQL-OK: 101 (SETF (FIND-CLASS ') NIL) EQL-OK: NIL (UNINTERN ') EQL-OK: T (EQ (CLASS-OF NIL) (FIND-CLASS 'NULL)) EQL-OK: T (EQ (CLASS-OF T) (FIND-CLASS 'SYMBOL)) EQL-OK: T (EQ (CLASS-OF 10) (FIND-CLASS 'INTEGER)) EQL-OK: T (EQ (CLASS-OF 10.0) (FIND-CLASS 'FLOAT)) EQL-OK: T (EQ (CLASS-OF '(A B)) (FIND-CLASS 'CONS)) EQL-OK: T (EQ (CLASS-OF "abc") (FIND-CLASS 'STRING)) EQL-OK: T (EQ (CLASS-OF '#(1 2)) (FIND-CLASS 'VECTOR)) EQL-OK: T (EQ (CLASS-OF #'CAR) (FIND-CLASS 'FUNCTION)) EQL-OK: T (EQ (CLASS-OF #'MAKE-INSTANCE) (FIND-CLASS 'STANDARD-GENERIC-FUNCTION)) EQL-OK: T (EQ (CLASS-OF '#2A((A) (B))) (FIND-CLASS 'ARRAY)) EQL-OK: T (EQ (CLASS-OF *STANDARD-INPUT*) (FIND-CLASS 'STREAM)) EQL-OK: NIL (EQ (CLASS-OF (LAMBDA (X) X)) (FIND-CLASS 'FUNCTION)) EQL-OK: T (EQ (CLASS-OF (FIND-CLASS 'T)) (FIND-CLASS 'BUILT-IN-CLASS)) EQL-OK: T (EQ (CLASS-OF (MAKE-ARRAY NIL)) (FIND-CLASS 'ARRAY)) EQL-OK: T (EQ (CLASS-OF (MAKE-ARRAY NIL :ELEMENT-TYPE NIL)) (FIND-CLASS 'ARRAY)) EQL-OK: T (EQ (CLASS-OF (MAKE-ARRAY 10 :ELEMENT-TYPE NIL)) (FIND-CLASS 'STRING)) EQL-OK: T (TYPEP "abc" (FIND-CLASS 'T)) EQL-OK: T (TYPEP "abc" (FIND-CLASS 'ARRAY)) EQL-OK: T (TYPEP "abc" (FIND-CLASS 'VECTOR)) EQL-OK: T (TYPEP "abc" (FIND-CLASS 'STRING)) EQL-OK: T (TYPEP "abc" (FIND-CLASS 'INTEGER)) EQL-OK: NIL (TYPEP 3 (FIND-CLASS 'T)) EQL-OK: T (TYPEP 3 (FIND-CLASS 'NUMBER)) EQL-OK: T (TYPEP 3 (FIND-CLASS 'FLOAT)) EQL-OK: NIL (TYPEP 3 (FIND-CLASS 'INTEGER)) EQL-OK: T (TYPEP 3 (FIND-CLASS 'STRING)) EQL-OK: NIL (NOT (NOT (TYPEP *STANDARD-INPUT* (FIND-CLASS 'STREAM)))) EQL-OK: T (DEFUN SUBCLASSP (CLASS1 CLASS2) (CLOS::SUBCLASSP CLASS1 CLASS2)) EQL-OK: SUBCLASSP (SUBCLASSP (FIND-CLASS 'NUMBER) (FIND-CLASS 'T)) EQL-OK: T (SUBCLASSP (FIND-CLASS 'INTEGER) (FIND-CLASS 'NUMBER)) EQL-OK: T (SUBCLASSP (FIND-CLASS 'FLOAT) (FIND-CLASS 'NUMBER)) EQL-OK: T (DEFUN MLF-TESTER (SYMBOL &OPTIONAL (LISP-FILE "clos-tst-make-load-form-demo.lisp")) (UNWIND-PROTECT (LET (COMPILED-FILE) (WITH-OPEN-FILE (STREAM LISP-FILE :DIRECTION :OUTPUT) (FORMAT STREAM "(in-package ~s)~%(defparameter ~S '#.~S)~%" (PACKAGE-NAME (SYMBOL-PACKAGE SYMBOL)) SYMBOL SYMBOL)) (SETQ COMPILED-FILE (COMPILE-FILE LISP-FILE)) (SETF (SYMBOL-VALUE SYMBOL) NIL) (LOAD COMPILED-FILE) (SYMBOL-VALUE SYMBOL)) (POST-COMPILE-FILE-CLEANUP LISP-FILE))) EQL-OK: MLF-TESTER (DEFUN MLF-KILL (TYPE) (LET ((M (FIND-METHOD #'MAKE-LOAD-FORM NIL (LIST (FIND-CLASS TYPE)) NIL))) (WHEN M (REMOVE-METHOD #'MAKE-LOAD-FORM M))) (SETF (FIND-CLASS TYPE) NIL)) EQL-OK: MLF-KILL (PROGN (DEFCLASS TEST-CLASS1 NIL ((FOO :INITARG :FOO :ACCESSOR FOO :INITFORM 0))) (DEFCLASS TEST-CLASS2 NIL ((FOO :INITARG :FOO :ACCESSOR FOO :INITFORM 0))) (DEFMETHOD MAKE-LOAD-FORM ((OBJ TEST-CLASS1) &OPTIONAL ENVIRONMENT) (DECLARE (IGNORE ENVIRONMENT)) `(MAKE-INSTANCE 'TEST-CLASS1 :FOO ',(FOO OBJ))) (DEFMETHOD MAKE-LOAD-FORM ((OBJ TEST-CLASS2) &OPTIONAL ENVIRONMENT) (DECLARE (IGNORE ENVIRONMENT)) `(MAKE-INSTANCE 'TEST-CLASS2 :FOO ',(FOO OBJ))) (DEFPARAMETER *T-LIST* (LIST (MAKE-INSTANCE 'TEST-CLASS1 :FOO 100) (MAKE-INSTANCE 'TEST-CLASS2 :FOO 200))) (MLF-TESTER '*T-LIST*) (MAPCAR #'FOO *T-LIST*)) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-make-load-form-demo.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-make-load-form-demo.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-make-load-form-demo.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-make-load-form-demo.fas EQUAL-OK: (100 200) (DEFSTRUCT FOO A) EQL-OK: FOO (PROGN (DEFMETHOD MAKE-LOAD-FORM ((X FOO) &OPTIONAL ENV) (MAKE-LOAD-FORM-SAVING-SLOTS X :ENVIRONMENT ENV)) (DEFPARAMETER *TMP-FILE* "clos-tst-mlf-tmp.lisp") (WITH-OPEN-FILE (S *TMP-FILE* :DIRECTION :OUTPUT) (FORMAT S "(defparameter *foo* '#S(FOO :A BAR-CONST))~%")) (LOAD (COMPILE-FILE *TMP-FILE*)) *FOO*) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-mlf-tmp.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-mlf-tmp.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-mlf-tmp.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-mlf-tmp.fas EQUALP-OK: #S(FOO :A BAR-CONST) (PROGN (MAKUNBOUND '*FOO*) (DEFCONSTANT BAR-CONST 1) (UNWIND-PROTECT (PROGN (LOAD (COMPILE-FILE *TMP-FILE*)) *FOO*) (POST-COMPILE-FILE-CLEANUP *TMP-FILE*) (MLF-KILL 'FOO))) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-mlf-tmp.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-mlf-tmp.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-mlf-tmp.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-mlf-tmp.fas EQUALP-OK: # (PROGN (DEFCLASS POS NIL ((X :INITARG :X :READER POS-X) (Y :INITARG :Y :READER POS-Y) (R :ACCESSOR POS-R))) (DEFMETHOD SHARED-INITIALIZE :AFTER ((SELF POS) IGNORE1 &REST IGNORE2) (DECLARE (IGNORE IGNORE1 IGNORE2)) (UNLESS (SLOT-BOUNDP SELF 'R) (SETF (POS-R SELF) (SQRT (+ (* (POS-X SELF) (POS-X SELF)) (* (POS-Y SELF) (POS-Y SELF))))))) (DEFMETHOD MAKE-LOAD-FORM ((SELF POS) &OPTIONAL ENVIRONMENT) (DECLARE (IGNORE ENVIRONMENT)) `(MAKE-INSTANCE ',(CLASS-NAME (CLASS-OF SELF)) :X ',(POS-X SELF) :Y ',(POS-Y SELF))) (SETQ *FOO* (MAKE-INSTANCE 'POS :X 3.0 :Y 4.0)) (MLF-TESTER '*FOO*) (LIST (POS-X *FOO*) (POS-Y *FOO*) (POS-R *FOO*))) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-make-load-form-demo.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-make-load-form-demo.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-make-load-form-demo.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-make-load-form-demo.fas EQUAL-OK: (3.0 4.0 5.0) (PROGN (DEFCLASS TREE-WITH-PARENT NIL ((PARENT :ACCESSOR TREE-PARENT) (CHILDREN :INITARG :CHILDREN))) (DEFMETHOD MAKE-LOAD-FORM ((X TREE-WITH-PARENT) &OPTIONAL ENVIRONMENT) (DECLARE (IGNORE ENVIRONMENT)) (VALUES `(MAKE-INSTANCE ',(CLASS-NAME (CLASS-OF X))) `(SETF (TREE-PARENT ',X) ',(SLOT-VALUE X 'PARENT) (SLOT-VALUE ',X 'CHILDREN) ',(SLOT-VALUE X 'CHILDREN)))) (SETQ *FOO* (MAKE-INSTANCE 'TREE-WITH-PARENT :CHILDREN (LIST (MAKE-INSTANCE 'TREE-WITH-PARENT :CHILDREN NIL) (MAKE-INSTANCE 'TREE-WITH-PARENT :CHILDREN NIL)))) (SETF (TREE-PARENT *FOO*) *FOO*) (DOLIST (CH (SLOT-VALUE *FOO* 'CHILDREN)) (SETF (TREE-PARENT CH) *FOO*)) (MLF-TESTER '*FOO*) (LIST (EQ *FOO* (TREE-PARENT *FOO*)) (EVERY (LAMBDA (X) (EQ X *FOO*)) (MAPCAR #'TREE-PARENT (SLOT-VALUE *FOO* 'CHILDREN))) (EVERY #'NULL (MAPCAR (LAMBDA (X) (SLOT-VALUE X 'CHILDREN)) (SLOT-VALUE *FOO* 'CHILDREN))))) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-make-load-form-demo.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-make-load-form-demo.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-make-load-form-demo.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst-make-load-form-demo.fas EQUAL-OK: (T T T) (PROGN (DEFPARAMETER *INITFORM-EXECUTED-COUNTER* 0) (DEFSTRUCT FOO (SLOT-1 (INCF *INITFORM-EXECUTED-COUNTER*))) (DEFPARAMETER *FOO* (MAKE-FOO))) EQL-OK: *FOO* *FOO* EQUALP-OK: #S(FOO :SLOT-1 1) *INITFORM-EXECUTED-COUNTER* EQL-OK: 1 (PROGN (MAPC #'EVAL (MULTIPLE-VALUE-LIST (MAKE-LOAD-FORM-SAVING-SLOTS *FOO*))) *INITFORM-EXECUTED-COUNTER*) EQL-OK: 1 (PROGN (DEFMETHOD PRINT-OBJECT ((F FOO) (O STREAM)) (FORMAT O "~1t<~a>" (FOO-SLOT-1 F))) (PRIN1-TO-STRING (MAKE-FOO))) EQUAL-OK: " <2>" (PROGN (MLF-KILL 'FOO) NIL) EQL-OK: NIL (DEFSTRUCT FOO SLOT) EQL-OK: FOO (LET ((FILE "clos-tst.lisp") C) (UNWIND-PROTECT (PROGN (MAKUNBOUND '*FOO*) (WITH-OPEN-FILE (F FILE :DIRECTION :OUTPUT) (FORMAT F "(eval-when (compile load eval) (defstruct foo slot))~@ (defparameter *foo* #.(make-foo))~%")) (LOAD (SETQ C (COMPILE-FILE FILE))) *FOO*) (POST-COMPILE-FILE-CLEANUP FILE))) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst.lisp ... WARNING: (SETF FIND-CLASS): redefining class FOO in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst.lisp, was defined in top-level ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst.fas 0 errors, 1 warning ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst.fas EQUALP-OK: #S(FOO :SLOT NIL) (FLET ((WEAK-LIST-LENGTH (W) (IF W (SYSTEM::%RECORD-REF (SYSTEM::%RECORD-REF W 0) 1) 0))) (LET (OLD1-WEAKPOINTERS-COUNT OLD-SUBCLASSES-COUNT OLD2-WEAKPOINTERS-COUNT NEW-SUBCLASSES-COUNT NEW-WEAKPOINTERS-COUNT) (DEFCLASS FOO64A NIL NIL) (DEFCLASS FOO64B (FOO64A) NIL) (LET ((USYMBOL (GENSYM))) (EVAL `(DEFCLASS ,USYMBOL (FOO64A) NIL)) (SETQ OLD1-WEAKPOINTERS-COUNT (WEAK-LIST-LENGTH (CLOS::CLASS-FINALIZED-DIRECT-SUBCLASSES-TABLE (FIND-CLASS 'FOO64A)))) (SETF (SYMBOL-VALUE USYMBOL) (1- (LENGTH (CLOS::LIST-ALL-FINALIZED-SUBCLASSES (FIND-CLASS 'FOO64A))))) (SETQ OLD2-WEAKPOINTERS-COUNT (WEAK-LIST-LENGTH (CLOS::CLASS-FINALIZED-DIRECT-SUBCLASSES-TABLE (FIND-CLASS 'FOO64A)))) (SETQ OLD-SUBCLASSES-COUNT (SYMBOL-VALUE USYMBOL))) (GC) (SETQ NEW-SUBCLASSES-COUNT (1- (LENGTH (CLOS::LIST-ALL-FINALIZED-SUBCLASSES (FIND-CLASS 'FOO64A))))) (SETQ NEW-WEAKPOINTERS-COUNT (WEAK-LIST-LENGTH (CLOS::CLASS-FINALIZED-DIRECT-SUBCLASSES-TABLE (FIND-CLASS 'FOO64A)))) (LIST OLD1-WEAKPOINTERS-COUNT OLD-SUBCLASSES-COUNT OLD2-WEAKPOINTERS-COUNT NEW-SUBCLASSES-COUNT NEW-WEAKPOINTERS-COUNT))) EQUAL-OK: (2 2 2 1 1) (LET (OLD-WEAKPOINTERS-COUNT NEW-WEAKPOINTERS-COUNT) (DEFCLASS FOO64C NIL NIL) (DEFCLASS FOO64D (FOO64C) NIL) (LET ((USYMBOL (GENSYM))) (EVAL `(DEFCLASS ,USYMBOL (FOO64C) NIL)) (SETQ OLD-WEAKPOINTERS-COUNT (LENGTH (CLASS-DIRECT-SUBCLASSES (FIND-CLASS 'FOO64C)))) (SETF (SYMBOL-VALUE USYMBOL) NIL)) (GC) (SETQ NEW-WEAKPOINTERS-COUNT (LENGTH (CLASS-DIRECT-SUBCLASSES (FIND-CLASS 'FOO64C)))) (LIST OLD-WEAKPOINTERS-COUNT NEW-WEAKPOINTERS-COUNT)) EQUAL-OK: (2 1) (PROGN (DEFCLASS ABSTRACT-POSITION NIL NIL) (DEFCLASS X-Y-POSITION (ABSTRACT-POSITION) ((NAME :INITARG :NAME) (X :INITFORM 0 :INITARG :X) (Y :INITFORM 0 :INITARG :Y))) (DEFCLASS RHO-THETA-POSITION (ABSTRACT-POSITION) ((NAME :INITARG :NAME) (RHO :INITFORM 0) (THETA :INITFORM 0))) (DEFMETHOD UPDATE-INSTANCE-FOR-DIFFERENT-CLASS :BEFORE ((OLD X-Y-POSITION) (NEW RHO-THETA-POSITION) &KEY) (LET ((X (SLOT-VALUE OLD 'X)) (Y (SLOT-VALUE OLD 'Y))) (SETF (SLOT-VALUE NEW 'RHO) (SQRT (+ (* X X) (* Y Y))) (SLOT-VALUE NEW 'THETA) (ATAN Y X)))) (SETQ P1 (MAKE-INSTANCE 'X-Y-POSITION :NAME 'FOO :X 2 :Y 0) P2 (MAKE-INSTANCE 'X-Y-POSITION :NAME 'BAR :X 1 :Y 1)) (CHANGE-CLASS P1 'RHO-THETA-POSITION) (CHANGE-CLASS P2 'RHO-THETA-POSITION) (LIST (SLOT-VALUE P1 'NAME) (SLOT-VALUE P1 'RHO) (SLOT-VALUE P1 'THETA) (SLOT-VALUE P2 'NAME) (SLOT-VALUE P2 'RHO) (SLOT-VALUE P2 'THETA))) EQUAL-OK: (FOO 2 0 BAR 1.4142135 0.7853981) (PROGN (DEFCLASS C0 NIL (A B C)) (DEFCLASS C1 NIL (B C A)) (SETQ I (MAKE-INSTANCE 'C0)) (SETF (SLOT-VALUE I 'A) 1 (SLOT-VALUE I 'B) 2 (SLOT-VALUE I 'C) 3) (CHANGE-CLASS I 'C1) (LIST (SLOT-VALUE I 'A) (SLOT-VALUE I 'B) (SLOT-VALUE I 'C))) EQUAL-OK: (1 2 3) (PROGN (DEFCLASS C1 NIL NIL) (DEFCLASS C2 NIL NIL) (LIST (LET ((C (MAKE-INSTANCE 'C1))) (LIST (TYPE-OF (CHANGE-CLASS C 'C2)) (TYPE-OF (CHANGE-CLASS C 'C1)))) (LET ((C (MAKE-INSTANCE 'C1))) (LIST (TYPE-OF (CHANGE-CLASS C 'C1)) (TYPE-OF (CHANGE-CLASS C 'C1)))))) WARNING: DEFCLASS: Class C1 (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: ((C2 C1) (C1 C1)) (PROGN (DEFCLASS C7 NIL ((NAME :INITARG :NAME))) (DEFCLASS C8 NIL ((PEOPLE :INITARG :PEOPLE) NAME)) (LET ((X (MAKE-INSTANCE 'C7 :NAME 'QUEEN-MARY))) (CHANGE-CLASS X 'C8 :PEOPLE 700) (LIST (SLOT-VALUE X 'NAME) (SLOT-VALUE X 'PEOPLE)))) EQUAL-OK: (QUEEN-MARY 700) (PROGN (DEFCLASS C3 NIL (A B C)) (DEFCLASS C4 NIL (B C D E)) (LET* ((I (MAKE-INSTANCE 'C3)) (NSLOTS-BEFORE (SYSTEM::%RECORD-LENGTH I))) (CHANGE-CLASS I 'C4) (GC) (< NSLOTS-BEFORE (SYSTEM::%RECORD-LENGTH I)))) EQL-OK: T (LET (C1 C2) (DEFCLASS FOO60-B NIL NIL) (DEFCLASS FOO60-A (FOO60-B) NIL) (MAKE-INSTANCE 'FOO60-B) (SETQ C1 (FIND-CLASS 'FOO60-A)) (DEFCLASS FOO60-A NIL NIL) (SETQ C2 (FIND-CLASS 'FOO60-A)) (EQ C1 C2)) EQL-OK: T (LET (C1 C2) (DEFCLASS FOO61-A (FOO61-B) NIL) (SETQ C1 (FIND-CLASS 'FOO61-A)) (DEFCLASS FOO61-A NIL NIL) (SETQ C2 (FIND-CLASS 'FOO61-A)) (EQ C1 C2)) EQL-OK: T (PROGN (DEFCLASS FOO62-B (FOO62-A) NIL) (DEFCLASS FOO62-C (FOO62-B) NIL) (DEFCLASS FOO62-A NIL NIL) (MAKE-INSTANCE 'FOO62-C) (LIST (SUBTYPEP 'FOO62-B 'FOO62-B) (SUBTYPEP 'FOO62-C 'FOO62-B) (SUBTYPEP 'FOO62-B 'FOO62-C))) EQUAL-OK: (T T NIL) (PROGN (DEFCLASS FOO63-B (FOO63-A) NIL) (DEFCLASS FOO63-C (FOO63-B) NIL) (DEFCLASS FOO63-A NIL NIL) (LIST (SUBTYPEP 'FOO63-B 'FOO63-B) (SUBTYPEP 'FOO63-C 'FOO63-B) (SUBTYPEP 'FOO63-B 'FOO63-C))) EQUAL-OK: (T T NIL) (LET (FA FB FC) (DEFCLASS FOO65A NIL NIL) (DEFCLASS FOO65B (FOO65A) NIL) (DEFCLASS FOO65C (FOO65B) NIL) (SETQ FA (CLASS-FINALIZED-P (FIND-CLASS 'FOO65A)) FB (CLASS-FINALIZED-P (FIND-CLASS 'FOO65B)) FC (CLASS-FINALIZED-P (FIND-CLASS 'FOO65C))) (DEFCLASS FOO65B (FOO65A FOO65OTHER) NIL) (LIST FA FB FC (CLASS-FINALIZED-P (FIND-CLASS 'FOO65A)) (CLASS-FINALIZED-P (FIND-CLASS 'FOO65B)) (CLASS-FINALIZED-P (FIND-CLASS 'FOO65C)))) EQUAL-OK: (T T T T NIL NIL) (PROGN (DEFCLASS ABSTRACT-POSITION NIL NIL) (DEFCLASS X-Y-POSITION (ABSTRACT-POSITION) ((X :INITFORM 0 :ACCESSOR POSITION-X) (Y :INITFORM 0 :ACCESSOR POSITION-Y))) (SETF I (MAKE-INSTANCE 'X-Y-POSITION) (POSITION-X I) 1.0d0 (POSITION-Y I) 1.0d0) (TYPE-OF I)) WARNING: DEFCLASS: Class X-Y-POSITION (or one of its ancestors) is being redefined, instances are obsolete EQL-OK: X-Y-POSITION (PROGN (DEFMETHOD UPDATE-INSTANCE-FOR-REDEFINED-CLASS :BEFORE ((POS X-Y-POSITION) ADDED DELETED PLIST &KEY) (LET ((X (GETF PLIST 'X)) (Y (GETF PLIST 'Y))) (SETF (POSITION-RHO POS) (SQRT (+ (* X X) (* Y Y))) (POSITION-THETA POS) (ATAN Y X)))) (DEFCLASS X-Y-POSITION (ABSTRACT-POSITION) ((RHO :INITFORM 0 :ACCESSOR POSITION-RHO) (THETA :INITFORM 0 :ACCESSOR POSITION-THETA))) (DEFMETHOD POSITION-X ((POS X-Y-POSITION)) (WITH-SLOTS (RHO THETA) POS (* RHO (COS THETA)))) (DEFMETHOD (SETF POSITION-X) (NEW-X (POS X-Y-POSITION)) (WITH-SLOTS (RHO THETA) POS (LET ((Y (POSITION-Y POS))) (SETQ RHO (SQRT (+ (* NEW-X NEW-X) (* Y Y))) THETA (ATAN Y NEW-X)) NEW-X))) (DEFMETHOD POSITION-Y ((POS X-Y-POSITION)) (WITH-SLOTS (RHO THETA) POS (* RHO (SIN THETA)))) (DEFMETHOD (SETF POSITION-Y) (NEW-Y (POS X-Y-POSITION)) (WITH-SLOTS (RHO THETA) POS (LET ((X (POSITION-X POS))) (SETQ RHO (SQRT (+ (* X X) (* NEW-Y NEW-Y))) THETA (ATAN NEW-Y X)) NEW-Y))) (LIST (TYPE-OF I) (POSITION-X I) (POSITION-Y I) (POSITION-RHO I) (POSITION-THETA I))) WARNING: Removing method #1=# #3=#)> from an already called generic function # WARNING: Removing method #1=# #3=#)> from an already called generic function # WARNING: DEFCLASS: Class X-Y-POSITION (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (X-Y-POSITION 1.0000000000000002d0 1.0d0 1.4142135623730951d0 0.7853981633974483d0) (MULTIPLE-VALUE-BIND (VALUE CONDITION) (IGNORE-ERRORS (DEFCLASS FOO70 NIL NIL) (SETQ I (MAKE-INSTANCE 'FOO70)) (DEFCLASS FOO70 NIL ((SIZE :INITARG :SIZE :INITFORM 1) (OTHER))) (SLOT-VALUE I 'SIZE)) (LIST VALUE (TYPEP CONDITION 'ERROR))) WARNING: DEFCLASS: Class FOO70 (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (1 NIL) (MULTIPLE-VALUE-BIND (VALUE CONDITION) (IGNORE-ERRORS (DEFCLASS FOO71 NIL NIL) (SETQ I (MAKE-INSTANCE 'FOO71)) (DEFCLASS FOO71 NIL ((SIZE :INITARG :SIZE :INITFORM 1 :ALLOCATION :CLASS) (OTHER))) (SLOT-VALUE I 'SIZE)) (LIST VALUE (TYPEP CONDITION 'ERROR))) WARNING: DEFCLASS: Class FOO71 (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (1 NIL) (MULTIPLE-VALUE-BIND (VALUE CONDITION) (IGNORE-ERRORS (DEFCLASS FOO72 NIL ((SIZE :INITARG :SIZE :INITFORM 1))) (SETQ I (MAKE-INSTANCE 'FOO72 :SIZE 5)) (DEFCLASS FOO72 NIL ((OTHER))) (SLOT-VALUE I 'SIZE)) (LIST VALUE (TYPEP CONDITION 'ERROR))) WARNING: DEFCLASS: Class FOO72 (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (NIL T) (MULTIPLE-VALUE-BIND (VALUE CONDITION) (IGNORE-ERRORS (DEFCLASS FOO73 NIL ((SIZE :INITARG :SIZE :INITFORM 1 :ALLOCATION :CLASS))) (SETQ I (MAKE-INSTANCE 'FOO73)) (DEFCLASS FOO73 NIL ((OTHER))) (SLOT-VALUE I 'SIZE)) (LIST VALUE (TYPEP CONDITION 'ERROR))) WARNING: DEFCLASS: Class FOO73 (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (NIL T) (MULTIPLE-VALUE-BIND (VALUE CONDITION) (IGNORE-ERRORS (DEFCLASS FOO74 NIL ((SIZE :INITARG :SIZE :INITFORM 1 :ALLOCATION :CLASS))) (SETQ I (MAKE-INSTANCE 'FOO74)) (DEFCLASS FOO74 NIL ((SIZE :INITARG :SIZE :INITFORM 2 :ALLOCATION :CLASS) (OTHER))) (SLOT-VALUE I 'SIZE)) (LIST VALUE (TYPEP CONDITION 'ERROR))) WARNING: DEFCLASS: Class FOO74 (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (1 NIL) (MULTIPLE-VALUE-BIND (VALUE CONDITION) (IGNORE-ERRORS (DEFCLASS FOO75 NIL ((SIZE :INITARG :SIZE :INITFORM 1 :ALLOCATION :CLASS))) (SETQ I (MAKE-INSTANCE 'FOO75)) (DEFCLASS FOO75 NIL ((SIZE :INITARG :SIZE :INITFORM 2) (OTHER))) (SLOT-VALUE I 'SIZE)) (LIST VALUE (TYPEP CONDITION 'ERROR))) WARNING: DEFCLASS: Class FOO75 (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (1 NIL) (MULTIPLE-VALUE-BIND (VALUE CONDITION) (IGNORE-ERRORS (DEFCLASS FOO76 NIL ((SIZE :INITARG :SIZE :INITFORM 1))) (SETQ I (MAKE-INSTANCE 'FOO76 :SIZE 5)) (DEFCLASS FOO76 NIL ((SIZE :INITARG :SIZE :INITFORM 2) (OTHER))) (SLOT-VALUE I 'SIZE)) (LIST VALUE (TYPEP CONDITION 'ERROR))) WARNING: DEFCLASS: Class FOO76 (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (5 NIL) (MULTIPLE-VALUE-BIND (VALUE CONDITION) (IGNORE-ERRORS (DEFCLASS FOO77 NIL ((SIZE :INITARG :SIZE :INITFORM 1))) (SETQ I (MAKE-INSTANCE 'FOO77 :SIZE 5)) (DEFCLASS FOO77 NIL ((SIZE :INITARG :SIZE :INITFORM 2 :ALLOCATION :CLASS) (OTHER))) (SLOT-VALUE I 'SIZE)) (LIST VALUE (TYPEP CONDITION 'ERROR))) WARNING: DEFCLASS: Class FOO77 (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (2 NIL) (MULTIPLE-VALUE-BIND (VALUE CONDITION) (IGNORE-ERRORS (DEFCLASS FOO80A NIL NIL) (DEFCLASS FOO80B (FOO80A) NIL) (SETQ I (MAKE-INSTANCE 'FOO80B)) (DEFCLASS FOO80A NIL ((SIZE :INITARG :SIZE :INITFORM 1) (OTHER))) (SLOT-VALUE I 'SIZE)) (LIST VALUE (TYPEP CONDITION 'ERROR))) WARNING: DEFCLASS: Class FOO80B (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (1 NIL) (MULTIPLE-VALUE-BIND (VALUE CONDITION) (IGNORE-ERRORS (DEFCLASS FOO81A NIL NIL) (DEFCLASS FOO81B (FOO81A) NIL) (SETQ I (MAKE-INSTANCE 'FOO81B)) (DEFCLASS FOO81A NIL ((SIZE :INITARG :SIZE :INITFORM 1 :ALLOCATION :CLASS) (OTHER))) (SLOT-VALUE I 'SIZE)) (LIST VALUE (TYPEP CONDITION 'ERROR))) WARNING: DEFCLASS: Class FOO81B (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (1 NIL) (MULTIPLE-VALUE-BIND (VALUE CONDITION) (IGNORE-ERRORS (DEFCLASS FOO82A NIL ((SIZE :INITARG :SIZE :INITFORM 1))) (DEFCLASS FOO82B (FOO82A) NIL) (SETQ I (MAKE-INSTANCE 'FOO82B :SIZE 5)) (DEFCLASS FOO82A NIL ((OTHER))) (SLOT-VALUE I 'SIZE)) (LIST VALUE (TYPEP CONDITION 'ERROR))) WARNING: DEFCLASS: Class FOO82B (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (NIL T) (MULTIPLE-VALUE-BIND (VALUE CONDITION) (IGNORE-ERRORS (DEFCLASS FOO83A NIL ((SIZE :INITARG :SIZE :INITFORM 1 :ALLOCATION :CLASS))) (DEFCLASS FOO83B (FOO83A) NIL) (SETQ I (MAKE-INSTANCE 'FOO83B)) (DEFCLASS FOO83A NIL ((OTHER))) (SLOT-VALUE I 'SIZE)) (LIST VALUE (TYPEP CONDITION 'ERROR))) WARNING: DEFCLASS: Class FOO83B (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (NIL T) (MULTIPLE-VALUE-BIND (VALUE CONDITION) (IGNORE-ERRORS (DEFCLASS FOO84A NIL ((SIZE :INITARG :SIZE :INITFORM 1 :ALLOCATION :CLASS))) (DEFCLASS FOO84B (FOO84A) NIL) (SETQ I (MAKE-INSTANCE 'FOO84B)) (DEFCLASS FOO84A NIL ((SIZE :INITARG :SIZE :INITFORM 2 :ALLOCATION :CLASS) (OTHER))) (SLOT-VALUE I 'SIZE)) (LIST VALUE (TYPEP CONDITION 'ERROR))) WARNING: DEFCLASS: Class FOO84B (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (1 NIL) (MULTIPLE-VALUE-BIND (VALUE CONDITION) (IGNORE-ERRORS (DEFCLASS FOO85A NIL ((SIZE :INITARG :SIZE :INITFORM 1 :ALLOCATION :CLASS))) (DEFCLASS FOO85B (FOO85A) NIL) (SETQ I (MAKE-INSTANCE 'FOO85B)) (DEFCLASS FOO85A NIL ((SIZE :INITARG :SIZE :INITFORM 2) (OTHER))) (SLOT-VALUE I 'SIZE)) (LIST VALUE (TYPEP CONDITION 'ERROR))) WARNING: DEFCLASS: Class FOO85B (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (1 NIL) (MULTIPLE-VALUE-BIND (VALUE CONDITION) (IGNORE-ERRORS (DEFCLASS FOO86A NIL ((SIZE :INITARG :SIZE :INITFORM 1))) (DEFCLASS FOO86B (FOO86A) NIL) (SETQ I (MAKE-INSTANCE 'FOO86B :SIZE 5)) (DEFCLASS FOO86A NIL ((SIZE :INITARG :SIZE :INITFORM 2) (OTHER))) (SLOT-VALUE I 'SIZE)) (LIST VALUE (TYPEP CONDITION 'ERROR))) WARNING: DEFCLASS: Class FOO86B (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (5 NIL) (MULTIPLE-VALUE-BIND (VALUE CONDITION) (IGNORE-ERRORS (DEFCLASS FOO87A NIL ((SIZE :INITARG :SIZE :INITFORM 1))) (DEFCLASS FOO87B (FOO87A) NIL) (SETQ I (MAKE-INSTANCE 'FOO87B :SIZE 5)) (DEFCLASS FOO87A NIL ((SIZE :INITARG :SIZE :INITFORM 2 :ALLOCATION :CLASS) (OTHER))) (SLOT-VALUE I 'SIZE)) (LIST VALUE (TYPEP CONDITION 'ERROR))) WARNING: DEFCLASS: Class FOO87B (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (2 NIL) (PROGN (DEFCLASS FOO88B (FOO88A) ((S :INITARG :S))) (DEFCLASS FOO88C (B) NIL) (DEFCLASS FOO88A NIL NIL) (LIST (LENGTH (CLOS::LIST-FINALIZED-DIRECT-SUBCLASSES (FIND-CLASS 'FOO88A))) (LENGTH (CLOS::LIST-FINALIZED-DIRECT-SUBCLASSES (FIND-CLASS 'FOO88B))) (LENGTH (CLOS::LIST-FINALIZED-DIRECT-SUBCLASSES (FIND-CLASS 'FOO88C))))) EQUAL-OK: (0 0 0) (PROGN (DEFCLASS FOO89B (FOO89A) ((S :INITARG :S))) (DEFCLASS FOO89C (B) NIL) (DEFCLASS FOO89A NIL NIL) (LET ((X (MAKE-INSTANCE 'FOO89B :S 5))) (LIST (LENGTH (CLOS::LIST-FINALIZED-DIRECT-SUBCLASSES (FIND-CLASS 'FOO89A))) (LENGTH (CLOS::LIST-FINALIZED-DIRECT-SUBCLASSES (FIND-CLASS 'FOO89B))) (LENGTH (CLOS::LIST-FINALIZED-DIRECT-SUBCLASSES (FIND-CLASS 'FOO89C)))))) EQUAL-OK: (1 0 0) (PROGN (DEFCLASS FOO90B (FOO90A) ((S :INITARG :S))) (DEFCLASS FOO90C (FOO90B) NIL) (DEFCLASS FOO90A NIL NIL) (LET ((X (MAKE-INSTANCE 'FOO90B :S 5))) (DEFCLASS FOO90B NIL (S)) (LIST (LENGTH (CLOS::LIST-FINALIZED-DIRECT-SUBCLASSES (FIND-CLASS 'FOO90A))) (LENGTH (CLOS::LIST-FINALIZED-DIRECT-SUBCLASSES (FIND-CLASS 'FOO90B))) (LENGTH (CLOS::LIST-FINALIZED-DIRECT-SUBCLASSES (FIND-CLASS 'FOO90C)))))) WARNING: DEFCLASS: Class FOO90B (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (0 0 0) (PROGN (DEFCLASS FOO91A NIL NIL) (DEFCLASS FOO91B (FOO91A) NIL) (DEFCLASS FOO91C (FOO91B) NIL) (DEFCLASS FOO91B (FOO91A FOO91OTHER) NIL) (LIST (LENGTH (CLOS::LIST-FINALIZED-DIRECT-SUBCLASSES (FIND-CLASS 'FOO91A))) (LENGTH (CLOS::LIST-FINALIZED-DIRECT-SUBCLASSES (FIND-CLASS 'FOO91B))) (LENGTH (CLOS::LIST-FINALIZED-DIRECT-SUBCLASSES (FIND-CLASS 'FOO91C))))) EQUAL-OK: (0 0 0) (PROGN (DEFCLASS FOO92B (FOO92A) ((S :INITARG :S))) (DEFCLASS FOO92A NIL NIL) (LET ((X (MAKE-INSTANCE 'FOO92B :S 5)) (UPDATE-COUNTER 0)) (DEFCLASS FOO92B (FOO92A) ((S) (S1) (S2))) (SLOT-VALUE X 'S) (DEFMETHOD UPDATE-INSTANCE-FOR-REDEFINED-CLASS ((OBJECT FOO92B) ADDED-SLOTS DISCARDED-SLOTS PROPERTY-LIST &REST INITARGS) (INCF UPDATE-COUNTER)) (MAKE-INSTANCES-OBSOLETE 'FOO92A) (SLOT-VALUE X 'S) UPDATE-COUNTER)) WARNING: DEFCLASS: Class FOO92B (or one of its ancestors) is being redefined, instances are obsolete WARNING: MAKE-INSTANCES-OBSOLETE: instances of class FOO92B are made obsolete EQL-OK: 1 (PROGN (DEFCLASS FOO93B (FOO93A) ((S :INITARG :S))) (DEFCLASS FOO93A NIL NIL) (LET ((X (MAKE-INSTANCE 'FOO93B :S 5)) (UPDATE-COUNTER 0)) (DEFCLASS FOO93B NIL ((S) (S1) (S2))) (SLOT-VALUE X 'S) (DEFMETHOD UPDATE-INSTANCE-FOR-REDEFINED-CLASS ((OBJECT FOO93B) ADDED-SLOTS DISCARDED-SLOTS PROPERTY-LIST &REST INITARGS) (INCF UPDATE-COUNTER)) (MAKE-INSTANCES-OBSOLETE 'FOO93A) (SLOT-VALUE X 'S) UPDATE-COUNTER)) WARNING: DEFCLASS: Class FOO93B (or one of its ancestors) is being redefined, instances are obsolete EQL-OK: 0 (PROGN (DEFCLASS FOO94 NIL ((A :READER FOO94-GET-A :WRITER FOO94-SET-A) (B :READER FOO94-GET-B :WRITER FOO94-SET-B) (C :ACCESSOR FOO94-C) (D :ACCESSOR FOO94-D) (E :ACCESSOR FOO94-E))) (LIST* (NOT (NULL (FIND-METHOD #'FOO94-GET-A 'NIL (LIST (FIND-CLASS 'FOO94)) NIL))) (NOT (NULL (FIND-METHOD #'FOO94-SET-A 'NIL (LIST (FIND-CLASS 'T) (FIND-CLASS 'FOO94)) NIL))) (NOT (NULL (FIND-METHOD #'FOO94-GET-B 'NIL (LIST (FIND-CLASS 'FOO94)) NIL))) (NOT (NULL (FIND-METHOD #'FOO94-SET-B 'NIL (LIST (FIND-CLASS 'T) (FIND-CLASS 'FOO94)) NIL))) (NOT (NULL (FIND-METHOD #'FOO94-C 'NIL (LIST (FIND-CLASS 'FOO94)) NIL))) (NOT (NULL (FIND-METHOD #'(SETF FOO94-C) 'NIL (LIST (FIND-CLASS 'T) (FIND-CLASS 'FOO94)) NIL))) (NOT (NULL (FIND-METHOD #'FOO94-D 'NIL (LIST (FIND-CLASS 'FOO94)) NIL))) (NOT (NULL (FIND-METHOD #'(SETF FOO94-D) 'NIL (LIST (FIND-CLASS 'T) (FIND-CLASS 'FOO94)) NIL))) (NOT (NULL (FIND-METHOD #'FOO94-E 'NIL (LIST (FIND-CLASS 'FOO94)) NIL))) (NOT (NULL (FIND-METHOD #'(SETF FOO94-E) 'NIL (LIST (FIND-CLASS 'T) (FIND-CLASS 'FOO94)) NIL))) (PROGN (DEFCLASS FOO94 NIL ((A :READER FOO94-GET-A :WRITER FOO94-SET-A) (B) (C :ACCESSOR FOO94-C) (E :ACCESSOR FOO94-OTHER-E))) (LIST (NOT (NULL (FIND-METHOD #'FOO94-GET-A 'NIL (LIST (FIND-CLASS 'FOO94)) NIL))) (NOT (NULL (FIND-METHOD #'FOO94-SET-A 'NIL (LIST (FIND-CLASS 'T) (FIND-CLASS 'FOO94)) NIL))) (NOT (NULL (FIND-METHOD #'FOO94-GET-B 'NIL (LIST (FIND-CLASS 'FOO94)) NIL))) (NOT (NULL (FIND-METHOD #'FOO94-SET-B 'NIL (LIST (FIND-CLASS 'T) (FIND-CLASS 'FOO94)) NIL))) (NOT (NULL (FIND-METHOD #'FOO94-C 'NIL (LIST (FIND-CLASS 'FOO94)) NIL))) (NOT (NULL (FIND-METHOD #'(SETF FOO94-C) 'NIL (LIST (FIND-CLASS 'T) (FIND-CLASS 'FOO94)) NIL))) (NOT (NULL (FIND-METHOD #'FOO94-D 'NIL (LIST (FIND-CLASS 'FOO94)) NIL))) (NOT (NULL (FIND-METHOD #'(SETF FOO94-D) 'NIL (LIST (FIND-CLASS 'T) (FIND-CLASS 'FOO94)) NIL))) (NOT (NULL (FIND-METHOD #'FOO94-E 'NIL (LIST (FIND-CLASS 'FOO94)) NIL))) (NOT (NULL (FIND-METHOD #'(SETF FOO94-E) 'NIL (LIST (FIND-CLASS 'T) (FIND-CLASS 'FOO94)) NIL))))))) EQUAL-OK: (T T T T T T T T T T T T NIL NIL T T NIL NIL NIL NIL) (PROGN (DEFCLASS FOO95B NIL ((S :INITARG :S :ACCESSOR FOO95B-S))) (DEFCLASS FOO95B (FOO95A) ((S :ACCESSOR FOO95B-S))) T) EQL-OK: T (LET ((NOTES 'NIL)) (FLET ((NOTE (O) (SETQ NOTES (APPEND NOTES (LIST O))))) (DEFCLASS FOO96B NIL ((S :INITARG :S :ACCESSOR FOO96B-S))) (LET ((X (MAKE-INSTANCE 'FOO96B :S 5))) (NOTE (FOO96B-S X)) (NOTE (TYPEP (SECOND (MULTIPLE-VALUE-LIST (IGNORE-ERRORS (DEFCLASS FOO96B (FOO96A) ((S :ACCESSOR FOO96B-S)))))) 'ERROR)) (NOTE (FOO96B-S X)) (NOTE (SLOT-VALUE X 'S)) (DEFCLASS FOO96A NIL ((R :ACCESSOR FOO96B-R))) (NOTE (FOO96B-S X)) (NOTE (SLOT-VALUE X 'S)) (NOTE (SUBTYPEP 'FOO96B 'FOO96A)) NOTES))) WARNING: Removing method #1=#)> from an already called generic function # WARNING: DEFCLASS: Class FOO96B (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (5 T 5 5 5 5 NIL) (LET ((NOTES 'NIL)) (FLET ((NOTE (O) (SETQ NOTES (APPEND NOTES (LIST O))))) (DEFCLASS FOO97B NIL ((S :INITARG :S :ACCESSOR FOO97B-S))) (LET ((X (MAKE-INSTANCE 'FOO97B :S 5))) (NOTE (FOO97B-S X)) (NOTE (TYPEP (SECOND (MULTIPLE-VALUE-LIST (IGNORE-ERRORS (DEFCLASS FOO97B (FOO97A) ((S :ACCESSOR FOO97B-S)))))) 'ERROR)) (NOTE (FOO97B-S X)) (NOTE (SLOT-VALUE X 'S)) (DEFCLASS FOO97A NIL ((R :ACCESSOR FOO97B-R))) (NOTE (FOO97B-S X)) (NOTE (SLOT-VALUE X 'S)) (NOTE (SUBTYPEP 'FOO97B 'FOO97A)) NOTES))) WARNING: Removing method #1=#)> from an already called generic function # WARNING: DEFCLASS: Class FOO97B (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (5 T 5 5 5 5 NIL) (PROGN (DEFCLASS FOO100 NIL (A B C) (:FIXED-SLOT-LOCATIONS T)) (MAPCAR #'(LAMBDA (NAME) (LET ((SLOT (FIND NAME (CLASS-SLOTS (FIND-CLASS 'FOO100)) :KEY #'SLOT-DEFINITION-NAME))) (SLOT-DEFINITION-LOCATION SLOT))) '(A B C))) EQUAL-OK: (1 2 3) (PROGN (DEFCLASS FOO101A NIL (A B C) (:FIXED-SLOT-LOCATIONS T)) (DEFCLASS FOO101B (FOO101A) (D E F) (:FIXED-SLOT-LOCATIONS T)) (MAPCAR #'(LAMBDA (NAME) (LET ((SLOT (FIND NAME (CLASS-SLOTS (FIND-CLASS 'FOO101B)) :KEY #'SLOT-DEFINITION-NAME))) (SLOT-DEFINITION-LOCATION SLOT))) '(A B C D E F))) EQUAL-OK: (1 2 3 4 5 6) (PROGN (DEFCLASS FOO102A NIL (A B C) (:FIXED-SLOT-LOCATIONS T)) (DEFCLASS FOO102B NIL (D E F)) (DEFCLASS FOO102C (FOO102A FOO102B) (G H I)) (MAPCAR #'(LAMBDA (NAME) (LET ((SLOT (FIND NAME (CLASS-SLOTS (FIND-CLASS 'FOO102C)) :KEY #'SLOT-DEFINITION-NAME))) (SLOT-DEFINITION-LOCATION SLOT))) '(A B C D E F G H I))) EQUAL-OK: (1 2 3 4 5 6 7 8 9) (PROGN (DEFCLASS FOO103A NIL (A B C)) (DEFCLASS FOO103B NIL (D E F) (:FIXED-SLOT-LOCATIONS T)) (DEFCLASS FOO103C (FOO103A FOO103B) (G H I)) (MAPCAR #'(LAMBDA (NAME) (LET ((SLOT (FIND NAME (CLASS-SLOTS (FIND-CLASS 'FOO103C)) :KEY #'SLOT-DEFINITION-NAME))) (SLOT-DEFINITION-LOCATION SLOT))) '(A B C D E F G H I))) EQUAL-OK: (4 5 6 1 2 3 7 8 9) (PROGN (DEFCLASS FOO104A NIL (A B C) (:FIXED-SLOT-LOCATIONS T)) (DEFCLASS FOO104B NIL (D E F) (:FIXED-SLOT-LOCATIONS T)) (DEFCLASS FOO104C (FOO104A FOO104B) (G H I)) T) [SIMPLE-ERROR]: In class FOO104C, the slots D and A are constrained from the superclasses to both be located at offset 1. EQL-OK: ERROR (PROGN (DEFCLASS FOO105A NIL (A B C) (:FIXED-SLOT-LOCATIONS T)) (DEFCLASS FOO105B NIL NIL (:FIXED-SLOT-LOCATIONS T)) (DEFCLASS FOO105C (FOO105A FOO105B) (G H I)) (MAPCAR #'(LAMBDA (NAME) (LET ((SLOT (FIND NAME (CLASS-SLOTS (FIND-CLASS 'FOO105C)) :KEY #'SLOT-DEFINITION-NAME))) (SLOT-DEFINITION-LOCATION SLOT))) '(A B C G H I))) EQUAL-OK: (1 2 3 4 5 6) (PROGN (DEFCLASS FOO106A NIL NIL (:FIXED-SLOT-LOCATIONS T)) (DEFCLASS FOO106B NIL (D E F) (:FIXED-SLOT-LOCATIONS T)) (DEFCLASS FOO106C (FOO106A FOO106B) (G H I)) (MAPCAR #'(LAMBDA (NAME) (LET ((SLOT (FIND NAME (CLASS-SLOTS (FIND-CLASS 'FOO106C)) :KEY #'SLOT-DEFINITION-NAME))) (SLOT-DEFINITION-LOCATION SLOT))) '(D E F G H I))) EQUAL-OK: (1 2 3 4 5 6) (PROGN (DEFCLASS FOO107A NIL ((A :ALLOCATION :INSTANCE) (B :ALLOCATION :INSTANCE) (C :ALLOCATION :CLASS) (D :ALLOCATION :CLASS) (E :ALLOCATION :CLASS)) (:FIXED-SLOT-LOCATIONS T)) (DEFCLASS FOO107B (FOO107A) ((B :ALLOCATION :CLASS))) T) [SIMPLE-ERROR]: In class FOO107B, non-local slot B is constrained to be a local slot at offset 2. EQL-OK: ERROR (PROGN (DEFCLASS FOO108A NIL ((A :ALLOCATION :INSTANCE) (B :ALLOCATION :INSTANCE) (C :ALLOCATION :CLASS) (D :ALLOCATION :CLASS) (E :ALLOCATION :CLASS)) (:FIXED-SLOT-LOCATIONS T)) (DEFCLASS FOO108B (FOO108A) ((C :ALLOCATION :INSTANCE) (D :ALLOCATION :CLASS) (F :ALLOCATION :INSTANCE) (G :ALLOCATION :CLASS))) (MAPCAR #'(LAMBDA (NAME) (LET ((SLOT (FIND NAME (CLASS-SLOTS (FIND-CLASS 'FOO108B)) :KEY #'SLOT-DEFINITION-NAME))) (LET ((LOCATION (SLOT-DEFINITION-LOCATION SLOT))) (IF (CONSP LOCATION) (CLASS-NAME (CLOS::CV-NEWEST-CLASS (CAR LOCATION))) LOCATION)))) '(A B C D E F G))) EQUAL-OK: (1 2 3 FOO108B FOO108A 4 FOO108B) (LET ((CLASS1 (DEFCLASS FOO109 NIL NIL (:DOCUMENTATION "first")))) (CONS (DOCUMENTATION CLASS1 'T) (PROGN (SETF (FIND-CLASS 'FOO109) NIL) (LET ((CLASS2 (DEFCLASS FOO109 NIL NIL (:DOCUMENTATION "second")))) (LIST (DOCUMENTATION CLASS1 'T) (DOCUMENTATION CLASS2 'T)))))) EQUAL-OK: ("first" "first" "second") (DEFCLASS FOO116 NIL NIL (:NAME BAR)) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFCLASS FOO116: invalid option #1=(:NAME BAR) EQL-OK: ERROR (DEFCLASS FOO117 NIL NIL (:DIRECT-SUPERCLASSES BAZ)) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFCLASS FOO117: invalid option #1=(:DIRECT-SUPERCLASSES BAZ) EQL-OK: ERROR (DEFCLASS FOO118 NIL NIL (:DIRECT-SLOTS X)) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFCLASS FOO118: invalid option #1=(:DIRECT-SLOTS X) EQL-OK: ERROR (DEFCLASS FOO119 NIL NIL (:DIRECT-DEFAULT-INITARGS (:X 5))) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFCLASS FOO119: invalid option #1=(:DIRECT-DEFAULT-INITARGS (:X 5)) EQL-OK: ERROR (DEFCLASS FOO120 NIL NIL (:OTHER-OPTION BLABLA)) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFCLASS FOO120: invalid option #1=(:OTHER-OPTION BLABLA) EQL-OK: ERROR (DEFCLASS FOO121 NIL ((X :NAME BAR))) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFCLASS FOO121, slot option for slot X: :NAME is not a valid slot option EQL-OK: ERROR (DEFCLASS FOO122 NIL ((X :READERS (BAR)))) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFCLASS FOO122, slot option for slot X: :READERS is not a valid slot option EQL-OK: ERROR (DEFCLASS FOO123 NIL ((X :WRITERS (BAR)))) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFCLASS FOO123, slot option for slot X: :WRITERS is not a valid slot option EQL-OK: ERROR (DEFCLASS FOO124 NIL ((X :INITARGS (BAR)))) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFCLASS FOO124, slot option for slot X: :INITARGS is not a valid slot option EQL-OK: ERROR (DEFCLASS FOO125 NIL ((X :INITFORM 17 :INITFUNCTION (LAMBDA NIL 42)))) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFCLASS FOO125, slot option for slot X: :INITFUNCTION is not a valid slot option EQL-OK: ERROR (PROGN (DEFCLASS TESTCLASS31A NIL NIL) (DEFCLASS TESTCLASS31B (TESTCLASS31A) NIL) (DEFCLASS TESTCLASS31C (TESTCLASS31B) NIL) (LET ((*P* (MAKE-INSTANCE 'TESTCLASS31C))) (DEFGENERIC TESTGF37 (X)) (DEFMETHOD TESTGF37 ((X TESTCLASS31A)) (LIST 'A)) (DEFMETHOD TESTGF37 ((X TESTCLASS31B)) (CONS 'B (CALL-NEXT-METHOD))) (DEFMETHOD TESTGF37 ((X TESTCLASS31C)) (CONS 'C (CALL-NEXT-METHOD))) (DEFMETHOD TESTGF37 ((X (EQL *P*))) (CONS '*P* (CALL-NEXT-METHOD))) (LIST (TESTGF37 *P*) (PROGN (CHANGE-CLASS *P* 'TESTCLASS31B) (TESTGF37 *P*))))) EQUAL-OK: ((*P* C B A) (*P* B A)) (PROGN (DEFCLASS TESTCLASS40A NIL NIL) (DEFCLASS TESTCLASS40B NIL NIL) (DEFCLASS TESTCLASS40C (TESTCLASS40B) NIL) (DEFGENERIC TESTGF40 (X) (:METHOD-COMBINATION LIST)) (DEFMETHOD TESTGF40 LIST ((X STANDARD-OBJECT)) 0) (DEFMETHOD TESTGF40 LIST ((X TESTCLASS40A)) 'A) (LET ((INST (MAKE-INSTANCE 'TESTCLASS40C))) (LIST (TESTGF40 INST) (PROGN (DEFCLASS TESTCLASS40B (TESTCLASS40A) NIL) (TESTGF40 INST))))) WARNING: DEFCLASS: Class TESTCLASS40C (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: ((0) (A 0)) (PROGN (DEFCLASS TESTCLASS41A NIL NIL) (DEFCLASS TESTCLASS41B (TESTCLASS41A) NIL) (DEFCLASS TESTCLASS41C (TESTCLASS41B) NIL) (DEFGENERIC TESTGF41 (X) (:METHOD-COMBINATION LIST)) (DEFMETHOD TESTGF41 LIST ((X STANDARD-OBJECT)) 0) (DEFMETHOD TESTGF41 LIST ((X TESTCLASS41A)) 'A) (LET ((INST (MAKE-INSTANCE 'TESTCLASS41C))) (LIST (TESTGF41 INST) (PROGN (DEFCLASS TESTCLASS41B NIL NIL) (TESTGF41 INST))))) WARNING: DEFCLASS: Class TESTCLASS41C (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: ((A 0) (0)) (PROGN (DEFCLASS TESTCLASS42A NIL NIL) (DEFCLASS TESTCLASS42B NIL NIL) (DEFCLASS TESTCLASS42C (TESTCLASS42A TESTCLASS42B) NIL) (DEFGENERIC TESTGF42 (X)) (DEFMETHOD TESTGF42 ((X TESTCLASS42A)) 'A) (DEFMETHOD TESTGF42 ((X TESTCLASS42B)) 'B) (LET ((INST (MAKE-INSTANCE 'TESTCLASS42C))) (LIST (TESTGF42 INST) (PROGN (DEFCLASS TESTCLASS42C (TESTCLASS42B TESTCLASS42A) NIL) (TESTGF42 INST))))) WARNING: DEFCLASS: Class TESTCLASS42C (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (A B) (PROGN (DEFCLASS TESTCLASS45A NIL NIL) (DEFCLASS TESTCLASS45B NIL NIL) (DEFCLASS TESTCLASS45C (TESTCLASS45B) NIL) (LET ((INST (MAKE-INSTANCE 'TESTCLASS45C))) (DEFGENERIC TESTGF45 (X) (:METHOD-COMBINATION LIST)) (DEFMETHOD TESTGF45 LIST ((X TESTCLASS45A)) 'A) (DEFMETHOD TESTGF45 LIST ((X (EQL INST))) 'INST) (LIST (TESTGF45 INST) (PROGN (DEFCLASS TESTCLASS45B (TESTCLASS45A) NIL) (TESTGF45 INST))))) WARNING: DEFCLASS: Class TESTCLASS45C (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: ((INST) (INST A)) (PROGN (DEFCLASS TESTCLASS46A NIL NIL) (DEFCLASS TESTCLASS46B (TESTCLASS46A) NIL) (DEFCLASS TESTCLASS46C (TESTCLASS46B) NIL) (LET ((INST (MAKE-INSTANCE 'TESTCLASS46C))) (DEFGENERIC TESTGF46 (X) (:METHOD-COMBINATION LIST)) (DEFMETHOD TESTGF46 LIST ((X TESTCLASS46A)) 'A) (DEFMETHOD TESTGF46 LIST ((X (EQL INST))) 'INST) (LIST (TESTGF46 INST) (PROGN (DEFCLASS TESTCLASS46B NIL NIL) (TESTGF46 INST))))) WARNING: DEFCLASS: Class TESTCLASS46C (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: ((INST A) (INST)) (PROGN (DEFCLASS TESTCLASS47A NIL NIL) (DEFCLASS TESTCLASS47B NIL NIL) (DEFCLASS TESTCLASS47C (TESTCLASS47A TESTCLASS47B) NIL) (LET ((INST (MAKE-INSTANCE 'TESTCLASS47C))) (DEFGENERIC TESTGF47 (X)) (DEFMETHOD TESTGF47 ((X TESTCLASS47A)) 'A) (DEFMETHOD TESTGF47 ((X TESTCLASS47B)) 'B) (DEFMETHOD TESTGF47 ((X (EQL INST))) (LIST 'INST (CALL-NEXT-METHOD))) (LIST (TESTGF47 INST) (PROGN (DEFCLASS TESTCLASS47C (TESTCLASS47B TESTCLASS47A) NIL) (TESTGF47 INST))))) WARNING: DEFCLASS: Class TESTCLASS47C (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: ((INST A) (INST B)) (PROGN (DEFCLASS TESTCLASS48A NIL NIL) (DEFCLASS TESTCLASS48B NIL NIL) (DEFCLASS TESTCLASS48C (TESTCLASS48B) NIL) (LET ((INST (MAKE-INSTANCE 'STANDARD-OBJECT))) (DEFGENERIC TESTGF48 (X) (:METHOD-COMBINATION LIST)) (DEFMETHOD TESTGF48 LIST ((X TESTCLASS48A)) 'A) (DEFMETHOD TESTGF48 LIST ((X (EQL INST))) 'INST) (CHANGE-CLASS INST 'TESTCLASS48C) (LIST (TESTGF48 INST) (PROGN (DEFCLASS TESTCLASS48B (TESTCLASS48A) NIL) (TESTGF48 INST))))) WARNING: DEFCLASS: Class TESTCLASS48C (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: ((INST) (INST A)) (PROGN (DEFCLASS TESTCLASS49A NIL NIL) (DEFCLASS TESTCLASS49B (TESTCLASS49A) NIL) (DEFCLASS TESTCLASS49C (TESTCLASS49B) NIL) (LET ((INST (MAKE-INSTANCE 'STANDARD-OBJECT))) (DEFGENERIC TESTGF49 (X) (:METHOD-COMBINATION LIST)) (DEFMETHOD TESTGF49 LIST ((X TESTCLASS49A)) 'A) (DEFMETHOD TESTGF49 LIST ((X (EQL INST))) 'INST) (CHANGE-CLASS INST 'TESTCLASS49C) (LIST (TESTGF49 INST) (PROGN (DEFCLASS TESTCLASS49B NIL NIL) (TESTGF49 INST))))) WARNING: DEFCLASS: Class TESTCLASS49C (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: ((INST A) (INST)) (PROGN (DEFCLASS TESTCLASS50A NIL NIL) (DEFCLASS TESTCLASS50B NIL NIL) (DEFCLASS TESTCLASS50C (TESTCLASS50A TESTCLASS50B) NIL) (LET ((INST (MAKE-INSTANCE 'STANDARD-OBJECT))) (DEFGENERIC TESTGF50 (X)) (DEFMETHOD TESTGF50 ((X TESTCLASS50A)) 'A) (DEFMETHOD TESTGF50 ((X TESTCLASS50B)) 'B) (DEFMETHOD TESTGF50 ((X (EQL INST))) (LIST 'INST (CALL-NEXT-METHOD))) (CHANGE-CLASS INST 'TESTCLASS50C) (LIST (TESTGF50 INST) (PROGN (DEFCLASS TESTCLASS50C (TESTCLASS50B TESTCLASS50A) NIL) (TESTGF50 INST))))) WARNING: DEFCLASS: Class TESTCLASS50C (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: ((INST A) (INST B)) (ENSURE-GENERIC-FUNCTION 'CAR) [SIMPLE-PROGRAM-ERROR]: ENSURE-GENERIC-FUNCTION: CAR does not name a generic function EQL-OK: ERROR (ENSURE-GENERIC-FUNCTION 'DEFCLASS) [SIMPLE-PROGRAM-ERROR]: ENSURE-GENERIC-FUNCTION: DEFCLASS does not name a generic function EQL-OK: ERROR (ENSURE-GENERIC-FUNCTION 'TAGBODY) [SIMPLE-PROGRAM-ERROR]: ENSURE-GENERIC-FUNCTION: TAGBODY does not name a generic function EQL-OK: ERROR (LET ((F 'EGF-FUN)) (WHEN (FBOUNDP F) (FMAKUNBOUND F)) (LIST (FBOUNDP F) (TYPEP (ENSURE-GENERIC-FUNCTION F) 'GENERIC-FUNCTION) (TYPEP (ENSURE-GENERIC-FUNCTION F) 'GENERIC-FUNCTION) (TYPEP (SYMBOL-FUNCTION F) 'GENERIC-FUNCTION))) EQUAL-OK: (NIL T T T) (LET ((F 'EGF-FUN)) (WHEN (FBOUNDP F) (FMAKUNBOUND F)) (LIST (FBOUNDP F) (TYPEP (ENSURE-GENERIC-FUNCTION F :LAMBDA-LIST '(A B C)) 'GENERIC-FUNCTION) (TYPEP (ENSURE-GENERIC-FUNCTION F :LAMBDA-LIST '(X Y)) 'GENERIC-FUNCTION) (TYPEP (SYMBOL-FUNCTION F) 'GENERIC-FUNCTION))) EQUAL-OK: (NIL T T T) (LET ((F 'EGF-FUN)) (WHEN (FBOUNDP F) (FMAKUNBOUND F)) (LIST (FBOUNDP F) (TYPEP (ENSURE-GENERIC-FUNCTION F :LAMBDA-LIST '(A B C)) 'GENERIC-FUNCTION) (TYPEP (EVAL `(DEFMETHOD ,F ((A T) (B T) (C T)) (LIST A B C))) 'STANDARD-METHOD))) EQUAL-OK: (NIL T T) (ENSURE-GENERIC-FUNCTION 'EGF-FUN :LAMBDA-LIST '(X Y)) [SIMPLE-ERROR]: #1=# #2# #2#)> has 3, but #3=# has 2 required parameters EQL-OK: ERROR (LET ((C1 (GENSYM)) (C2 (GENSYM))) (LET ((CLASS1 (EVAL `(DEFCLASS ,C1 (,C2) NIL)))) (IF (NOT (TYPEP CLASS1 'CLASS)) 1 (LET ((CLASS2 (EVAL `(DEFCLASS ,C2 NIL NIL)))) (IF (NOT (TYPEP CLASS2 'CLASS)) 2 (LET ((I1 (MAKE-INSTANCE C1)) (I2 (MAKE-INSTANCE C2))) (COND ((NOT (TYPEP I1 C1)) 3) ((NOT (TYPEP I1 CLASS1)) 4) ((NOT (TYPEP I1 C2)) 5) ((NOT (TYPEP I1 CLASS2)) 6) ((TYPEP I2 C1) 7) ((TYPEP I2 CLASS1) 8) ((NOT (TYPEP I2 C2)) 9) ((NOT (TYPEP I2 CLASS2)) 10) (T 'GOOD)))))))) EQL-OK: GOOD (LET ((C1 (GENSYM)) (C2 (GENSYM)) (C3 (GENSYM))) (LET ((CLASS1 (EVAL `(DEFCLASS ,C1 (,C2 ,C3) NIL)))) (IF (NOT (TYPEP CLASS1 'CLASS)) 1 (LET ((CLASS2 (EVAL `(DEFCLASS ,C2 NIL NIL)))) (IF (NOT (TYPEP CLASS2 'CLASS)) 2 (LET ((CLASS3 (EVAL `(DEFCLASS ,C3 NIL NIL)))) (IF (NOT (TYPEP CLASS3 'CLASS)) 3 (LET ((I1 (MAKE-INSTANCE C1)) (I2 (MAKE-INSTANCE C2)) (I3 (MAKE-INSTANCE C3))) (COND ((NOT (TYPEP I1 C1)) 4) ((NOT (TYPEP I1 CLASS1)) 5) ((NOT (TYPEP I1 C2)) 6) ((NOT (TYPEP I1 CLASS2)) 7) ((NOT (TYPEP I1 C3)) 8) ((NOT (TYPEP I1 CLASS3)) 9) ((TYPEP I2 C1) 10) ((TYPEP I2 CLASS1) 11) ((TYPEP I3 C1) 12) ((TYPEP I3 CLASS1) 13) ((NOT (TYPEP I2 C2)) 14) ((NOT (TYPEP I2 CLASS2)) 15) ((NOT (TYPEP I3 C3)) 16) ((NOT (TYPEP I3 CLASS3)) 17) ((TYPEP I2 C3) 18) ((TYPEP I2 CLASS3) 19) ((TYPEP I3 C2) 20) ((TYPEP I3 CLASS2) 21) (T 'GOOD)))))))))) EQL-OK: GOOD (LET ((C1 (GENSYM)) (C2 (GENSYM)) (C3 (GENSYM))) (LET ((CLASS1 (EVAL `(DEFCLASS ,C1 (,C2) NIL)))) (IF (NOT (TYPEP CLASS1 'CLASS)) 1 (LET ((CLASS2 (EVAL `(DEFCLASS ,C2 (,C3) NIL)))) (IF (NOT (TYPEP CLASS2 'CLASS)) 2 (LET ((CLASS3 (EVAL `(DEFCLASS ,C3 NIL NIL)))) (IF (NOT (TYPEP CLASS3 'CLASS)) 3 (LET ((I1 (MAKE-INSTANCE C1)) (I2 (MAKE-INSTANCE C2)) (I3 (MAKE-INSTANCE C3))) (COND ((NOT (TYPEP I1 C1)) 4) ((NOT (TYPEP I1 CLASS1)) 5) ((NOT (TYPEP I1 C2)) 6) ((NOT (TYPEP I1 CLASS2)) 7) ((NOT (TYPEP I1 C3)) 8) ((NOT (TYPEP I1 CLASS3)) 9) ((TYPEP I2 C1) 10) ((TYPEP I2 CLASS1) 11) ((TYPEP I3 C1) 12) ((TYPEP I3 CLASS1) 13) ((NOT (TYPEP I2 C2)) 14) ((NOT (TYPEP I2 CLASS2)) 15) ((NOT (TYPEP I3 C3)) 16) ((NOT (TYPEP I3 CLASS3)) 17) ((NOT (TYPEP I2 C3)) 18) ((NOT (TYPEP I2 CLASS3)) 19) ((TYPEP I3 C2) 20) ((TYPEP I3 CLASS2) 21) (T 'GOOD)))))))))) EQL-OK: GOOD (BLOCK NIL (LET ((C1 (GENSYM)) (C2 (GENSYM)) (C3 (GENSYM)) (C4 (GENSYM)) (C5 (GENSYM))) (UNLESS (TYPEP (EVAL `(DEFCLASS ,C4 NIL NIL)) 'CLASS) (RETURN 1)) (UNLESS (TYPEP (EVAL `(DEFCLASS ,C5 NIL NIL)) 'CLASS) (RETURN 2)) (UNLESS (TYPEP (EVAL `(DEFCLASS ,C1 (,C2 ,C3) NIL)) 'CLASS) (RETURN 3)) (UNLESS (TYPEP (EVAL `(DEFCLASS ,C2 (,C4 ,C5) NIL)) 'CLASS) (RETURN 4)) (EVAL `(PROGN (DEFCLASS ,C3 (,C5 ,C4) NIL) (MAKE-INSTANCE ',C1))))) [SIMPLE-ERROR]: DEFCLASS #1=#:G9198: inconsistent precedence graph, cycle (#2=# #3=#) EQL-OK: ERROR (PROGN (DEFCLASS CLASS-0203 NIL ((A :ALLOCATION :CLASS) (B :ALLOCATION :INSTANCE))) (DEFCLASS CLASS-0204 (CLASS-0203) (C D)) (LET ((C1 (MAKE-INSTANCE 'CLASS-0203)) (C2 (MAKE-INSTANCE 'CLASS-0204))) (LIST :BOUND (SLOT-BOUNDP C1 'A) (SLOT-BOUNDP C1 'B) (SLOT-BOUNDP C2 'A) (SLOT-BOUNDP C2 'B) (SLOT-BOUNDP C2 'C) (SLOT-BOUNDP C2 'D) (SETF (SLOT-VALUE C1 'A) 'X) :BOUND (SLOT-BOUNDP C1 'A) (SLOT-BOUNDP C1 'B) (SLOT-BOUNDP C2 'A) (SLOT-BOUNDP C2 'B) (SLOT-BOUNDP C2 'C) (SLOT-BOUNDP C2 'D) (SLOT-VALUE C1 'A) (SLOT-VALUE C2 'A) (EQ (SLOT-MAKUNBOUND C1 'A) C1) :BOUND (SLOT-BOUNDP C1 'A) (SLOT-BOUNDP C1 'B) (SLOT-BOUNDP C2 'A) (SLOT-BOUNDP C2 'B) (SLOT-BOUNDP C2 'C) (SLOT-BOUNDP C2 'D)))) EQUAL-OK: (:BOUND NIL NIL NIL NIL NIL NIL X :BOUND T NIL T NIL NIL NIL X X T :BOUND NIL NIL NIL NIL NIL NIL) (PROGN (DEFCLASS CLASS-0206A NIL ((A :ALLOCATION :INSTANCE) (B :ALLOCATION :CLASS))) (DEFCLASS CLASS-0206B (CLASS-0206A) ((A :ALLOCATION :CLASS) (B :ALLOCATION :INSTANCE))) (LET ((C1 (MAKE-INSTANCE 'CLASS-0206A)) (C2 (MAKE-INSTANCE 'CLASS-0206B))) (LIST :BOUND (SLOT-BOUNDP C1 'A) (SLOT-BOUNDP C1 'B) (SLOT-BOUNDP C2 'A) (SLOT-BOUNDP C2 'B) (SETF (SLOT-VALUE C1 'A) 'X) (SETF (SLOT-VALUE C1 'B) 'Y) :BOUND (SLOT-BOUNDP C1 'A) (SLOT-BOUNDP C1 'B) (SLOT-BOUNDP C2 'A) (SLOT-BOUNDP C2 'B) :VALUE-1 (SLOT-VALUE C1 'A) (SLOT-VALUE C1 'B) (PROGN (SLOT-MAKUNBOUND C1 'A) (SLOT-MAKUNBOUND C1 'B) (SETF (SLOT-VALUE C2 'A) 'X)) (SETF (SLOT-VALUE C2 'B) 'Y) :BOUND (SLOT-BOUNDP C1 'A) (SLOT-BOUNDP C1 'B) (SLOT-BOUNDP C2 'A) (SLOT-BOUNDP C2 'B) :VALUE-2 (SLOT-VALUE C2 'A) (SLOT-VALUE C2 'B) (PROGN (SLOT-MAKUNBOUND C2 'A) (SLOT-MAKUNBOUND C2 'B) NIL)))) EQUAL-OK: (:BOUND NIL NIL NIL NIL X Y :BOUND T T NIL NIL :VALUE-1 X Y X Y :BOUND NIL NIL T T :VALUE-2 X Y NIL) (LET* ((C (DEFCLASS REINIT-CLASS-01 NIL ((A :INITARG :A) (B :INITARG :B)))) (M (DEFMETHOD REINITIALIZE-INSTANCE :AFTER ((INSTANCE REINIT-CLASS-01) &REST INITARGS &KEY (X NIL X-P)) (DECLARE (IGNORE INITARGS)) (WHEN X-P (SETF (SLOT-VALUE INSTANCE 'A) X)) INSTANCE))) (EQ M (FIND-METHOD #'REINITIALIZE-INSTANCE '(:AFTER) (LIST C)))) EQL-OK: T (LET* ((OBJ (MAKE-INSTANCE 'REINIT-CLASS-01)) (OBJ2 (REINITIALIZE-INSTANCE OBJ :A 1 :B 3))) (LIST (EQ OBJ OBJ2) (SLOT-VALUE OBJ2 'A) (SLOT-VALUE OBJ2 'B))) EQUAL-OK: (T 1 3) (LET* ((OBJ (MAKE-INSTANCE 'REINIT-CLASS-01 :A 10 :B 20)) (OBJ2 (REINITIALIZE-INSTANCE OBJ :X 3))) (LIST (EQ OBJ OBJ2) (SLOT-VALUE OBJ2 'A) (SLOT-VALUE OBJ2 'B))) EQUAL-OK: (T 3 20) (LET* ((OBJ (MAKE-INSTANCE 'REINIT-CLASS-01 :A 10 :B 20)) (OBJ2 (REINITIALIZE-INSTANCE OBJ :X 3 :X 100))) (LIST (EQ OBJ OBJ2) (SLOT-VALUE OBJ2 'A) (SLOT-VALUE OBJ2 'B))) EQUAL-OK: (T 3 20) (LET* ((OBJ (MAKE-INSTANCE 'REINIT-CLASS-01 :A 10 :B 20)) (OBJ2 (REINITIALIZE-INSTANCE OBJ :X 3 :GARBAGE 100))) (LIST (EQ OBJ OBJ2) (SLOT-VALUE OBJ2 'A) (SLOT-VALUE OBJ2 'B))) [SIMPLE-KEYWORD-ERROR]: REINITIALIZE-INSTANCE: illegal keyword/value pair :GARBAGE, 100 in argument list. The allowed keywords are #1=(:A :B :X) EQL-OK: ERROR (DEFGENERIC FOO126 (X Y) (:LAMBDA-LIST X)) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFGENERIC FOO126: invalid DEFGENERIC option #1=(:LAMBDA-LIST X) EQL-OK: ERROR (DEFGENERIC FOO127 (X Y) (:DECLARATIONS (OPTIMIZE (SPEED 3)))) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFGENERIC FOO127: invalid DEFGENERIC option #1=(:DECLARATIONS (OPTIMIZE (SPEED 3))) EQL-OK: ERROR (LET ((GF1 (DEFGENERIC NO-APP-METH-GF-01 NIL)) (GF2 (DEFGENERIC NO-APP-METH-GF-02 (X))) (GF3 (DEFGENERIC NO-APP-METH-GF-03 (X Y)))) (DEFMETHOD NO-APPLICABLE-METHOD ((X (EQL GF1)) &REST ARGS) (LIST 'NO-APPLICABLE-METHOD ARGS)) (DEFMETHOD NO-APPLICABLE-METHOD ((X (EQL GF2)) &REST ARGS) (LIST 'NO-APPLICABLE-METHOD ARGS)) (DEFMETHOD NO-APPLICABLE-METHOD ((X (EQL GF3)) &REST ARGS) (LIST 'NO-APPLICABLE-METHOD ARGS)) (LIST (NO-APP-METH-GF-01) (NO-APP-METH-GF-02 (CONS 'A 'B)) (NO-APP-METH-GF-03 (CONS 'A 'B) (CONS 'C 'D)))) EQUAL-OK: ((NO-APPLICABLE-METHOD NIL) (NO-APPLICABLE-METHOD ((A . B))) (NO-APPLICABLE-METHOD ((A . B) (C . D)))) (LET ((GF1 (DEFGENERIC NO-PRIM-METH-GF-01 NIL)) (GF2 (DEFGENERIC NO-PRIM-METH-GF-02 (X))) (GF3 (DEFGENERIC NO-PRIM-METH-GF-03 (X Y)))) (DEFMETHOD NO-PRIM-METH-GF-01 :AROUND NIL (LIST :AROUND (CALL-NEXT-METHOD))) (DEFMETHOD NO-PRIMARY-METHOD ((X (EQL GF1)) &REST ARGS) (LIST 'NO-PRIMARY-METHOD ARGS)) (DEFMETHOD NO-PRIM-METH-GF-02 :AROUND ((X T)) (LIST :AROUND X (CALL-NEXT-METHOD))) (DEFMETHOD NO-PRIMARY-METHOD ((X (EQL GF2)) &REST ARGS) (LIST 'NO-PRIMARY-METHOD ARGS)) (DEFMETHOD NO-PRIM-METH-GF-03 :AROUND ((X T) (Y T)) (LIST :AROUND X Y (CALL-NEXT-METHOD))) (DEFMETHOD NO-PRIMARY-METHOD ((X (EQL GF3)) &REST ARGS) (LIST 'NO-PRIMARY-METHOD ARGS)) (LIST (NO-PRIM-METH-GF-01) (NO-PRIM-METH-GF-02 (CONS 'A 'B)) (NO-PRIM-METH-GF-03 (CONS 'A 'B) (CONS 'C 'D)))) EQUAL-OK: ((NO-PRIMARY-METHOD NIL) (NO-PRIMARY-METHOD ((A . B))) (NO-PRIMARY-METHOD ((A . B) (C . D)))) (PROGN (DEFGENERIC TEST-MC-STANDARD (X) (:METHOD ((X STRING)) (CONS 'STRING (CALL-NEXT-METHOD))) (:METHOD ((X T)) X)) (LIST (TEST-MC-STANDARD 1) (TEST-MC-STANDARD "a"))) EQUAL-OK: (1 (STRING . "a")) (PROGN (DEFGENERIC TEST-MC-STANDARD-BAD-QUALIFIERS (X Y)) (DEFMETHOD TEST-MC-STANDARD-BAD-QUALIFIERS ((X INTEGER) (Y INTEGER)) (+ X Y)) (DEFMETHOD TEST-MC-STANDARD-BAD-QUALIFIERS ((X FLOAT) (Y FLOAT)) (+ X Y)) (DEFMETHOD TEST-MC-STANDARD-BAD-QUALIFIERS :BEFFOR ((X FLOAT) (Y FLOAT)) (FORMAT T "x = ~S, y = ~S~%" X Y)) T) [SIMPLE-PROGRAM-ERROR]: STANDARD method combination, used by #1=#, allows no method qualifiers except (:BEFORE :AFTER :AROUND): # #2#)> EQL-OK: ERROR (PROGN (DEFGENERIC TEST-MC-STANDARD-BAD1 (X Y)) (DEFMETHOD TEST-MC-STANDARD-BAD1 ((X REAL) (Y REAL)) (+ X Y)) (DEFMETHOD TEST-MC-STANDARD-BAD1 :AFTER :BEFORE ((X INTEGER) (Y INTEGER)) (* X Y)) T) [SIMPLE-PROGRAM-ERROR]: STANDARD method combination, used by #1=#, does not allow more than one method qualifier on a method: # #2#)> EQL-OK: ERROR (PROGN (DEFGENERIC TEST-MC-STANDARD-BAD2 (X Y)) (DEFMETHOD TEST-MC-STANDARD-BAD2 ((X REAL) (Y REAL)) (+ X Y)) (DEFMETHOD TEST-MC-STANDARD-BAD2 :BEFORE ((X INTEGER) (Y INTEGER)) (FLOOR (CALL-NEXT-METHOD))) (TEST-MC-STANDARD-BAD2 3 4)) [SIMPLE-PROGRAM-ERROR]: #1=#: CALL-NEXT-METHOD is invalid within :BEFORE methods EQL-OK: ERROR (PROGN (DEFGENERIC TEST-MC-STANDARD-BAD3 (X Y)) (DEFMETHOD TEST-MC-STANDARD-BAD3 ((X REAL) (Y REAL)) (+ X Y)) (DEFMETHOD TEST-MC-STANDARD-BAD3 :AFTER ((X INTEGER) (Y INTEGER)) (FLOOR (CALL-NEXT-METHOD))) (TEST-MC-STANDARD-BAD3 3 4)) [SIMPLE-PROGRAM-ERROR]: #1=#: CALL-NEXT-METHOD is invalid within :AFTER methods EQL-OK: ERROR (PROGN (DEFGENERIC TEST-MC-STANDARD-BAD4 (X Y) (:METHOD-COMBINATION STANDARD :MOST-SPECIFIC-LAST))) [SIMPLE-PROGRAM-ERROR]: DEFGENERIC TEST-MC-STANDARD-BAD4: The STANDARD method combination permits no options: (:MOST-SPECIFIC-LAST) EQL-OK: ERROR (PROGN (DEFGENERIC TEST-MC-PROGN (X S) (:METHOD-COMBINATION PROGN) (:METHOD PROGN ((X STRING) S) (VECTOR-PUSH-EXTEND 'STRING S)) (:METHOD PROGN ((X T) S) (VECTOR-PUSH-EXTEND 'T S)) (:METHOD :AROUND ((X NUMBER) S) (VECTOR-PUSH-EXTEND 'NUMBER S) (CALL-NEXT-METHOD))) (LIST (LET ((S (MAKE-ARRAY 10 :ADJUSTABLE T :FILL-POINTER 0))) (TEST-MC-PROGN 1 S) S) (LET ((S (MAKE-ARRAY 10 :ADJUSTABLE T :FILL-POINTER 0))) (TEST-MC-PROGN "a" S) S))) EQUALP-OK: (#(NUMBER T) #(STRING T)) (PROGN (DEFGENERIC TEST-MC-APPEND-1 (X) (:METHOD-COMBINATION APPEND) (:METHOD ((X STRING)) (LIST (LENGTH X))) (:METHOD ((X VECTOR)) (LIST (ARRAY-ELEMENT-TYPE X)))) T) [SIMPLE-PROGRAM-ERROR]: APPEND method combination, used by #, does not allow less than one method qualifier on a method: #)> EQL-OK: ERROR (PROGN (DEFGENERIC TEST-MC-APPEND-2 (X) (:METHOD-COMBINATION APPEND) (:METHOD APPEND ((X STRING)) (LIST (LENGTH X))) (:METHOD APPEND ((X VECTOR)) (LIST (TYPE-OF (AREF X 0)))) (:METHOD :AROUND ((X STRING)) (LIST #\" (CALL-NEXT-METHOD) #\")) (:METHOD :AROUND ((X VECTOR)) (COERCE (CALL-NEXT-METHOD) 'VECTOR))) (TEST-MC-APPEND-2 "abc")) EQUALP-OK: (#\" #(3 STANDARD-CHAR) #\") (PROGN (DEFGENERIC TEST-MC-APPEND-3 (X) (:METHOD-COMBINATION APPEND :MOST-SPECIFIC-LAST) (:METHOD APPEND ((X STRING)) (LIST (LENGTH X))) (:METHOD APPEND ((X VECTOR)) (LIST (TYPE-OF (AREF X 0)))) (:METHOD :AROUND ((X STRING)) (LIST #\" (CALL-NEXT-METHOD) #\")) (:METHOD :AROUND ((X VECTOR)) (COERCE (CALL-NEXT-METHOD) 'VECTOR))) (TEST-MC-APPEND-3 "abc")) EQUALP-OK: (#\" #(STANDARD-CHAR 3) #\") (DEFINE-METHOD-COMBINATION MC01 :DOCUMENTATION :OPERATOR) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFINE-METHOD-COMBINATION MC01: :OPERATOR is not a string EQL-OK: ERROR (DEFINE-METHOD-COMBINATION MC02 :DOCUMENTATION NIL) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFINE-METHOD-COMBINATION MC02: NIL is not a string EQL-OK: ERROR (DEFINE-METHOD-COMBINATION MC03 :DOCUMENTATION "foo" :DOCUMENTATION "bar") [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFINE-METHOD-COMBINATION MC03: option :DOCUMENTATION may only be given once EQL-OK: ERROR (DEFINE-METHOD-COMBINATION MC04 :IDENTITY-WITH-ONE-ARGUMENT NIL :OPERATOR LIST :DOCUMENTATION) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFINE-METHOD-COMBINATION MC04: options must come in pairs EQL-OK: ERROR (DEFINE-METHOD-COMBINATION MC05 :IDENTITY-WITH-ONE-ARGUMENT NIL :OPERATOR LIST :DOCUMENTATION "test") EQL-OK: MC05 (PROGN (DEFGENERIC TEST-MC05-1 (X) (:METHOD MC05 ((X REAL)) 'REAL) (:METHOD MC05 ((X INTEGER)) 'INTEGER) (:METHOD MC05 ((X NUMBER)) 'NUMBER) (:METHOD-COMBINATION MC05)) (TEST-MC05-1 3)) EQUAL-OK: (INTEGER REAL NUMBER) (PROGN (DEFGENERIC TEST-MC05-2 (X) (:METHOD MC05 ((X REAL)) 'REAL) (:METHOD MC05 ((X INTEGER)) 'INTEGER) (:METHOD MC05 ((X NUMBER)) 'NUMBER) (:METHOD-COMBINATION MC05 (INTERN "MOST-SPECIFIC-LAST" "KEYWORD"))) (TEST-MC05-2 3)) [SIMPLE-PROGRAM-ERROR]: DEFGENERIC TEST-MC05-2: Invalid method-combination options (#1=(INTERN "MOST-SPECIFIC-LAST" "KEYWORD")) for #: The value of CLOS::ORDER is #1#, should be :MOST-SPECIFIC-FIRST or :MOST-SPECIFIC-LAST. EQL-OK: ERROR (PROGN (DEFGENERIC TEST-MC05-3 (X) (:METHOD MC05 ((X REAL)) 'REAL) (:METHOD MC05 ((X INTEGER)) 'INTEGER) (:METHOD MC05 ((X NUMBER)) 'NUMBER) (:METHOD-COMBINATION MC05 :MOST-SPECIFIC-LAST)) (TEST-MC05-3 3)) EQUAL-OK: (NUMBER REAL INTEGER) (PROGN (DEFGENERIC TEST-MC05-4 (X) (:METHOD MC05 ((X REAL)) 'REAL) (:METHOD-COMBINATION MC05 :MOST-SPECIFIC-LAST)) (TEST-MC05-4 3)) EQUAL-OK: (REAL) (PROGN (DEFGENERIC TEST-MC05-5 (X) (:METHOD MC05 ((X REAL)) 'REAL) (:METHOD-COMBINATION MC05 NIL))) [SIMPLE-PROGRAM-ERROR]: DEFGENERIC TEST-MC05-5: Invalid method-combination options (NIL) for #: The value of CLOS::ORDER is NIL, should be :MOST-SPECIFIC-FIRST or :MOST-SPECIFIC-LAST. EQL-OK: ERROR (PROGN (DEFGENERIC TEST-MC05-6 (X) (:METHOD MC05 ((X REAL)) 'REAL) (:METHOD-COMBINATION MC05 :MOST-SPECIFIC-FIRST JUNK))) [SIMPLE-PROGRAM-ERROR]: DEFGENERIC TEST-MC05-6: Invalid method-combination options (:MOST-SPECIFIC-FIRST JUNK) for #: APPLY: too many arguments given to # EQL-OK: ERROR (DEFINE-METHOD-COMBINATION MC06 :IDENTITY-WITH-ONE-ARGUMENT T :OPERATOR LIST :DOCUMENTATION "test") EQL-OK: MC06 (PROGN (DEFGENERIC TEST-MC06-1 (X) (:METHOD MC06 ((X REAL)) 'REAL) (:METHOD-COMBINATION MC06 :MOST-SPECIFIC-LAST)) (TEST-MC06-1 3)) EQL-OK: REAL (PROGN (DEFUN POSITIVE-INTEGER-QUALIFIER-P (METHOD-QUALIFIERS) (AND (= (LENGTH METHOD-QUALIFIERS) 1) (TYPEP (FIRST METHOD-QUALIFIERS) '(INTEGER 0 *)))) (DEFINE-METHOD-COMBINATION EXAMPLE-METHOD-COMBINATION NIL ((METHOD-LIST POSITIVE-INTEGER-QUALIFIER-P)) `(PROGN ,@(MAPCAR #'(LAMBDA (METHOD) `(CALL-METHOD ,METHOD)) (STABLE-SORT METHOD-LIST #'< :KEY #'(LAMBDA (METHOD) (FIRST (METHOD-QUALIFIERS METHOD))))))) (DEFGENERIC MC-TEST-PIQ (P1 P2 S) (:METHOD-COMBINATION EXAMPLE-METHOD-COMBINATION) (:METHOD 1 ((P1 T) (P2 T) S) (VECTOR-PUSH-EXTEND (LIST 1 P1 P2) S)) (:METHOD 4 ((P1 T) (P2 T) S) (VECTOR-PUSH-EXTEND (LIST 4 P1 P2) S)) (:METHOD 2 ((P1 T) (P2 T) S) (VECTOR-PUSH-EXTEND (LIST 2 P1 P2) S)) (:METHOD 3 ((P1 T) (P2 T) S) (VECTOR-PUSH-EXTEND (LIST 3 P1 P2) S))) (LET ((S (MAKE-ARRAY 10 :ADJUSTABLE T :FILL-POINTER 0))) (MC-TEST-PIQ 1 2 S) S)) [SIMPLE-ERROR]: For function #1=# applied to argument list NIL: While computing the effective method through #: Impossible to combine the methods: Method #2=# #3# #3#)> has the same specializers and different qualifiers than other methods in method group METHOD-LIST, and is actually used in the effective method. EQL-OK: ERROR (PROGN (DEFINE-METHOD-COMBINATION W-ARGS NIL ((METHOD-LIST *)) (:ARGUMENTS ARG1 ARG2 &AUX (EXTRA :EXTRA)) `(PROGN ,@(MAPCAR #'(LAMBDA (METHOD) `(CALL-METHOD ,METHOD)) METHOD-LIST))) (DEFGENERIC MC-TEST-W-ARGS (P1 P2 S) (:METHOD-COMBINATION W-ARGS) (:METHOD ((P1 NUMBER) (P2 T) S) (VECTOR-PUSH-EXTEND (LIST 'NUMBER P1 P2) S)) (:METHOD ((P1 STRING) (P2 T) S) (VECTOR-PUSH-EXTEND (LIST 'STRING P1 P2) S)) (:METHOD ((P1 T) (P2 T) S) (VECTOR-PUSH-EXTEND (LIST T P1 P2) S))) (LET ((S (MAKE-ARRAY 10 :ADJUSTABLE T :FILL-POINTER 0))) (MC-TEST-W-ARGS 1 2 S) S)) WARNING: in MC-TEST-W-ARGS--1 : variable ARG1 is not used. Misspelled or missing IGNORE declaration? WARNING: in MC-TEST-W-ARGS--1 : variable ARG2 is not used. Misspelled or missing IGNORE declaration? WARNING: in MC-TEST-W-ARGS--1 : variable EXTRA is not used. Misspelled or missing IGNORE declaration? EQUALP-OK: #((NUMBER 1 2) (T 1 2)) (DEFINE-METHOD-COMBINATION MC11 NIL) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFINE-METHOD-COMBINATION MC11: invalid syntax for long form: #1=(DEFINE-METHOD-COMBINATION MC11 . #2=(NIL)) EQL-OK: ERROR (DEFINE-METHOD-COMBINATION MC12 NIL NIL) EQL-OK: MC12 (DEFINE-METHOD-COMBINATION MC13 NIL NIL (:ARGUMENTS ORDER &AUX &KEY)) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFINE-METHOD-COMBINATION MC13: invalid :ARGUMENTS lambda-list: Lambda list marker &KEY not allowed here. EQL-OK: ERROR (DEFINE-METHOD-COMBINATION MC14 NIL NIL (:ARGUMENTS &WHOLE)) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFINE-METHOD-COMBINATION MC14: invalid :ARGUMENTS lambda-list: Missing &WHOLE parameter in lambda list #1=(&WHOLE) EQL-OK: ERROR (DEFINE-METHOD-COMBINATION MC15 NIL NIL (:ARGUMENTS ORDER)) EQL-OK: MC15 (DEFINE-METHOD-COMBINATION MC16 NIL NIL (:GENERIC-FUNCTION)) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFINE-METHOD-COMBINATION MC16: Invalid syntax for :GENERIC-FUNCTION option: #1=(:GENERIC-FUNCTION) EQL-OK: ERROR (DEFINE-METHOD-COMBINATION MC17 NIL NIL (:GENERIC-FUNCTION GF1 GF2)) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFINE-METHOD-COMBINATION MC17: Invalid syntax for :GENERIC-FUNCTION option: #1=(:GENERIC-FUNCTION GF1 GF2) EQL-OK: ERROR (DEFINE-METHOD-COMBINATION MC18 NIL NIL (:GENERIC-FUNCTION (GF))) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFINE-METHOD-COMBINATION MC18: Invalid syntax for :GENERIC-FUNCTION option: #1=(:GENERIC-FUNCTION (GF)) EQL-OK: ERROR (DEFINE-METHOD-COMBINATION MC19 NIL NIL (:GENERIC-FUNCTION GF)) EQL-OK: MC19 (DEFINE-METHOD-COMBINATION MC20 NIL (A)) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFINE-METHOD-COMBINATION MC20: invalid method group specifier A: Not a list of length at least 2 EQL-OK: ERROR (DEFINE-METHOD-COMBINATION MC21 NIL ((3))) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFINE-METHOD-COMBINATION MC21: invalid method group specifier #1=(3): Not a list of length at least 2 EQL-OK: ERROR (DEFINE-METHOD-COMBINATION MC22 NIL ((A))) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFINE-METHOD-COMBINATION MC22: invalid method group specifier #1=(A): Not a list of length at least 2 EQL-OK: ERROR (DEFINE-METHOD-COMBINATION MC23 NIL ((A *))) EQL-OK: MC23 (DEFINE-METHOD-COMBINATION MC24 NIL ((A *) (B *)) `(PROGN (CALL-METHOD ,(FIRST A)) (CALL-METHOD ,(FIRST B)))) EQL-OK: MC24 (PROGN (DEFINE-METHOD-COMBINATION MC25 NIL ((ALL NIL)) `(LIST 'RESULT ,@(MAPCAR #'(LAMBDA (METHOD) `(CALL-METHOD ,METHOD)) ALL))) (DEFGENERIC TEST-MC25 (X) (:METHOD-COMBINATION MC25)) (TEST-MC25 7)) [METHOD-CALL-ERROR]: NO-APPLICABLE-METHOD: When calling #1=# with arguments #2=(7), no method is applicable. EQL-OK: ERROR (PROGN (DEFINE-METHOD-COMBINATION MC26 NIL ((NORMAL NIL) (IGNORED (:IGNORE))) `(LIST 'RESULT ,@(MAPCAR #'(LAMBDA (METHOD) `(CALL-METHOD ,METHOD)) NORMAL))) (DEFGENERIC TEST-MC26 (X) (:METHOD-COMBINATION MC26) (:METHOD :IGNORE ((X NUMBER)) (/ 0))) (TEST-MC26 7)) EQUAL-OK: (RESULT) (PROGN (DEFINE-METHOD-COMBINATION MC27 NIL ((NORMAL NIL) (IGNORED (:IGNORE :UNUSED))) `(LIST 'RESULT ,@(MAPCAR #'(LAMBDA (METHOD) `(CALL-METHOD ,METHOD)) NORMAL))) (DEFGENERIC TEST-MC27 (X) (:METHOD-COMBINATION MC27) (:METHOD :IGNORE ((X NUMBER)) (/ 0))) (TEST-MC27 7)) [SIMPLE-PROGRAM-ERROR]: MC27 method combination, used by #, does not allow the method qualifiers #1=(:IGNORE): #)> EQL-OK: ERROR (PROGN (DEFINE-METHOD-COMBINATION MC28 NIL ((NORMAL NIL) (IGNORED (:IGNORE) (:UNUSED))) `(LIST 'RESULT ,@(MAPCAR #'(LAMBDA (METHOD) `(CALL-METHOD ,METHOD)) NORMAL))) (DEFGENERIC TEST-MC28 (X) (:METHOD-COMBINATION MC28) (:METHOD :IGNORE ((X NUMBER)) (/ 0))) (TEST-MC28 7)) EQUAL-OK: (RESULT) (PROGN (DEFINE-METHOD-COMBINATION MC29 NIL ((IGNORED (:IGNORE) (:UNUSED)) (OTHER *)) `(LIST 'RESULT ,@(MAPCAR #'(LAMBDA (METHOD) `(CALL-METHOD ,METHOD)) OTHER))) (DEFGENERIC TEST-MC29 (X) (:METHOD-COMBINATION MC29) (:METHOD :IGNORE ((X NUMBER)) (/ 0))) (TEST-MC29 7)) EQUAL-OK: (RESULT) (DEFINE-METHOD-COMBINATION MC50 (OPT1 OPT2) ((ALL *)) (:ARGUMENTS &WHOLE WHOLE ARG1 ARG2 &REST MORE-ARGS) `(LIST ',OPT1 ',OPT2 'RESULT ,WHOLE ,ARG1 ,ARG2 ,MORE-ARGS)) EQL-OK: MC50 (DEFGENERIC TEST-MC50-1 (X) (:METHOD-COMBINATION MC50 XYZ)) [SIMPLE-PROGRAM-ERROR]: DEFGENERIC TEST-MC50-1: Invalid method-combination options (XYZ) for #: EVAL/APPLY: Too few arguments (1 instead of at least 2) given to CLOS::METHOD-COMBINATION-OPTION-CHECKER EQL-OK: ERROR (PROGN (DEFGENERIC TEST-MC50-2 (X) (:METHOD-COMBINATION MC50 XYZ "foo") (:METHOD ((X INTEGER)) (/ 0))) (TEST-MC50-2 7)) EQUAL-OK: (XYZ "foo" RESULT (7) 7 NIL NIL) (PROGN (DEFGENERIC TEST-MC50-3 (X Y Z) (:METHOD-COMBINATION MC50 XYZ "bar") (:METHOD ((X T) (Y T) (Z T)) (/ 0))) (TEST-MC50-3 'A 'B 'C)) EQUAL-OK: (XYZ "bar" RESULT (A B C) A B NIL) (DEFINE-METHOD-COMBINATION MC51 (OPT1 &OPTIONAL OPT2 &REST MORE-OPTS) ((ALL *)) (:ARGUMENTS &WHOLE WHOLE ARG1 &KEY TEST TEST-NOT) `(LIST ',OPT1 ',OPT2 ',MORE-OPTS 'RESULT ,WHOLE ,ARG1 ,TEST ,TEST-NOT)) EQL-OK: MC51 (DEFGENERIC TEST-MC51-1 (X) (:METHOD-COMBINATION MC51)) [SIMPLE-PROGRAM-ERROR]: DEFGENERIC TEST-MC51-1: Invalid method-combination options NIL for #: EVAL/APPLY: Too few arguments (0 instead of at least 1) given to CLOS::METHOD-COMBINATION-OPTION-CHECKER EQL-OK: ERROR (PROGN (DEFGENERIC TEST-MC51-2 (X) (:METHOD-COMBINATION MC51 "xyz") (:METHOD ((X INTEGER)) (/ 0))) (TEST-MC51-2 7)) EQUAL-OK: ("xyz" NIL NIL RESULT (7) 7 NIL NIL) (PROGN (DEFGENERIC TEST-MC51-3 (X) (:METHOD-COMBINATION MC51 "xyz" "uvw") (:METHOD ((X INTEGER)) (/ 0))) (TEST-MC51-3 7)) EQUAL-OK: ("xyz" "uvw" NIL RESULT (7) 7 NIL NIL) (PROGN (DEFGENERIC TEST-MC51-4 (X) (:METHOD-COMBINATION MC51 "xyz" "uvw" :FOO :BAR) (:METHOD ((X INTEGER)) (/ 0))) (TEST-MC51-4 7)) EQUAL-OK: ("xyz" "uvw" (:FOO :BAR) RESULT (7) 7 NIL NIL) (PROGN (DEFGENERIC TEST-MC51-5 (X &KEY TEST TEST-NOT KEY PREDICATE) (:METHOD-COMBINATION MC51 "xyz" "uvw" :FOO :BAR) (:METHOD ((X INTEGER) &KEY PREDICATE TEST TEST-NOT KEY) (/ 0))) (TEST-MC51-5 7 :KEY 'FIRST :TEST-NOT 'EQUAL)) EQUAL-OK: ("xyz" "uvw" (:FOO :BAR) RESULT (7 :KEY FIRST :TEST-NOT EQUAL) 7 NIL EQUAL) (DEFINE-METHOD-COMBINATION MC60 (OPT1 &OPTIONAL (OPT2 "def")) ((ALL *)) (:ARGUMENTS) `(LIST ',OPT1 ',OPT2 'RESULT (CALL-METHOD ,(FIRST ALL)))) EQL-OK: MC60 (PROGN (DEFGENERIC TEST-MC60-1 NIL (:METHOD-COMBINATION MC60 "xyz") (:METHOD NIL 'NIL)) (TEST-MC60-1)) EQUAL-OK: ("xyz" "def" RESULT NIL) (PROGN (DEFGENERIC TEST-MC60-2 (X Y) (:METHOD-COMBINATION MC60 "xyz") (:METHOD (X Y) (LIST X Y))) (TEST-MC60-2 'A 'B)) EQUAL-OK: ("xyz" "def" RESULT (A B)) (PROGN (DEFGENERIC TEST-MC60-3 (&OPTIONAL X Y) (:METHOD-COMBINATION MC60 "xyz") (:METHOD (&OPTIONAL X Y) (LIST X Y))) (TEST-MC60-3 'A)) EQUAL-OK: ("xyz" "def" RESULT (A NIL)) (PROGN (DEFGENERIC TEST-MC60-4 (&REST X) (:METHOD-COMBINATION MC60 "xyz") (:METHOD (&REST X) X)) (TEST-MC60-4 'A 'B)) EQUAL-OK: ("xyz" "def" RESULT (A B)) (DEFINE-METHOD-COMBINATION MC61 (OPT1 &OPTIONAL (OPT2 "def")) ((ALL *)) (:ARGUMENTS A1 A2) `(LIST ',OPT1 ',OPT2 'RESULT ,A1 ,A2 (CALL-METHOD ,(FIRST ALL)))) EQL-OK: MC61 (PROGN (DEFGENERIC TEST-MC61-1 (X) (:METHOD-COMBINATION MC61 "xyz") (:METHOD (X) (LIST X))) (TEST-MC61-1 'A)) EQUAL-OK: ("xyz" "def" RESULT A NIL (A)) (PROGN (DEFGENERIC TEST-MC61-2 (X Y) (:METHOD-COMBINATION MC61 "xyz") (:METHOD (X Y) (LIST X Y))) (TEST-MC61-2 'A 'B)) EQUAL-OK: ("xyz" "def" RESULT A B (A B)) (PROGN (DEFGENERIC TEST-MC61-3 (X Y Z) (:METHOD-COMBINATION MC61 "xyz") (:METHOD (X Y Z) (LIST X Y Z))) (TEST-MC61-3 'A 'B 'C)) EQUAL-OK: ("xyz" "def" RESULT A B (A B C)) (PROGN (DEFGENERIC TEST-MC61-4 (X &OPTIONAL Y Z) (:METHOD-COMBINATION MC61 "xyz") (:METHOD (X &OPTIONAL Y Z) (LIST X Y Z))) (LIST (TEST-MC61-4 'A) (TEST-MC61-4 'A 'B) (TEST-MC61-4 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT A NIL (A NIL NIL)) ("xyz" "def" RESULT A NIL (A B NIL)) ("xyz" "def" RESULT A NIL (A B C))) (PROGN (DEFGENERIC TEST-MC61-5 (X Y &OPTIONAL Z U) (:METHOD-COMBINATION MC61 "xyz") (:METHOD (X Y &OPTIONAL Z U) (LIST X Y Z U))) (LIST (TEST-MC61-5 'A 'B) (TEST-MC61-5 'A 'B 'C) (TEST-MC61-5 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT A B (A B NIL NIL)) ("xyz" "def" RESULT A B (A B C NIL)) ("xyz" "def" RESULT A B (A B C D))) (PROGN (DEFGENERIC TEST-MC61-6 (X Y Z &OPTIONAL U V) (:METHOD-COMBINATION MC61 "xyz") (:METHOD (X Y Z &OPTIONAL U V) (LIST X Y Z U V))) (LIST (TEST-MC61-6 'A 'B 'C) (TEST-MC61-6 'A 'B 'C 'D) (TEST-MC61-6 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT A B (A B C NIL NIL)) ("xyz" "def" RESULT A B (A B C D NIL)) ("xyz" "def" RESULT A B (A B C D E))) (PROGN (DEFGENERIC TEST-MC61-7 (X &REST Y) (:METHOD-COMBINATION MC61 "xyz") (:METHOD (X &REST Y) (LIST* X Y))) (LIST (TEST-MC61-7 'A) (TEST-MC61-7 'A 'B) (TEST-MC61-7 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT A NIL (A)) ("xyz" "def" RESULT A NIL (A B)) ("xyz" "def" RESULT A NIL (A B C))) (PROGN (DEFGENERIC TEST-MC61-8 (X Y &REST Z) (:METHOD-COMBINATION MC61 "xyz") (:METHOD (X Y &REST Z) (LIST* X Y Z))) (LIST (TEST-MC61-8 'A 'B) (TEST-MC61-8 'A 'B 'C) (TEST-MC61-8 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT A B (A B)) ("xyz" "def" RESULT A B (A B C)) ("xyz" "def" RESULT A B (A B C D))) (PROGN (DEFGENERIC TEST-MC61-9 (X Y Z &REST U) (:METHOD-COMBINATION MC61 "xyz") (:METHOD (X Y Z &REST U) (LIST* X Y Z U))) (LIST (TEST-MC61-9 'A 'B 'C) (TEST-MC61-9 'A 'B 'C 'D) (TEST-MC61-9 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT A B (A B C)) ("xyz" "def" RESULT A B (A B C D)) ("xyz" "def" RESULT A B (A B C D E))) (DEFINE-METHOD-COMBINATION MC62 (OPT1 &OPTIONAL (OPT2 "def")) ((ALL *)) (:ARGUMENTS &OPTIONAL (O1 'DEF1) (O2 'DEF2)) `(LIST ',OPT1 ',OPT2 'RESULT ,O1 ,O2 (CALL-METHOD ,(FIRST ALL)))) EQL-OK: MC62 (PROGN (DEFGENERIC TEST-MC62-1 (X) (:METHOD-COMBINATION MC62 "xyz") (:METHOD (X) (LIST X))) (TEST-MC62-1 'A)) EQUAL-OK: ("xyz" "def" RESULT DEF1 DEF2 (A)) (PROGN (DEFGENERIC TEST-MC62-2 (X &OPTIONAL Y) (:METHOD-COMBINATION MC62 "xyz") (:METHOD (X &OPTIONAL Y) (LIST X Y))) (LIST (TEST-MC62-2 'A) (TEST-MC62-2 'A 'B))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 (A NIL)) ("xyz" "def" RESULT B DEF2 (A B))) (PROGN (DEFGENERIC TEST-MC62-3 (X &OPTIONAL Y Z) (:METHOD-COMBINATION MC62 "xyz") (:METHOD (X &OPTIONAL Y Z) (LIST X Y Z))) (LIST (TEST-MC62-3 'A) (TEST-MC62-3 'A 'B) (TEST-MC62-3 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 (A NIL NIL)) ("xyz" "def" RESULT B DEF2 (A B NIL)) ("xyz" "def" RESULT B C (A B C))) (PROGN (DEFGENERIC TEST-MC62-4 (X &OPTIONAL Y Z U) (:METHOD-COMBINATION MC62 "xyz") (:METHOD (X &OPTIONAL Y Z U) (LIST X Y Z U))) (LIST (TEST-MC62-4 'A) (TEST-MC62-4 'A 'B) (TEST-MC62-4 'A 'B 'C) (TEST-MC62-4 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 (A NIL NIL NIL)) ("xyz" "def" RESULT B DEF2 (A B NIL NIL)) ("xyz" "def" RESULT B C (A B C NIL)) ("xyz" "def" RESULT B C (A B C D))) (PROGN (DEFGENERIC TEST-MC62-5 (X &REST Y) (:METHOD-COMBINATION MC62 "xyz") (:METHOD (X &REST Y) (LIST* X Y))) (LIST (TEST-MC62-5 'A) (TEST-MC62-5 'A 'B) (TEST-MC62-5 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 (A)) ("xyz" "def" RESULT DEF1 DEF2 (A B)) ("xyz" "def" RESULT DEF1 DEF2 (A B C))) (PROGN (DEFGENERIC TEST-MC62-6 (X &OPTIONAL Y &REST Z) (:METHOD-COMBINATION MC62 "xyz") (:METHOD (X &OPTIONAL Y &REST Z) (LIST* X Y Z))) (LIST (TEST-MC62-6 'A) (TEST-MC62-6 'A 'B) (TEST-MC62-6 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 (A NIL)) ("xyz" "def" RESULT B DEF2 (A B)) ("xyz" "def" RESULT B DEF2 (A B C))) (PROGN (DEFGENERIC TEST-MC62-7 (X &OPTIONAL Y Z &REST U) (:METHOD-COMBINATION MC62 "xyz") (:METHOD (X &OPTIONAL Y Z &REST U) (LIST* X Y Z U))) (LIST (TEST-MC62-7 'A) (TEST-MC62-7 'A 'B) (TEST-MC62-7 'A 'B 'C) (TEST-MC62-7 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 (A NIL NIL)) ("xyz" "def" RESULT B DEF2 (A B NIL)) ("xyz" "def" RESULT B C (A B C)) ("xyz" "def" RESULT B C (A B C D))) (DEFINE-METHOD-COMBINATION MC63 (OPT1 &OPTIONAL (OPT2 "def")) ((ALL *)) (:ARGUMENTS &REST R) `(LIST ',OPT1 ',OPT2 'RESULT ,R (CALL-METHOD ,(FIRST ALL)))) EQL-OK: MC63 (PROGN (DEFGENERIC TEST-MC63-1 NIL (:METHOD-COMBINATION MC63 "xyz") (:METHOD NIL 'NIL)) (TEST-MC63-1)) EQUAL-OK: ("xyz" "def" RESULT NIL NIL) (PROGN (DEFGENERIC TEST-MC63-2 (X Y) (:METHOD-COMBINATION MC63 "xyz") (:METHOD (X Y) (LIST X Y))) (TEST-MC63-2 'A 'B)) EQUAL-OK: ("xyz" "def" RESULT NIL (A B)) (PROGN (DEFGENERIC TEST-MC63-3 (&OPTIONAL X Y) (:METHOD-COMBINATION MC63 "xyz") (:METHOD (&OPTIONAL X Y) (LIST X Y))) (TEST-MC63-3 'A)) EQUAL-OK: ("xyz" "def" RESULT NIL (A NIL)) (PROGN (DEFGENERIC TEST-MC63-4 (&REST X) (:METHOD-COMBINATION MC63 "xyz") (:METHOD (&REST X) X)) (TEST-MC63-4 'A 'B)) EQUAL-OK: ("xyz" "def" RESULT (A B) (A B)) (DEFINE-METHOD-COMBINATION MC64 (OPT1 &OPTIONAL (OPT2 "def")) ((ALL *)) (:ARGUMENTS A1 A2 &OPTIONAL (O1 'DEF1) (O2 'DEF2)) `(LIST ',OPT1 ',OPT2 'RESULT ,A1 ,A2 ,O1 ,O2 (CALL-METHOD ,(FIRST ALL)))) EQL-OK: MC64 (PROGN (DEFGENERIC TEST-MC64-1 NIL (:METHOD-COMBINATION MC64 "xyz") (:METHOD NIL 'NIL)) (TEST-MC64-1)) EQUAL-OK: ("xyz" "def" RESULT NIL NIL DEF1 DEF2 NIL) (PROGN (DEFGENERIC TEST-MC64-2 (X) (:METHOD-COMBINATION MC64 "xyz") (:METHOD (X) (LIST X))) (TEST-MC64-2 'A)) EQUAL-OK: ("xyz" "def" RESULT A NIL DEF1 DEF2 (A)) (PROGN (DEFGENERIC TEST-MC64-3 (X Y) (:METHOD-COMBINATION MC64 "xyz") (:METHOD (X Y) (LIST X Y))) (TEST-MC64-3 'A 'B)) EQUAL-OK: ("xyz" "def" RESULT A B DEF1 DEF2 (A B)) (PROGN (DEFGENERIC TEST-MC64-4 (X Y Z) (:METHOD-COMBINATION MC64 "xyz") (:METHOD (X Y Z) (LIST X Y Z))) (TEST-MC64-4 'A 'B 'C)) EQUAL-OK: ("xyz" "def" RESULT A B DEF1 DEF2 (A B C)) (PROGN (DEFGENERIC TEST-MC64-5 (X &OPTIONAL Y) (:METHOD-COMBINATION MC64 "xyz") (:METHOD (X &OPTIONAL Y) (LIST X Y))) (LIST (TEST-MC64-5 'A) (TEST-MC64-5 'A 'B))) EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 (A NIL)) ("xyz" "def" RESULT A NIL B DEF2 (A B))) (PROGN (DEFGENERIC TEST-MC64-6 (X Y &OPTIONAL Z) (:METHOD-COMBINATION MC64 "xyz") (:METHOD (X Y &OPTIONAL Z) (LIST X Y Z))) (LIST (TEST-MC64-6 'A 'B) (TEST-MC64-6 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT A B DEF1 DEF2 (A B NIL)) ("xyz" "def" RESULT A B C DEF2 (A B C))) (PROGN (DEFGENERIC TEST-MC64-7 (X Y Z &OPTIONAL U) (:METHOD-COMBINATION MC64 "xyz") (:METHOD (X Y Z &OPTIONAL U) (LIST X Y Z U))) (LIST (TEST-MC64-7 'A 'B 'C) (TEST-MC64-7 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT A B DEF1 DEF2 (A B C NIL)) ("xyz" "def" RESULT A B D DEF2 (A B C D))) (PROGN (DEFGENERIC TEST-MC64-8 (X &OPTIONAL Y Z) (:METHOD-COMBINATION MC64 "xyz") (:METHOD (X &OPTIONAL Y Z) (LIST X Y Z))) (LIST (TEST-MC64-8 'A) (TEST-MC64-8 'A 'B) (TEST-MC64-8 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 (A NIL NIL)) ("xyz" "def" RESULT A NIL B DEF2 (A B NIL)) ("xyz" "def" RESULT A NIL B C (A B C))) (PROGN (DEFGENERIC TEST-MC64-9 (X Y &OPTIONAL Z U) (:METHOD-COMBINATION MC64 "xyz") (:METHOD (X Y &OPTIONAL Z U) (LIST X Y Z U))) (LIST (TEST-MC64-9 'A 'B) (TEST-MC64-9 'A 'B 'C) (TEST-MC64-9 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT A B DEF1 DEF2 (A B NIL NIL)) ("xyz" "def" RESULT A B C DEF2 (A B C NIL)) ("xyz" "def" RESULT A B C D (A B C D))) (PROGN (DEFGENERIC TEST-MC64-10 (X Y Z &OPTIONAL U V) (:METHOD-COMBINATION MC64 "xyz") (:METHOD (X Y Z &OPTIONAL U V) (LIST X Y Z U V))) (LIST (TEST-MC64-10 'A 'B 'C) (TEST-MC64-10 'A 'B 'C 'D) (TEST-MC64-10 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT A B DEF1 DEF2 (A B C NIL NIL)) ("xyz" "def" RESULT A B D DEF2 (A B C D NIL)) ("xyz" "def" RESULT A B D E (A B C D E))) (PROGN (DEFGENERIC TEST-MC64-11 (X &OPTIONAL Y Z U) (:METHOD-COMBINATION MC64 "xyz") (:METHOD (X &OPTIONAL Y Z U) (LIST X Y Z U))) (LIST (TEST-MC64-11 'A) (TEST-MC64-11 'A 'B) (TEST-MC64-11 'A 'B 'C) (TEST-MC64-11 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 (A NIL NIL NIL)) ("xyz" "def" RESULT A NIL B DEF2 (A B NIL NIL)) ("xyz" "def" RESULT A NIL B C (A B C NIL)) ("xyz" "def" RESULT A NIL B C (A B C D))) (PROGN (DEFGENERIC TEST-MC64-12 (X Y &OPTIONAL Z U V) (:METHOD-COMBINATION MC64 "xyz") (:METHOD (X Y &OPTIONAL Z U V) (LIST X Y Z U V))) (LIST (TEST-MC64-12 'A 'B) (TEST-MC64-12 'A 'B 'C) (TEST-MC64-12 'A 'B 'C 'D) (TEST-MC64-12 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT A B DEF1 DEF2 (A B NIL NIL NIL)) ("xyz" "def" RESULT A B C DEF2 (A B C NIL NIL)) ("xyz" "def" RESULT A B C D (A B C D NIL)) ("xyz" "def" RESULT A B C D (A B C D E))) (PROGN (DEFGENERIC TEST-MC64-13 (X Y Z &OPTIONAL U V W) (:METHOD-COMBINATION MC64 "xyz") (:METHOD (X Y Z &OPTIONAL U V W) (LIST X Y Z U V W))) (LIST (TEST-MC64-13 'A 'B 'C) (TEST-MC64-13 'A 'B 'C 'D) (TEST-MC64-13 'A 'B 'C 'D 'E) (TEST-MC64-13 'A 'B 'C 'D 'E 'F))) EQUAL-OK: (("xyz" "def" RESULT A B DEF1 DEF2 (A B C NIL NIL NIL)) ("xyz" "def" RESULT A B D DEF2 (A B C D NIL NIL)) ("xyz" "def" RESULT A B D E (A B C D E NIL)) ("xyz" "def" RESULT A B D E (A B C D E F))) (PROGN (DEFGENERIC TEST-MC64-14 (X &REST Y) (:METHOD-COMBINATION MC64 "xyz") (:METHOD (X &REST Y) (LIST* X Y))) (LIST (TEST-MC64-14 'A) (TEST-MC64-14 'A 'B) (TEST-MC64-14 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 (A)) ("xyz" "def" RESULT A NIL DEF1 DEF2 (A B)) ("xyz" "def" RESULT A NIL DEF1 DEF2 (A B C))) (PROGN (DEFGENERIC TEST-MC64-15 (X Y &REST Z) (:METHOD-COMBINATION MC64 "xyz") (:METHOD (X Y &REST Z) (LIST* X Y Z))) (LIST (TEST-MC64-15 'A 'B) (TEST-MC64-15 'A 'B 'C) (TEST-MC64-15 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT A B DEF1 DEF2 (A B)) ("xyz" "def" RESULT A B DEF1 DEF2 (A B C)) ("xyz" "def" RESULT A B DEF1 DEF2 (A B C D))) (PROGN (DEFGENERIC TEST-MC64-16 (X Y Z &REST U) (:METHOD-COMBINATION MC64 "xyz") (:METHOD (X Y Z &REST U) (LIST* X Y Z U))) (LIST (TEST-MC64-16 'A 'B 'C) (TEST-MC64-16 'A 'B 'C 'D) (TEST-MC64-16 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT A B DEF1 DEF2 (A B C)) ("xyz" "def" RESULT A B DEF1 DEF2 (A B C D)) ("xyz" "def" RESULT A B DEF1 DEF2 (A B C D E))) (PROGN (DEFGENERIC TEST-MC64-17 (X &OPTIONAL Y &REST Z) (:METHOD-COMBINATION MC64 "xyz") (:METHOD (X &OPTIONAL Y &REST Z) (LIST* X Y Z))) (LIST (TEST-MC64-17 'A) (TEST-MC64-17 'A 'B) (TEST-MC64-17 'A 'B 'C) (TEST-MC64-17 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 (A NIL)) ("xyz" "def" RESULT A NIL B DEF2 (A B)) ("xyz" "def" RESULT A NIL B DEF2 (A B C)) ("xyz" "def" RESULT A NIL B DEF2 (A B C D))) (PROGN (DEFGENERIC TEST-MC64-18 (X &OPTIONAL Y Z &REST U) (:METHOD-COMBINATION MC64 "xyz") (:METHOD (X &OPTIONAL Y Z &REST U) (LIST* X Y Z U))) (LIST (TEST-MC64-18 'A) (TEST-MC64-18 'A 'B) (TEST-MC64-18 'A 'B 'C) (TEST-MC64-18 'A 'B 'C 'D) (TEST-MC64-18 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 (A NIL NIL)) ("xyz" "def" RESULT A NIL B DEF2 (A B NIL)) ("xyz" "def" RESULT A NIL B C (A B C)) ("xyz" "def" RESULT A NIL B C (A B C D)) ("xyz" "def" RESULT A NIL B C (A B C D E))) (PROGN (DEFGENERIC TEST-MC64-19 (X &OPTIONAL Y Z U &REST V) (:METHOD-COMBINATION MC64 "xyz") (:METHOD (X &OPTIONAL Y Z U &REST V) (LIST* X Y Z U V))) (LIST (TEST-MC64-19 'A) (TEST-MC64-19 'A 'B) (TEST-MC64-19 'A 'B 'C) (TEST-MC64-19 'A 'B 'C 'D) (TEST-MC64-19 'A 'B 'C 'D 'E) (TEST-MC64-19 'A 'B 'C 'D 'E 'F))) EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 (A NIL NIL NIL)) ("xyz" "def" RESULT A NIL B DEF2 (A B NIL NIL)) ("xyz" "def" RESULT A NIL B C (A B C NIL)) ("xyz" "def" RESULT A NIL B C (A B C D)) ("xyz" "def" RESULT A NIL B C (A B C D E)) ("xyz" "def" RESULT A NIL B C (A B C D E F))) (DEFINE-METHOD-COMBINATION MC65 (OPT1 &OPTIONAL (OPT2 "def")) ((ALL *)) (:ARGUMENTS A1 A2 &REST R) `(LIST ',OPT1 ',OPT2 'RESULT ,A1 ,A2 ,R (CALL-METHOD ,(FIRST ALL)))) EQL-OK: MC65 (PROGN (DEFGENERIC TEST-MC65-1 NIL (:METHOD-COMBINATION MC65 "xyz") (:METHOD NIL 'NIL)) (TEST-MC65-1)) EQUAL-OK: ("xyz" "def" RESULT NIL NIL NIL NIL) (PROGN (DEFGENERIC TEST-MC65-2 (X) (:METHOD-COMBINATION MC65 "xyz") (:METHOD (X) (LIST X))) (TEST-MC65-2 'A)) EQUAL-OK: ("xyz" "def" RESULT A NIL NIL (A)) (PROGN (DEFGENERIC TEST-MC65-3 (X Y) (:METHOD-COMBINATION MC65 "xyz") (:METHOD (X Y) (LIST X Y))) (TEST-MC65-3 'A 'B)) EQUAL-OK: ("xyz" "def" RESULT A B NIL (A B)) (PROGN (DEFGENERIC TEST-MC65-4 (X Y Z) (:METHOD-COMBINATION MC65 "xyz") (:METHOD (X Y Z) (LIST X Y Z))) (TEST-MC65-4 'A 'B 'C)) EQUAL-OK: ("xyz" "def" RESULT A B NIL (A B C)) (PROGN (DEFGENERIC TEST-MC65-5 (X &OPTIONAL Y) (:METHOD-COMBINATION MC65 "xyz") (:METHOD (X &OPTIONAL Y) (LIST X Y))) (LIST (TEST-MC65-5 'A) (TEST-MC65-5 'A 'B))) EQUAL-OK: (("xyz" "def" RESULT A NIL NIL (A NIL)) ("xyz" "def" RESULT A NIL NIL (A B))) (PROGN (DEFGENERIC TEST-MC65-6 (X Y &OPTIONAL Z) (:METHOD-COMBINATION MC65 "xyz") (:METHOD (X Y &OPTIONAL Z) (LIST X Y Z))) (LIST (TEST-MC65-6 'A 'B) (TEST-MC65-6 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT A B NIL (A B NIL)) ("xyz" "def" RESULT A B NIL (A B C))) (PROGN (DEFGENERIC TEST-MC65-7 (X Y Z &OPTIONAL U) (:METHOD-COMBINATION MC65 "xyz") (:METHOD (X Y Z &OPTIONAL U) (LIST X Y Z U))) (LIST (TEST-MC65-7 'A 'B 'C) (TEST-MC65-7 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT A B NIL (A B C NIL)) ("xyz" "def" RESULT A B NIL (A B C D))) (PROGN (DEFGENERIC TEST-MC65-8 (X &OPTIONAL Y Z) (:METHOD-COMBINATION MC65 "xyz") (:METHOD (X &OPTIONAL Y Z) (LIST X Y Z))) (LIST (TEST-MC65-8 'A) (TEST-MC65-8 'A 'B) (TEST-MC65-8 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT A NIL NIL (A NIL NIL)) ("xyz" "def" RESULT A NIL NIL (A B NIL)) ("xyz" "def" RESULT A NIL NIL (A B C))) (PROGN (DEFGENERIC TEST-MC65-9 (X Y &OPTIONAL Z U) (:METHOD-COMBINATION MC65 "xyz") (:METHOD (X Y &OPTIONAL Z U) (LIST X Y Z U))) (LIST (TEST-MC65-9 'A 'B) (TEST-MC65-9 'A 'B 'C) (TEST-MC65-9 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT A B NIL (A B NIL NIL)) ("xyz" "def" RESULT A B NIL (A B C NIL)) ("xyz" "def" RESULT A B NIL (A B C D))) (PROGN (DEFGENERIC TEST-MC65-10 (X Y Z &OPTIONAL U V) (:METHOD-COMBINATION MC65 "xyz") (:METHOD (X Y Z &OPTIONAL U V) (LIST X Y Z U V))) (LIST (TEST-MC65-10 'A 'B 'C) (TEST-MC65-10 'A 'B 'C 'D) (TEST-MC65-10 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT A B NIL (A B C NIL NIL)) ("xyz" "def" RESULT A B NIL (A B C D NIL)) ("xyz" "def" RESULT A B NIL (A B C D E))) (PROGN (DEFGENERIC TEST-MC65-11 (X &OPTIONAL Y Z U) (:METHOD-COMBINATION MC65 "xyz") (:METHOD (X &OPTIONAL Y Z U) (LIST X Y Z U))) (LIST (TEST-MC65-11 'A) (TEST-MC65-11 'A 'B) (TEST-MC65-11 'A 'B 'C) (TEST-MC65-11 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT A NIL NIL (A NIL NIL NIL)) ("xyz" "def" RESULT A NIL NIL (A B NIL NIL)) ("xyz" "def" RESULT A NIL NIL (A B C NIL)) ("xyz" "def" RESULT A NIL NIL (A B C D))) (PROGN (DEFGENERIC TEST-MC65-12 (X Y &OPTIONAL Z U V) (:METHOD-COMBINATION MC65 "xyz") (:METHOD (X Y &OPTIONAL Z U V) (LIST X Y Z U V))) (LIST (TEST-MC65-12 'A 'B) (TEST-MC65-12 'A 'B 'C) (TEST-MC65-12 'A 'B 'C 'D) (TEST-MC65-12 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT A B NIL (A B NIL NIL NIL)) ("xyz" "def" RESULT A B NIL (A B C NIL NIL)) ("xyz" "def" RESULT A B NIL (A B C D NIL)) ("xyz" "def" RESULT A B NIL (A B C D E))) (PROGN (DEFGENERIC TEST-MC65-13 (X Y Z &OPTIONAL U V W) (:METHOD-COMBINATION MC65 "xyz") (:METHOD (X Y Z &OPTIONAL U V W) (LIST X Y Z U V W))) (LIST (TEST-MC65-13 'A 'B 'C) (TEST-MC65-13 'A 'B 'C 'D) (TEST-MC65-13 'A 'B 'C 'D 'E) (TEST-MC65-13 'A 'B 'C 'D 'E 'F))) EQUAL-OK: (("xyz" "def" RESULT A B NIL (A B C NIL NIL NIL)) ("xyz" "def" RESULT A B NIL (A B C D NIL NIL)) ("xyz" "def" RESULT A B NIL (A B C D E NIL)) ("xyz" "def" RESULT A B NIL (A B C D E F))) (PROGN (DEFGENERIC TEST-MC65-14 (X &REST Y) (:METHOD-COMBINATION MC65 "xyz") (:METHOD (X &REST Y) (LIST* X Y))) (LIST (TEST-MC65-14 'A) (TEST-MC65-14 'A 'B) (TEST-MC65-14 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT A NIL NIL (A)) ("xyz" "def" RESULT A NIL (B) (A B)) ("xyz" "def" RESULT A NIL (B C) (A B C))) (PROGN (DEFGENERIC TEST-MC65-15 (X Y &REST Z) (:METHOD-COMBINATION MC65 "xyz") (:METHOD (X Y &REST Z) (LIST* X Y Z))) (LIST (TEST-MC65-15 'A 'B) (TEST-MC65-15 'A 'B 'C) (TEST-MC65-15 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT A B NIL (A B)) ("xyz" "def" RESULT A B (C) (A B C)) ("xyz" "def" RESULT A B (C D) (A B C D))) (PROGN (DEFGENERIC TEST-MC65-16 (X Y Z &REST U) (:METHOD-COMBINATION MC65 "xyz") (:METHOD (X Y Z &REST U) (LIST* X Y Z U))) (LIST (TEST-MC65-16 'A 'B 'C) (TEST-MC65-16 'A 'B 'C 'D) (TEST-MC65-16 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT A B NIL (A B C)) ("xyz" "def" RESULT A B (D) (A B C D)) ("xyz" "def" RESULT A B (D E) (A B C D E))) (PROGN (DEFGENERIC TEST-MC65-17 (X &OPTIONAL Y &REST Z) (:METHOD-COMBINATION MC65 "xyz") (:METHOD (X &OPTIONAL Y &REST Z) (LIST* X Y Z))) (LIST (TEST-MC65-17 'A) (TEST-MC65-17 'A 'B) (TEST-MC65-17 'A 'B 'C) (TEST-MC65-17 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT A NIL NIL (A NIL)) ("xyz" "def" RESULT A NIL NIL (A B)) ("xyz" "def" RESULT A NIL (C) (A B C)) ("xyz" "def" RESULT A NIL (C D) (A B C D))) (PROGN (DEFGENERIC TEST-MC65-18 (X &OPTIONAL Y Z &REST U) (:METHOD-COMBINATION MC65 "xyz") (:METHOD (X &OPTIONAL Y Z &REST U) (LIST* X Y Z U))) (LIST (TEST-MC65-18 'A) (TEST-MC65-18 'A 'B) (TEST-MC65-18 'A 'B 'C) (TEST-MC65-18 'A 'B 'C 'D) (TEST-MC65-18 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT A NIL NIL (A NIL NIL)) ("xyz" "def" RESULT A NIL NIL (A B NIL)) ("xyz" "def" RESULT A NIL NIL (A B C)) ("xyz" "def" RESULT A NIL (D) (A B C D)) ("xyz" "def" RESULT A NIL (D E) (A B C D E))) (PROGN (DEFGENERIC TEST-MC65-19 (X &OPTIONAL Y Z U &REST V) (:METHOD-COMBINATION MC65 "xyz") (:METHOD (X &OPTIONAL Y Z U &REST V) (LIST* X Y Z U V))) (LIST (TEST-MC65-19 'A) (TEST-MC65-19 'A 'B) (TEST-MC65-19 'A 'B 'C) (TEST-MC65-19 'A 'B 'C 'D) (TEST-MC65-19 'A 'B 'C 'D 'E) (TEST-MC65-19 'A 'B 'C 'D 'E 'F))) EQUAL-OK: (("xyz" "def" RESULT A NIL NIL (A NIL NIL NIL)) ("xyz" "def" RESULT A NIL NIL (A B NIL NIL)) ("xyz" "def" RESULT A NIL NIL (A B C NIL)) ("xyz" "def" RESULT A NIL NIL (A B C D)) ("xyz" "def" RESULT A NIL (E) (A B C D E)) ("xyz" "def" RESULT A NIL (E F) (A B C D E F))) (DEFINE-METHOD-COMBINATION MC66 (OPT1 &OPTIONAL (OPT2 "def")) ((ALL *)) (:ARGUMENTS &OPTIONAL (O1 'DEF1) (O2 'DEF2) &REST R) `(LIST ',OPT1 ',OPT2 'RESULT ,O1 ,O2 ,R (CALL-METHOD ,(FIRST ALL)))) EQL-OK: MC66 (PROGN (DEFGENERIC TEST-MC66-1 NIL (:METHOD-COMBINATION MC66 "xyz") (:METHOD NIL 'NIL)) (TEST-MC66-1)) EQUAL-OK: ("xyz" "def" RESULT DEF1 DEF2 NIL NIL) (PROGN (DEFGENERIC TEST-MC66-2 (X) (:METHOD-COMBINATION MC66 "xyz") (:METHOD (X) (LIST X))) (TEST-MC66-2 'A)) EQUAL-OK: ("xyz" "def" RESULT DEF1 DEF2 NIL (A)) (PROGN (DEFGENERIC TEST-MC66-3 (X Y) (:METHOD-COMBINATION MC66 "xyz") (:METHOD (X Y) (LIST X Y))) (TEST-MC66-3 'A 'B)) EQUAL-OK: ("xyz" "def" RESULT DEF1 DEF2 NIL (A B)) (PROGN (DEFGENERIC TEST-MC66-4 (X Y Z) (:METHOD-COMBINATION MC66 "xyz") (:METHOD (X Y Z) (LIST X Y Z))) (TEST-MC66-4 'A 'B 'C)) EQUAL-OK: ("xyz" "def" RESULT DEF1 DEF2 NIL (A B C)) (PROGN (DEFGENERIC TEST-MC66-5 (X &OPTIONAL Y) (:METHOD-COMBINATION MC66 "xyz") (:METHOD (X &OPTIONAL Y) (LIST X Y))) (LIST (TEST-MC66-5 'A) (TEST-MC66-5 'A 'B))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL (A NIL)) ("xyz" "def" RESULT B DEF2 NIL (A B))) (PROGN (DEFGENERIC TEST-MC66-6 (X Y &OPTIONAL Z) (:METHOD-COMBINATION MC66 "xyz") (:METHOD (X Y &OPTIONAL Z) (LIST X Y Z))) (LIST (TEST-MC66-6 'A 'B) (TEST-MC66-6 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL (A B NIL)) ("xyz" "def" RESULT C DEF2 NIL (A B C))) (PROGN (DEFGENERIC TEST-MC66-7 (X Y Z &OPTIONAL U) (:METHOD-COMBINATION MC66 "xyz") (:METHOD (X Y Z &OPTIONAL U) (LIST X Y Z U))) (LIST (TEST-MC66-7 'A 'B 'C) (TEST-MC66-7 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL (A B C NIL)) ("xyz" "def" RESULT D DEF2 NIL (A B C D))) (PROGN (DEFGENERIC TEST-MC66-8 (X &OPTIONAL Y Z) (:METHOD-COMBINATION MC66 "xyz") (:METHOD (X &OPTIONAL Y Z) (LIST X Y Z))) (LIST (TEST-MC66-8 'A) (TEST-MC66-8 'A 'B) (TEST-MC66-8 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL (A NIL NIL)) ("xyz" "def" RESULT B DEF2 NIL (A B NIL)) ("xyz" "def" RESULT B C NIL (A B C))) (PROGN (DEFGENERIC TEST-MC66-9 (X Y &OPTIONAL Z U) (:METHOD-COMBINATION MC66 "xyz") (:METHOD (X Y &OPTIONAL Z U) (LIST X Y Z U))) (LIST (TEST-MC66-9 'A 'B) (TEST-MC66-9 'A 'B 'C) (TEST-MC66-9 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL (A B NIL NIL)) ("xyz" "def" RESULT C DEF2 NIL (A B C NIL)) ("xyz" "def" RESULT C D NIL (A B C D))) (PROGN (DEFGENERIC TEST-MC66-10 (X Y Z &OPTIONAL U V) (:METHOD-COMBINATION MC66 "xyz") (:METHOD (X Y Z &OPTIONAL U V) (LIST X Y Z U V))) (LIST (TEST-MC66-10 'A 'B 'C) (TEST-MC66-10 'A 'B 'C 'D) (TEST-MC66-10 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL (A B C NIL NIL)) ("xyz" "def" RESULT D DEF2 NIL (A B C D NIL)) ("xyz" "def" RESULT D E NIL (A B C D E))) (PROGN (DEFGENERIC TEST-MC66-11 (X &OPTIONAL Y Z U) (:METHOD-COMBINATION MC66 "xyz") (:METHOD (X &OPTIONAL Y Z U) (LIST X Y Z U))) (LIST (TEST-MC66-11 'A) (TEST-MC66-11 'A 'B) (TEST-MC66-11 'A 'B 'C) (TEST-MC66-11 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL (A NIL NIL NIL)) ("xyz" "def" RESULT B DEF2 NIL (A B NIL NIL)) ("xyz" "def" RESULT B C NIL (A B C NIL)) ("xyz" "def" RESULT B C NIL (A B C D))) (PROGN (DEFGENERIC TEST-MC66-12 (X Y &OPTIONAL Z U V) (:METHOD-COMBINATION MC66 "xyz") (:METHOD (X Y &OPTIONAL Z U V) (LIST X Y Z U V))) (LIST (TEST-MC66-12 'A 'B) (TEST-MC66-12 'A 'B 'C) (TEST-MC66-12 'A 'B 'C 'D) (TEST-MC66-12 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL (A B NIL NIL NIL)) ("xyz" "def" RESULT C DEF2 NIL (A B C NIL NIL)) ("xyz" "def" RESULT C D NIL (A B C D NIL)) ("xyz" "def" RESULT C D NIL (A B C D E))) (PROGN (DEFGENERIC TEST-MC66-13 (X Y Z &OPTIONAL U V W) (:METHOD-COMBINATION MC66 "xyz") (:METHOD (X Y Z &OPTIONAL U V W) (LIST X Y Z U V W))) (LIST (TEST-MC66-13 'A 'B 'C) (TEST-MC66-13 'A 'B 'C 'D) (TEST-MC66-13 'A 'B 'C 'D 'E) (TEST-MC66-13 'A 'B 'C 'D 'E 'F))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL (A B C NIL NIL NIL)) ("xyz" "def" RESULT D DEF2 NIL (A B C D NIL NIL)) ("xyz" "def" RESULT D E NIL (A B C D E NIL)) ("xyz" "def" RESULT D E NIL (A B C D E F))) (PROGN (DEFGENERIC TEST-MC66-14 (X &REST Y) (:METHOD-COMBINATION MC66 "xyz") (:METHOD (X &REST Y) (LIST* X Y))) (LIST (TEST-MC66-14 'A) (TEST-MC66-14 'A 'B) (TEST-MC66-14 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL (A)) ("xyz" "def" RESULT DEF1 DEF2 (B) (A B)) ("xyz" "def" RESULT DEF1 DEF2 (B C) (A B C))) (PROGN (DEFGENERIC TEST-MC66-15 (X Y &REST Z) (:METHOD-COMBINATION MC66 "xyz") (:METHOD (X Y &REST Z) (LIST* X Y Z))) (LIST (TEST-MC66-15 'A 'B) (TEST-MC66-15 'A 'B 'C) (TEST-MC66-15 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL (A B)) ("xyz" "def" RESULT DEF1 DEF2 (C) (A B C)) ("xyz" "def" RESULT DEF1 DEF2 (C D) (A B C D))) (PROGN (DEFGENERIC TEST-MC66-16 (X Y Z &REST U) (:METHOD-COMBINATION MC66 "xyz") (:METHOD (X Y Z &REST U) (LIST* X Y Z U))) (LIST (TEST-MC66-16 'A 'B 'C) (TEST-MC66-16 'A 'B 'C 'D) (TEST-MC66-16 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL (A B C)) ("xyz" "def" RESULT DEF1 DEF2 (D) (A B C D)) ("xyz" "def" RESULT DEF1 DEF2 (D E) (A B C D E))) (PROGN (DEFGENERIC TEST-MC66-17 (X &OPTIONAL Y &REST Z) (:METHOD-COMBINATION MC66 "xyz") (:METHOD (X &OPTIONAL Y &REST Z) (LIST* X Y Z))) (LIST (TEST-MC66-17 'A) (TEST-MC66-17 'A 'B) (TEST-MC66-17 'A 'B 'C) (TEST-MC66-17 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL (A NIL)) ("xyz" "def" RESULT B DEF2 NIL (A B)) ("xyz" "def" RESULT B DEF2 (C) (A B C)) ("xyz" "def" RESULT B DEF2 (C D) (A B C D))) (PROGN (DEFGENERIC TEST-MC66-18 (X &OPTIONAL Y Z &REST U) (:METHOD-COMBINATION MC66 "xyz") (:METHOD (X &OPTIONAL Y Z &REST U) (LIST* X Y Z U))) (LIST (TEST-MC66-18 'A) (TEST-MC66-18 'A 'B) (TEST-MC66-18 'A 'B 'C) (TEST-MC66-18 'A 'B 'C 'D) (TEST-MC66-18 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL (A NIL NIL)) ("xyz" "def" RESULT B DEF2 NIL (A B NIL)) ("xyz" "def" RESULT B C NIL (A B C)) ("xyz" "def" RESULT B C (D) (A B C D)) ("xyz" "def" RESULT B C (D E) (A B C D E))) (PROGN (DEFGENERIC TEST-MC66-19 (X &OPTIONAL Y Z U &REST V) (:METHOD-COMBINATION MC66 "xyz") (:METHOD (X &OPTIONAL Y Z U &REST V) (LIST* X Y Z U V))) (LIST (TEST-MC66-19 'A) (TEST-MC66-19 'A 'B) (TEST-MC66-19 'A 'B 'C) (TEST-MC66-19 'A 'B 'C 'D) (TEST-MC66-19 'A 'B 'C 'D 'E) (TEST-MC66-19 'A 'B 'C 'D 'E 'F))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL (A NIL NIL NIL)) ("xyz" "def" RESULT B DEF2 NIL (A B NIL NIL)) ("xyz" "def" RESULT B C NIL (A B C NIL)) ("xyz" "def" RESULT B C NIL (A B C D)) ("xyz" "def" RESULT B C (E) (A B C D E)) ("xyz" "def" RESULT B C (E F) (A B C D E F))) (DEFINE-METHOD-COMBINATION MC67 (OPT1 &OPTIONAL (OPT2 "def")) ((ALL *)) (:ARGUMENTS A1 A2 &OPTIONAL (O1 'DEF1) (O2 'DEF2) &REST R) `(LIST ',OPT1 ',OPT2 'RESULT ,A1 ,A2 ,O1 ,O2 ,R (CALL-METHOD ,(FIRST ALL)))) EQL-OK: MC67 (PROGN (DEFGENERIC TEST-MC67-1 NIL (:METHOD-COMBINATION MC67 "xyz") (:METHOD NIL 'NIL)) (TEST-MC67-1)) EQUAL-OK: ("xyz" "def" RESULT NIL NIL DEF1 DEF2 NIL NIL) (PROGN (DEFGENERIC TEST-MC67-2 (X) (:METHOD-COMBINATION MC67 "xyz") (:METHOD (X) (LIST X))) (TEST-MC67-2 'A)) EQUAL-OK: ("xyz" "def" RESULT A NIL DEF1 DEF2 NIL (A)) (PROGN (DEFGENERIC TEST-MC67-3 (X Y) (:METHOD-COMBINATION MC67 "xyz") (:METHOD (X Y) (LIST X Y))) (TEST-MC67-3 'A 'B)) EQUAL-OK: ("xyz" "def" RESULT A B DEF1 DEF2 NIL (A B)) (PROGN (DEFGENERIC TEST-MC67-4 (X Y Z) (:METHOD-COMBINATION MC67 "xyz") (:METHOD (X Y Z) (LIST X Y Z))) (TEST-MC67-4 'A 'B 'C)) EQUAL-OK: ("xyz" "def" RESULT A B DEF1 DEF2 NIL (A B C)) (PROGN (DEFGENERIC TEST-MC67-5 (X &OPTIONAL Y) (:METHOD-COMBINATION MC67 "xyz") (:METHOD (X &OPTIONAL Y) (LIST X Y))) (LIST (TEST-MC67-5 'A) (TEST-MC67-5 'A 'B))) EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 NIL (A NIL)) ("xyz" "def" RESULT A NIL B DEF2 NIL (A B))) (PROGN (DEFGENERIC TEST-MC67-6 (X Y &OPTIONAL Z) (:METHOD-COMBINATION MC67 "xyz") (:METHOD (X Y &OPTIONAL Z) (LIST X Y Z))) (LIST (TEST-MC67-6 'A 'B) (TEST-MC67-6 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT A B DEF1 DEF2 NIL (A B NIL)) ("xyz" "def" RESULT A B C DEF2 NIL (A B C))) (PROGN (DEFGENERIC TEST-MC67-7 (X Y Z &OPTIONAL U) (:METHOD-COMBINATION MC67 "xyz") (:METHOD (X Y Z &OPTIONAL U) (LIST X Y Z U))) (LIST (TEST-MC67-7 'A 'B 'C) (TEST-MC67-7 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT A B DEF1 DEF2 NIL (A B C NIL)) ("xyz" "def" RESULT A B D DEF2 NIL (A B C D))) (PROGN (DEFGENERIC TEST-MC67-8 (X &OPTIONAL Y Z) (:METHOD-COMBINATION MC67 "xyz") (:METHOD (X &OPTIONAL Y Z) (LIST X Y Z))) (LIST (TEST-MC67-8 'A) (TEST-MC67-8 'A 'B) (TEST-MC67-8 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 NIL (A NIL NIL)) ("xyz" "def" RESULT A NIL B DEF2 NIL (A B NIL)) ("xyz" "def" RESULT A NIL B C NIL (A B C))) (PROGN (DEFGENERIC TEST-MC67-9 (X Y &OPTIONAL Z U) (:METHOD-COMBINATION MC67 "xyz") (:METHOD (X Y &OPTIONAL Z U) (LIST X Y Z U))) (LIST (TEST-MC67-9 'A 'B) (TEST-MC67-9 'A 'B 'C) (TEST-MC67-9 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT A B DEF1 DEF2 NIL (A B NIL NIL)) ("xyz" "def" RESULT A B C DEF2 NIL (A B C NIL)) ("xyz" "def" RESULT A B C D NIL (A B C D))) (PROGN (DEFGENERIC TEST-MC67-10 (X Y Z &OPTIONAL U V) (:METHOD-COMBINATION MC67 "xyz") (:METHOD (X Y Z &OPTIONAL U V) (LIST X Y Z U V))) (LIST (TEST-MC67-10 'A 'B 'C) (TEST-MC67-10 'A 'B 'C 'D) (TEST-MC67-10 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT A B DEF1 DEF2 NIL (A B C NIL NIL)) ("xyz" "def" RESULT A B D DEF2 NIL (A B C D NIL)) ("xyz" "def" RESULT A B D E NIL (A B C D E))) (PROGN (DEFGENERIC TEST-MC67-11 (X &OPTIONAL Y Z U) (:METHOD-COMBINATION MC67 "xyz") (:METHOD (X &OPTIONAL Y Z U) (LIST X Y Z U))) (LIST (TEST-MC67-11 'A) (TEST-MC67-11 'A 'B) (TEST-MC67-11 'A 'B 'C) (TEST-MC67-11 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 NIL (A NIL NIL NIL)) ("xyz" "def" RESULT A NIL B DEF2 NIL (A B NIL NIL)) ("xyz" "def" RESULT A NIL B C NIL (A B C NIL)) ("xyz" "def" RESULT A NIL B C NIL (A B C D))) (PROGN (DEFGENERIC TEST-MC67-12 (X Y &OPTIONAL Z U V) (:METHOD-COMBINATION MC67 "xyz") (:METHOD (X Y &OPTIONAL Z U V) (LIST X Y Z U V))) (LIST (TEST-MC67-12 'A 'B) (TEST-MC67-12 'A 'B 'C) (TEST-MC67-12 'A 'B 'C 'D) (TEST-MC67-12 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT A B DEF1 DEF2 NIL (A B NIL NIL NIL)) ("xyz" "def" RESULT A B C DEF2 NIL (A B C NIL NIL)) ("xyz" "def" RESULT A B C D NIL (A B C D NIL)) ("xyz" "def" RESULT A B C D NIL (A B C D E))) (PROGN (DEFGENERIC TEST-MC67-13 (X Y Z &OPTIONAL U V W) (:METHOD-COMBINATION MC67 "xyz") (:METHOD (X Y Z &OPTIONAL U V W) (LIST X Y Z U V W))) (LIST (TEST-MC67-13 'A 'B 'C) (TEST-MC67-13 'A 'B 'C 'D) (TEST-MC67-13 'A 'B 'C 'D 'E) (TEST-MC67-13 'A 'B 'C 'D 'E 'F))) EQUAL-OK: (("xyz" "def" RESULT A B DEF1 DEF2 NIL (A B C NIL NIL NIL)) ("xyz" "def" RESULT A B D DEF2 NIL (A B C D NIL NIL)) ("xyz" "def" RESULT A B D E NIL (A B C D E NIL)) ("xyz" "def" RESULT A B D E NIL (A B C D E F))) (PROGN (DEFGENERIC TEST-MC67-14 (X &REST Y) (:METHOD-COMBINATION MC67 "xyz") (:METHOD (X &REST Y) (LIST* X Y))) (LIST (TEST-MC67-14 'A) (TEST-MC67-14 'A 'B) (TEST-MC67-14 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 NIL (A)) ("xyz" "def" RESULT A NIL DEF1 DEF2 (B) (A B)) ("xyz" "def" RESULT A NIL DEF1 DEF2 (B C) (A B C))) (PROGN (DEFGENERIC TEST-MC67-15 (X Y &REST Z) (:METHOD-COMBINATION MC67 "xyz") (:METHOD (X Y &REST Z) (LIST* X Y Z))) (LIST (TEST-MC67-15 'A 'B) (TEST-MC67-15 'A 'B 'C) (TEST-MC67-15 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT A B DEF1 DEF2 NIL (A B)) ("xyz" "def" RESULT A B DEF1 DEF2 (C) (A B C)) ("xyz" "def" RESULT A B DEF1 DEF2 (C D) (A B C D))) (PROGN (DEFGENERIC TEST-MC67-16 (X Y Z &REST U) (:METHOD-COMBINATION MC67 "xyz") (:METHOD (X Y Z &REST U) (LIST* X Y Z U))) (LIST (TEST-MC67-16 'A 'B 'C) (TEST-MC67-16 'A 'B 'C 'D) (TEST-MC67-16 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT A B DEF1 DEF2 NIL (A B C)) ("xyz" "def" RESULT A B DEF1 DEF2 (D) (A B C D)) ("xyz" "def" RESULT A B DEF1 DEF2 (D E) (A B C D E))) (PROGN (DEFGENERIC TEST-MC67-17 (X &OPTIONAL Y &REST Z) (:METHOD-COMBINATION MC67 "xyz") (:METHOD (X &OPTIONAL Y &REST Z) (LIST* X Y Z))) (LIST (TEST-MC67-17 'A) (TEST-MC67-17 'A 'B) (TEST-MC67-17 'A 'B 'C) (TEST-MC67-17 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 NIL (A NIL)) ("xyz" "def" RESULT A NIL B DEF2 NIL (A B)) ("xyz" "def" RESULT A NIL B DEF2 (C) (A B C)) ("xyz" "def" RESULT A NIL B DEF2 (C D) (A B C D))) (PROGN (DEFGENERIC TEST-MC67-18 (X &OPTIONAL Y Z &REST U) (:METHOD-COMBINATION MC67 "xyz") (:METHOD (X &OPTIONAL Y Z &REST U) (LIST* X Y Z U))) (LIST (TEST-MC67-18 'A) (TEST-MC67-18 'A 'B) (TEST-MC67-18 'A 'B 'C) (TEST-MC67-18 'A 'B 'C 'D) (TEST-MC67-18 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 NIL (A NIL NIL)) ("xyz" "def" RESULT A NIL B DEF2 NIL (A B NIL)) ("xyz" "def" RESULT A NIL B C NIL (A B C)) ("xyz" "def" RESULT A NIL B C (D) (A B C D)) ("xyz" "def" RESULT A NIL B C (D E) (A B C D E))) (PROGN (DEFGENERIC TEST-MC67-19 (X &OPTIONAL Y Z U &REST V) (:METHOD-COMBINATION MC67 "xyz") (:METHOD (X &OPTIONAL Y Z U &REST V) (LIST* X Y Z U V))) (LIST (TEST-MC67-19 'A) (TEST-MC67-19 'A 'B) (TEST-MC67-19 'A 'B 'C) (TEST-MC67-19 'A 'B 'C 'D) (TEST-MC67-19 'A 'B 'C 'D 'E) (TEST-MC67-19 'A 'B 'C 'D 'E 'F))) EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 NIL (A NIL NIL NIL)) ("xyz" "def" RESULT A NIL B DEF2 NIL (A B NIL NIL)) ("xyz" "def" RESULT A NIL B C NIL (A B C NIL)) ("xyz" "def" RESULT A NIL B C NIL (A B C D)) ("xyz" "def" RESULT A NIL B C (E) (A B C D E)) ("xyz" "def" RESULT A NIL B C (E F) (A B C D E F))) (DEFINE-METHOD-COMBINATION MC68 (OPT1 &OPTIONAL (OPT2 "def")) ((ALL *)) (:ARGUMENTS A1 A2 &OPTIONAL (O1 'DEF1) (O2 'DEF2) &KEY (TEST 'EQ) (TEST-NOT 'NEQ)) `(LIST ',OPT1 ',OPT2 'RESULT ,A1 ,A2 ,O1 ,O2 ,TEST ,TEST-NOT (CALL-METHOD ,(FIRST ALL)))) EQL-OK: MC68 (PROGN (DEFGENERIC TEST-MC68-1 (X &OPTIONAL Y) (:METHOD-COMBINATION MC68 "xyz") (:METHOD (X &OPTIONAL Y) (LIST X Y))) (LIST (TEST-MC68-1 'A) (TEST-MC68-1 'A 'B))) WARNING: in TEST-MC68-1--1-1 : Mixing &OPTIONAL and &KEY in lambda list (&OPTIONAL #:G13639 &KEY (TEST 'EQ) (TEST-NOT 'NEQ) &ALLOW-OTHER-KEYS) is bad design EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 EQ NEQ (A NIL)) ("xyz" "def" RESULT A NIL B DEF2 EQ NEQ (A B))) (PROGN (DEFGENERIC TEST-MC68-2 (X Y Z &OPTIONAL U V W) (:METHOD-COMBINATION MC68 "xyz") (:METHOD (X Y Z &OPTIONAL U V W) (LIST X Y Z U V W))) (LIST (TEST-MC68-2 'A 'B 'C) (TEST-MC68-2 'A 'B 'C 'D) (TEST-MC68-2 'A 'B 'C 'D 'E) (TEST-MC68-2 'A 'B 'C 'D 'E 'F))) WARNING: in TEST-MC68-2--1-1 : Mixing &OPTIONAL and &KEY in lambda list (A1 A2 &OPTIONAL (O1 'DEF1) (O2 'DEF2) #:G13683 &KEY (TEST 'EQ) (TEST-NOT 'NEQ) &ALLOW-OTHER-KEYS) is bad design EQUAL-OK: (("xyz" "def" RESULT A B DEF1 DEF2 EQ NEQ (A B C NIL NIL NIL)) ("xyz" "def" RESULT A B D DEF2 EQ NEQ (A B C D NIL NIL)) ("xyz" "def" RESULT A B D E EQ NEQ (A B C D E NIL)) ("xyz" "def" RESULT A B D E EQ NEQ (A B C D E F))) (PROGN (DEFGENERIC TEST-MC68-3 (X &REST Y) (:METHOD-COMBINATION MC68 "xyz") (:METHOD (X &REST Y) (LIST* X Y))) (LIST (TEST-MC68-3 'A) (TEST-MC68-3 'A 'B 'C) (TEST-MC68-3 'A :TEST-NOT 'NEQUAL :TEST 'EQL :TEST-NOT 'NEQUALP))) EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 EQ NEQ (A)) ("xyz" "def" RESULT A NIL DEF1 DEF2 EQ NEQ (A B C)) ("xyz" "def" RESULT A NIL DEF1 DEF2 EQL NEQUAL (A :TEST-NOT NEQUAL :TEST EQL :TEST-NOT NEQUALP))) (PROGN (DEFGENERIC TEST-MC68-4 (X &REST Y) (:METHOD-COMBINATION MC68 "xyz") (:METHOD (X &REST Y) (LIST* X Y))) (TEST-MC68-4 'A 'B)) [SIMPLE-PROGRAM-ERROR]: TEST-MC68-4--1-1: keyword arguments in (B) should occur pairwise EQL-OK: ERROR (PROGN (DEFGENERIC TEST-MC68-5 (X Y Z &REST U) (:METHOD-COMBINATION MC68 "xyz") (:METHOD (X Y Z &REST U) (LIST* X Y Z U))) (LIST (TEST-MC68-5 'A :TEST 'EQ) (TEST-MC68-5 'A :TEST 'EQ 'D 'E) (TEST-MC68-5 'A :TEST 'EQ :TEST-NOT 'NEQUAL :TEST 'EQL :TEST-NOT 'NEQUALP))) EQUAL-OK: (("xyz" "def" RESULT A :TEST DEF1 DEF2 EQ NEQ (A :TEST EQ)) ("xyz" "def" RESULT A :TEST DEF1 DEF2 EQ NEQ (A :TEST EQ D E)) ("xyz" "def" RESULT A :TEST DEF1 DEF2 EQL NEQUAL (A :TEST EQ :TEST-NOT NEQUAL :TEST EQL :TEST-NOT NEQUALP))) (PROGN (DEFGENERIC TEST-MC68-6 (X &OPTIONAL Y Z U &REST V) (:METHOD-COMBINATION MC68 "xyz") (:METHOD (X &OPTIONAL Y Z U &REST V) (LIST* X Y Z U V))) (LIST (TEST-MC68-6 'A) (TEST-MC68-6 'A 'B 'C) (TEST-MC68-6 'A :TEST 'EQ 'D :TEST-NOT 'NEQUAL :TEST 'EQL :TEST-NOT 'NEQUALP))) WARNING: in TEST-MC68-6--1-1 : Mixing &OPTIONAL and &KEY in lambda list (A1 A2 &OPTIONAL (O1 'DEF1) (O2 'DEF2) #:G13823 &KEY (TEST 'EQ) (TEST-NOT 'NEQ) &ALLOW-OTHER-KEYS) is bad design EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 EQ NEQ (A NIL NIL NIL)) ("xyz" "def" RESULT A NIL B C EQ NEQ (A B C NIL)) ("xyz" "def" RESULT A NIL :TEST EQ EQL NEQUAL (A :TEST EQ D :TEST-NOT NEQUAL :TEST EQL :TEST-NOT NEQUALP))) (DEFINE-METHOD-COMBINATION MC69 (OPT1 &OPTIONAL (OPT2 "def")) ((ALL *)) (:ARGUMENTS &WHOLE WHOLE) `(LIST ',OPT1 ',OPT2 'RESULT ,WHOLE (CALL-METHOD ,(FIRST ALL)))) EQL-OK: MC69 (PROGN (DEFGENERIC TEST-MC69-1 NIL (:METHOD-COMBINATION MC69 "xyz") (:METHOD NIL 'NIL)) (TEST-MC69-1)) EQUAL-OK: ("xyz" "def" RESULT NIL NIL) (PROGN (DEFGENERIC TEST-MC69-2 (X) (:METHOD-COMBINATION MC69 "xyz") (:METHOD (X) (LIST X))) (TEST-MC69-2 'A)) EQUAL-OK: ("xyz" "def" RESULT (A) (A)) (PROGN (DEFGENERIC TEST-MC69-3 (X Y) (:METHOD-COMBINATION MC69 "xyz") (:METHOD (X Y) (LIST X Y))) (TEST-MC69-3 'A 'B)) EQUAL-OK: ("xyz" "def" RESULT (A B) (A B)) (PROGN (DEFGENERIC TEST-MC69-4 (X Y Z) (:METHOD-COMBINATION MC69 "xyz") (:METHOD (X Y Z) (LIST X Y Z))) (TEST-MC69-4 'A 'B 'C)) EQUAL-OK: ("xyz" "def" RESULT (A B C) (A B C)) (PROGN (DEFGENERIC TEST-MC69-5 (X &OPTIONAL Y) (:METHOD-COMBINATION MC69 "xyz") (:METHOD (X &OPTIONAL Y) (LIST X Y))) (LIST (TEST-MC69-5 'A) (TEST-MC69-5 'A 'B))) EQUAL-OK: (("xyz" "def" RESULT (A) (A NIL)) ("xyz" "def" RESULT (A B) (A B))) (PROGN (DEFGENERIC TEST-MC69-6 (X Y &OPTIONAL Z) (:METHOD-COMBINATION MC69 "xyz") (:METHOD (X Y &OPTIONAL Z) (LIST X Y Z))) (LIST (TEST-MC69-6 'A 'B) (TEST-MC69-6 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT (A B) (A B NIL)) ("xyz" "def" RESULT (A B C) (A B C))) (PROGN (DEFGENERIC TEST-MC69-7 (X Y Z &OPTIONAL U) (:METHOD-COMBINATION MC69 "xyz") (:METHOD (X Y Z &OPTIONAL U) (LIST X Y Z U))) (LIST (TEST-MC69-7 'A 'B 'C) (TEST-MC69-7 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT (A B C) (A B C NIL)) ("xyz" "def" RESULT (A B C D) (A B C D))) (PROGN (DEFGENERIC TEST-MC69-8 (X &OPTIONAL Y Z) (:METHOD-COMBINATION MC69 "xyz") (:METHOD (X &OPTIONAL Y Z) (LIST X Y Z))) (LIST (TEST-MC69-8 'A) (TEST-MC69-8 'A 'B) (TEST-MC69-8 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT (A) (A NIL NIL)) ("xyz" "def" RESULT (A B) (A B NIL)) ("xyz" "def" RESULT (A B C) (A B C))) (PROGN (DEFGENERIC TEST-MC69-9 (X Y &OPTIONAL Z U) (:METHOD-COMBINATION MC69 "xyz") (:METHOD (X Y &OPTIONAL Z U) (LIST X Y Z U))) (LIST (TEST-MC69-9 'A 'B) (TEST-MC69-9 'A 'B 'C) (TEST-MC69-9 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT (A B) (A B NIL NIL)) ("xyz" "def" RESULT (A B C) (A B C NIL)) ("xyz" "def" RESULT (A B C D) (A B C D))) (PROGN (DEFGENERIC TEST-MC69-10 (X Y Z &OPTIONAL U V) (:METHOD-COMBINATION MC69 "xyz") (:METHOD (X Y Z &OPTIONAL U V) (LIST X Y Z U V))) (LIST (TEST-MC69-10 'A 'B 'C) (TEST-MC69-10 'A 'B 'C 'D) (TEST-MC69-10 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT (A B C) (A B C NIL NIL)) ("xyz" "def" RESULT (A B C D) (A B C D NIL)) ("xyz" "def" RESULT (A B C D E) (A B C D E))) (PROGN (DEFGENERIC TEST-MC69-11 (X &OPTIONAL Y Z U) (:METHOD-COMBINATION MC69 "xyz") (:METHOD (X &OPTIONAL Y Z U) (LIST X Y Z U))) (LIST (TEST-MC69-11 'A) (TEST-MC69-11 'A 'B) (TEST-MC69-11 'A 'B 'C) (TEST-MC69-11 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT (A) (A NIL NIL NIL)) ("xyz" "def" RESULT (A B) (A B NIL NIL)) ("xyz" "def" RESULT (A B C) (A B C NIL)) ("xyz" "def" RESULT (A B C D) (A B C D))) (PROGN (DEFGENERIC TEST-MC69-12 (X Y &OPTIONAL Z U V) (:METHOD-COMBINATION MC69 "xyz") (:METHOD (X Y &OPTIONAL Z U V) (LIST X Y Z U V))) (LIST (TEST-MC69-12 'A 'B) (TEST-MC69-12 'A 'B 'C) (TEST-MC69-12 'A 'B 'C 'D) (TEST-MC69-12 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT (A B) (A B NIL NIL NIL)) ("xyz" "def" RESULT (A B C) (A B C NIL NIL)) ("xyz" "def" RESULT (A B C D) (A B C D NIL)) ("xyz" "def" RESULT (A B C D E) (A B C D E))) (PROGN (DEFGENERIC TEST-MC69-13 (X Y Z &OPTIONAL U V W) (:METHOD-COMBINATION MC69 "xyz") (:METHOD (X Y Z &OPTIONAL U V W) (LIST X Y Z U V W))) (LIST (TEST-MC69-13 'A 'B 'C) (TEST-MC69-13 'A 'B 'C 'D) (TEST-MC69-13 'A 'B 'C 'D 'E) (TEST-MC69-13 'A 'B 'C 'D 'E 'F))) EQUAL-OK: (("xyz" "def" RESULT (A B C) (A B C NIL NIL NIL)) ("xyz" "def" RESULT (A B C D) (A B C D NIL NIL)) ("xyz" "def" RESULT (A B C D E) (A B C D E NIL)) ("xyz" "def" RESULT (A B C D E F) (A B C D E F))) (PROGN (DEFGENERIC TEST-MC69-14 (X &REST Y) (:METHOD-COMBINATION MC69 "xyz") (:METHOD (X &REST Y) (LIST* X Y))) (LIST (TEST-MC69-14 'A) (TEST-MC69-14 'A 'B) (TEST-MC69-14 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT (A) (A)) ("xyz" "def" RESULT (A B) (A B)) ("xyz" "def" RESULT (A B C) (A B C))) (PROGN (DEFGENERIC TEST-MC69-15 (X Y &REST Z) (:METHOD-COMBINATION MC69 "xyz") (:METHOD (X Y &REST Z) (LIST* X Y Z))) (LIST (TEST-MC69-15 'A 'B) (TEST-MC69-15 'A 'B 'C) (TEST-MC69-15 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT (A B) (A B)) ("xyz" "def" RESULT (A B C) (A B C)) ("xyz" "def" RESULT (A B C D) (A B C D))) (PROGN (DEFGENERIC TEST-MC69-16 (X Y Z &REST U) (:METHOD-COMBINATION MC69 "xyz") (:METHOD (X Y Z &REST U) (LIST* X Y Z U))) (LIST (TEST-MC69-16 'A 'B 'C) (TEST-MC69-16 'A 'B 'C 'D) (TEST-MC69-16 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT (A B C) (A B C)) ("xyz" "def" RESULT (A B C D) (A B C D)) ("xyz" "def" RESULT (A B C D E) (A B C D E))) (PROGN (DEFGENERIC TEST-MC69-17 (X &OPTIONAL Y &REST Z) (:METHOD-COMBINATION MC69 "xyz") (:METHOD (X &OPTIONAL Y &REST Z) (LIST* X Y Z))) (LIST (TEST-MC69-17 'A) (TEST-MC69-17 'A 'B) (TEST-MC69-17 'A 'B 'C) (TEST-MC69-17 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT (A) (A NIL)) ("xyz" "def" RESULT (A B) (A B)) ("xyz" "def" RESULT (A B C) (A B C)) ("xyz" "def" RESULT (A B C D) (A B C D))) (PROGN (DEFGENERIC TEST-MC69-18 (X &OPTIONAL Y Z &REST U) (:METHOD-COMBINATION MC69 "xyz") (:METHOD (X &OPTIONAL Y Z &REST U) (LIST* X Y Z U))) (LIST (TEST-MC69-18 'A) (TEST-MC69-18 'A 'B) (TEST-MC69-18 'A 'B 'C) (TEST-MC69-18 'A 'B 'C 'D) (TEST-MC69-18 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT (A) (A NIL NIL)) ("xyz" "def" RESULT (A B) (A B NIL)) ("xyz" "def" RESULT (A B C) (A B C)) ("xyz" "def" RESULT (A B C D) (A B C D)) ("xyz" "def" RESULT (A B C D E) (A B C D E))) (PROGN (DEFGENERIC TEST-MC69-19 (X &OPTIONAL Y Z U &REST V) (:METHOD-COMBINATION MC69 "xyz") (:METHOD (X &OPTIONAL Y Z U &REST V) (LIST* X Y Z U V))) (LIST (TEST-MC69-19 'A) (TEST-MC69-19 'A 'B) (TEST-MC69-19 'A 'B 'C) (TEST-MC69-19 'A 'B 'C 'D) (TEST-MC69-19 'A 'B 'C 'D 'E) (TEST-MC69-19 'A 'B 'C 'D 'E 'F))) EQUAL-OK: (("xyz" "def" RESULT (A) (A NIL NIL NIL)) ("xyz" "def" RESULT (A B) (A B NIL NIL)) ("xyz" "def" RESULT (A B C) (A B C NIL)) ("xyz" "def" RESULT (A B C D) (A B C D)) ("xyz" "def" RESULT (A B C D E) (A B C D E)) ("xyz" "def" RESULT (A B C D E F) (A B C D E F))) (DEFINE-METHOD-COMBINATION MC70 (OPT1 &OPTIONAL (OPT2 "def")) ((ALL *)) (:ARGUMENTS &WHOLE WHOLE A1 A2 &OPTIONAL (O1 'DEF1) (O2 'DEF2) &REST R) `(LIST ',OPT1 ',OPT2 'RESULT ,WHOLE ,A1 ,A2 ,O1 ,O2 ,R (CALL-METHOD ,(FIRST ALL)))) EQL-OK: MC70 (PROGN (DEFGENERIC TEST-MC70-1 NIL (:METHOD-COMBINATION MC70 "xyz") (:METHOD NIL 'NIL)) (TEST-MC70-1)) EQUAL-OK: ("xyz" "def" RESULT NIL NIL NIL DEF1 DEF2 NIL NIL) (PROGN (DEFGENERIC TEST-MC70-2 (X) (:METHOD-COMBINATION MC70 "xyz") (:METHOD (X) (LIST X))) (TEST-MC70-2 'A)) EQUAL-OK: ("xyz" "def" RESULT (A) A NIL DEF1 DEF2 NIL (A)) (PROGN (DEFGENERIC TEST-MC70-3 (X Y) (:METHOD-COMBINATION MC70 "xyz") (:METHOD (X Y) (LIST X Y))) (TEST-MC70-3 'A 'B)) EQUAL-OK: ("xyz" "def" RESULT (A B) A B DEF1 DEF2 NIL (A B)) (PROGN (DEFGENERIC TEST-MC70-4 (X Y Z) (:METHOD-COMBINATION MC70 "xyz") (:METHOD (X Y Z) (LIST X Y Z))) (TEST-MC70-4 'A 'B 'C)) EQUAL-OK: ("xyz" "def" RESULT (A B C) A B DEF1 DEF2 NIL (A B C)) (PROGN (DEFGENERIC TEST-MC70-5 (X &OPTIONAL Y) (:METHOD-COMBINATION MC70 "xyz") (:METHOD (X &OPTIONAL Y) (LIST X Y))) (LIST (TEST-MC70-5 'A) (TEST-MC70-5 'A 'B))) EQUAL-OK: (("xyz" "def" RESULT (A) A NIL DEF1 DEF2 NIL (A NIL)) ("xyz" "def" RESULT (A B) A NIL B DEF2 NIL (A B))) (PROGN (DEFGENERIC TEST-MC70-6 (X Y &OPTIONAL Z) (:METHOD-COMBINATION MC70 "xyz") (:METHOD (X Y &OPTIONAL Z) (LIST X Y Z))) (LIST (TEST-MC70-6 'A 'B) (TEST-MC70-6 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT (A B) A B DEF1 DEF2 NIL (A B NIL)) ("xyz" "def" RESULT (A B C) A B C DEF2 NIL (A B C))) (PROGN (DEFGENERIC TEST-MC70-7 (X Y Z &OPTIONAL U) (:METHOD-COMBINATION MC70 "xyz") (:METHOD (X Y Z &OPTIONAL U) (LIST X Y Z U))) (LIST (TEST-MC70-7 'A 'B 'C) (TEST-MC70-7 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT (A B C) A B DEF1 DEF2 NIL (A B C NIL)) ("xyz" "def" RESULT (A B C D) A B D DEF2 NIL (A B C D))) (PROGN (DEFGENERIC TEST-MC70-8 (X &OPTIONAL Y Z) (:METHOD-COMBINATION MC70 "xyz") (:METHOD (X &OPTIONAL Y Z) (LIST X Y Z))) (LIST (TEST-MC70-8 'A) (TEST-MC70-8 'A 'B) (TEST-MC70-8 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT (A) A NIL DEF1 DEF2 NIL (A NIL NIL)) ("xyz" "def" RESULT (A B) A NIL B DEF2 NIL (A B NIL)) ("xyz" "def" RESULT (A B C) A NIL B C NIL (A B C))) (PROGN (DEFGENERIC TEST-MC70-9 (X Y &OPTIONAL Z U) (:METHOD-COMBINATION MC70 "xyz") (:METHOD (X Y &OPTIONAL Z U) (LIST X Y Z U))) (LIST (TEST-MC70-9 'A 'B) (TEST-MC70-9 'A 'B 'C) (TEST-MC70-9 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT (A B) A B DEF1 DEF2 NIL (A B NIL NIL)) ("xyz" "def" RESULT (A B C) A B C DEF2 NIL (A B C NIL)) ("xyz" "def" RESULT (A B C D) A B C D NIL (A B C D))) (PROGN (DEFGENERIC TEST-MC70-10 (X Y Z &OPTIONAL U V) (:METHOD-COMBINATION MC70 "xyz") (:METHOD (X Y Z &OPTIONAL U V) (LIST X Y Z U V))) (LIST (TEST-MC70-10 'A 'B 'C) (TEST-MC70-10 'A 'B 'C 'D) (TEST-MC70-10 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT (A B C) A B DEF1 DEF2 NIL (A B C NIL NIL)) ("xyz" "def" RESULT (A B C D) A B D DEF2 NIL (A B C D NIL)) ("xyz" "def" RESULT (A B C D E) A B D E NIL (A B C D E))) (PROGN (DEFGENERIC TEST-MC70-11 (X &OPTIONAL Y Z U) (:METHOD-COMBINATION MC70 "xyz") (:METHOD (X &OPTIONAL Y Z U) (LIST X Y Z U))) (LIST (TEST-MC70-11 'A) (TEST-MC70-11 'A 'B) (TEST-MC70-11 'A 'B 'C) (TEST-MC70-11 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT (A) A NIL DEF1 DEF2 NIL (A NIL NIL NIL)) ("xyz" "def" RESULT (A B) A NIL B DEF2 NIL (A B NIL NIL)) ("xyz" "def" RESULT (A B C) A NIL B C NIL (A B C NIL)) ("xyz" "def" RESULT (A B C D) A NIL B C NIL (A B C D))) (PROGN (DEFGENERIC TEST-MC70-12 (X Y &OPTIONAL Z U V) (:METHOD-COMBINATION MC70 "xyz") (:METHOD (X Y &OPTIONAL Z U V) (LIST X Y Z U V))) (LIST (TEST-MC70-12 'A 'B) (TEST-MC70-12 'A 'B 'C) (TEST-MC70-12 'A 'B 'C 'D) (TEST-MC70-12 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT (A B) A B DEF1 DEF2 NIL (A B NIL NIL NIL)) ("xyz" "def" RESULT (A B C) A B C DEF2 NIL (A B C NIL NIL)) ("xyz" "def" RESULT (A B C D) A B C D NIL (A B C D NIL)) ("xyz" "def" RESULT (A B C D E) A B C D NIL (A B C D E))) (PROGN (DEFGENERIC TEST-MC70-13 (X Y Z &OPTIONAL U V W) (:METHOD-COMBINATION MC70 "xyz") (:METHOD (X Y Z &OPTIONAL U V W) (LIST X Y Z U V W))) (LIST (TEST-MC70-13 'A 'B 'C) (TEST-MC70-13 'A 'B 'C 'D) (TEST-MC70-13 'A 'B 'C 'D 'E) (TEST-MC70-13 'A 'B 'C 'D 'E 'F))) EQUAL-OK: (("xyz" "def" RESULT (A B C) A B DEF1 DEF2 NIL (A B C NIL NIL NIL)) ("xyz" "def" RESULT (A B C D) A B D DEF2 NIL (A B C D NIL NIL)) ("xyz" "def" RESULT (A B C D E) A B D E NIL (A B C D E NIL)) ("xyz" "def" RESULT (A B C D E F) A B D E NIL (A B C D E F))) (PROGN (DEFGENERIC TEST-MC70-14 (X &REST Y) (:METHOD-COMBINATION MC70 "xyz") (:METHOD (X &REST Y) (LIST* X Y))) (LIST (TEST-MC70-14 'A) (TEST-MC70-14 'A 'B) (TEST-MC70-14 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT (A) A NIL DEF1 DEF2 NIL (A)) ("xyz" "def" RESULT (A B) A NIL DEF1 DEF2 (B) (A B)) ("xyz" "def" RESULT (A B C) A NIL DEF1 DEF2 (B C) (A B C))) (PROGN (DEFGENERIC TEST-MC70-15 (X Y &REST Z) (:METHOD-COMBINATION MC70 "xyz") (:METHOD (X Y &REST Z) (LIST* X Y Z))) (LIST (TEST-MC70-15 'A 'B) (TEST-MC70-15 'A 'B 'C) (TEST-MC70-15 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT (A B) A B DEF1 DEF2 NIL (A B)) ("xyz" "def" RESULT (A B C) A B DEF1 DEF2 (C) (A B C)) ("xyz" "def" RESULT (A B C D) A B DEF1 DEF2 (C D) (A B C D))) (PROGN (DEFGENERIC TEST-MC70-16 (X Y Z &REST U) (:METHOD-COMBINATION MC70 "xyz") (:METHOD (X Y Z &REST U) (LIST* X Y Z U))) (LIST (TEST-MC70-16 'A 'B 'C) (TEST-MC70-16 'A 'B 'C 'D) (TEST-MC70-16 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT (A B C) A B DEF1 DEF2 NIL (A B C)) ("xyz" "def" RESULT (A B C D) A B DEF1 DEF2 (D) (A B C D)) ("xyz" "def" RESULT (A B C D E) A B DEF1 DEF2 (D E) (A B C D E))) (PROGN (DEFGENERIC TEST-MC70-17 (X &OPTIONAL Y &REST Z) (:METHOD-COMBINATION MC70 "xyz") (:METHOD (X &OPTIONAL Y &REST Z) (LIST* X Y Z))) (LIST (TEST-MC70-17 'A) (TEST-MC70-17 'A 'B) (TEST-MC70-17 'A 'B 'C) (TEST-MC70-17 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT (A) A NIL DEF1 DEF2 NIL (A NIL)) ("xyz" "def" RESULT (A B) A NIL B DEF2 NIL (A B)) ("xyz" "def" RESULT (A B C) A NIL B DEF2 (C) (A B C)) ("xyz" "def" RESULT (A B C D) A NIL B DEF2 (C D) (A B C D))) (PROGN (DEFGENERIC TEST-MC70-18 (X &OPTIONAL Y Z &REST U) (:METHOD-COMBINATION MC70 "xyz") (:METHOD (X &OPTIONAL Y Z &REST U) (LIST* X Y Z U))) (LIST (TEST-MC70-18 'A) (TEST-MC70-18 'A 'B) (TEST-MC70-18 'A 'B 'C) (TEST-MC70-18 'A 'B 'C 'D) (TEST-MC70-18 'A 'B 'C 'D 'E))) EQUAL-OK: (("xyz" "def" RESULT (A) A NIL DEF1 DEF2 NIL (A NIL NIL)) ("xyz" "def" RESULT (A B) A NIL B DEF2 NIL (A B NIL)) ("xyz" "def" RESULT (A B C) A NIL B C NIL (A B C)) ("xyz" "def" RESULT (A B C D) A NIL B C (D) (A B C D)) ("xyz" "def" RESULT (A B C D E) A NIL B C (D E) (A B C D E))) (PROGN (DEFGENERIC TEST-MC70-19 (X &OPTIONAL Y Z U &REST V) (:METHOD-COMBINATION MC70 "xyz") (:METHOD (X &OPTIONAL Y Z U &REST V) (LIST* X Y Z U V))) (LIST (TEST-MC70-19 'A) (TEST-MC70-19 'A 'B) (TEST-MC70-19 'A 'B 'C) (TEST-MC70-19 'A 'B 'C 'D) (TEST-MC70-19 'A 'B 'C 'D 'E) (TEST-MC70-19 'A 'B 'C 'D 'E 'F))) EQUAL-OK: (("xyz" "def" RESULT (A) A NIL DEF1 DEF2 NIL (A NIL NIL NIL)) ("xyz" "def" RESULT (A B) A NIL B DEF2 NIL (A B NIL NIL)) ("xyz" "def" RESULT (A B C) A NIL B C NIL (A B C NIL)) ("xyz" "def" RESULT (A B C D) A NIL B C NIL (A B C D)) ("xyz" "def" RESULT (A B C D E) A NIL B C (E) (A B C D E)) ("xyz" "def" RESULT (A B C D E F) A NIL B C (E F) (A B C D E F))) (DEFINE-METHOD-COMBINATION MC71 (OPT1 &OPTIONAL (OPT2 "def")) ((ALL *)) (:ARGUMENTS &OPTIONAL (O1 'DEF1 OS1) (O2 'DEF2 OS2)) `(LIST ',OPT1 ',OPT2 'RESULT ,O1 ,O2 ,OS1 ,OS2 (CALL-METHOD ,(FIRST ALL)))) EQL-OK: MC71 (PROGN (DEFGENERIC TEST-MC71-1 (X) (:METHOD-COMBINATION MC71 "xyz") (:METHOD (X) (LIST X))) (TEST-MC71-1 'A)) EQUAL-OK: ("xyz" "def" RESULT DEF1 DEF2 NIL NIL (A)) (PROGN (DEFGENERIC TEST-MC71-2 (X &OPTIONAL Y) (:METHOD-COMBINATION MC71 "xyz") (:METHOD (X &OPTIONAL Y) (LIST X Y))) (LIST (TEST-MC71-2 'A) (TEST-MC71-2 'A 'B))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL NIL (A NIL)) ("xyz" "def" RESULT B DEF2 T NIL (A B))) (PROGN (DEFGENERIC TEST-MC71-3 (X &OPTIONAL Y Z) (:METHOD-COMBINATION MC71 "xyz") (:METHOD (X &OPTIONAL Y Z) (LIST X Y Z))) (LIST (TEST-MC71-3 'A) (TEST-MC71-3 'A 'B) (TEST-MC71-3 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL NIL (A NIL NIL)) ("xyz" "def" RESULT B DEF2 T NIL (A B NIL)) ("xyz" "def" RESULT B C T T (A B C))) (PROGN (DEFGENERIC TEST-MC71-4 (X &OPTIONAL Y Z U) (:METHOD-COMBINATION MC71 "xyz") (:METHOD (X &OPTIONAL Y Z U) (LIST X Y Z U))) (LIST (TEST-MC71-4 'A) (TEST-MC71-4 'A 'B) (TEST-MC71-4 'A 'B 'C) (TEST-MC71-4 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL NIL (A NIL NIL NIL)) ("xyz" "def" RESULT B DEF2 T NIL (A B NIL NIL)) ("xyz" "def" RESULT B C T T (A B C NIL)) ("xyz" "def" RESULT B C T T (A B C D))) (PROGN (DEFGENERIC TEST-MC71-5 (X &REST Y) (:METHOD-COMBINATION MC71 "xyz") (:METHOD (X &REST Y) (LIST* X Y))) (LIST (TEST-MC71-5 'A) (TEST-MC71-5 'A 'B) (TEST-MC71-5 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL NIL (A)) ("xyz" "def" RESULT DEF1 DEF2 NIL NIL (A B)) ("xyz" "def" RESULT DEF1 DEF2 NIL NIL (A B C))) (PROGN (DEFGENERIC TEST-MC71-6 (X &OPTIONAL Y &REST Z) (:METHOD-COMBINATION MC71 "xyz") (:METHOD (X &OPTIONAL Y &REST Z) (LIST* X Y Z))) (LIST (TEST-MC71-6 'A) (TEST-MC71-6 'A 'B) (TEST-MC71-6 'A 'B 'C))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL NIL (A NIL)) ("xyz" "def" RESULT B DEF2 T NIL (A B)) ("xyz" "def" RESULT B DEF2 T NIL (A B C))) (PROGN (DEFGENERIC TEST-MC71-7 (X &OPTIONAL Y Z &REST U) (:METHOD-COMBINATION MC71 "xyz") (:METHOD (X &OPTIONAL Y Z &REST U) (LIST* X Y Z U))) (LIST (TEST-MC71-7 'A) (TEST-MC71-7 'A 'B) (TEST-MC71-7 'A 'B 'C) (TEST-MC71-7 'A 'B 'C 'D))) EQUAL-OK: (("xyz" "def" RESULT DEF1 DEF2 NIL NIL (A NIL NIL)) ("xyz" "def" RESULT B DEF2 T NIL (A B NIL)) ("xyz" "def" RESULT B C T T (A B C)) ("xyz" "def" RESULT B C T T (A B C D))) (DEFINE-METHOD-COMBINATION MC72 (OPT1 &OPTIONAL (OPT2 "def")) ((ALL *)) (:ARGUMENTS A1 A2 &OPTIONAL (O1 'DEF1) (O2 'DEF2) &KEY (TEST 'EQ TEST-P) (TEST-NOT 'NEQ TEST-NOT-P)) `(LIST ',OPT1 ',OPT2 'RESULT ,A1 ,A2 ,O1 ,O2 ,TEST ,TEST-NOT ,TEST-P ,TEST-NOT-P (CALL-METHOD ,(FIRST ALL)))) EQL-OK: MC72 (PROGN (DEFGENERIC TEST-MC72-1 (X &OPTIONAL Y) (:METHOD-COMBINATION MC72 "xyz") (:METHOD (X &OPTIONAL Y) (LIST X Y))) (LIST (TEST-MC72-1 'A) (TEST-MC72-1 'A 'B))) WARNING: in TEST-MC72-1--1-1 : Mixing &OPTIONAL and &KEY in lambda list (&OPTIONAL #:G15304 &KEY (TEST 'EQ TEST-P) (TEST-NOT 'NEQ TEST-NOT-P) &ALLOW-OTHER-KEYS) is bad design EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 EQ NEQ NIL NIL (A NIL)) ("xyz" "def" RESULT A NIL B DEF2 EQ NEQ NIL NIL (A B))) (PROGN (DEFGENERIC TEST-MC72-2 (X Y Z &OPTIONAL U V W) (:METHOD-COMBINATION MC72 "xyz") (:METHOD (X Y Z &OPTIONAL U V W) (LIST X Y Z U V W))) (LIST (TEST-MC72-2 'A 'B 'C) (TEST-MC72-2 'A 'B 'C 'D) (TEST-MC72-2 'A 'B 'C 'D 'E) (TEST-MC72-2 'A 'B 'C 'D 'E 'F))) WARNING: in TEST-MC72-2--1-1 : Mixing &OPTIONAL and &KEY in lambda list (A1 A2 &OPTIONAL (O1 'DEF1) (O2 'DEF2) #:G15348 &KEY (TEST 'EQ TEST-P) (TEST-NOT 'NEQ TEST-NOT-P) &ALLOW-OTHER-KEYS) is bad design EQUAL-OK: (("xyz" "def" RESULT A B DEF1 DEF2 EQ NEQ NIL NIL (A B C NIL NIL NIL)) ("xyz" "def" RESULT A B D DEF2 EQ NEQ NIL NIL (A B C D NIL NIL)) ("xyz" "def" RESULT A B D E EQ NEQ NIL NIL (A B C D E NIL)) ("xyz" "def" RESULT A B D E EQ NEQ NIL NIL (A B C D E F))) (PROGN (DEFGENERIC TEST-MC72-3 (X &REST Y) (:METHOD-COMBINATION MC72 "xyz") (:METHOD (X &REST Y) (LIST* X Y))) (LIST (TEST-MC72-3 'A) (TEST-MC72-3 'A 'B 'C) (TEST-MC72-3 'A :TEST-NOT 'NEQUAL) (TEST-MC72-3 'A :TEST 'EQ :TEST-NOT 'NEQUAL) (TEST-MC72-3 'A :TEST-NOT 'NEQUAL :TEST 'EQL :TEST-NOT 'NEQUALP))) EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 EQ NEQ NIL NIL (A)) ("xyz" "def" RESULT A NIL DEF1 DEF2 EQ NEQ NIL NIL (A B C)) ("xyz" "def" RESULT A NIL DEF1 DEF2 EQ NEQUAL NIL T (A :TEST-NOT NEQUAL)) ("xyz" "def" RESULT A NIL DEF1 DEF2 EQ NEQUAL T T (A :TEST EQ :TEST-NOT NEQUAL)) ("xyz" "def" RESULT A NIL DEF1 DEF2 EQL NEQUAL T T (A :TEST-NOT NEQUAL :TEST EQL :TEST-NOT NEQUALP))) (PROGN (DEFGENERIC TEST-MC72-4 (X &REST Y) (:METHOD-COMBINATION MC72 "xyz") (:METHOD (X &REST Y) (LIST* X Y))) (TEST-MC72-4 'A 'B)) [SIMPLE-PROGRAM-ERROR]: TEST-MC72-4--1-1: keyword arguments in (B) should occur pairwise EQL-OK: ERROR (PROGN (DEFGENERIC TEST-MC72-5 (X Y Z &REST U) (:METHOD-COMBINATION MC72 "xyz") (:METHOD (X Y Z &REST U) (LIST* X Y Z U))) (LIST (TEST-MC72-5 'A :TEST 'EQ) (TEST-MC72-5 'A :TEST 'EQ 'D 'E) (TEST-MC72-5 'A :TEST 'EQ :TEST-NOT 'NEQUAL) (TEST-MC72-5 'A :TEST 'EQ :TEST 'EQ :TEST-NOT 'NEQUAL) (TEST-MC72-5 'A :TEST 'EQ :TEST-NOT 'NEQUAL :TEST 'EQL :TEST-NOT 'NEQUALP))) EQUAL-OK: (("xyz" "def" RESULT A :TEST DEF1 DEF2 EQ NEQ NIL NIL (A :TEST EQ)) ("xyz" "def" RESULT A :TEST DEF1 DEF2 EQ NEQ NIL NIL (A :TEST EQ D E)) ("xyz" "def" RESULT A :TEST DEF1 DEF2 EQ NEQUAL NIL T (A :TEST EQ :TEST-NOT NEQUAL)) ("xyz" "def" RESULT A :TEST DEF1 DEF2 EQ NEQUAL T T (A :TEST EQ :TEST EQ :TEST-NOT NEQUAL)) ("xyz" "def" RESULT A :TEST DEF1 DEF2 EQL NEQUAL T T (A :TEST EQ :TEST-NOT NEQUAL :TEST EQL :TEST-NOT NEQUALP))) (PROGN (DEFGENERIC TEST-MC72-6 (X &OPTIONAL Y Z U &REST V) (:METHOD-COMBINATION MC72 "xyz") (:METHOD (X &OPTIONAL Y Z U &REST V) (LIST* X Y Z U V))) (LIST (TEST-MC72-6 'A) (TEST-MC72-6 'A 'B 'C) (TEST-MC72-6 'A :TEST 'EQ 'D :TEST-NOT 'NEQUAL) (TEST-MC72-6 'A :TEST 'EQ 'D :TEST 'EQ :TEST-NOT 'NEQUAL) (TEST-MC72-6 'A :TEST 'EQ 'D :TEST-NOT 'NEQUAL :TEST 'EQL :TEST-NOT 'NEQUALP))) WARNING: in TEST-MC72-6--1-1 : Mixing &OPTIONAL and &KEY in lambda list (A1 A2 &OPTIONAL (O1 'DEF1) (O2 'DEF2) #:G15488 &KEY (TEST 'EQ TEST-P) (TEST-NOT 'NEQ TEST-NOT-P) &ALLOW-OTHER-KEYS) is bad design EQUAL-OK: (("xyz" "def" RESULT A NIL DEF1 DEF2 EQ NEQ NIL NIL (A NIL NIL NIL)) ("xyz" "def" RESULT A NIL B C EQ NEQ NIL NIL (A B C NIL)) ("xyz" "def" RESULT A NIL :TEST EQ EQ NEQUAL NIL T (A :TEST EQ D :TEST-NOT NEQUAL)) ("xyz" "def" RESULT A NIL :TEST EQ EQ NEQUAL T T (A :TEST EQ D :TEST EQ :TEST-NOT NEQUAL)) ("xyz" "def" RESULT A NIL :TEST EQ EQL NEQUAL T T (A :TEST EQ D :TEST-NOT NEQUAL :TEST EQL :TEST-NOT NEQUALP))) (PROGN (DEFUN PROMPT-FOR-NEW-VALUES NIL (FORMAT *DEBUG-IO* "~&New values: ") (LIST (READ *DEBUG-IO*))) (DEFUN ADD-METHOD-RESTARTS (FORM METHOD) (LET ((BLOCK (GENSYM)) (TAG (GENSYM))) `(BLOCK ,BLOCK (TAGBODY ,TAG (RETURN-FROM ,BLOCK (RESTART-CASE ,FORM (METHOD-REDO NIL :REPORT (LAMBDA (STREAM) (FORMAT STREAM "Try calling ~S again." ,METHOD)) (GO ,TAG)) (METHOD-RETURN (L) :REPORT (LAMBDA (STREAM) (FORMAT STREAM "Specify return values for ~S call." ,METHOD)) :INTERACTIVE (LAMBDA NIL (PROMPT-FOR-NEW-VALUES)) (RETURN-FROM ,BLOCK (VALUES-LIST L))))))))) (DEFUN CONVERT-EFFECTIVE-METHOD (EFM) (IF (CONSP EFM) (IF (EQ (CAR EFM) 'CALL-METHOD) (LET ((METHOD-LIST (THIRD EFM))) (IF (OR (TYPEP (FIRST METHOD-LIST) 'METHOD) (REST METHOD-LIST)) (CONVERT-EFFECTIVE-METHOD `(CALL-METHOD ,(SECOND EFM) ((MAKE-METHOD (CALL-METHOD ,(FIRST METHOD-LIST) ,(REST METHOD-LIST)))))) (IF (TYPEP (SECOND EFM) 'METHOD) (ADD-METHOD-RESTARTS (CONS (CONVERT-EFFECTIVE-METHOD (CAR EFM)) (CONVERT-EFFECTIVE-METHOD (CDR EFM))) (SECOND EFM)) (CONS (CONVERT-EFFECTIVE-METHOD (CAR EFM)) (CONVERT-EFFECTIVE-METHOD (CDR EFM)))))) (CONS (CONVERT-EFFECTIVE-METHOD (CAR EFM)) (CONVERT-EFFECTIVE-METHOD (CDR EFM)))) EFM)) (DEFINE-METHOD-COMBINATION STANDARD-WITH-RESTARTS NIL ((AROUND (:AROUND)) (BEFORE (:BEFORE)) (PRIMARY NIL :REQUIRED T) (AFTER (:AFTER))) (FLET ((CALL-METHODS-SEQUENTIALLY (METHODS) (MAPCAR #'(LAMBDA (METHOD) `(CALL-METHOD ,METHOD)) METHODS))) (LET ((FORM (IF (OR BEFORE AFTER (REST PRIMARY)) `(MULTIPLE-VALUE-PROG1 (PROGN ,@(CALL-METHODS-SEQUENTIALLY BEFORE) (CALL-METHOD ,(FIRST PRIMARY) ,(REST PRIMARY))) ,@(CALL-METHODS-SEQUENTIALLY (REVERSE AFTER))) `(CALL-METHOD ,(FIRST PRIMARY))))) (WHEN AROUND (SETQ FORM `(CALL-METHOD ,(FIRST AROUND) (,@(REST AROUND) (MAKE-METHOD ,FORM))))) (CONVERT-EFFECTIVE-METHOD FORM)))) (DEFGENERIC TESTGF16 (X) (:METHOD-COMBINATION STANDARD-WITH-RESTARTS)) (DEFCLASS TESTCLASS16A NIL NIL) (DEFCLASS TESTCLASS16B (TESTCLASS16A) NIL) (DEFCLASS TESTCLASS16C (TESTCLASS16A) NIL) (DEFCLASS TESTCLASS16D (TESTCLASS16B TESTCLASS16C) NIL) (DEFMETHOD TESTGF16 ((X TESTCLASS16A)) (LIST 'A (NOT (NULL (FIND-RESTART 'METHOD-REDO))) (NOT (NULL (FIND-RESTART 'METHOD-RETURN))))) (DEFMETHOD TESTGF16 ((X TESTCLASS16B)) (CONS 'B (CALL-NEXT-METHOD))) (DEFMETHOD TESTGF16 ((X TESTCLASS16C)) (CONS 'C (CALL-NEXT-METHOD))) (DEFMETHOD TESTGF16 ((X TESTCLASS16D)) (CONS 'D (CALL-NEXT-METHOD))) (TESTGF16 (MAKE-INSTANCE 'TESTCLASS16D))) EQUAL-OK: (D B C A T T) (PROGN (DEFCLASS USER-METHOD (STANDARD-METHOD) (MYSLOT)) T) EQL-OK: T (DEFMACRO DEF-USER-METHOD (NAME &REST REST) (LET* ((LAMBDALIST-POSITION (POSITION-IF #'LISTP REST)) (QUALIFIERS (SUBSEQ REST 0 LAMBDALIST-POSITION)) (LAMBDALIST (ELT REST LAMBDALIST-POSITION)) (BODY (SUBSEQ REST (+ LAMBDALIST-POSITION 1))) (REQUIRED-PART (SUBSEQ LAMBDALIST 0 (OR (POSITION-IF #'(LAMBDA (X) (MEMBER X LAMBDA-LIST-KEYWORDS)) LAMBDALIST) (LENGTH LAMBDALIST)))) (SPECIALIZERS (MAPCAR #'FIND-CLASS (MAPCAR #'(LAMBDA (X) (IF (CONSP X) (SECOND X) 'T)) REQUIRED-PART))) (UNSPECIALIZED-REQUIRED-PART (MAPCAR #'(LAMBDA (X) (IF (CONSP X) (FIRST X) X)) REQUIRED-PART)) (UNSPECIALIZED-LAMBDALIST (APPEND UNSPECIALIZED-REQUIRED-PART (SUBSEQ LAMBDALIST (LENGTH REQUIRED-PART))))) `(PROGN (ADD-METHOD #',NAME (MAKE-INSTANCE 'USER-METHOD :QUALIFIERS ',QUALIFIERS :LAMBDA-LIST ',UNSPECIALIZED-LAMBDALIST :SPECIALIZERS ',SPECIALIZERS :FUNCTION #'(LAMBDA (ARGUMENTS NEXT-METHODS-LIST) (FLET ((NEXT-METHOD-P NIL NEXT-METHODS-LIST) (CALL-NEXT-METHOD (&REST NEW-ARGUMENTS) (UNLESS NEW-ARGUMENTS (SETQ NEW-ARGUMENTS ARGUMENTS)) (IF (NULL NEXT-METHODS-LIST) (ERROR "no next method for arguments ~:S" ARGUMENTS) (FUNCALL (METHOD-FUNCTION (FIRST NEXT-METHODS-LIST)) NEW-ARGUMENTS (REST NEXT-METHODS-LIST))))) (APPLY #'(LAMBDA ,UNSPECIALIZED-LAMBDALIST ,@BODY) ARGUMENTS))))) ',NAME))) EQL-OK: DEF-USER-METHOD (PROGN (DEFGENERIC TEST-UM01 (X Y)) (DEF-USER-METHOD TEST-UM01 ((X SYMBOL) (Y SYMBOL)) (LIST X Y (NEXT-METHOD-P))) (TEST-UM01 'A 'B)) EQUAL-OK: (A B NIL) (PROGN (DEFGENERIC TEST-UM02 (X)) (DEF-USER-METHOD TEST-UM02 ((X INTEGER)) (LIST* 'INTEGER X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEFMETHOD TEST-UM02 ((X RATIONAL)) (LIST* 'RATIONAL X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEFMETHOD TEST-UM02 ((X REAL)) (LIST 'REAL X (NOT (NULL (NEXT-METHOD-P))))) (TEST-UM02 17)) EQUAL-OK: (INTEGER 17 T RATIONAL 17 T REAL 17 NIL) (PROGN (DEFGENERIC TEST-UM03 (X)) (DEFMETHOD TEST-UM03 ((X INTEGER)) (LIST* 'INTEGER X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEF-USER-METHOD TEST-UM03 ((X RATIONAL)) (LIST* 'RATIONAL X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEFMETHOD TEST-UM03 ((X REAL)) (LIST 'REAL X (NOT (NULL (NEXT-METHOD-P))))) (TEST-UM03 17)) EQUAL-OK: (INTEGER 17 T RATIONAL 17 T REAL 17 NIL) (PROGN (DEFGENERIC TEST-UM04 (X)) (DEFMETHOD TEST-UM04 ((X INTEGER)) (LIST* 'INTEGER X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEFMETHOD TEST-UM04 ((X RATIONAL)) (LIST* 'RATIONAL X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEF-USER-METHOD TEST-UM04 ((X REAL)) (LIST 'REAL X (NOT (NULL (NEXT-METHOD-P))))) (TEST-UM04 17)) EQUAL-OK: (INTEGER 17 T RATIONAL 17 T REAL 17 NIL) (LET ((RESULTS NIL)) (DEFGENERIC TEST-UM05 (X)) (DEFMETHOD TEST-UM05 (X) (PUSH 'PRIMARY RESULTS) (PUSH X RESULTS)) (DEF-USER-METHOD TEST-UM05 :BEFORE ((X INTEGER)) (PUSH 'BEFORE-INTEGER RESULTS) (PUSH X RESULTS)) (DEFMETHOD TEST-UM05 :BEFORE ((X REAL)) (PUSH 'BEFORE-REAL RESULTS) (PUSH X RESULTS)) (TEST-UM05 17) (NREVERSE RESULTS)) EQUAL-OK: (BEFORE-INTEGER 17 BEFORE-REAL 17 PRIMARY 17) (LET ((RESULTS NIL)) (DEFGENERIC TEST-UM06 (X)) (DEFMETHOD TEST-UM06 (X) (PUSH 'PRIMARY RESULTS) (PUSH X RESULTS)) (DEFMETHOD TEST-UM06 :BEFORE ((X INTEGER)) (PUSH 'BEFORE-INTEGER RESULTS) (PUSH X RESULTS)) (DEF-USER-METHOD TEST-UM06 :BEFORE ((X REAL)) (PUSH 'BEFORE-REAL RESULTS) (PUSH X RESULTS)) (TEST-UM06 17) (NREVERSE RESULTS)) EQUAL-OK: (BEFORE-INTEGER 17 BEFORE-REAL 17 PRIMARY 17) (LET ((RESULTS NIL)) (DEFGENERIC TEST-UM07 (X)) (DEFMETHOD TEST-UM07 (X) (PUSH 'PRIMARY RESULTS) (PUSH X RESULTS)) (DEFMETHOD TEST-UM07 :AFTER ((X INTEGER)) (PUSH 'AFTER-INTEGER RESULTS) (PUSH X RESULTS)) (DEF-USER-METHOD TEST-UM07 :AFTER ((X REAL)) (PUSH 'AFTER-REAL RESULTS) (PUSH X RESULTS)) (TEST-UM07 17) (NREVERSE RESULTS)) EQUAL-OK: (PRIMARY 17 AFTER-REAL 17 AFTER-INTEGER 17) (LET ((RESULTS NIL)) (DEFGENERIC TEST-UM08 (X)) (DEFMETHOD TEST-UM08 (X) (PUSH 'PRIMARY RESULTS) (PUSH X RESULTS)) (DEF-USER-METHOD TEST-UM08 :AFTER ((X INTEGER)) (PUSH 'AFTER-INTEGER RESULTS) (PUSH X RESULTS)) (DEFMETHOD TEST-UM08 :AFTER ((X REAL)) (PUSH 'AFTER-REAL RESULTS) (PUSH X RESULTS)) (TEST-UM08 17) (NREVERSE RESULTS)) EQUAL-OK: (PRIMARY 17 AFTER-REAL 17 AFTER-INTEGER 17) (PROGN (DEFGENERIC TEST-UM10 (X)) (DEFMETHOD TEST-UM10 ((X INTEGER)) (LIST* 'INTEGER X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEFMETHOD TEST-UM10 ((X RATIONAL)) (LIST* 'RATIONAL X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEFMETHOD TEST-UM10 ((X REAL)) (LIST 'REAL X (NOT (NULL (NEXT-METHOD-P))))) (DEFMETHOD TEST-UM10 :AFTER ((X REAL))) (DEF-USER-METHOD TEST-UM10 :AROUND ((X INTEGER)) (LIST* 'AROUND-INTEGER X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEFMETHOD TEST-UM10 :AROUND ((X RATIONAL)) (LIST* 'AROUND-RATIONAL X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEFMETHOD TEST-UM10 :AROUND ((X REAL)) (LIST* 'AROUND-REAL X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (TEST-UM10 17)) EQUAL-OK: (AROUND-INTEGER 17 T AROUND-RATIONAL 17 T AROUND-REAL 17 T INTEGER 17 T RATIONAL 17 T REAL 17 NIL) (PROGN (DEFGENERIC TEST-UM11 (X)) (DEFMETHOD TEST-UM11 ((X INTEGER)) (LIST* 'INTEGER X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEFMETHOD TEST-UM11 ((X RATIONAL)) (LIST* 'RATIONAL X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEFMETHOD TEST-UM11 ((X REAL)) (LIST 'REAL X (NOT (NULL (NEXT-METHOD-P))))) (DEFMETHOD TEST-UM11 :AFTER ((X REAL))) (DEFMETHOD TEST-UM11 :AROUND ((X INTEGER)) (LIST* 'AROUND-INTEGER X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEF-USER-METHOD TEST-UM11 :AROUND ((X RATIONAL)) (LIST* 'AROUND-RATIONAL X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEFMETHOD TEST-UM11 :AROUND ((X REAL)) (LIST* 'AROUND-REAL X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (TEST-UM11 17)) EQUAL-OK: (AROUND-INTEGER 17 T AROUND-RATIONAL 17 T AROUND-REAL 17 T INTEGER 17 T RATIONAL 17 T REAL 17 NIL) (PROGN (DEFGENERIC TEST-UM12 (X)) (DEFMETHOD TEST-UM12 ((X INTEGER)) (LIST* 'INTEGER X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEFMETHOD TEST-UM12 ((X RATIONAL)) (LIST* 'RATIONAL X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEFMETHOD TEST-UM12 ((X REAL)) (LIST 'REAL X (NOT (NULL (NEXT-METHOD-P))))) (DEFMETHOD TEST-UM12 :AFTER ((X REAL))) (DEFMETHOD TEST-UM12 :AROUND ((X INTEGER)) (LIST* 'AROUND-INTEGER X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEFMETHOD TEST-UM12 :AROUND ((X RATIONAL)) (LIST* 'AROUND-RATIONAL X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEF-USER-METHOD TEST-UM12 :AROUND ((X REAL)) (LIST* 'AROUND-REAL X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (TEST-UM12 17)) EQUAL-OK: (AROUND-INTEGER 17 T AROUND-RATIONAL 17 T AROUND-REAL 17 T INTEGER 17 T RATIONAL 17 T REAL 17 NIL) (PROGN (DEFGENERIC TEST-UM13 (X)) (DEFMETHOD TEST-UM13 ((X INTEGER)) (LIST* 'INTEGER X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEF-USER-METHOD TEST-UM13 ((X RATIONAL)) (LIST* 'RATIONAL X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEFMETHOD TEST-UM13 ((X REAL)) (LIST 'REAL X (NOT (NULL (NEXT-METHOD-P))))) (DEFMETHOD TEST-UM13 :AFTER ((X REAL))) (DEFMETHOD TEST-UM13 :AROUND ((X INTEGER)) (LIST* 'AROUND-INTEGER X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEF-USER-METHOD TEST-UM13 :AROUND ((X RATIONAL)) (LIST* 'AROUND-RATIONAL X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (DEFMETHOD TEST-UM13 :AROUND ((X REAL)) (LIST* 'AROUND-REAL X (NOT (NULL (NEXT-METHOD-P))) (CALL-NEXT-METHOD))) (TEST-UM13 17)) EQUAL-OK: (AROUND-INTEGER 17 T AROUND-RATIONAL 17 T AROUND-REAL 17 T INTEGER 17 T RATIONAL 17 T REAL 17 NIL) (PROGN (DEFCLASS FOO129 NIL ((X :INITARG :X))) (DEFPARAMETER *FOO129-COUNTER* 0) (DEFMETHOD INITIALIZE-INSTANCE ((INSTANCE FOO129) &REST INITARGS &KEY (X 'NIL)) (INCF *FOO129-COUNTER*) (APPLY #'CALL-NEXT-METHOD INSTANCE :X (CONS 'A X) INITARGS)) (MAKE-INSTANCE 'FOO129) *FOO129-COUNTER*) EQL-OK: 1 (PROGN (DEFCLASS FOO130 NIL ((X :INITARG :X))) (DEFPARAMETER *FOO130-COUNTER* 0) (LOCALLY (DECLARE (COMPILE)) (DEFMETHOD INITIALIZE-INSTANCE ((INSTANCE FOO130) &REST INITARGS &KEY (X 'NIL)) (INCF *FOO130-COUNTER*) (APPLY #'CALL-NEXT-METHOD INSTANCE :X (CONS 'A X) INITARGS))) (MAKE-INSTANCE 'FOO130) *FOO130-COUNTER*) EQL-OK: 1 (PROGN (SETQ *FORWARD-REFERENCED-CLASS-MISDESIGN* T) (DEFCLASS FOO131 (FORWARDCLASS01) NIL) T) WARNING: (SETF FIND-CLASS): redefining class CLASS in top-level, was defined in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-custom.fas WARNING: (SETF FIND-CLASS): redefining class FORWARD-REFERENCED-CLASS in top-level, was defined in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/clos-custom.fas EQL-OK: T (FIND-CLASS 'FORWARDCLASS01) [SIMPLE-ERROR]: FIND-CLASS: FORWARDCLASS01 does not name a class EQL-OK: ERROR (FIND-CLASS 'FORWARDCLASS01 NIL) EQL-OK: NIL (TYPEP 1 'FORWARDCLASS01) [SIMPLE-ERROR]: TYPEP: invalid type specification FORWARDCLASS01 EQL-OK: ERROR (LOCALLY (DECLARE (COMPILE)) (TYPEP 1 'FORWARDCLASS01)) [SIMPLE-ERROR]: TYPEP: invalid type specification FORWARDCLASS01 EQL-OK: ERROR (TYPE-EXPAND 'FORWARDCLASS01) [SIMPLE-ERROR]: TYPE-EXPAND: invalid type specification FORWARDCLASS01 EQL-OK: ERROR (SUBTYPEP 'FORWARDCLASS01 'T) [SIMPLE-ERROR]: SUBTYPEP: invalid type specification FORWARDCLASS01 EQL-OK: ERROR (SUBTYPEP 'NIL 'FORWARDCLASS01) [SIMPLE-ERROR]: SUBTYPEP: invalid type specification FORWARDCLASS01 EQL-OK: ERROR (SYSTEM::SUBTYPE-INTEGER 'FORWARDCLASS01) EQL-OK: NIL (SYSTEM::SUBTYPE-SEQUENCE 'FORWARDCLASS01) EQL-OK: NIL (DEFSTRUCT (FOO131A (:INCLUDE FORWARDCLASS01))) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFSTRUCT FOO131A: included structure FORWARDCLASS01 has not been defined. EQL-OK: ERROR (DEFMETHOD FOO131B ((X FORWARDCLASS01))) [SIMPLE-ERROR]: FIND-CLASS: FORWARDCLASS01 does not name a class EQL-OK: ERROR (PROGN (SETQ *FORWARD-REFERENCED-CLASS-MISDESIGN* NIL) (DEFCLASS FOO132 (FORWARDCLASS02) NIL) T) EQL-OK: T (FIND-CLASS 'FORWARDCLASS02) [SIMPLE-ERROR]: FIND-CLASS: FORWARDCLASS02 does not name a class EQL-OK: ERROR (FIND-CLASS 'FORWARDCLASS02 NIL) EQL-OK: NIL (TYPEP 1 'FORWARDCLASS02) [SIMPLE-ERROR]: TYPEP: invalid type specification FORWARDCLASS02 EQL-OK: ERROR (LOCALLY (DECLARE (COMPILE)) (TYPEP 1 'FORWARDCLASS02)) [SIMPLE-ERROR]: TYPEP: invalid type specification FORWARDCLASS02 EQL-OK: ERROR (TYPE-EXPAND 'FORWARDCLASS02) [SIMPLE-ERROR]: TYPE-EXPAND: invalid type specification FORWARDCLASS02 EQL-OK: ERROR (SUBTYPEP 'FORWARDCLASS02 'T) [SIMPLE-ERROR]: SUBTYPEP: invalid type specification FORWARDCLASS02 EQL-OK: ERROR (SUBTYPEP 'NIL 'FORWARDCLASS02) [SIMPLE-ERROR]: SUBTYPEP: invalid type specification FORWARDCLASS02 EQL-OK: ERROR (SYSTEM::SUBTYPE-INTEGER 'FORWARDCLASS02) EQL-OK: NIL (SYSTEM::SUBTYPE-SEQUENCE 'FORWARDCLASS02) EQL-OK: NIL (DEFSTRUCT (FOO132A (:INCLUDE FORWARDCLASS02))) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFSTRUCT FOO132A: included structure FORWARDCLASS02 has not been defined. EQL-OK: ERROR (DEFMETHOD FOO132B ((X FORWARDCLASS02))) [SIMPLE-ERROR]: FIND-CLASS: FORWARDCLASS02 does not name a class EQL-OK: ERROR (PROGN (DEFCLASS INCOMPLETE147 (UNDEFINED147) NIL) T) EQL-OK: T (FIND-CLASS 'UNDEFINED147) [SIMPLE-ERROR]: FIND-CLASS: UNDEFINED147 does not name a class EQL-OK: ERROR (TYPEP 42 'UNDEFINED147) [SIMPLE-ERROR]: TYPEP: invalid type specification UNDEFINED147 EQL-OK: ERROR (SUBTYPEP 'UNDEFINED147 'NUMBER) [SIMPLE-ERROR]: SUBTYPEP: invalid type specification UNDEFINED147 EQL-OK: ERROR (SUBTYPEP 'UNDEFINED147 'STANDARD-OBJECT) [SIMPLE-ERROR]: SUBTYPEP: invalid type specification UNDEFINED147 EQL-OK: ERROR (NULL (FIND-CLASS 'INCOMPLETE147)) EQL-OK: NIL (TYPEP 42 'INCOMPLETE147) EQL-OK: NIL (MULTIPLE-VALUE-LIST (SUBTYPEP 'INCOMPLETE147 'NUMBER)) EQUAL-OK: (NIL T) (MULTIPLE-VALUE-LIST (SUBTYPEP 'INCOMPLETE147 'STANDARD-OBJECT)) EQUAL-OK: (NIL T) (LET ((RET 'NIL)) (DEFCLASS MIXIN-FOO-144 NIL NIL) (DEFCLASS CLASS-FOO-144 (MIXIN-FOO-144) NIL) (DEFGENERIC FUN-144 (X)) (DEFMETHOD FUN-144 ((X CLASS-FOO-144)) (PUSH 'CLASS-FOO-144 RET)) (DEFCLASS CLASS-BAR-144 NIL NIL) (DEFMETHOD FUN-144 :AFTER ((X CLASS-BAR-144)) (PUSH 'CLASS-BAR-144-AFTER RET)) (DEFCLASS MIXIN-FOO-144 (CLASS-BAR-144) NIL) (FUN-144 (MAKE-INSTANCE 'CLASS-FOO-144)) (NREVERSE RET)) EQUAL-OK: (CLASS-FOO-144 CLASS-BAR-144-AFTER) (LET ((RET NIL)) (DEFCLASS MIXIN-FOO-145 NIL NIL) (DEFCLASS CLASS-FOO-145 (MIXIN-FOO-145) NIL) (DEFGENERIC FUN-145 (X)) (DEFMETHOD FUN-145 ((X CLASS-FOO-145)) (PUSH 'CLASS-FOO-145 RET)) (DEFCLASS CLASS-BAR-145 NIL NIL) (DEFMETHOD FUN-145 :AFTER ((X CLASS-BAR-145)) (PUSH 'CLASS-BAR-145-AFTER RET)) (LET ((INST (MAKE-INSTANCE 'CLASS-FOO-145))) (FUN-145 INST) (SETQ RET 'NIL) (DEFCLASS MIXIN-FOO-145 (CLASS-BAR-145) NIL) (FUN-145 INST) (NREVERSE RET))) WARNING: DEFCLASS: Class CLASS-FOO-145 (or one of its ancestors) is being redefined, instances are obsolete EQUAL-OK: (CLASS-FOO-145 CLASS-BAR-145-AFTER) (PROGN (DEFCLASS FOO146 NIL (SLOT1)) (MAKE-INSTANCE 'FOO146) (DEFCLASS FOO146 NIL ((SLOT1 :INITARG :FOO))) (MAKE-INSTANCE 'FOO146 :FOO 'ANY) T) WARNING: DEFCLASS: Class FOO146 (or one of its ancestors) is being redefined, instances are obsolete EQL-OK: T (PROGN (DEFCLASS FOO147 NIL (SLOT1)) (DEFCLASS FOOSUB147 (FOO147) (SLOT2)) (MAKE-INSTANCE 'FOOSUB147) (DEFCLASS FOO147 NIL ((SLOT1 :INITARG :FOO))) (MAKE-INSTANCE 'FOOSUB147 :FOO 'ANY) T) WARNING: DEFCLASS: Class FOOSUB147 (or one of its ancestors) is being redefined, instances are obsolete EQL-OK: T (PROGN (DEFGENERIC FOO148 (OBJECT) (:METHOD ((X LIST)) (DECLARE (IGNORE X)) 'LIST) (:METHOD ((X ARRAY)) (DECLARE (IGNORE X)) 'ARRAY) (:METHOD ((X SEQUENCE)) (DECLARE (IGNORE X)) 'SEQUENCE)) (FOO148 '(1 2 3))) EQL-OK: LIST (PROGN (LOAD (MAKE-PATHNAME :NAME "listeners" :TYPE NIL :DEFAULTS *RUN-TEST-TRUENAME*)) (WITH-OPEN-STREAM (S1 (MAKE-STRING-INPUT-STREAM "(")) (WITH-OPEN-STREAM (S2 (MAKE-STRING-INPUT-STREAM "())")) (WITH-OPEN-STREAM (L (MAKE-INSTANCE 'LISTENER-INPUT-STREAM :STREAM S2)) (WITH-OPEN-STREAM (C (MAKE-CONCATENATED-STREAM S1 L)) (READ C)))))) ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/tests/listeners.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/tests/listeners.lisp EQUAL-OK: (NIL) (MAKE-INSTANCE (MAKE-INSTANCE 'STANDARD-CLASS :NAME 3)) [SIMPLE-SOURCE-PROGRAM-ERROR]: (SETF CLASS-NAME): 3 is not a symbol EQL-OK: ERROR (SYMBOLS-CLEANUP '( FOO A B C F G *HL* HGEN H TESTGF00 FOO136 SUBCLASSP MLF-TESTER MLF-KILL TEST-CLASS1 TEST-CLASS2 *T-LIST* *TMP-FILE* *FOO* BAR-CONST POS TREE-WITH-PARENT *INITFORM-EXECUTED-COUNTER* FOO64A FOO64B FOO64C FOO64D ABSTRACT-POSITION X-Y-POSITION RHO-THETA-POSITION C0 C1 C2 C3 C4 C7 C8 FOO60-A FOO60-B FOO61-A FOO62-A FOO62-B FOO62-C FOO63-A FOO63-B FOO63-C FOO65A FOO65B FOO65C POSITION-X POSITION-Y FOO70 FOO71 FOO72 FOO73 FOO74 FOO75 FOO76 FOO77 FOO80A FOO80B FOO81A FOO81B FOO82A FOO82B FOO83A FOO83B FOO84A FOO84B FOO85A FOO85B FOO86A FOO86B FOO87A FOO87B FOO88A FOO88B FOO88C FOO89A FOO89B FOO89C FOO90A FOO90B FOO90C FOO91A FOO91B FOO91C FOO92A FOO92B FOO93A FOO93B FOO94 FOO95B FOO96A FOO96B FOO97A FOO97B FOO100 FOO101A FOO101B FOO102A FOO102B FOO102C FOO103A FOO103B FOO103C FOO104A FOO104B FOO104C FOO105A FOO105B FOO105C FOO106A FOO106B FOO106C FOO107A FOO107B FOO108A FOO108B FOO109 FOO116 FOO117 FOO118 FOO119 FOO120 FOO121 FOO122 FOO123 FOO124 FOO125 TESTCLASS31A TESTCLASS31B TESTCLASS31C TESTGF37 TESTCLASS40A TESTCLASS40B TESTCLASS40C TESTGF40 TESTCLASS41A TESTCLASS41B TESTCLASS41C TESTGF41 TESTCLASS42A TESTCLASS42B TESTCLASS42C TESTGF42 TESTCLASS45A TESTCLASS45B TESTCLASS45C TESTGF45 TESTCLASS46A TESTCLASS46B TESTCLASS46C TESTGF46 TESTCLASS47A TESTCLASS47B TESTCLASS47C TESTGF47 TESTCLASS48A TESTCLASS48B TESTCLASS48C TESTGF48 TESTCLASS49A TESTCLASS49B TESTCLASS49C TESTGF49 TESTCLASS50A TESTCLASS50B TESTCLASS50C TESTGF50 CLASS-0203 CLASS-0204 CLASS-0206A CLASS-0206B REINIT-CLASS-01 FOO126 FOO127 NO-APP-METH-GF-01 NO-APP-METH-GF-02 NO-APP-METH-GF-03 NO-PRIM-METH-GF-01 NO-PRIM-METH-GF-02 NO-PRIM-METH-GF-03 TEST-MC-STANDARD TEST-MC-STANDARD-BAD-QUALIFIERS TEST-MC-STANDARD-BAD1 TEST-MC-STANDARD-BAD2 TEST-MC-STANDARD-BAD3 TEST-MC-STANDARD-BAD4 TEST-MC-PROGN TEST-MC-APPEND-1 TEST-MC-APPEND-2 TEST-MC-APPEND-3 MC01 MC02 MC03 MC04 MC05 TEST-MC05-1 TEST-MC05-2 TEST-MC05-3 TEST-MC05-4 TEST-MC05-5 TEST-MC05-6 MC06 TEST-MC06-1 POSITIVE-INTEGER-QUALIFIER-P EXAMPLE-METHOD-COMBINATION MC-TEST-PIQ W-ARGS MC-TEST-W-ARGS MC11 MC12 MC13 MC14 MC15 MC16 MC17 MC18 MC19 MC20 MC21 MC22 MC23 MC24 MC25 TEST-MC25 MC26 TEST-MC26 MC27 TEST-MC27 MC28 TEST-MC28 MC29 TEST-MC29 MC50 TEST-MC50-1 TEST-MC50-2 TEST-MC50-3 MC51 TEST-MC51-1 TEST-MC51-2 TEST-MC51-3 TEST-MC51-4 TEST-MC51-5 MC60 TEST-MC60-1 TEST-MC60-2 TEST-MC60-3 TEST-MC60-4 MC61 TEST-MC61-1 TEST-MC61-2 TEST-MC61-3 TEST-MC61-4 TEST-MC61-5 TEST-MC61-6 TEST-MC61-7 TEST-MC61-8 TEST-MC61-9 MC62 TEST-MC62-1 TEST-MC62-2 TEST-MC62-3 TEST-MC62-4 TEST-MC62-5 TEST-MC62-6 TEST-MC62-7 MC63 TEST-MC63-1 TEST-MC63-2 TEST-MC63-3 TEST-MC63-4 MC64 TEST-MC64-1 TEST-MC64-2 TEST-MC64-3 TEST-MC64-4 TEST-MC64-5 TEST-MC64-6 TEST-MC64-7 TEST-MC64-8 TEST-MC64-9 TEST-MC64-10 TEST-MC64-11 TEST-MC64-12 TEST-MC64-13 TEST-MC64-14 TEST-MC64-15 TEST-MC64-16 TEST-MC64-17 TEST-MC64-18 TEST-MC64-19 MC65 TEST-MC65-1 TEST-MC65-2 TEST-MC65-3 TEST-MC65-4 TEST-MC65-5 TEST-MC65-6 TEST-MC65-7 TEST-MC65-8 TEST-MC65-9 TEST-MC65-10 TEST-MC65-11 TEST-MC65-12 TEST-MC65-13 TEST-MC65-14 TEST-MC65-15 TEST-MC65-16 TEST-MC65-17 TEST-MC65-18 TEST-MC65-19 MC66 TEST-MC66-1 TEST-MC66-2 TEST-MC66-3 TEST-MC66-4 TEST-MC66-5 TEST-MC66-6 TEST-MC66-7 TEST-MC66-8 TEST-MC66-9 TEST-MC66-10 TEST-MC66-11 TEST-MC66-12 TEST-MC66-13 TEST-MC66-14 TEST-MC66-15 TEST-MC66-16 TEST-MC66-17 TEST-MC66-18 TEST-MC66-19 MC67 TEST-MC67-1 TEST-MC67-2 TEST-MC67-3 TEST-MC67-4 TEST-MC67-5 TEST-MC67-6 TEST-MC67-7 TEST-MC67-8 TEST-MC67-9 TEST-MC67-10 TEST-MC67-11 TEST-MC67-12 TEST-MC67-13 TEST-MC67-14 TEST-MC67-15 TEST-MC67-16 TEST-MC67-17 TEST-MC67-18 TEST-MC67-19 MC68 TEST-MC68-1 TEST-MC68-2 TEST-MC68-3 TEST-MC68-4 TEST-MC68-5 TEST-MC68-6 MC69 TEST-MC69-1 TEST-MC69-2 TEST-MC69-3 TEST-MC69-4 TEST-MC69-5 TEST-MC69-6 TEST-MC69-7 TEST-MC69-8 TEST-MC69-9 TEST-MC69-10 TEST-MC69-11 TEST-MC69-12 TEST-MC69-13 TEST-MC69-14 TEST-MC69-15 TEST-MC69-16 TEST-MC69-17 TEST-MC69-18 TEST-MC69-19 MC70 TEST-MC70-1 TEST-MC70-2 TEST-MC70-3 TEST-MC70-4 TEST-MC70-5 TEST-MC70-6 TEST-MC70-7 TEST-MC70-8 TEST-MC70-9 TEST-MC70-10 TEST-MC70-11 TEST-MC70-12 TEST-MC70-13 TEST-MC70-14 TEST-MC70-15 TEST-MC70-16 TEST-MC70-17 TEST-MC70-18 TEST-MC70-19 MC71 TEST-MC71-1 TEST-MC71-2 TEST-MC71-3 TEST-MC71-4 TEST-MC71-5 TEST-MC71-6 TEST-MC71-7 MC72 TEST-MC72-1 TEST-MC72-2 TEST-MC72-3 TEST-MC72-4 TEST-MC72-5 TEST-MC72-6 PROMPT-FOR-NEW-VALUES ADD-METHOD-RESTARTS CONVERT-EFFECTIVE-METHOD STANDARD-WITH-RESTARTS TESTGF16 TESTCLASS16A TESTCLASS16B TESTCLASS16C TESTCLASS16D USER-METHOD DEF-USER-METHOD TEST-UM01 TEST-UM02 TEST-UM03 TEST-UM04 TEST-UM05 TEST-UM06 TEST-UM07 TEST-UM08 TEST-UM10 TEST-UM11 TEST-UM12 TEST-UM13 FOO128 FOO129 *FOO129-COUNTER* FOO130 *FOO130-COUNTER* FOO131 FOO131A FOO131B FOO132 FOO132A FOO132B INCOMPLETE147 MIXIN-FOO-144 CLASS-FOO-144 FUN-144 CLASS-BAR-144 MIXIN-FOO-145 CLASS-FOO-145 FUN-145 CLASS-BAR-145 FOO146 FOO147 FOOSUB147 FOO148)) WARNING: (SETF FIND-CLASS): redefining class FOO in top-level, was defined in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/clos-tst.fas EQL-OK: NIL RUN-TEST: finished "clos" (0 errors out of 496 tests) RUN-TEST: started # (DEFINE-HASH-TABLE-TEST STRING-EQ STRING= SXHASH) EQL-OK: STRING-EQ (LET ((H (MAKE-HASH-TABLE :TEST 'STRING-EQ))) (LIST (SETF (GETHASH "foo" H) 10) (GETHASH "zot" H) (GETHASH "foo" H) (GETHASH "FOO" H))) EQUAL-OK: (10 NIL 10 NIL) (LET ((H (MAKE-HASH-TABLE :TEST '(STRING= . SXHASH)))) (LIST (SETF (GETHASH "foo" H) 10) (GETHASH "zot" H) (GETHASH "foo" H) (GETHASH "FOO" H))) EQUAL-OK: (10 NIL 10 NIL) (LET ((H (MAKE-HASH-TABLE :TEST `(,(LAMBDA (A B) (PRINT (LIST '= A B)) (= A B)) . ,(LAMBDA (X) (LET ((Z (SXHASH (COERCE X 'DOUBLE-FLOAT)))) (PRINT (LIST X Z)) Z)))))) (LIST (SETF (GETHASH 100 H) "foo") (GETHASH 10 H) (SETF (GETHASH 10 H) "bar") (GETHASH 100 H) (GETHASH 100.0d0 H) (GETHASH 10.0 H))) (100 1079574528) (10 1076101120) (10 1076101120) (10 1076101120) (100 1079574528) (100 1079574528) (= 100 100) (100.0d0 1079574528) (= 100 100.0d0) (10.0 1076101120) (= 10 10.0) EQUAL-OK: ("foo" NIL "bar" "foo" "foo" "bar") (LET ((H (MAKE-HASH-TABLE :TEST `(= . ,(LAMBDA (X) (SXHASH (COERCE X 'SHORT-FLOAT))))))) (LOOP :FOR I :FROM 0 :TO 1000 :DO (SETF (GETHASH I H) (FORMAT NIL "~r" I))) (LOOP :FOR I :FROM 0 :TO 1000 :UNLESS (STRING= (GETHASH (FLOAT I 1.0d0) H) (GETHASH (FLOAT I 1.0s0) H)) :COLLECT I)) EQL-OK: NIL (LET ((H (MAKE-HASH-TABLE :TEST `(,(LAMBDA (A B) (LIST (LIST '= A B)) (= A B)) . ,(LAMBDA (X) (LET ((Z (SXHASH (COERCE X 'DOUBLE-FLOAT)))) (LIST `((HASH ,X) => ,Z)) Z)))))) (LOOP :FOR I :FROM 0 :TO 1000 :DO (SETF (GETHASH I H) (FORMAT NIL "~r" I))) (LOOP :FOR I :FROM 0 :TO 1000 :UNLESS (STRING= (GETHASH (FLOAT I 1.0d0) H) (GETHASH (FLOAT I 1.0s0) H)) :COLLECT I)) EQL-OK: NIL RUN-TEST: finished "defhash" (0 errors out of 6 tests) RUN-TEST: started # (STRING= (CONVERT-STRING-FROM-BYTES '#(0 65 0 13) CHARSET:UCS-2) (MAP 'STRING #'CODE-CHAR '(65 13))) EQL-OK: T (CONVERT-STRING-FROM-BYTES '#(0 65 0) (MAKE-ENCODING :CHARSET CHARSET:UCS-2 :INPUT-ERROR-ACTION :ERROR)) [SIMPLE-CHARSET-TYPE-ERROR]: CONVERT-STRING-FROM-BYTES: Incomplete byte sequence at end of buffer for CHARSET:UNICODE-16-BIG-ENDIAN EQL-OK: ERROR (CONVERT-STRING-FROM-BYTES '#(0 65 0) (MAKE-ENCODING :CHARSET CHARSET:UCS-2 :INPUT-ERROR-ACTION #\Z)) EQUAL-OK: "AZ" (STRING= (CONVERT-STRING-FROM-BYTES '#(0 0 0 65 0 0 0 13) CHARSET:UCS-4) (MAP 'STRING #'CODE-CHAR '(65 13))) EQL-OK: T (CONVERT-STRING-FROM-BYTES '#(0 0 0 65 0 0) (MAKE-ENCODING :CHARSET CHARSET:UCS-4 :INPUT-ERROR-ACTION :ERROR)) [SIMPLE-CHARSET-TYPE-ERROR]: CONVERT-STRING-FROM-BYTES: Incomplete byte sequence at end of buffer for CHARSET:UNICODE-32-BIG-ENDIAN EQL-OK: ERROR (CONVERT-STRING-FROM-BYTES '#(0 0 0 65 0 0 0) (MAKE-ENCODING :CHARSET CHARSET:UCS-4 :INPUT-ERROR-ACTION #\Z)) EQUAL-OK: "AZ" (DEFPARAMETER *NO-ICONV-P* (WITH-IGNORED-ERRORS (NOT (MAKE-ENCODING :CHARSET "utf-16")))) EQL-OK: *NO-ICONV-P* (IF *NO-ICONV-P* T (STRING= (CONVERT-STRING-FROM-BYTES '#(255 254 65 0 13 0) (MAKE-ENCODING :CHARSET "utf-16")) (MAP 'STRING #'CODE-CHAR '(65 13)))) EQL-OK: T (CONVERT-STRING-FROM-BYTES '#(255 254 65 0 13) (MAKE-ENCODING :CHARSET "utf-16" :INPUT-ERROR-ACTION :ERROR)) [OS-ERROR]: OS-ERROR(84): Invalid or incomplete multibyte or wide character EQL-OK: ERROR (IF *NO-ICONV-P* "AZ" (CONVERT-STRING-FROM-BYTES '#(255 254 65 0 13) (MAKE-ENCODING :CHARSET "utf-16" :INPUT-ERROR-ACTION #\Z))) EQUAL-OK: "AZ" (IF *NO-ICONV-P* #(65) (CONVERT-STRING-TO-BYTES (MAP 'STRING #'CODE-CHAR '(129 65)) (MAKE-ENCODING :CHARSET "cp1252" :OUTPUT-ERROR-ACTION :IGNORE))) EQUALP-OK: #(65) (LET ((Z (COERCE #(97 98 99) '(VECTOR (UNSIGNED-BYTE 8))))) (LIST (CONVERT-STRING-FROM-BYTES Z CHARSET:ASCII :START 0 :END 2) (CONVERT-STRING-FROM-BYTES Z CHARSET:ASCII :START 0 :END 3) (CONVERT-STRING-FROM-BYTES Z CHARSET:ASCII :START 1 :END 3) (CONVERT-STRING-FROM-BYTES Z CHARSET:ASCII :START 1 :END 2))) EQUAL-OK: ("ab" "abc" "bc" "b") (LET ((Z "abc")) (LIST (CONVERT-STRING-TO-BYTES Z CHARSET:ASCII :START 0 :END 2) (CONVERT-STRING-TO-BYTES Z CHARSET:ASCII :START 0 :END 3) (CONVERT-STRING-TO-BYTES Z CHARSET:ASCII :START 1 :END 3) (CONVERT-STRING-TO-BYTES Z CHARSET:ASCII :START 1 :END 2))) EQUALP-OK: (#(97 98) #(97 98 99) #(98 99) #(98)) (LET ((VEC (MAKE-ARRAY 1000 :ADJUSTABLE T :FILL-POINTER 0 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)))) (MAP-INTO VEC 'IDENTITY (CONVERT-STRING-TO-BYTES "Hello" CHARSET:UTF-8)) (CONVERT-STRING-FROM-BYTES VEC CHARSET:UTF-8)) EQUAL-OK: "Hello" (MAPCAR (LAMBDA (S) (CONVERT-STRING-TO-BYTES (STRING (CODE-CHAR S)) CHARSET:UTF-8)) '(128 2047 2048 65533 1114111)) EQUALP-OK: (#(194 128) #(223 191) #(224 160 128) #(239 191 189) #(244 143 191 191)) (LOOP FOR I BELOW 55296 AS C = (CODE-CHAR I) AS S = (CONVERT-STRING-TO-BYTES (STRING C) CHARSET:UTF-8) AS LP = 1 THEN L AS L = (LENGTH S) ALWAYS (<= 1 LP L 4)) EQL-OK: T (LOOP FOR I FROM 57344 BELOW CHAR-CODE-LIMIT AS C = (CODE-CHAR I) AS S = (CONVERT-STRING-TO-BYTES (STRING C) CHARSET:UTF-8) AS LP = 3 THEN L AS L = (LENGTH S) ALWAYS (<= 3 LP L 4)) EQL-OK: T (LIST (SYSTEM::CHARSET-RANGE CHARSET:BASE64 #\+ #\+ 2) (SYSTEM::CHARSET-RANGE CHARSET:BASE64 #\+ #\/ 10) (SYSTEM::CHARSET-RANGE CHARSET:BASE64 #\A #\Z 2) (SYSTEM::CHARSET-RANGE CHARSET:BASE64 (CODE-CHAR 0) (CODE-CHAR 10000) 1000)) EQUAL-OK: ("++" "++//" "AZ" "++/9AZaz") (LET ((LIST NIL)) (DO-EXTERNAL-SYMBOLS (SYM (FIND-PACKAGE "CHARSET")) (PUSH (LIST SYM (ASH (LENGTH (SYSTEM::GET-CHARSET-RANGE (ENCODING-CHARSET (SYMBOL-VALUE SYM)))) -1)) LIST)) (SETQ LIST (SORT LIST #'< :KEY #'SECOND)) (FORMAT T "~& ~:D encoding~:P:~%~:{~25@A: ~5:D~%~}" (LENGTH LIST) LIST)) 117 encodings: UCS-2: 1 UCS-4: 1 JAVA: 1 UNICODE-32-BIG-ENDIAN: 1 UNICODE-16-LITTLE-ENDIAN: 1 UNICODE-16: 1 UNICODE-32-LITTLE-ENDIAN: 1 UNICODE-32: 1 UNICODE-16-BIG-ENDIAN: 1 ISO-8859-1: 1 UTF-8: 1 UTF-7: 1 ASCII: 1 UTF-16: 2 BASE64: 4 TIS-620: 4 JIS_X0201: 6 ISO-8859-9: 8 ISO-8859-5: 8 ISO-8859-6: 8 ISO-8859-8: 9 CP874-IBM: 9 CP874: 10 ARMSCII-8: 10 GB18030: 12 ISO-8859-15: 12 HP-ROMAN8: 17 CP1252: 18 ISO-8859-7: 18 WINDOWS-1252: 18 MAC-THAI: 18 GEORGIAN-ACADEMY: 21 GEORGIAN-PS: 21 CP1254: 23 CP1133: 23 CP1253: 23 WINDOWS-1253: 23 WINDOWS-1254: 23 CP1251: 24 WINDOWS-1251: 24 MAC-HEBREW: 25 ISO-8859-14: 25 VISCII: 26 ISO-8859-3: 29 MAC-DINGBAT: 30 MAC-CYRILLIC: 31 MAC-UKRAINE: 31 CP850: 31 KOI8-R: 32 CP1255: 34 CP737: 34 ISO-8859-16: 34 WINDOWS-1255: 34 CP866: 34 CP857: 35 MAC-ICELAND: 35 ISO-8859-10: 36 MAC-ARABIC: 37 CP855: 38 MAC-GREEK: 39 CP869-IBM: 40 ISO-8859-4: 40 ISO-8859-13: 40 MAC-ROMAN: 41 MACINTOSH: 41 MAC-TURKISH: 41 CP869: 42 KOI8-U: 43 CP1256: 44 WINDOWS-1256: 44 ISO-8859-2: 45 MAC-CROATIAN: 45 MAC-ROMANIA: 46 CP1257: 47 WINDOWS-1257: 47 TCVN: 52 CP1250: 55 WINDOWS-1250: 55 CP860-IBM: 57 CP862-IBM: 57 CP862: 57 CP860: 57 MAC-CENTRAL-EUROPE: 59 CP437-IBM: 59 CP437: 59 CP865: 60 CP865-IBM: 60 CP863: 60 CP1258: 61 WINDOWS-1258: 61 CP863-IBM: 62 MAC-SYMBOL: 64 CP861-IBM: 64 CP861: 64 CP775: 69 CP852: 73 CP852-IBM: 74 CP864: 82 CP864-IBM: 82 GBK: 141 CP936: 141 CP949: 3,389 JOHAB: 3,391 EUC-CN: 3,632 CP950: 3,806 BIG5: 3,806 ISO-2022-CN: 3,906 ISO-2022-JP: 4,125 SHIFT-JIS: 4,127 CP932: 4,253 EUC-JP: 4,315 BIG5-HKSCS: 4,978 ISO-2022-KR: 5,001 EUC-KR: 5,002 ISO-2022-JP-2: 5,848 ISO-2022-CN-EXT: 6,450 EUC-TW: 6,690 EQL-OK: NIL (CONVERT-STRING-FROM-BYTES #(97) CHARSET:BASE64) EQUAL-OK: "YQ==" (CONVERT-STRING-TO-BYTES "YQ==" CHARSET:BASE64) EQUALP-OK: #(97) (CONVERT-STRING-FROM-BYTES #(97 98) CHARSET:BASE64) EQUAL-OK: "YWI=" (CONVERT-STRING-TO-BYTES "YWI=" CHARSET:BASE64) EQUALP-OK: #(97 98) (CONVERT-STRING-FROM-BYTES #(97 98 99) CHARSET:BASE64) EQUAL-OK: "YWJj" (CONVERT-STRING-TO-BYTES "YWJj" CHARSET:BASE64) EQUALP-OK: #(97 98 99) (CONVERT-STRING-FROM-BYTES #(108 105 115 112 32 115 116 114 105 110 103) CHARSET:BASE64) EQUAL-OK: "bGlzcCBzdHJpbmc=" (CONVERT-STRING-TO-BYTES "bGlzcCBzdHJpbmc=" CHARSET:BASE64) EQUALP-OK: #(108 105 115 112 32 115 116 114 105 110 103) (CONVERT-STRING-FROM-BYTES #(108 105 115 112 32 115 116 114 105 110 103 115) CHARSET:BASE64) EQUAL-OK: "bGlzcCBzdHJpbmdz" (CONVERT-STRING-TO-BYTES "bGlzcCBzdHJpbmdz" CHARSET:BASE64) EQUALP-OK: #(108 105 115 112 32 115 116 114 105 110 103 115) (CONVERT-STRING-FROM-BYTES #(99 108 105 115 112 32 115 116 114 105 110 103 115) CHARSET:BASE64) EQUAL-OK: "Y2xpc3Agc3RyaW5ncw==" (CONVERT-STRING-TO-BYTES "Y2xpc3Agc3RyaW5ncw==" CHARSET:BASE64) EQUALP-OK: #(99 108 105 115 112 32 115 116 114 105 110 103 115) (LOOP :WITH S :AND V2 :REPEAT 1000 :FOR V1 = (MAKE-ARRAY (RANDOM 300)) :DO (LOOP :FOR I :FROM 0 :BELOW (LENGTH V1) :DO (SETF (AREF V1 I) (RANDOM 256))) (SETQ S (CONVERT-STRING-FROM-BYTES V1 CHARSET:BASE64) V2 (CONVERT-STRING-TO-BYTES S CHARSET:BASE64)) :UNLESS (EQUALP V1 V2) :COLLECT (LIST V1 S V2)) WARNING: LOOP: FOR clauses should occur before the loop's main body EQL-OK: NIL (LOOP :FOR I :FROM 0 :TO CHAR-CODE-LIMIT :FOR C = (CODE-CHAR I) :ALWAYS (OR (NOT (TYPEP C CHARSET:ISO-8859-1)) (EQUALP (CONVERT-STRING-TO-BYTES (STRING C) CHARSET:ISO-8859-1) (VECTOR I)))) EQL-OK: T (LET ((FILE "encoding-tst")) (UNWIND-PROTECT (PROGN (WITH-OPEN-FILE (OUT FILE :DIRECTION :OUTPUT :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) (WRITE-SEQUENCE (CONVERT-STRING-TO-BYTES (CONCATENATE 'STRING "foo" (STRING #\Newline) "bar" (STRING #\Return) (STRING #\Newline)) CHARSET:ASCII) OUT)) (WITH-OPEN-FILE (IN FILE :DIRECTION :INPUT :ELEMENT-TYPE 'CHARACTER :EXTERNAL-FORMAT :DOS) (LIST (READ-LINE IN NIL :EOF) (READ-LINE IN NIL :EOF) (READ-LINE IN NIL :EOF)))) (DELETE-FILE FILE))) EQUAL-OK: ("foo" "bar" :EOF) (LET* ((F "encoding-tst-crlf-test-file") (L1 "line1") (L2 "line2") (ALL (LIST F L1 L2))) (UNWIND-PROTECT (LOOP :FOR S :BEING :EACH :EXTERNAL-SYMBOL :IN "CHARSET" :FOR E-DOS = (MAKE-ENCODING :CHARSET S :LINE-TERMINATOR :DOS) :FOR E-UNIX = (MAKE-ENCODING :CHARSET S :LINE-TERMINATOR :UNIX) :FOR E-MAC = (MAKE-ENCODING :CHARSET S :LINE-TERMINATOR :MAC) :WHEN (IGNORE-ERRORS (WITH-OPEN-FILE (O F :DIRECTION :OUTPUT :EXTERNAL-FORMAT E-DOS) (WRITE-LINE F O) (SETF (STREAM-EXTERNAL-FORMAT O) E-MAC) (WRITE-LINE L1 O) (SETF (STREAM-EXTERNAL-FORMAT O) E-UNIX) (WRITE-LINE L2 O))) :NCONC (LOOP :FOR B :IN '(NIL T) :NCONC (WITH-OPEN-FILE (I F :DIRECTION :INPUT :EXTERNAL-FORMAT E-DOS :BUFFERED B) (DOLIST (LL ALL) (HANDLER-CASE (LET ((L (READ-LINE I))) (IF (STRING= LL L) NIL (LIST (LIST S B 'READ-LINE LL L)))) (ERROR (C) (LIST (LIST S B 'READ-LINE LL (PRINC-TO-STRING C)))))) (HANDLER-CASE (LET ((C (READ-CHAR I NIL NIL))) (AND C (LIST (LIST S B 'READ-CHAR C)))) (ERROR (C) (LIST (LIST S B 'READ-CHAR (PRINC-TO-STRING C)))))))) (DELETE-FILE F))) EQL-OK: NIL (CONVERT-STRING-FROM-BYTES #(195) CHARSET:UTF-8) [SIMPLE-CHARSET-TYPE-ERROR]: CONVERT-STRING-FROM-BYTES: Incomplete byte sequence at end of buffer for CHARSET:UTF-8 EQL-OK: ERROR RUN-TEST: finished "encoding" (0 errors out of 36 tests) RUN-TEST: started # (EVAL (LIST 'CDR (CAR '('(A . B) C)))) EQL-OK: B (MAKUNBOUND 'X) EQL-OK: X (EVAL 'X) [SIMPLE-UNBOUND-VARIABLE]: EVAL: variable X has no value EQL-OK: ERROR (SETF X 3) EQL-OK: 3 (EVAL 'X) EQL-OK: 3 (LET ((FF "eval20-tst-eval-when-test.lisp")) (WITH-OPEN-FILE (FOO FF :DIRECTION :OUTPUT) (FORMAT FOO "~%(eval-when (compile eval) ;; note that LAMBDA is not externalizable (defvar *junk* #.(lambda (x) (+ 15 x))))~%")) (UNWIND-PROTECT (COMPILE-FILE FF) (POST-COMPILE-FILE-CLEANUP FF)) NIL) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.fas 0 errors, 0 warnings EQL-OK: NIL (DEFVAR *COLLECTOR*) EQL-OK: *COLLECTOR* (LET ((FORMS NIL) ALL (FF "eval20-tst-eval-when-test.lisp")) (DOLIST (C '(NIL (:COMPILE-TOPLEVEL))) (DOLIST (L '(NIL (:LOAD-TOPLEVEL))) (DOLIST (X '(NIL (:EXECUTE))) (PUSH `(EVAL-WHEN (,@C ,@L ,@X) (PUSH '(,@C ,@L ,@X) *COLLECTOR*)) FORMS)))) (DOLIST (C '(NIL (:COMPILE-TOPLEVEL))) (DOLIST (L '(NIL (:LOAD-TOPLEVEL))) (DOLIST (X '(NIL (:EXECUTE))) (PUSH `(LET NIL (EVAL-WHEN (,@C ,@L ,@X) (PUSH '(LET ,@C ,@L ,@X) *COLLECTOR*))) FORMS)))) (WITH-OPEN-FILE (O FF :DIRECTION :OUTPUT) (DOLIST (F FORMS) (PRIN1 F O) (TERPRI O))) (LET ((*COLLECTOR* NIL)) (LOAD FF) (PUSH (CONS "load source" *COLLECTOR*) ALL)) (LET ((*COLLECTOR* NIL)) (COMPILE-FILE FF) (PUSH (CONS "compile source" *COLLECTOR*) ALL)) (LET ((*COLLECTOR* NIL)) (LOAD (COMPILE-FILE-PATHNAME FF)) (PUSH (CONS "load compiled" *COLLECTOR*) ALL)) (POST-COMPILE-FILE-CLEANUP FF) (NREVERSE ALL)) ;; Loading file eval20-tst-eval-when-test.lisp ... ;; Loaded file eval20-tst-eval-when-test.lisp ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.fas EQUAL-OK: (("load source" (:EXECUTE) (:LOAD-TOPLEVEL :EXECUTE) (:COMPILE-TOPLEVEL :EXECUTE) (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (LET :EXECUTE) (LET :LOAD-TOPLEVEL :EXECUTE) (LET :COMPILE-TOPLEVEL :EXECUTE) (LET :COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE)) ("compile source" (:COMPILE-TOPLEVEL) (:COMPILE-TOPLEVEL :EXECUTE) (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL) (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE)) ("load compiled" (:LOAD-TOPLEVEL) (:LOAD-TOPLEVEL :EXECUTE) (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL) (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (LET :EXECUTE) (LET :LOAD-TOPLEVEL :EXECUTE) (LET :COMPILE-TOPLEVEL :EXECUTE) (LET :COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE))) (LET ((F "eval20-tst-eval-when-test.lisp") (RET NIL)) (DOLIST (SITUATION '(LOAD :LOAD-TOPLEVEL) (NREVERSE RET)) (LET ((*COLLECTOR* NIL)) (WITH-OPEN-FILE (O F :DIRECTION :OUTPUT) (PRIN1 `(LET ((X :LET)) (PUSH (LIST (EVAL-WHEN (,SITUATION) (SETQ X :EVAL-WHEN)) X) *COLLECTOR*)) O)) (LOAD F) (LOAD (COMPILE-FILE F)) (POST-COMPILE-FILE-CLEANUP F) (PUSH (NREVERSE *COLLECTOR*) RET)))) ;; Loading file eval20-tst-eval-when-test.lisp ... ;; Loaded file eval20-tst-eval-when-test.lisp ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.fas ;; Loading file eval20-tst-eval-when-test.lisp ... ;; Loaded file eval20-tst-eval-when-test.lisp ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.fas EQUAL-OK: (((NIL :LET) (:EVAL-WHEN :EVAL-WHEN)) ((NIL :LET) (NIL :LET))) (LET ((F "eval20-tst-eval-when-test.lisp") (RET NIL)) (DOLIST (SITUATION '(EVAL :EXECUTE) (NREVERSE RET)) (LET ((*COLLECTOR* NIL)) (WITH-OPEN-FILE (O F :DIRECTION :OUTPUT) (PRIN1 `(LET ((X :LET)) (PUSH (LIST (EVAL-WHEN (,SITUATION) (SETQ X :EVAL-WHEN)) X) *COLLECTOR*)) O)) (LOAD F) (LOAD (COMPILE-FILE F)) (POST-COMPILE-FILE-CLEANUP F) (PUSH (NREVERSE *COLLECTOR*) RET)))) ;; Loading file eval20-tst-eval-when-test.lisp ... ;; Loaded file eval20-tst-eval-when-test.lisp ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.fas ;; Loading file eval20-tst-eval-when-test.lisp ... ;; Loaded file eval20-tst-eval-when-test.lisp ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/eval20-tst-eval-when-test.fas EQUAL-OK: (((:EVAL-WHEN :EVAL-WHEN) (NIL :LET)) ((:EVAL-WHEN :EVAL-WHEN) (:EVAL-WHEN :EVAL-WHEN))) (CONSTANTP 2) EQL-OK: T (CONSTANTP #\r) EQL-OK: T (CONSTANTP "max") EQL-OK: T (CONSTANTP '#(110)) EQL-OK: T (CONSTANTP :MAX) EQL-OK: T (CONSTANTP T) EQL-OK: T (CONSTANTP NIL) EQL-OK: T (CONSTANTP 'PI) EQL-OK: NIL (CONSTANTP ''FOO) EQL-OK: T (CONSTANTP '(+ 3 4)) EQL-OK: T (CONSTANTP '((SETF CONS) 3 4)) EQL-OK: NIL (LET ((SRC "eval20-tst.lisp") (ZZ (CONS 1 2))) (DEFUN SETF-FOO (U V) (SETF (CAR U) V)) (WITH-OPEN-FILE (S SRC :DIRECTION :OUTPUT) (FORMAT S "(progn~% (defsetf foo setf-foo) (defun bar (u v) (setf (foo u) v)))~%")) (LOAD SRC :COMPILING T) (DELETE-FILE SRC) (BAR ZZ 12) ZZ) ;; Loading file eval20-tst.lisp ... 0 errors, 0 warnings ;; Loaded file eval20-tst.lisp EQUAL-OK: (12 . 2) (DEFPARAMETER X 1) EQL-OK: X (HANDLER-BIND ((UNBOUND-VARIABLE (LAMBDA (C) (PRINC-ERROR C) (STORE-VALUE 10)))) (LIST (LET (X) (MAKUNBOUND 'X) X) X)) [SIMPLE-UNBOUND-VARIABLE]: LET: variable X has no value EQUAL-OK: (10 1) (HANDLER-BIND ((UNBOUND-VARIABLE (LAMBDA (C) (PRINC-ERROR C) (STORE-VALUE 11)))) (LIST (LET (X) (MAKUNBOUND 'X) (SYMBOL-VALUE 'X)) X)) [SIMPLE-UNBOUND-VARIABLE]: SYMBOL-VALUE: variable X has no value EQUAL-OK: (11 1) (HANDLER-BIND ((UNBOUND-VARIABLE (LAMBDA (C) (PRINC-ERROR C) (STORE-VALUE 12)))) (LIST (LET (X) (MAKUNBOUND 'X) (LIST X (SYMBOL-VALUE 'X))) X)) [SIMPLE-UNBOUND-VARIABLE]: LET: variable X has no value EQUAL-OK: ((12 12) 1) (HANDLER-BIND ((UNBOUND-VARIABLE (LAMBDA (C) (PRINC-ERROR C) (STORE-VALUE 13)))) (LIST (LET (X) (MAKUNBOUND 'X) (LIST (SYMBOL-VALUE 'X) X)) X)) [SIMPLE-UNBOUND-VARIABLE]: SYMBOL-VALUE: variable X has no value EQUAL-OK: ((13 13) 1) (LET ((COUNT 140)) (HANDLER-BIND ((UNBOUND-VARIABLE (LAMBDA (C) (PRINC-ERROR C) (USE-VALUE (INCF COUNT))))) (LIST (LET (X) (MAKUNBOUND 'X) (LIST X (SYMBOL-VALUE 'X))) X))) [SIMPLE-UNBOUND-VARIABLE]: LET: variable X has no value [SIMPLE-UNBOUND-VARIABLE]: SYMBOL-VALUE: variable X has no value EQUAL-OK: ((141 142) 1) (LET ((COUNT 150)) (HANDLER-BIND ((UNBOUND-VARIABLE (LAMBDA (C) (PRINC-ERROR C) (USE-VALUE (INCF COUNT))))) (LIST (LET (X) (MAKUNBOUND 'X) (LIST (SYMBOL-VALUE 'X) X)) X))) [SIMPLE-UNBOUND-VARIABLE]: SYMBOL-VALUE: variable X has no value [SIMPLE-UNBOUND-VARIABLE]: LET: variable X has no value EQUAL-OK: ((151 152) 1) (LET ((Y 1)) (LIST (LET ((Y 20)) (MAKUNBOUND 'Y) Y) Y)) EQUAL-OK: (20 1) (LET ((Y 1)) (HANDLER-BIND ((UNBOUND-VARIABLE (LAMBDA (C) (PRINC-ERROR C) (STORE-VALUE 21)))) (LIST (LET (Y) (MAKUNBOUND 'Y) (SYMBOL-VALUE 'Y)) Y))) [SIMPLE-UNBOUND-VARIABLE]: SYMBOL-VALUE: variable Y has no value EQUAL-OK: (21 1) (LET ((Y 1)) (HANDLER-BIND ((UNBOUND-VARIABLE (LAMBDA (C) (PRINC-ERROR C) (STORE-VALUE 220)))) (LIST (LET ((Y 22)) (MAKUNBOUND 'Y) (LIST Y (SYMBOL-VALUE 'Y))) Y))) [SIMPLE-UNBOUND-VARIABLE]: SYMBOL-VALUE: variable Y has no value EQUAL-OK: ((22 220) 1) (LET ((Y 1)) (HANDLER-BIND ((UNBOUND-VARIABLE (LAMBDA (C) (PRINC-ERROR C) (STORE-VALUE 230)))) (LIST (LET ((Y 23)) (MAKUNBOUND 'Y) (LIST (SYMBOL-VALUE 'Y) Y)) Y))) [SIMPLE-UNBOUND-VARIABLE]: SYMBOL-VALUE: variable Y has no value EQUAL-OK: ((230 23) 1) (LET ((Y 1) (COUNT 240)) (HANDLER-BIND ((UNBOUND-VARIABLE (LAMBDA (C) (PRINC-ERROR C) (USE-VALUE (INCF COUNT))))) (LIST (LET ((Y 24)) (MAKUNBOUND 'Y) (LIST Y (SYMBOL-VALUE 'Y))) Y))) [SIMPLE-UNBOUND-VARIABLE]: SYMBOL-VALUE: variable Y has no value EQUAL-OK: ((24 241) 1) (LET ((Y 1) (COUNT 250)) (HANDLER-BIND ((UNBOUND-VARIABLE (LAMBDA (C) (PRINC-ERROR C) (USE-VALUE (INCF COUNT))))) (LIST (LET ((Y 25)) (MAKUNBOUND 'Y) (LIST (SYMBOL-VALUE 'Y) Y)) Y))) [SIMPLE-UNBOUND-VARIABLE]: SYMBOL-VALUE: variable Y has no value EQUAL-OK: ((251 25) 1) (FLET ((FLET1 (N) (+ N N))) (FLET ((FLET1 (N) (+ 2 (FLET1 N)))) (FLET1 2))) EQL-OK: 6 (PROGN (DEFUN DUMMY-FUNCTION NIL 'TOP-LEVEL) (LIST (FUNCALL #'DUMMY-FUNCTION) (FLET ((DUMMY-FUNCTION NIL 'SHADOW)) (FUNCALL #'DUMMY-FUNCTION)) (EQ (FUNCALL #'DUMMY-FUNCTION) (FUNCALL 'DUMMY-FUNCTION)) (FLET ((DUMMY-FUNCTION NIL 'SHADOW)) (EQ (FUNCALL #'DUMMY-FUNCTION) (FUNCALL 'DUMMY-FUNCTION))))) EQUAL-OK: (TOP-LEVEL SHADOW T NIL) (PROGN (DEFUN RECURSIVE-TIMES (K N) (LABELS ((TEMP (N) (IF (ZEROP N) 0 (+ K (TEMP (1- N)))))) (TEMP N))) (RECURSIVE-TIMES 2 3)) EQL-OK: 6 (PROGN (DEFMACRO MLETS (X &ENVIRONMENT ENV) (LET ((FORM `(BABBIT ,X))) (MACROEXPAND FORM ENV))) (MACROLET ((BABBIT (Z) `(+ ,Z ,Z))) (MLETS 5))) EQL-OK: 10 (FLET ((SAFESQRT (X) (SQRT (ABS X)))) (SAFESQRT (APPLY #'+ (MAP 'LIST #'SAFESQRT '(1 2 3 4 5 6))))) EQL-OK: 3.2911735 (PROGN (DEFUN INTEGER-POWER (N K) (DECLARE (INTEGER N)) (DECLARE (TYPE (INTEGER 0 *) K)) (LABELS ((EXPT0 (X K A) (DECLARE (INTEGER X A) (TYPE (INTEGER 0 *) K)) (COND ((ZEROP K) A) ((EVENP K) (EXPT1 (* X X) (FLOOR K 2) A)) (T (EXPT0 (* X X) (FLOOR K 2) (* X A))))) (EXPT1 (X K A) (DECLARE (INTEGER X A) (TYPE (INTEGER 0 *) K)) (COND ((EVENP K) (EXPT1 (* X X) (FLOOR K 2) A)) (T (EXPT0 (* X X) (FLOOR K 2) (* X A)))))) (EXPT0 N K 1))) (INTEGER-POWER 3 5)) EQL-OK: 243 (PROGN (DEFUN EXAMPLE (Y L) (FLET ((ATTACH (X) (SETQ L (APPEND L (LIST X))))) (DECLARE (INLINE ATTACH)) (DOLIST (X Y) (UNLESS (NULL (CDR X)) (ATTACH X))) L)) (EXAMPLE '((A APPLE APRICOT) (B BANANA) (C CHERRY) (D) (E)) '((1) (2) (3) (4 2) (5) (6 3 2)))) EQUAL-OK: ((1) (2) (3) (4 2) (5) (6 3 2) (A APPLE APRICOT) (B BANANA) (C CHERRY)) (WITH-OUTPUT-TO-STRING (*ERROR-OUTPUT*) (DECLAIM (OPTIMIZE ZOT))) EQUAL-OK: "WARNING: ZOT is not a valid OPTIMIZE quality. " (LET ((WARNINGS 0) (ERRORS 0)) (LIST (WITH-OUTPUT-TO-STRING (*ERROR-OUTPUT*) (HANDLER-BIND ((WARNING (LAMBDA (W) (INCF WARNINGS))) (ERROR (LAMBDA (E) (INCF ERRORS) (PRINC E *ERROR-OUTPUT*) (CONTINUE E)))) (WARN "foo") (CERROR "baz" 'ERROR) (WARN "bar"))) WARNINGS ERRORS)) EQUAL-OK: ("WARNING: foo Condition of type ERROR. WARNING: bar " 2 1) (DEFPARAMETER *DECL-FILE* "decl.lisp") EQL-OK: *DECL-FILE* (DEFUN WRITE-DECL-FILE (DECLARATION) (LET ((F `(DEFUN F (X) (DECLARE (,DECLARATION)) X)) (GF `(DEFGENERIC GF (X) (DECLARE (,DECLARATION))))) (WITH-OPEN-FILE (O *DECL-FILE* :DIRECTION :OUTPUT) (FLET ((WR (CODE NAME) (SETF (SECOND CODE) NAME) (WRITE CODE :STREAM O :PRETTY T) (TERPRI O))) (WR F 'F1) (WR GF 'GF1) (WRITE `(DECLAIM (DECLARATION ,DECLARATION)) :STREAM O) (TERPRI O) (WR F 'F2) (WR GF 'GF2))))) EQL-OK: WRITE-DECL-FILE (LET ((WARNINGS 0)) (WRITE-DECL-FILE 'TEST-DECL-LOAD) (HANDLER-BIND ((WARNING (LAMBDA (W) (INCF WARNINGS)))) (LOAD *DECL-FILE*)) WARNINGS) ;; Loading file decl.lisp ... WARNING: DEFGENERIC GF1: In the DECLARE argument, (TEST-DECL-LOAD) declaration is not permitted ;; Loaded file decl.lisp EQL-OK: 1 (PROGN (WRITE-DECL-FILE 'TEST-DECL-COMPILE) (REST (MULTIPLE-VALUE-LIST (COMPILE-FILE *DECL-FILE*)))) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/decl.lisp ... WARNING: in F1 in line 1 : Unknown declaration TEST-DECL-COMPILE. The whole declaration will be ignored. WARNING: DEFGENERIC GF1: In the DECLARE argument, (TEST-DECL-COMPILE) declaration is not permitted ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/decl.fas 0 errors, 2 warnings EQUAL-OK: (2 2) (LET ((WARNINGS 0)) (HANDLER-BIND ((WARNING (LAMBDA (W) (INCF WARNINGS)))) (LOAD (COMPILE-FILE-PATHNAME *DECL-FILE*))) (POST-COMPILE-FILE-CLEANUP *DECL-FILE*) WARNINGS) ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/decl.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/decl.fas EQL-OK: 0 (SYMBOLS-CLEANUP '(SETF-FOO BAR X *COLLECTOR* DUMMY-FUNCTION *DECL-FILE* WRITE-DECL-FILE F1 F2 GF1 GF2 TEST-DECL-LOAD TEST-DECL-COMPILE RECURSIVE-TIMES MLETS INTEGER-POWER EXAMPLE)) EQL-OK: NIL RUN-TEST: finished "eval20" (0 errors out of 50 tests) RUN-TEST: started # (FUNCALL (MAKE-COMPLETION '("a" "abc" "ab")) "ab" 0 2) EQUAL-OK: ("ab" "ab" "abc") (FUNCALL (MAKE-COMPLETION '("a" "abc" "ab")) "b" 0 1) EQL-OK: NIL (FUNCALL (MAKE-COMPLETION '("abz" "abc")) "a" 0 1) EQUAL-OK: ("ab" "abc" "abz") (FUNCALL (MAKE-COMPLETION '("a" "abc" "ab")) "" 0 0) EQUAL-OK: ("a" "a" "ab" "abc") (LONGEST-COMMON-PREFIX '("a" "abc")) EQUAL-OK: "a" (LONGEST-COMMON-PREFIX '("za" "abc")) EQUAL-OK: "" (LONGEST-COMMON-PREFIX '(#*1100 #*100)) EQUAL-OK: #*1 (LONGEST-COMMON-PREFIX NIL) [SIMPLE-PROGRAM-ERROR]: APPLY: too few arguments given to MIN EQL-OK: ERROR (STARTS-WITH-P "a" "A") EQL-OK: T (STARTS-WITH-P "ab" "b") EQL-OK: NIL (STARTS-WITH-P "http://clisp.org" "http://") EQL-OK: T (STARTS-WITH-P "FoOb" "Fo0b") EQL-OK: NIL (LET* ((DIR (MAKE-PATHNAME :DIRECTORY '(:RELATIVE "foo" "bar" "baz"))) SR1 SR2 (*LOAD-PATHS* (LIST (MAKE-PATHNAME :DIRECTORY (APPEND (SUBSEQ (PATHNAME-DIRECTORY DIR) 0 2) '(:WILD-INFERIORS))))) (FILE (MERGE-PATHNAMES DIR "quux"))) (LIST (MULTIPLE-VALUE-BIND (PATHSPEC CREATED) (ENSURE-DIRECTORIES-EXIST DIR) (LIST (OR (EQUAL PATHSPEC DIR) (LIST PATHSPEC DIR)) CREATED)) (NOT (PROBE-FILE (OPEN FILE :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE))) (LENGTH (SETQ SR1 (SYSTEM::SEARCH-FILE (PATHNAME-NAME FILE)))) (LENGTH (SETQ SR2 (SYSTEM::SEARCH-FILE (MAKE-PATHNAME :NAME (PATHNAME-NAME FILE))))) (OR (EQUAL SR1 SR2) (LIST SR1 SR2)) (OR (EQUAL (FIRST SR1) (TRUENAME FILE)) (LIST SR1 FILE (TRUENAME FILE))) (NOT (DELETE-FILE FILE)) (LOOP FOR D ON (REVERSE (REST (PATHNAME-DIRECTORY DIR))) COLLECT (DELETE-DIRECTORY (MAKE-PATHNAME :DIRECTORY (CONS :RELATIVE (REVERSE D))))))) EQUAL-OK: ((T T) NIL 1 1 T T NIL (T T T)) (MAPCAR (LAMBDA (X &AUX A B) (LIST (SETF (IF X A B) 2) A B)) '(T NIL)) EQUAL-OK: ((2 2 NIL) (2 NIL 2)) (LOOP WITH A AND B FOR X BELOW 2 COLLECT (MULTIPLE-VALUE-LIST (SETF (IF (ZEROP X) (VALUES A B) (VALUES B A)) (FLOOR 7 5))) COLLECT (CONS A B)) EQUAL-OK: ((1 2) (1 . 2) (1 2) (2 . 1)) (LET (X A B C) (SETF (IF (ZEROP X) (VALUES A B) C) X)) [SIMPLE-SOURCE-PROGRAM-ERROR]: SETF place (IF #1=(ZEROP X) #2=(VALUES A B) C) expects different numbers of values in the true and false branches (2 vs. 1 values). EQL-OK: ERROR (FCASE STRING= (LET ((FOO "two third")) (SUBSEQ FOO 0 (POSITION #\Space FOO))) ("first" 1) (("second" "two") 2) (("true" "yes") T) (OTHERWISE NIL)) EQL-OK: 2 (MULTIPLE-VALUE-LIST (XOR NIL NIL NIL)) EQUAL-OK: (NIL) (MULTIPLE-VALUE-LIST (XOR NIL (BLOCK NIL (RETURN 'A)) NIL)) EQUAL-OK: (A 2) (! 10) EQL-OK: 3628800 (! 11) EQL-OK: 39916800 (! 0) EQL-OK: 1 (! 3/2) [SIMPLE-TYPE-ERROR]: !: argument #1=3/2 is not a nonnegative fixnum EQL-OK: ERROR (MULTIPLE-VALUE-LIST (LET (A B) (PUSH (VALUES 1 2) (VALUES A B)))) EQUAL-OK: ((1) (2)) (LET (A B) (LIST (MULTIPLE-VALUE-LIST (PUSHNEW (VALUES 1 2) (VALUES A B))) A B)) EQUAL-OK: (((1) (2)) (1) (2)) (LET ((A '(1)) (B '(2 3))) (LIST (MULTIPLE-VALUE-LIST (POP (VALUES A B))) A B)) EQUAL-OK: ((1 2) NIL (3)) (DEFUN TEST-DOHASH (HASH-TABLE) (LET ((ALL-ENTRIES 'NIL) (GENERATED-ENTRIES 'NIL) (UNIQUE (LIST NIL))) (MAPHASH #'(LAMBDA (KEY VALUE) (PUSH (LIST KEY VALUE) ALL-ENTRIES)) HASH-TABLE) (DOHASH (KEY VALUE HASH-TABLE) (DECLARE (OPTIMIZE SAFETY)) (UNLESS (EQL VALUE (GETHASH KEY HASH-TABLE UNIQUE)) (ERROR "Key ~S not found for value ~S" KEY VALUE)) (PUSH (LIST KEY VALUE) GENERATED-ENTRIES)) (UNLESS (= (LENGTH ALL-ENTRIES) (LENGTH GENERATED-ENTRIES) (LENGTH (UNION ALL-ENTRIES GENERATED-ENTRIES :KEY #'CAR :TEST (HASH-TABLE-TEST HASH-TABLE)))) (ERROR "MAPHASH and EXT:DOHASH entries don't correspond")) T)) EQL-OK: TEST-DOHASH (LET ((TAB (MAKE-HASH-TABLE :TEST #'EQUAL))) (SETF (GETHASH "Richard" TAB) "Gabriel") (SETF (GETHASH "Bruno" TAB) "Haible") (SETF (GETHASH "Michael" TAB) "Stoll") (SETF (GETHASH "Linus" TAB) "Torvalds") (SETF (GETHASH "Richard" TAB) "Stallman") (TEST-DOHASH TAB)) EQL-OK: T (LET ((HASH-TABLE (MAKE-HASH-TABLE)) (ENTRIES 'NIL)) (SETF (GETHASH 1 HASH-TABLE) 100) (SETF (GETHASH 2 HASH-TABLE) 200) (SORT (DOHASH (KEY VALUE HASH-TABLE ENTRIES) (DECLARE (IGNORE KEY)) (PUSH VALUE ENTRIES)) #'<)) EQUAL-OK: (100 200) (LET ((HASH-TABLE (MAKE-HASH-TABLE :INITIAL-CONTENTS '((1 . 100) (2 . 200)))) (ENTRIES 'NIL)) (SORT (DOHASH (KEY VALUE HASH-TABLE ENTRIES) (PUSH VALUE ENTRIES) (GO SKIP) (PUSH KEY ENTRIES) SKIP) #'<)) EQUAL-OK: (100 200) (LET ((X (LIST 1))) (LIST (LETF (((CAR X) 3)) (LIST X (COPY-LIST X))) X)) EQUAL-OK: (((1) (3)) (1)) (LET ((X (LIST 1))) (LIST (LETF (((CAR X) 3) ((CDR X) (COPY-LIST X))) (LIST X (COPY-LIST X))) X)) EQUAL-OK: (((1) (3 1)) (1)) (LET (A B) (LIST (LETF (((VALUES A B) (VALUES 1 2))) (LIST A B)) (LIST A B))) EQUAL-OK: ((1 2) (NIL NIL)) (LET ((X (LIST 2))) (LIST (LETF* (((CAR X) 3)) (LIST X (COPY-LIST X))) X)) EQUAL-OK: (((2) (3)) (2)) (LET ((X (LIST 1))) (LIST (LETF* (((CAR X) 3) ((CDR X) (COPY-LIST X))) (LIST X (COPY-LIST X))) X)) EQUAL-OK: (((1) (3 3)) (1)) (LET (A B) (LIST (LETF* (((VALUES A B) (VALUES 1 2))) (LIST A B)) (LIST A B))) EQUAL-OK: ((1 2) (NIL NIL)) (LET ((X (LIST 1))) (BLOCK NIL (LETF (((CAR X) 2) ((CDR (PROGN (RETURN) X)) 3)) X)) X) EQUAL-OK: (1) (LET ((X (LIST 11184810))) (LETF (((LDB (BYTE 5 9) (FIRST X)) -1)) (SETF (FIRST X) 0)) X) EQUAL-OK: (10752) (LET ((X (LIST 1))) (LETF (((FIRST X) 3)))) EQL-OK: NIL (LET ((X (LIST 1))) (MACROLET ((FROB NIL '(FIRST X))) (LETF (((FROB) 2)) (COPY-LIST X)))) EQUAL-OK: (2) (LET ((X (LIST 1))) (MACROLET ((FROB NIL '(FIRST X))) (LETF* (((FROB) 2)) (COPY-LIST X)))) EQUAL-OK: (2) (SYMBOL-MACROLET ((A *PRINT-BASE*)) (LETF ((A 36)) (PRINC-TO-STRING 20))) EQUAL-OK: "K" (SYMBOL-MACROLET ((A *PRINT-BASE*)) (LETF* ((A 36)) (PRINC-TO-STRING 20))) EQUAL-OK: "K" (LET (A B C) (SYMBOL-MACROLET ((A *PRINT-BASE*)) (LETF (((VALUES A B C) 36)) (PRINC-TO-STRING 20)))) EQUAL-OK: "K" (LET (A B C) (SYMBOL-MACROLET ((A *PRINT-BASE*)) (LETF* (((VALUES A B C) 36)) (PRINC-TO-STRING 20)))) EQUAL-OK: "K" (LET ((A (VECTOR 0 0))) (LETF (((VALUES (AREF A 0) (AREF A 1)) (FLOOR 7 5))) (COPY-SEQ A))) EQUALP-OK: #(1 2) (LET ((A (VECTOR 0 0))) (LETF* (((VALUES (AREF A 0) (AREF A 1)) (FLOOR 7 5))) (COPY-SEQ A))) EQUALP-OK: #(1 2) (LETF (((VALUES) 1)) 2) EQL-OK: 2 (LETF* (((VALUES) 1)) 2) EQL-OK: 2 (MAKUNBOUND 'XX) EQL-OK: XX (LETF (((SYMBOL-VALUE 'XX) 3)) (DECLARE (SPECIAL XX)) XX) [SIMPLE-UNBOUND-VARIABLE]: SYMBOL-VALUE: variable XX has no value EQL-OK: ERROR (MULTIPLE-VALUE-LIST (GETHASH 1 (LETF* ((H (MAKE-HASH-TABLE)) ((GETHASH 1 H) 'A)) H) 2)) EQUAL-OK: (NIL T) (MULTIPLE-VALUE-LIST (GETHASH 1 (LETF* ((H (MAKE-HASH-TABLE)) ((GETHASH 1 H 'B) 'A)) H) 2)) EQUAL-OK: (B T) (LET ((A 'NIL)) (LETF* (((GETF A :KEY) 1))) A) EQUAL-OK: (:KEY NIL) (LET ((A 'NIL)) (LETF* (((GETF A :KEY :DEFAULT) 1))) A) EQUAL-OK: (:KEY :DEFAULT) (LET ((A 'NIL)) (LETF (((GETF A :KEY :DEFAULT) 1))) A) EQUAL-OK: (:KEY :DEFAULT) (LET* ((X 9) (F (LAMBDA NIL X))) (LETF (((VALUES X Y) (FLOOR 7 5))) (LIST X (FUNCALL F)))) EQUAL-OK: (1 9) (LET* ((X 9) (F (LAMBDA NIL X))) (LETF* (((VALUES X Y) (FLOOR 7 5))) (LIST X (FUNCALL F)))) EQUAL-OK: (1 9) (LET* ((X 9) (FX (LAMBDA NIL X)) (Y 3) (FY (LAMBDA NIL Y))) (LETF* (((VALUES (VALUES X) Y) (FLOOR 7 5))) (LIST X (FUNCALL FX) Y (FUNCALL FY)))) EQUAL-OK: (1 1 2 2) (LET* ((X (LIST 9)) (Y 8) (FY (LAMBDA NIL Y))) (LETF* (((VALUES (CAR X) Y) (FLOOR 7 5))) (LIST Y (FUNCALL FY)))) EQUAL-OK: (2 2) (LET ((X 1)) (LOCALLY (DECLARE (SYSTEM::IMPLEMENTATION-DEPENDENT X)) X)) WARNING: Reference to X is implementation-dependent, per ANSI CL 6.1.1.4. EQL-OK: 1 (LET ((X 1)) (LOCALLY (DECLARE (SYSTEM::IMPLEMENTATION-DEPENDENT X)) T)) EQL-OK: T (HANDLER-CASE (LET ((X 1)) (LOCALLY (DECLARE (SYSTEM::IMPLEMENTATION-DEPENDENT X)) X)) (WARNING (W) (PRINC-TO-STRING W))) EQUAL-OK: "Reference to X is implementation-dependent, per ANSI CL 6.1.1.4." (HANDLER-CASE (LET ((X 1)) (LOCALLY (DECLARE (SYSTEM::IMPLEMENTATION-DEPENDENT X)) (SETQ X 2))) (WARNING (W) (PRINC-TO-STRING W))) EQUAL-OK: "Reference to X is implementation-dependent, per ANSI CL 6.1.1.4." (HANDLER-CASE (LET ((X 1)) (LOCALLY (DECLARE (SYSTEM::IMPLEMENTATION-DEPENDENT X)) (MULTIPLE-VALUE-SETQ (X) 2))) (WARNING (W) (PRINC-TO-STRING W))) EQUAL-OK: "Reference to X is implementation-dependent, per ANSI CL 6.1.1.4." (DEFUN ANONYMIZE-COMPILED-FORM-GENSYM (S) (LET ((I (SEARCH "COMPILED-FORM-" S))) (IF I (LET* ((J (+ I 14)) (K (POSITION-IF-NOT #'DIGIT-CHAR-P S :START J))) (CONCATENATE 'STRING (SUBSEQ S 0 J) (SUBSEQ S K))) S))) EQL-OK: ANONYMIZE-COMPILED-FORM-GENSYM (LET ((X 1)) (LOCALLY (DECLARE (SYSTEM::IMPLEMENTATION-DEPENDENT X)) (LOCALLY (DECLARE (COMPILE)) X))) WARNING: in #:COMPILED-FORM-1077 : Reference to X is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in #:COMPILED-FORM-1077 : Reference to X is implementation-dependent, per ANSI CL 6.1.1.4. EQL-OK: 1 (LET ((X 1)) (LOCALLY (DECLARE (SYSTEM::IMPLEMENTATION-DEPENDENT X)) (LOCALLY (DECLARE (COMPILE)) T))) EQL-OK: T (HANDLER-CASE (LET ((X 1)) (LOCALLY (DECLARE (SYSTEM::IMPLEMENTATION-DEPENDENT X)) (LOCALLY (DECLARE (COMPILE)) X))) (WARNING (W) (ANONYMIZE-COMPILED-FORM-GENSYM (PRINC-TO-STRING W)))) EQUAL-OK: "in #:COMPILED-FORM- : Reference to X is implementation-dependent, per ANSI CL 6.1.1.4." (HANDLER-CASE (LET ((X 1)) (LOCALLY (DECLARE (SYSTEM::IMPLEMENTATION-DEPENDENT X)) (LOCALLY (DECLARE (COMPILE)) (SETQ X 2)))) (WARNING (W) (ANONYMIZE-COMPILED-FORM-GENSYM (PRINC-TO-STRING W)))) EQUAL-OK: "in #:COMPILED-FORM- : Reference to X is implementation-dependent, per ANSI CL 6.1.1.4." (HANDLER-CASE (LET ((X 1)) (LOCALLY (DECLARE (SYSTEM::IMPLEMENTATION-DEPENDENT X)) (LOCALLY (DECLARE (COMPILE)) (MULTIPLE-VALUE-SETQ (X) 2)))) (WARNING (W) (ANONYMIZE-COMPILED-FORM-GENSYM (PRINC-TO-STRING W)))) EQUAL-OK: "in #:COMPILED-FORM- : Reference to X is implementation-dependent, per ANSI CL 6.1.1.4." (LOCALLY (DECLARE (COMPILE)) (LET ((X 1)) (LOCALLY (DECLARE (SYSTEM::IMPLEMENTATION-DEPENDENT X)) X))) WARNING: in #:COMPILED-FORM-1085 : Reference to X is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: in #:COMPILED-FORM-1085 : Reference to X is implementation-dependent, per ANSI CL 6.1.1.4. EQL-OK: 1 (LOCALLY (DECLARE (COMPILE)) (LET ((X 1)) (LOCALLY (DECLARE (SYSTEM::IMPLEMENTATION-DEPENDENT X)) T))) WARNING: in #:COMPILED-FORM-1086 : variable X is not used. Misspelled or missing IGNORE declaration? EQL-OK: T (HANDLER-CASE (LOCALLY (DECLARE (COMPILE)) (LET ((X 1)) (LOCALLY (DECLARE (SYSTEM::IMPLEMENTATION-DEPENDENT X)) X))) (WARNING (W) (ANONYMIZE-COMPILED-FORM-GENSYM (PRINC-TO-STRING W)))) EQUAL-OK: "in #:COMPILED-FORM- : Reference to X is implementation-dependent, per ANSI CL 6.1.1.4." (HANDLER-CASE (LOCALLY (DECLARE (COMPILE)) (LET ((X 1)) (LOCALLY (DECLARE (SYSTEM::IMPLEMENTATION-DEPENDENT X)) (SETQ X 2)))) (WARNING (W) (ANONYMIZE-COMPILED-FORM-GENSYM (PRINC-TO-STRING W)))) EQUAL-OK: "in #:COMPILED-FORM- : Reference to X is implementation-dependent, per ANSI CL 6.1.1.4." (HANDLER-CASE (LOCALLY (DECLARE (COMPILE)) (LET ((X 1)) (LOCALLY (DECLARE (SYSTEM::IMPLEMENTATION-DEPENDENT X)) (MULTIPLE-VALUE-SETQ (X) 2)))) (WARNING (W) (ANONYMIZE-COMPILED-FORM-GENSYM (PRINC-TO-STRING W)))) EQUAL-OK: "in #:COMPILED-FORM- : Reference to X is implementation-dependent, per ANSI CL 6.1.1.4." (EVERY #'FEATUREP *FEATURES*) EQL-OK: T (NOTANY (LAMBDA (X) (FEATUREP `(NOT ,X))) *FEATURES*) EQL-OK: T ((LAMBDA (X) (DECLARE (COMPILE)) (ETHE INTEGER X)) 3) EQL-OK: 3 ((LAMBDA (X) (DECLARE (COMPILE)) (ETHE INTEGER X)) T) [SIMPLE-ERROR]: The form X yielded T , that's not of type INTEGER. EQL-OK: ERROR (LOCALLY (DECLARE (COMPILE)) (MULTIPLE-VALUE-LIST (ETHE (VALUES INTEGER FLOAT) (TRUNCATE 3.2 2)))) EQUAL-OK: (1 1.2) (LOCALLY (DECLARE (COMPILE)) (ETHE (VALUES FLOAT INTEGER) (TRUNCATE 3.2 2))) [SIMPLE-ERROR]: The form (TRUNCATE 3.2 2) yielded 1 ; 1.2 , that's not of type (VALUES FLOAT INTEGER). EQL-OK: ERROR (CANONICALIZE 1 `(,#'1+)) [SIMPLE-ERROR]: CANONICALIZE(1 (#)): maximum number of iterations exceeded 1,024, last two values were 1025 and 1026 EQL-OK: ERROR (CANONICALIZE "foo" `(,#'STRING-UPCASE) :TEST 'EQUAL) EQUAL-OK: "FOO" (CANONICALIZE "iso1234" `(,(LAMBDA (S) (IF (AND (<= 4 (LENGTH S)) (STRING-EQUAL S "iso" :END1 3) (NOT (CHAR= #\- (CHAR S 3)))) (CONCATENATE 'STRING "ISO-" (SUBSEQ S 3)) S))) :TEST 'EQUAL) EQUAL-OK: "ISO-1234" (DEFUN CHECK-LOAD (FILE) (LET* ((DIR (STRING-CONCAT (SECOND (PATHNAME-DIRECTORY FILE)) "/")) (*LOAD-PATHS* (LIST '#P"" (PATHNAME (STRING-CONCAT DIR "**/"))))) (UNWIND-PROTECT (PROGN (PREPARE-DIRECTORY FILE) (WITH-OPEN-FILE (S FILE :DIRECTION :OUTPUT) (PRIN1 '(SETF (CDR *LOAD-PATHS*) NIL) S)) (LOAD (PATHNAME-NAME FILE)) *LOAD-PATHS*) (RMRF DIR)))) EQL-OK: CHECK-LOAD (CHECK-LOAD "ext-clisp-tst/foo/bar/baz/zot.lisp") Creating directory: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/ Creating directory: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/ Creating directory: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/ Creating directory: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/baz/ ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/baz/zot.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/baz/zot.lisp /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/baz/zot.lisp 29 2021-04-24 15:27:52 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/ 4096 2021-04-24 15:27:52 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/ 4096 2021-04-24 15:27:52 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/ 4096 2021-04-24 15:27:52 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/baz/ 4096 2021-04-24 15:27:52 removing file #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/baz/zot.lisp" removing directory #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/baz/" removing directory #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/" removing directory #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/" removing directory #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/" EQUAL-OK: (#P"") (CHECK-LOAD "ext-clisp-tst/foo/bar/baz/zot") Creating directory: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/ Creating directory: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/ Creating directory: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/ Creating directory: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/baz/ ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/baz/zot ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/baz/zot /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/baz/zot 29 2021-04-24 15:27:52 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/ 4096 2021-04-24 15:27:52 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/ 4096 2021-04-24 15:27:52 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/ 4096 2021-04-24 15:27:52 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/baz/ 4096 2021-04-24 15:27:52 removing file #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/baz/zot" removing directory #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/baz/" removing directory #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/" removing directory #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/" removing directory #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/" EQUAL-OK: (#P"") (DEFPARAMETER *S1* (OPEN "ext-clisp-tst-abazonk" :DIRECTION :OUTPUT)) EQL-OK: *S1* (OPEN "ext-clisp-tst-abazonk" :DIRECTION :OUTPUT) [SIMPLE-FILE-ERROR]: OPEN: # already points to file #1="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst-abazonk", opening the file again for :OUTPUT may produce unexpected results EQL-OK: ERROR (DEFPARAMETER *S2* (APPEASE-CERRORS (OPEN "ext-clisp-tst-abazonk"))) WARNING: OPEN: # already points to file "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst-abazonk" , opening the file again for :INPUT may produce unexpected results Open the file anyway EQL-OK: *S2* (EQUAL (TRUENAME *S1*) (TRUENAME *S2*)) EQL-OK: T (OPEN-STREAM-P *S1*) EQL-OK: T (OPEN-STREAM-P *S2*) EQL-OK: T (DEFPARAMETER *S3* (LET ((*REOPEN-OPEN-FILE* 'WARN)) (OPEN "ext-clisp-tst-abazonk"))) WARNING: OPEN: # already points to file "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst-abazonk" , opening the file again for :INPUT may produce unexpected results EQL-OK: *S3* (OPEN-STREAM-P *S1*) EQL-OK: T (OPEN-STREAM-P *S2*) EQL-OK: T (OPEN-STREAM-P *S3*) EQL-OK: T (EQUAL (TRUENAME *S1*) (TRUENAME *S3*)) EQL-OK: T (DEFPARAMETER *S4* (LET ((*REOPEN-OPEN-FILE* 'CLOSE)) (OPEN "ext-clisp-tst-abazonk"))) EQL-OK: *S4* (OPEN-STREAM-P *S1*) EQL-OK: NIL (OPEN-STREAM-P *S2*) EQL-OK: T (OPEN-STREAM-P *S3*) EQL-OK: T (OPEN-STREAM-P *S4*) EQL-OK: T (EQUAL (TRUENAME *S1*) (TRUENAME *S4*)) EQL-OK: T (DEFPARAMETER *S1* (LET ((*REOPEN-OPEN-FILE* 'CLOSE)) (OPEN "ext-clisp-tst-abazonk" :DIRECTION :OUTPUT))) EQL-OK: *S1* (OPEN-STREAM-P *S1*) EQL-OK: T (OPEN-STREAM-P *S2*) EQL-OK: NIL (OPEN-STREAM-P *S3*) EQL-OK: NIL (OPEN-STREAM-P *S4*) EQL-OK: NIL (EQUAL (TRUENAME *S1*) (TRUENAME *S4*)) EQL-OK: T (LET ((*REOPEN-OPEN-FILE* 0)) (OPEN "ext-clisp-tst-abazonk")) WARNING: OPEN: The value of *REOPEN-OPEN-FILE* should be one of ERROR, WARN, CLOSE, or NIL, not 0. It has been changed to ERROR. [SIMPLE-FILE-ERROR]: OPEN: # already points to file #1="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst-abazonk", opening the file again for :INPUT may produce unexpected results EQL-OK: ERROR (SETF (STREAM-ELEMENT-TYPE *S1*) '(UNSIGNED-BYTE 8)) EQUAL-OK: (UNSIGNED-BYTE 8) (WRITE-BYTE-SEQUENCE #(1 2 3) *S1*) EQUALP-OK: #(1 2 3) (WRITE-BYTE-SEQUENCE #(4 5 6) *S1* :NO-HANG T) EQUALP-OK: #(4 5 6) (WRITE-BYTE-SEQUENCE #(1 2 3) *S1* :NO-HANG T) EQUALP-OK: #(1 2 3) (SETF (STREAM-ELEMENT-TYPE *S1*) 'CHARACTER) EQL-OK: CHARACTER (WRITE-CHAR-SEQUENCE #(#\a) *S1*) EQUALP-OK: #(#\a) (CLOSE *S1*) EQL-OK: T (PATHNAMEP (DELETE-FILE *S1*)) EQL-OK: T (MULTIPLE-VALUE-BIND (CMD ARGS) (CMD-ARGS) (LIST (RUN-PROGRAM CMD :ARGUMENTS (APPEND ARGS '("-x" "(exit 42)"))) (RUN-PROGRAM CMD :ARGUMENTS (APPEND ARGS '("-x" "(exit)"))))) Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x436f000 - 0x438ffff 0x80000000 - 0x800bffff 0x158b006000 - 0x158b020fff 0x158b021000 - 0x158b021fff 0x158b022000 - 0x158b022fff 0x158b023000 - 0x158b024fff 0x158b025000 - 0x158b026fff 0x158b027000 - 0x158b02dfff 0x158b031000 - 0x158b032fff 0x158b033000 - 0x158b071fff 0x158b072000 - 0x158b073fff 0x158b074000 - 0x158b07afff 0x158b07b000 - 0x158b07bfff 0x158b07c000 - 0x158b0a1fff 0x158b0a2000 - 0x158b0a5fff 0x158b0a6000 - 0x158b0a6fff 0x158b0a7000 - 0x158b0a8fff 0x158b0a9000 - 0x158b0a9fff 0x158b0aa000 - 0x158b0aafff 0x158b0ab000 - 0x158b0abfff 0x158b0ac000 - 0x158b0affff 0x158b0b0000 - 0x158b0b0fff 0x158b0b1000 - 0x158b0b1fff 0x158b0b2000 - 0x158b0b3fff 0x158b0b4000 - 0x158b0b4fff 0x158b0b5000 - 0x158b0b5fff 0x158b0b6000 - 0x158b221fff 0x158b222000 - 0x158b224fff 0x158b225000 - 0x158b225fff 0x158b226000 - 0x158b228fff 0x158b229000 - 0x158b23bfff 0x158b23c000 - 0x158b23cfff 0x158b23d000 - 0x158b23dfff 0x158b23e000 - 0x158b35bfff 0x158b35c000 - 0x158b35efff 0x158b35f000 - 0x158b361fff 0x158b362000 - 0x158b366fff 0x3fffdcb000 - 0x3fffdebfff Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xc7a3000 - 0xc7c3fff 0x80000000 - 0x800bffff 0x158ed5f000 - 0x158ed79fff 0x158ed7a000 - 0x158ed7afff 0x158ed7b000 - 0x158ed7bfff 0x158ed7c000 - 0x158ed7dfff 0x158ed7e000 - 0x158ed7ffff 0x158ed80000 - 0x158ed86fff 0x158ed8a000 - 0x158ed8bfff 0x158ed8c000 - 0x158edcafff 0x158edcb000 - 0x158edccfff 0x158edcd000 - 0x158edd3fff 0x158edd4000 - 0x158edd4fff 0x158edd5000 - 0x158edfafff 0x158edfb000 - 0x158edfefff 0x158edff000 - 0x158edfffff 0x158ee00000 - 0x158ee01fff 0x158ee02000 - 0x158ee02fff 0x158ee03000 - 0x158ee03fff 0x158ee04000 - 0x158ee04fff 0x158ee05000 - 0x158ee08fff 0x158ee09000 - 0x158ee09fff 0x158ee0a000 - 0x158ee0afff 0x158ee0b000 - 0x158ee0cfff 0x158ee0d000 - 0x158ee0dfff 0x158ee0e000 - 0x158ee0efff 0x158ee0f000 - 0x158ef7afff 0x158ef7b000 - 0x158ef7dfff 0x158ef7e000 - 0x158ef7efff 0x158ef7f000 - 0x158ef81fff 0x158ef82000 - 0x158ef94fff 0x158ef95000 - 0x158ef95fff 0x158ef96000 - 0x158ef96fff 0x158ef97000 - 0x158f0b4fff 0x158f0b5000 - 0x158f0b7fff 0x158f0b8000 - 0x158f0bafff 0x158f0bb000 - 0x158f0bffff 0x3ffffb4000 - 0x3ffffd4fff EQUAL-OK: (42 NIL) (MULTIPLE-VALUE-BIND (CMD ARGS) (CMD-ARGS) (WITH-OPEN-STREAM (S (MAKE-PIPE-INPUT-STREAM (WITH-OUTPUT-TO-STRING (S) (PRINC CMD S) (DOLIST (A ARGS) (PRINC #\Space S) (PRINC A S)) (PRINC " -x \"(quote hello)\"" S)))) (READ-LINE S))) Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2f73a000 - 0x2f75afff 0x80000000 - 0x800bffff 0x1587fb6000 - 0x1587fd0fff 0x1587fd1000 - 0x1587fd1fff 0x1587fd2000 - 0x1587fd2fff 0x1587fd3000 - 0x1587fd4fff 0x1587fd5000 - 0x1587fd6fff 0x1587fd7000 - 0x1587fddfff 0x1587fe1000 - 0x1587fe2fff 0x1587fe3000 - 0x1588021fff 0x1588022000 - 0x1588023fff 0x1588024000 - 0x158802afff 0x158802b000 - 0x158802bfff 0x158802c000 - 0x1588051fff 0x1588052000 - 0x1588055fff 0x1588056000 - 0x1588056fff 0x1588057000 - 0x1588058fff 0x1588059000 - 0x1588059fff 0x158805a000 - 0x158805afff 0x158805b000 - 0x158805bfff 0x158805c000 - 0x158805ffff 0x1588060000 - 0x1588060fff 0x1588061000 - 0x1588061fff 0x1588062000 - 0x1588063fff 0x1588064000 - 0x1588064fff 0x1588065000 - 0x1588065fff 0x1588066000 - 0x15881d1fff 0x15881d2000 - 0x15881d4fff 0x15881d5000 - 0x15881d5fff 0x15881d6000 - 0x15881d8fff 0x15881d9000 - 0x15881ebfff 0x15881ec000 - 0x15881ecfff 0x15881ed000 - 0x15881edfff 0x15881ee000 - 0x158830bfff 0x158830c000 - 0x158830efff 0x158830f000 - 0x1588311fff 0x1588312000 - 0x1588316fff 0x3fffb21000 - 0x3fffb41fff EQUAL-OK: "HELLO" (MULTIPLE-VALUE-BIND (CMD ARGS) (CMD-ARGS) (WITH-OPEN-STREAM (S (MAKE-PIPE-OUTPUT-STREAM (WITH-OUTPUT-TO-STRING (S) (PRINC CMD S) (DOLIST (A ARGS) (PRINC #\Space S) (PRINC A S))))) (WRITE-LINE "(quit)" S))) EQUAL-OK: "(quit)" (MULTIPLE-VALUE-BIND (CMD ARGS) (CMD-ARGS) (MULTIPLE-VALUE-BIND (PID IN OUT ERR) (EXT::LAUNCH CMD :ARGUMENTS ARGS :INPUT :PIPE :OUTPUT :PIPE :ERROR :PIPE) (UNWIND-PROTECT (LIST (INTEGERP (SHOW PID)) (OUTPUT-STREAM-P IN) (INPUT-STREAM-P OUT) (INPUT-STREAM-P ERR) (WRITE-LINE "(quit)" IN) (FORCE-OUTPUT IN) (READ-LINE OUT)) (CLOSE IN) (CLOSE OUT) (CLOSE ERR)))) 108005 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x1a1a9000 - 0x1a1c9fff 0x80000000 - 0x800bffff 0x1586f09000 - 0x1586f23fff 0x1586f24000 - 0x1586f24fff 0x1586f25000 - 0x1586f25fff 0x1586f26000 - 0x1586f27fff 0x1586f28000 - 0x1586f29fff 0x1586f2a000 - 0x1586f30fff 0x1586f34000 - 0x1586f35fff 0x1586f36000 - 0x1586f74fff 0x1586f75000 - 0x1586f76fff 0x1586f77000 - 0x1586f7dfff 0x1586f7e000 - 0x1586f7efff 0x1586f7f000 - 0x1586fa4fff 0x1586fa5000 - 0x1586fa8fff 0x1586fa9000 - 0x1586fa9fff 0x1586faa000 - 0x1586fabfff 0x1586fac000 - 0x1586facfff 0x1586fad000 - 0x1586fadfff 0x1586fae000 - 0x1586faefff 0x1586faf000 - 0x1586fb2fff 0x1586fb3000 - 0x1586fb3fff 0x1586fb4000 - 0x1586fb4fff 0x1586fb5000 - 0x1586fb6fff 0x1586fb7000 - 0x1586fb7fff 0x1586fb8000 - 0x1586fb8fff 0x1586fb9000 - 0x1587124fff 0x1587125000 - 0x1587127fff 0x1587128000 - 0x1587128fff 0x1587129000 - 0x158712bfff 0x158712c000 - 0x158713efff 0x158713f000 - 0x158713ffff 0x1587140000 - 0x1587140fff 0x1587141000 - 0x158725efff 0x158725f000 - 0x1587261fff 0x1587262000 - 0x1587264fff 0x1587265000 - 0x1587269fff 0x3fffeff000 - 0x3ffff1ffff [1]> EQUAL-OK: (T T T T "(quit)" NIL "[1]> ") (LET ((ARGS (LIST (CODE-CHAR (RANDOM CHAR-CODE-LIMIT)) (USER-HOMEDIR-PATHNAME) 'ARGS))) (LOOP :FOR L :IN '((LAMBDA (A B C) (CONCATENATE 'STRING "[" (SYMBOL-NAME C) " " (NAMESTRING B) " " (CHAR-NAME A) "]"))) :FOR C = (COMPILE NIL L) :DO (DISASSEMBLE C) :ALWAYS (STRING= (APPLY (COERCE L 'FUNCTION) ARGS) (SHOW (APPLY C ARGS))))) Disassembly of function NIL (CONST 0) = "[" (CONST 1) = " " (CONST 2) = " " (CONST 3) = "]" 3 required arguments 0 optional arguments No rest parameter No keyword parameters 12 byte-code instructions: 0 (CONST&PUSH 0) ; "[" 1 (LOAD&PUSH 2) 2 (CALLS2&PUSH 166) ; SYMBOL-NAME 4 (CONST&PUSH 1) ; " " 5 (LOAD&PUSH 5) 6 (CALLS2&PUSH 6) ; NAMESTRING 8 (CONST&PUSH 2) ; " " 9 (LOAD&PUSH 8) 10 (CALLS1&PUSH 48) ; CHAR-NAME 12 (CONST&PUSH 3) ; "]" 13 (CALLSR 7 19) ; STRING-CONCAT 16 (SKIP&RET 4) "[ARGS /builddir/ U0004C106]" EQL-OK: T (TYPE-OF (LAMBDA (X) (DECLARE (COMPILE IDENT)) X)) EQL-OK: COMPILED-FUNCTION (SYSTEM::CLOSURE-NAME (LAMBDA (X) (DECLARE (COMPILE IDENT)) X)) EQL-OK: IDENT (LET ((L (LET ((X 12)) (DECLARE (COMPILE INCREMENT)) (LIST (LAMBDA NIL (INCF X)) (LAMBDA NIL (DECF X)))))) (LIST (EVERY #'COMPILED-FUNCTION-P L) (MAPCAR #'SYSTEM::CLOSURE-NAME L) (MAPCAR #'FUNCALL L))) EQUAL-OK: (T (INCREMENT-1 INCREMENT-2) (13 12)) (MULTIPLE-VALUE-BIND (MYPUSH MYPOP) (LET ((ACC NIL)) (VALUES (LAMBDA (X) (PUSH X ACC)) (LAMBDA NIL (POP ACC)))) (LIST (LIST (FUNCALL MYPOP) (FUNCALL MYPUSH 1) (FUNCALL MYPOP) (FUNCALL MYPOP) (FUNCALL MYPUSH 2) (FUNCALL MYPUSH 3) (FUNCALL MYPOP) (FUNCALL MYPOP) (FUNCALL MYPOP)) (LET ((PAIR (READ-FROM-STRING (WITH-STANDARD-IO-SYNTAX (LET ((*PRINT-CLOSURE* T)) (PRIN1-TO-STRING (CONS MYPUSH MYPOP))))))) (LIST (FUNCALL (CDR PAIR)) (FUNCALL (CAR PAIR) 1) (FUNCALL (CDR PAIR)) (FUNCALL (CDR PAIR)) (FUNCALL (CAR PAIR) 2) (FUNCALL (CAR PAIR) 3) (FUNCALL (CDR PAIR)) (FUNCALL (CDR PAIR)) (FUNCALL (CDR PAIR)))))) EQUAL-OK: ((NIL (1) 1 NIL (2) (3 2) 3 2 NIL) (NIL (1) 1 NIL (2) (3 2) 3 2 NIL)) (HANDLER-CASE (LETF ((*CURRENT-LANGUAGE* 'GERMAN)) (LIST (STRING= "Bis bald!" (SYSTEM::TEXT "Bye.")) (EQ *CURRENT-LANGUAGE* 'DEUTSCH))) (ERROR (E) (PRINC-ERROR E) '(T T))) [SIMPLE-ERROR]: SYSTEM::SET-CURRENT-LANGUAGE: locales "de_DE.UTF-8" and "de_DE" are not installed on this system EQUAL-OK: (T T) (HANDLER-CASE (LETF ((*CURRENT-LANGUAGE* 'FRENCH)) (LIST (STRING= "À bientôt !" (SYSTEM::TEXT "Bye.")) (STRING= *CURRENT-LANGUAGE* "FRANÇAIS"))) (ERROR (E) (PRINC-ERROR E) '(T T))) EQUAL-OK: (T T) (HANDLER-CASE (LETF ((*CURRENT-LANGUAGE* 'RUSSIAN)) (LIST (STRING= "До свидания! Не поминайте лихом!" (SYSTEM::TEXT "Bye.")) (STRING= *CURRENT-LANGUAGE* "РУССКИЙ"))) (ERROR (E) (PRINC-ERROR E) '(T T))) [SIMPLE-ERROR]: SYSTEM::SET-CURRENT-LANGUAGE: locales "ru_RU.UTF-8" and "ru_RU" are not installed on this system EQUAL-OK: (T T) (LETF ((*CURRENT-LANGUAGE* 'ENGLISH)) (LIST (STRING= "Bye." (SYSTEM::TEXT "Bye.")) (EQ *CURRENT-LANGUAGE* 'ENGLISH))) EQUAL-OK: (T T) (SYMBOLS-CLEANUP '(ANONYMIZE-COMPILED-FORM-GENSYM CHECK-LOAD TEST-DOHASH *S1* *S2* *S3* *S4*)) EQL-OK: NIL RUN-TEST: finished "ext-clisp" (0 errors out of 134 tests) RUN-TEST: started # (ENCODING-CHARSET *DEFAULT-FILE-ENCODING*) EQL-OK: CHARSET:UTF-8 (USE-PACKAGE "FFI") EQL-OK: T (MULTIPLE-VALUE-LIST (SIZEOF 'UINT8)) EQUAL-OK: (1 1) (BITSIZEOF 'SINT32) EQL-OK: 32 (MULTIPLE-VALUE-LIST (SIZEOF '(C-POINTER INT))) EQUAL-OK: (8 8) (FOREIGN-ADDRESS-UNSIGNED (UNSIGNED-FOREIGN-ADDRESS 3)) EQL-OK: 3 (HANDLER-CASE (PROGN (DEF-CALL-OUT STRERROR (:ARGUMENTS (ERRNUM INT)) (:LANGUAGE :STDC) (:LIBRARY :DEFAULT) (:RETURN-TYPE C-STRING :NONE)) (LOOP :FOR I :FROM 0 :TO 100 :DO (SHOW (STRERROR I))) (DEF-C-VAR ERRNO (:TYPE INT) (:LIBRARY :DEFAULT)) (DEFUN MY-OS-ERROR (WHERE) (ERROR "~S failed: errno=~D: ~S" WHERE ERRNO (STRERROR ERRNO)))) (ERROR (C) (PRINC-ERROR C) (DEFUN MY-OS-ERROR (WHERE) (ERROR "~S failed" WHERE)))) "Success" "Operation not permitted" "No such file or directory" "No such process" "Interrupted system call" "Input/output error" "No such device or address" "Argument list too long" "Exec format error" "Bad file descriptor" "No child processes" "Resource temporarily unavailable" "Cannot allocate memory" "Permission denied" "Bad address" "Block device required" "Device or resource busy" "File exists" "Invalid cross-device link" "No such device" "Not a directory" "Is a directory" "Invalid argument" "Too many open files in system" "Too many open files" "Inappropriate ioctl for device" "Text file busy" "File too large" "No space left on device" "Illegal seek" "Read-only file system" "Too many links" "Broken pipe" "Numerical argument out of domain" "Numerical result out of range" "Resource deadlock avoided" "File name too long" "No locks available" "Function not implemented" "Directory not empty" "Too many levels of symbolic links" "Unknown error 41" "No message of desired type" "Identifier removed" "Channel number out of range" "Level 2 not synchronized" "Level 3 halted" "Level 3 reset" "Link number out of range" "Protocol driver not attached" "No CSI structure available" "Level 2 halted" "Invalid exchange" "Invalid request descriptor" "Exchange full" "No anode" "Invalid request code" "Invalid slot" "Unknown error 58" "Bad font file format" "Device not a stream" "No data available" "Timer expired" "Out of streams resources" "Machine is not on the network" "Package not installed" "Object is remote" "Link has been severed" "Advertise error" "Srmount error" "Communication error on send" "Protocol error" "Multihop attempted" "RFS specific error" "Bad message" "Value too large for defined data type" "Name not unique on network" "File descriptor in bad state" "Remote address changed" "Can not access a needed shared library" "Accessing a corrupted shared library" ".lib section in a.out corrupted" "Attempting to link in too many shared libraries" "Cannot exec a shared library directly" "Invalid or incomplete multibyte or wide character" "Interrupted system call should be restarted" "Streams pipe error" "Too many users" "Socket operation on non-socket" "Destination address required" "Message too long" "Protocol wrong type for socket" "Protocol not available" "Protocol not supported" "Socket type not supported" "Operation not supported" "Protocol family not supported" "Address family not supported by protocol" "Address already in use" "Cannot assign requested address" "Network is down" EQL-OK: MY-OS-ERROR (DEF-CALL-OUT GETHOSTNAME1 (:NAME "gethostname") (:ARGUMENTS (NAME (C-PTR (C-ARRAY-MAX CHARACTER 256)) :OUT :ALLOCA) (LEN INT)) (:RETURN-TYPE INT) (:LANGUAGE :STDC) (:LIBRARY :DEFAULT)) EQL-OK: GETHOSTNAME1 (DEFUN MYHOSTNAME1 NIL (MULTIPLE-VALUE-BIND (SUCCESS NAME) (GETHOSTNAME1 256) (IF (ZEROP SUCCESS) NAME (MY-OS-ERROR 'MYHOSTNAME1)))) EQL-OK: MYHOSTNAME1 (DEF-CALL-OUT GETHOSTNAME2 (:NAME "gethostname") (:ARGUMENTS (NAME (C-PTR (C-ARRAY-MAX CHAR 256)) :OUT :ALLOCA) (LEN INT)) (:RETURN-TYPE INT) (:LANGUAGE :STDC) (:LIBRARY :DEFAULT)) EQL-OK: GETHOSTNAME2 (DEFUN MYHOSTNAME2 NIL (MULTIPLE-VALUE-BIND (SUCCESS NAME) (GETHOSTNAME2 256) (IF (ZEROP SUCCESS) NAME (MY-OS-ERROR 'MYHOSTNAME2)))) EQL-OK: MYHOSTNAME2 (DEF-CALL-OUT GETHOSTNAME3 (:NAME "gethostname") (:ARGUMENTS (NAME C-POINTER) (LEN INT)) (:RETURN-TYPE INT) (:LANGUAGE :STDC) (:LIBRARY :DEFAULT)) EQL-OK: GETHOSTNAME3 (DEFUN MYHOSTNAME3 NIL (WITH-FOREIGN-OBJECT (NAME '(C-ARRAY-MAX CHARACTER 256)) (LET ((SUCCESS (GETHOSTNAME3 NAME 256))) (IF (ZEROP SUCCESS) (FOREIGN-VALUE NAME) (MY-OS-ERROR 'MYHOSTNAME3))))) EQL-OK: MYHOSTNAME3 (DEFUN MYHOSTNAME4 NIL (WITH-FOREIGN-OBJECT (NAME '(C-ARRAY-MAX CHAR 256)) (LET ((SUCCESS (GETHOSTNAME3 NAME 256))) (IF (ZEROP SUCCESS) (FOREIGN-VALUE NAME) (MY-OS-ERROR 'MYHOSTNAME4))))) EQL-OK: MYHOSTNAME4 (STRING= (MYHOSTNAME1) (MYHOSTNAME3)) EQL-OK: T (EQUALP (MYHOSTNAME2) (MYHOSTNAME4)) EQL-OK: T (LET ((N1 (SHOW (MYHOSTNAME1))) (MI (SHOW (MACHINE-INSTANCE)))) (OR (AND (>= (LENGTH MI) (LENGTH N1)) (STRING= N1 MI :END2 (LENGTH N1))) (PROGN (DEF-CALL-OUT GETHOSTBYNAME (:NAME "gethostbyname") (:ARGUMENTS (NAME C-STRING)) (:LANGUAGE :STDC) (:LIBRARY :DEFAULT) (:RETURN-TYPE (C-PTR (C-STRUCT LIST (NAME C-STRING))))) (SETQ N1 (FIRST (SHOW (GETHOSTBYNAME N1)))) (STRING= N1 MI :END2 (LENGTH N1))))) "fedora-riscv-4.gcc143.osuosl.org" "fedora-riscv-4.gcc143.osuosl.org [192.168.122.172]" EQL-OK: T (STRING= (MYHOSTNAME1) (CONVERT-STRING-FROM-BYTES (MYHOSTNAME2) CHARSET:UTF-8)) EQL-OK: T (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:DOCUMENTATION "return the pointer argument as is") (:ARGUMENTS (OBJ C-POINTER)) (:RETURN-TYPE C-POINTER) (:LANGUAGE :STDC)) EQL-OK: C-SELF (SYSTEM::GET-SIGNATURE #'C-SELF) EQUALP-OK: #(1 0 NIL NIL NIL NIL) (DESCRIBE #'C-SELF) # is a foreign function of foreign type (C-FUNCTION (:ARGUMENTS ((:|arg1| C-POINTER :IN :NONE))) (:RETURN-TYPE C-POINTER :NONE) (:LANGUAGE :STDC)) . EQL-OK: NIL (DOCUMENTATION 'C-SELF 'FUNCTION) EQUAL-OK: "return the pointer argument as is" (SETF (DOCUMENTATION 'C-SELF 'FUNCTION) "junk") EQUAL-OK: "junk" (DOCUMENTATION 'C-SELF 'FUNCTION) EQUAL-OK: "junk" (SETF (DOCUMENTATION 'C-SELF 'FUNCTION) NIL) EQL-OK: NIL (DOCUMENTATION 'C-SELF 'FUNCTION) EQL-OK: NIL (SETF (DOCUMENTATION 'C-SELF 'FUNCTION) "return argument") EQUAL-OK: "return argument" (DOCUMENTATION 'C-SELF 'FUNCTION) EQUAL-OK: "return argument" (TYPEP #'C-SELF 'FUNCTION) EQL-OK: T (TYPEP #'C-SELF 'FOREIGN-FUNCTION) EQL-OK: T (SUBTYPEP 'FOREIGN-FUNCTION 'FUNCTION) EQL-OK: T (CHECK-TYPE #'C-SELF FOREIGN-FUNCTION) EQL-OK: NIL (INTEGERP (FOREIGN-ADDRESS-UNSIGNED #'C-SELF)) EQL-OK: T (EQL (FOREIGN-ADDRESS-UNSIGNED #'C-SELF) (SYSTEM::CODE-ADDRESS-OF #'C-SELF)) EQL-OK: T (FUNCTIONP (SETQ PARSE-C-TYPE-OPTIMIZER (COMPILER-MACRO-FUNCTION 'PARSE-C-TYPE))) EQL-OK: T (FUNCALL PARSE-C-TYPE-OPTIMIZER '(PARSE-C-TYPE 'C-POINTER) NIL) EQUAL-OK: 'C-POINTER (FUNCALL PARSE-C-TYPE-OPTIMIZER '(PARSE-C-TYPE 'C-POINTER 'OPAQUE) NIL) EQUAL-OK: (PARSE-C-TYPE 'C-POINTER 'OPAQUE) (DEF-C-TYPE OPAQUE C-POINTER) EQL-OK: OPAQUE (FUNCALL PARSE-C-TYPE-OPTIMIZER '(PARSE-C-TYPE 'OPAQUE) NIL) EQUAL-OK: 'C-POINTER (FUNCALL PARSE-C-TYPE-OPTIMIZER '(PARSE-C-TYPE '(C-PTR UINT8)) NIL) EQUAL-OK: (PARSE-C-TYPE '(C-PTR UINT8)) (CAR (FUNCALL PARSE-C-TYPE-OPTIMIZER '(PARSE-C-TYPE `(C-ARRAY UINT8 ,L)) NIL)) EQL-OK: VECTOR (CAR (FUNCALL PARSE-C-TYPE-OPTIMIZER '(PARSE-C-TYPE `(C-ARRAY ,TYPE ,L)) NIL)) EQL-OK: PARSE-C-TYPE (LET NIL (DECLARE (COMPILE)) (WITH-C-VAR (PLACE 'LONG -12345678) PLACE)) EQL-OK: -12345678 (LET NIL (DECLARE (COMPILE)) (WITH-FOREIGN-OBJECT (FV 'LONG -12345678) (FOREIGN-VALUE FV))) EQL-OK: -12345678 (WITH-C-VAR (PLACE '(C-ARRAY SINT8 (2 3)) #2A((-1 -2 -3) (-9 -8 -7))) PLACE) EQUALP-OK: #2A((-1 -2 -3) (-9 -8 -7)) (WITH-C-VAR (PLACE '(C-ARRAY SINT8 (2 3)) #(#(-1 -2 -3) #(-9 -8 -7))) PLACE) [SIMPLE-ERROR]: FFI::EXEC-ON-STACK: #(#(-1 -2 -3) #(-9 -8 -7)) cannot be converted to the foreign type #(C-ARRAY SINT8 2 3) EQL-OK: ERROR (WITH-C-VAR (PLACE '(C-ARRAY SINT8 (2 3)) #2A((-1 -2 -3) (-9 -8 -7))) (CAST PLACE '(C-ARRAY SINT8 (3 2)))) EQUALP-OK: #2A((-1 -2) (-3 -9) (-8 -7)) (WITH-FOREIGN-OBJECT (A '(C-ARRAY SINT32 4) #(122222 928389716 -1987234239 -123141)) (MEMORY-AS A 'SINT32 8)) EQL-OK: -1987234239 (WITH-C-VAR (A '(C-ARRAY SINT32 4) #(122222 928389716 -19 -123141)) (SETF (MEMORY-AS (C-VAR-ADDRESS A) 'SINT32 8) 478798798) A) EQUALP-OK: #(122222 928389716 478798798 -123141) (WITH-C-VAR (A '(C-ARRAY SINT32 4) #(122222 928389716 -19 -123141)) (SETF (MEMORY-AS (C-VAR-ADDRESS A) 'SINT32 8) 478798798)) EQL-OK: 478798798 (WITH-FOREIGN-OBJECT (A '(C-ARRAY DOUBLE-FLOAT 2) #(9.05d12 -1.2765d-12)) (MEMORY-AS A 'DOUBLE-FLOAT 0)) EQL-OK: 9.05d12 (WITH-FOREIGN-OBJECT (A '(C-ARRAY SINGLE-FLOAT 2) #(9.05E12 -1.2765E-12)) (MEMORY-AS A 'SINGLE-FLOAT 0)) EQL-OK: 9.05E12 (WITH-FOREIGN-OBJECT (X 'SINGLE-FLOAT) (LIST (SETF (MEMORY-AS X 'SINGLE-FLOAT) -2.823E-14) (FOREIGN-VALUE X))) EQUAL-OK: (-2.823E-14 -2.823E-14) (WITH-C-VAR (P '(C-PTR SINT32) -823498) (= (FOREIGN-ADDRESS-UNSIGNED (MEMORY-AS (C-VAR-ADDRESS P) 'C-POINTER)) (FOREIGN-ADDRESS-UNSIGNED (C-VAR-ADDRESS (DEREF P))))) EQL-OK: T (WITH-FOREIGN-OBJECT (P '(C-PTR SINT32) -823498) (= (FOREIGN-ADDRESS-UNSIGNED (MEMORY-AS P 'C-POINTER)) (FOREIGN-ADDRESS-UNSIGNED P))) EQL-OK: NIL (WITH-FOREIGN-OBJECT (P '(C-PTR SINT16)) (WITH-FOREIGN-OBJECT (I 'SINT16 -32765) (LIST (EQ (SETF (MEMORY-AS P 'C-POINTER) I) I) (FOREIGN-VALUE P)))) EQUAL-OK: (T -32765) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (OBJ (C-POINTER SHORT))) (:RETURN-TYPE (C-PTR-NULL SHORT)) (:LANGUAGE :STDC)) (C-SELF NIL)) EQL-OK: NIL (WITH-FOREIGN-OBJECT (X 'SHORT -29876) (C-SELF X)) EQL-OK: -29876 (WITH-FOREIGN-OBJECT (X 'SHORT -19635) (C-SELF (FOREIGN-ADDRESS X))) EQL-OK: -19635 (WITH-FOREIGN-OBJECT (X 'CHARACTER #\t) (C-SELF X)) [SIMPLE-ERROR]: FFI::FOREIGN-CALL-OUT: # cannot be converted to the foreign type SHORT EQL-OK: ERROR (TYPE-OF (FOREIGN-FUNCTION #'C-SELF (PARSE-C-TYPE '(C-FUNCTION (:ARGUMENTS (OBJ (C-POINTER SHORT))) (:RETURN-TYPE (C-PTR-NULL SHORT)) (:LANGUAGE :STDC))))) EQL-OK: FOREIGN-FUNCTION (FUNCALL (FOREIGN-FUNCTION #'C-SELF (PARSE-C-TYPE '(C-FUNCTION (:ARGUMENTS (OBJ LONG)) (:RETURN-TYPE LONG) (:LANGUAGE :STDC))) :NAME "foo1") 1734829927) EQL-OK: 1734829927 (FUNCALL (FOREIGN-FUNCTION (FOREIGN-ADDRESS #'C-SELF) (PARSE-C-TYPE '(C-FUNCTION (:ARGUMENTS (OBJ LONG)) (:RETURN-TYPE LONG) (:LANGUAGE :STDC))) :NAME "foo2") 1987475062) EQL-OK: 1987475062 (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (OBJ C-POINTER)) (:RETURN-TYPE (C-POINTER CHAR)) (:LANGUAGE :STDC)) (C-SELF NIL)) EQL-OK: NIL (WITH-C-VAR (X 'CHAR -112) (LET ((REF (C-SELF (C-VAR-ADDRESS X)))) (LIST (TYPEP REF 'FOREIGN-VARIABLE) (FOREIGN-VALUE REF)))) EQUAL-OK: (T -112) (DEF-C-STRUCT TRIV (I INT)) EQL-OK: TRIV (DEF-CALL-OUT TRIGGER (:ARGUMENTS (STRUCT_ARRAY (C-ARRAY-PTR (C-PTR TRIV)))) (:NAME "ffi_identity") (:LANGUAGE :STDC) (:RETURN-TYPE (C-ARRAY-PTR (C-PTR TRIV)))) EQL-OK: TRIGGER (TRIGGER (VECTOR (MAKE-TRIV :I 0) (MAKE-TRIV :I 1) (MAKE-TRIV :I 3) (MAKE-TRIV :I 4) (MAKE-TRIV :I 5) (MAKE-TRIV :I 6))) EQUALP-OK: #(#S(TRIV :I 0) #S(TRIV :I 1) #S(TRIV :I 3) #S(TRIV :I 4) #S(TRIV :I 5) #S(TRIV :I 6)) (WITH-FOREIGN-OBJECT (X '(C-ARRAY-PTR INT) (VECTOR -4 6 7)) (FOREIGN-VALUE X)) EQUALP-OK: #(-4 6 7) (LET ((V (ALLOCATE-DEEP 'TRIV (MAKE-TRIV :I 42)))) (PROG1 (LIST (TYPEOF (FOREIGN-VALUE V)) (SLOT (FOREIGN-VALUE V) 'I)) (FOREIGN-FREE V))) EQUAL-OK: ((C-STRUCT TRIV (I INT)) 42) (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (OBJ C-POINTER)) (:RETURN-TYPE (C-POINTER TRIV)) (:LANGUAGE :STDC)) EQL-OK: C-SELF (WITH-C-VAR (V 'TRIV (MAKE-TRIV :I 8476272)) (WITH-C-PLACE (W (C-SELF (C-VAR-OBJECT V))) (SETF (SLOT V 'I) -74590302) (LIST (TYPEOF W) (SLOT W 'I)))) EQUAL-OK: ((C-STRUCT TRIV (I INT)) -74590302) (LIST (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (OBJ (C-POINTER TRIV))) (:RETURN-TYPE C-POINTER) (:LANGUAGE :STDC)) (C-SELF NIL)) EQUAL-OK: (C-SELF NIL) (TYPE-OF (SETQ ORIG-ENCODING *FOREIGN-ENCODING*)) EQL-OK: ENCODING (TYPEP (SETF *FOREIGN-ENCODING* (MAKE-ENCODING :CHARSET 'CHARSET:ISO-8859-1)) 'ENCODING) EQL-OK: T (TYPEP (SETF *FOREIGN-ENCODING* (MAKE-ENCODING :CHARSET 'CHARSET:UTF-8)) 'ENCODING) EQL-OK: T (TYPEP (FFI::FIND-FOREIGN-VARIABLE "ffi_user_pointer" (PARSE-C-TYPE 'C-POINTER) NIL NIL NIL) 'FOREIGN-VARIABLE) EQL-OK: T (FFI::FIND-FOREIGN-VARIABLE "ffi_user_pointer" (PARSE-C-TYPE 'UINT) NIL NIL NIL) [SIMPLE-ERROR]: FFI::FIND-FOREIGN-VARIABLE: type specifications for foreign variable # conflict: C-POINTER and UINT EQL-OK: ERROR (TYPEP (FFI::FIND-FOREIGN-VARIABLE "ffi_user_pointer" (PARSE-C-TYPE '(C-ARRAY-PTR SINT8)) NIL NIL NIL) 'FOREIGN-VARIABLE) EQL-OK: T (DEF-C-VAR USER-POINTER (:TYPE C-POINTER) (:NAME "ffi_user_pointer")) EQL-OK: USER-POINTER (DESCRIBE (GET 'USER-POINTER 'FOREIGN-VARIABLE)) # is a foreign variable of foreign type C-POINTER. EQL-OK: NIL (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (OBJ (C-PTR-NULL (C-ARRAY CHARACTER 3)))) (:RETURN-TYPE (C-PTR (C-ARRAY UINT8 3))) (:LANGUAGE :STDC)) (C-SELF "@A0")) EQUALP-OK: #(64 65 48) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (OBJ (C-PTR-NULL (C-ARRAY SINT8 4)))) (:RETURN-TYPE (C-ARRAY-PTR UINT8)) (:LANGUAGE :STDC)) (LIST (C-SELF #(127 64 63 0)) (C-SELF NIL))) EQUALP-OK: (#(127 64 63) NIL) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (OBJ (C-PTR-NULL (C-ARRAY UINT8 5)))) (:RETURN-TYPE (C-ARRAY-PTR SINT8)) (:LANGUAGE :STDC)) (C-SELF (MAKE-ARRAY 5 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-CONTENTS '(127 63 64 0 6)))) EQUALP-OK: #(127 63 64) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (OBJ C-STRING)) (:RETURN-TYPE (C-ARRAY-PTR UINT8)) (:LANGUAGE :STDC)) (C-SELF (COERCE '(#\@ #\A #\Newline #\2) 'STRING))) EQUALP-OK: #(64 65 10 50) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (OBJ (C-PTR (C-ARRAY-MAX UINT16 4)) :IN-OUT)) (:RETURN-TYPE NIL) (:LANGUAGE :STDC)) (C-SELF (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 16) :INITIAL-CONTENTS '(128 255 0 127)))) EQUALP-OK: #(128 255) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (A1 (C-PTR (C-ARRAY-MAX UINT32 4))) (A2 (C-PTR (C-ARRAY-MAX UINT8 4))) (A3 (C-PTR (C-ARRAY-MAX UINT8 4))) (A4 (C-PTR (C-ARRAY UINT32 2)))) (:RETURN-TYPE (C-PTR (C-ARRAY-MAX SINT32 4))) (:LANGUAGE :STDC)) (C-SELF (MAKE-ARRAY 3 :ELEMENT-TYPE '(UNSIGNED-BYTE 32) :INITIAL-CONTENTS '(128 0 127)) (VECTOR 1 2 3) (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :INITIAL-CONTENTS '(241 17)) (MAKE-ARRAY 2 :ELEMENT-TYPE '(UNSIGNED-BYTE 32) :INITIAL-CONTENTS '(1299 192225)))) EQUALP-OK: #(128) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (OBJ (C-PTR (C-ARRAY SINT8 4)) :IN-OUT)) (:RETURN-TYPE NIL) (:LANGUAGE :STDC)) (C-SELF #(-128 -99 0 127))) EQUALP-OK: #(-128 -99 0 127) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (OBJ (C-PTR (C-ARRAY UINT16 4)) :IN-OUT)) (:RETURN-TYPE NIL) (:LANGUAGE :STDC)) (C-SELF (MAKE-ARRAY 4 :ELEMENT-TYPE '(UNSIGNED-BYTE 16) :INITIAL-CONTENTS '(128 255 0 127)))) EQUALP-OK: #(128 255 0 127) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST BOOLEAN) (OBJ (C-PTR (C-ARRAY UINT16 4)) :IN-OUT)) (:RETURN-TYPE NIL) (:LANGUAGE :STDC)) (C-SELF T #(1000 255 0 127))) EQUALP-OK: #(1000 255 0 127) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (OBJ (C-PTR (C-UNION (C1 CHARACTER) (S (C-ARRAY-PTR CHARACTER)))))) (:RETURN-TYPE (C-PTR CHARACTER)) (:LANGUAGE :STDC)) (C-SELF #\w)) EQL-OK: #\w (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST BOOLEAN) (OBJ (C-PTR (C-UNION (C CHARACTER) (B BOOLEAN) (P C-POINTER))) :IN-OUT)) (:RETURN-TYPE NIL) (:LANGUAGE :STDC)) (C-SELF T #\j)) EQL-OK: #\j (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST C-STRING)) (:RETURN-TYPE (C-PTR (C-ARRAY CHARACTER 4))) (:LANGUAGE :STDC)) (C-SELF "zrewp")) EQUAL-OK: "zrew" (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-ARRAY-PTR UINT8))) (:RETURN-TYPE (C-PTR (C-ARRAY CHARACTER 4))) (:LANGUAGE :STDC)) (C-SELF #(64 65 66 67 68))) EQUAL-OK: "@ABC" (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-ARRAY-PTR UINT8))) (:RETURN-TYPE C-STRING) (:LANGUAGE :STDC)) (C-SELF #(230 151 165 230 156 172 232 170 158))) EQUAL-OK: "日本語" (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-ARRAY-PTR UINT8))) (:RETURN-TYPE (C-PTR (C-ARRAY CHARACTER 9))) (:LANGUAGE :STDC)) (C-SELF #(230 151 165 230 156 172 232 170 158))) EQUAL-OK: "日本語" (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-ARRAY-PTR UINT8))) (:RETURN-TYPE (C-PTR (C-ARRAY-MAX CHARACTER 20))) (:LANGUAGE :STDC)) (C-SELF #(230 151 165 230 156 172 232 170 158 0 158 170 232 172 156 230 165 151 230 10))) EQUAL-OK: "日本語" (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-ARRAY-PTR UINT8))) (:RETURN-TYPE (C-ARRAY-PTR CHARACTER)) (:LANGUAGE :STDC)) (C-SELF #(230 151 165 230 156 172 232 170 158 0 158 170 232 172 156 230 165 151 230 10))) EQUAL-OK: "日本語" (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST UINT8)) (:RETURN-TYPE CHARACTER) (:LANGUAGE :STDC)) (C-SELF 97)) EQL-OK: #\a (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST UINT8)) (:RETURN-TYPE CHARACTER) (:LANGUAGE :STDC)) (C-SELF 158)) [SIMPLE-CHARSET-TYPE-ERROR]: FFI::FOREIGN-CALL-OUT: Invalid byte #x9E in CHARSET:ASCII conversion EQL-OK: ERROR (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-ARRAY-PTR UINT8))) (:RETURN-TYPE (C-PTR (C-ARRAY CHARACTER (3 3)))) (:LANGUAGE :STDC)) (C-SELF #(97 98 99 100 101 102 103 104 105))) EQUALP-OK: #2A((#\a #\b #\c) (#\d #\e #\f) (#\g #\h #\i)) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-ARRAY-PTR UINT8))) (:RETURN-TYPE (C-PTR (C-ARRAY CHARACTER (3 3)))) (:LANGUAGE :STDC)) (ARRAY-DIMENSIONS (C-SELF #(230 151 165 230 156 172 232 170 158)))) [SIMPLE-CHARSET-TYPE-ERROR]: FFI::FOREIGN-CALL-OUT: Invalid byte #xE6 in CHARSET:ASCII conversion EQL-OK: ERROR (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-ARRAY-PTR UINT8))) (:RETURN-TYPE (C-PTR CHARACTER)) (:LANGUAGE :STDC)) (C-SELF #(97 98 99 100 101 102 103 104 105))) EQL-OK: #\a (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-ARRAY-PTR UINT8))) (:RETURN-TYPE (C-PTR CHARACTER)) (:LANGUAGE :STDC)) (C-SELF #(230 151 165 230 156 172 232 170 158))) [SIMPLE-CHARSET-TYPE-ERROR]: FFI::FOREIGN-CALL-OUT: Invalid byte #xE6 in CHARSET:ASCII conversion EQL-OK: ERROR (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-ARRAY-PTR UINT8))) (:RETURN-TYPE (C-PTR-NULL CHARACTER)) (:LANGUAGE :STDC)) (C-SELF #(97 98 99 100 101 102 103 104 105))) EQL-OK: #\a (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-ARRAY-PTR UINT8))) (:RETURN-TYPE (C-PTR-NULL CHARACTER)) (:LANGUAGE :STDC)) (C-SELF #(230 151 165 230 156 172 232 170 158))) [SIMPLE-CHARSET-TYPE-ERROR]: FFI::FOREIGN-CALL-OUT: Invalid byte #xE6 in CHARSET:ASCII conversion EQL-OK: ERROR (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST C-STRING)) (:RETURN-TYPE (C-ARRAY-PTR UINT8)) (:LANGUAGE :STDC)) (C-SELF "日本語")) EQUALP-OK: #(230 151 165 230 156 172 232 170 158) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-PTR (C-ARRAY CHARACTER 9)))) (:RETURN-TYPE (C-PTR (C-ARRAY UINT8 9))) (:LANGUAGE :STDC)) (C-SELF "日本語")) EQUALP-OK: #(230 151 165 230 156 172 232 170 158) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-PTR (C-ARRAY-MAX CHARACTER 20)))) (:RETURN-TYPE (C-ARRAY-PTR UINT8)) (:LANGUAGE :STDC)) (C-SELF "日本語")) EQUALP-OK: #(230 151 165 230 156 172 232 170 158) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-PTR (C-ARRAY-MAX CHARACTER 7)))) (:RETURN-TYPE (C-ARRAY-PTR UINT8)) (:LANGUAGE :STDC)) (C-SELF "日本語")) EQUALP-OK: #(230 151 165 230 156 172) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-ARRAY-PTR CHARACTER))) (:RETURN-TYPE (C-ARRAY-PTR UINT8)) (:LANGUAGE :STDC)) (C-SELF "日本語")) EQUALP-OK: #(230 151 165 230 156 172 232 170 158) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST CHARACTER)) (:RETURN-TYPE UINT8) (:LANGUAGE :STDC)) (C-SELF #\a)) EQL-OK: 97 (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST CHARACTER)) (:RETURN-TYPE UINT8) (:LANGUAGE :STDC)) (C-SELF #\LATIN_SMALL_LETTER_O_WITH_STROKE)) [SIMPLE-CHARSET-TYPE-ERROR]: FFI::FOREIGN-CALL-OUT: Character #\u00F8 cannot be represented in the character set CHARSET:ASCII EQL-OK: ERROR (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-PTR (C-ARRAY CHARACTER (3 3))))) (:RETURN-TYPE (C-PTR (C-ARRAY UINT8 9))) (:LANGUAGE :STDC)) (C-SELF #2A("abc" "def" "ghi"))) EQUALP-OK: #(97 98 99 100 101 102 103 104 105) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-PTR (C-ARRAY CHARACTER (3 3))))) (:RETURN-TYPE (C-PTR (C-ARRAY UINT8 9))) (:LANGUAGE :STDC)) (C-SELF #2A("日本語" "Tür" "kçe"))) [SIMPLE-CHARSET-TYPE-ERROR]: FFI::FOREIGN-CALL-OUT: Character #\u65E5 cannot be represented in the character set CHARSET:ASCII EQL-OK: ERROR (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-PTR (C-ARRAY CHARACTER (3 3))))) (:RETURN-TYPE (C-PTR (C-ARRAY UINT8 9))) (:LANGUAGE :STDC)) (C-SELF #2A("日" "本" "語"))) [SIMPLE-ERROR]: FFI::FOREIGN-CALL-OUT: #2A("日" "本" "語") cannot be converted to the foreign type #(C-ARRAY CHARACTER 3 3) EQL-OK: ERROR (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-PTR CHARACTER))) (:RETURN-TYPE (C-PTR (C-ARRAY UINT8 1))) (:LANGUAGE :STDC)) (C-SELF #\a)) EQUALP-OK: #(97) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-PTR CHARACTER))) (:RETURN-TYPE (C-PTR (C-ARRAY UINT8 1))) (:LANGUAGE :STDC)) (C-SELF #\LATIN_SMALL_LETTER_O_WITH_STROKE)) [SIMPLE-CHARSET-TYPE-ERROR]: FFI::FOREIGN-CALL-OUT: Character #\u00F8 cannot be represented in the character set CHARSET:ASCII EQL-OK: ERROR (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-PTR-NULL CHARACTER))) (:RETURN-TYPE (C-PTR (C-ARRAY UINT8 1))) (:LANGUAGE :STDC)) (C-SELF #\a)) EQUALP-OK: #(97) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST (C-PTR-NULL CHARACTER))) (:RETURN-TYPE (C-PTR (C-ARRAY UINT8 1))) (:LANGUAGE :STDC)) (C-SELF #\LATIN_SMALL_LETTER_O_WITH_STROKE)) [SIMPLE-CHARSET-TYPE-ERROR]: FFI::FOREIGN-CALL-OUT: Character #\u00F8 cannot be represented in the character set CHARSET:ASCII EQL-OK: ERROR (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST C-STRING) (OBJ (C-PTR (C-ARRAY SINT16 4)) :IN-OUT)) (:RETURN-TYPE NIL) (:LANGUAGE :STDC)) (C-SELF "abc" #(-32768 -255 0 -256))) EQUALP-OK: #(-32768 -255 0 -256) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (FIRST C-STRING) (OBJ (C-PTR (C-ARRAY UINT32 4)) :IN-OUT)) (:RETURN-TYPE NIL) (:LANGUAGE :STDC)) (C-SELF NIL #(4294967295 16777215 0 127))) EQUALP-OK: #(4294967295 16777215 0 127) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (OBJ (C-PTR (C-ARRAY-MAX SINT16 17)) :OUT)) (:RETURN-TYPE NIL) (:LANGUAGE :STDC)) (C-SELF)) EQUALP-OK: #() (WITH-FOREIGN-OBJECT (FV 'LONG -12345678) (TYPEP FV 'FOREIGN-VARIABLE)) EQL-OK: T (PROGN (DEFPARAMETER *X* 0) (DEFUN CALLBACK (X) (SETF *X* (THE (UNSIGNED-BYTE 16) X)) (THE (UNSIGNED-BYTE 16) (1+ (* 2 X)))) *X*) EQL-OK: 0 (DEF-C-TYPE UINT->UINT (C-FUNCTION (:ARGUMENTS (X UINT)) (:RETURN-TYPE UINT) (:LANGUAGE :STDC))) EQL-OK: UINT->UINT (DEFPARAMETER *CALLBACKF* (WITH-C-VAR (X 'UINT->UINT #'CALLBACK) X)) EQL-OK: *CALLBACKF* (LIST (FUNCALL *CALLBACKF* 32767) *X*) EQUAL-OK: (65535 32767) (WITH-FOREIGN-OBJECT (X 'UINT->UINT *CALLBACKF*)) EQL-OK: NIL (WITH-FOREIGN-OBJECT (X '(C-FUNCTION (:ARGUMENTS (X INT)) (:RETURN-TYPE UINT) (:LANGUAGE :STDC)) *CALLBACKF*)) [SIMPLE-ERROR]: # cannot be converted to a foreign function with another calling convention. EQL-OK: ERROR (PROGN (FOREIGN-FREE *CALLBACKF*) (MAKUNBOUND '*CALLBACKF*)) EQL-OK: *CALLBACKF* (PROGN (DEFPARAMETER *X* 0) (DEFUN PASS-FLOAT (X) (THE DOUBLE-FLOAT X) (SETF *X* X) (THE SINGLE-FLOAT (FLOAT X 1.0))) *X*) EQL-OK: 0 (DEF-C-TYPE IDFPFUN (C-FUNCTION (:ARGUMENTS (X DOUBLE-FLOAT)) (:RETURN-TYPE SINGLE-FLOAT) (:LANGUAGE :STDC))) EQL-OK: IDFPFUN (DEFPARAMETER *FPCALLBACK* (WITH-C-VAR (X 'IDFPFUN #'PASS-FLOAT) X)) EQL-OK: *FPCALLBACK* (LIST (FUNCALL *FPCALLBACK* 3.5d0) *X*) EQUAL-OK: (3.5 3.5d0) (FOREIGN-FREE *FPCALLBACK*) EQL-OK: NIL (FUNCALL *FPCALLBACK* -7.5d0) [SIMPLE-ERROR]: FFI::FOREIGN-CALL-OUT: # comes from a previous Lisp session and is invalid EQL-OK: ERROR (MAKUNBOUND '*FPCALLBACK*) EQL-OK: *FPCALLBACK* (WITH-C-VAR (X 'SINT64) X) EQL-OK: 0 (WITH-C-VAR (X 'SINT64 1229782938247303441) T) EQL-OK: T (WITH-C-VAR (X 'UINT64 1229782938247303441) (OFFSET X 0 'UINT32)) EQL-OK: 286331153 (WITH-C-VAR (X 'UINT64 2459565876494606882) (OFFSET X 4 'UINT32)) EQL-OK: 572662306 (WITH-C-VAR (F '(C-FUNCTION (:RETURN-TYPE UINT64) (:LANGUAGE :STDC)) #'(LAMBDA NIL 12297848146326139699)) (FUNCALL F)) EQL-OK: 12297848146326139699 (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (P (C-PTR-NULL SINT64))) (:RETURN-TYPE (C-PTR SINT64)) (:LANGUAGE :STDC)) (C-SELF -1311768467284833366)) EQL-OK: -1311768467284833366 (WITH-C-VAR (F '(C-FUNCTION (:ARGUMENTS (N SINT64)) (:RETURN-TYPE UINT64) (:LANGUAGE :STDC)) #'(LAMBDA (X) (- X))) (FUNCALL F -4837315111622064792)) EQL-OK: 4837315111622064792 (WITH-C-VAR (S '(C-STRUCT LIST (C CHARACTER) (D SINT64)) '(#\a -7378753924192827255)) S) EQUAL-OK: (#\a -7378753924192827255) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (P SINT64)) (:RETURN-TYPE NIL) (:LANGUAGE :STDC)) (MULTIPLE-VALUE-LIST (C-SELF -1311768467284833366))) EQL-OK: NIL (DEF-CALL-OUT FOREIGN-AS-STRING (:NAME "ffi_identity") (:ARGUMENTS (OBJ C-POINTER)) (:RETURN-TYPE C-STRING) (:LANGUAGE :STDC)) EQL-OK: FOREIGN-AS-STRING (WITH-FOREIGN-STRING (FV E B "ABC" :ENCODING CHARSET:ASCII :NULL-TERMINATED-P NIL) (LIST E B)) EQUAL-OK: (3 3) (WITH-FOREIGN-STRING (FV E B "ABC" :ENCODING CHARSET:ASCII :NULL-TERMINATED-P T) (LIST E B)) EQUAL-OK: (4 4) (WITH-FOREIGN-STRING (F E B "abc" :START 1 :END 2) (FOREIGN-AS-STRING (FOREIGN-ADDRESS F))) EQUAL-OK: "b" (WITH-FOREIGN-STRING (F E B "abcd" :START 1 :END 3 :ENCODING CHARSET:ASCII) (MEMORY-AS F 'CHARACTER 1)) EQL-OK: #\c (WITH-C-VAR (F 'DOUBLE-FLOAT 1) F) EQL-OK: 1.0d0 (WITH-C-VAR (F 'DOUBLE-FLOAT PI) F) EQL-OK: 3.141592653589793d0 (WITH-C-VAR (F 'SINGLE-FLOAT 0) F) EQL-OK: 0.0 (WITH-C-VAR (F 'SINGLE-FLOAT PI) F) EQL-OK: 3.1415927 (WITH-FOREIGN-STRING (F E B "abcde" :START 1 :END 4 :ENCODING CHARSET:ASCII) (MEMORY-AS F 'STRING 1)) EQUAL-OK: "cd" (LET ((F (WITH-FOREIGN-STRING (FV E B "ABC") FV))) (VALIDP F)) EQL-OK: NIL (BLOCK ABORT (WITH-FOREIGN-STRING (FV E B "ABC") (SETQ FM FV) (RETURN-FROM ABORT 123))) EQL-OK: 123 (VALIDP FM) EQL-OK: NIL (BLOCK ABORT (WITH-FOREIGN-OBJECT (FV 'SINT16 -563) (SETQ FM FV) (RETURN-FROM ABORT 246))) EQL-OK: 246 (VALIDP FM) EQL-OK: NIL (FOREIGN-VALUE FM) [SIMPLE-ERROR]: FOREIGN-VALUE: # comes from a previous Lisp session and is invalid EQL-OK: ERROR (WITH-C-VAR (X '(C-ARRAY-MAX CHARACTER 32) "") X) EQUAL-OK: "" (TYPE-OF (SETQ FM (ALLOCATE-DEEP 'C-STRING "abc" :READ-ONLY T))) EQL-OK: FOREIGN-VARIABLE (FOREIGN-VALUE FM) EQUAL-OK: "abc" (WITH-C-PLACE (X FM) X) EQUAL-OK: "abc" (WITH-C-PLACE (X FM) (SETF X "xyz")) [SIMPLE-ERROR]: FFI::SET-FOREIGN-VALUE: foreign variable # may not be modified EQL-OK: ERROR (FOREIGN-VALUE (FFI::%CAST FM (PARSE-C-TYPE '(C-PTR (C-ARRAY-MAX CHARACTER 20))))) EQUAL-OK: "abc" (WITH-C-PLACE (X FM) (CAST X '(C-PTR (C-ARRAY-MAX CHARACTER 2)))) EQUAL-OK: "ab" (TYPE-OF (FOREIGN-VARIABLE FM (PARSE-C-TYPE '(C-PTR (C-ARRAY UINT8 2))))) EQL-OK: FOREIGN-VARIABLE (FOREIGN-VALUE (FOREIGN-VARIABLE FM (PARSE-C-TYPE '(C-PTR (C-ARRAY UINT8 2))))) EQUALP-OK: #(97 98) (FOREIGN-VALUE (FOREIGN-VARIABLE (FOREIGN-ADDRESS FM) (PARSE-C-TYPE '(C-PTR (C-ARRAY UINT8 2))) :NAME "conversion")) EQUALP-OK: #(97 98) (FOREIGN-VARIABLE "abc" (PARSE-C-TYPE 'C-POINTER)) [SIMPLE-TYPE-ERROR]: FOREIGN-VARIABLE: #1="abc" is not of type #2=(OR FOREIGN-VARIABLE FOREIGN-ADDRESS) EQL-OK: ERROR (FOREIGN-VARIABLE FM (PARSE-C-TYPE 'C-POINTER) :NAME 123) [SIMPLE-TYPE-ERROR]: FOREIGN-VARIABLE: argument 123 is not a string EQL-OK: ERROR (FOREIGN-VARIABLE #'C-SELF (PARSE-C-TYPE 'C-POINTER)) [SIMPLE-TYPE-ERROR]: FOREIGN-VARIABLE: #1=# is not of type #2=(OR FOREIGN-VARIABLE FOREIGN-ADDRESS) EQL-OK: ERROR (PROGN (FOREIGN-FREE FM) 0) EQL-OK: 0 (TYPE-OF (SETQ FA (FOREIGN-ADDRESS FM))) EQL-OK: FOREIGN-ADDRESS (EQ (FOREIGN-POINTER FA) (FOREIGN-POINTER FM)) EQL-OK: T (TYPE-OF (SETQ FV (UNSIGNED-FOREIGN-ADDRESS (FOREIGN-ADDRESS-UNSIGNED FM)))) EQL-OK: FOREIGN-ADDRESS (EQ (FOREIGN-POINTER FV) (FOREIGN-POINTER FM)) EQL-OK: NIL (PROGN (SET-FOREIGN-POINTER FV FM) 1) EQL-OK: 1 (EQ (FOREIGN-POINTER FM) (FOREIGN-POINTER FV)) EQL-OK: T (EQ (FOREIGN-POINTER FM) (FOREIGN-POINTER FA)) EQL-OK: T (TYPE-OF (SETQ FP (FOREIGN-POINTER FA))) EQL-OK: FOREIGN-POINTER (EQ (FOREIGN-POINTER FA) FP) EQL-OK: T (EQ (FOREIGN-POINTER (SET-FOREIGN-POINTER FA :COPY)) FP) EQL-OK: NIL (EQ (FOREIGN-POINTER FM) (FOREIGN-POINTER FP)) EQL-OK: NIL (PROGN (SETF (VALIDP FM) NIL) 1) EQL-OK: 1 (PROGN (SETF (VALIDP FM) NIL) 2) EQL-OK: 2 (LET ((RESTARTS (LIST (UNSIGNED-FOREIGN-ADDRESS 123450)))) (FOREIGN-ADDRESS-UNSIGNED (HANDLER-BIND ((TYPE-ERROR (LAMBDA (C &AUX (RETRY (POP RESTARTS))) (DECLARE (IGNORE C)) (WHEN RETRY (USE-VALUE RETRY))))) (FOREIGN-VARIABLE "abc" (PARSE-C-TYPE 'CHAR))))) EQL-OK: 123450 (LET ((RESTARTS (LIST #'C-SELF))) (FOREIGN-ADDRESS-UNSIGNED (HANDLER-BIND ((TYPE-ERROR (LAMBDA (C &AUX (RETRY (POP RESTARTS))) (DECLARE (IGNORE C)) (WHEN RETRY (USE-VALUE RETRY))))) (FOREIGN-FUNCTION "abc" (PARSE-C-TYPE '(C-FUNCTION (:LANGUAGE :STDC))))))) EQL-OK: 1047448 (WITH-FOREIGN-OBJECT (P 'OPAQUE) (EQUALP (SET-FOREIGN-POINTER (UNSIGNED-FOREIGN-ADDRESS (FOREIGN-ADDRESS-UNSIGNED P)) P) (FOREIGN-ADDRESS P))) EQL-OK: T (EQUALP (SET-FOREIGN-POINTER (UNSIGNED-FOREIGN-ADDRESS (FOREIGN-ADDRESS-UNSIGNED #'C-SELF)) #'C-SELF) (FOREIGN-ADDRESS #'C-SELF)) EQL-OK: T (PROGN (SETQ FM (ALLOCATE-DEEP 'CHARACTER "abc" :COUNT 5)) (TYPE-OF FM)) EQL-OK: FOREIGN-VARIABLE (EQUALP (SET-FOREIGN-POINTER (UNSIGNED-FOREIGN-ADDRESS (FOREIGN-ADDRESS-UNSIGNED FM)) FM) (FOREIGN-ADDRESS FM)) EQL-OK: T (WITH-C-PLACE (X FM) (IDENTITY (TYPEOF X))) EQUAL-OK: (C-ARRAY-MAX CHARACTER 5) (WITH-C-PLACE (X FM) (TYPEOF X)) EQUAL-OK: (C-ARRAY-MAX CHARACTER 5) (WITH-FOREIGN-OBJECT (FV `(C-ARRAY-MAX CHARACTER ,5) "abc") (WITH-C-PLACE (X FV) (TYPEOF X))) EQUAL-OK: (C-ARRAY-MAX CHARACTER 5) (LET NIL (DECLARE (COMPILE)) (WITH-FOREIGN-OBJECT (FV `(C-ARRAY-MAX CHARACTER ,5) "abc") (WITH-C-PLACE (X FV) (TYPEOF X)))) EQUAL-OK: (C-ARRAY-MAX CHARACTER 5) (LET NIL (DECLARE (COMPILE)) (WITH-C-VAR (X `(C-ARRAY UINT32 ,1)) (TYPEOF (CAST X `(C-ARRAY UINT8 ,4))))) EQUAL-OK: (C-ARRAY UINT8 4) (LET NIL (DECLARE (COMPILE)) (WITH-C-VAR (X `(C-ARRAY-MAX UINT32 ,1) #(286331153)) (CAST X `(C-ARRAY UINT8 ,4)))) EQUALP-OK: #(17 17 17 17) (WITH-C-PLACE (X FM) (SETF (ELEMENT X 1) #\Z)) EQL-OK: #\Z (FOREIGN-VALUE FM) EQUAL-OK: "aZc" (WITH-C-PLACE (X FM) (CAST X '(C-ARRAY CHARACTER 3))) [SIMPLE-ERROR]: FFI::%CAST: # cannot be converted to the foreign type #(C-ARRAY CHARACTER 3) EQL-OK: ERROR (WITH-C-PLACE (X FM) (OFFSET X 1 '(C-ARRAY CHARACTER 2))) EQUAL-OK: "Zc" (WITH-C-PLACE (X FM) (SLOT (CAST X '(C-UNION (S (C-ARRAY CHARACTER 5)) (C CHARACTER))) 'C)) EQL-OK: #\a (PROGN (FOREIGN-FREE FM) (VALIDP FM)) EQL-OK: T (PROGN (SETF (VALIDP FM) NIL) (VALIDP FM)) EQL-OK: NIL (MAKUNBOUND 'FM) EQL-OK: FM (WITH-C-VAR (PLACE 'LONG -12345678) PLACE) EQL-OK: -12345678 (WITH-C-VAR (PLACE 'C-STRING "abc") PLACE) EQUAL-OK: "abc" (WITH-C-VAR (PLACE `(C-ARRAY CHARACTER ,6) "abcdef") PLACE) EQUAL-OK: "abcdef" (WITH-C-VAR (PLACE `(C-ARRAY CHARACTER ,6) "abcdefghi") PLACE) [SIMPLE-ERROR]: FFI::EXEC-ON-STACK: "abcdefghi" cannot be converted to the foreign type #(C-ARRAY CHARACTER 6) EQL-OK: ERROR (WITH-C-VAR (PLACE '(C-ARRAY CHARACTER 7) "abc") PLACE) [SIMPLE-ERROR]: FFI::EXEC-ON-STACK: "abc" cannot be converted to the foreign type #(C-ARRAY CHARACTER 7) EQL-OK: ERROR (WITH-C-VAR (PLACE `(C-ARRAY-MAX CHARACTER ,6) "abcdefgh") PLACE) EQUAL-OK: "abcdef" (WITH-C-VAR (PLACE `(C-ARRAY-MAX CHARACTER ,7) "abc") PLACE) EQUAL-OK: "abc" (PROGN (SETQ FM (ALLOCATE-SHALLOW 'CHARACTER :COUNT 3)) (TYPE-OF FM)) EQL-OK: FOREIGN-VARIABLE (FOREIGN-VALUE FM) EQUAL-OK: "" (PROGN (FOREIGN-FREE FM) T) EQL-OK: T (ALLOCATE-SHALLOW 'ULONG :COUNT 0) [SIMPLE-ERROR]: FOREIGN-ALLOCATE: element type has size 0: #(C-ARRAY ULONG 0) EQL-OK: ERROR (PROGN (SETQ FM (ALLOCATE-SHALLOW 'LONG :COUNT 2)) (TYPE-OF FM)) EQL-OK: FOREIGN-VARIABLE (FOREIGN-VALUE FM) EQUALP-OK: #(0 0) (WITH-C-PLACE (A FM) (DOTIMES (I 3) (SETF (ELEMENT A I) (+ 100000000 I)))) [SIMPLE-ERROR]: FFI::%ELEMENT: subscripts (2) for # are out of range EQL-OK: ERROR (WITH-C-PLACE (A FM) A) EQUALP-OK: #(100000000 100000001) (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (OBJ (C-POINTER (C-ARRAY LONG 2)))) (:RETURN-TYPE (C-POINTER (C-ARRAY LONG 2))) (:LANGUAGE :STDC)) EQL-OK: C-SELF (FOREIGN-VALUE (C-SELF FM)) EQUALP-OK: #(100000000 100000001) (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (OBJ (C-POINTER (C-ARRAY LONG 2)))) (:RETURN-TYPE (C-PTR (C-ARRAY LONG 2))) (:LANGUAGE :STDC)) (C-SELF FM)) EQUALP-OK: #(100000000 100000001) (PROGN (FOREIGN-FREE FM) (MAKUNBOUND 'FM)) EQL-OK: FM (WITH-C-VAR (PLACE '(C-PTR (C-STRUCT VECTOR (A (C-ARRAY LONG 2)) (S (C-ARRAY CHARACTER 3)))) '#(#(-2000000000 -1000333111) "abc")) (SLOT (DEREF PLACE) 'A)) EQUALP-OK: #(-2000000000 -1000333111) (WITH-C-VAR (PLACE '(C-PTR (C-STRUCT LIST (A (C-ARRAY LONG 2)) (S (C-ARRAY CHARACTER 3)))) '(#(-3 -1) #(#\a #\b #\c))) (SLOT (DEREF PLACE) 'S)) EQUAL-OK: "abc" (PROGN (FOREIGN-FREE (ALLOCATE-DEEP '(C-PTR (C-STRUCT LIST (A (C-ARRAY LONG 2)) (S (C-ARRAY CHARACTER 3)))) '(#(-2 -3) "abc")) :FULL T) NIL) EQL-OK: NIL (WITH-FOREIGN-OBJECT (X '(C-ARRAY-PTR INT) (VECTOR -4 6 7)) (FOREIGN-VALUE X)) EQUALP-OK: #(-4 6 7) (WITH-FOREIGN-OBJECT (X '(C-STRUCT LIST (A (C-ARRAY-PTR ULONG)) (B (C-ARRAY-PTR ULONG)) (C (C-ARRAY-PTR ULONG)) (D (C-PTR (C-ARRAY ULONG 2)))) '(#(123456789) #(987654321) #(543235263) #(936272894 1333222444))) (FOREIGN-VALUE X)) EQUALP-OK: (#(123456789) #(987654321) #(543235263) #(936272894 1333222444)) (LET ((SY (FIND-SYMBOL "UTF-16" "CHARSET"))) (IF (AND SY (BOUNDP SY) (SYSTEM::ENCODINGP (SYMBOL-VALUE SY))) (WITH-FOREIGN-STRING (FV E B "ABC" :ENCODING (SYMBOL-VALUE SY)) (LIST E B)) '(4 10))) EQUAL-OK: (4 10) (SETF (VALIDP (UNSIGNED-FOREIGN-ADDRESS 4)) NIL) [SIMPLE-ERROR]: FFI::SET-VALIDP: must not invalidate the sole FFI session pointer EQL-OK: ERROR (WITH-C-VAR (PLACE '(C-PTR (C-STRUCT LIST (A (C-ARRAY LONG 2)) (S (C-ARRAY CHARACTER 3)))) '(#(-3 -1) #(#\a #\b #\c))) (SLOT (DEREF PLACE) 'S)) EQUAL-OK: "abc" (WITH-C-VAR (PLACE '(C-PTR (C-STRUCT VECTOR (A (C-ARRAY LONG 2)) (S (C-ARRAY CHARACTER 3)))) '#(#(-3 -1) #(#\a #\b #\c))) PLACE) EQUALP-OK: #(#(-3 -1) "abc") (DEF-CALL-OUT MAKE-FOREIGN-STRING (:ARGUMENTS (S C-STRING :IN :MALLOC-FREE)) (:NAME "ffi_identity") (:LANGUAGE :STDC) (:RETURN-TYPE C-POINTER)) EQL-OK: MAKE-FOREIGN-STRING (PROGN (SETF *X* (MAKE-FOREIGN-STRING "abcd")) (WITH-C-VAR (P 'C-POINTER *X*) (CAST P '(C-PTR (C-ARRAY UINT8 4))))) EQUALP-OK: #(97 98 99 100) (WITH-C-VAR (P 'C-POINTER *X*) (CAST P '(C-PTR (C-ARRAY CHARACTER 4)))) EQUAL-OK: "abcd" (PROGN (FOREIGN-FREE *X*) (MAKUNBOUND '*X*)) EQL-OK: *X* (DEF-C-TYPE LINK-NODE (C-STRUCT LIST (X ULONG) (S (C-PTR (C-ARRAY-MAX CHARACTER 3))) (P (C-POINTER LINK-NODE)))) EQL-OK: LINK-NODE (TYPE-OF (SETQ FM (ALLOCATE-DEEP 'LINK-NODE '(834687632 "Ef" NIL)))) EQL-OK: FOREIGN-VARIABLE (PROGN (DEF-CALL-OUT C-SELF (:NAME "ffi_identity") (:ARGUMENTS (OBJ (C-POINTER LINK-NODE))) (:RETURN-TYPE (C-POINTER LINK-NODE)) (:LANGUAGE :STDC)) (FOREIGN-VALUE (C-SELF FM))) EQUAL-OK: (834687632 "Ef" NIL) (WITH-C-VAR (P 'LINK-NODE (LIST 298734222 "IyH" FM)) (CAST P '(C-STRUCT VECTOR (X ULONG) (S (C-PTR (C-ARRAY-MAX CHARACTER 3))) (P (C-PTR-NULL LINK-NODE))))) EQUALP-OK: #(298734222 "IyH" (834687632 "Ef" NIL)) (PROGN (FOREIGN-FREE FM :FULL T) (MAKUNBOUND 'FM)) EQL-OK: FM (TYPE-OF (SETQ *FOREIGN-ENCODING* ORIG-ENCODING)) EQL-OK: ENCODING (LIST (DEF-CALL-OUT C-MALLOC (:ARGUMENTS (L LONG)) (:NAME "malloc") (:LANGUAGE :STDC) (:RETURN-TYPE C-POINTER) (:LIBRARY :DEFAULT)) (DEF-CALL-OUT C-FREE (:ARGUMENTS (P C-POINTER)) (:NAME "free") (:LANGUAGE :STDC) (:RETURN-TYPE NIL) (:LIBRARY :DEFAULT))) EQUAL-OK: (C-MALLOC C-FREE) (LET ((M (C-MALLOC 4)) RET) (UNWIND-PROTECT (WITH-C-VAR (V '(C-PTR (C-ARRAY UINT8 4))) (SETF (CAST V 'C-POINTER) M) (WITH-C-VAR (I '(C-PTR UINT32)) (SETF (CAST I 'C-POINTER) M) (SETQ I 0) (PUSH V RET) (SETQ I (1- (ASH 1 32))) (PUSH V RET) (SETQ V #(1 2 3 4)) (ASSERT (IF SYSTEM::*BIG-ENDIAN* (= I (+ (ASH 1 24) (ASH 2 16) (ASH 3 8) 4)) (= I (+ (ASH 4 24) (ASH 3 16) (ASH 2 8) 1))))) (NREVERSE RET)) (C-FREE M))) EQUALP-OK: (#(0 0 0 0) #(255 255 255 255)) (INTEGERP (SYSTEM::CODE-ADDRESS-OF #'C-MALLOC)) EQL-OK: T (STRINGP (NTH-VALUE 2 (FUNCTION-LAMBDA-EXPRESSION #'C-MALLOC))) EQL-OK: T (TYPE-OF (OPEN-FOREIGN-LIBRARY :DEFAULT)) EQL-OK: FOREIGN-POINTER (LISTP (MACROEXPAND '(DEF-C-VAR FOO-VAR (:TYPE INT)))) EQL-OK: T (LISTP (MACROEXPAND '(DEF-C-CONST FOO-CONST))) WARNING: (DEF-C-CONST FOO-CONST): No :LANGUAGE argument and no DEFAULT-FOREIGN-LANGUAGE form in this compilation unit; :STDC assumed now and for the rest of this unit EQL-OK: T (DEF-C-TYPE FFI_UINTP) EQL-OK: FFI_UINTP (DEF-CALL-OUT MY-UINTP (:NAME "ffi_identity") (:ARGUMENTS (OBJ FFI_UINTP)) (:RETURN-TYPE FFI_UINTP) (:LANGUAGE :STDC)) EQL-OK: MY-UINTP (MY-UINTP 123) EQL-OK: 123 (DEF-CALL-OUT TOUPPER (:LIBRARY :DEFAULT) (:LANGUAGE :STDC) (:ARGUMENTS (C CHARACTER)) (:RETURN-TYPE CHARACTER)) EQL-OK: TOUPPER (TOUPPER #\a) EQL-OK: #\A (WHEN (IGNORE-ERRORS (OPEN-FOREIGN-LIBRARY "libpcre.so")) (DEF-CALL-OUT PCRE-VERSION (:NAME "pcre_version") (:LIBRARY :DEFAULT) (:LANGUAGE :STDC) (:ARGUMENTS) (:RETURN-TYPE C-STRING)) (NOT (STRINGP (SHOW (PCRE-VERSION))))) "8.44 2020-02-12" EQL-OK: NIL (PROGN (DEF-CALL-OUT STRLEN (:ARGUMENTS (S C-STRING)) (:RETURN-TYPE SIZE_T) (:LIBRARY :DEFAULT) (:LANGUAGE :STDC)) (STRLEN "foo")) EQL-OK: 3 (SYMBOLS-CLEANUP '(STRERROR ERRNO MY-OS-ERROR GETHOSTNAME1 MYHOSTNAME1 GETHOSTNAME2 MYHOSTNAME2 GETHOSTNAME3 MYHOSTNAME3 MYHOSTNAME4 GETHOSTBYNAME C-SELF OPAQUE TRIV TRIGGER USER-POINTER *X* CALLBACK UINT->UINT *CALLBACKF* PASS-FLOAT IDFPFUN *FPCALLBACK* FOREIGN-AS-STRING MAKE-FOREIGN-STRING LINK-NODE COMMAND-LINE C-MALLOC C-FREE FOO-VAR FOO-CONST FFI_UINTP MY-UINTP TOUPPER PCRE-VERSION STRLEN)) EQL-OK: NIL RUN-TEST: finished "ffi" (0 errors out of 263 tests) RUN-TEST: started # (DEFUN TEST-POS-EPSILON () (/= (FLOAT 1 ) (+ (FLOAT 1 ) ))) EQL-OK: TEST-POS-EPSILON (TEST-POS-EPSILON SHORT-FLOAT-EPSILON) EQL-OK: T (TEST-POS-EPSILON SINGLE-FLOAT-EPSILON) EQL-OK: T (TEST-POS-EPSILON DOUBLE-FLOAT-EPSILON) EQL-OK: T (TEST-POS-EPSILON LONG-FLOAT-EPSILON) EQL-OK: T (DEFUN TEST-NEG-EPSILON () (/= (FLOAT 1 ) (- (FLOAT 1 ) ))) EQL-OK: TEST-NEG-EPSILON (TEST-NEG-EPSILON SHORT-FLOAT-NEGATIVE-EPSILON) EQL-OK: T (TEST-NEG-EPSILON SINGLE-FLOAT-NEGATIVE-EPSILON) EQL-OK: T (TEST-NEG-EPSILON DOUBLE-FLOAT-NEGATIVE-EPSILON) EQL-OK: T (TEST-NEG-EPSILON LONG-FLOAT-NEGATIVE-EPSILON) EQL-OK: T (DEFUN BINARY-SEARCH (LOWER-BOUND UPPER-BOUND OLD-VALUE PRECISION TEST-FUN) (LET* ((NEW-VALUE (FLOAT (/ (+ LOWER-BOUND UPPER-BOUND) 2) PRECISION))) (IF (= OLD-VALUE NEW-VALUE) (FLOAT UPPER-BOUND PRECISION) (IF (FUNCALL TEST-FUN NEW-VALUE) (BINARY-SEARCH LOWER-BOUND NEW-VALUE NEW-VALUE PRECISION TEST-FUN) (BINARY-SEARCH NEW-VALUE UPPER-BOUND NEW-VALUE PRECISION TEST-FUN))))) EQL-OK: BINARY-SEARCH (DEFUN CHECK-EPS (EPS TEST) (= EPS (BINARY-SEARCH 0 1 0 EPS TEST))) EQL-OK: CHECK-EPS (CHECK-EPS SHORT-FLOAT-EPSILON #'TEST-POS-EPSILON) EQL-OK: T (CHECK-EPS SHORT-FLOAT-NEGATIVE-EPSILON #'TEST-NEG-EPSILON) EQL-OK: T (CHECK-EPS SINGLE-FLOAT-EPSILON #'TEST-POS-EPSILON) EQL-OK: T (CHECK-EPS SINGLE-FLOAT-NEGATIVE-EPSILON #'TEST-NEG-EPSILON) EQL-OK: T (CHECK-EPS DOUBLE-FLOAT-EPSILON #'TEST-POS-EPSILON) EQL-OK: T (CHECK-EPS DOUBLE-FLOAT-NEGATIVE-EPSILON #'TEST-NEG-EPSILON) EQL-OK: T (CHECK-EPS LONG-FLOAT-EPSILON #'TEST-POS-EPSILON) EQL-OK: T (CHECK-EPS LONG-FLOAT-NEGATIVE-EPSILON #'TEST-NEG-EPSILON) EQL-OK: T RUN-TEST: finished "floeps" (0 errors out of 20 tests) RUN-TEST: started # (FORMAT NIL "~10") EQUAL-OK: "foo bar" (FORMAT NIL "~10:") EQUAL-OK: " foo bar" (FORMAT NIL "~10@") EQUAL-OK: "foo bar " (FORMAT NIL "~10:@") EQUAL-OK: " foo bar " (FORMAT NIL "~10") EQUAL-OK: " foobar" (FORMAT NIL "~10:") EQUAL-OK: " foobar" (FORMAT NIL "~10@") EQUAL-OK: "foobar " (FORMAT NIL "~10:@") EQUAL-OK: " foobar " (FORMAT NIL "~15<~S~>" 'FOO) EQUALP-OK: " foo" (FORMAT NIL "~15<~S~;~^~S~>" 'FOO) EQUALP-OK: " foo" (FORMAT NIL "~15<~S~;~^~S~;~^~S~>" 'FOO) EQUALP-OK: " foo" (FORMAT NIL "~15<~S~;~^~S~>" 'FOO 'BAR) EQUALP-OK: "foo bar" (FORMAT NIL "~15<~S~;~^~S~;~^~S~>" 'FOO 'BAR) EQUALP-OK: "foo bar" (FORMAT NIL "~15<~S~;~^~S~;~^~S~>" 'FOO 'BAR 'BAZ) EQUALP-OK: "foo bar baz" (FORMAT NIL "~12<~S~;~^~S~;~^~S~>" 'FOO 'BAR 'BAZ) EQUALP-OK: "foo bar baz" (DEFPARAMETER LISTE '(AAAAAAA BBBBBB CCCCCCCCCCCC DDDDDDDDDDDDDD EEEE FFFFFFFFF GGGGGGGG HHHHH IIII J KK LLL MMMM NNNNNN OOOOOOOOOO PPPPPPPPPPPPPPP QQQQQQQ RRRRRRRRRRRR S TTT UUUUUUUUU VVVVVVV WWWWWWWWWW XXXXX YYYYYY ZZZZZZZZ)) EQL-OK: LISTE (FORMAT NIL "~%;; ~<~%;; ~1:; ~s~; ~s~; ~s~; ~s~; ~s~; ~s~; ~s~; ~s~; ~s~; ~s~;~ ~s~; ~s~; ~s~; ~s~; ~s~; ~s~; ~s~; ~s~; ~s~; ~s~;~ ~s~; ~s~; ~s~; ~s~;~>~%" 'AAAAAAA 'BBBBBB 'CCCCCCCCCCCC 'DDDDDDDDDDDDDD 'EEEE 'FFFFFFFFF 'GGGGGGGG 'HHHHH 'IIII 'J 'KK 'LLL 'MMMM 'NNNNNN 'OOOOOOOOOO 'PPPPPPPPPPPPPPP 'QQQQQQQ 'RRRRRRRRRRRR 'S 'TTT 'UUUUUUUUU 'VVVVVVV 'WWWWWWWWWW 'XXXXX 'YYYYYY 'ZZZZZZZZ) EQUAL-OK: " ;; ;; AAAAAAA BBBBBB CCCCCCCCCCCC DDDDDDDDDDDDDD EEEE FFFFFFFFF GGGGGGGG HHHHH IIII JKK LLL MMMM NNNNNN OOOOOOOOOO PPPPPPPPPPPPPPP QQQQQQQ RRRRRRRRRRRR S TTTUUUUUUUUU VVVVVVV WWWWWWWWWW XXXXX " (FORMAT NIL "~%;; ~<~%;; ~1,50:; ~s~; ~s~; ~s~; ~s~; ~s~; ~s~; ~s~; ~s~; ~s~; ~s~;~ ~s~; ~s~; ~s~; ~s~; ~s~; ~s~; ~s~; ~s~; ~s~; ~s~;~ ~s~; ~s~; ~s~; ~s~;~>~%" 'AAAAAAA 'BBBBBB 'CCCCCCCCCCCC 'DDDDDDDDDDDDDD 'EEEE 'FFFFFFFFF 'GGGGGGGG 'HHHHH 'IIII 'J 'KK 'LLL 'MMMM 'NNNNNN 'OOOOOOOOOO 'PPPPPPPPPPPPPPP 'QQQQQQQ 'RRRRRRRRRRRR 'S 'TTT 'UUUUUUUUU 'VVVVVVV 'WWWWWWWWWW 'XXXXX 'YYYYYY 'ZZZZZZZZ) EQUAL-OK: " ;; ;; AAAAAAA BBBBBB CCCCCCCCCCCC DDDDDDDDDDDDDD EEEE FFFFFFFFF GGGGGGGG HHHHH IIII JKK LLL MMMM NNNNNN OOOOOOOOOO PPPPPPPPPPPPPPP QQQQQQQ RRRRRRRRRRRR S TTTUUUUUUUUU VVVVVVV WWWWWWWWWW XXXXX " (DEFUN FORMAT-BLOCKSATZ (STREAM PARTS PREFIX &OPTIONAL LINE-LENGTH START-P END-P) (IF (NULL STREAM) (LET ((STREAM (MAKE-STRING-OUTPUT-STREAM))) (FORMAT-BLOCKSATZ STREAM PARTS PREFIX LINE-LENGTH START-P END-P) (GET-OUTPUT-STREAM-STRING STREAM)) (UNLESS (ENDP PARTS) (SETQ LINE-LENGTH (OR LINE-LENGTH 72)) (WHEN START-P (FORMAT STREAM PREFIX)) (LOOP (LET ((POS (SYSTEM::LINE-POSITION STREAM)) (PARTS-NOW 'NIL)) (LET ((POS-NOW POS)) (LOOP (WHEN (ENDP PARTS) (RETURN)) (LET* ((PART (FIRST PARTS)) (PART-LENGTH (LENGTH PART))) (UNLESS (NULL PARTS-NOW) (WHEN (> (+ POS-NOW PART-LENGTH) LINE-LENGTH) (RETURN))) (POP PARTS) (PUSH PART PARTS-NOW) (INCF POS-NOW PART-LENGTH)))) (APPLY #'FORMAT STREAM (IF (AND (ENDP PARTS) (NOT END-P)) (APPLY #'CONCATENATE 'STRING (MAKE-LIST (LENGTH PARTS-NOW) :INITIAL-ELEMENT "~A")) (CONCATENATE 'STRING "~" (WRITE-TO-STRING (MAX 0 (- LINE-LENGTH POS)) :RADIX NIL :BASE 10) (IF (= (LENGTH PARTS-NOW) 1) "@" "") "<" (APPLY #'CONCATENATE 'STRING "~A" (MAKE-LIST (1- (LENGTH PARTS-NOW)) :INITIAL-ELEMENT "~;~A")) "~>")) (NREVERSE PARTS-NOW))) (WHEN (ENDP PARTS) (RETURN)) (FORMAT STREAM PREFIX))))) EQL-OK: FORMAT-BLOCKSATZ (FORMAT-BLOCKSATZ NIL (MAPCAR #'(LAMBDA (X) (FORMAT NIL " ~A" X)) '(AAAAAAA BBBBBB CCCCCCCCCCCC DDDDDDDDDDDDDD EEEE FFFFFFFFF GGGGGGGG HHHHH IIII J KK LLL MMMM NNNNNN OOOOOOOOOO PPPPPPPPPPPPPPP QQQQQQQ RRRRRRRRRRRR S TTT UUUUUUUUU VVVVVVV WWWWWWWWWW XXXXX YYYYYY ZZZZZZZZ)) "~%;; " NIL T NIL) EQUAL-OK: " ;; AAAAAAA BBBBBB CCCCCCCCCCCC DDDDDDDDDDDDDD EEEE FFFFFFFFF GGGGGGGG ;; HHHHH IIII J KK LLL MMMM NNNNNN OOOOOOOOOO PPPPPPPPPPPPPPP QQQQQQQ ;; RRRRRRRRRRRR S TTT UUUUUUUUU VVVVVVV WWWWWWWWWW XXXXX YYYYYY ;; ZZZZZZZZ" (FORMAT-BLOCKSATZ NIL (MAPCAR #'(LAMBDA (X) (FORMAT NIL " ~A" X)) '(AAAAAAA BBBBBB CCCCCCCCCCCC DDDDDDDDDDDDDD EEEE FFFFFFFFF GGGGGGGG HHHHH IIII J KK LLL MMMM NNNNNN OOOOOOOOOO PPPPPPPPPPPPPPP QQQQQQQ RRRRRRRRRRRR S TTT UUUUUUUUU VVVVVVV WWWWWWWWWW XXXXX YYYYYY ZZZZZZZZ)) "~%;; " 50 T T) EQUAL-OK: " ;; AAAAAAA BBBBBB CCCCCCCCCCCC DDDDDDDDDDDDDD ;; EEEE FFFFFFFFF GGGGGGGG HHHHH IIII J KK LLL ;; MMMM NNNNNN OOOOOOOOOO PPPPPPPPPPPPPPP QQQQQQQ ;; RRRRRRRRRRRR S TTT UUUUUUUUU VVVVVVV ;; WWWWWWWWWW XXXXX YYYYYY ZZZZZZZZ" (FORMAT NIL "~%;; ~{~<~%;; ~1,50:; ~s~>~^,~}.~%" '(AAAAAAA BBBBBB CCCCCCCCCCCC DDDDDDDDDDDDDD EEEE FFFFFFFFF GGGGGGGG HHHHH IIII J KK LLL MMMM NNNNNN OOOOOOOOOO PPPPPPPPPPPPPPP QQQQQQQ RRRRRRRRRRRR S TTT UUUUUUUUU VVVVVVV WWWWWWWWWW XXXXX YYYYYY ZZZZZZZZ)) EQUAL-OK: " ;; AAAAAAA, BBBBBB, CCCCCCCCCCCC, DDDDDDDDDDDDDD, ;; EEEE, FFFFFFFFF, GGGGGGGG, HHHHH, IIII, J, KK, ;; LLL, MMMM, NNNNNN, OOOOOOOOOO, ;; PPPPPPPPPPPPPPP, QQQQQQQ, RRRRRRRRRRRR, S, ;; TTT, UUUUUUUUU, VVVVVVV, WWWWWWWWWW, XXXXX, ;; YYYYYY, ZZZZZZZZ. " (DEFUN FOO (X) (FORMAT NIL "~6,2F|~6,2,1,'*F|~6,2,,'?F|~6F|~,2F|~F" X X X X X X)) EQL-OK: FOO (FOO 3.14159) EQUAL-OK: " 3.14| 31.42| 3.14|3.1416|3.14|3.14159" (FOO -3.14159) EQUAL-OK: " -3.14|-31.42| -3.14|-3.142|-3.14|-3.14159" (FOO 100.0) EQUAL-OK: "100.00|******|100.00| 100.0|100.00|100.0" (FOO 1234.0) EQUAL-OK: "1234.00|******|??????|1234.0|1234.00|1234.0" (FOO 0.006) EQUAL-OK: " 0.01| 0.06| 0.01| 0.006|0.01|0.006" (FORMAT NIL "~5,2,-13f" 1.1E13) EQUAL-OK: " 1.10" (FORMAT NIL "~9,0,6f" 3.14159) EQUAL-OK: " 3141590." (FORMAT NIL "~5D" 'A) EQUAL-OK: " A" (FORMAT NIL "~5,3F" 'A) EQUAL-OK: " A" (FORMAT NIL "~5,3F" #C(1.2 0.3)) EQUAL-OK: "#C(1.2 0.3)" (FORMAT NIL "~5,3F" 2/3) EQUAL-OK: "0.667" (FORMAT NIL "~1f" 10) EQUAL-OK: "10." (FORMAT NIL "~0f" 10) EQUAL-OK: "10." (FORMAT NIL "~1,,,'xf" -10) EQUAL-OK: "x" (FORMAT NIL "~2f" 1234567.1) EQUAL-OK: "1234567." (DEFUN FOO (X) (FORMAT NIL "~9,2,1,,'*E|~10,3,2,2,'?,,'$E|~9,3,2,-2,'%@e|~9,2E" X X X X)) EQL-OK: FOO (FOO 3.14159) EQUAL-OK: " 3.14E+0| 31.42$-01|+.003E+03| 3.14E+0" (FOO -3.14159) EQUAL-OK: " -3.14E+0|-31.42$-01|-.003E+03| -3.14E+0" (FOO 1100.0) EQUAL-OK: " 1.10E+3| 11.00$+02|+.001E+06| 1.10E+3" (FOO 1100.0L0) EQUAL-OK: " 1.10L+3| 11.00$+02|+.001L+06| 1.10L+3" (FOO 1.1E13) EQUAL-OK: "*********| 11.00$+12|+.001E+16| 1.10E+13" (FORMAT NIL "_~10,4E_" 1.2) EQUAL-OK: "_ 1.2000E+0_" (FORMAT NIL "~9,2,1E" 0.0314159) EQUAL-OK: " 3.14E-2" (FORMAT NIL "~ve" 21 4.6d8) EQUAL-OK: " 4.6d+8" (FORMAT NIL "~21e" 4.66d19) EQUAL-OK: " 4.66d+19" (DOLIST (LM '("LEAST" "MOST")) (DOLIST (PN '("POSITIVE" "NEGATIVE")) (DOLIST (TY '("DOUBLE" "SINGLE" "SHORT")) (LET* ((S (CONCATENATE 'STRING LM "-" PN "-" TY "-FLOAT")) (V (SYMBOL-VALUE (FIND-SYMBOL S))) (E (FORMAT NIL "~E" V))) (FORMAT T "(format nil \"~~E\" ~A) ~S~%" S E) (UNLESS (EQL V (IGNORE-ERRORS (READ-FROM-STRING E))) (PRINC " === fails: ")) (FORMAT T "(= ~A (read-from-string ~S)) T~%" S E))))) (format nil "~E" LEAST-POSITIVE-DOUBLE-FLOAT) "2.2250738585072014d-308" (= LEAST-POSITIVE-DOUBLE-FLOAT (read-from-string "2.2250738585072014d-308")) T (format nil "~E" LEAST-POSITIVE-SINGLE-FLOAT) "1.17549434E-38" (= LEAST-POSITIVE-SINGLE-FLOAT (read-from-string "1.17549434E-38")) T (format nil "~E" LEAST-POSITIVE-SHORT-FLOAT) "1.1755s-38" (= LEAST-POSITIVE-SHORT-FLOAT (read-from-string "1.1755s-38")) T (format nil "~E" LEAST-NEGATIVE-DOUBLE-FLOAT) "-2.2250738585072014d-308" (= LEAST-NEGATIVE-DOUBLE-FLOAT (read-from-string "-2.2250738585072014d-308")) T (format nil "~E" LEAST-NEGATIVE-SINGLE-FLOAT) "-1.17549434E-38" (= LEAST-NEGATIVE-SINGLE-FLOAT (read-from-string "-1.17549434E-38")) T (format nil "~E" LEAST-NEGATIVE-SHORT-FLOAT) "-1.1755s-38" (= LEAST-NEGATIVE-SHORT-FLOAT (read-from-string "-1.1755s-38")) T (format nil "~E" MOST-POSITIVE-DOUBLE-FLOAT) "1.7976931348623157d+308" (= MOST-POSITIVE-DOUBLE-FLOAT (read-from-string "1.7976931348623157d+308")) T (format nil "~E" MOST-POSITIVE-SINGLE-FLOAT) "3.4028235E+38" (= MOST-POSITIVE-SINGLE-FLOAT (read-from-string "3.4028235E+38")) T (format nil "~E" MOST-POSITIVE-SHORT-FLOAT) "3.4028s+38" (= MOST-POSITIVE-SHORT-FLOAT (read-from-string "3.4028s+38")) T (format nil "~E" MOST-NEGATIVE-DOUBLE-FLOAT) "-1.7976931348623157d+308" (= MOST-NEGATIVE-DOUBLE-FLOAT (read-from-string "-1.7976931348623157d+308")) T (format nil "~E" MOST-NEGATIVE-SINGLE-FLOAT) "-3.4028235E+38" (= MOST-NEGATIVE-SINGLE-FLOAT (read-from-string "-3.4028235E+38")) T (format nil "~E" MOST-NEGATIVE-SHORT-FLOAT) "-3.4028s+38" (= MOST-NEGATIVE-SHORT-FLOAT (read-from-string "-3.4028s+38")) T EQL-OK: NIL (FORMAT NIL "~E" LEAST-POSITIVE-DOUBLE-FLOAT) EQUAL-OK: "2.2250738585072014d-308" (= LEAST-POSITIVE-DOUBLE-FLOAT (READ-FROM-STRING "2.2250738585072014d-308")) EQL-OK: T (FORMAT NIL "~E" LEAST-POSITIVE-SINGLE-FLOAT) EQUAL-OK: "1.17549434E-38" (= LEAST-POSITIVE-SINGLE-FLOAT (READ-FROM-STRING "1.17549434E-38")) EQL-OK: T (FORMAT NIL "~E" LEAST-POSITIVE-SHORT-FLOAT) EQUAL-OK: "1.1755s-38" (= LEAST-POSITIVE-SHORT-FLOAT (READ-FROM-STRING "1.1755s-38")) EQL-OK: T (FORMAT NIL "~E" LEAST-NEGATIVE-DOUBLE-FLOAT) EQUAL-OK: "-2.2250738585072014d-308" (= LEAST-NEGATIVE-DOUBLE-FLOAT (READ-FROM-STRING "-2.2250738585072014d-308")) EQL-OK: T (FORMAT NIL "~E" LEAST-NEGATIVE-SINGLE-FLOAT) EQUAL-OK: "-1.17549434E-38" (= LEAST-NEGATIVE-SINGLE-FLOAT (READ-FROM-STRING "-1.17549434E-38")) EQL-OK: T (FORMAT NIL "~E" LEAST-NEGATIVE-SHORT-FLOAT) EQUAL-OK: "-1.1755s-38" (= LEAST-NEGATIVE-SHORT-FLOAT (READ-FROM-STRING "-1.1755s-38")) EQL-OK: T (FORMAT NIL "~E" MOST-POSITIVE-DOUBLE-FLOAT) EQUAL-OK: "1.7976931348623157d+308" (= MOST-POSITIVE-DOUBLE-FLOAT (READ-FROM-STRING "1.7976931348623157d+308")) EQL-OK: T (FORMAT NIL "~E" MOST-POSITIVE-SINGLE-FLOAT) EQUAL-OK: "3.4028235E+38" (= MOST-POSITIVE-SINGLE-FLOAT (READ-FROM-STRING "3.4028235E+38")) EQL-OK: T (FORMAT NIL "~E" MOST-POSITIVE-SHORT-FLOAT) EQUAL-OK: "3.4028s+38" (= MOST-POSITIVE-SHORT-FLOAT (READ-FROM-STRING "3.4028s+38")) EQL-OK: T (FORMAT NIL "~E" MOST-NEGATIVE-DOUBLE-FLOAT) EQUAL-OK: "-1.7976931348623157d+308" (= MOST-NEGATIVE-DOUBLE-FLOAT (READ-FROM-STRING "-1.7976931348623157d+308")) EQL-OK: T (FORMAT NIL "~E" MOST-NEGATIVE-SINGLE-FLOAT) EQUAL-OK: "-3.4028235E+38" (= MOST-NEGATIVE-SINGLE-FLOAT (READ-FROM-STRING "-3.4028235E+38")) EQL-OK: T (FORMAT NIL "~E" MOST-NEGATIVE-SHORT-FLOAT) EQUAL-OK: "-3.4028s+38" (= MOST-NEGATIVE-SHORT-FLOAT (READ-FROM-STRING "-3.4028s+38")) EQL-OK: T (LET (X) (DOTIMES (K 13 X) (SETQ X (CONS (FORMAT NIL "~%Scale factor ~2D: |~13,6,2,VE|" (- K 5) (- K 5) 3.14159) X)))) EQUAL-OK: (" Scale factor 7: | 3141590.E-06|" " Scale factor 6: | 314159.0E-05|" " Scale factor 5: | 31415.90E-04|" " Scale factor 4: | 3141.590E-03|" " Scale factor 3: | 314.1590E-02|" " Scale factor 2: | 31.41590E-01|" " Scale factor 1: | 3.141590E+00|" " Scale factor 0: | 0.314159E+01|" " Scale factor -1: | 0.031416E+02|" " Scale factor -2: | 0.003142E+03|" " Scale factor -3: | 0.000314E+04|" " Scale factor -4: | 0.000031E+05|" " Scale factor -5: | 0.000003E+06|") (FORMAT NIL "~G" 1.0d22) EQUAL-OK: "10000000000000000000000. " (FORMAT NIL "~G" 1.0d23) EQUAL-OK: "100000000000000000000000. " (FORMAT NIL "~G" 1.0d24) EQUAL-OK: "1000000000000000000000000. " (FORMAT NIL "~F" 1.0d22) EQUAL-OK: "10000000000000000000000.0" (FORMAT NIL "~F" 1.0d23) EQUAL-OK: "100000000000000000000000.0" (FORMAT NIL "~F" 1.0d24) EQUAL-OK: "1000000000000000000000000.0" (FORMAT NIL "~E" 1.0d22) EQUAL-OK: "1.0d+22" (FORMAT NIL "~E" 1.0d23) EQUAL-OK: "1.0d+23" (FORMAT NIL "~E" 1.0d24) EQUAL-OK: "1.0d+24" (LOOP :FOR I :FROM 0 :TO 50 :FOR X = (EXPT 10.0d0 I) :FOR S = (FORMAT NIL "~G" X) :WHEN (CHAR= #\0 (CHAR S (1+ (POSITION #\. S)))) :COLLECT X) EQL-OK: NIL (FORMAT NIL "~8e" 0.8999999d0) EQUAL-OK: " 9.0d-1" (FORMAT NIL "~8e" 0.999999d0) EQUAL-OK: " 1.0d+0" (FORMAT NIL "~8e" 9.99999d8) EQUAL-OK: " 1.0d+9" (FORMAT NIL "~8e" 9.99999d9) EQUAL-OK: " 1.0d+10" (FORMAT NIL "~8e" 9.99999d-11) EQUAL-OK: " 1.0d-10" (FORMAT NIL "~8e" 9.99999d-10) EQUAL-OK: " 1.0d-9" (DEFUN FOO (X) (FORMAT NIL "~9,2,1,,'*G|~9,3,2,3,'?,,'$G|~9,3,2,0,'%G|~9,2G" X X X X)) EQL-OK: FOO (FOO 0.0314159) EQUAL-OK: " 3.14E-2|314.2$-04|0.314E-01| 3.14E-2" (FOO 0.314159) EQUAL-OK: " 0.31 |0.314 |0.314 | 0.31 " (FOO 3.14159) EQUAL-OK: " 3.1 | 3.14 | 3.14 | 3.1 " (FOO 31.4159) EQUAL-OK: " 31. | 31.4 | 31.4 | 31. " (FOO 314.159) EQUAL-OK: " 3.14E+2| 314. | 314. | 3.14E+2" (FOO 3141.59) EQUAL-OK: " 3.14E+3|314.2$+01|0.314E+04| 3.14E+3" (FOO 3141.59L0) EQUAL-OK: " 3.14L+3|314.2$+01|0.314L+04| 3.14L+3" (FOO 3.14E12) EQUAL-OK: "*********|314.0$+10|0.314E+13| 3.14E+12" (FORMAT NIL "foo") EQUAL-OK: "foo" (FORMAT NIL "format-a:--~a--ende" '|ABc|) EQUAL-OK: "format-a:--ABc--ende" (DEFPARAMETER Y "elephant") EQL-OK: Y (FORMAT NIL "Look at the ~A!" Y) EQUAL-OK: "Look at the elephant!" (FORMAT NIL "format-%:--~%--1-newline-*") EQUAL-OK: "format-%:-- --1-newline-*" (FORMAT NIL "format-%:--~3%--3-newline-*") EQUAL-OK: "format-%:-- --3-newline-*" (FORMAT NIL "format-a:--~5a--ende-*" '|ABc|) EQUAL-OK: "format-a:--ABc --ende-*" (FORMAT NIL "format-a:--~5,2a--ende-*" '|ABc|) EQUAL-OK: "format-a:--ABc --ende-*" (FORMAT NIL "format-a:--~5,2,3a--ende-*" '|ABc|) EQUAL-OK: "format-a:--ABc --ende-*" (FORMAT NIL "format-a:--~5,2,3,'*a--ende-*" '|ABc|) EQUAL-OK: "format-a:--ABc***--ende-*" (FORMAT NIL "format-a:--~@a--ende-*" '|ABc|) EQUAL-OK: "format-a:--ABc--ende-*" (FORMAT NIL "format-a:--~5@a--ende-*" '|ABc|) EQUAL-OK: "format-a:-- ABc--ende-*" (FORMAT NIL "format-a:--~5,2@a--ende-*" '|ABc|) EQUAL-OK: "format-a:-- ABc--ende-*" (FORMAT NIL "format-a:--~5,2,3@a--ende-*" '|ABc|) EQUAL-OK: "format-a:-- ABc--ende-*" (FORMAT NIL "format-a:--~5,2,3,'*@a--ende-*" '|ABc|) EQUAL-OK: "format-a:--***ABc--ende-*" (FORMAT NIL "format-a:--~:a--ende-*" '(|ABc| NIL XYZ)) EQUAL-OK: "format-a:--(ABc NIL XYZ)--ende-*" (FORMAT NIL "format-s:--~s--ende-*" '|ABc|) EQUAL-OK: "format-s:--|ABc|--ende-*" (FORMAT NIL "format-s:--~5s--ende-*" '|ABc|) EQUAL-OK: "format-s:--|ABc|--ende-*" (FORMAT NIL "format-s:--~5,2s--ende-*" '|ABc|) EQUAL-OK: "format-s:--|ABc|--ende-*" (FORMAT NIL "format-s:--~5,2,3s--ende-*" '|ABc|) EQUAL-OK: "format-s:--|ABc| --ende-*" (FORMAT NIL "format-s:--~5,2,3,'*s--ende-*" '|ABc|) EQUAL-OK: "format-s:--|ABc|***--ende-*" (FORMAT NIL "format-s:--~@s--ende-*" '|ABc|) EQUAL-OK: "format-s:--|ABc|--ende-*" (FORMAT NIL "format-s:--~5@s--ende-*" '|ABc|) EQUAL-OK: "format-s:--|ABc|--ende-*" (FORMAT NIL "format-s:--~5,2@s--ende-*" '|ABc|) EQUAL-OK: "format-s:--|ABc|--ende-*" (FORMAT NIL "format-s:--~5,2,3@s--ende-*" '|ABc|) EQUAL-OK: "format-s:-- |ABc|--ende-*" (FORMAT NIL "format-s:--~5,2,3,'*@s--ende-*" '|ABc|) EQUAL-OK: "format-s:--***|ABc|--ende-*" (FORMAT NIL "format-s:--~:s--ende-*" '(|ABc| NIL XYZ)) EQUAL-OK: "format-s:--(|ABc| NIL XYZ)--ende-*" (DEFPARAMETER X 5) EQL-OK: X (FORMAT NIL "The answer is ~D." X) EQUAL-OK: "The answer is 5." (FORMAT NIL "The answer is ~3D." X) EQUAL-OK: "The answer is 5." (FORMAT NIL "The answer is ~3,'0D." X) EQUAL-OK: "The answer is 005." (FORMAT NIL "The answer is ~:D." (EXPT 47 X)) EQUAL-OK: "The answer is 229,345,007." (FORMAT NIL "decimal:~d, width=5:~5d-*" 10 10) EQUAL-OK: "decimal:10, width=5: 10-*" (FORMAT NIL "format-d:--~d--ende-*" 123) EQUAL-OK: "format-d:--123--ende-*" (FORMAT NIL "format-d:--~10d--ende-*" 123) EQUAL-OK: "format-d:-- 123--ende-*" (FORMAT NIL "format-d:--~10,'?d--ende-*" 123) EQUAL-OK: "format-d:--???????123--ende-*" (FORMAT NIL "format-d:--~@d--ende-*" 123) EQUAL-OK: "format-d:--+123--ende-*" (FORMAT NIL "format-d:--~10@d--ende-*" 123) EQUAL-OK: "format-d:-- +123--ende-*" (FORMAT NIL "format-d:--~10,'?@d--ende-*" 123) EQUAL-OK: "format-d:--??????+123--ende-*" (FORMAT NIL "format-b:--~b--ende-*" 123) EQUAL-OK: "format-b:--1111011--ende-*" (FORMAT NIL "format-b:--~10b--ende-*" 123) EQUAL-OK: "format-b:-- 1111011--ende-*" (FORMAT NIL "format-b:--~10,'?b--ende-*" 123) EQUAL-OK: "format-b:--???1111011--ende-*" (FORMAT NIL "format-b:--~:b--ende-*" 123) EQUAL-OK: "format-b:--1,111,011--ende-*" (FORMAT NIL "format-b:--~10:b--ende-*" 123) EQUAL-OK: "format-b:-- 1,111,011--ende-*" (FORMAT NIL "format-b:--~10,'?:b--ende-*" 123) EQUAL-OK: "format-b:--?1,111,011--ende-*" (FORMAT NIL "format-b:--~10,'?,'.:b--ende-*" 123) EQUAL-OK: "format-b:--?1.111.011--ende-*" (FORMAT NIL "format-b:--~@b--ende-*" 123) EQUAL-OK: "format-b:--+1111011--ende-*" (FORMAT NIL "format-b:--~10@b--ende-*" 123) EQUAL-OK: "format-b:-- +1111011--ende-*" (FORMAT NIL "format-b:--~10,'?@b--ende-*" 123) EQUAL-OK: "format-b:--??+1111011--ende-*" (FORMAT NIL "format-b:--~:@b--ende-*" 123) EQUAL-OK: "format-b:--+1,111,011--ende-*" (FORMAT NIL "format-o:--~o--ende-*" 123) EQUAL-OK: "format-o:--173--ende-*" (FORMAT NIL "format-o:--~10o--ende-*" 123) EQUAL-OK: "format-o:-- 173--ende-*" (FORMAT NIL "format-o:--~10,'?o--ende-*" 123) EQUAL-OK: "format-o:--???????173--ende-*" (FORMAT NIL "format-o:--~@o--ende-*" 123) EQUAL-OK: "format-o:--+173--ende-*" (FORMAT NIL "format-o:--~10@o--ende-*" 123) EQUAL-OK: "format-o:-- +173--ende-*" (FORMAT NIL "format-x:--~x--ende-*" 123) EQUAL-OK: "format-x:--7B--ende-*" (FORMAT NIL "format-x:--~10x--ende-*" 123) EQUAL-OK: "format-x:-- 7B--ende-*" (FORMAT NIL "format-x:--~10,'?x--ende-*" 123) EQUAL-OK: "format-x:--????????7B--ende-*" (FORMAT NIL "format-x:--~10:x--ende-*" 123) EQUAL-OK: "format-x:-- 7B--ende-*" (FORMAT NIL "format-x:--~@x--ende-*" 123) EQUAL-OK: "format-x:--+7B--ende-*" (FORMAT NIL "format-x:--~10@x--ende-*" 123) EQUAL-OK: "format-x:-- +7B--ende-*" (FORMAT NIL "format-r:--~20r--ende-*" 123) EQUAL-OK: "format-r:--63--ende-*" (FORMAT NIL "format-r:--~20,10r--ende-*" 123) EQUAL-OK: "format-r:-- 63--ende-*" (FORMAT NIL "format-r:--~20@r--ende-*" 123) EQUAL-OK: "format-r:--+63--ende-*" (FORMAT NIL "format-r:--~r--ende-*" 9) EQUAL-OK: "format-r:--nine--ende-*" (FORMAT NIL "format-r:--~:r--ende-*" 9) EQUAL-OK: "format-r:--ninth--ende-*" (FORMAT NIL "format-r:--~@r--ende-*" 9) EQUAL-OK: "format-r:--IX--ende-*" (FORMAT NIL "format-r:--~:@r--ende-*" 9) EQUAL-OK: "format-r:--VIIII--ende-*" (FORMAT NIL "format-p:--~d object~p-*" 1 1) EQUAL-OK: "format-p:--1 object-*" (FORMAT NIL "format-p:--~d object~p-*" 2 2) EQUAL-OK: "format-p:--2 objects-*" (FORMAT NIL "format-p:--~d bab~@p-*" 1 1) EQUAL-OK: "format-p:--1 baby-*" (FORMAT NIL "format-p:--~d bab~@p-*" 2 2) EQUAL-OK: "format-p:--2 babies-*" (FORMAT NIL "format-p:--~d object~:p-*" 1) EQUAL-OK: "format-p:--1 object-*" (FORMAT NIL "format-p:--~d object~:p-*" 2) EQUAL-OK: "format-p:--2 objects-*" (FORMAT NIL "format-p:--~d bab~:@p-*" 1) EQUAL-OK: "format-p:--1 baby-*" (FORMAT NIL "format-&:--~%~&--1-newline-*") EQUAL-OK: "format-&:-- --1-newline-*" (FORMAT NIL "format-&:--~%~3&--3-newline-*") EQUAL-OK: "format-&:-- --3-newline-*" (FORMAT NIL "format-tilde:--~~--1-tilde-*") EQUAL-OK: "format-tilde:--~--1-tilde-*" (FORMAT NIL "format-tilde:--~3~--3-tilden-*") EQUAL-OK: "format-tilde:--~~~--3-tilden-*" (FORMAT NIL "format-|:--~|--1-ff-*") EQUAL-OK: "format-|:-- --1-ff-*" (FORMAT NIL "format-|:--~2|--2-ff-*") EQUAL-OK: "format-|:-- --2-ff-*" (FORMAT NIL "format-:~ same line no space despite 2* and sp-*") EQUAL-OK: "format-:same line no space despite 2* and sp-*" (FORMAT NIL "format-:~@ new beginning of line despite + sp-*") EQUAL-OK: "format-: new beginning of line despite + sp-*" (FORMAT NIL "format-:~: gleiche Zeile aber ein tab vor Anfang-*") EQUAL-OK: "format-: gleiche Zeile aber ein tab vor Anfang-*" (FORMAT NIL "format-?:***~a***~?***~a***-*" 1 "+++~s+++~s+++" '(A B) 2) EQUAL-OK: "format-?:***1***+++A+++B+++***2***-*" (FORMAT NIL "format-?:***~a***~?***~a***-*" 1 "+++++++++++++" NIL 2) EQUAL-OK: "format-?:***1***+++++++++++++***2***-*" (FORMAT NIL "~(AAAAAAAA BBBBBB ccccccc dddddddd~)") EQUAL-OK: "aaaaaaaa bbbbbb ccccccc dddddddd" (FORMAT NIL "~:(AAAAAAAA BBBBBB ccccccc dddddddd~)") EQUAL-OK: "Aaaaaaaa Bbbbbb Ccccccc Dddddddd" (FORMAT NIL "~@(AAAAAAAA BBBBBB ccccccc dddddddd~)") EQUAL-OK: "Aaaaaaaa bbbbbb ccccccc dddddddd" (FORMAT NIL "~:@(AAAAAAAA BBBBBB ccccccc dddddddd~)") EQUAL-OK: "AAAAAAAA BBBBBB CCCCCCC DDDDDDDD" (FORMAT NIL "++~{-=~s=-~}++" '(1 2 3)) EQUAL-OK: "++-=1=--=2=--=3=-++" (FORMAT NIL "++~2{-=~s=-~}++" '(1 2 3)) EQUAL-OK: "++-=1=--=2=-++" (FORMAT NIL "++~@{-=~s=-~}++" 1 2 3) EQUAL-OK: "++-=1=--=2=--=3=-++" (FORMAT NIL "++~:{-=~s=~s=-~}++" '((1 2) (3 4 5) (6 7))) EQUAL-OK: "++-=1=2=--=3=4=--=6=7=-++" (FORMAT NIL "++~:@{-=~s=~s=-~}++" '(1 2) '(3 4 5) '(6 7)) EQUAL-OK: "++-=1=2=--=3=4=--=6=7=-++" (FORMAT NIL "~{abc~:}") [SIMPLE-ERROR]: There are not enough arguments left for this format directive. Current point in control string: "~{abc~:}" | EQL-OK: ERROR (FORMAT NIL "~{~:}" "xyz") [SIMPLE-ERROR]: There are not enough arguments left for this format directive. Current point in control string: "~{~:}" | EQL-OK: ERROR (FORMAT NIL "~1{~:}" "-~s-" '(1 2) 3) EQUAL-OK: "-1-" (FORMAT NIL "123456789012345678901234567890 ~10,4txx~10,4ty~10,4tzzz~10,4tende") EQUAL-OK: "123456789012345678901234567890 xx y zzz ende" (FORMAT NIL "123456789012345678901234567890 ~3,4@txx~3,4@ty~3,4@tzzz~3,4@tende") EQUAL-OK: "123456789012345678901234567890 xx y zzz ende" (FORMAT NIL "-~a-~a-~a-~a-" 1 2 3 4 5 6 7 8 9) EQUAL-OK: "-1-2-3-4-" (FORMAT NIL "-~a-~a-~*~a-~a-" 1 2 3 4 5 6 7 8 9) EQUAL-OK: "-1-2-4-5-" (FORMAT NIL "-~a-~a-~3*~a-~a-" 1 2 3 4 5 6 7 8 9) EQUAL-OK: "-1-2-6-7-" (FORMAT NIL "-~a-~a-~:*~a-~a-" 1 2 3 4 5 6 7 8 9) EQUAL-OK: "-1-2-2-3-" (FORMAT NIL "-~a-~a-~2:*~a-~a-" 1 2 3 4 5 6 7 8 9) EQUAL-OK: "-1-2-1-2-" (FORMAT NIL "-~a-~a-~@*~a-~a-" 1 2 3 4 5 6 7 8 9) EQUAL-OK: "-1-2-1-2-" (FORMAT NIL "-~a-~a-~6@*~a-~a-" 1 2 3 4 5 6 7 8 9) EQUAL-OK: "-1-2-7-8-" (FORMAT NIL "~[aa~;bb~;cc~]" 1) EQUAL-OK: "bb" (FORMAT NIL "~[aa~;bb~;cc~]" 10) EQUAL-OK: "" (FORMAT NIL "~2[aa~;bb~;cc~]" 10) EQUAL-OK: "cc" (FORMAT NIL "~@[aaa~]" NIL 10) EQUAL-OK: "" (FORMAT NIL "~@[aaa~]" 20 10) EQUAL-OK: "aaa" (FORMAT NIL "~@[aaa~d~]" NIL 10) EQUAL-OK: "" (FORMAT NIL "~@[aaa~d~]" 20 10) EQUAL-OK: "aaa20" (FORMAT NIL "~@[aaa~d~]bbb~d" NIL 10 30) EQUAL-OK: "bbb10" (FORMAT NIL "~@[aaa~d~]bbb~d" 20 10 30) EQUAL-OK: "aaa20bbb10" (FORMAT NIL "~:[-nil-~;-true-~d~]-ende~d" NIL 10 20) EQUAL-OK: "-nil--ende10" (FORMAT NIL "~:[-nil-~;-true-~d~]-ende~d" T 10 20) EQUAL-OK: "-true-10-ende20" (FORMAT NIL "Start test, newline:~%freshline:~&") EQUAL-OK: "Start test, newline: freshline: " (FORMAT NIL "decimal pad with period:~10,vd-*" #\. 12) EQUAL-OK: "decimal pad with period:........12-*" (FORMAT NIL "char normal:~c, as # would read:~@c, human read:~:c-*" #\Space #\Space #\Space) EQUAL-OK: "char normal: , as # would read:#\\Space, human read:Space-*" (FORMAT NIL "cardinal:~r, roman new:~@r, roman-old:~:@r~ ~@ new line but at beginning~: same line, but spaced out~@ new line and over two tabs-*" 4 4 4) EQUAL-OK: "cardinal:four, roman new:IV, roman-old:IIII new line but at beginning same line, but spaced out new line and over two tabs-*" (DEFPARAMETER N 3) EQL-OK: N (FORMAT NIL "~D item~:P found." N) EQUAL-OK: "3 items found." (FORMAT NIL "~R dog~:[s are~; is~] here." N (= N 1)) EQUAL-OK: "three dogs are here." (FORMAT NIL "~R dog~:*~[s are~; is~:;s are~] here." N) EQUAL-OK: "three dogs are here." (FORMAT NIL "Here ~[are~;is~:;are~] ~:*~R pupp~:@p." N) EQUAL-OK: "Here are three puppies." (SETQ N 1) EQL-OK: 1 (FORMAT NIL "~D item~:P found." N) EQUAL-OK: "1 item found." (FORMAT NIL "~R dog~:[s are~; is~] here." N (= N 1)) EQUAL-OK: "one dog is here." (FORMAT NIL "~R dog~:*~[s are~; is~:;s are~] here." N) EQUAL-OK: "one dog is here." (FORMAT NIL "Here ~[are~;is~:;are~] ~:*~R pupp~:@p." N) EQUAL-OK: "Here is one puppy." (SETQ N 0) EQL-OK: 0 (FORMAT NIL "~D item~:P found." N) EQUAL-OK: "0 items found." (FORMAT NIL "~R dog~:[s are~; is~] here." N (= N 1)) EQUAL-OK: "zero dogs are here." (FORMAT NIL "~R dog~:*~[s are~; is~:;s are~] here." N) EQUAL-OK: "zero dogs are here." (FORMAT NIL "Here ~[are~;is~:;are~] ~:*~R pupp~:@p." N) EQUAL-OK: "Here are zero puppies." (FORMAT NIL "~D tr~:@p/~D win~:P" 7 1) EQUAL-OK: "7 tries/1 win" (FORMAT NIL "~D tr~:@p/~D win~:P" 1 0) EQUAL-OK: "1 try/0 wins" (FORMAT NIL "~D tr~:@p/~D win~:P" 1 3) EQUAL-OK: "1 try/3 wins" (DEFUN TYPE-CLASH-ERROR (FN NARGS ARGNUM RIGHT-TYPE WRONG-TYPE) (FORMAT NIL "~&~S requires its ~:[~:R~;~*~] ~ argument to be of type ~S,~%but it was called ~ with an argument of type ~S.-*" FN (EQL NARGS 1) ARGNUM RIGHT-TYPE WRONG-TYPE)) EQL-OK: TYPE-CLASH-ERROR (TYPE-CLASH-ERROR 'AREF NIL 2 'INTEGER 'VECTOR) EQUAL-OK: "AREF requires its second argument to be of type INTEGER, but it was called with an argument of type VECTOR.-*" (TYPE-CLASH-ERROR 'CAR 1 1 'LIST 'SHORT-FLOAT) EQUAL-OK: "CAR requires its argument to be of type LIST, but it was called with an argument of type SHORT-FLOAT.-*" (FORMAT NIL "~? ~D" "<~A ~D>" '("Foo" 5) 7) EQUAL-OK: " 7" (FORMAT NIL "~? ~D" "<~A ~D>" '(" Foo" 5 14) 7) EQUAL-OK: "< Foo 5> 7" (FORMAT NIL "~@? ~d" "<~A ~D>" "Foo" 5 7) EQUAL-OK: " 7" (FORMAT NIL "~@? ~D" "<~A ~D>" "Foo" 5 14 7) EQUAL-OK: " 14" (FORMAT NIL "~@R ~(~@R~)" 14 14) EQUAL-OK: "XIV xiv" (DEFUN FOO (N) (FORMAT NIL "~@(~R~) error~:P detected." N)) EQL-OK: FOO (FOO 0) EQUAL-OK: "Zero errors detected." (FOO 1) EQUAL-OK: "One error detected." (FOO 23) EQUAL-OK: "Twenty-three errors detected." (SETQ *PRINT-LEVEL* NIL *PRINT-LENGTH* 5) EQL-OK: 5 (FORMAT NIL "~@[ print level = ~D~]~@[ print length = ~D~]" *PRINT-LEVEL* *PRINT-LENGTH*) EQUAL-OK: " print length = 5" (SETQ *PRINT-LENGTH* NIL) EQL-OK: NIL (DEFPARAMETER FOO "Items:~#[none~; ~s~; ~S and ~S~ ~:;~@{~#[~; and~] ~S~^,~}~].") EQL-OK: FOO (FORMAT NIL FOO) EQUAL-OK: "Items:none." (FORMAT NIL FOO 'FOO) EQUAL-OK: "Items: FOO." (FORMAT NIL FOO 'FOO 'BAR) EQUAL-OK: "Items: FOO and BAR." (FORMAT NIL FOO 'FOO 'BAR 'BAZ) EQUAL-OK: "Items: FOO, BAR, and BAZ." (FORMAT NIL FOO 'FOO 'BAR 'BAZ 'QUUX) EQUAL-OK: "Items: FOO, BAR, BAZ, and QUUX." (FORMAT NIL "The winners are:~{ ~S~}." '(FRED HARRY JILL)) EQUAL-OK: "The winners are: FRED HARRY JILL." (FORMAT NIL "Pairs:~{ <~S,~S>~}." '(A 1 B 2 C 3)) EQUAL-OK: "Pairs: ." (FORMAT NIL "Pairs:~:{ <~S,~S>~}." '((A 1) (B 2) (C 3))) EQUAL-OK: "Pairs: ." (FORMAT NIL "Pairs:~@{ <~S,~S>~}." 'A 1 'B 2 'C 3) EQUAL-OK: "Pairs: ." (FORMAT NIL "Pairs:~:@{ <~S,~S>~}." '(A 1) '(B 2) '(C 3)) EQUAL-OK: "Pairs: ." (DEFPARAMETER DONESTR "done.~^ ~D warning~:P.~^ ~D error~:P.") EQL-OK: DONESTR (FORMAT NIL DONESTR) EQUAL-OK: "done." (FORMAT NIL DONESTR 3) EQUAL-OK: "done. 3 warnings." (FORMAT NIL DONESTR 1 5) EQUAL-OK: "done. 1 warning. 5 errors." (DEFPARAMETER TELLSTR "~@(~@[~R~]~^ ~A.~)") EQL-OK: TELLSTR (FORMAT NIL TELLSTR 23) EQUAL-OK: "Twenty-three" (FORMAT NIL TELLSTR NIL "losers") EQUAL-OK: " Losers." (FORMAT NIL TELLSTR 23 "losers") EQUAL-OK: "Twenty-three losers." (FORMAT NIL "**~c**" #\Space) EQUAL-OK: "** **" (FORMAT NIL "**~:c**" #\Space) EQUAL-OK: "**Space**" (FORMAT NIL "**~:@c**" #\Space) EQUAL-OK: "**Space**" (FORMAT NIL "**~@c**" #\Space) EQUAL-OK: "**#\\Space**" (FORMAT NIL "**~c**" #\A) EQUAL-OK: "**A**" (FORMAT NIL "**~:c**" #\A) EQUAL-OK: "**A**" (FORMAT NIL "**~:@c**" #\A) EQUAL-OK: "**A**" (FORMAT NIL "**~@c**" #\A) EQUAL-OK: "**#\\A**" (FORMAT NIL "**~c**" (CODE-CHAR 27)) EQUAL-OK: "****" (FORMAT NIL "**~:c**" (CODE-CHAR 27)) EQUAL-OK: "**Escape**" (FORMAT NIL "**~:@c**" (CODE-CHAR 27)) EQUAL-OK: "**Escape**" (FORMAT NIL "**~@c**" (CODE-CHAR 27)) EQUAL-OK: "**#\\Escape**" (STRING= (FORMAT NIL "~10I") (WITH-OUTPUT-TO-STRING (S) (FUNCALL (FORMATTER "~10I") S))) EQL-OK: T (FORMAT NIL "~&abc~.") EQUAL-OK: "abc " (WITH-OUTPUT-TO-STRING (S) (FUNCALL (FORMATTER "~&abc~.") S)) EQUAL-OK: "abc " (FORMAT NIL "~&abc~.~%") EQUAL-OK: "abc " (FORMAT NIL "~&abc~3.") EQUAL-OK: "abc " (FORMAT NIL "~&abc~0.") EQUAL-OK: "abc" (WITH-OUTPUT-TO-STRING (STREAM) (FORMAT STREAM "~&abc~.")) EQUAL-OK: "abc " (WITH-OUTPUT-TO-STRING (STREAM) (FORMAT STREAM "~&abc~.") (FORMAT STREAM "def")) EQUAL-OK: "abc def" (WITH-OUTPUT-TO-STRING (STREAM) (FORMAT STREAM "~&abc~.") (FORMAT STREAM "~%def")) EQUAL-OK: "abc def" (WITH-OUTPUT-TO-STRING (STREAM) (FORMAT STREAM "~&abc~.") (FORMAT STREAM "~&def")) EQUAL-OK: "abc def" (WITH-OUTPUT-TO-STRING (STREAM) (FORMAT STREAM "~&abc~.~.") (FORMAT STREAM "~&~&def")) EQUAL-OK: "abc def" (WITH-OUTPUT-TO-STRING (STREAM) (FORMAT STREAM "~&abc~%~.") (FORMAT STREAM "~&def")) EQUAL-OK: "abc def" (WITH-OUTPUT-TO-STRING (STREAM) (FORMAT STREAM "~&abc~.") (FORMAT STREAM "~&~%def")) EQUAL-OK: "abc def" (WITH-OUTPUT-TO-STRING (STREAM) (FORMAT STREAM "~&abc~%~.") (FORMAT STREAM "~&~%def")) EQUAL-OK: "abc def" (PROGN (DEFCLASS GRAY-STRING-OUTPUT-STREAM (FUNDAMENTAL-CHARACTER-OUTPUT-STREAM) ((ACCUMULATOR :TYPE STRING))) (DEFMETHOD INITIALIZE-INSTANCE :AFTER ((S GRAY-STRING-OUTPUT-STREAM) &REST ARGS) (SETF (SLOT-VALUE S 'ACCUMULATOR) (MAKE-ARRAY 0 :ELEMENT-TYPE 'CHARACTER :ADJUSTABLE T :FILL-POINTER 0))) (DEFMETHOD STREAM-WRITE-CHAR ((S GRAY-STRING-OUTPUT-STREAM) CH) (VECTOR-PUSH-EXTEND CH (SLOT-VALUE S 'ACCUMULATOR))) (DEFMETHOD STREAM-LINE-COLUMN ((S GRAY-STRING-OUTPUT-STREAM)) (LET* ((A (SLOT-VALUE S 'ACCUMULATOR)) (J (LENGTH A)) (I (1+ (OR (POSITION #\Newline A :FROM-END T) -1)))) (STRING-WIDTH A :START I :END J))) (LIST (LET ((STREAM (MAKE-INSTANCE 'GRAY-STRING-OUTPUT-STREAM))) (FORMAT STREAM "~&abc~.") (CLOSE STREAM) (COERCE (SLOT-VALUE STREAM 'ACCUMULATOR) 'SIMPLE-STRING)) (LET ((STREAM (MAKE-INSTANCE 'GRAY-STRING-OUTPUT-STREAM))) (FORMAT STREAM "~&abc~.") (FORMAT STREAM "def") (CLOSE STREAM) (COERCE (SLOT-VALUE STREAM 'ACCUMULATOR) 'SIMPLE-STRING)) (LET ((STREAM (MAKE-INSTANCE 'GRAY-STRING-OUTPUT-STREAM))) (FORMAT STREAM "~&abc~.") (FORMAT STREAM "~%def") (CLOSE STREAM) (COERCE (SLOT-VALUE STREAM 'ACCUMULATOR) 'SIMPLE-STRING)) (LET ((STREAM (MAKE-INSTANCE 'GRAY-STRING-OUTPUT-STREAM))) (FORMAT STREAM "~&abc~.") (FORMAT STREAM "~&def") (CLOSE STREAM) (COERCE (SLOT-VALUE STREAM 'ACCUMULATOR) 'SIMPLE-STRING)) (LET ((STREAM (MAKE-INSTANCE 'GRAY-STRING-OUTPUT-STREAM))) (FORMAT STREAM "~&abc~.~.") (FORMAT STREAM "~&~&def") (CLOSE STREAM) (COERCE (SLOT-VALUE STREAM 'ACCUMULATOR) 'SIMPLE-STRING)) (LET ((STREAM (MAKE-INSTANCE 'GRAY-STRING-OUTPUT-STREAM))) (FORMAT STREAM "~&abc~%~.") (FORMAT STREAM "~&def") (CLOSE STREAM) (COERCE (SLOT-VALUE STREAM 'ACCUMULATOR) 'SIMPLE-STRING)) (LET ((STREAM (MAKE-INSTANCE 'GRAY-STRING-OUTPUT-STREAM))) (FORMAT STREAM "~&abc~.") (FORMAT STREAM "~&~%def") (CLOSE STREAM) (COERCE (SLOT-VALUE STREAM 'ACCUMULATOR) 'SIMPLE-STRING)) (LET ((STREAM (MAKE-INSTANCE 'GRAY-STRING-OUTPUT-STREAM))) (FORMAT STREAM "~&abc~%~.") (FORMAT STREAM "~&~%def") (CLOSE STREAM) (COERCE (SLOT-VALUE STREAM 'ACCUMULATOR) 'SIMPLE-STRING)))) EQUAL-OK: ("abc " "abc def" "abc def" "abc def" "abc def" "abc def" "abc def" "abc def") (HANDLER-CASE (FORMAT NIL "~C" 0) (TYPE-ERROR (E) (PRINC-ERROR E) T)) [SIMPLE-TYPE-ERROR]: The ~C format directive requires a character argument, not 0 Current point in control string: "~C" | EQL-OK: T (HANDLER-CASE (FUNCALL (FORMATTER "~C") *STANDARD-OUTPUT* 0) (TYPE-ERROR (E) (PRINC-ERROR E) T)) [SIMPLE-TYPE-ERROR]: The ~C format directive requires a character argument, not 0 EQL-OK: T (HANDLER-CASE (FUNCALL (COMPILE NIL (LAMBDA NIL (FORMAT NIL "~C" 0)))) (TYPE-ERROR (E) (PRINC-ERROR E) T)) [SIMPLE-TYPE-ERROR]: The ~C format directive requires a character argument, not 0 EQL-OK: T (HANDLER-CASE (FORMAT NIL "~@R" 10000) (TYPE-ERROR (E) (PRINC-ERROR E) T)) [SIMPLE-TYPE-ERROR]: The ~@R format directive requires an integer in the range 1 - 3999, not 10000 Current point in control string: "~@R" | EQL-OK: T (HANDLER-CASE (FUNCALL (FORMATTER "~@R") *STANDARD-OUTPUT* 10000) (TYPE-ERROR (E) (PRINC-ERROR E) T)) [SIMPLE-TYPE-ERROR]: The ~@R format directive requires an integer in the range 1 - 3999, not 10000 EQL-OK: T (HANDLER-CASE (FUNCALL (COMPILE NIL (LAMBDA NIL (FORMAT NIL "~@R" 10000)))) (TYPE-ERROR (E) (PRINC-ERROR E) T)) [SIMPLE-TYPE-ERROR]: The ~@R format directive requires an integer in the range 1 - 3999, not 10000 EQL-OK: T (SYMBOLS-CLEANUP '(FORMAT-BLOCKSATZ TYPE-CLASH-ERROR FOO X Y N LISTE DONESTR TELLSTR GRAY-STRING-OUTPUT-STREAM)) EQL-OK: NIL RUN-TEST: finished "format" (0 errors out of 307 tests) RUN-TEST: started # (USE-PACKAGE "CLOS") EQL-OK: T (PROGN (DEFCLASS GENERIC-STREAM-CONTROLLER-CLASS (GENERIC-STREAM-CONTROLLER) (SOURCE-STREAM DESTINATION-STREAM (FLAGS :INITFORM (COPY-TREE '((FINISH-OUTPUT) (FORCE-OUTPUT) (CLEAR-INPUT) (CLOSED)))))) (DEFCLASS GENERIC-STREAM-CONTROLLER-CLASS-2 (GENERIC-STREAM-CONTROLLER-CLASS) ((CAPITALIZE :INITARG CAPITALIZE :INITFORM NIL))) (DEFMETHOD CONVERT (CH (CONTROLLER GENERIC-STREAM-CONTROLLER-CLASS)) (IF (STANDARD-CHAR-P CH) CH #\_)) (DEFMETHOD CONVERT (CH (CONTROLLER GENERIC-STREAM-CONTROLLER-CLASS-2)) (CALL-NEXT-METHOD (IF (SLOT-VALUE CONTROLLER 'CAPITALIZE) (CHAR-UPCASE CH) CH) CONTROLLER)) (DEFMETHOD GENERIC-STREAM-READ-CHAR ((CONTROLLER GENERIC-STREAM-CONTROLLER-CLASS)) (WITH-SLOTS (SOURCE-STREAM) CONTROLLER (IF (LISTEN SOURCE-STREAM) (READ-CHAR SOURCE-STREAM)))) (DEFMETHOD GENERIC-STREAM-PEEK-CHAR ((CONTROLLER GENERIC-STREAM-CONTROLLER-CLASS)) (WITH-SLOTS (SOURCE-STREAM) CONTROLLER (IF (LISTEN SOURCE-STREAM) (PEEK-CHAR NIL SOURCE-STREAM) NIL))) (DEFMETHOD GENERIC-STREAM-READ-CHAR-WILL-HANG-P ((CONTROLLER GENERIC-STREAM-CONTROLLER-CLASS)) (IF (LISTEN (SLOT-VALUE CONTROLLER 'SOURCE-STREAM)) NIL T)) (DEFMETHOD GENERIC-STREAM-CLEAR-INPUT ((CONTROLLER GENERIC-STREAM-CONTROLLER-CLASS)) (RPLACD (ASSOC 'CLEAR-INPUT (SLOT-VALUE CONTROLLER 'FLAGS)) T)) (DEFMETHOD GENERIC-STREAM-READ-BYTE ((CONTROLLER GENERIC-STREAM-CONTROLLER-CLASS)) (CHAR-CODE (READ-CHAR (SLOT-VALUE CONTROLLER 'SOURCE-STREAM)))) (DEFMETHOD GENERIC-STREAM-WRITE-BYTE ((CONTROLLER GENERIC-STREAM-CONTROLLER-CLASS) BY) (WRITE-CHAR (CODE-CHAR BY) (SLOT-VALUE CONTROLLER 'DESTINATION-STREAM))) (DEFMETHOD GENERIC-STREAM-WRITE-CHAR ((CONTROLLER GENERIC-STREAM-CONTROLLER-CLASS) CH) (FORMAT (SLOT-VALUE CONTROLLER 'DESTINATION-STREAM) "~C" (CONVERT CH CONTROLLER))) (DEFMETHOD GENERIC-STREAM-WRITE-STRING ((CONTROLLER GENERIC-STREAM-CONTROLLER-CLASS) STR START LEN) (FORMAT (SLOT-VALUE CONTROLLER 'DESTINATION-STREAM) "~A" STR START LEN)) (DEFMETHOD GENERIC-STREAM-FINISH-OUTPUT ((CONTROLLER GENERIC-STREAM-CONTROLLER-CLASS)) (RPLACD (ASSOC 'FINISH-OUTPUT (SLOT-VALUE CONTROLLER 'FLAGS)) T)) (DEFMETHOD GENERIC-STREAM-FORCE-OUTPUT ((CONTROLLER GENERIC-STREAM-CONTROLLER-CLASS)) (RPLACD (ASSOC 'FORCE-OUTPUT (SLOT-VALUE CONTROLLER 'FLAGS)) T)) (DEFMETHOD GENERIC-STREAM-CLOSE ((CONTROLLER GENERIC-STREAM-CONTROLLER-CLASS)) (RPLACD (ASSOC 'CLOSED (SLOT-VALUE CONTROLLER 'FLAGS)) T)) (DEFUN MAKE-TEST-STREAM (SOURCE-STREAM DESTINATION-STREAM CONTROLLER) (LET ((GENSTREAM (MAKE-GENERIC-STREAM CONTROLLER))) (SETF (SLOT-VALUE CONTROLLER 'SOURCE-STREAM) SOURCE-STREAM) (SETF (SLOT-VALUE CONTROLLER 'DESTINATION-STREAM) DESTINATION-STREAM) GENSTREAM)) (SETQ STR1 "0123") (SETQ STR1S "4567") (SETQ STR2 "abc") (SETQ STR2C "def") (SETQ STR3 "xyz") (SETQ *STRING-INPUT-STREAM-1* (MAKE-STRING-INPUT-STREAM STR1)) (SETQ *STRING-OUTPUT-STREAM-1* (MAKE-STRING-OUTPUT-STREAM)) (SETQ *STRING-INPUT-STREAM-1S* (MAKE-STRING-INPUT-STREAM STR1S)) (SETQ *STRING-OUTPUT-STREAM-1S* (MAKE-STRING-OUTPUT-STREAM)) (SETQ *STRING-INPUT-STREAM-2* (MAKE-STRING-INPUT-STREAM STR2)) (SETQ *STRING-OUTPUT-STREAM-2* (MAKE-STRING-OUTPUT-STREAM)) (SETQ *STRING-INPUT-STREAM-2C* (MAKE-STRING-INPUT-STREAM STR2C)) (SETQ *STRING-OUTPUT-STREAM-2C* (MAKE-STRING-OUTPUT-STREAM)) (SETQ *STRING-INPUT-STREAM-3* (MAKE-STRING-INPUT-STREAM STR3)) (SETQ S1 (MAKE-TEST-STREAM *STRING-INPUT-STREAM-1* *STRING-OUTPUT-STREAM-1* (MAKE-INSTANCE 'GENERIC-STREAM-CONTROLLER-CLASS))) (SETQ S1S (MAKE-TEST-STREAM *STRING-INPUT-STREAM-1S* *STRING-OUTPUT-STREAM-1S* (MAKE-INSTANCE 'GENERIC-STREAM-CONTROLLER-CLASS))) (SETQ S2 (MAKE-TEST-STREAM *STRING-INPUT-STREAM-2* *STRING-OUTPUT-STREAM-2* (MAKE-INSTANCE 'GENERIC-STREAM-CONTROLLER-CLASS-2))) (SETQ S2C (MAKE-TEST-STREAM *STRING-INPUT-STREAM-2C* *STRING-OUTPUT-STREAM-2C* (MAKE-INSTANCE 'GENERIC-STREAM-CONTROLLER-CLASS-2 'CAPITALIZE T))) (SETQ S3 (MAKE-TEST-STREAM *STRING-INPUT-STREAM-3* NIL (MAKE-INSTANCE 'GENERIC-STREAM-CONTROLLER-CLASS))) (DEFUN COPY-STRING-CHAR (STR STREAM) (DOTIMES (I (LENGTH STR) T) (IF (AND (LISTEN STREAM) (CHAR-EQUAL (CHAR STR I) (READ-CHAR STREAM))) (WRITE-CHAR (CHAR STR I) STREAM) (RETURN NIL)))) (DEFUN COPY-STRING-BYTE (STR STREAM) (DOTIMES (I (LENGTH STR) T) (IF (AND (LISTEN STREAM) (EQ (CHAR-CODE (CHAR STR I)) (READ-BYTE STREAM))) (WRITE-BYTE (CHAR-CODE (CHAR STR I)) STREAM) (RETURN NIL)))) (DEFUN CHECK-OUTPUT-STRING (STR STREAM &KEY CAPITALIZE) (LET* ((STRVAL (IF CAPITALIZE (STRING-UPCASE STR) STR)) (CONTROLLER (GENERIC-STREAM-CONTROLLER STREAM)) (STREAM (SLOT-VALUE CONTROLLER 'DESTINATION-STREAM)) (OUTPUT-STRING (GET-OUTPUT-STREAM-STRING STREAM))) (FORMAT T " ~S ~S ~S" STR STRVAL OUTPUT-STRING) (STRING= STRVAL OUTPUT-STRING))) (DEFUN CHECK-CHAR (STR STREAM &KEY CAPITALIZE) (LET* ((TEST (COPY-STRING-CHAR STR STREAM)) (TESTR (CHECK-OUTPUT-STRING STR STREAM :CAPITALIZE CAPITALIZE))) (FORMAT T " char-check: ~S listen/read-char: ~S write chk: ~S~%" STR TEST TESTR) (AND TEST TESTR))) (DEFUN CHECK-BYTE (STR STREAM) (LET* ((TEST (COPY-STRING-BYTE STR STREAM)) (TESTR (CHECK-OUTPUT-STRING STR STREAM))) (FORMAT T " byte-check: ~S listen/read-byte: ~S write chk: ~S~%" STR TEST TESTR) (AND TEST TESTR))) (DEFUN CHECK-WRITE-STRING (STR STREAM) (WRITE-STRING STR STREAM) (LET ((TESTR (CHECK-OUTPUT-STRING STR STREAM))) (FORMAT T " write-string-check: ~S write chk: ~S~%" STR TESTR) TESTR)) (DEFUN CHECK-FLAG (FLAG CONTROLLER) (LET ((STATUS (CDR (ASSOC FLAG (SLOT-VALUE CONTROLLER 'FLAGS))))) (FORMAT T "Checking ~S flag status: ~S~%" FLAG STATUS) STATUS)) (TERPRI) NIL) EQL-OK: NIL (PROGN (FORMAT T "Checking READ-CHAR & WRITE-CHAR~%") (CHECK-CHAR STR1 S1)) Checking READ-CHAR & WRITE-CHAR "0123" "0123" "0123" char-check: "0123" listen/read-char: T write chk: T EQL-OK: T (PROGN (FORMAT T "Checking WRITE-STRING~%") (CHECK-WRITE-STRING STR1S S1S)) Checking WRITE-STRING "4567" "4567" "4567" write-string-check: "4567" write chk: T EQL-OK: T (PROGN (FORMAT T "Checking READ-BYTE & WRITE-BYTE~%") (CHECK-BYTE STR2 S2)) Checking READ-BYTE & WRITE-BYTE "abc" "abc" "abc" byte-check: "abc" listen/read-byte: T write chk: T EQL-OK: T (PROGN (FORMAT T "Checking READ-CHAR & WRITE-CHAR with a subclass~%") (CHECK-CHAR STR2C S2C :CAPITALIZE T)) Checking READ-CHAR & WRITE-CHAR with a subclass "def" "DEF" "DEF" char-check: "def" listen/read-char: T write chk: T EQL-OK: T (PROGN (SETQ CONTROLLER-INSTANCE (GENERIC-STREAM-CONTROLLER S1)) NIL) EQL-OK: NIL (PROGN (CLEAR-INPUT S1) (CHECK-FLAG 'CLEAR-INPUT CONTROLLER-INSTANCE)) Checking CLEAR-INPUT flag status: T EQL-OK: T (PROGN (FINISH-OUTPUT S1) (CHECK-FLAG 'FINISH-OUTPUT CONTROLLER-INSTANCE)) Checking FINISH-OUTPUT flag status: T EQL-OK: T (PROGN (FORCE-OUTPUT S1) (CHECK-FLAG 'FORCE-OUTPUT CONTROLLER-INSTANCE)) Checking FORCE-OUTPUT flag status: T EQL-OK: T (PROG2 (FORMAT T "Checking generic-stream-p (T): ") (PRINC (GENERIC-STREAM-P S1)) (TERPRI)) Checking generic-stream-p (T): T EQL-OK: T (PROG2 (FORMAT T "Checking generic-stream-p (NIL): ") (PRINC (GENERIC-STREAM-P *STRING-INPUT-STREAM-1*)) (TERPRI)) Checking generic-stream-p (NIL): NIL EQL-OK: NIL (PROG2 (FORMAT T "Checking READ-CHAR's eof-error-p, eof-value: ") (PRINC (AND (EQL (READ-CHAR S3) #\x) (EQL (READ-CHAR S3) #\y) (EQL (READ-CHAR S3) #\z) (EQL (READ-CHAR S3 NIL 2) 2))) (TERPRI)) Checking READ-CHAR's eof-error-p, eof-value: T EQL-OK: T (PROGN (FORMAT T "Checking CLOSE (NIL,T)~%") (CLOSE S1) (PRINC (AND (EQ (CHECK-FLAG 'CLOSED (GENERIC-STREAM-CONTROLLER S2)) NIL) (CHECK-FLAG 'CLOSED CONTROLLER-INSTANCE)))) Checking CLOSE (NIL,T) Checking CLOSED flag status: NIL Checking CLOSED flag status: T T EQL-OK: T RUN-TEST: finished "genstream" (0 errors out of 14 tests) RUN-TEST: started # (MAKE-HASH-TABLE :TEST 'EQ :SIZE 20) EQUALP-OK: #S(HASH-TABLE :TEST FASTHASH-EQ) (MAKE-HASH-TABLE :TEST 'EQL :SIZE 2) EQUALP-OK: #S(HASH-TABLE :TEST FASTHASH-EQL) (MAKE-HASH-TABLE :TEST 'EQUAL :SIZE 2) EQUALP-OK: #S(HASH-TABLE :TEST FASTHASH-EQUAL) (PROGN (MAKE-HASH-TABLE :TEST #'EQ :SIZE 2) T) EQL-OK: T (PROGN (MAKE-HASH-TABLE :TEST #'EQL :SIZE 2) T) EQL-OK: T (MAKE-HASH-TABLE :SIZE NIL) [SIMPLE-TYPE-ERROR]: MAKE-HASH-TABLE: :SIZE argument should be a fixnum >=0, not NIL EQL-OK: ERROR (MAKE-HASH-TABLE :SIZE -3) [SIMPLE-TYPE-ERROR]: MAKE-HASH-TABLE: :SIZE argument should be a fixnum >=0, not -3 EQL-OK: ERROR (MAKE-HASH-TABLE :SIZE 2.0) [SIMPLE-TYPE-ERROR]: MAKE-HASH-TABLE: :SIZE argument should be a fixnum >=0, not #1=2.0 EQL-OK: ERROR (MAKE-HASH-TABLE :SIZE 2 :REHASH-SIZE 1.5) EQUALP-OK: #S(HASH-TABLE :TEST FASTHASH-EQL) (MAKE-HASH-TABLE :SIZE 2 :REHASH-SIZE -1.5) [SIMPLE-TYPE-ERROR]: MAKE-HASH-TABLE: :REHASH-SIZE argument should be an integer or a float > 1, not #1=-1.5 EQL-OK: ERROR (MAKE-HASH-TABLE :SIZE 2 :REHASH-SIZE 0.5) [SIMPLE-TYPE-ERROR]: MAKE-HASH-TABLE: :REHASH-SIZE argument should be an integer or a float > 1, not #1=0.5 EQL-OK: ERROR (MAKE-HASH-TABLE :SIZE 2 :REHASH-SIZE 1.0) [SIMPLE-TYPE-ERROR]: MAKE-HASH-TABLE: :REHASH-SIZE argument should be an integer or a float > 1, not #1=1.0 EQL-OK: ERROR (MAKE-HASH-TABLE :SIZE 2 :REHASH-SIZE 5) EQUALP-OK: #S(HASH-TABLE :TEST FASTHASH-EQL) (MAKE-HASH-TABLE :SIZE 4 :REHASH-SIZE 5.0) EQUALP-OK: #S(HASH-TABLE :TEST FASTHASH-EQL) (MAKE-HASH-TABLE :SIZE 2 :REHASH-SIZE NIL) [SIMPLE-TYPE-ERROR]: MAKE-HASH-TABLE: :REHASH-SIZE argument should be an integer or a float > 1, not NIL EQL-OK: ERROR (MAKE-HASH-TABLE :SIZE 2 :REHASH-THRESHOLD NIL) [SIMPLE-TYPE-ERROR]: MAKE-HASH-TABLE: :REHASH-THRESHOLD argument should be a real between 0 and 1, not NIL EQL-OK: ERROR (MAKE-HASH-TABLE :%%SIZE 3) [SIMPLE-KEYWORD-ERROR]: MAKE-HASH-TABLE: illegal keyword/value pair :%%SIZE, 3 in argument list. The allowed keywords are #1=(:INITIAL-CONTENTS :KEY-TYPE :VALUE-TYPE :WARN-IF-NEEDS-REHASH-AFTER-GC :WEAK :TEST :SIZE :REHASH-SIZE :REHASH-THRESHOLD) EQL-OK: ERROR (SETQ TAB (MAKE-HASH-TABLE)) EQUALP-OK: #S(HASH-TABLE :TEST FASTHASH-EQL) (SETF (GETHASH 'HALLO TAB) 'WIEGWHTS) EQL-OK: WIEGWHTS (SETF (GETHASH 'UHU TAB) 'KAUZ) EQL-OK: KAUZ (GETHASH 'UHU TAB) EQL-OK: KAUZ (GETHASH UHU TAB) [SIMPLE-UNBOUND-VARIABLE]: EVAL: variable UHU has no value EQL-OK: ERROR (MAKE-HASH-TABLE) EQUALP-OK: #S(HASH-TABLE :TEST FASTHASH-EQL) (SETQ TAB NIL) EQL-OK: NIL (SETF (GETHASH 'UHU TAB) 'KAUS) [SIMPLE-TYPE-ERROR]: SYSTEM::PUTHASH: argument NIL is not a hash table EQL-OK: ERROR (GETHASH 'UHU TAB) [SIMPLE-TYPE-ERROR]: GETHASH: argument NIL is not a hash table EQL-OK: ERROR (GETHASH 'OTTO TAB) [SIMPLE-TYPE-ERROR]: GETHASH: argument NIL is not a hash table EQL-OK: ERROR (SETQ TAB (MAKE-HASH-TABLE)) EQUALP-OK: #S(HASH-TABLE :TEST FASTHASH-EQL) (SETF (GETHASH 'UHU TAB) 'KAUS) EQL-OK: KAUS (GETHASH 'UHU TAB) EQL-OK: KAUS (GETHASH 'OTTO TAB) EQL-OK: NIL (SETF (GETHASH 'UHU TAB) 'KAUZ) EQL-OK: KAUZ (SETF (GETHASH TAB) NIL) [SIMPLE-PROGRAM-ERROR]: APPLY: too few arguments given to # EQL-OK: ERROR (REMHASH 'UHU TAB) EQL-OK: T TAB EQUALP-OK: #S(HASH-TABLE :TEST FASTHASH-EQL) (CLRHASH TAB9) [SIMPLE-UNBOUND-VARIABLE]: EVAL: variable TAB9 has no value EQL-OK: ERROR (CLRHASH TAB) EQUALP-OK: #S(HASH-TABLE :TEST FASTHASH-EQL) (HASH-TABLE-COUNT TAB) EQL-OK: 0 (SETF (GETHASH 'KLAK TAB) 'KLASE) EQL-OK: KLASE (SETF (GETHASH 'KUNZE TAB) 'RIESE) EQL-OK: RIESE (HASH-TABLE-P TAB) EQL-OK: T (HASH-TABLE-COUNT TAB) EQL-OK: 2 (REMHASH 'KUNZE TAB) EQL-OK: T (SETF (GETHASH 'WALD TAB) 'KHJGSFGJHDF) EQL-OK: KHJGSFGJHDF (GETHASH) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too few arguments given to GETHASH: #1=(GETHASH) EQL-OK: ERROR (REMHASH) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too few arguments given to REMHASH: #1=(REMHASH) EQL-OK: ERROR (CLRHASH TAB) EQUALP-OK: #S(HASH-TABLE :TEST FASTHASH-EQL) (SYMBOLS-CLEANUP '(TAB)) EQL-OK: NIL RUN-TEST: finished "hash" (0 errors out of 48 tests) RUN-TEST: started # (PROGN (SETF (SYMBOL-FUNCTION 'SETF-GETHASH) (SYMBOL-FUNCTION 'SYSTEM::PUTHASH)) T) EQL-OK: T (DEFUN SYMBOLE NIL (LET ((B 0) (HASH-TABLE (MAKE-HASH-TABLE :SIZE 20 :REHASH-THRESHOLD 0.75)) (LISTE (MAKE-LIST 50)) (LISTE2 (MAKE-LIST 50))) (RPLACD (LAST LISTE) LISTE) (RPLACD (LAST LISTE2) LISTE2) (DO-EXTERNAL-SYMBOLS (X (FIND-PACKAGE "LISP")) (COND ((CAR LISTE) (LET ((HVAL (GETHASH (CAR LISTE) HASH-TABLE)) (LVAL (CAR LISTE2))) (UNLESS (EQ HVAL LVAL) (PRINT "mist, hash-tabelle kaputt") (PRINT (CAR LISTE)) (PRINT HASH-TABLE) (PRINT (HASH-TABLE-COUNT HASH-TABLE)) (PRINT "hval:") (PRINT HVAL) (PRINT "lval:") (PRINT LVAL) (RETURN-FROM SYMBOLE 'ERROR)) (REMHASH (CAR LISTE) HASH-TABLE) (SETF-GETHASH X HASH-TABLE (SETQ B (+ 1 B))) (RPLACA LISTE X) (RPLACA LISTE2 B) (SETQ LISTE (CDR LISTE)) (SETQ LISTE2 (CDR LISTE2)))) (T (SETF-GETHASH X HASH-TABLE (SETQ B (+ 1 B))) (RPLACA LISTE X) (RPLACA LISTE2 B) (SETQ LISTE (CDR LISTE)) (SETQ LISTE2 (CDR LISTE2))))))) EQL-OK: SYMBOLE (SYMBOLE) EQL-OK: NIL (PROGN (SETF HT1 (MAKE-HASH-TABLE :TEST 'EQUAL) HT2 (MAKE-HASH-TABLE :TEST 'EQUAL) (GETHASH HT1 HT1) 1 (GETHASH HT2 HT1) 2 (GETHASH HT2 HT2) 2 (GETHASH HT1 HT2) 1 (GETHASH 10 HT1) 11 (GETHASH 11 HT1) 12 (GETHASH 12 HT1) 13 (GETHASH 12 HT2) 13 (GETHASH 11 HT2) 12 (GETHASH 10 HT2) 11) (EQUALP HT1 HT2)) EQL-OK: T (PROGN (SETF (GETHASH 100 HT1) 101) (EQUALP HT1 HT2)) EQL-OK: NIL (PROGN (REMHASH 100 HT1) (EQUALP HT1 HT2)) EQL-OK: T (DEFUN HASH-TABLE-KEYS (HT) (LOOP :FOR KK :BEING :EACH :HASH-KEY :OF HT :COLLECT KK)) EQL-OK: HASH-TABLE-KEYS (DEFUN CHECK-HASH-UNIQUE-VEC (HT SIZE) (LET ((VEC (MAKE-ARRAY SIZE :INITIAL-ELEMENT NIL)) (ERROR-COUNT 0)) (MAPHASH (LAMBDA (KEY VAL) (LET* ((POS (1- (CDR KEY))) (ELT (SVREF VEC POS))) (COND (ELT (PUSH VAL (CDR ELT)) (INCF ERROR-COUNT) (FORMAT T " key ~s occurs multiple times: ~S!~%" KEY (CDR ELT))) ((SETF (SVREF VEC POS) (LIST KEY VAL)))))) HT) ERROR-COUNT)) EQL-OK: CHECK-HASH-UNIQUE-VEC (DEFUN DO-HASH-TEST (HT &KEY (SIZE 15000)) (CLRHASH HT) (LOOP :FOR COUNTVAL :FROM 1 :TO SIZE :FOR KEY = (CONS "HT" COUNTVAL) :DO (SETF (GETHASH KEY HT) T (GETHASH KEY HT) COUNTVAL)) (CHECK-HASH-UNIQUE-VEC HT SIZE)) EQL-OK: DO-HASH-TEST (LOOP :FOR TEST :IN '(EQ EQL EQUAL EQUALP) :DO (FORMAT T "~& === ~10@S:" TEST) :SUM (LOOP :WITH HT = (MAKE-HASH-TABLE :TEST TEST :SIZE 1000) :FOR I :FROM 1 :TO 1 :DO (FORMAT T " <~d>" I) (FORCE-OUTPUT) :SUM (DO-HASH-TEST HT)) :DO (FORMAT T " done~%")) === EQ: <1> done === EQL: <1> done === EQUAL: <1> done === EQUALP: <1> done EQL-OK: 0 (= (SXHASH '(1 2 3 4 5 6 7 8)) (SXHASH '(1 2 3 4 5 6 7 8 9))) EQL-OK: NIL (TYPEP (SXHASH '#1=(1 #1# . #1#)) 'FIXNUM) EQL-OK: T (= (SXHASH '(1 (2 . 3) 4 (5 . 6) (7 (8)))) (SXHASH '(1 (2 . 3) 4 (5 . 6) (8 (7))))) EQL-OK: NIL (SYMBOLS-CLEANUP '(SYMBOLE HASH-TABLE-KEYS CHECK-HASH-UNIQUE-VEC DO-HASH-TEST SETF-GETHASH HT1 HT2)) EQL-OK: NIL RUN-TEST: finished "hashlong" (0 errors out of 14 tests) RUN-TEST: started # (BLOCK NIL (HANDLER-BIND ((WARNING #'(LAMBDA (W) (DECLARE (IGNORE W)) (RETURN 'WARNING)))) (LET ((X1 (MAKE-INSTANCE 'STANDARD-STABLEHASH)) (X2 (MAKE-INSTANCE 'STANDARD-STABLEHASH)) (HT (MAKE-HASH-TABLE :TEST 'STABLEHASH-EQ))) (SETF (GETHASH X1 HT) 11) (SETF (GETHASH X2 HT) 22) (SETF (GETHASH '1000 HT) 11999) (GC) (GETHASH X1 HT) (SETF (GETHASH '10000000000000000000 HT) 11999999999999) (GC) (GETHASH X1 HT)))) EQL-OK: 11 (BLOCK NIL (HANDLER-BIND ((WARNING #'(LAMBDA (W) (DECLARE (IGNORE W)) (RETURN 'WARNING)))) (LET ((X1 (MAKE-INSTANCE 'STANDARD-STABLEHASH)) (X2 (MAKE-INSTANCE 'STANDARD-STABLEHASH)) (HT (MAKE-HASH-TABLE :TEST 'STABLEHASH-EQ :WARN-IF-NEEDS-REHASH-AFTER-GC T))) (SETF (GETHASH X1 HT) 11) (SETF (GETHASH X2 HT) 22) (SETF (GETHASH '1000 HT) 11999) (GC) (GETHASH X1 HT) (SETF (GETHASH '10000000000000000000 HT) 11999999999999)))) EQL-OK: WARNING (BLOCK NIL (HANDLER-BIND ((WARNING #'(LAMBDA (W) (DECLARE (IGNORE W)) (RETURN 'WARNING)))) (LET ((*WARN-ON-HASHTABLE-NEEDING-REHASH-AFTER-GC* T)) (LET ((X1 (MAKE-INSTANCE 'STANDARD-STABLEHASH)) (X2 (MAKE-INSTANCE 'STANDARD-STABLEHASH)) (HT (MAKE-HASH-TABLE :TEST 'STABLEHASH-EQ))) (SETF (GETHASH X1 HT) 11) (SETF (GETHASH X2 HT) 22) (SETF (GETHASH '1000 HT) 11999) (GC) (GETHASH X1 HT) (SETF (GETHASH '10000000000000000000 HT) 11999999999999) (GC) (GETHASH X1 HT))))) EQL-OK: WARNING (LET ((HT (MAKE-HASH-TABLE :TEST 'EQ))) (SETF (GETHASH HT HT) HT) (SETQ HT (READ-FROM-STRING (WITH-STANDARD-IO-SYNTAX (WRITE-TO-STRING HT)))) (EQ (GETHASH HT HT) HT)) EQL-OK: T (LET ((HT (MAKE-HASH-TABLE :TEST 'EQ)) X) (DEFSTRUCT HT-TEST-STRUCT A B C) (SETQ X (MAKE-HT-TEST-STRUCT :A 1 :B 2 :C HT)) (SETF (GETHASH HT HT) HT (GETHASH X HT) 12) (LET ((L (READ-FROM-STRING (WITH-STANDARD-IO-SYNTAX (WRITE-TO-STRING (LIST X HT)))))) (SETQ HT (SECOND L) X (FIRST L))) (LIST (EQ (GETHASH HT HT) HT) (GETHASH X HT))) EQUAL-OK: (T 12) (LET ((HT (MAKE-HASH-TABLE :TEST 'FASTHASH-EQ)) X) (DEFSTRUCT HT-TEST-STRUCT A B C) (SETQ X (MAKE-HT-TEST-STRUCT :A 1 :B 2 :C HT)) (SETF (GETHASH HT HT) HT (GETHASH X HT) 12) (SETQ X (READ-FROM-STRING (WITH-STANDARD-IO-SYNTAX (WRITE-TO-STRING X))) HT (HT-TEST-STRUCT-C X)) (SETF (HT-TEST-STRUCT-A X) (! 123) (GETHASH (! 20) HT) (! 21) (GETHASH (! 21) HT) (! 22) (GETHASH (! 22) HT) (! 23)) (GC) (SETF (HT-TEST-STRUCT-B X) (! 124) (GETHASH (! 30) HT) (! 61) (GETHASH (! 41) HT) (! 72) (GETHASH (! 52) HT) (! 83)) (GC) (LIST (EQ (GETHASH HT HT) HT) (GETHASH X HT))) EQUAL-OK: (T 12) (LET ((HT (MAKE-HASH-TABLE :TEST 'EQUAL)) (L '#1=(1 2 . #1#))) (SETF (GETHASH L HT) 42) (GETHASH L HT)) EQL-OK: 42 (LET ((HT (MAKE-HASH-TABLE :TEST 'EQUALP)) (V #1=#(1 2 #1#))) (SETF (GETHASH V HT) 42) (GETHASH V HT)) EQL-OK: 42 (LET* ((HT (MAKE-HASH-TABLE :TEST 'EQUALP)) S) (DEFSTRUCT HT-TEST-STRUCT A B C) (SETF S (MAKE-HT-TEST-STRUCT :A 1 :B 2 :C 3) (HT-TEST-STRUCT-B S) S (GETHASH S HT) 42) (GETHASH S HT)) EQL-OK: 42 (PROGN (SYMBOL-CLEANUP 'HT-TEST-STRUCT)) EQL-OK: T RUN-TEST: finished "hashtable" (0 errors out of 10 tests) RUN-TEST: started # (PROGN (SETQ BS (MAKE-BROADCAST-STREAM)) T) EQL-OK: T (PRINT 123 BS) EQL-OK: 123 (SETQ STR1 "test 123456") EQUAL-OK: "test 123456" (PROGN (SETQ S1 (MAKE-TWO-WAY-STREAM (MAKE-STRING-INPUT-STREAM STR1) *STANDARD-OUTPUT*)) T) EQL-OK: T (READ S1) EQL-OK: TEST (READ-CHAR S1) EQL-OK: #\1 (READ-CHAR S1) EQL-OK: #\2 (UNREAD-CHAR #\2 S1) EQL-OK: NIL (READ-CHAR S1) EQL-OK: #\2 (READ-CHAR S1) EQL-OK: #\3 (READ-CHAR S1) EQL-OK: #\4 (UNREAD-CHAR #\A S1) [SIMPLE-STREAM-ERROR]: UNREAD-CHAR: the last character read from #1=# # #>> was not #\A EQL-OK: ERROR (READ-CHAR S1) EQL-OK: #\5 (READ-CHAR S1) EQL-OK: #\6 (CLOSE S1) EQL-OK: T STR1 EQUAL-OK: "test 123456" (MULTIPLE-VALUE-LIST (PARSE-INTEGER "abc")) [SIMPLE-PARSE-ERROR]: PARSE-INTEGER: substring "abc" does not have integer syntax at position 0 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER " abc ")) [SIMPLE-PARSE-ERROR]: PARSE-INTEGER: substring " abc " does not have integer syntax at position 2 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER "123")) EQUAL-OK: (123 3) (MULTIPLE-VALUE-LIST (PARSE-INTEGER " 123 ")) EQUAL-OK: (123 7) (MULTIPLE-VALUE-LIST (PARSE-INTEGER "123 t")) [SIMPLE-PARSE-ERROR]: PARSE-INTEGER: substring "123 t" does not have integer syntax at position 4 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER " 123 t ")) [SIMPLE-PARSE-ERROR]: PARSE-INTEGER: substring " 123 t " does not have integer syntax at position 8 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER " ( 12 ) 43 t ")) [SIMPLE-PARSE-ERROR]: PARSE-INTEGER: substring " ( 12 ) 43 t " does not have integer syntax at position 1 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER " abc " :JUNK-ALLOWED T)) EQUAL-OK: (NIL 2) (MULTIPLE-VALUE-LIST (PARSE-INTEGER "123" :JUNK-ALLOWED T)) EQUAL-OK: (123 3) (MULTIPLE-VALUE-LIST (PARSE-INTEGER " 123 " :JUNK-ALLOWED T)) EQUAL-OK: (123 5) (MULTIPLE-VALUE-LIST (PARSE-INTEGER "123 t" :JUNK-ALLOWED T)) EQUAL-OK: (123 3) (MULTIPLE-VALUE-LIST (PARSE-INTEGER " 123 t " :JUNK-ALLOWED T)) EQUAL-OK: (123 5) (MULTIPLE-VALUE-LIST (PARSE-INTEGER " ( 12 ) 43 t " :JUNK-ALLOWED T)) EQUAL-OK: (NIL 1) (SETQ A "q w e 1 2 r 4 d : :;;;") EQUAL-OK: "q w e 1 2 r 4 d : :;;;" (SETQ B "1 2 3 4 5 6 7") EQUAL-OK: "1 2 3 4 5 6 7" (SETQ C "1.3 4.223") EQUAL-OK: "1.3 4.223" (SETQ D "q w e r t z") EQUAL-OK: "q w e r t z" (MULTIPLE-VALUE-LIST (PARSE-INTEGER A)) [SIMPLE-PARSE-ERROR]: PARSE-INTEGER: substring "q w e 1 2 r 4 d : :;;;" does not have integer syntax at position 0 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER B)) [SIMPLE-PARSE-ERROR]: PARSE-INTEGER: substring "1 2 3 4 5 6 7" does not have integer syntax at position 2 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER C)) [SIMPLE-PARSE-ERROR]: PARSE-INTEGER: substring "1.3 4.223" does not have integer syntax at position 1 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER D)) [SIMPLE-PARSE-ERROR]: PARSE-INTEGER: substring "q w e r t z" does not have integer syntax at position 0 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER A :START 4 :END 6)) [SIMPLE-PARSE-ERROR]: PARSE-INTEGER: substring "e " does not have integer syntax at position 0 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER B :START 2 :END 3)) EQUAL-OK: (2 3) (MULTIPLE-VALUE-LIST (PARSE-INTEGER C :START 1)) [SIMPLE-PARSE-ERROR]: PARSE-INTEGER: substring ".3 4.223" does not have integer syntax at position 0 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER D :START 6)) [SIMPLE-PARSE-ERROR]: PARSE-INTEGER: substring "r t z" does not have integer syntax at position 0 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER A :END 4)) [SIMPLE-PARSE-ERROR]: PARSE-INTEGER: substring "q w " does not have integer syntax at position 0 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER B :END 3)) [SIMPLE-PARSE-ERROR]: PARSE-INTEGER: substring "1 2" does not have integer syntax at position 2 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER C :END 3)) [SIMPLE-PARSE-ERROR]: PARSE-INTEGER: substring "1.3" does not have integer syntax at position 1 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER D :END 1)) [SIMPLE-PARSE-ERROR]: PARSE-INTEGER: substring "q" does not have integer syntax at position 0 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER A :RADIX 1)) [SIMPLE-TYPE-ERROR]: PARSE-INTEGER: :RADIX argument 1 is not an integer between 2 and 36 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER B :RADIX 10)) [SIMPLE-PARSE-ERROR]: PARSE-INTEGER: substring "1 2 3 4 5 6 7" does not have integer syntax at position 2 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER C :RADIX 20)) [SIMPLE-PARSE-ERROR]: PARSE-INTEGER: substring "1.3 4.223" does not have integer syntax at position 1 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER D :RADIX 40)) [SIMPLE-TYPE-ERROR]: PARSE-INTEGER: :RADIX argument 40 is not an integer between 2 and 36 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (PARSE-INTEGER A :JUNK-ALLOWED T)) EQUAL-OK: (NIL 0) (MULTIPLE-VALUE-LIST (PARSE-INTEGER B :JUNK-ALLOWED T)) EQUAL-OK: (1 1) (MULTIPLE-VALUE-LIST (PARSE-INTEGER C :JUNK-ALLOWED T)) EQUAL-OK: (1 1) (MULTIPLE-VALUE-LIST (PARSE-INTEGER D :JUNK-ALLOWED T)) EQUAL-OK: (NIL 0) (LET* ((S "0123456789") (D (MAKE-ARRAY 5 :DISPLACED-TO S :DISPLACED-INDEX-OFFSET 3 :ELEMENT-TYPE (ARRAY-ELEMENT-TYPE S)))) (MULTIPLE-VALUE-LIST (PARSE-INTEGER D :START 2 :END 5))) EQUAL-OK: (567 5) (STREAM-ELEMENT-TYPE *TERMINAL-IO*) EQL-OK: CHARACTER (PROGN (SETQ A (MAKE-STRING-INPUT-STREAM "aaa bbb")) T) EQL-OK: T (READ A) EQL-OK: AAA (READ A) EQL-OK: BBB (PROGN (SETQ A (MAKE-STRING-OUTPUT-STREAM)) (SETQ B (MAKE-STRING-OUTPUT-STREAM)) (SETQ C (MAKE-BROADCAST-STREAM A B)) T) EQL-OK: T (PRINT "xxx" C) EQUAL-OK: "xxx" (CLEAR-OUTPUT C) EQL-OK: NIL (FINISH-OUTPUT C) EQL-OK: NIL (GET-OUTPUT-STREAM-STRING A) EQUAL-OK: " \"xxx\" " (GET-OUTPUT-STREAM-STRING B) EQUAL-OK: " \"xxx\" " (PRINT "yyy" C) EQUAL-OK: "yyy" (CLEAR-OUTPUT C) EQL-OK: NIL (FINISH-OUTPUT C) EQL-OK: NIL (PRINT "zzz" A) EQUAL-OK: "zzz" (CLEAR-OUTPUT A) EQL-OK: NIL (FINISH-OUTPUT A) EQL-OK: NIL (GET-OUTPUT-STREAM-STRING A) EQUAL-OK: " \"yyy\" \"zzz\" " (GET-OUTPUT-STREAM-STRING B) EQUAL-OK: " \"yyy\" " (PROGN (SETQ A (MAKE-STRING-INPUT-STREAM "123")) T) EQL-OK: T (LISTEN A) EQL-OK: T (READ A) EQL-OK: 123 (LISTEN A) EQL-OK: NIL *PRINT-CASE* EQL-OK: :UPCASE *PRINT-GENSYM* EQL-OK: T *PRINT-LEVEL* EQL-OK: NIL *PRINT-LENGTH* EQL-OK: NIL *PRINT-ARRAY* EQL-OK: T *PRINT-ESCAPE* EQL-OK: T *PRINT-PRETTY* EQL-OK: NIL *PRINT-CIRCLE* EQL-OK: T *PRINT-BASE* EQL-OK: 10 *PRINT-RADIX* EQL-OK: NIL (SETQ STRING1 "Das ist ein Test mit Print ") EQUAL-OK: "Das ist ein Test mit Print " (PRIN1-TO-STRING STRING1) EQUAL-OK: "\"Das ist ein Test mit Print \"" (PRINC-TO-STRING STRING1) EQUAL-OK: "Das ist ein Test mit Print " (PROGN (SETQ A (MAKE-STRING-INPUT-STREAM "123")) T) EQL-OK: T (READ-CHAR-NO-HANG A) EQL-OK: #\1 (READ A) EQL-OK: 23 (READ-CHAR-NO-HANG A) [SIMPLE-END-OF-FILE]: READ: input stream #1=# has reached its end EQL-OK: ERROR (READ-CHAR-NO-HANG A NIL "EOF") EQUAL-OK: "EOF" (PROGN (SETQ A (MAKE-STRING-INPUT-STREAM "1 2 ;32 abA")) (SETQ B (MAKE-STRING-INPUT-STREAM " 1 2 3 A x y z a b c ")) T) EQL-OK: T (READ-DELIMITED-LIST #\A B) EQUAL-OK: (1 2 3) (SETQ C (MULTIPLE-VALUE-LIST (READ-LINE B))) EQUAL-OK: (" x y z " NIL) (LENGTH C) EQL-OK: 2 (MULTIPLE-VALUE-LIST (READ-LINE B)) EQUAL-OK: ("a b c " T) (MULTIPLE-VALUE-LIST (READ-LINE B)) [SIMPLE-END-OF-FILE]: READ: input stream #1=# has reached its end EQL-OK: ERROR (MULTIPLE-VALUE-LIST (READ-LINE B NIL "EOF")) EQUAL-OK: ("EOF" T) (PEEK-CHAR NIL A) EQL-OK: #\1 (READ-CHAR A) EQL-OK: #\1 (PEEK-CHAR T A) EQL-OK: #\2 (READ-CHAR A) EQL-OK: #\2 (PEEK-CHAR T A) EQL-OK: #\; (READ-CHAR A) EQL-OK: #\; (PEEK-CHAR #\A A) EQL-OK: #\A (READ-CHAR A) EQL-OK: #\A (PEEK-CHAR NIL A) [SIMPLE-END-OF-FILE]: READ: input stream #1=# has reached its end EQL-OK: ERROR (PEEK-CHAR NIL A NIL "EOF") EQUAL-OK: "EOF" (WITH-OUTPUT-TO-STRING (OUT) (PEEK-CHAR #\] (MAKE-ECHO-STREAM (MAKE-STRING-INPUT-STREAM " ab cd e df s]") OUT))) EQUAL-OK: " ab cd e df s" (WITH-OUTPUT-TO-STRING (OUT) (PEEK-CHAR T (MAKE-ECHO-STREAM (MAKE-STRING-INPUT-STREAM " ab cd e df s]") OUT))) EQUAL-OK: " " (WITH-OUTPUT-TO-STRING (OUT) (PEEK-CHAR NIL (MAKE-ECHO-STREAM (MAKE-STRING-INPUT-STREAM " ab cd e df s]") OUT))) EQUAL-OK: "" (SETQ A '((BERLIN (DRESDEN FRANKFURT BONN MUENCHEN)) (MUELLER (KARL LUISE DIETER ALDO)))) EQUAL-OK: ((BERLIN (DRESDEN FRANKFURT BONN MUENCHEN)) (MUELLER (KARL LUISE DIETER ALDO))) (PROGN (SETQ AA (MAKE-STRING-INPUT-STREAM "berlin d mueller :r")) T) EQL-OK: T (DEFUN ASK (&OPTIONAL (RES NIL)) " (terpri)(terpri)(terpri) (print '(*** Eingabe des Keywortes ***)) (print '(- mit :r reset)) (terpri)" (SETQ X (READ AA)) " (print x)" (COND ((EQUAL X ':R) (CONS "--- reset ---" RES)) (T (CONS (CADR (ASSOC X A)) (ASK RES))))) EQL-OK: ASK (ASK) EQUAL-OK: ((DRESDEN FRANKFURT BONN MUENCHEN) NIL (KARL LUISE DIETER ALDO) "--- reset ---") (SETQ STRING1 "Das ist ein Teststring") EQUAL-OK: "Das ist ein Teststring" (SETQ STRING2 "Auch das 1 2 3 ist ein Teststring") EQUAL-OK: "Auch das 1 2 3 ist ein Teststring" (MULTIPLE-VALUE-LIST (READ-FROM-STRING STRING1)) EQUAL-OK: (DAS 4) (MULTIPLE-VALUE-LIST (READ-FROM-STRING STRING2)) EQUAL-OK: (AUCH 5) (MULTIPLE-VALUE-LIST (READ-FROM-STRING STRING1 T NIL :START 2)) EQUAL-OK: (S 4) (MULTIPLE-VALUE-LIST (READ-FROM-STRING STRING1 T NIL :START 2 :PRESERVE-WHITESPACE T)) EQUAL-OK: (S 3) (MULTIPLE-VALUE-LIST (READ-FROM-STRING STRING2 T NIL :START 5)) EQUAL-OK: (DAS 9) (MULTIPLE-VALUE-LIST (READ-FROM-STRING STRING2 T NIL :START 5 :END 6)) EQUAL-OK: (D 6) (MULTIPLE-VALUE-LIST (READ-FROM-STRING STRING1 T NIL :START 4 :END 3)) [SIMPLE-ERROR]: MAKE-STRING-INPUT-STREAM: :START-index 4 must not be greater than :END-index 3 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (READ-FROM-STRING STRING1 T NIL :END 0)) [SIMPLE-END-OF-FILE]: READ: input stream #1=# has reached its end EQL-OK: ERROR (MULTIPLE-VALUE-LIST (READ-FROM-STRING STRING1 T NIL :START -2 :END 0)) [SIMPLE-TYPE-ERROR]: MAKE-STRING-INPUT-STREAM: :START-index should not be negative: -2 EQL-OK: ERROR (MULTIPLE-VALUE-LIST (READ-FROM-STRING STRING1 T NIL :END 2)) EQUAL-OK: (DA 2) *READ-SUPPRESS* EQL-OK: NIL (STANDARD-CHAR-P 'A) [SIMPLE-TYPE-ERROR]: STANDARD-CHAR-P: argument A is not a character EQL-OK: ERROR (STANDARD-CHAR-P '#\Backspace) EQL-OK: NIL (STANDARD-CHAR-P '#\Tab) EQL-OK: NIL (STANDARD-CHAR-P '#\Newline) EQL-OK: T (STANDARD-CHAR-P '#\Page) EQL-OK: NIL (STANDARD-CHAR-P '#\Return) EQL-OK: NIL (STRING-CHAR-P 'A) [SIMPLE-TYPE-ERROR]: STRING-CHAR-P: argument A is not a character EQL-OK: ERROR (STRING-CHAR-P '#\Space) EQL-OK: T (STRING-CHAR-P '#\Newline) EQL-OK: T (STRING-CHAR-P '#\Backspace) EQL-OK: T (STRING-CHAR-P '#\a) EQL-OK: T (STRING-CHAR-P '#\8) EQL-OK: T (STRING-CHAR-P '#\-) EQL-OK: T (STRING-CHAR-P '#\n) EQL-OK: T (STRING-CHAR-P '#\() EQL-OK: T (STRINGP "das ist einer der Teststrings") EQL-OK: T (STRINGP '(DAS IST NATUERLICH FALSCH)) EQL-OK: NIL (STRINGP "das ist die eine Haelfte" "und das die andere") [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too many arguments given to STRINGP: #1=(STRINGP "das ist die eine Haelfte" "und das die andere") EQL-OK: ERROR (SETQ J 0) EQL-OK: 0 (WITH-INPUT-FROM-STRING (S "animal crackers" :START 6) (READ S)) EQL-OK: CRACKERS (WITH-INPUT-FROM-STRING (S "animal crackers" :INDEX J :START 6) (READ S)) EQL-OK: CRACKERS J EQL-OK: 15 (WITH-INPUT-FROM-STRING (S "animal crackers" :INDEX J :START 7) (READ S)) EQL-OK: CRACKERS J EQL-OK: 15 (WITH-INPUT-FROM-STRING (S "animal crackers" :INDEX J :START 2) (READ S)) EQL-OK: IMAL J EQL-OK: 7 (WITH-INPUT-FROM-STRING (S "animal crackers" :INDEX J :START 0 :END 6) (READ S)) EQL-OK: ANIMAL J EQL-OK: 6 (WITH-INPUT-FROM-STRING (S "animal crackers" :INDEX J :START 0 :END 12) (READ S)) EQL-OK: ANIMAL J EQL-OK: 7 (WITH-INPUT-FROM-STRING (S "animal crackers" :INDEX J :START -1) (READ S)) [SIMPLE-TYPE-ERROR]: MAKE-STRING-INPUT-STREAM: :START-index should not be negative: -1 EQL-OK: ERROR J EQL-OK: 7 (WITH-INPUT-FROM-STRING (S "animal crackers" :INDEX J :START 6 :END 20) (READ S)) [SIMPLE-TYPE-ERROR]: MAKE-STRING-INPUT-STREAM: :END-index 20 should not be greater than the length of the string EQL-OK: ERROR J EQL-OK: 7 (SETQ A "Das ist wieder einmal einer der SUUPERTESTstrings.") EQUAL-OK: "Das ist wieder einmal einer der SUUPERTESTstrings." (PROGN (SETQ B (MAKE-STRING-OUTPUT-STREAM)) T) EQL-OK: T (WRITE-STRING A B) EQUAL-OK: "Das ist wieder einmal einer der SUUPERTESTstrings." (WRITE-STRING A B :START 10) EQUAL-OK: "Das ist wieder einmal einer der SUUPERTESTstrings." (WRITE-STRING A B :START 80) [SIMPLE-TYPE-ERROR]: WRITE-STRING: :START-index 80 should not be greater than the length of the string EQL-OK: ERROR (WRITE-STRING A B :END 5) EQUAL-OK: "Das ist wieder einmal einer der SUUPERTESTstrings." (WRITE-STRING A B :END -2) [SIMPLE-TYPE-ERROR]: WRITE-STRING: :END-index should not be negative: -2 EQL-OK: ERROR (WRITE-STRING A B :END 100) [SIMPLE-TYPE-ERROR]: WRITE-STRING: :END-index 100 should not be greater than the length of the string EQL-OK: ERROR (WRITE-STRING A B :START 5 :END 20) EQUAL-OK: "Das ist wieder einmal einer der SUUPERTESTstrings." (WRITE-STRING A B :START 10 :END 5) [SIMPLE-ERROR]: WRITE-STRING: :START-index 10 must not be greater than :END-index 5 EQL-OK: ERROR (GET-OUTPUT-STREAM-STRING B) EQUAL-OK: "Das ist wieder einmal einer der SUUPERTESTstrings.eder einmal einer der SUUPERTESTstrings.Das ist wieder einma" (WRITE-STRING A B) EQUAL-OK: "Das ist wieder einmal einer der SUUPERTESTstrings." (LENGTH (GET-OUTPUT-STREAM-STRING B)) EQL-OK: 50 (WRITE-LINE A B) EQUAL-OK: "Das ist wieder einmal einer der SUUPERTESTstrings." (LENGTH (GET-OUTPUT-STREAM-STRING B)) EQL-OK: 51 (WITH-OUTPUT-TO-STRING (S) (PRINT 'XXX S)) EQUAL-OK: " XXX " (SETQ A (MAKE-ARRAY 10 :ELEMENT-TYPE 'STRING-CHAR :FILL-POINTER 0)) EQUAL-OK: "" (WITH-OUTPUT-TO-STRING (S A) (PRINC 123 S)) EQL-OK: 123 A EQUAL-OK: "123" (WITH-OUTPUT-TO-STRING (S A) (PRINC 4567 S)) EQL-OK: 4567 A EQUAL-OK: "1234567" (WITH-OUTPUT-TO-STRING (S A) (PRINC 890 S)) EQL-OK: 890 A EQUAL-OK: "1234567890" (IF (ADJUSTABLE-ARRAY-P A) (ERROR "this test assumes that A is not actually adjustable") (WITH-OUTPUT-TO-STRING (S A) (PRINC 'A S))) [SIMPLE-ERROR]: VECTOR-PUSH-EXTEND works only on adjustable arrays, not on "1234567890" EQL-OK: ERROR A EQUAL-OK: "1234567890" (SETQ A (MAKE-ARRAY 10 :ELEMENT-TYPE 'STRING-CHAR :FILL-POINTER 0 :ADJUSTABLE T)) EQUAL-OK: "" (WITH-OUTPUT-TO-STRING (S A) (PRINC 123 S)) EQL-OK: 123 A EQUAL-OK: "123" (WITH-OUTPUT-TO-STRING (S A) (PRINC 4567 S)) EQL-OK: 4567 A EQUAL-OK: "1234567" (WITH-OUTPUT-TO-STRING (S A) (PRINC 890 S)) EQL-OK: 890 A EQUAL-OK: "1234567890" (WITH-OUTPUT-TO-STRING (S A) (PRINC 'ABCDE S)) EQL-OK: ABCDE A EQUAL-OK: "1234567890ABCDE" (WITH-OUTPUT-TO-STRING (S A) (PRINC 'FGHI S)) EQL-OK: FGHI A EQUAL-OK: "1234567890ABCDEFGHI" (PROGN (MAKUNBOUND 'BS) (MAKUNBOUND 'A) (MAKUNBOUND 'B) (MAKUNBOUND 'C) (MAKUNBOUND 'D) (MAKUNBOUND 'AA) (MAKUNBOUND 'STRING1) (MAKUNBOUND 'STRING2) (MAKUNBOUND 'X) (MAKUNBOUND 'J) (MAKUNBOUND 'S1) (MAKUNBOUND 'STR1) T) EQL-OK: T (LET (RESULT) (LIST (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (SETQ RESULT (MULTIPLE-VALUE-LIST (WRITE-STRING (MAKE-ARRAY 0 :ELEMENT-TYPE NIL))))) RESULT)) EQUAL-OK: ("" ("")) (LET ((ST (STRING (CODE-CHAR 27)))) (STRING= ST (SYMBOL-NAME (READ-FROM-STRING (PRIN1-TO-STRING (MAKE-SYMBOL ST)))))) EQL-OK: T (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LET ((RESULT 'NIL) (TABWIDTH 12)) (DOLIST (SYMBOL '(|x| |FoObAr| |fOo|)) (LET ((TAB -1)) (FORMAT T "~&") (DOLIST (ESCAPE '(T NIL)) (DOLIST (CASE '(:UPCASE :DOWNCASE :CAPITALIZE)) (FORMAT T "~VT" (* (INCF TAB) TABWIDTH)) (WRITE SYMBOL :ESCAPE ESCAPE :CASE CASE))))))) EQUAL-OK: " |x| |x| |x| x x x |FoObAr| |FoObAr| |FoObAr| FoObAr foobar Foobar |fOo| |fOo| |fOo| fOo foo foo" (LET ((*READ-SUPPRESS* T)) (MAPCAR #'READ-FROM-STRING '("#(foo bar baz)" "#P(:type :lisp)" "#c1.2" "#.(PRINT 'FOO)" "#3AHELLO" "#S(INTEGER)" "#*ABC" "#\\GARBAGE" "#RALPHA" "#3R444"))) EQUAL-OK: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) (LET ((*READ-SUPPRESS* T)) (MAPCAR #'READ-FROM-STRING '("#(foo bar baz)" "#P(:type :lisp)" "#c1.2"))) EQUAL-OK: (NIL NIL NIL) (DEFUN MY-PPRINT-REVERSE (OUT LIST) (WRITE-CHAR #\( OUT) (WHEN (SETQ LIST (REVERSE LIST)) (LOOP (WRITE (POP LIST) :STREAM OUT) (WHEN (ENDP LIST) (RETURN)) (WRITE-CHAR #\Space OUT))) (WRITE-CHAR #\) OUT)) EQL-OK: MY-PPRINT-REVERSE (LET ((*PRINT-PPRINT-DISPATCH* (COPY-PPRINT-DISPATCH NIL))) (SET-PPRINT-DISPATCH '(CONS (MEMBER FOO)) 'MY-PPRINT-REVERSE 0) (WRITE-TO-STRING '(FOO BAR :BOO 1) :PRETTY T :ESCAPE T)) EQUAL-OK: "(1 :BOO BAR FOO)" (DEFUN MY-PPRINT-LOGICAL (OUT LIST) (PPRINT-LOGICAL-BLOCK (OUT LIST :PREFIX "(" :SUFFIX ")") (WHEN LIST (LOOP (WRITE-CHAR #\? OUT) (WRITE (PPRINT-POP) :STREAM OUT) (WRITE-CHAR #\? OUT) (PPRINT-EXIT-IF-LIST-EXHAUSTED) (WRITE-CHAR #\Space OUT))))) EQL-OK: MY-PPRINT-LOGICAL (LET ((*PRINT-PPRINT-DISPATCH* (COPY-PPRINT-DISPATCH NIL))) (SET-PPRINT-DISPATCH '(CONS (MEMBER BAR)) 'MY-PPRINT-LOGICAL 0) (WRITE-TO-STRING '(BAR FOO :BOO 1) :PRETTY T :ESCAPE T)) EQUAL-OK: "(?BAR? ?FOO? ?:BOO? ?1?)" (WITH-OUTPUT-TO-STRING (S) (PRINT-OBJECT 42 S)) EQUAL-OK: "42" (STRING= (WITH-OUTPUT-TO-STRING (S) (LET ((*PRINT-PRETTY* T)) (WRITE 42 :STREAM S))) (WITH-OUTPUT-TO-STRING (S) (FUNCALL (PPRINT-DISPATCH 42) S 42))) EQL-OK: T (LET ((*PRINT-PPRINT-DISPATCH* (COPY-PPRINT-DISPATCH NIL)) (*PRINT-PRETTY* T)) (FLET ((MY-SYMBOL-PPRINT (STREAM OBJ) (LET ((*PRINT-PRETTY* NIL)) (PRINC "++" STREAM) (PRINC OBJ STREAM) (PRINC "++" STREAM)))) (SET-PPRINT-DISPATCH 'SYMBOL #'MY-SYMBOL-PPRINT) (PRINC-TO-STRING '(A (B (C (D) E) F) G)))) EQUAL-OK: "(++A++ (++B++ (++C++ (++D++) ++E++) ++F++) ++G++)" (LET ((*PRINT-PPRINT-DISPATCH* (COPY-PPRINT-DISPATCH NIL)) (*PRINT-PRETTY* T) (L '(:BRACKET 1 2 (:BRACKET 3 4)))) (FLET ((BRACKET-LIST-PRINTER (STREAM BLIST) (FORMAT STREAM "[~{~S~^ ~}]" (REST BLIST)))) (SET-PPRINT-DISPATCH '(CONS (EQL :BRACKET)) #'BRACKET-LIST-PRINTER) (LIST (PRINC-TO-STRING L) (WITH-OUTPUT-TO-STRING (S) (PPRINT-LOGICAL-BLOCK (S NIL) (PRIN1 L S)))))) EQUAL-OK: ("[1 2 [3 4]]" "[1 2 [3 4]]") (PROGN (DEFCLASS C1 NIL ((A :INITARG A) (B :INITARG B) (C :INITARG C))) (DEFCLASS C2 (C1) ((AA :INITARG AA) (BB :INITARG BB) (CC :INITARG CC))) (DEFMETHOD PRINT-OBJECT ((OBJ C2) (OUT STREAM)) (PPRINT-LOGICAL-BLOCK (OUT NIL :PREFIX "#[" :SUFFIX "]") (LET ((CL (CLASS-OF OBJ))) (WRITE (CLASS-NAME CL) :STREAM OUT) (LOOP :FOR SLOTDEF :IN (CLASS-SLOTS CL) :FOR SLOT = (SLOT-DEFINITION-NAME SLOTDEF) :WHEN (AND SLOT (SLOT-BOUNDP OBJ SLOT)) :DO (WRITE-CHAR #\Space OUT) (PPRINT-NEWLINE :FILL OUT) (WRITE SLOT :STREAM OUT) (WRITE-CHAR #\Space OUT) (PPRINT-NEWLINE :FILL OUT) (WRITE (SLOT-VALUE OBJ SLOT) :STREAM OUT))))) T) EQL-OK: T (LET ((*PRINT-LENGTH* 123)) (DEFMETHOD PRINT-OBJECT ((OBJ C1) (OUT STREAM)) (SETQ *PRINT-LENGTH* 321) (CALL-NEXT-METHOD)) (WRITE-TO-STRING (MAKE-INSTANCE 'C1) :LENGTH 222) *PRINT-LENGTH*) EQL-OK: 123 (WRITE-TO-STRING (MAKE-INSTANCE 'C2 'B 123 'CC 42) :PRETTY T) EQUAL-OK: "#[C2 B 123 CC 42]" (WRITE-TO-STRING (LIST (MAKE-INSTANCE 'C2 'A 45 'BB 17 'AA 12) (MAKE-INSTANCE 'C2 'B 123 'CC 42)) :PRETTY T) EQUAL-OK: "(#[C2 A 45 AA 12 BB 17] #[C2 B 123 CC 42])" (LET ((*PRINT-READABLY* T)) (WITH-OUTPUT-TO-STRING (OUT) (PPRINT-LINEAR OUT (LIST 'COMMON-LISP-USER::A 'COMMON-LISP-USER::B 'COMMON-LISP-USER::C)))) EQUAL-OK: "(|COMMON-LISP-USER|::|A| |COMMON-LISP-USER|::|B| |COMMON-LISP-USER|::|C|)" (EQUALP (READ-FROM-STRING "#2A((\"first\" #1=\"second\" \"third\") #2=(\"null\" #1# \"zero\") #2#)") (READ-FROM-STRING "#A(t (3 3) ((\"first\" #1=\"second\" \"third\") #2=(\"null\" #1# \"zero\") #2#))")) EQL-OK: T (WITH-INPUT-FROM-STRING (S "'a #'b c d") (LIST (READ-PRESERVING-WHITESPACE S) (READ-CHAR S) (READ-PRESERVING-WHITESPACE S) (READ-CHAR S) (READ-PRESERVING-WHITESPACE S) (READ-CHAR S) (READ-CHAR S))) EQUAL-OK: ('A #\Space #'B #\Space C #\Space #\d) (LET ((*PPRINT-FIRST-NEWLINE* NIL)) (FORMAT NIL "~{~a~}" (LIST "string1" "string2" (CONCATENATE 'STRING "string3" (STRING #\Newline))))) EQUAL-OK: "string1string2string3 " (PRINC-TO-STRING (FDEFINITION 'DEFUN)) EQUAL-OK: "# (FUNCTION-NAME LAMBDA-LIST &BODY FORMS)>" (FLET ((FOO-PRINTER (STREAM FOO) (LET ((*PRINT-PRETTY* NIL)) (PRINC "FOO:" STREAM) (PRIN1 (CDR FOO) STREAM)))) (WITH-STANDARD-IO-SYNTAX (SET-PPRINT-DISPATCH '(CONS (MEMBER FOO)) #'FOO-PRINTER) (WRITE-TO-STRING '(FOO 123) :PRETTY T))) EQUAL-OK: "FOO:(123.)" (EQ *PRINT-PPRINT-DISPATCH* (COPY-PPRINT-DISPATCH)) EQL-OK: NIL (WITH-OUTPUT-TO-STRING (S) (PRINC "xxx" S) (TERPRI S) (PRINC #\Tab S) (FRESH-LINE S) (PRINC "yyy" S)) EQUAL-OK: "xxx yyy" (SYMBOLS-CLEANUP '(BS STR1 S1 STRING1 STRING2 A AA B C D J X ASK MY-PPRINT-REVERSE MY-PPRINT-LOGICAL FOO-PRINTER C1 C2)) EQL-OK: NIL RUN-TEST: finished "iofkts" (0 errors out of 228 tests) RUN-TEST: started # (MAKUNBOUND 'B) EQL-OK: B (MAKUNBOUND 'E) EQL-OK: E (SETQ Z 2) EQL-OK: 2 ((LAMBDA (Z) (DECLARE (SPECIAL Z)) (LIST Z (SYMBOL-VALUE 'Z))) 3) EQUAL-OK: (3 3) (MAKUNBOUND 'Z) EQL-OK: Z ((LAMBDA (A B) (+ A (* B 3))) 4 5) EQL-OK: 19 ((LAMBDA (A &OPTIONAL (B 2)) (+ A (* B 3))) 4 5) EQL-OK: 19 ((LAMBDA (A &OPTIONAL (B 2)) (+ A (* B 3))) 4) EQL-OK: 10 ((LAMBDA (&OPTIONAL (A 2 B) (C 3 D) &REST X) (LIST A B C D X))) EQUAL-OK: (2 NIL 3 NIL NIL) ((LAMBDA (&OPTIONAL (A 2 B) (C 3 D) &REST X) (LIST A B C D X)) 6) EQUAL-OK: (6 T 3 NIL NIL) ((LAMBDA (&OPTIONAL (A 2 B) (C 3 D) &REST X) (LIST A B C D X)) 6 3) EQUAL-OK: (6 T 3 T NIL) ((LAMBDA (&OPTIONAL (A 2 B) (C 3 D) &REST X) (LIST A B C D X)) 6 3 8) EQUAL-OK: (6 T 3 T (8)) ((LAMBDA (&OPTIONAL (A 2 B) (C 3 D) &REST X) (LIST A B C D X)) 6 3 8 9 10 11) EQUAL-OK: (6 T 3 T (8 9 10 11)) ((LAMBDA (A B &KEY C D) (LIST A B C D)) 1 2) EQUAL-OK: (1 2 NIL NIL) ((LAMBDA (A B &KEY C D) (LIST A B C D)) 1 2 :C 6) EQUAL-OK: (1 2 6 NIL) ((LAMBDA (A B &KEY C D) (LIST A B C D)) 1 2 :D 8) EQUAL-OK: (1 2 NIL 8) ((LAMBDA (A B &KEY C D) (LIST A B C D)) 1 2 :C 6 :D 8) EQUAL-OK: (1 2 6 8) ((LAMBDA (A B &KEY C D) (LIST A B C D)) 1 2 :D 8 :C 6) EQUAL-OK: (1 2 6 8) ((LAMBDA (A B &KEY C D) (LIST A B C D)) :A 1 :D 8 :C 6) EQUAL-OK: (:A 1 6 8) ((LAMBDA (A B &KEY C D) (LIST A B C D)) :A :B :C :D) EQUAL-OK: (:A :B :D NIL) ((LAMBDA (A &OPTIONAL (B 3) &REST X &KEY C (D A)) (LIST A B C D X)) 1) EQUAL-OK: (1 3 NIL 1 NIL) ((LAMBDA (A &OPTIONAL (B 3) &REST X &KEY C (D A)) (LIST A B C D X)) 1 2) EQUAL-OK: (1 2 NIL 1 NIL) ((LAMBDA (A &OPTIONAL (B 3) &REST X &KEY C (D A)) (LIST A B C D X)) :C 7) EQUAL-OK: (:C 7 NIL :C NIL) ((LAMBDA (A &OPTIONAL (B 3) &REST X &KEY C (D A)) (LIST A B C D X)) 1 6 :C 7) EQUAL-OK: (1 6 7 1 (:C 7)) ((LAMBDA (A &OPTIONAL (B 3) &REST X &KEY C (D A)) (LIST A B C D X)) 1 6 :D 8) EQUAL-OK: (1 6 NIL 8 (:D 8)) ((LAMBDA (A &OPTIONAL (B 3) &REST X &KEY C (D A)) (LIST A B C D X)) 1 6 :D 8 :C 9 :D 10) EQUAL-OK: (1 6 9 8 (:D 8 :C 9 :D 10)) ((LAMBDA (X &AUX (A 3) (B 4)) (+ X (* A B))) 2) EQL-OK: 14 ((LAMBDA (X Y &OPTIONAL A B &REST Z &KEY C (D Y) &AUX (U 3) (V 4)) (+ X Y A (* B (CAR Z)) C (* D U) V)) 3 4 5 2 7 :C 6 :D 8) [SIMPLE-PROGRAM-ERROR]: :LAMBDA: keyword arguments in (7 :C 6 :D 8) should occur pairwise EQL-OK: ERROR ((LAMBDA (X Y &OPTIONAL A B &REST Z &KEY C (D Y) &AUX (U 3) (V 4)) (+ X Y A (* B (CAR Z)) C (* D U) V)) 3 4 5 2 7 :C 6) [SIMPLE-PROGRAM-ERROR]: :LAMBDA: keyword arguments in (7 :C 6) should occur pairwise EQL-OK: ERROR ((LAMBDA (X &AUX C) (CONS X C)) 'A) EQUAL-OK: (A) ((LAMBDA (X &REST Y Z) (LIST X Y Z)) 1 2 3) [SIMPLE-SOURCE-PROGRAM-ERROR]: FUNCTION: Lambda list element Z is superfluous. Only one variable is allowed after &REST. EQL-OK: ERROR ((LAMBDA (5 A B) (LIST A B)) 1 2) [SIMPLE-SOURCE-PROGRAM-ERROR]: FUNCTION: Invalid lambda list element 5. A lambda list may only contain symbols and lists. EQL-OK: ERROR ((LAMBDA ((LENGTH '(A B)) C) (LIST C)) 1) [SIMPLE-PROGRAM-ERROR]: EVAL/APPLY: Too few arguments (1 instead of at least 2) given to :LAMBDA EQL-OK: ERROR ((LAMBDA (X &KEY :Y :Z) (LIST X Y Z)) 1 :Y 2 :Z 3) [SIMPLE-SOURCE-PROGRAM-ERROR]: FUNCTION: :Y is a constant, may not be used as a variable EQL-OK: ERROR ((LAMBDA (X Y) (LIST X Y Z)) 1 2) [SIMPLE-UNBOUND-VARIABLE]: :LAMBDA: variable Z has no value EQL-OK: ERROR ((LAMBDA (X Y) (LIST X Y Z)) 1 2 3) [SIMPLE-PROGRAM-ERROR]: EVAL/APPLY: too many arguments given to :LAMBDA EQL-OK: ERROR ((LAMBDA (&OPTIONAL) (LIST A B C)) 1) [SIMPLE-PROGRAM-ERROR]: EVAL/APPLY: too many arguments given to :LAMBDA EQL-OK: ERROR ((LAMBDA (&OPTIONAL (A)) (LIST A)) 1) EQUAL-OK: (1) ((LAMBDA (&OPTIONAL (A B)) (LIST A B)) 1) [SIMPLE-UNBOUND-VARIABLE]: :LAMBDA: variable B has no value EQL-OK: ERROR ((LAMBDA (&OPTIONAL (A 3 B)) (LIST A B)) 1) EQUAL-OK: (1 T) ((LAMBDA (&OPTIONAL (A 3)) (LIST A)) 1) EQUAL-OK: (1) ((LAMBDA (&OPTIONAL (A 3 B 4)) (LIST A B)) 1) [SIMPLE-SOURCE-PROGRAM-ERROR]: FUNCTION: Invalid lambda list element #1=(A 3 B 4) EQL-OK: ERROR ((LAMBDA (X) (LIST X Y)) 1 2) [SIMPLE-PROGRAM-ERROR]: EVAL/APPLY: too many arguments given to :LAMBDA EQL-OK: ERROR ((LAMBDA (X) (LIST X)) 1 2) [SIMPLE-PROGRAM-ERROR]: EVAL/APPLY: too many arguments given to :LAMBDA EQL-OK: ERROR ((LAMBDA (#\a) (LIST A)) 1) [SIMPLE-SOURCE-PROGRAM-ERROR]: FUNCTION: Invalid lambda list element #\a. A lambda list may only contain symbols and lists. EQL-OK: ERROR ((LAMBDA (#*10) (LIST 1 2 3))) [SIMPLE-SOURCE-PROGRAM-ERROR]: FUNCTION: Invalid lambda list element #1=#*10. A lambda list may only contain symbols and lists. EQL-OK: ERROR ((LAMBDA (X Y) ((LAMBDA (A B) (LIST A B)) 'U 'V)) 5 6) EQUAL-OK: (U V) ((LAMBDA (X Y) (LIST X Y)) 1) [SIMPLE-PROGRAM-ERROR]: EVAL/APPLY: Too few arguments (1 instead of at least 2) given to :LAMBDA EQL-OK: ERROR ((LAMBDA (X &REST Y &OPTIONAL (Z 5)) (LIST X Y Z)) 1 3) [SIMPLE-SOURCE-PROGRAM-ERROR]: FUNCTION: Lambda list marker &OPTIONAL not allowed here. EQL-OK: ERROR ((LAMBDA (X &X) (LIST X)) 7) [SIMPLE-PROGRAM-ERROR]: EVAL/APPLY: Too few arguments (1 instead of at least 2) given to :LAMBDA EQL-OK: ERROR ((LAMBDA (X &AUX) (LIST X)) 6) EQUAL-OK: (6) ((LAMBDA (X &AUX Y) (LIST X Y)) 6) EQUAL-OK: (6 NIL) ((LAMBDA (X &AUX (Y)) (LIST X Y)) 6) EQUAL-OK: (6 NIL) ((LAMBDA (X &REST) (LIST X)) 2) [SIMPLE-SOURCE-PROGRAM-ERROR]: FUNCTION: Missing &REST parameter in lambda list #1=(X &REST) EQL-OK: ERROR ((LAMBDA (X &KEY) (LIST X)) 3) EQUAL-OK: (3) ((LAMBDA (X &KEY Y) (LIST X)) 3) EQUAL-OK: (3) ((LAMBDA (X &KEY Y) (LIST X)) 3 :Y) [SIMPLE-PROGRAM-ERROR]: :LAMBDA: keyword arguments in (:Y) should occur pairwise EQL-OK: ERROR ((LAMBDA (X &KEY Y) (LIST X)) :|3|) EQUAL-OK: (:|3|) ((LAMBDA NIL (LIST 1 2 3))) EQUAL-OK: (1 2 3) ((LAMBDA NIL (LIST 1 2 3)) 4 5) [SIMPLE-PROGRAM-ERROR]: EVAL/APPLY: too many arguments given to :LAMBDA EQL-OK: ERROR ((LAMBDA (LIST 1 2 3))) [SIMPLE-SOURCE-PROGRAM-ERROR]: FUNCTION: Invalid lambda list element 1. A lambda list may only contain symbols and lists. EQL-OK: ERROR ((LAMBDA (X))) [SIMPLE-PROGRAM-ERROR]: EVAL/APPLY: Too few arguments (0 instead of at least 1) given to :LAMBDA EQL-OK: ERROR ((LAMBDA (&AUX &KEY &REST &OPTIONAL))) [SIMPLE-SOURCE-PROGRAM-ERROR]: FUNCTION: Lambda list marker &KEY not allowed here. EQL-OK: ERROR ((LAMBDA (A B &KEY C D &ALLOW-OTHER-KEYS) (LIST A B C D E F)) 1 2 :C 6 :D 8 :E 5 :F 7) [SIMPLE-UNBOUND-VARIABLE]: :LAMBDA: variable E has no value EQL-OK: ERROR ((LAMBDA (X &ALLOW-OTHER-KEYS) (LIST X Y)) 2 :Y 3) [SIMPLE-SOURCE-PROGRAM-ERROR]: FUNCTION: Lambda list marker &ALLOW-OTHER-KEYS not allowed here. EQL-OK: ERROR ((LAMBDA)) [SIMPLE-SOURCE-PROGRAM-ERROR]: :LAMBDA: lambda-list for NIL is missing EQL-OK: ERROR ((LAMBDA (&KEY X) X) :X 1 :Y 2 :ALLOW-OTHER-KEYS T) EQL-OK: 1 ((LAMBDA (&KEY X) X) :X 1 :Y 2 :ALLOW-OTHER-KEYS T :ALLOW-OTHER-KEYS NIL) EQL-OK: 1 ((LAMBDA (&KEY X) X) :X 1 :Y 2 :ALLOW-OTHER-KEYS NIL :ALLOW-OTHER-KEYS T) [SIMPLE-KEYWORD-ERROR]: :LAMBDA: illegal keyword/value pair :Y, 2 in argument list. The allowed keywords are #1=(:X) EQL-OK: ERROR ((LAMBDA (&KEY X &ALLOW-OTHER-KEYS) X) :X 1 :Y 2) EQL-OK: 1 ((LAMBDA (&KEY X &ALLOW-OTHER-KEYS) X) :X 1 :Y 2 :ALLOW-OTHER-KEYS T :ALLOW-OTHER-KEYS NIL) EQL-OK: 1 ((LAMBDA (&KEY X &ALLOW-OTHER-KEYS) X) :X 1 :Y 2 :ALLOW-OTHER-KEYS NIL :ALLOW-OTHER-KEYS T) EQL-OK: 1 ((LAMBDA (&KEY X) X) :X 1 :ALLOW-OTHER-KEYS NIL) EQL-OK: 1 ((LAMBDA (&KEY X) X) :X 1 :ALLOW-OTHER-KEYS NIL :ALLOW-OTHER-KEYS NIL) EQL-OK: 1 (DEFUN FOO (X) (LIST X)) EQL-OK: FOO (MULTIPLE-VALUE-LIST (FUNCTION-LAMBDA-EXPRESSION #'FOO)) EQUALP-OK: ((LAMBDA (X) (DECLARE (SYSTEM::IN-DEFUN FOO)) (BLOCK FOO (LIST X))) #(NIL NIL NIL NIL ((DECLARATION OPTIMIZE DECLARATION DYNAMICALLY-MODIFIABLE SYSTEM::IMPLEMENTATION-DEPENDENT))) FOO) (COMPILE 'FOO) EQL-OK: FOO (MULTIPLE-VALUE-LIST (FUNCTION-LAMBDA-EXPRESSION #'FOO)) EQUAL-OK: ((LAMBDA (X) (LIST X)) T FOO) (LET ((FILE "lambda-tst-function-lambda-expression-test.lisp") (FLE (FUNCTION-LAMBDA-EXPRESSION #'FOO)) (RES NIL)) (UNWIND-PROTECT (PROGN (WITH-OPEN-FILE (OUT FILE :DIRECTION :OUTPUT) (WRITE '(DEFUN FOO (X) (CAR X)) :STREAM OUT :READABLY T) (TERPRI OUT)) (LOAD (COMPILE-FILE FILE)) (PUSH (FOO '(3)) RES) (PUSH (EQUALP FLE (FUNCTION-LAMBDA-EXPRESSION #'FOO)) RES)) (POST-COMPILE-FILE-CLEANUP FILE))) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/lambda-tst-function-lambda-expression-test.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/lambda-tst-function-lambda-expression-test.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/lambda-tst-function-lambda-expression-test.fas ... WARNING: DEFUN/DEFMACRO: redefining function FOO in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/lambda-tst-function-lambda-expression-test.fas, was defined in top-level ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/lambda-tst-function-lambda-expression-test.fas EQUAL-OK: (NIL 3) (FMAKUNBOUND 'FOO) EQL-OK: FOO (DEFUN (SETF FOO) (V A) (SETF (CAR A) V)) EQUAL-OK: (SETF FOO) (MULTIPLE-VALUE-LIST (FUNCTION-LAMBDA-EXPRESSION #'(SETF FOO))) EQUALP-OK: ((LAMBDA (V A) (DECLARE (SYSTEM::IN-DEFUN (SETF FOO))) (BLOCK FOO (SETF (CAR A) V))) #(NIL NIL NIL NIL ((DECLARATION OPTIMIZE DECLARATION DYNAMICALLY-MODIFIABLE SYSTEM::IMPLEMENTATION-DEPENDENT))) (SETF FOO)) (COMPILE '(SETF FOO)) EQUAL-OK: (SETF FOO) (MULTIPLE-VALUE-LIST (FUNCTION-LAMBDA-EXPRESSION #'(SETF FOO))) EQUAL-OK: ((LAMBDA (V A) (SETF (CAR A) V)) T (SETF FOO)) (FMAKUNBOUND '(SETF FOO)) EQUAL-OK: (SETF FOO) (SETF (GETENV "PAGER") "cat") EQUAL-OK: "cat" (DISASSEMBLE 'CAR) # is a built-in system function. Argument list: (#:ARG0) For more information, evaluate (DISASSEMBLE #'CAR). Cannot show machine instructions: gdb not found. EQL-OK: NIL (DISASSEMBLE #'CDR) # is a built-in system function. Argument list: (#:ARG0) For more information, evaluate (DISASSEMBLE #'CDR). Cannot show machine instructions: gdb not found. EQL-OK: NIL (DISASSEMBLE 'DISASSEMBLE) Disassembly of function DISASSEMBLE (CONST 0) = #(#(NIL #S(HASH-TABLE :TEST STABLEHASH-EQ :WARN-IF-NEEDS-REHASH-AFTER-GC T (#1=# . #-1>) (#2=# . #-1>) (#3=# . #-1>))) CLOS::COMPUTE-APPLICABLE-METHODS-EFFECTIVE-METHOD #4=#) (CONST 1) = DISASSEMBLE (CONST 2) = NIL (CONST 3) = NIL (CONST 4) = #(1 0 T T (:QUALIFIERS :SPECIALIZERS) NIL) (CONST 5) = (0) (CONST 6) = (#1=#)> #3=#)> #5=#)> #7=#)> #9=#)> #11=#)> #13=#)> #15=#)>) (CONST 7) = # (CONST 8) = #1=# (CONST 9) = (SYSTEM::OBJECT &KEY SYSTEM::QUALIFIERS SYSTEM::SPECIALIZERS) (CONST 10) = "disassemble the OBJECT, which should be a function. if QUALIFIERS or SPECIALIZERS is given, OBJECT should be a generic function." (CONST 11) = NIL (CONST 12) = (((#1=#)> #3=#)> #5=#)>) . #-1>) ((#7=#)> #5#) . #-1>) ((#3# #5#) . #-1>)) (CONST 13) = T 1 required argument 0 optional arguments Rest parameter No keyword parameters 15 byte-code instructions: 0 (LOADV&PUSH 1 1) 3 (LOAD&PUSH 3) 4 (CALLS1&JMPIFNOT 118 L9) ; CLOS::CLASS-GETHASH 7 (SKIP&RETGF 3) 9 L9 9 (LOAD&PUSH 2) 10 (CALLS2&PUSH 57) ; CLASS-OF 12 (LOADV&PUSH 1 1) 15 (LOADV&PUSH 0 1) 18 (LOADV&PUSH 0 2) 21 (LOAD&PUSH 6) 22 (LOAD 6) 23 (APPLY&PUSH 2) 25 (CALLS1 111) ; SYSTEM::PUTHASH 27 (SKIP&RETGF 3) EQL-OK: NIL (DISASSEMBLE #'SET-DIFFERENCE) Disassembly of function SET-DIFFERENCE (CONST 0) = :TEST (CONST 1) = :TEST-NOT (CONST 2) = :KEY (CONST 3) = SYSTEM::LIST-TO-HT (CONST 4) = # 2 required arguments 0 optional arguments Rest parameter 3 keyword parameters: :TEST, :TEST-NOT, :KEY. 49 byte-code instructions: 0 (UNBOUND->NIL 1) 2 (NIL&PUSH) 3 (CONST&SYMBOL-FUNCTION&PUSH 3) ; SYSTEM::LIST-TO-HT 5 (LOAD&PUSH 8) 6 (LOAD&PUSH 8) 7 (LOAD 8) 8 (APPLY&PUSH 2) 10 (LOAD&PUSH 8) 11 (NIL&PUSH) 12 (JMP L58) 14 L14 14 (PUSH) 15 (LOAD&PUSH 1) 16 (FUNCALL 1) 18 (JMP L39) 20 L20 20 (LOAD&PUSH 0) 21 (LOAD&PUSH 4) 22 (PUSH-UNBOUND 1) 24 (CALLS1 110) ; GETHASH 26 (SKIP 1) 28 (JMPIFNOT L53) 30 (JMP L56) 32 L32 32 (LOAD&CAR&STORE 1 0) 35 (LOAD&JMPIF 5 L14) 38 (LOAD 0) 39 L39 39 (PUSH) 40 (LOAD&JMPIF 3 L20) 43 (CONST&PUSH 4) ; # 44 (LOAD&PUSH 1) 45 (LOAD&PUSH 12) 46 (LOAD 12) 47 (APPLY 2) 49 (SKIP 1) 51 (JMPIF L56) 53 L53 53 (LOAD&PUSH 0) 54 (LOAD&CONS&STORE 3) 56 L56 56 (LOAD&CDR&STORE 1) 58 L58 58 (LOAD&PUSH 1) 59 (CALLS1&JMPIFNOT 159 L32) ; ENDP 62 (SKIP 2) 64 (LOAD&PUSH 1) 65 (CALLS1 177) ; SYSTEM::LIST-NREVERSE 67 (SKIP&RET 9) EQL-OK: NIL RUN-TEST: finished "lambda" (0 errors out of 90 tests) RUN-TEST: started # (MAKUNBOUND 'A) EQL-OK: A (MAKUNBOUND 'X) EQL-OK: X (CAR '(A B C D E F G)) EQL-OK: A (CDR '(A B C D E F G)) EQUAL-OK: (B C D E F G) (CAAR '((A) B C D E F G)) EQL-OK: A (CADR '(A B C D E F G)) EQL-OK: B (CDAR '((A B) C D E F G)) EQUAL-OK: (B) (CDDR '(A B C D E F G)) EQUAL-OK: (C D E F G) (CAAAR '(((A)) B C D E F G)) EQL-OK: A (CAADR '(A (B) C D E F G)) EQL-OK: B (CADAR '((A B) C D E F G)) EQL-OK: B (CADDR '(A B C D E F G)) EQL-OK: C (CDAAR '(((A B)) C D E F G)) EQUAL-OK: (B) (CDADR '(A (B C) D E F G)) EQUAL-OK: (C) (CDDAR '((A B C) D E F G)) EQUAL-OK: (C) (CDDDR '(A B C D E F G)) EQUAL-OK: (D E F G) (CAAAAR '((((A))) B C D E F G)) EQL-OK: A (CAAADR '(A ((B)) C D E F G)) EQL-OK: B (CAADAR '((A (B)) C D E F G)) EQL-OK: B (CAADDR '(A B (C) D E F G)) EQL-OK: C (CADAAR '(((A B)) C D E F G)) EQL-OK: B (CADADR '(A (B C) D E F G)) EQL-OK: C (CADDAR '((A B C) D E F G)) EQL-OK: C (CADDDR '(A B C D E F G)) EQL-OK: D (CDAAAR '((((A B))) C D E F G)) EQUAL-OK: (B) (CDAADR '(A ((B C)) D E F G)) EQUAL-OK: (C) (CDADAR '((A (B C)) D E F G)) EQUAL-OK: (C) (CDADDR '(A B (C D) E F G)) EQUAL-OK: (D) (CDDAAR '(((A B C)) D E F G)) EQUAL-OK: (C) (CDDADR '(A (B C D) E F G)) EQUAL-OK: (D) (CDDDAR '((A B C D) E F G)) EQUAL-OK: (D) (CDDDDR '(A B C D E F G)) EQUAL-OK: (E F G) (CAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: ((((1 2 3) 4) 5) (6 7)) (CDR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: ((((U V W) X) Y) ((Q W E) R) (A B C) E F G) (CAAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (((1 2 3) 4) 5) (CADR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (((U V W) X) Y) (CDAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: ((6 7)) (CDDR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (((Q W E) R) (A B C) E F G) (CAAAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: ((1 2 3) 4) (CAADR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: ((U V W) X) (CADAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (6 7) (CADDR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: ((Q W E) R) (CDAAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (5) (CDADR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (Y) (CDDAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQL-OK: NIL (CDDDR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: ((A B C) E F G) (CAAAAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (1 2 3) (CAAADR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (U V W) (CAADAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQL-OK: 6 (CAADDR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (Q W E) (CADAAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQL-OK: 5 (CADADR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQL-OK: Y (CADDAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQL-OK: NIL (CADDDR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (A B C) (CDAAAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (4) (CDAADR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (X) (CDADAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (7) (CDADDR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (R) (CDDAAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQL-OK: NIL (CDDADR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQL-OK: NIL (CDDDAR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQL-OK: NIL (CDDDDR '(((((1 2 3) 4) 5) (6 7)) (((U V W) X) Y) ((Q W E) R) (A B C) E F G)) EQUAL-OK: (E F G) (CAR 'NIL) EQL-OK: NIL (CDR 'NIL) EQL-OK: NIL (CAAR 'NIL) EQL-OK: NIL (CADR 'NIL) EQL-OK: NIL (CDAR 'NIL) EQL-OK: NIL (CDDR 'NIL) EQL-OK: NIL (CAAAR 'NIL) EQL-OK: NIL (CAADR 'NIL) EQL-OK: NIL (CADAR 'NIL) EQL-OK: NIL (CADDR 'NIL) EQL-OK: NIL (CDAAR 'NIL) EQL-OK: NIL (CDADR 'NIL) EQL-OK: NIL (CDDAR 'NIL) EQL-OK: NIL (CDDDR 'NIL) EQL-OK: NIL (CAAAAR 'NIL) EQL-OK: NIL (CAAADR 'NIL) EQL-OK: NIL (CAADAR 'NIL) EQL-OK: NIL (CAADDR 'NIL) EQL-OK: NIL (CADAAR 'NIL) EQL-OK: NIL (CADADR 'NIL) EQL-OK: NIL (CADDAR 'NIL) EQL-OK: NIL (CADDDR 'NIL) EQL-OK: NIL (CDAAAR 'NIL) EQL-OK: NIL (CDAADR 'NIL) EQL-OK: NIL (CDADAR 'NIL) EQL-OK: NIL (CDADDR 'NIL) EQL-OK: NIL (CDDAAR 'NIL) EQL-OK: NIL (CDDADR 'NIL) EQL-OK: NIL (CDDDAR 'NIL) EQL-OK: NIL (CDDDDR 'NIL) EQL-OK: NIL (CAR '(A B C D E F G)) EQL-OK: A (CDR '(A B C D E F G)) EQUAL-OK: (B C D E F G) (CAAR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CAAR: A is not a list EQL-OK: ERROR (CADR '(A B C D E F G)) EQL-OK: B (CDAR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CDAR: A is not a list EQL-OK: ERROR (CDDR '(A B C D E F G)) EQUAL-OK: (C D E F G) (CAAAR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CAAAR: A is not a list EQL-OK: ERROR (CAADR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CAADR: B is not a list EQL-OK: ERROR (CADAR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CADAR: A is not a list EQL-OK: ERROR (CADDR '(A B C D E F G)) EQL-OK: C (CDAAR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CDAAR: A is not a list EQL-OK: ERROR (CDADR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CDADR: B is not a list EQL-OK: ERROR (CDDAR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CDDAR: A is not a list EQL-OK: ERROR (CDDDR '(A B C D E F G)) EQUAL-OK: (D E F G) (CAAAAR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CAAAAR: A is not a list EQL-OK: ERROR (CAAADR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CAAADR: B is not a list EQL-OK: ERROR (CAADAR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CAADAR: A is not a list EQL-OK: ERROR (CAADDR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CAADDR: C is not a list EQL-OK: ERROR (CADAAR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CADAAR: A is not a list EQL-OK: ERROR (CADADR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CADADR: B is not a list EQL-OK: ERROR (CADDAR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CADDAR: A is not a list EQL-OK: ERROR (CADDDR '(A B C D E F G)) EQL-OK: D (CDAAAR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CDAAAR: A is not a list EQL-OK: ERROR (CDAADR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CDAADR: B is not a list EQL-OK: ERROR (CDADAR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CDADAR: A is not a list EQL-OK: ERROR (CDADDR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CDADDR: C is not a list EQL-OK: ERROR (CDDAAR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CDDAAR: A is not a list EQL-OK: ERROR (CDDADR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CDDADR: B is not a list EQL-OK: ERROR (CDDDAR '(A B C D E F G)) [SIMPLE-TYPE-ERROR]: CDDDAR: A is not a list EQL-OK: ERROR (CDDDDR '(A B C D E F G)) EQUAL-OK: (E F G) (CAR '(A)) EQL-OK: A (CDR '(A)) EQL-OK: NIL (CAAR '(A)) [SIMPLE-TYPE-ERROR]: CAAR: A is not a list EQL-OK: ERROR (CADR '(A)) EQL-OK: NIL (CDAR '(A)) [SIMPLE-TYPE-ERROR]: CDAR: A is not a list EQL-OK: ERROR (CDDR '(A)) EQL-OK: NIL (CAAAR '(A)) [SIMPLE-TYPE-ERROR]: CAAAR: A is not a list EQL-OK: ERROR (CAADR '(A)) EQL-OK: NIL (CADAR '(A)) [SIMPLE-TYPE-ERROR]: CADAR: A is not a list EQL-OK: ERROR (CADDR '(A)) EQL-OK: NIL (CDAAR '(A)) [SIMPLE-TYPE-ERROR]: CDAAR: A is not a list EQL-OK: ERROR (CDADR '(A)) EQL-OK: NIL (CDDAR '(A)) [SIMPLE-TYPE-ERROR]: CDDAR: A is not a list EQL-OK: ERROR (CDDDR '(A)) EQL-OK: NIL (CAAAAR '(A)) [SIMPLE-TYPE-ERROR]: CAAAAR: A is not a list EQL-OK: ERROR (CAAADR '(A)) EQL-OK: NIL (CAADAR '(A)) [SIMPLE-TYPE-ERROR]: CAADAR: A is not a list EQL-OK: ERROR (CAADDR '(A)) EQL-OK: NIL (CADAAR '(A)) [SIMPLE-TYPE-ERROR]: CADAAR: A is not a list EQL-OK: ERROR (CADADR '(A)) EQL-OK: NIL (CADDAR '(A)) [SIMPLE-TYPE-ERROR]: CADDAR: A is not a list EQL-OK: ERROR (CADDDR '(A)) EQL-OK: NIL (CDAAAR '(A)) [SIMPLE-TYPE-ERROR]: CDAAAR: A is not a list EQL-OK: ERROR (CDAADR '(A)) EQL-OK: NIL (CDADAR '(A)) [SIMPLE-TYPE-ERROR]: CDADAR: A is not a list EQL-OK: ERROR (CDADDR '(A)) EQL-OK: NIL (CDDAAR '(A)) [SIMPLE-TYPE-ERROR]: CDDAAR: A is not a list EQL-OK: ERROR (CDDADR '(A)) EQL-OK: NIL (CDDDAR '(A)) [SIMPLE-TYPE-ERROR]: CDDDAR: A is not a list EQL-OK: ERROR (CDDDDR '(A)) EQL-OK: NIL (CONS 1 2) EQUAL-OK: (1 . 2) (CONS 'A 'B) EQUAL-OK: (A . B) (CONS 'A 'B 'C) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too many arguments given to CONS: #1=(CONS 'A 'B 'C) EQL-OK: ERROR (CONS 'A) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too few arguments given to CONS: #1=(CONS 'A) EQL-OK: ERROR (CONS) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too few arguments given to CONS: #1=(CONS) EQL-OK: ERROR (CONS 'A 'NIL) EQUAL-OK: (A) (CONS 'NIL 'A) EQUAL-OK: (NIL . A) (CONS 'A (CONS 'B (CONS 'C 'NIL))) EQUAL-OK: (A B C) (CONS 'A '(B C D)) EQUAL-OK: (A B C D) (TREE-EQUAL 1 1) EQL-OK: T (TREE-EQUAL 'WORD 'WORD) EQL-OK: T (TREE-EQUAL 'WORD1 'WORD2) EQL-OK: NIL (TREE-EQUAL '(A B) '(A B)) EQL-OK: T (TREE-EQUAL '(A (B C)) '((A B) C)) EQL-OK: NIL (TREE-EQUAL 5 (+ 2 3)) EQL-OK: T (TREE-EQUAL '(A (B QUOTE NIL)) '(A (B))) EQL-OK: NIL (TREE-EQUAL '(A (B . 1.0)) '(A (B #C(1.0 0.0)))) EQL-OK: NIL (TREE-EQUAL 1 1 :TEST #'EQ) EQL-OK: T (TREE-EQUAL 'WORD 'WORD :TEST #'EQ) EQL-OK: T (TREE-EQUAL 'WORD1 'WORD2 :TEST #'EQ) EQL-OK: NIL (TREE-EQUAL '(A B) '(A B) :TEST #'EQ) EQL-OK: T (TREE-EQUAL '(A (B C)) '((A B) C) :TEST #'EQ) EQL-OK: NIL (TREE-EQUAL 5 (+ 2 3) :TEST #'EQ) EQL-OK: T (TREE-EQUAL '(A (B)) '(A (B)) :TEST #'EQ) EQL-OK: T (TREE-EQUAL '(A (B . 1.0)) '(A (B #C(1.0 0.0))) :TEST #'EQ) EQL-OK: NIL (TREE-EQUAL 1 1 :TEST #'EQL) EQL-OK: T (TREE-EQUAL 'WORD 'WORD :TEST #'EQL) EQL-OK: T (TREE-EQUAL 'WORD1 'WORD2 :TEST #'EQL) EQL-OK: NIL (TREE-EQUAL '(A B) '(A B) :TEST #'EQL) EQL-OK: T (TREE-EQUAL '(A (B C)) '((A B) C) :TEST #'EQL) EQL-OK: NIL (TREE-EQUAL 5 (+ 2 3) :TEST #'EQL) EQL-OK: T (TREE-EQUAL '(A (B)) '(A (B)) :TEST #'EQL) EQL-OK: T (TREE-EQUAL '(A (B . 1.0)) '(A (B #C(1.0 0.0))) :TEST #'EQL) EQL-OK: NIL (TREE-EQUAL 1 1 :TEST #'EQUAL) EQL-OK: T (TREE-EQUAL 'WORD 'WORD :TEST #'EQUAL) EQL-OK: T (TREE-EQUAL 'WORD1 'WORD2 :TEST #'EQUAL) EQL-OK: NIL (TREE-EQUAL '(A B) '(A B) :TEST #'EQUAL) EQL-OK: T (TREE-EQUAL '(A (B C)) '((A B) C) :TEST #'EQUAL) EQL-OK: NIL (TREE-EQUAL 5 (+ 2 3) :TEST #'EQUAL) EQL-OK: T (TREE-EQUAL '(A (B)) '(A (B)) :TEST #'EQUAL) EQL-OK: T (TREE-EQUAL '(A (B . 1.0)) '(A (B #C(1.0 0.0))) :TEST #'EQUAL) EQL-OK: NIL (TREE-EQUAL 1 1 :TEST-NOT #'EQ) EQL-OK: NIL (TREE-EQUAL 'WORD 'WORD :TEST-NOT #'EQ) EQL-OK: NIL (TREE-EQUAL 'WORD1 'WORD2 :TEST-NOT #'EQ) EQL-OK: T (TREE-EQUAL '(A B) '(A B) :TEST-NOT #'EQ) EQL-OK: NIL (TREE-EQUAL '(A (B C)) '((A B) C) :TEST-NOT #'EQ) EQL-OK: NIL (TREE-EQUAL 5 (+ 2 3) :TEST-NOT #'EQ) EQL-OK: NIL (TREE-EQUAL '(A (B)) '(A (B)) :TEST-NOT #'EQ) EQL-OK: NIL (TREE-EQUAL '(A (B . 1.0)) '(A (B #C(1.0 0.0))) :TEST-NOT #'EQ) EQL-OK: NIL RUN-TEST: finished "lists151" (0 errors out of 201 tests) RUN-TEST: started # (ENDP 'NIL) EQL-OK: T (ENDP '(A . B)) EQL-OK: NIL (ENDP '(A B . C)) EQL-OK: NIL (ENDP '(A B C)) EQL-OK: NIL (ENDP '(A B C D)) EQL-OK: NIL (ENDP '(A B C . D)) EQL-OK: NIL (ENDP '('NIL 'NIL)) EQL-OK: NIL (LIST-LENGTH 'NIL) EQL-OK: 0 (LIST-LENGTH '(A . B)) [SIMPLE-TYPE-ERROR]: LIST-LENGTH: A proper list must not end with B EQL-OK: ERROR (LIST-LENGTH '(A B C D)) EQL-OK: 4 (LIST-LENGTH '(A (B C) D)) EQL-OK: 3 (LET ((X (LIST 'A 'B 'C))) (RPLACD (LAST X) X) (LIST-LENGTH X)) EQL-OK: NIL (NTH 0 '(A B C D)) EQL-OK: A (NTH 1 '(A B C D)) EQL-OK: B (NTH 3 '(A B C D)) EQL-OK: D (NTH 5 '(A B C D)) EQL-OK: NIL (NTH -2 '(A B C D)) [SIMPLE-TYPE-ERROR]: NTH: -2 is not a non-negative integer EQL-OK: ERROR (NTH 0 'NIL) EQL-OK: NIL (NTH 2 'NIL) EQL-OK: NIL (FIRST '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 1 (SECOND '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 2 (THIRD '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 3 (FOURTH '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 4 (FIFTH '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 5 (SIXTH '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 6 (SEVENTH '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 7 (EIGHTH '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 8 (NINTH '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 9 (TENTH '(1 2 3 4 5 6 7 8 9 10 11)) EQL-OK: 10 (FIRST '(1 2 3)) EQL-OK: 1 (SECOND '(1 2 3)) EQL-OK: 2 (THIRD '(1 2 3)) EQL-OK: 3 (FOURTH '(1 2 3)) EQL-OK: NIL (FIFTH '(1 2 3)) EQL-OK: NIL (SIXTH '(1 2 3)) EQL-OK: NIL (SEVENTH '(1 2 3)) EQL-OK: NIL (EIGHTH '(1 2 3)) EQL-OK: NIL (NINTH '(1 2 3)) EQL-OK: NIL (TENTH '(1 2 3)) EQL-OK: NIL (FIRST 'NIL) EQL-OK: NIL (SECOND 'NIL) EQL-OK: NIL (THIRD 'NIL) EQL-OK: NIL (FOURTH 'NIL) EQL-OK: NIL (FIFTH 'NIL) EQL-OK: NIL (SIXTH 'NIL) EQL-OK: NIL (SEVENTH 'NIL) EQL-OK: NIL (EIGHTH 'NIL) EQL-OK: NIL (NINTH 'NIL) EQL-OK: NIL (TENTH 'NIL) EQL-OK: NIL (REST '(1 2 3 4 5)) EQUAL-OK: (2 3 4 5) (REST 'NIL) EQL-OK: NIL (REST '(A . B)) EQL-OK: B (REST '(1 2 3 . 4)) EQUAL-OK: (2 3 . 4) (NTHCDR 0 '(A B C D)) EQUAL-OK: (A B C D) (NTHCDR 1 '(A B C D)) EQUAL-OK: (B C D) (NTHCDR 3 '(A B C D)) EQUAL-OK: (D) (NTHCDR 5 '(A B C D)) EQL-OK: NIL (NTHCDR -2 '(A B C D)) [SIMPLE-TYPE-ERROR]: NTHCDR: -2 is not a non-negative integer EQL-OK: ERROR (NTHCDR 0 'NIL) EQL-OK: NIL (NTHCDR 2 'NIL) EQL-OK: NIL (LAST '(1 2 3 4 5)) EQUAL-OK: (5) (LAST 'NIL) EQL-OK: NIL (LAST '(A . B)) EQUAL-OK: (A . B) (LAST '(1 2 3 . 4)) EQUAL-OK: (3 . 4) (LIST 'A 'B 'C 'D) EQUAL-OK: (A B C D) (LIST 'A) EQUAL-OK: (A) (LIST '(A B) '(C D)) EQUAL-OK: ((A B) (C D)) (LIST 'A 'NIL) EQUAL-OK: (A NIL) (LIST 'NIL 'A) EQUAL-OK: (NIL A) (LIST 'NIL 'NIL) EQUAL-OK: (NIL NIL) (LIST) EQL-OK: NIL (LIST 3 4 'A (CAR '(B . C)) (+ 6 -2)) EQUAL-OK: (3 4 A B 4) (LIST* 'A 'B 'C 'D) EQUAL-OK: (A B C . D) (LIST* 'A) EQL-OK: A (LIST* '(A B) '(C D)) EQUAL-OK: ((A B) C D) (LIST* 'A 'NIL) EQUAL-OK: (A) (LIST* 'NIL 'A) EQUAL-OK: (NIL . A) (LIST* 'NIL 'NIL) EQUAL-OK: (NIL) (LIST*) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too few arguments given to LIST*: #1=(LIST*) EQL-OK: ERROR (LIST* 3 4 'A (CAR '(B . C)) (+ 6 -2)) EQUAL-OK: (3 4 A B . 4) (LIST* 'A 'B 'C '(D E F)) EQUAL-OK: (A B C D E F) (LIST* X) [SIMPLE-UNBOUND-VARIABLE]: EVAL: variable X has no value EQL-OK: ERROR (LIST* 'NIL) EQL-OK: NIL (MAKE-LIST 5) EQUAL-OK: (NIL NIL NIL NIL NIL) (MAKE-LIST 5 :INITIAL-ELEMENT) [SIMPLE-PROGRAM-ERROR]: MAKE-LIST: keyword arguments in (:INITIAL-ELEMENT) should occur pairwise EQL-OK: ERROR (MAKE-LIST 3 :INITIAL-ELEMENT 'RAH) EQUAL-OK: (RAH RAH RAH) (MAKE-LIST 0) EQL-OK: NIL (MAKE-LIST 0 :INITIAL-ELEMENT 'AAA) EQL-OK: NIL (MAKE-LIST 5 :INITIAL-ELEMENT 'NIL) EQUAL-OK: (NIL NIL NIL NIL NIL) (MAKE-LIST) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too few arguments given to MAKE-LIST: #1=(MAKE-LIST) EQL-OK: ERROR (APPEND '(A B C) '(D E F) 'NIL '(G)) EQUAL-OK: (A B C D E F G) (APPEND '(A B C) 'D) EQUAL-OK: (A B C . D) (APPEND 'A 'B) [SIMPLE-TYPE-ERROR]: APPEND: A is not a list EQL-OK: ERROR (APPEND 'A 'NIL) [SIMPLE-TYPE-ERROR]: APPEND: A is not a list EQL-OK: ERROR (APPEND 'NIL 'NIL) EQL-OK: NIL (APPEND 'NIL 'A) EQL-OK: A (APPEND 'NIL '(A B C)) EQUAL-OK: (A B C) (SETQ X '(A B C)) EQUAL-OK: (A B C) (SETQ Y '(D E F)) EQUAL-OK: (D E F) (SETQ R (APPEND X Y)) EQUAL-OK: (A B C D E F) X EQUAL-OK: (A B C) Y EQUAL-OK: (D E F) (EQ (CDDDR R) Y) EQL-OK: T (COPY-LIST '(1 2 3 4 5)) EQUAL-OK: (1 2 3 4 5) (COPY-LIST 'NIL) EQL-OK: NIL (COPY-LIST '(A . B)) EQUAL-OK: (A . B) (COPY-LIST '(1 2 3 . 4)) EQUAL-OK: (1 2 3 . 4) (SETQ L '(1 2 3 4 5)) EQUAL-OK: (1 2 3 4 5) (EQ L (COPY-LIST L)) EQL-OK: NIL (EQL L (COPY-LIST L)) EQL-OK: NIL (EQUAL L (COPY-LIST L)) EQL-OK: T (EQUALP L (COPY-LIST L)) EQL-OK: T (COPY-ALIST 'A) [SIMPLE-TYPE-ERROR]: COPY-ALIST: A proper list must not end with A EQL-OK: ERROR (COPY-ALIST 'NIL) EQL-OK: NIL (COPY-ALIST 5) [SIMPLE-TYPE-ERROR]: COPY-ALIST: A proper list must not end with 5 EQL-OK: ERROR (COPY-ALIST '(A B)) EQUAL-OK: (A B) (COPY-ALIST '((1 . A) (2 . B) (3 . C))) EQUAL-OK: ((1 . A) (2 . B) (3 . C)) (SETQ X '((1 . A) (2 . B) (3 . C))) EQUAL-OK: ((1 . A) (2 . B) (3 . C)) (EQ X (COPY-ALIST X)) EQL-OK: NIL (EQL X (COPY-ALIST X)) EQL-OK: NIL (EQUAL X (COPY-ALIST X)) EQL-OK: T (EQ (CADR X) (CADR (COPY-ALIST X))) EQL-OK: NIL (EQL (CADR X) (CADR (COPY-ALIST X))) EQL-OK: NIL (EQUAL (CADR X) (CADR (COPY-ALIST X))) EQL-OK: T (COPY-ALIST '((1 . 2)) '((A . B))) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too many arguments given to COPY-ALIST: #1=(COPY-ALIST '((1 . 2)) '((A . B))) EQL-OK: ERROR (COPY-ALIST '((A B) C (D E))) EQUAL-OK: ((A B) C (D E)) (COPY-TREE 'X) EQL-OK: X (COPY-TREE 5) EQL-OK: 5 (COPY-TREE '(A B)) EQUAL-OK: (A B) (COPY-TREE '(A B (C (D) (E F)) G)) EQUAL-OK: (A B (C (D) (E F)) G) (COPY-TREE '((1 . E) (2 . F))) EQUAL-OK: ((1 . E) (2 . F)) (COPY-TREE #*001) EQUAL-OK: #*001 (SETQ X '(A B (C D) E)) EQUAL-OK: (A B (C D) E) (EQ X (COPY-TREE X)) EQL-OK: NIL (EQL X (COPY-TREE X)) EQL-OK: NIL (EQUAL X (COPY-TREE X)) EQL-OK: T (EQ (CDADDR X) (CDADDR (COPY-TREE X))) EQL-OK: NIL (EQL (CDADDR X) (CDADDR (COPY-TREE X))) EQL-OK: NIL (EQUAL (CDADDR X) (CDADDR (COPY-TREE X))) EQL-OK: T (REVAPPEND '(A B C) '(D E F) 'NIL '(G)) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too many arguments given to REVAPPEND: #1=(REVAPPEND '(A B C) '(D E F) 'NIL '(G)) EQL-OK: ERROR (REVAPPEND '(A B C) 'D) EQUAL-OK: (C B A . D) (REVAPPEND 'A 'B) [SIMPLE-TYPE-ERROR]: REVAPPEND: A proper list must not end with A EQL-OK: ERROR (REVAPPEND 'A 'NIL) [SIMPLE-TYPE-ERROR]: REVAPPEND: A proper list must not end with A EQL-OK: ERROR (REVAPPEND 'NIL 'NIL) EQL-OK: NIL (REVAPPEND 'NIL 'A) EQL-OK: A (REVAPPEND 'NIL '(A B C)) EQUAL-OK: (A B C) (REVAPPEND '(A B C) '(D E F)) EQUAL-OK: (C B A D E F) (REVAPPEND '(D E F) '(A B C)) EQUAL-OK: (F E D A B C) (EQL (REVAPPEND '(A B C) '(D E F)) (APPEND (REVERSE '(A B C)) '(D E F))) EQL-OK: NIL (EQUAL (REVAPPEND '(A B C) '(D E F)) (APPEND (REVERSE '(A B C)) '(D E F))) EQL-OK: T (SETQ X '(A B C)) EQUAL-OK: (A B C) (SETQ Y '(D E F)) EQUAL-OK: (D E F) (SETQ R (REVAPPEND X Y)) EQUAL-OK: (C B A D E F) X EQUAL-OK: (A B C) Y EQUAL-OK: (D E F) (EQ (CDDDR R) Y) EQL-OK: T (SETQ X '(A B C) Y '(D E F)) EQUAL-OK: (D E F) (NCONC X Y) EQUAL-OK: (A B C D E F) X EQUAL-OK: (A B C D E F) (EQ (CDDDR X) Y) EQL-OK: T (SETQ X '(A B C) Y '(D E F) Z '(G H I)) EQUAL-OK: (G H I) (NCONC) EQL-OK: NIL (NCONC X) EQUAL-OK: (A B C) (NCONC NIL) EQL-OK: NIL (NCONC NIL NIL) EQL-OK: NIL (NCONC X NIL) EQUAL-OK: (A B C) (NCONC NIL NIL NIL NIL) EQL-OK: NIL (NCONC NIL NIL X NIL) EQUAL-OK: (A B C) (NCONC X NIL Y NIL Z NIL) EQUAL-OK: (A B C D E F G H I) X EQUAL-OK: (A B C D E F G H I) Y EQUAL-OK: (D E F G H I) Z EQUAL-OK: (G H I) (EQ (CDDDR X) Y) EQL-OK: T (EQ (CDDDR Y) Z) EQL-OK: T (NCONC '(1 2) 'A) EQUAL-OK: (1 2 . A) (NCONC 'A) EQL-OK: A (SETQ X '(A B C) Y '(D E F)) EQUAL-OK: (D E F) (NRECONC X Y) EQUAL-OK: (C B A D E F) X EQUAL-OK: (C B A D E F) (TAILP Y X) EQL-OK: T (SETQ X '(A B C) Y '(D E F) Z '(G H I)) EQUAL-OK: (G H I) (NRECONC) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too few arguments given to NRECONC: #1=(NRECONC) EQL-OK: ERROR (NRECONC X) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too few arguments given to NRECONC: #1=(NRECONC X) EQL-OK: ERROR (NRECONC NIL) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too few arguments given to NRECONC: #1=(NRECONC NIL) EQL-OK: ERROR (NRECONC NIL NIL) EQL-OK: NIL (NRECONC X NIL) EQUAL-OK: (C B A) X EQUAL-OK: (C B A) (NRECONC NIL NIL NIL NIL) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too many arguments given to NRECONC: #1=(NRECONC NIL NIL NIL NIL) EQL-OK: ERROR (NCONC NIL 'X) EQL-OK: X (SETQ AA NIL) EQL-OK: NIL (PUSH '1 AA) EQUAL-OK: (1) (PUSH '2 AA) EQUAL-OK: (2 1) (PUSH '2 AA) EQUAL-OK: (2 2 1) (SETQ AA '(B A)) EQUAL-OK: (B A) (PUSHNEW 'A AA) EQUAL-OK: (B A) (PUSHNEW 'C AA) EQUAL-OK: (C B A) (SETQ XXX NIL) EQL-OK: NIL (PUSHNEW 'C XXX :TEST 'EQUAL) EQUAL-OK: (C) (PUSHNEW 'C XXX :TEST 'EQUAL) EQUAL-OK: (C) (PUSHNEW '(C) XXX :TEST 'EQUAL) EQUAL-OK: ((C) C) XXX EQUAL-OK: ((C) C) (SETQ XX '(NIL KKK)) EQUAL-OK: (NIL KKK) (PUSHNEW 'U (CAR XX)) EQUAL-OK: (U) (PUSHNEW 'U (CAR XX)) EQUAL-OK: (U) (PUSHNEW 'V (CAR XX)) EQUAL-OK: (V U) XX EQUAL-OK: ((V U) KKK) (PUSHNEW '(W) (CAR XX)) EQUAL-OK: ((W) V U) (PUSHNEW '(W) (CAR XX)) EQUAL-OK: ((W) (W) V U) (PUSHNEW '(W) (CAR XX) :TEST 'EQUAL) EQUAL-OK: ((W) (W) V U) (PUSHNEW '(W) (CAR XX) :TEST-NOT 'EQUAL) EQUAL-OK: ((W) (W) V U) (SETQ AA '(1 2 3)) EQUAL-OK: (1 2 3) (POP AA) EQL-OK: 1 AA EQUAL-OK: (2 3) (POP AA) EQL-OK: 2 (POP AA) EQL-OK: 3 (POP AA) EQL-OK: NIL (POP AA) EQL-OK: NIL (BUTLAST '(A B C)) EQUAL-OK: (A B) (BUTLAST '(A B C) 2) EQUAL-OK: (A) (NBUTLAST '(A B C D) 3) EQUAL-OK: (A) (NBUTLAST '(A B C D) 1) EQUAL-OK: (A B C) (NBUTLAST '(A B C D) 0) EQUAL-OK: (A B C D) (NBUTLAST '(A B C D) 4) EQL-OK: NIL (NBUTLAST '(A B C D) 6) EQL-OK: NIL (BUTLAST '#1=(1 2 3 . #1#) 3) [SIMPLE-ERROR]: BUTLAST: #1=(1 2 3 . #1#) is a circular list EQL-OK: ERROR (LET ((LIST-1 (LIST 1 2 3)) (LIST-2 (LIST 'A 'B 'C))) (LIST (REVAPPEND LIST-1 LIST-2) (EQUAL LIST-1 '(1 2 3)) (EQUAL LIST-2 '(A B C)))) EQUAL-OK: ((3 2 1 A B C) T T) (REVAPPEND '(1 2 3) 'NIL) EQUAL-OK: (3 2 1) (REVAPPEND '(1 2 3) '(A . B)) EQUAL-OK: (3 2 1 A . B) (REVAPPEND 'NIL '(A B C)) EQUAL-OK: (A B C) (REVAPPEND '(1 2 3) 'A) EQUAL-OK: (3 2 1 . A) (REVAPPEND 'NIL 'A) EQL-OK: A (LET ((LIST-1 (LIST '1 '2 '3)) (LIST-2 (LIST 'A 'B 'C))) (LIST (NRECONC LIST-1 LIST-2) (EQUAL LIST-1 '(1 2 3)) (EQUAL LIST-2 '(A B C)))) EQUAL-OK: ((3 2 1 A B C) NIL T) (NCONC) EQL-OK: NIL (SETQ X '(A B C)) EQUAL-OK: (A B C) (SETQ Y '(D E F)) EQUAL-OK: (D E F) (NCONC X Y) EQUAL-OK: (A B C D E F) X EQUAL-OK: (A B C D E F) (SETQ FOO (LIST 'A 'B 'C 'D 'E) BAR (LIST 'F 'G 'H 'I 'J) BAZ (LIST 'K 'L 'M)) EQUAL-OK: (K L M) (SETQ FOO (NCONC FOO BAR BAZ)) EQUAL-OK: (A B C D E F G H I J K L M) FOO EQUAL-OK: (A B C D E F G H I J K L M) BAR EQUAL-OK: (F G H I J K L M) BAZ EQUAL-OK: (K L M) (SETQ FOO (LIST 'A 'B 'C 'D 'E) BAR (LIST 'F 'G 'H 'I 'J) BAZ (LIST 'K 'L 'M)) EQUAL-OK: (K L M) (SETQ FOO (NCONC NIL FOO BAR NIL BAZ)) EQUAL-OK: (A B C D E F G H I J K L M) FOO EQUAL-OK: (A B C D E F G H I J K L M) BAR EQUAL-OK: (F G H I J K L M) BAZ EQUAL-OK: (K L M) (APPEND '(A B C) '(D E F) 'NIL '(G)) EQUAL-OK: (A B C D E F G) (APPEND '(A B C) 'D) EQUAL-OK: (A B C . D) (SETQ LST '(A B C)) EQUAL-OK: (A B C) (APPEND LST '(D)) EQUAL-OK: (A B C D) LST EQUAL-OK: (A B C) (APPEND) EQL-OK: NIL (APPEND 'A) EQL-OK: A (UNINTERN 'X) EQL-OK: T RUN-TEST: finished "lists152" (0 errors out of 255 tests) RUN-TEST: started # (UNLESS (AND (SEARCH " TYPECODES " (SOFTWARE-TYPE)) (<= (INTEGER-LENGTH MOST-POSITIVE-FIXNUM) 26)) (LET ((Z (MAKE-LIST 5000000))) (GC) (MAPCAR #'NULL Z) (GC) (SETQ Z NIL) (GC) NIL)) EQL-OK: NIL RUN-TEST: finished "lists153" (0 errors out of 1 test) RUN-TEST: started # (SUBST 'A 'B '(U B (B) C)) EQUAL-OK: (U A (A) C) (SUBST 'A 'B '(U B (B) C) :TEST-NOT #'(LAMBDA (X Y) (IF (ATOM Y) (EQL X Y) T))) EQUAL-OK: (A B (B . A) A . A) (SUBST 'A 'B '(U B (B) C) :TEST #'(LAMBDA (X Y) (NOT (EQL X Y)))) EQL-OK: A (SUBST 'A 'B '(U B (B) C) :TEST-NOT #'(LAMBDA (X Y) (NOT (EQL X Y)))) EQUAL-OK: (U A (A) C) (SUBST 'A 'B '(U B (B) C) :TEST-NOT #'(LAMBDA (X Y) (NOT (EQL X Y))) :KEY #'(LAMBDA (U) (IF (LISTP U) (CAR U)))) EQUAL-OK: (U . A) (SUBST-IF 'NUMMMER 'NUMBERP '((A (7 (V 6))))) EQUAL-OK: ((A (NUMMMER (V NUMMMER)))) (SUBST-IF-NOT 'NUMMMER 'NUMBERP '((A (7 (V 6))))) EQL-OK: NUMMMER (SUBST-IF-NOT 'NUMMMER #'(LAMBDA (X) (AND (LISTP X) (NUMBERP X))) '((A (7 (V 6))))) EQL-OK: NUMMMER (SUBST-IF-NOT 'NUMMMER #'(LAMBDA (X) (OR (LISTP X) (NUMBERP X))) '((A (7 (V 6))))) EQUAL-OK: ((NUMMMER (7 (NUMMMER 6)))) (NSUBST 'A 'B '(U B (B) C) :TEST-NOT #'(LAMBDA (X Y) (IF (ATOM Y) (EQL X Y) T))) EQUAL-OK: (A B (B . A) A . A) (NSUBST 'A 'B '(U B (B) C) :TEST-NOT #'(LAMBDA (X Y) (NOT (EQL X Y)))) EQUAL-OK: (U A (A) C) (NSUBST 'A 'B '(U B (B) C) :TEST #'(LAMBDA (X Y) (NOT (EQL X Y)))) EQL-OK: A (NSUBST-IF 'OO 'NUMBERP '(A B C (3 (4) 0))) EQUAL-OK: (A B C (OO (OO) OO)) (NSUBST-IF-NOT 'OO 'NUMBERP '(A B C (3 (4) 0))) EQL-OK: OO (NSUBST-IF-NOT 'OO #'(LAMBDA (X) (OR (ATOM X) (NUMBERP X))) '(A B C (3 (4) 0))) EQL-OK: OO (NSUBST-IF-NOT 'OO #'(LAMBDA (X) (AND (ATOM X) (NUMBERP X))) '(A B C (3 (4) 0))) EQL-OK: OO (NSUBST-IF-NOT 'OO #'(LAMBDA (X) (OR (LIST X) (NUMBERP X))) '(A B C (3 (4) 0))) EQUAL-OK: (A B C (3 (4) 0)) (NSUBST-IF-NOT 'OO #'(LAMBDA (X) (OR (LIST X) (SYMBOLP X))) '(A B C (3 (4) 0))) EQUAL-OK: (A B C (3 (4) 0)) (SUBLIS '((A . A1) (B . B1)) '(A B)) EQUAL-OK: (A1 B1) (SUBLIS '((A . A1) (B . B1)) '(A B (B . C))) EQUAL-OK: (A1 B1 (B1 . C)) (SUBLIS '((A . A1) (B . B1) (NIL . NIL1)) '(A B (B . C))) EQUAL-OK: (A1 B1 (B1 . C) . NIL1) (SUBLIS '((A . A1) (B . B1) (NIL . NIL1)) '(A B (B C))) EQUAL-OK: (A1 B1 (B1 C . NIL1) . NIL1) (SUBLIS '((A . A1) (B . B1) (NIL . NIL1)) '(A B (B C)) :TEST-NOT 'EQL) EQL-OK: A1 (SUBLIS '((A . A1) (B . B1) (NIL . NIL1)) '(A B (B C)) :TEST-NOT #'(LAMBDA (X Y) (IF (ATOM Y) (EQL X Y)))) EQL-OK: A1 (SUBLIS '(((A) . UU) (A . II)) '(I (A) A)) EQUAL-OK: (I (II) II) (SUBLIS '(((A) . UU) (A . II)) '(I (A) A) :KEY #'(LAMBDA (X) (IF (LISTP X) (CAR X)))) EQUAL-OK: (I II . II) (SUBLIS '((1 . 2) (2 . 4) (3 . 6) (A . AA) (B . BB) (C . CC) (D . DD)) '((A B (C (D 1) 2 (3))))) EQUAL-OK: ((AA BB (CC (DD 2) 4 (6)))) (SUBLIS '((1 . 2) (2 . 4) (3 . 6) (A . AA) (B . BB) (C . CC) (D . DD)) '((A B (C (D 1) 2 (3)))) :TEST #'(LAMBDA (X Y) (AND (NUMBERP X) (NUMBERP Y) (= X Y)))) EQUAL-OK: ((A B (C (D 2) 4 (6)))) (SUBLIS '((1 . 2) (2 . 4) (3 . 6) (A . AA) (B . BB) (C . CC) (D . DD)) '((A B (C (D 1) 2 (3)))) :TEST #'EQUALP :KEY #'(LAMBDA (X) (AND (SYMBOLP X) X))) EQUAL-OK: ((AA BB (CC (DD 1) 2 (3)))) (SUBLIS '(((A) . UU) (A . II)) '(I (A) A) :TEST #'(LAMBDA (X Y) (IF (LISTP Y) (EQL X (CAR Y))))) EQUAL-OK: (I (UU) UU) (NSUBLIS '(((A) . UU) (A . II)) '(I (A) A) :KEY #'(LAMBDA (X) (IF (LISTP X) (CAR X)))) EQUAL-OK: (I II . II) (NSUBLIS '(((A) . UU) (A . II)) '(I (A) A) :TEST #'(LAMBDA (X Y) (IF (LISTP X) (EQUAL X Y)))) EQUAL-OK: (I UU . UU) (NSUBLIS '(((A) . UU) (A . II)) '(I (A) A) :TEST #'(LAMBDA (X Y) (IF (LISTP Y) (EQUAL X Y)))) EQUAL-OK: (I UU . UU) (NSUBLIS '(((A) . UU) (A . II)) '(I (A) A) :TEST #'(LAMBDA (X Y) (IF (LISTP Y) (EQL X (CAR Y))))) EQUAL-OK: (I (UU) UU) (SUBLIS '((X . 100) (Z . ZPRIME)) '(PLUS X (MINUS G Z X P) 4 . X)) EQUAL-OK: (PLUS 100 (MINUS G ZPRIME 100 P) 4 . 100) (SUBLIS '(((+ X Y) - X Y) ((- X Y) + X Y)) '(* (/ (+ X Y) (+ X P)) (- X Y)) :TEST #'EQUAL) EQUAL-OK: (* (/ (- X Y) (+ X P)) (+ X Y)) (SETQ TREE1 '(1 (1 2) ((1 2 3)) (((1 2 3 4))))) EQUAL-OK: (1 (1 2) ((1 2 3)) (((1 2 3 4)))) (SUBLIS '((3 . "three")) TREE1) EQUAL-OK: (1 (1 2) ((1 2 "three")) (((1 2 "three" 4)))) (SUBLIS '((T . "string")) (SUBLIS '((1 . "") (4 . 44)) TREE1) :KEY #'STRINGP) EQUAL-OK: ("string" ("string" 2) (("string" 2 3)) ((("string" 2 3 44)))) TREE1 EQUAL-OK: (1 (1 2) ((1 2 3)) (((1 2 3 4)))) (SETQ TREE2 '("one" ("one" "two") (("one" "Two" "three")))) EQUAL-OK: ("one" ("one" "two") (("one" "Two" "three"))) (SUBLIS '(("two" . 2)) TREE2) EQUAL-OK: ("one" ("one" "two") (("one" "Two" "three"))) TREE2 EQUAL-OK: ("one" ("one" "two") (("one" "Two" "three"))) (SUBLIS '(("two" . 2)) TREE2 :TEST 'EQUAL) EQUAL-OK: ("one" ("one" 2) (("one" "Two" "three"))) (NSUBLIS '((T QUOTE TEMP)) TREE1 :KEY #'(LAMBDA (X) (OR (ATOM X) (< (LIST-LENGTH X) 3)))) EQUAL-OK: ('TEMP 'TEMP QUOTE TEMP) (NTHCDR (1+ MOST-POSITIVE-FIXNUM) '(1 2 3)) EQL-OK: NIL RUN-TEST: finished "lists154" (0 errors out of 46 tests) RUN-TEST: started # (MEMBER 'A '((A) (B) (A) (C))) EQL-OK: NIL (MEMBER 'A '((A) (B) (A) (C)) :KEY 'CAR) EQUAL-OK: ((A) (B) (A) (C)) (MEMBER-IF 'NUMBERP '((A) (B) (3) (C)) :KEY 'CAR) EQUAL-OK: ((3) (C)) (MEMBER-IF-NOT 'NUMBERP '((8) (A) (B) (3) (C)) :KEY 'CAR) EQUAL-OK: ((A) (B) (3) (C)) (TAILP '(A B) '(U A B)) EQL-OK: NIL (TAILP (CDDR (SETQ XX '(U I A B))) XX) EQL-OK: T (TAILP (CDDR (SETQ XX '(U I A B))) XX) EQL-OK: T (ADJOIN 'A '(A B C)) EQUAL-OK: (A B C) (ADJOIN 'A '((A) B C) :TEST 'EQUAL) EQUAL-OK: (A (A) B C) (ADJOIN 'A '((A) B C) :TEST 'EQUAL) EQUAL-OK: (A (A) B C) (UNION '(A B C D) '(A D I V)) EQUAL-OK: (B C A D I V) (NUNION '(A B C D) '(U I B A)) EQUAL-OK: (C D U I B A) (NINTERSECTION '(A B C D) '(C D E F G)) EQUAL-OK: (C D) (NINTERSECTION '(A B C D) '(C D E F G) :TEST-NOT 'EQL) EQUAL-OK: (A B C D) (SET-DIFFERENCE '(A B C D E) '(D B E)) EQUAL-OK: (A C) (SET-DIFFERENCE '(AUTO ANTON BERTA BERLIN) '(A) :TEST #'(LAMBDA (X Y) (EQL (ELT (SYMBOL-NAME X) 1) (ELT (SYMBOL-NAME Y) 1)))) [SIMPLE-TYPE-ERROR]: ELT: index 1 for "A" is out of range EQL-OK: ERROR (SET-DIFFERENCE '(ANTON BERTA AUTO BERLIN) '(AMERILLA) :TEST #'(LAMBDA (X Y) (EQL (ELT (SYMBOL-NAME X) 0) (ELT (SYMBOL-NAME Y) 0)))) EQUAL-OK: (BERTA BERLIN) (NSET-DIFFERENCE '(A B C D) '(I J C)) EQUAL-OK: (A B D) (SET-EXCLUSIVE-OR '(A B C D) '(C A I L)) EQUAL-OK: (B D I L) (SET-EXCLUSIVE-OR '(ANTON ANNA EMIL) '(BERTA AUTO AUGUST) :TEST #'(LAMBDA (X Y) (EQL (ELT (SYMBOL-NAME X) 0) (ELT (SYMBOL-NAME Y) 0)))) EQUAL-OK: (EMIL BERTA) (NSET-EXCLUSIVE-OR '(A B C) '(I A D C)) EQUAL-OK: (B I D) (SUBSETP '(A B) '(B U I A C D)) EQL-OK: T (SUBSETP '(A B) '(B U I C D)) EQL-OK: NIL (SUBSETP '(A B) '(B A U I C D)) EQL-OK: T (SUBSETP '(A B) '(A U I C D)) EQL-OK: NIL RUN-TEST: finished "lists155" (0 errors out of 25 tests) RUN-TEST: started # (ACONS 'A 'B NIL) EQUAL-OK: ((A . B)) (ACONS 'A 'B '((C . D))) EQUAL-OK: ((A . B) (C . D)) (PAIRLIS '(A B C) '(1 2)) [SIMPLE-ERROR]: PAIRLIS: lists (A B C) and (1 2) are not of same length EQL-OK: ERROR (PAIRLIS '(A B C) '(1 2 3)) EQUAL-OK: ((C . 3) (B . 2) (A . 1)) (ASSOC 'A '((B C) (A U) (A I))) EQUAL-OK: (A U) (ASSOC 'A '((B C) ((A) U) (A I))) EQUAL-OK: (A I) (ASSOC 'A '((B C) ((A) U) (A I)) :KEY #'(LAMBDA (X) (IF (LISTP X) (CAR X)))) EQUAL-OK: ((A) U) (ASSOC 'A '((B C) A ((A) U) (A I)) :KEY #'(LAMBDA (X) (IF (LISTP X) (CAR X)))) [SIMPLE-TYPE-ERROR]: ASSOC: A is not a list EQL-OK: ERROR (ASSOC 'A '((B C) A ((A) U) (A I)) :KEY #'(LAMBDA (X) (IF (ATOM X) X))) [SIMPLE-TYPE-ERROR]: ASSOC: A is not a list EQL-OK: ERROR (ASSOC 'A '((B C) A ((A) U) (A I)) :TEST #'(LAMBDA (X Y) (IF (LISTP Y) (EQL (CAR Y) X)))) [SIMPLE-TYPE-ERROR]: ASSOC: A is not a list EQL-OK: ERROR (ASSOC 'A '((B C) A ((A) U) (A I)) :TEST #'(LAMBDA (X Y) (IF (ATOM Y) (EQL Y X)))) [SIMPLE-TYPE-ERROR]: ASSOC: A is not a list EQL-OK: ERROR (ASSOC 'A '((B C) A ((A) U) (A I)) :TEST-NOT #'(LAMBDA (X Y) (IF (ATOM Y) (EQL Y X)))) EQUAL-OK: (B C) (ASSOC-IF 'NUMBERP '((A . 3) (3 . A))) EQUAL-OK: (3 . A) (ASSOC-IF 'SYMBOLP '((A . 3) (3 . A))) EQUAL-OK: (A . 3) (ASSOC-IF-NOT 'SYMBOLP '((A . 3) (3 . A))) EQUAL-OK: (3 . A) (ASSOC-IF-NOT 'NUMBERP '((A . 3) (3 . A))) EQUAL-OK: (A . 3) (RASSOC 'A '((1 . B) (2 . A))) EQUAL-OK: (2 . A) (RASSOC-IF 'SYMBOLP '((1 . B) (2 . A))) EQUAL-OK: (1 . B) (RASSOC-IF 'SYMBOLP '((1 . 3) (2 . A))) EQUAL-OK: (2 . A) (RASSOC-IF-NOT 'SYMBOLP '((1 . 3) (2 . A))) EQUAL-OK: (1 . 3) RUN-TEST: finished "lists156" (0 errors out of 20 tests) RUN-TEST: started # (SET-DIFFERENCE '(A B C) '(A)) EQUAL-OK: (B C) (SET-DIFFERENCE (LOOP :FOR I :FROM 1 :TO 100 :COLLECT I) (LOOP :FOR I :FROM 1 :TO 99 :COLLECT I) :TEST 'EQUALP) EQUAL-OK: (100) (INTERSECTION '(1 2 3) '(A B C)) EQL-OK: NIL (INTERSECTION '(1 2 3) '(2 3 4)) EQUAL-OK: (2 3) (UNION '(1 2 3) '(A B C)) EQUAL-OK: (1 2 3 A B C) (UNION '(1 2 3) '(2 3 4)) EQUAL-OK: (1 2 3 4) (SET-EXCLUSIVE-OR (LOOP :FOR I :FROM 1 :TO 100 :COLLECT I) (LOOP :FOR I :FROM 2 :TO 99 :COLLECT I)) EQUAL-OK: (1 100) (SET-EXCLUSIVE-OR (LOOP :FOR I :FROM 1 :TO 100 :COLLECT (PRINC-TO-STRING I)) (LOOP :FOR I :FROM 2 :TO 99 :COLLECT (PRINC-TO-STRING I)) :TEST #'EQUALP) EQUAL-OK: ("1" "100") (SUBSETP (LOOP :FOR I :FROM 1 :TO 100 :COLLECT I) (LOOP :FOR I :FROM 1 :TO 99 :COLLECT I)) EQL-OK: NIL (SUBSETP (LOOP :FOR I :FROM 1 :TO 99 :COLLECT I) (LOOP :FOR I :FROM 1 :TO 100 :COLLECT I)) EQL-OK: T RUN-TEST: finished "list-set" (0 errors out of 10 tests) RUN-TEST: started # (HANDLER-CASE (LET ((I 2)) (LOOP FOR I FROM 1 BELOW 20 BY I COLLECT I)) (WARNING (W) (PRINC-TO-STRING W))) EQUAL-OK: "Reference to I is implementation-dependent, per ANSI CL 6.1.1.4." (HANDLER-CASE (LET ((J 5)) (LOOP FOR I FROM 1 TO J FOR J FROM 11 TO 20 COLLECT (LIST I J))) (WARNING (W) (PRINC-TO-STRING W))) EQUAL-OK: "Reference to J is implementation-dependent, per ANSI CL 6.1.1.4." (HANDLER-CASE (LET ((I 2)) (LOOP FOR A IN (LIST I I) FOR I FROM 1 TO 2 COLLECT A)) (WARNING (W) (PRINC-TO-STRING W))) EQUAL-OK: "Reference to I is implementation-dependent, per ANSI CL 6.1.1.4." (HANDLER-CASE (LET ((J #'CDR)) (LOOP FOR I IN '(A B C) BY J FOR J IN (LIST #'CDDR #'CDDR #'CDDR) COLLECT (PROG1 I J))) (WARNING (W) (PRINC-TO-STRING W))) EQUAL-OK: "Reference to J is implementation-dependent, per ANSI CL 6.1.1.4." (HANDLER-CASE (LET ((I 2)) (LOOP FOR A ON (LIST I I) FOR I FROM 1 TO 2 COLLECT A)) (WARNING (W) (PRINC-TO-STRING W))) EQUAL-OK: "Reference to I is implementation-dependent, per ANSI CL 6.1.1.4." (HANDLER-CASE (LET ((J (LIST #'CDR))) (LOOP FOR I ON '(A B C) BY (CAR J) FOR J ON (LIST #'CDDR #'CDDR #'CDDR) COLLECT (PROG1 I J))) (WARNING (W) (PRINC-TO-STRING W))) EQUAL-OK: "Reference to J is implementation-dependent, per ANSI CL 6.1.1.4." (HANDLER-CASE (LET ((I 2)) (LOOP FOR A ACROSS (VECTOR I I) FOR I FROM 1 TO 2 COLLECT A)) (WARNING (W) (PRINC-TO-STRING W))) EQUAL-OK: "Reference to I is implementation-dependent, per ANSI CL 6.1.1.4." (HANDLER-CASE (LET ((I 2)) (LOOP FOR K BEING EACH HASH-KEY OF (LET ((HT (MAKE-HASH-TABLE))) (SETF (GETHASH I HT) T) HT) FOR I FROM 1 TO 2 COLLECT K)) (WARNING (W) (PRINC-TO-STRING W))) EQUAL-OK: "Reference to I is implementation-dependent, per ANSI CL 6.1.1.4." (HANDLER-CASE (LET ((I 2)) (LOOP FOR S BEING EACH EXTERNAL-SYMBOL OF (FIND-PACKAGE (IF (= I 1) "COMMON-LISP" "COMMON-LISP-USER")) FOR I FROM 1 TO 2 COLLECT S)) (WARNING (W) (PRINC-TO-STRING W))) EQUAL-OK: "Reference to I is implementation-dependent, per ANSI CL 6.1.1.4." (LOOP FOR X FROM 1 TO 9 FOR Y = NIL THEN X COLLECT (LIST X Y)) EQUAL-OK: ((1 NIL) (2 2) (3 3) (4 4) (5 5) (6 6) (7 7) (8 8) (9 9)) (LOOP FOR X FROM 1 TO 9 AND Y = NIL THEN X COLLECT (LIST X Y)) EQUAL-OK: ((1 NIL) (2 1) (3 2) (4 3) (5 4) (6 5) (7 6) (8 7) (9 8)) (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP AS I FROM 1 TO 5 DO (PRINC I))) EQUAL-OK: "12345" (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP FOR I FROM 10 DOWNTO 1 BY 3 DO (PRINC I))) EQUAL-OK: "10741" (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP AS I BELOW 5 DO (PRINC I))) EQUAL-OK: "01234" (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP FOR ITEM IN '(1 2 3 4 5) DO (PRINC ITEM))) EQUAL-OK: "12345" (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP FOR ITEM IN '(1 2 3 4 5) BY #'CDDR DO (PRINC ITEM))) EQUAL-OK: "135" (LOOP FOR (ITEM . X) (T . FIXNUM) IN '((A . 1) (B . 2) (C . 3)) UNLESS (EQ ITEM 'B) SUM X) EQL-OK: 4 (LOOP FOR SUBLIST ON '(A B C D) COLLECT SUBLIST) EQUAL-OK: ((A B C D) (B C D) (C D) (D)) (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP FOR (ITEM) ON '(1 2 3) DO (PRINC ITEM))) EQUAL-OK: "123" (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP FOR ITEM IN '(1 2 3) DO (PRINC ITEM))) EQUAL-OK: "123" (LOOP FOR X ON '(1 2 . 3) COLLECT X) EQUAL-OK: ((1 2 . 3) (2 . 3)) (LOOP FOR I BELOW 5 FOR J = 10 THEN I COLLECT J) EQUAL-OK: (10 1 2 3 4) (LOOP FOR I BELOW 5 FOR J = I COLLECT J) EQUAL-OK: (0 1 2 3 4) (LOOP FOR ITEM = 1 THEN (+ ITEM 10) REPEAT 5 COLLECT ITEM) EQUAL-OK: (1 11 21 31 41) (LOOP FOR CHAR ACROSS (THE SIMPLE-STRING "Hello") COLLECT CHAR) EQUAL-OK: (#\H #\e #\l #\l #\o) (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP REPEAT 3 DO (WRITE-LINE "What I say three times is true"))) EQUAL-OK: "What I say three times is true What I say three times is true What I say three times is true " (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP REPEAT -15 DO (WRITE-LINE "What you see is what you expect"))) EQUAL-OK: "" (LOOP FOR I FIXNUM FROM 3 WHEN (ODDP I) COLLECT I WHILE (< I 5)) EQUAL-OK: (3 5) (LOOP FOR I FROM 0 TO 10 ALWAYS (< I 11)) EQL-OK: T (LOOP FOR I FROM 0 TO 10 NEVER (> I 11)) EQL-OK: T (LOOP FOR I FROM 0 THEREIS (WHEN (> I 10) I)) EQL-OK: 11 (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP FOR I FROM 0 TO 10 ALWAYS (< I 9) FINALLY (PRINT "You won't see this"))) EQUAL-OK: "" (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP NEVER T FINALLY (PRINT "You won't see this"))) EQUAL-OK: "" (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP THEREIS "Here is my value" FINALLY (PRINT "You won't see this"))) EQUAL-OK: "" (LOOP THEREIS "Here is my value" FINALLY (PRINT "You won't see this")) EQUAL-OK: "Here is my value" (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP FOR I FROM 1 TO 10 THEREIS (> I 11) FINALLY (PRINC I))) EQUAL-OK: "11" (LET (EVEREST CHOCORUA SAHARA) (DEFSTRUCT MOUNTAIN HEIGHT DIFFICULTY (WHY "because it is there")) (SETQ EVEREST (MAKE-MOUNTAIN :HEIGHT '(2.86E-13 PARSECS))) (SETQ CHOCORUA (MAKE-MOUNTAIN :HEIGHT '(1059180001 MICRONS))) (DEFSTRUCT DESERT AREA (HUMIDITY 0)) (SETQ SAHARA (MAKE-DESERT :AREA '(212480000 SQUARE FURLONGS))) (LOOP FOR X IN (LIST EVEREST SAHARA CHOCORUA) THEREIS (AND (MOUNTAIN-P X) (MOUNTAIN-HEIGHT X)))) EQUAL-OK: (2.86E-13 PARSECS) (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP FOR (MONTH DATE-LIST) IN '((JANUARY (24 28)) (FEBRUARY (17 29 12))) DO (LOOP FOR DATE IN DATE-LIST DO (CASE DATE (29 (WHEN (EQ MONTH 'FEBRUARY) (LOOP-FINISH)))) DO (FORMAT T "~:(~A~) ~A~%" MONTH DATE)))) EQUAL-OK: "January 24 January 28 February 17 " (LOOP FOR I IN '(1 2 3 STOP-HERE 4 5 6) WHEN (SYMBOLP I) DO (LOOP-FINISH) COUNT I) EQL-OK: 3 (LOOP FOR I IN '(1 2 3 STOP-HERE 4 5 6) UNTIL (SYMBOLP I) COUNT I) EQL-OK: 3 (LOOP FOR NAME IN '(FRED SUE ALICE JOE JUNE) FOR KIDS IN '((BOB KEN) NIL NIL (KRIS SUNSHINE) NIL) COLLECT NAME APPEND KIDS) EQUAL-OK: (FRED BOB KEN SUE ALICE JOE KRIS SUNSHINE JUNE) (MULTIPLE-VALUE-LIST (LOOP FOR NAME IN '(FRED SUE ALICE JOE JUNE) AS AGE IN '(22 26 19 20 10) APPEND (LIST NAME AGE) INTO NAME-AND-AGE-LIST COUNT NAME INTO NAME-COUNT SUM AGE INTO TOTAL-AGE FINALLY (RETURN (VALUES (ROUND TOTAL-AGE NAME-COUNT) NAME-AND-AGE-LIST)))) EQUAL-OK: (19 (FRED 22 SUE 26 ALICE 19 JOE 20 JUNE 10)) (LOOP FOR X FROM 1 TO 20 WHEN (EQL (MOD X 5) 0) COLLECT X INTO FOO WHEN (EQL (MOD X 5) 2) COLLECT X INTO FOO FINALLY (RETURN FOO)) EQUAL-OK: (2 5 7 10 12 15 17 20) (LOOP FOR I IN '(BIRD 3 4 TURTLE (1 . 4) HORSE CAT) WHEN (SYMBOLP I) COLLECT I) EQUAL-OK: (BIRD TURTLE HORSE CAT) (LOOP FOR I FROM 1 TO 10 IF (ODDP I) COLLECT I) EQUAL-OK: (1 3 5 7 9) (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP FOR I IN '(A B C D) BY #'CDDR COLLECT I INTO MY-LIST FINALLY (PRINC MY-LIST))) EQUAL-OK: "(A C)" (LOOP FOR X IN '((A) (B) ((C))) APPEND X) EQUAL-OK: (A B (C)) (LOOP FOR I UPFROM 0 AS X IN '(A B (C)) NCONC (IF (EVENP I) (LIST X) 'NIL)) EQUAL-OK: (A (C)) (LOOP FOR X IN '((A) (B) (C . WHATEVER)) APPENDING X) EQUAL-OK: (A B C . WHATEVER) (LOOP FOR X IN '((A) (B) (C . WHATEVER)) NCONC X) EQUAL-OK: (A B C . WHATEVER) (LOOP FOR X IN '(A B C D E) NCONC (CONS X 'FOO)) EQUAL-OK: (A B C D E . FOO) (LOOP FOR I IN '(A B NIL C NIL D E) COUNT I) EQL-OK: 5 (LOOP FOR I FIXNUM IN '(1 2 3 4 5) SUM I) EQL-OK: 15 (LET ((SERIES '(1.2 4.3 5.7))) (LOOP FOR V IN SERIES SUM (* 2.0 V))) EQL-OK: 22.4 (LOOP FOR I IN '(2 1 5 3 4) MAXIMIZE I) EQL-OK: 5 (LOOP FOR I IN '(2 1 5 3 4) MINIMIZE I) EQL-OK: 1 (LET ((SERIES '(1.2 4.3 5.7))) (LOOP FOR V IN SERIES MAXIMIZE (ROUND V) FIXNUM)) EQL-OK: 6 (LET ((SERIES '(1.2 4.3 5.7))) (LOOP FOR V IN SERIES MINIMIZE (ROUND V) INTO RESULT FIXNUM FINALLY (RETURN RESULT))) EQL-OK: 1 (LOOP WITH A = 1 WITH B = (+ A 2) WITH C = (+ B 3) WITH D = (+ C 4) RETURN (LIST A B C D)) EQUAL-OK: (1 3 6 10) (LOOP WITH A = 1 AND B = 2 AND C = 3 AND D = 4 RETURN (LIST A B C D)) EQUAL-OK: (1 2 3 4) (LET ((A 5) (B 10) (C 1729)) (LOOP WITH A = 1 AND B = (+ A 2) AND C = (+ B 3) AND D = (+ C 4) RETURN (LIST A B C D))) EQUAL-OK: (1 7 13 1733) (LOOP WITH (A B C) (FLOAT INTEGER FLOAT) RETURN (FORMAT NIL "~A ~A ~A" A B C)) WARNING: LOOP: After (A B C), (FLOAT INTEGER FLOAT) is interpreted as a type specification EQUAL-OK: "0.0 0 0.0" (LOOP WITH (A B C) FLOAT RETURN (FORMAT NIL "~A ~A ~A" A B C)) EQUAL-OK: "0.0 0.0 0.0" (LET ((NUMBERS-LIST '(3 2 4 6 1 7 8)) (RESULTS NIL)) (CONS (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP FOR I IN NUMBERS-LIST WHEN (ODDP I) DO (PRINC I) AND COLLECT I INTO ODD-NUMBERS AND DO (TERPRI) ELSE COLLECT I INTO EVEN-NUMBERS FINALLY (SETQ RESULTS (LIST ODD-NUMBERS EVEN-NUMBERS)))) RESULTS)) EQUAL-OK: ("3 1 7 " (3 1 7) (2 4 6 8)) (LOOP FOR I IN '(1 2 3 4 5 6) WHEN (AND (> I 3) I) COLLECT IT) EQUAL-OK: (4 5 6) (LOOP FOR I IN '(1 2 3 4 5 6) WHEN (AND (> I 3) I) RETURN IT) EQL-OK: 4 (LOOP FOR I IN '(1 2 3 4 5 6) WHEN (AND (> I 3) I) RETURN IT) EQL-OK: 4 (LOOP FOR I IN '(1 2 3 4 5 6) THEREIS (AND (> I 3) I)) EQL-OK: 4 (LET ((LIST '(0 3.0 APPLE 4 5 9.8 ORANGE BANANA))) (LOOP FOR I IN LIST WHEN (NUMBERP I) WHEN (FLOATP I) COLLECT I INTO FLOAT-NUMBERS ELSE COLLECT I INTO OTHER-NUMBERS ELSE WHEN (SYMBOLP I) COLLECT I INTO SYMBOL-LIST ELSE DO (ERROR "found a funny value in list ~S, value ~S~%" LIST I) FINALLY (RETURN (LIST FLOAT-NUMBERS OTHER-NUMBERS SYMBOL-LIST)))) EQUAL-OK: ((3.0 9.8) (0 4 5) (APPLE ORANGE BANANA)) (LET ((IT 'Z)) (LOOP FOR X IN '(A NIL B C D) IF X COLLECT IT END COLLECT IT)) EQUAL-OK: (A Z Z B Z C Z D Z) (LET ((IT 'Z)) (LOOP FOR X IN '(A NIL B C D) WHEN X COLLECT IT AND COLLECT IT)) EQUAL-OK: (A Z B Z C Z D Z) (LOOP FOR I IN '(1 2 3 4 5 6) THEREIS (AND (> I 3) I)) EQL-OK: 4 (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP FOR X FROM 0 TO 3 DO (PRINC X) IF (ZEROP (MOD X 2)) DO (WRITE-STRING " a ") AND IF (ZEROP (FLOOR X 2)) DO (WRITE-STRING " b ") AND DO (WRITE-STRING " c "))) EQUAL-OK: "0 a b c 12 a 3" (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP FOR X FROM 0 TO 3 DO (PRINC X) IF (ZEROP (MOD X 2)) DO (WRITE-STRING " a ") AND IF (ZEROP (FLOOR X 2)) DO (WRITE-STRING " b ") END AND DO (WRITE-STRING " c "))) EQUAL-OK: "0 a b c 12 a c 3" (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP FOR I FROM 1 TO 5 DO (PRINC I))) EQUAL-OK: "12345" (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP FOR I FROM 1 TO 4 DO (PRINC I) (PRINC (* I I)) (TERPRI))) EQUAL-OK: "11 24 39 416 " (LOOP FOR ITEM IN '(1 2 3 A 4 5) WHEN (NOT (NUMBERP ITEM)) RETURN (FORMAT NIL "non-numeric value: ~S" ITEM)) EQUAL-OK: "non-numeric value: A" (LOOP FOR ITEM IN '(1 2 3 A 4 5) WHEN (NOT (NUMBERP ITEM)) DO (RETURN (FORMAT NIL "non-numeric value: ~S" ITEM))) EQUAL-OK: "non-numeric value: A" (LOOP FOR NUMLIST IN '((1 2 4.0) (5 6 8.3) (8 9 10.4)) FOR A INTEGER = (FIRST NUMLIST) FOR B INTEGER = (SECOND NUMLIST) FOR C FLOAT = (THIRD NUMLIST) COLLECT (LIST C B A)) WARNING: LOOP: After A, INTEGER is interpreted as a type specification WARNING: LOOP: After B, INTEGER is interpreted as a type specification EQUAL-OK: ((4.0 2 1) (8.3 6 5) (10.4 9 8)) (LOOP FOR NUMLIST IN '((1 2 4.0) (5 6 8.3) (8 9 10.4)) FOR A INTEGER = (FIRST NUMLIST) AND FOR B INTEGER = (SECOND NUMLIST) AND FOR C FLOAT = (THIRD NUMLIST) COLLECT (LIST C B A)) WARNING: LOOP: After A, INTEGER is interpreted as a type specification WARNING: LOOP: After B, INTEGER is interpreted as a type specification EQUAL-OK: ((4.0 2 1) (8.3 6 5) (10.4 9 8)) (LOOP FOR NUMLIST IN '((1 2 4.0) (5 6 8.3) (8 9 10.4)) FOR A INTEGER = (FIRST NUMLIST) AND B INTEGER = (SECOND NUMLIST) AND C FLOAT = (THIRD NUMLIST) COLLECT (LIST C B A)) WARNING: LOOP: After A, INTEGER is interpreted as a type specification WARNING: LOOP: After B, INTEGER is interpreted as a type specification EQUAL-OK: ((4.0 2 1) (8.3 6 5) (10.4 9 8)) (LOOP FOR (A B C) (INTEGER INTEGER FLOAT) IN '((1 2 4.0) (5 6 8.3) (8 9 10.4)) COLLECT (LIST C B A)) WARNING: LOOP: After (A B C), (INTEGER INTEGER FLOAT) is interpreted as a type specification EQUAL-OK: ((4.0 2 1) (8.3 6 5) (10.4 9 8)) (LOOP FOR (A B C) FLOAT IN '((1.0 2.0 4.0) (5.0 6.0 8.3) (8.0 9.0 10.4)) COLLECT (LIST C B A)) EQUAL-OK: ((4.0 2.0 1.0) (8.3 6.0 5.0) (10.4 9.0 8.0)) (LOOP WITH (A B) FLOAT = '(1.0 2.0) AND (C D) INTEGER = '(3 4) AND (E F) RETURN (LIST A B C D E F)) WARNING: LOOP: After (C D), INTEGER is interpreted as a type specification EQUAL-OK: (1.0 2.0 3 4 NIL NIL) (LOOP FOR (A NIL B) = '(1 2 3) DO (RETURN (LIST A B))) EQUAL-OK: (1 3) (LOOP FOR (X . Y) = '(1 . 2) DO (RETURN Y)) EQL-OK: 2 (LOOP FOR ((A . B) (C . D)) OF-TYPE ((FLOAT . FLOAT) (INTEGER . INTEGER)) IN '(((1.2 . 2.4) (3 . 4)) ((3.4 . 4.6) (5 . 6))) COLLECT (LIST A B C D)) EQUAL-OK: ((1.2 2.4 3 4) (3.4 4.6 5 6)) (LOOP FOR BUFFER IN '("\"Hello\"" "\"unterminated" "nothing") COLLECT (LOOP INITIALLY (UNLESS (CHAR= (CHAR BUFFER 0) #\") (LOOP-FINISH)) FOR I FIXNUM FROM 1 BELOW (LENGTH BUFFER) WHEN (CHAR= (CHAR BUFFER I) #\") RETURN I)) EQUAL-OK: (6 NIL NIL) (LET (RESULT) (LIST (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (SETQ RESULT (LOOP FOR I FROM 1 TO 10 WHEN (> I 5) COLLECT I FINALLY (PRINT I)))) RESULT)) EQUAL-OK: (" 11 " (6 7 8 9 10)) (MULTIPLE-VALUE-LIST (LOOP FOR I FROM 1 TO 10 WHEN (> I 5) COLLECT I INTO NUMBER-LIST AND COUNT I INTO NUMBER-COUNT FINALLY (RETURN (VALUES NUMBER-COUNT NUMBER-LIST)))) EQUAL-OK: (5 (6 7 8 9 10)) (LET (Z) (LIST (LOOP FOR X FROM 1 TO 10 COUNT (< X 5) INTO FOO FLOAT FINALLY (SETQ Z FOO)) Z)) EQUAL-OK: (NIL 4.0) (LET (RESULT) (LIST (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (SETQ RESULT (LOOP NAMED MAX FOR I FROM 1 TO 10 DO (PRINT I) DO (RETURN-FROM MAX 'DONE)))) RESULT)) EQUAL-OK: (" 1 " DONE) (LOOP FOR I = 0 FOR J TO 2 COLLECT J) EQUAL-OK: (0 1 2) (LOOP FOR I IN '(1 2) FOR J = I FOR K = J COLLECT (LIST I J K)) EQUAL-OK: ((1 1 1) (2 2 2)) (LOOP FOR IDX UPFROM 0 BELOW 5 FOR CHAR = (AREF "Error" IDX) COLLECT CHAR) EQUAL-OK: (#\E #\r #\r #\o #\r) (DEFUN MAKE-HT (ALIST) (LET ((HASH-TABLE (MAKE-HASH-TABLE))) (DOLIST (PAIR ALIST HASH-TABLE) (SETF (GETHASH (CAR PAIR) HASH-TABLE) (CDR PAIR))))) EQL-OK: MAKE-HT (SORT (LOOP FOR KEY BEING EACH HASH-KEY IN (MAKE-HT '((1 . 100) (2 . 200))) USING (HASH-VALUE VAL) FOR KEY+1 = (1+ KEY) DO (ASSERT (= 100 (/ VAL KEY))) COLLECT (LIST KEY KEY+1 VAL)) #'< :KEY #'CAR) EQUAL-OK: ((1 2 100) (2 3 200)) (LOOP FOR I ACROSS '#(1 2 3 4) FOR J = (1+ I) COLLECT (LIST I J)) EQUAL-OK: ((1 2) (2 3) (3 4) (4 5)) (LOOP FOR I IN 'NIL FOR J = (1+ I) COLLECT J) EQL-OK: NIL (LOOP FOR I ACROSS '#() FOR J = (1+ I) COLLECT J) EQL-OK: NIL (LOOP FOR X = T FOR Y IN '(A B C) FOR Z = T COLLECT Y) EQUAL-OK: (A B C) (LOOP FOR X = T FOR Y ACROSS '#(A B C) FOR Z = T COLLECT Y) EQUAL-OK: (A B C) (LOOP FOR X = T FOR Y IN NIL FOR Z = T COLLECT Y) EQL-OK: NIL (LOOP FOR X = T FOR Y ACROSS '#() FOR Z = T COLLECT Y) EQL-OK: NIL (SORT (LOOP FOR X = T FOR KEY BEING EACH HASH-KEY IN (MAKE-HT '((1 . 100) (2 . 200))) USING (HASH-VALUE VAL) FOR KEY+1 = (1+ KEY) FOR Z = T COLLECT (LIST KEY KEY+1 VAL)) #'< :KEY #'CAR) EQUAL-OK: ((1 2 100) (2 3 200)) (LOOP FOR I FROM 1 TO 0 COLLECT I) EQL-OK: NIL (SORT (LOOP FOR VAL BEING EACH HASH-VALUE IN (MAKE-HT '((1 . 100) (2 . 200))) COLLECT VAL) #'<) EQUAL-OK: (100 200) (SORT (LOOP FOR VAL BEING EACH HASH-VALUE IN (MAKE-HT '((1 . 100) (2 . 200))) FOR DERIV-VAL = (/ 1 VAL) COLLECT DERIV-VAL) #'<) EQUAL-OK: (1/200 1/100) (LET ((I 123456789)) (LOOP FOR I ACROSS '#(1 2 3 4 5 6) COLLECT I) (LOOP FOR I IN '(1 2 3 4 5 6) COLLECT I) (LOOP FOR I BEING EACH HASH-KEY OF (MAKE-HT '((1 . 100) (2 . 200))) COLLECT I) (LOOP FOR I BEING EACH PRESENT-SYMBOL OF *PACKAGE* COLLECT I) I) EQL-OK: 123456789 (LOOP FOR X ON '(3 4 5) FOR Y = (CAR X) FOR Z IN '(A B C) COLLECT Z) EQUAL-OK: (A B C) (LOOP FOR X ACROSS '#(3 4 5) FOR Y = (1+ X) FOR Z ACROSS '#(A B C) COLLECT (LIST X Y Z)) EQUAL-OK: ((3 4 A) (4 5 B) (5 6 C)) (LOOP FOR X ACROSS '#() FOR Y = X FOR Z ACROSS '#(A B C) COLLECT (LIST X Y Z)) EQL-OK: NIL (LOOP FOR X ACROSS '#(1 2 3) FOR Y = X FOR Z ACROSS '#() COLLECT (LIST X Y Z)) EQL-OK: NIL (LOOP FOR X ACROSS '#(1 2 3) FOR Y = (1+ X) FOR Z ACROSS '#(A B) COLLECT (LIST X Y Z)) EQUAL-OK: ((1 2 A) (2 3 B)) (LOOP FOR X ACROSS '#(1 2) FOR Y = (1+ X) FOR Z ACROSS '#(A B C) COLLECT (LIST X Y Z)) EQUAL-OK: ((1 2 A) (2 3 B)) (LET ((PACKAGE (MAKE-PACKAGE "LOOP-TEST"))) (INTERN "blah" PACKAGE) (LET ((BLAH2 (INTERN "blah2" PACKAGE))) (EXPORT BLAH2 PACKAGE)) (LIST (SORT (LOOP FOR SYM BEING EACH PRESENT-SYMBOL OF PACKAGE FOR SYM-NAME = (SYMBOL-NAME SYM) COLLECT SYM-NAME) #'STRING<) (SORT (LOOP FOR SYM BEING EACH EXTERNAL-SYMBOL OF PACKAGE FOR SYM-NAME = (SYMBOL-NAME SYM) COLLECT SYM-NAME) #'STRING<))) EQUAL-OK: (("blah" "blah2") ("blah2")) (LET ((HT (MAKE-HASH-TABLE))) (LOOP FOR KEY BEING EACH HASH-KEY OF HT FOR VALUE = (GETHASH KEY HT) COLLECT (LIST KEY VALUE))) EQL-OK: NIL (LET ((HT (MAKE-HASH-TABLE))) (LOOP FOR DUMMY = (+ 1 2) FOR KEY BEING EACH HASH-KEY OF HT COLLECT (LIST KEY))) EQL-OK: NIL (LET ((LIST '(1 2 3))) (LOOP FOR X IN LIST AND Y = NIL THEN X COLLECT (LIST X Y))) EQUAL-OK: ((1 NIL) (2 1) (3 2)) (LET ((LIST '(1 2 3))) (LOOP FOR X IN LIST FOR Y = NIL THEN X COLLECT (LIST X Y))) EQUAL-OK: ((1 NIL) (2 2) (3 3)) (LET ((LIST '(1 2 3))) (LOOP FOR X IN LIST FOR Y = NIL THEN X AND Z = NIL THEN Y COLLECT (LIST X Y Z))) EQUAL-OK: ((1 NIL NIL) (2 2 NIL) (3 3 2)) (LOOP REPEAT 4 FOR X = (+ 1 1) COLLECT X) WARNING: LOOP: FOR clauses should occur before the loop's main body EQUAL-OK: (2 2 2 2) (LET ((X 1)) (LOOP FOR I FROM X BY (INCF X) TO 10 COLLECT I)) EQUAL-OK: (1 3 5 7 9) (LET ((X 1)) (LOOP FOR I BY (INCF X) FROM X TO 10 COLLECT I)) EQUAL-OK: (2 4 6 8 10) (LOOP FOR I FROM 1 TO 5 COLLECT I INTO C COLLECT (COPY-LIST C)) EQUAL-OK: ((1) (1 2) (1 2 3) (1 2 3 4) (1 2 3 4 5)) (LET ((REM 55)) (LOOP FOR I BELOW 3 WITH NUM = (* 10 REM) AND REM COLLECT REM)) EQUAL-OK: (NIL NIL NIL) (PROGN (DELETE-PACKAGE "LOOP-TEST") T) EQL-OK: T (UNWIND-PROTECT (LET ((*PACKAGE* (MAKE-PACKAGE "LOOP-TEST-PACKAGE-1"))) (READ-FROM-STRING "(THIS IS A TEST)") (EXPORT (INTERN "THIS")) (SET-EXCLUSIVE-OR '("THIS" "IS" "A" "TEST") (LOOP FOR X BEING EACH PRESENT-SYMBOL COLLECT X) :TEST #'STRING=)) (DELETE-PACKAGE "LOOP-TEST-PACKAGE-1")) EQL-OK: NIL (LET ((ALIST '(1 2 3 4 5 6))) (LOOP FOR VALUE IN ALIST IF (ODDP VALUE) COLLECT VALUE INTO ALIST ELSE COLLECT VALUE INTO BLIST FINALLY (RETURN (LIST ALIST BLIST)))) EQUAL-OK: ((1 3 5) (2 4 6)) (LET ((*LOOP-ANSI* T)) (MACROEXPAND '(LOOP :FOR N :TO 2 :DO (PRINC N) :TEST))) [SIMPLE-SOURCE-PROGRAM-ERROR]: LOOP: syntax error after DO at :TEST in #1=(LOOP :FOR N :TO 2 :DO (PRINC N) :TEST) EQL-OK: ERROR (HANDLER-CASE (MACROEXPAND '(LOOP :FOR N :TO 2 :DO (PRINC N) :TEST)) (WARNING (W) (PRINC-ERROR W) 'WARNING)) [SIMPLE-WARNING]: LOOP: non-compound form :TEST after DO: permitted by CLtL2, forbidden by ANSI CL. EQL-OK: WARNING (LOOP :FOR X = 0 :THEN (1+ X) :FOR Y = (1+ X) :THEN (ASH Y 1) :FOR Z :ACROSS #(1 3 9 27 81 243) :FOR W = (+ X Y Z) :INITIALLY (ASSERT (ZEROP X)) :INITIALLY (ASSERT (= 2 W)) :UNTIL (>= W 100) :COLLECT W) EQUAL-OK: (2 6 15 38) (LET ((I 0)) (LOOP (INCF I) (IF (= I 3) (RETURN I)))) EQL-OK: 3 (LET ((I 0) (J 0)) (TAGBODY (LOOP (INCF J 3) (INCF I) (IF (= I 3) (GO EXIT))) EXIT) J) EQL-OK: 9 (LOOP FOR X FROM 1 TO 10 FOR Y = NIL THEN X COLLECT (LIST X Y)) EQUAL-OK: ((1 NIL) (2 2) (3 3) (4 4) (5 5) (6 6) (7 7) (8 8) (9 9) (10 10)) (LOOP FOR X FROM 1 TO 10 AND Y = NIL THEN X COLLECT (LIST X Y)) EQUAL-OK: ((1 NIL) (2 1) (3 2) (4 3) (5 4) (6 5) (7 6) (8 7) (9 8) (10 9)) (LOOP FOR X IN '(1 2 3) FOR Y IN '(4 5 6) SUM (* X Y) INTO Z FINALLY (RETURN (+ X Y Z))) EQL-OK: 41 (CDR (MULTIPLE-VALUE-LIST (COMPILE NIL (LAMBDA (X) (LOOP :WITH (A . B) = X :REPEAT 10 :FINALLY (PPRINT (LIST A B))))))) EQUAL-OK: (NIL NIL) (LET ((I 0)) (LOOP FOR NIL FROM 10 BELOW 15 COLLECT (INCF I))) EQUAL-OK: (1 2 3 4 5) (LOOP FOR NIL ON NIL DO (RETURN T)) EQL-OK: NIL (HANDLER-CASE (MACROEXPAND '(LOOP :FOR I :FROM 1 :TO 20 :SUM I :MAXIMIZE I)) (PROGRAM-ERROR (C) (PRINC-ERROR C) (VALUES '(CORRECT PROGRAM-ERROR)))) [SIMPLE-SOURCE-PROGRAM-ERROR]: #1=(LOOP :FOR I :FROM 1 :TO 20 :SUM I :MAXIMIZE I): variable #:ACCUNUM-VAR-481108 is used in incompatible clauses MAXIMIZE I and SUM I EQUAL-OK: (CORRECT PROGRAM-ERROR) (HANDLER-CASE (MACROEXPAND '(LOOP :FOR I :FROM 1 :TO 20 :SUM I :ALWAYS (EVENP I))) (PROGRAM-ERROR (C) (PRINC-ERROR C) (VALUES '(CORRECT PROGRAM-ERROR)))) [SIMPLE-SOURCE-PROGRAM-ERROR]: #1=(LOOP :FOR I :FROM 1 :TO 20 :SUM I :ALWAYS #2=(EVENP I)): ambiguous result: T from ALWAYS #2# #:ACCUNUM-VAR-481118 from SUM I EQUAL-OK: (CORRECT PROGRAM-ERROR) (HANDLER-CASE (MACROEXPAND '(LOOP :FOR I :DO (PRINT I))) (PROGRAM-ERROR (C) (PRINC-ERROR C) (VALUES '(CORRECT PROGRAM-ERROR)))) [SIMPLE-SOURCE-PROGRAM-ERROR]: LOOP: invalid keyword DO after FOR EQUAL-OK: (CORRECT PROGRAM-ERROR) (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP :INITIALLY (WRITE-CHAR #\a) :FOR CHAR :ACROSS "" :FOR CODE = (CHAR-CODE CHAR) :DO (PRINC CODE) :FINALLY (WRITE-CHAR #\b))) EQUAL-OK: "ab" (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP :INITIALLY (WRITE-CHAR #\a) :FOR CHAR :ACROSS "" :DO (WRITE-CHAR CHAR) :FINALLY (WRITE-CHAR #\b))) EQUAL-OK: "ab" (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP :INITIALLY (WRITE-CHAR #\a) :FOR CHAR :ACROSS "1" :FOR CODE = (CHAR-CODE CHAR) :DO (PRINC CODE) :FINALLY (WRITE-CHAR #\b))) EQUAL-OK: "a49b" (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (LOOP :INITIALLY (WRITE-CHAR #\a) :FOR CHAR :ACROSS "1" :DO (WRITE-CHAR CHAR) :FINALLY (WRITE-CHAR #\b))) EQUAL-OK: "a1b" (LET ((HT (MAKE-HT '((1 . 2))))) (LIST (LOOP FOR K BEING THE HASH-KEYS OF HT AS V BEING THE HASH-VALUES OF HT COUNT T) (LOOP FOR K BEING THE HASH-KEYS OF HT AS V BEING THE HASH-VALUES OF HT WITH UT = 3 COUNT T) (LOOP WITH UT = 3 FOR K BEING THE HASH-KEYS OF HT AS V BEING THE HASH-VALUES OF HT COUNT T) (LOOP FOR K BEING THE HASH-KEYS OF HT WITH UT = 3 AS V BEING THE HASH-VALUES OF HT COUNT T))) EQUAL-OK: (1 1 1 1) (LET ((HT (MAKE-HT '((1 . 2))))) (LIST (LOOP FOR K BEING THE HASH-KEYS OF HT USING (HASH-VALUES V) COUNT T) (LOOP FOR K BEING THE HASH-KEYS OF HT USING (HASH-VALUES V) WITH UT = 3 COUNT T) (LOOP WITH UT = 3 FOR K BEING THE HASH-KEYS OF HT USING (HASH-VALUES V) COUNT T))) EQUAL-OK: (1 1 1) (LET ((VARS '(1 2 3))) (LOOP FOR VARS ON VARS COLLECT VARS)) WARNING: Reference to VARS is implementation-dependent, per ANSI CL 6.1.1.4. EQUAL-OK: ((1 2 3) (2 3) (3)) (LET ((VARS '(1 2 3))) (LOOP FOR I FROM 0 TO 10 FOR VARS ON VARS COLLECT VARS)) WARNING: Reference to VARS is implementation-dependent, per ANSI CL 6.1.1.4. EQL-OK: NIL (LET ((X '(1 2 3)) (Y '(A B C)) (Z #(7 8 9))) (LOOP REPEAT 100 FOR X ON X FOR Y IN Y FOR Z ACROSS Z COLLECT (LIST X Y Z))) WARNING: LOOP: FOR clauses should occur before the loop's main body WARNING: LOOP: FOR clauses should occur before the loop's main body WARNING: LOOP: FOR clauses should occur before the loop's main body WARNING: Reference to X is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: Reference to Y is implementation-dependent, per ANSI CL 6.1.1.4. WARNING: Reference to Z is implementation-dependent, per ANSI CL 6.1.1.4. EQL-OK: NIL (LET ((X '((1 2 3) (1 2)))) (LOOP REPEAT 3 FOR X IN X FOR Y IN X COLLECT Y)) WARNING: LOOP: FOR clauses should occur before the loop's main body WARNING: LOOP: FOR clauses should occur before the loop's main body WARNING: Reference to X is implementation-dependent, per ANSI CL 6.1.1.4. EQL-OK: NIL (LET ((X '(A B C D)) Y) (LIST (LOOP REPEAT 2 FOR X IN X COLLECT X FINALLY (SETQ Y X)) Y)) WARNING: LOOP: FOR clauses should occur before the loop's main body WARNING: Reference to X is implementation-dependent, per ANSI CL 6.1.1.4. EQUAL-OK: (NIL NIL) (LET ((A (MAKE-HT '((10 . 100) (20 . 200) (30 . 300))))) (SORT (LOOP REPEAT 100 FOR A BEING THE HASH-KEYS OF A COLLECT A) #'<)) WARNING: LOOP: FOR clauses should occur before the loop's main body WARNING: Reference to A is implementation-dependent, per ANSI CL 6.1.1.4. [SIMPLE-TYPE-ERROR]: SYSTEM::HASH-TABLE-ITERATOR: argument NIL is not a hash table EQL-OK: ERROR (LOOP FOR C FROM 0 TO 1 FOR I ON '(1 2 3 4 5) FINALLY (RETURN I)) EQUAL-OK: (3 4 5) (LOOP FOR C FROM 0 TO 1 FOR I = '(1 2 3 4 5) THEN (CDR I) FINALLY (RETURN I)) EQUAL-OK: (2 3 4 5) (LET (RES) (LIST (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (SETQ RES (LOOP FOR X ACROSS "abc" AND Z ON (LIST 1) DO (PRINC X) FINALLY (RETURN (CONS X Z))))) RES)) EQUAL-OK: ("a" (#\b)) (LET (RES) (LIST (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (SETQ RES (LOOP FOR X ACROSS "abc" FOR Z ON (LIST 1) DO (PRINC X) FINALLY (RETURN (CONS X Z))))) RES)) EQUAL-OK: ("a" (#\b)) (LOOP FOR X ACROSS #((1 2 3) (4 5 6) (7 8 9)) AND Z = NIL THEN X FINALLY (RETURN (LIST :X X :Z Z))) EQUAL-OK: (:X (7 8 9) :Z (7 8 9)) (LOOP FOR X ACROSS #((1 2 3) (4 5 6) (7 8 9)) FOR Z = NIL THEN X FINALLY (RETURN (LIST :X X :Z Z))) EQUAL-OK: (:X (7 8 9) :Z (7 8 9)) (LOOP FOR C FROM 0 TO 1 FOR (FIRST . REST) ON '(1 2 3 4 5) FINALLY (RETURN (LIST :FIRST FIRST :REST REST))) EQUAL-OK: (:FIRST 2 :REST (3 4 5)) (LOOP FOR C FROM 0 TO 1 FOR LIST ON '(1 2 3 4 5) FOR (FIRST . REST) = LIST FINALLY (RETURN (LIST :LIST LIST :FIRST FIRST :REST REST))) EQUAL-OK: (:LIST (2 3 4 5) :FIRST 2 :REST (3 4 5)) (LET ((LIST '(1 2 3))) (LOOP FOR LIST = LIST THEN (CDR LIST) UNTIL (NULL LIST) COLLECT (CAR LIST))) EQL-OK: NIL (LOOP WITH V = #(1 2) FOR X ACROSS V SUM X) EQL-OK: 3 (HANDLER-CASE (MACROEXPAND '(LOOP REPEAT 0 FOR E = 7 THEN A FINALLY (RETURN E))) (WARNING (W) (PRINC-ERROR W) 'WARNING)) [SIMPLE-WARNING]: LOOP: FOR clauses should occur before the loop's main body EQL-OK: WARNING (LET ((*LOOP-ANSI* T)) (HANDLER-CASE (MACROEXPAND '(LOOP FOR A IN NIL DO (X) (Y) Z (T))) (SOURCE-PROGRAM-ERROR (C) (PRINC-ERROR C) (SOURCE-PROGRAM-ERROR-DETAIL C)))) [SIMPLE-SOURCE-PROGRAM-ERROR]: LOOP: syntax error after DO at Z in #1=(LOOP FOR A IN NIL DO (X) (Y) Z (T)) EQUAL-OK: (DO Z) (HANDLER-CASE (MACROEXPAND '(LOOP NAMED "named")) (SOURCE-PROGRAM-ERROR (C) (PRINC-ERROR C) (SOURCE-PROGRAM-ERROR-DETAIL C))) [SIMPLE-SOURCE-PROGRAM-ERROR]: LOOP: syntax error after NAMED at "named" in #1=(LOOP NAMED #2="named") EQUAL-OK: (SYSTEM::NAMED "named") (HANDLER-CASE (MACROEXPAND '(LOOP NAMED)) (SOURCE-PROGRAM-ERROR (C) (PRINC-ERROR C) (SOURCE-PROGRAM-ERROR-DETAIL C))) [SIMPLE-SOURCE-PROGRAM-ERROR]: LOOP: syntax error after NAMED at end of form in #1=(LOOP NAMED) EQUAL-OK: (SYSTEM::NAMED NIL) (HANDLER-CASE (MACROEXPAND '(LOOP FOR A IN NIL COLLECT A INTO #())) (SOURCE-PROGRAM-ERROR (C) (PRINC-ERROR C) (SOURCE-PROGRAM-ERROR-DETAIL C))) [SIMPLE-SOURCE-PROGRAM-ERROR]: LOOP: syntax error after INTO at #() in #1=(LOOP FOR A IN NIL COLLECT A INTO #2=#()) EQUALP-OK: (SYSTEM::INTO #()) (DEFUN FIND-IN-TREE (TREE ATOM) (AND (CONSP TREE) (IF (EQ ATOM (CAR TREE)) TREE (OR (FIND-IN-TREE (CAR TREE) ATOM) (FIND-IN-TREE (CDR TREE) ATOM))))) EQL-OK: FIND-IN-TREE (FIND-IN-TREE (MACROEXPAND-1 '(LOOP FOR (I J K) OF-TYPE (FIXNUM NIL FLOAT) ACROSS #())) 'DECLARE) EQUAL-OK: (DECLARE (TYPE FIXNUM I) (TYPE FLOAT K)) (LOOP FOR NIL ON '(1 2 . 3) COUNT T) EQL-OK: 2 (LOOP WITH NIL = (RETURN T) RETURN NIL) EQL-OK: T (LOOP WITH A = 42 WITH NIL = (RETURN A) RETURN T) EQL-OK: 42 (LOOP WITH A = 1 WITH NIL = (INCF A) WITH NIL = (RETURN A) RETURN NIL) EQL-OK: 2 (LOOP FOR (A1 B1 C1) (INTEGER INTEGER FLOAT) IN '((1 2 3.4) (5 6 7.8) (9 10 1.1)) FOR (A2 B2 C2) FLOAT IN '((1.2 1.3 1.4) (1.5 1.6 1.7) (1.8 1.9 2.0)) FOR ((A3 . B3) (C3 . D3)) OF-TYPE ((FLOAT . FLOAT) (INTEGER . INTEGER)) IN '(((2.1 . 2.2) (23 . 24)) ((2.5 . 2.6) (27 . 28)) ((2.9 . 3.0) (31 . 32))) COLLECT (LIST A1 B1 C1 A2 B2 C2 A3 B3 C3 D3)) WARNING: LOOP: After (A1 B1 C1), (INTEGER INTEGER FLOAT) is interpreted as a type specification EQUAL-OK: ((1 2 3.4 1.2 1.3 1.4 2.1 2.2 23 24) (5 6 7.8 1.5 1.6 1.7 2.5 2.6 27 28) (9 10 1.1 1.8 1.9 2.0 2.9 3.0 31 32)) (SYMBOLS-CLEANUP '(MOUNTAIN DESERT MAKE-HT)) EQL-OK: NIL RUN-TEST: finished "loop" (0 errors out of 178 tests) RUN-TEST: started # (AND (MACRO-FUNCTION 'PUSH) T) EQL-OK: T (AND (MACRO-FUNCTION 'MEMBER) T) EQL-OK: NIL (DEFMACRO ARITHMETIC-IF (TEST NEG-FORM ZERO-FORM POS-FORM) (LET ((VAR (GENSYM))) `(LET ((,VAR ,TEST)) (COND ((< ,VAR 0) ,NEG-FORM) ((= ,VAR 0) ,ZERO-FORM) (T ,POS-FORM))))) EQL-OK: ARITHMETIC-IF (AND (MACRO-FUNCTION 'ARITHMETIC-IF) T) EQL-OK: T (SETF X 8) EQL-OK: 8 (ARITHMETIC-IF (- X 4) (- X) (LIST "ZERO") X) EQL-OK: 8 (SETF X 4) EQL-OK: 4 (ARITHMETIC-IF (- X 4) (- X) (LIST "ZERO") X) EQUAL-OK: ("ZERO") (SETF X 3) EQL-OK: 3 (ARITHMETIC-IF (- X 4) (- X) (LIST "ZERO") X) EQL-OK: -3 (DEFMACRO ARITHMETIC-IF (TEST NEG-FORM &OPTIONAL ZERO-FORM POS-FORM) (LET ((VAR (GENSYM))) `(LET ((,VAR ,TEST)) (COND ((< ,VAR 0) ,NEG-FORM) ((= ,VAR 0) ,ZERO-FORM) (T ,POS-FORM))))) EQL-OK: ARITHMETIC-IF (SETF X 8) EQL-OK: 8 (ARITHMETIC-IF (- X 4) (- X)) EQL-OK: NIL (SETF X 4) EQL-OK: 4 (ARITHMETIC-IF (- X 4) (- X)) EQL-OK: NIL (SETF X 3) EQL-OK: 3 (ARITHMETIC-IF (- X 4) (- X)) EQL-OK: -3 (DEFMACRO HALIBUT ((MOUTH EYE1 EYE2) ((FIN1 LENGTH1) (FIN2 LENGTH2)) TAIL) `(LIST ,MOUTH ,EYE1 ,EYE2 ,FIN1 ,LENGTH1 ,FIN2 ,LENGTH2 ,TAIL)) EQL-OK: HALIBUT (SETF M 'RED-MOUTH EYES '(LEFT-EYE . RIGHT-EYE) F1 '(1 2 3 4 5) F2 '(6 7 8 9 0) MY-FAVORITE-TAIL '(LIST OF ALL PARTS OF TAIL)) EQUAL-OK: (LIST OF ALL PARTS OF TAIL) (HALIBUT (M (CAR EYES) (CDR EYES)) ((F1 (LENGTH F1)) (F2 (LENGTH F2))) MY-FAVORITE-TAIL) EQUAL-OK: (RED-MOUTH LEFT-EYE RIGHT-EYE (1 2 3 4 5) 5 (6 7 8 9 0) 5 (LIST OF ALL PARTS OF TAIL)) (ECASE 'OTHERWISE (OTHERWISE 4)) WARNING: OTHERWISE used as a key in (OTHERWISE 4), it would be better to use parentheses. EQL-OK: 4 (MACROLET ((FOO (&ENVIRONMENT ENV) (IF (MACRO-FUNCTION 'BAR ENV) ''YES ''NO))) (LIST (FOO) (MACROLET ((BAR NIL :BEEP)) (FOO)))) EQUAL-OK: (NO YES) (MACROLET ((%M (NIL) :GOOD)) (%M NIL)) EQL-OK: :GOOD (MACROLET ((%M (NIL) :GOOD)) (%M 10)) [SIMPLE-SOURCE-PROGRAM-ERROR]: %M: 10 does not match lambda list element () EQL-OK: ERROR (DEFINE-COMPILER-MACRO TESTP NIL '(PROGN 2)) EQL-OK: TESTP (DEFUN TESTP NIL 'B) EQL-OK: TESTP (LOCALLY (DECLARE (NOTINLINE TESTP)) (DEFUN TEST11 NIL (TESTP))) EQL-OK: TEST11 (TEST11) EQL-OK: B (DEFUN TEST11 NIL (TESTP)) EQL-OK: TEST11 (COMPILE 'TEST11) EQL-OK: TEST11 (TEST11) EQL-OK: 2 (DEFINE-COMPILER-MACRO TESTC NIL ''A) EQL-OK: TESTC (DEFUN TESTC NIL 'B) EQL-OK: TESTC (LOCALLY (DECLARE (NOTINLINE TESTC)) (DEFUN TEST6 NIL (TESTC))) EQL-OK: TEST6 (TEST6) EQL-OK: B (DEFUN TEST6 NIL (TESTC)) EQL-OK: TEST6 (COMPILE 'TEST6) EQL-OK: TEST6 (TEST6) EQL-OK: A (DEFINE-COMPILER-MACRO TESTW NIL ''#(A 3)) EQL-OK: TESTW (DEFUN TESTW NIL 'B) EQL-OK: TESTW (LOCALLY (DECLARE (NOTINLINE TESTW)) (DEFUN TEST9 NIL (TESTW))) EQL-OK: TEST9 (TEST9) EQL-OK: B (DEFUN TEST9 NIL (TESTW)) EQL-OK: TEST9 (COMPILE 'TEST9) EQL-OK: TEST9 (TEST9) EQUALP-OK: #(A 3) (DEFINE-COMPILER-MACRO TESTF NIL '#'PRINT) EQL-OK: TESTF (DEFUN TESTF NIL 'B) EQL-OK: TESTF (LOCALLY (DECLARE (NOTINLINE TESTF)) (DEFUN TEST10 NIL (TESTF))) EQL-OK: TEST10 (TEST10) EQL-OK: B (DEFUN TEST10 NIL (TESTF)) EQL-OK: TEST10 (COMPILE 'TEST10) EQL-OK: TEST10 (TEST10) EQL-OK: # (DEFINE-COMPILER-MACRO TESTP NIL '(PROGN (PRINT 'A) 2)) EQL-OK: TESTP (DEFUN TESTP NIL 'B) EQL-OK: TESTP (LOCALLY (DECLARE (NOTINLINE TESTP)) (DEFUN TEST11 NIL (TESTP))) EQL-OK: TEST11 (TEST11) EQL-OK: B (DEFUN TEST11 NIL (TESTP)) EQL-OK: TEST11 (COMPILE 'TEST11) EQL-OK: TEST11 (TEST11) A EQL-OK: 2 (PROGN (DEFMACRO TEST12 NIL `(LET NIL (EVAL-WHEN (COMPILE) (PRINT "compiling")))) (DEFINE-COMPILER-MACRO TEST12 NIL (PRINC "Optimizing-") '((LAMBDA (X) (PRINC X)) 123)) (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (FUNCALL (LAMBDA NIL (DECLARE (COMPILE)) (TEST12))))) EQUAL-OK: "Optimizing-123" (LET* ((F '(LOCALLY (DECLARE (OPTIMIZE SAFETY ABAZONK (DEBUG 20))) (+ 3 4))) (C (COPY-TREE F))) (LIST (EVAL F) (EQUAL F C))) EQUAL-OK: (7 T) (DEFUN TEST-COMPILER (LAMBDA-EXPRESSION &REST ARGS) (LET ((RET-I (APPLY LAMBDA-EXPRESSION ARGS)) (RET-C (APPLY (COMPILE NIL LAMBDA-EXPRESSION) ARGS))) (LIST (EQUAL RET-I RET-C) RET-I RET-C))) EQL-OK: TEST-COMPILER (TEST-COMPILER (LAMBDA NIL (BLOCK TEST12 (FLET ((TEST12-O NIL (FLET ((TEST12-I NIL (RETURN-FROM TEST12 NIL))) (TEST12-I)))) (TEST12-O))))) EQUAL-OK: (T NIL NIL) (PROGN (DEFUN STEM (&KEY (OBJ (ERROR "missing OBJ"))) (WITH-OPEN-FILE (STREAM OBJ :DIRECTION :OUTPUT) (TRUENAME STREAM))) (COMPILE 'STEM) (DELETE-FILE (STEM :OBJ "lambda-tst-foo-bar-zot")) T) EQL-OK: T (DEFPARAMETER X 1) EQL-OK: X (DEFUN TEST-KEY NIL (FIND 1 #(0 1 2 3) :TEST #'= :TEST (INCF X))) EQL-OK: TEST-KEY (TEST-KEY) EQL-OK: 1 X EQL-OK: 2 (COMPILE 'TEST-KEY) WARNING: in TEST-KEY : FIND: ignored duplicate keyword :TEST (INCF X) EQL-OK: TEST-KEY (TEST-KEY) EQL-OK: 1 X EQL-OK: 3 (DESTRUCTURING-BIND ((A &OPTIONAL (B 'BEE)) ONE TWO THREE) `((ALPHA) 1 2 3) (LIST A B THREE TWO ONE)) EQUAL-OK: (ALPHA BEE 3 2 1) (DEFMACRO FOO (&KEY ((KEY VAR))) `(LIST ',VAR)) EQL-OK: FOO (FOO KEY 42) EQUAL-OK: (42) (DEFUN FOO (&KEY ((KEY VAR))) `(LIST ',VAR)) EQL-OK: FOO (FOO 'KEY 42) EQUAL-OK: (LIST '42) (FMAKUNBOUND 'FOO) EQL-OK: FOO (DEFMACRO M (&KEY (X X)) `,X) EQL-OK: M (M) EQL-OK: 3 (DESTRUCTURING-BIND (&KEY (X X)) NIL X) EQL-OK: 3 (DESTRUCTURING-BIND (&WHOLE (A . B) C . D) '(1 . 2) (LIST A B C D)) EQUAL-OK: (1 2 1 2) (DESTRUCTURING-BIND (NIL A B) (LIST NIL 2 3) (+ A B)) EQL-OK: 5 (DESTRUCTURING-BIND (X . Y) '(1 . 10) (LIST X Y)) EQUAL-OK: (1 10) (MACROLET ((%M (&WHOLE (M A B) C D) `'(,M ,A ,B ,C ,D))) (%M 1 2)) EQUAL-OK: (%M 1 2 1 2) (MACROLET ((%M (&KEY ((:A (B C)))) `'(,C ,B))) (%M :A (1 2))) EQUAL-OK: (2 1) (MACROLET ((%M (&KEY ((:A (B C)) '(3 4))) `'(,C ,B))) (LIST (%M :A (1 2)) (%M :A (1 2) :A (10 11)) (%M))) EQUAL-OK: ((2 1) (2 1) (4 3)) (MACROLET ((%M (&KEY ((:A (B C)) '(3 4) A-P)) `'(,A-P ,C ,B))) (LIST (%M :A (1 2)) (%M :A (1 2) :A (10 11)) (%M))) EQUAL-OK: ((T 2 1) (T 2 1) (NIL 4 3)) (MACROLET ((%M (&KEY A B C) `'(,A ,B ,C))) (LIST (%M :ALLOW-OTHER-KEYS NIL) (%M :A 1 :ALLOW-OTHER-KEYS NIL) (%M :ALLOW-OTHER-KEYS T) (%M :ALLOW-OTHER-KEYS T :ALLOW-OTHER-KEYS NIL :FOO T) (%M :ALLOW-OTHER-KEYS T :C 1 :B 2 :A 3) (%M :C 1 :B 2 :A 3 :ALLOW-OTHER-KEYS T) (%M :ALLOW-OTHER-KEYS NIL :C 1 :B 2 :A 3))) EQUAL-OK: ((NIL NIL NIL) (1 NIL NIL) (NIL NIL NIL) (NIL NIL NIL) (3 2 1) (3 2 1) (3 2 1)) (DEFMACRO ALPHA (X Y) `(BETA ,X ,Y)) EQL-OK: ALPHA (DEFMACRO BETA (X Y) `(GAMMA ,X ,Y)) EQL-OK: BETA (DEFMACRO DELTA (X Y) `(GAMMA ,X ,Y)) EQL-OK: DELTA (DEFMACRO MEXPAND (FORM &ENVIRONMENT ENV) (MULTIPLE-VALUE-BIND (EXPANSION EXPANDED-P) (MACROEXPAND FORM ENV) `(LIST ',EXPANSION ',EXPANDED-P))) EQL-OK: MEXPAND (DEFMACRO MEXPAND-1 (FORM &ENVIRONMENT ENV) (MULTIPLE-VALUE-BIND (EXPANSION EXPANDED-P) (MACROEXPAND-1 FORM ENV) `(LIST ',EXPANSION ',EXPANDED-P))) EQL-OK: MEXPAND-1 (DEFUN FEXPAND (FORM &OPTIONAL ENV) (MULTIPLE-VALUE-LIST (MACROEXPAND FORM ENV))) EQL-OK: FEXPAND (DEFUN FEXPAND-1 (FORM &OPTIONAL ENV) (MULTIPLE-VALUE-LIST (MACROEXPAND-1 FORM ENV))) EQL-OK: FEXPAND-1 (FEXPAND-1 '(ALPHA A B)) EQUAL-OK: ((BETA A B) T) (MEXPAND-1 (ALPHA A B)) EQUAL-OK: ((BETA A B) T) (FEXPAND '(ALPHA A B)) EQUAL-OK: ((GAMMA A B) T) (MEXPAND (ALPHA A B)) EQUAL-OK: ((GAMMA A B) T) (FEXPAND-1 'NOT-A-MACRO) EQUAL-OK: (NOT-A-MACRO NIL) (MEXPAND-1 NOT-A-MACRO) EQUAL-OK: (NOT-A-MACRO NIL) (FEXPAND '(NOT-A-MACRO A B)) EQUAL-OK: ((NOT-A-MACRO A B) NIL) (MEXPAND (NOT-A-MACRO A B)) EQUAL-OK: ((NOT-A-MACRO A B) NIL) (MACROLET ((ALPHA (X Y) `(DELTA ,X ,Y))) (FEXPAND-1 '(ALPHA A B))) EQUAL-OK: ((BETA A B) T) (MACROLET ((ALPHA (X Y) `(DELTA ,X ,Y))) (MEXPAND-1 (ALPHA A B))) EQUAL-OK: ((DELTA A B) T) (MACROLET ((ALPHA (X Y) `(DELTA ,X ,Y))) (FEXPAND '(ALPHA A B))) EQUAL-OK: ((GAMMA A B) T) (MACROLET ((ALPHA (X Y) `(DELTA ,X ,Y))) (MEXPAND (ALPHA A B))) EQUAL-OK: ((GAMMA A B) T) (MACROLET ((BETA (X Y) `(EPSILON ,X ,Y))) (MEXPAND (ALPHA A B))) EQUAL-OK: ((EPSILON A B) T) (LET ((X (LIST 1 2 3))) (SYMBOL-MACROLET ((A-SM (FIRST X))) (MEXPAND A-SM))) EQUAL-OK: ((FIRST X) T) (LET ((X (LIST 1 2 3))) (SYMBOL-MACROLET ((A-SM (FIRST X))) (FEXPAND 'A-SM))) EQUAL-OK: (A-SM NIL) (SYMBOL-MACROLET ((B-SM (ALPHA X Y))) (MEXPAND-1 B-SM)) EQUAL-OK: ((ALPHA X Y) T) (SYMBOL-MACROLET ((B-SM (ALPHA X Y))) (MEXPAND B-SM)) EQUAL-OK: ((GAMMA X Y) T) (SYMBOL-MACROLET ((B-SM (ALPHA X Y)) (A-SM B-SM)) (MEXPAND-1 A-SM)) EQUAL-OK: (B-SM T) (SYMBOL-MACROLET ((B-SM (ALPHA X Y)) (A-SM B-SM)) (MEXPAND A-SM)) EQUAL-OK: ((GAMMA X Y) T) (FLET ((BETA (X Y) (+ X Y))) (MEXPAND (ALPHA A B))) EQUAL-OK: ((BETA A B) T) (MACROLET ((ALPHA (X Y) `(DELTA ,X ,Y))) (FLET ((ALPHA (X Y) (+ X Y))) (MEXPAND (ALPHA A B)))) EQUAL-OK: ((ALPHA A B) NIL) (LET ((X (LIST 1 2 3))) (SYMBOL-MACROLET ((A-SM (FIRST X))) (LET ((A-SM X)) (MEXPAND A-SM)))) EQUAL-OK: (A-SM NIL) (SYMBOL-MACROLET ((FOO 12)) (MACROLET ((BAR (X) `(+ ,X ,(1+ FOO)))) (BAR 10))) EQL-OK: 23 (SYMBOL-MACROLET ((FOO 12)) (MACROLET ((BAR (X) (+ X FOO))) (BAR 10))) EQL-OK: 22 (LET ((F (GENSYM "FUNC-")) (A (GENSYM "A-")) (B (GENSYM "B-"))) (EVAL `(DEFUN ,F NIL (LET ((,A 1) (,B 2)) (SYMBOL-MACROLET ((,A 5)) (SYMBOL-MACROLET ((,B ,A)) ,B))))) (FUNCALL F)) EQL-OK: 5 (LET ((F (GENSYM "FUNC-")) (A (GENSYM "A-")) (B (GENSYM "B-"))) (EVAL `(PROGN (DEFVAR ,A 2) (SETQ ,B 3) (DEFUN ,F NIL ,B) (COMPILE ',F) (DEFINE-SYMBOL-MACRO ,B ,A) (,F)))) WARNING: in #:FUNC-481399 : #:B-481401 is neither declared nor bound, it will be treated as if it were declared SPECIAL. EQL-OK: 3 (PROGN (DEFINE-SYMBOL-MACRO FOO137 (SYMBOL-VALUE 'FOO137)) (SETQ FOO137 73) FOO137) EQL-OK: 73 (PROGN (DEFINE-SYMBOL-MACRO FOO138 (ERROR "should not occur")) (DOLIST (X (SYMBOL-PLIST 'FOO138)) (ATOM X))) EQL-OK: NIL (PROGN (DEFINE-SYMBOL-MACRO FOO139 1) (APPEASE-CERRORS (DEFVAR FOO139 T)) FOO139) WARNING: PROCLAIM: attempting to turn FOO139 into a SPECIAL variable, but it is already a global SYMBOL-MACRO. Remove the global SYMBOL-MACRO definition EQL-OK: T (PROGN (DEFINE-SYMBOL-MACRO FOO140 1) (APPEASE-CERRORS (DEFCONSTANT FOO140 T)) FOO140) WARNING: SYSTEM::%PROCLAIM-CONSTANT: attempting to turn FOO140 into a constant, but it is already a global SYMBOL-MACRO. Remove the global SYMBOL-MACRO definition EQL-OK: T (LET ((S (MAKE-SYMBOL "FOO141"))) (EVAL `(DEFINE-SYMBOL-MACRO ,S T)) (APPEASE-CERRORS (IMPORT S "KEYWORD")) (EQ S (SYMBOL-VALUE S))) WARNING: IMPORT: interning #:FOO141 into the KEYWORD package would turn it into a constant, but it is already a global SYMBOL-MACRO. Remove the global SYMBOL-MACRO definition EQL-OK: T (PROGN (DEFVAR FOO142 1) (APPEASE-CERRORS (DEFINE-SYMBOL-MACRO FOO142 T)) FOO142) WARNING: SYSTEM::%PROCLAIM-SYMBOL-MACRO: the symbol FOO142 names a global SPECIAL variable Remove the global SPECIAL variable binding EQL-OK: T (LET ((S (DEFINE-SYMBOL-MACRO FOO143 T))) (IMPORT S "KEYWORD") (EVAL S)) EQL-OK: T (DEFPARAMETER *MY-TYPEOF-COUNTER* 0) EQL-OK: *MY-TYPEOF-COUNTER* (DEFMACRO MY-TYPEOF (PLACE &ENVIRONMENT ENV) (LET ((EXP-PLACE (MACROEXPAND PLACE ENV))) (UNLESS (AND (CONSP EXP-PLACE) (EQ (CAR EXP-PLACE) 'FOREIGN-VALUE)) (ERROR "MY-TYPEOF not upon a place: ~S" EXP-PLACE)) (INCF *MY-TYPEOF-COUNTER*) (SECOND EXP-PLACE))) EQL-OK: MY-TYPEOF (DEFMACRO WITH-VAR ((VAR FVAR) &BODY BODY) (LET ((FV (GENSYM (SYMBOL-NAME VAR)))) `(LET ((,FV ,FVAR)) (SYMBOL-MACROLET ((,VAR (FOREIGN-VALUE ,FV))) ,@BODY)))) EQL-OK: WITH-VAR (WITH-VAR (MY-VAR "fake variable") (MY-TYPEOF MY-VAR)) EQUAL-OK: "fake variable" *MY-TYPEOF-COUNTER* EQL-OK: 1 (FUNCALL (LAMBDA NIL (DECLARE (COMPILE)) (WITH-VAR (MY-VAR "fake variable") (MY-TYPEOF MY-VAR)))) EQUAL-OK: "fake variable" *MY-TYPEOF-COUNTER* EQL-OK: 2 (DEFMACRO MY-MAC (&OPTIONAL (X (ERROR "missing arg")) &KEY (Y (ERROR "missing arg"))) `'(,X ,Y)) EQL-OK: MY-MAC (MY-MAC 1 :Y 10) EQUAL-OK: (1 10) (DEFMACRO MY-MAC (&KEY (B T)) (IF B 'C 'D)) EQL-OK: MY-MAC (MACROEXPAND '(MY-MAC)) EQL-OK: C (MACROEXPAND '(MY-MAC :B NIL)) EQL-OK: D (DEFMACRO MY-MAC (&KEY (A T B)) `(,A ,B)) EQL-OK: MY-MAC (MACROEXPAND '(MY-MAC :A 1)) EQUAL-OK: (1 T) (MACROEXPAND '(MY-MAC)) EQUAL-OK: (T NIL) (DEFMACRO DM1A (&WHOLE X) `',X) EQL-OK: DM1A (MACROEXPAND '(DM1A)) EQUAL-OK: '(DM1A) (DEFMACRO DM1B (&WHOLE X A &OPTIONAL B) `'(,X ,A ,B)) EQL-OK: DM1B (MACROEXPAND '(DM1B Q)) EQUAL-OK: '((DM1B Q) Q NIL) (MACROEXPAND '(DM1B Q R)) EQUAL-OK: '((DM1B Q R) Q R) (DEFMACRO DM2A (&WHOLE FORM A B) `'(FORM ,FORM A ,A B ,B)) EQL-OK: DM2A (MACROEXPAND '(DM2A X Y)) EQUAL-OK: '(FORM (DM2A X Y) A X B Y) (DM2A X Y) EQUAL-OK: (FORM (DM2A X Y) A X B Y) (DEFMACRO INCFQ (X) `(SETQ ,X (+ ,X 1))) EQL-OK: INCFQ (DEFMACRO DM2B (&WHOLE FORM A (&WHOLE B (C . D) &OPTIONAL (E 5)) &BODY F &ENVIRONMENT ENV) ``(,',FORM ,,A ,',B ,',(MACROEXPAND C ENV) ,',D ,',E ,',F)) EQL-OK: DM2B (DM2B :X1 (((INCFQ X2) X3 X4)) X5 X6) EQUAL-OK: ((DM2B :X1 (((INCFQ X2) X3 X4)) X5 X6) :X1 (((INCFQ X2) X3 X4)) (SETQ X2 (+ X2 1)) (X3 X4) 5 (X5 X6)) (LET ((X1 5)) (MACROLET ((SEGUNDO (X) `(CADR ,X))) (DM2B X1 (((SEGUNDO X2) X3 X4)) X5 X6))) EQUAL-OK: ((DM2B X1 (((SEGUNDO X2) X3 X4)) X5 X6) 5 (((SEGUNDO X2) X3 X4)) (CADR X2) (X3 X4) 5 (X5 X6)) (LOOP :FOR A :IN (FUNCALL (SYSTEM::COMPILE-FORM-IN-TOPLEVEL-ENVIRONMENT '(LIST (LIST #'EQUAL 2 2) (LIST #'EQUAL 2 3)))) :COLLECT (FUNCALL (CAR A) (CADR A) (CADDR A))) EQUAL-OK: (T NIL) (PROGN (DEFCLASS T1 NIL ((FOO :ACCESSOR FOO :INITFORM :FOO))) (LIST (FUNCALL (COMPILE NIL (LAMBDA NIL (TYPEP (MAKE-INSTANCE 'T1) 'T1)))) (FUNCALL (SYSTEM::COMPILE-FORM-IN-TOPLEVEL-ENVIRONMENT '(TYPEP (MAKE-INSTANCE 'T1) 'T1))))) EQUAL-OK: (T T) (PROGN (DECLAIM (NOTINLINE NOTINLINE-TEST-FUNC-1)) (DEFUN NOTINLINE-TEST-FUNC-1 (X) X) (COMPILE 'NOTINLINE-TEST-FUNC-1) (DEFUN NOTINLINE-TEST-FUNC-2 (X) (NOTINLINE-TEST-FUNC-1 X) X) (COMPILE 'NOTINLINE-TEST-FUNC-2) (DEFVAR *NOTINLINE-TEST-VAR* 10) (DEFUN NOTINLINE-TEST-FUNC-1 (X) (INCF *NOTINLINE-TEST-VAR* X)) (LIST (NOTINLINE-TEST-FUNC-2 12) *NOTINLINE-TEST-VAR*)) EQUAL-OK: (12 22) (LET ((FILE "macro8-tst-tmp.lisp")) (WITH-OPEN-FILE (O FILE :DIRECTION :OUTPUT) (WRITE-LINE "(defun caller (a b) (foo a b))" O) (WRITE-LINE "(defun foo (a b c) (list a b c))" O)) (UNWIND-PROTECT (PROGN (LOAD FILE :COMPILING T) (FOO 1 2 3)) (DELETE-FILE FILE))) ;; Loading file macro8-tst-tmp.lisp ... WARNING: in CALLER : FOO was called with 2 arguments, but it requires 1 argument. WARNING: DEFUN/DEFMACRO: redefining function FOO in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-tmp.lisp, was defined in top-level 0 errors, 1 warning ;; Loaded file macro8-tst-tmp.lisp EQUAL-OK: (1 2 3) (LET ((FILE1 "macro8-tst-tmp1.lisp") (FILE2 "macro8-tst-tmp2.lisp")) (WITH-OPEN-FILE (O FILE1 :DIRECTION :OUTPUT) (WRITE-LINE "(defun foo (a b c) (cons b c a))" O) (FORMAT O "(load ~S)~%" FILE2)) (WITH-OPEN-FILE (O FILE2 :DIRECTION :OUTPUT) (WRITE-LINE "(defun bar (a b) (sin (1+ a) (1- b a)))" O)) (UNWIND-PROTECT (PROGN (LOAD FILE1 :COMPILING T) (LIST (NOT (NULL (FBOUNDP 'FOO))) (NOT (NULL (FBOUNDP 'BAR))))) (DELETE-FILE FILE1) (DELETE-FILE FILE2))) ;; Loading file macro8-tst-tmp1.lisp ... WARNING: in FOO : CONS was called with 3 arguments, but it requires 2 arguments. WARNING: DEFUN/DEFMACRO: redefining function FOO in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-tmp1.lisp, was defined in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-tmp.lisp ;; Loading file macro8-tst-tmp2.lisp ... WARNING: in BAR : SIN was called with 2 arguments, but it requires 1 argument. WARNING: in BAR : 1- was called with 2 arguments, but it requires 1 argument. 0 errors, 1 warning ;; Loaded file macro8-tst-tmp2.lisp 0 errors, 1 warning ;; Loaded file macro8-tst-tmp1.lisp EQUAL-OK: (T T) (TEST-COMPILER (LAMBDA (A) (IF (AND (IF A T NIL) NIL) A (MIN (BLOCK B5 -1) A))) 123) EQUAL-OK: (T -1 -1) (TEST-COMPILER (LAMBDA (A B C) (IF (OR (NOT (AND A NIL)) (AND (OR B (LDB-TEST (BYTE 26 31) C)) T)) B B)) 123 144 532) EQUAL-OK: (T 144 144) (TEST-COMPILER (LAMBDA (C) (IF (OR (NOT (IF C NIL NIL)) (AND (AND (LDB-TEST (BYTE 13 25) -707966251) (LOGBITP 5 C)) (LDB-TEST (BYTE 13 26) -396394270089))) 513972305 19641756)) 125) EQUAL-OK: (T 513972305 513972305) (LET ((FILE "macro8-tst-tmp.lisp")) (WITH-OPEN-FILE (OUT FILE :DIRECTION :OUTPUT) (WRITE '(EVAL-WHEN (LOAD COMPILE EVAL) (+ (FUNCALL (COMPILE NIL (LAMBDA NIL (LOAD-TIME-VALUE (+ 2 3))))) 120)) :STREAM OUT)) (UNWIND-PROTECT (COMPILE-FILE FILE) (POST-COMPILE-FILE-CLEANUP FILE)) NIL) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-tmp.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-tmp.fas 0 errors, 0 warnings EQL-OK: NIL (LET ((FILE "macro8-tst-tmp.lisp")) (WITH-OPEN-FILE (OUT FILE :DIRECTION :OUTPUT) (WRITE-STRING "(defun ltv1 () (eq #1=(load-time-value (cons nil nil)) #1#))" OUT)) (UNWIND-PROTECT (PROGN (COMPILE-FILE FILE) (LOAD (COMPILE-FILE-PATHNAME FILE))) (POST-COMPILE-FILE-CLEANUP FILE)) (LTV1)) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-tmp.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-tmp.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-tmp.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-tmp.fas EQL-OK: T (LET ((FILE "macro8-tst-tmp.lisp")) (WITH-OPEN-FILE (OUT FILE :DIRECTION :OUTPUT) (WRITE-STRING "(defun ltv2 () (eq (load-time-value #1=(cons nil nil)) (load-time-value #1#)))" OUT)) (UNWIND-PROTECT (PROGN (COMPILE-FILE FILE) (LOAD (COMPILE-FILE-PATHNAME FILE))) (POST-COMPILE-FILE-CLEANUP FILE)) (LTV2)) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-tmp.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-tmp.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-tmp.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-tmp.fas EQL-OK: NIL (LET ((FILE "macro8-tst-tmp.lisp")) (WITH-OPEN-FILE (OUT FILE :DIRECTION :OUTPUT) (WRITE-STRING "(defun ltv3 () (eq (load-time-value (cons nil nil)) (load-time-value (cons nil nil))))" OUT)) (UNWIND-PROTECT (PROGN (COMPILE-FILE FILE) (LOAD (COMPILE-FILE-PATHNAME FILE))) (POST-COMPILE-FILE-CLEANUP FILE)) (LTV3)) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-tmp.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-tmp.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-tmp.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-tmp.fas EQL-OK: NIL (FUNCALL (COMPILE NIL (LAMBDA (A) (UNWIND-PROTECT (BLOCK B2 (RETURN-FROM B2 A))))) 77759) EQL-OK: 77759 (LET ((FILE "macro8-tst-warn.lisp")) (WITH-OPEN-FILE (OUT FILE :DIRECTION :OUTPUT) (WRITE '(EVAL-WHEN (:COMPILE-TOPLEVEL) (DEFINE-CONDITION TEST-WARNING-COMPILE-FILE-1 (STYLE-WARNING) NIL) (WARN (MAKE-CONDITION 'TEST-WARNING-COMPILE-FILE-1))) :STREAM OUT) (TERPRI OUT) (WRITE '(EVAL-WHEN (:COMPILE-TOPLEVEL) (DEFINE-CONDITION TEST-WARNING-COMPILE-FILE-2 (WARNING) NIL) (WARN (MAKE-CONDITION 'TEST-WARNING-COMPILE-FILE-2))) :STREAM OUT) (TERPRI OUT)) (UNWIND-PROTECT (CDR (MULTIPLE-VALUE-LIST (COMPILE-FILE FILE))) (POST-COMPILE-FILE-CLEANUP FILE))) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-warn.lisp ... WARNING: Condition of type TEST-WARNING-COMPILE-FILE-1. WARNING: Condition of type TEST-WARNING-COMPILE-FILE-2. ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-warn.fas 0 errors, 2 warnings EQUAL-OK: (2 1) (TEST-COMPILER (LAMBDA NIL (LABELS ((%F17 (F17-1 F17-2) (MULTIPLE-VALUE-PROG1 F17-1 F17-2 100 (RETURN-FROM %F17 12)))) (%F17 1 2)))) EQUAL-OK: (T 12 12) (TEST-COMPILER (LAMBDA (A) (BLOCK B6 (MULTIPLE-VALUE-PROG1 A (RETURN-FROM B6 100)))) :WRONG) EQUAL-OK: (T 100 100) (TEST-COMPILER (LAMBDA NIL (BLOCK B3 (RETURN-FROM B3 (MULTIPLE-VALUE-PROG1 10 (RETURN-FROM B3 100)))))) EQUAL-OK: (T 100 100) (TEST-COMPILER (LAMBDA (A B) (UNWIND-PROTECT (BLOCK B2 (FLET ((%F1 NIL B)) (LOGIOR (IF A (IF (LDB-TEST (BYTE 23 1) 253966182) (RETURN-FROM B2 A) -103275090) 62410) (IF (NOT (NOT (IF (NOT NIL) T (LDB-TEST (BYTE 2 27) 253671809)))) (RETURN-FROM B2 -22) (%F1))))) (SETQ A (+ A B)))) 777595384624 -1510893868) EQUAL-OK: (T 777595384624 777595384624) (TEST-COMPILER (LAMBDA (A C) (FLET ((%F10 NIL 10)) (FLET ((%F4 (&OPTIONAL (F4-1 (SETQ C (%F10))) (F4-2 (SETQ A 0))) (+ F4-1 F4-2) 123)) (%F4 -5)))) 13 17) WARNING: variable A is assigned but not read WARNING: variable C is assigned but not read EQUAL-OK: (T 123 123) (TEST-COMPILER (LAMBDA (A C) (IF (OR (LDB-TEST (BYTE 12 18) A) (NOT (AND T (NOT (IF (NOT (AND C T)) NIL NIL))))) 170 -110730)) 123 456) EQUAL-OK: (T -110730 -110730) (TEST-COMPILER (LAMBDA NIL (TAGBODY (FLET ((F6 NIL (GO 18))) (F6)) 18))) EQUAL-OK: (T NIL NIL) (TEST-COMPILER (LAMBDA NIL (TAGBODY (FLET ((%F1 (F1-1) (FLET ((%F9 (&OPTIONAL (F9-1 B) (F9-2 (GO TAG2)) (F9-3 0)) 0)) (%F9 0 0 0)))) (%F1 0)) TAG2))) WARNING: in %F1-%F9 : B is neither declared nor bound, it will be treated as if it were declared SPECIAL. WARNING: in %F1-%F9 : variable F9-1 is not used. Misspelled or missing IGNORE declaration? WARNING: in %F1-%F9 : variable F9-2 is not used. Misspelled or missing IGNORE declaration? WARNING: in %F1-%F9 : variable F9-3 is not used. Misspelled or missing IGNORE declaration? WARNING: in %F1 : variable F1-1 is not used. Misspelled or missing IGNORE declaration? EQUAL-OK: (T NIL NIL) (TEST-COMPILER (LAMBDA (X) (TAGBODY (FLET ((FOO-1 NIL (FLET ((FOO-2 NIL (FLET ((FOO-3 NIL (INCF X) (GO FOO-TAG))) (FOO-3)))) (FOO-2)))) (FOO-1)) FOO-TAG) X) 12) EQUAL-OK: (T 13 13) (TEST-COMPILER (LAMBDA NIL (LET ((*S4* :RIGHT)) (DECLARE (SPECIAL *S4*)) (PROGV '(*S4*) (LIST :WRONG1) (SETQ *S4* :WRONG2)) *S4*))) EQUAL-OK: (T :RIGHT :RIGHT) (UNWIND-PROTECT (TEST-COMPILER (LAMBDA NIL (SETQ *PRINT-LEVEL* 20) (NCONC (LET ((*PRINT-LEVEL* 30) (FOO (SETQ *PRINT-LEVEL* 40))) (LIST *PRINT-LEVEL* FOO)) (LIST *PRINT-LEVEL*)))) (SETQ *PRINT-LEVEL* NIL)) EQUAL-OK: (T (30 40 40) (30 40 40)) (TEST-COMPILER (LAMBDA (D) (GCD 39 (CATCH 'CT2 (BLOCK B7 (THROW 'CT2 (UNWIND-PROTECT (RETURN-FROM B7 17) (RETURN-FROM B7 (PROGV '(*S6*) (LIST 31) D)))))))) 65) EQUAL-OK: (T 13 13) (TEST-COMPILER (LAMBDA (D) (BLOCK B7 (THROW 'CT2 (UNWIND-PROTECT (RETURN-FROM B7 17) (RETURN-FROM B7 (PROGV '(*S6*) (LIST 31) D)))))) 65) EQUAL-OK: (T 65 65) (TEST-COMPILER (LAMBDA (B) (LABELS ((%F2 NIL (LET ((V10 (PROGN (DOTIMES (IV2 0 0) IV2) B))) (UNWIND-PROTECT B (LABELS ((%F6 NIL)) (%F6)))))) (%F2))) :GOOD) WARNING: in %F2 : variable V10 is not used. Misspelled or missing IGNORE declaration? EQUAL-OK: (T :GOOD :GOOD) (TEST-COMPILER (LAMBDA (B) (LET ((V10 (PROGN (DOTIMES (IV2 0 0) IV2) B))) (UNWIND-PROTECT B (LABELS ((%F6 NIL)) (%F6))))) :GOOD) WARNING: variable V10 is not used. Misspelled or missing IGNORE declaration? EQUAL-OK: (T :GOOD :GOOD) (TEST-COMPILER (LAMBDA (B) (LET ((V10 (PROGN (PRINT 321) B))) (UNWIND-PROTECT B (PRINT 123)))) :GOOD) 321 123 WARNING: variable V10 is not used. Misspelled or missing IGNORE declaration? 321 123 EQUAL-OK: (T :GOOD :GOOD) (TEST-COMPILER (LAMBDA (A B) (DECLARE (IGNORABLE A B)) (DECLARE (OPTIMIZE (SPACE 3) (DEBUG 0) (SAFETY 1) (COMPILATION-SPEED 3) (SPEED 1))) (PROG2 (CATCH 'CT1 (IF (OR (AND T (NOT (AND (AND (OR A T) NIL) NIL))) NIL) A (REDUCE #'(LAMBDA (LMV5 LMV2) 0) (VECTOR B 0 A)))) 0)) 2212755 3154856) WARNING: in #:|1| : variable LMV5 is not used. Misspelled or missing IGNORE declaration? WARNING: in #:|1| : variable LMV2 is not used. Misspelled or missing IGNORE declaration? EQUAL-OK: (T 0 0) (TEST-COMPILER (LAMBDA NIL (LABELS ((FOO NIL (APPLY #'BAR NIL)) (BAR NIL))))) WARNING: function BAR is not used. Misspelled or missing IGNORE declaration? WARNING: function FOO is not used. Misspelled or missing IGNORE declaration? EQUAL-OK: (T NIL NIL) (PROGN (LOAD (MERGE-PATHNAMES "bug001.lisp" *RUN-TEST-TRUENAME*)) T) ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/tests/bug001.lisp ... WARNING: function %F13 is not used. Misspelled or missing IGNORE declaration? EVAL: -105424 COMPILE: -105424 ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/tests/bug001.lisp EQL-OK: T (PROGN (LOAD (MERGE-PATHNAMES "bug002.lisp" *RUN-TEST-TRUENAME*)) T) ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/tests/bug002.lisp ... WARNING: function %F11 is not used. Misspelled or missing IGNORE declaration? WARNING: function %F18 is not used. Misspelled or missing IGNORE declaration? ---- (-6471154533 -252139422192 298074672 864413032888 -3027364 -35189361672 1119416506309 69109593) ---- EVAL: 1371853947591 COMPILE: 1371853947591 ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/tests/bug002.lisp EQL-OK: T (LET ((F (LAMBDA ((X1 FIXNUM) (X2 INTEGER) (X3 NUMBER) Y Z) (LIST X1 X2 X3 Y Z)))) (FLET ((G ((X1 FIXNUM) (X2 INTEGER) (X3 NUMBER) Y Z) (LIST Z Y X3 X2 X1))) (LIST (FUNCALL F 0 1 2 3 4) (FUNCALL (COMPILE NIL F) 5 6 7 8 9) (G 'A 'B 'C 'D 'E)))) EQUAL-OK: ((0 1 2 3 4) (5 6 7 8 9) (E D C B A)) (LET ((FNAME "macro8-tst-donc.lisp") (RESULTS 'NIL) COMPILED) (WITH-OPEN-FILE (OUT FNAME :DIRECTION :OUTPUT :IF-EXISTS :OVERWRITE :IF-DOES-NOT-EXIST :CREATE) (WRITE '(DEFPARAMETER *DONC* NIL) :STREAM OUT) (TERPRI OUT) (WRITE '(EVAL-WHEN (:LOAD-TOPLEVEL :COMPILE-TOPLEVEL :EXECUTE) (SETQ *DONC* (FUNCALL (COMPILE (DEFUN G NIL (LOAD-TIME-VALUE (+ 2 3))))))) :STREAM OUT) (TERPRI OUT)) (LOAD FNAME) (PUSH *DONC* RESULTS) (SETQ COMPILED (COMPILE-FILE FNAME)) (PUSH *DONC* RESULTS) (LOAD COMPILED) (PUSH *DONC* RESULTS) (POST-COMPILE-FILE-CLEANUP FNAME) (NREVERSE RESULTS)) ;; Loading file macro8-tst-donc.lisp ... ;; Loaded file macro8-tst-donc.lisp ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-donc.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-donc.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-donc.fas ... WARNING: G is already compiled. ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-donc.fas EQUAL-OK: (5 5 5) (LET ((FNAME "macro8-tst-donc.lisp") (RESULTS 'NIL) COMPILED) (WITH-OPEN-FILE (OUT FNAME :DIRECTION :OUTPUT :IF-EXISTS :OVERWRITE :IF-DOES-NOT-EXIST :CREATE) (WRITE '(DEFMACRO M1 (X) (COMPILE X (LAMBDA NIL (LOAD-TIME-VALUE (+ 2 3)))) 4) :STREAM OUT) (TERPRI OUT) (WRITE '(DEFUN FOO NIL (M1 BAR)) :STREAM OUT) (TERPRI OUT)) (LOAD FNAME) (PUSH (BAR) RESULTS) (PUSH (FOO) RESULTS) (SETQ COMPILED (COMPILE-FILE FNAME)) (PUSH (BAR) RESULTS) (PUSH (FOO) RESULTS) (LOAD COMPILED) (PUSH (BAR) RESULTS) (PUSH (FOO) RESULTS) (POST-COMPILE-FILE-CLEANUP FNAME) (NREVERSE RESULTS)) ;; Loading file macro8-tst-donc.lisp ... WARNING: DEFUN/DEFMACRO: redefining function FOO in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-donc.lisp, was defined in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-tmp1.lisp ;; Loaded file macro8-tst-donc.lisp ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-donc.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-donc.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-donc.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-donc.fas EQUAL-OK: (5 4 5 4 5 4) (LET* ((F "macro8-tst-test-compile-file-output-argument.lisp") (C (OPEN (MAKE-PATHNAME :TYPE "fas" :DEFAULTS F) :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE))) (WITH-OPEN-FILE (S F :DIRECTION :OUTPUT :IF-EXISTS :SUPERSEDE :IF-DOES-NOT-EXIST :CREATE) (FORMAT S "(defun foo (x) (1+ x))~%")) (UNWIND-PROTECT (PROGN (COMPILE-FILE F :OUTPUT-FILE C) T) (POST-COMPILE-FILE-CLEANUP F))) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-compile-file-output-argument.lisp ... ;; Wrote file macro8-tst-test-compile-file-output-argument.fas 0 errors, 0 warnings EQL-OK: T (DEFUN TEST-CONSTANT-FOLDING (X) (* 1.0d200 X 1.0d200)) EQL-OK: TEST-CONSTANT-FOLDING (MULTIPLE-VALUE-LIST (COMPILE 'TEST-CONSTANT-FOLDING)) WARNING: in TEST-CONSTANT-FOLDING : Run time error expected: *: floating point overflow EQUAL-OK: (TEST-CONSTANT-FOLDING 1 1) (TEST-CONSTANT-FOLDING 12) [SIMPLE-FLOATING-POINT-OVERFLOW]: *: floating point overflow EQL-OK: ERROR (MULTIPLE-VALUE-LIST (COMPILE NIL #'TEST-CONSTANT-FOLDING)) WARNING: # is already compiled. EQUAL-OK: (# NIL NIL) (FUNCALL (COMPILE NIL (LAMBDA NIL (COND (NIL))))) EQL-OK: NIL (FUNCALL (COMPILE NIL (LAMBDA NIL (COND (T)) NIL))) EQL-OK: NIL (LET (X) (DEFUN CIRCULARITY-IN-CODE NIL '(ONE TWO THREE . #1=(MANY . #1#))) (SETQ X (CIRCULARITY-IN-CODE)) (SUBSEQ X 0 7)) EQUAL-OK: (ONE TWO THREE MANY MANY MANY MANY) (LET* ((F "macro8-tst-test-compiled-file-p.lisp") (C (COMPILE-FILE-PATHNAME F))) (OPEN F :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (DELETE-FILE C) (LIST (MULTIPLE-VALUE-LIST (COMPILED-FILE-P C)) (MULTIPLE-VALUE-LIST (COMPILED-FILE-P F)) (UNWIND-PROTECT (MULTIPLE-VALUE-LIST (COMPILED-FILE-P (SETQ C (COMPILE-FILE F)))) (POST-COMPILE-FILE-CLEANUP F)))) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-compiled-file-p.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-compiled-file-p.fas 0 errors, 0 warnings EQUAL-OK: ((NIL) (NIL) (T)) (LET ((F "macro8-tst-test-compile-time-value.lisp")) (DEFPARAMETER TEST-COMPILE-TIME-VALUE-C 0) (WITH-OPEN-FILE (*STANDARD-OUTPUT* F :DIRECTION :OUTPUT) (WRITE '(DEFUN TEST-COMPILE-TIME-VALUE-F NIL (INCF TEST-COMPILE-TIME-VALUE-C) 'TEST-COMPILE-TIME-VALUE)) (TERPRI) (WRITE '(DEFPARAMETER TEST-COMPILE-TIME-VALUE-V (COMPILE-TIME-VALUE (TEST-COMPILE-TIME-VALUE-F)))) (TERPRI)) (UNWIND-PROTECT (LIST (PROGN (LOAD F) (LIST TEST-COMPILE-TIME-VALUE-C TEST-COMPILE-TIME-VALUE-V)) (PROGN (COMPILE-FILE F) (LIST TEST-COMPILE-TIME-VALUE-C TEST-COMPILE-TIME-VALUE-V)) (PROGN (LOAD (COMPILE-FILE-PATHNAME F)) (LIST TEST-COMPILE-TIME-VALUE-C TEST-COMPILE-TIME-VALUE-V))) (POST-COMPILE-FILE-CLEANUP F))) ;; Loading file macro8-tst-test-compile-time-value.lisp ... ;; Loaded file macro8-tst-test-compile-time-value.lisp ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-compile-time-value.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-compile-time-value.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-compile-time-value.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-compile-time-value.fas EQUAL-OK: ((0 NIL) (1 NIL) (1 TEST-COMPILE-TIME-VALUE)) (LET* ((F "macro8-tst-test-crlf-print-read.lisp") (V #(#\a #\Return #\Newline #\Null #\b)) (S (COERCE V 'STRING))) (UNWIND-PROTECT (PROGN (WITH-OPEN-FILE (OUT F :DIRECTION :OUTPUT) (LET ((*PRINT-READABLY* T)) (SYSTEM::SET-OUTPUT-STREAM-FASL OUT) (FORMAT OUT "(defparameter *v* ~S)~%" V) (FORMAT OUT "(defparameter *s* ~S)~%" S))) (LOAD (COMPILE-FILE F)) (LIST (STRING= S *S*) (EQUALP V *V*) (= (LENGTH S) (LENGTH V)))) (POST-COMPILE-FILE-CLEANUP F) (MAKUNBOUND '*V*) (UNINTERN '*V*) (MAKUNBOUND '*S*) (UNINTERN '*S*))) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-crlf-print-read.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-crlf-print-read.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-crlf-print-read.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-crlf-print-read.fas EQUAL-OK: (T T T) (LET ((F "macro8-tst-test-crlf-print-read.lisp") (CODE '(DEFMACRO ADD-CRLF (STRING) (WITH-OUTPUT-TO-STRING (O) (WRITE-STRING STRING O) (PRINC #\Return O) (PRINC #\Newline O))))) (UNWIND-PROTECT (PROGN (WITH-OPEN-FILE (OUT F :DIRECTION :OUTPUT) (WRITE CODE :STREAM OUT :PRETTY T) (FORMAT OUT "(defparameter *z* (length (add-crlf \"a\")))~%")) (LIST (PROGN (LOAD F) *Z*) (PROGN (LOAD (COMPILE-FILE F)) *Z*))) (POST-COMPILE-FILE-CLEANUP F) (MAKUNBOUND '*Z*) (UNINTERN '*Z*))) ;; Loading file macro8-tst-test-crlf-print-read.lisp ... ;; Loaded file macro8-tst-test-crlf-print-read.lisp ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-crlf-print-read.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-crlf-print-read.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-crlf-print-read.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-crlf-print-read.fas EQUAL-OK: (3 3) (LET* ((F "macro8-tst-test-crlf-print-read.lisp") (*PACKAGE* (FIND-PACKAGE "CS-COMMON-LISP-USER")) (C (READ-FROM-STRING "*c*"))) (UNWIND-PROTECT (PROGN (WITH-OPEN-FILE (OUT F :DIRECTION :OUTPUT) (FORMAT OUT "(defconstant *c* #\\Null)~%")) (LOAD (COMPILE-FILE F)) (CHAR-CODE (SYMBOL-VALUE C))) (POST-COMPILE-FILE-CLEANUP F) (PROCLAIM (LIST 'SPECIAL C)) (MAKUNBOUND C) (UNINTERN C))) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-crlf-print-read.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-crlf-print-read.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-crlf-print-read.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-crlf-print-read.fas EQL-OK: 0 (LET ((F "macro8-tst-test-pr-kw.lisp")) (WITH-OPEN-FILE (O F :DIRECTION :OUTPUT) (FORMAT O "(defpackage m (:modern t))~%(in-package m)~%~ (defparameter p #.(make-pathname :type \"mem\"))~%")) (UNWIND-PROTECT (PROGN (LOAD (COMPILE-FILE F)) (SYMBOL-VALUE (READ-FROM-STRING "m::p"))) (POST-COMPILE-FILE-CLEANUP F) (DELETE-PACKAGE "M"))) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-pr-kw.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-pr-kw.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-pr-kw.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-test-pr-kw.fas EQUAL-OK: #P".mem" (FUNCALL (COMPILE NIL '(LAMBDA NIL (DECLARE (OPTIMIZE FOO))))) WARNING: FOO is not a valid OPTIMIZE quality. EQL-OK: NIL (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA NIL (DIRECTORY "/" 'A T 'B 1 'C 0 :ALLOW-OTHER-KEYS T)))) WARNING: in X : DIRECTORY: ignored keyword A T WARNING: in X : DIRECTORY: ignored keyword B 1 WARNING: in X : DIRECTORY: ignored keyword C 0 EQUAL-OK: (X 3 NIL) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA NIL (DIRECTORY "/" :ALLOW-OTHER-KEYS T 'A T)))) WARNING: in X : DIRECTORY: ignored keyword A T EQUAL-OK: (X 1 NIL) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA NIL (DIRECTORY "/" 'A T)))) WARNING: in X : illegal keyword A for function DIRECTORY. The only allowed keywords are :IF-DOES-NOT-EXIST, :CIRCLE and :FULL. EQUAL-OK: (X 1 1) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA NIL (DIRECTORY "/" 'A T 'B 2)))) WARNING: in X : illegal keywords B and A for function DIRECTORY. The only allowed keywords are :IF-DOES-NOT-EXIST, :CIRCLE and :FULL. EQUAL-OK: (X 1 1) (LET (RET) (DEFMACRO TEST-MACRO-ARGLIST (A) A) (PUSH (ARGLIST 'TEST-MACRO-ARGLIST) RET) (COMPILE 'TEST-MACRO-ARGLIST) (PUSH (ARGLIST 'TEST-MACRO-ARGLIST) RET) RET) EQUAL-OK: ((A) (A)) (LET (RET) (DEFMACRO TEST-MACRO-ARGLIST (A) A) (PUSH (ARGLIST 'TEST-MACRO-ARGLIST) RET) (TRACE TEST-MACRO-ARGLIST) (PUSH (ARGLIST 'TEST-MACRO-ARGLIST) RET) RET) ;; Tracing macro TEST-MACRO-ARGLIST. EQUAL-OK: ((A) (A)) (LOCALLY (DECLARE (OPTIMIZE (SPACE 2))) (DEFMACRO TEST-MACRO-ARGLIST (A) A) (COMPILE 'TEST-MACRO-ARGLIST) (ARGLIST 'TEST-MACRO-ARGLIST)) WARNING: DEFUN/DEFMACRO: redefining TEST-MACRO-ARGLIST; it was traced! EQUAL-OK: (A) (LOCALLY (DECLARE (OPTIMIZE (SPACE 3))) (DEFMACRO TEST-MACRO-ARGLIST (A) A) (COMPILE 'TEST-MACRO-ARGLIST) (STRINGP (PRINC (WITH-OUTPUT-TO-STRING (S) (DESCRIBE 'TEST-MACRO-ARGLIST S))))) TEST-MACRO-ARGLIST is the symbol TEST-MACRO-ARGLIST, lies in # , is accessible in 1 package /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8.erg, names a macro, has 1 property SYSTEM::DEFINITION. For more information, evaluate (SYMBOL-PLIST 'TEST-MACRO-ARGLIST). # is the package named /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8.erg. It imports the external symbols of 3 packages COMMON-LISP-USER, COMMON-LISP, EXT and exports no symbols, but no package uses these exports. # 0> is a macro expander. Argument list:"Due to the compiler optimization settings, lambda list for # 0> is not available " For more information, evaluate (DISASSEMBLE (MACRO-FUNCTION 'TEST-MACRO-ARGLIST)). EQL-OK: T (LOCALLY (DECLARE (OPTIMIZE (SPACE 2))) (DEFUN TEST-FUN-ARGLIST (A) (DECLARE (COMPILE)) A) (ARGLIST 'TEST-FUN-ARGLIST)) EQUAL-OK: (A) (LOCALLY (DECLARE (OPTIMIZE (SPACE 3))) (DEFUN TEST-FUN-ARGLIST (A) (DECLARE (COMPILE)) A) (PRINC-TO-STRING (ARGLIST 'TEST-FUN-ARGLIST))) EQUAL-OK: "(ARG0)" (LISTP (ARGLIST 'SYSTEM::BACKQUOTE)) EQL-OK: T (DEFUN CHECK-CONST-FOLD (FORM) (SYSTEM::CLOSURE-CONST (COMPILE NIL `(LAMBDA NIL ,FORM)) 0)) EQL-OK: CHECK-CONST-FOLD (CHECK-CONST-FOLD '(! 10)) EQL-OK: 3628800 (CHECK-CONST-FOLD '(CHAR-CODE #\a)) EQL-OK: 97 (CHECK-CONST-FOLD '(CODE-CHAR 97)) EQL-OK: #\a (CHECK-CONST-FOLD '(CHAR-UPCASE #\a)) EQL-OK: #\A (CHECK-CONST-FOLD '(CHAR-INVERTCASE #\a)) EQL-OK: #\A (CHECK-CONST-FOLD '(MOD-EXPT 29 13 17)) EQL-OK: 14 (SYSTEM::CLOSURE-CONSTS (COMPILE NIL (LAMBDA NIL (ATOM 12)))) EQL-OK: NIL (SYSTEM::CLOSURE-CONSTS (COMPILE NIL (LAMBDA NIL (CONSP 12)))) EQL-OK: NIL (SYSTEM::CLOSURE-CONSTS (COMPILE NIL (LAMBDA NIL (XOR 1 NIL 2)))) EQL-OK: NIL (CHECK-CONST-FOLD '(HASH-TABLE-TEST #S(HASH-TABLE :TEST FASTHASH-EQ))) EQL-OK: FASTHASH-EQ (FUNCALL (COMPILE NIL (LAMBDA (B C) (BLOCK B3 (IF (IF B (NOT NIL) C) (RETURN-FROM B3 124))))) 1 2) EQL-OK: 124 (PROGN (DEFMACRO TEST-MACRO-DOTTED-ARGS (&REST F) `',F) (LIST (TEST-MACRO-DOTTED-ARGS 123) (TEST-MACRO-DOTTED-ARGS . 123) (TEST-MACRO-DOTTED-ARGS 1 2 . 3))) EQUAL-OK: ((123) 123 (1 2 . 3)) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA (Y) (WHEN NIL (FORMAT T "arg=~S" Y))))) EQUAL-OK: (X NIL NIL) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA (Y) (FLET ((F (Z) (1+ Z))) (F Y))))) EQUAL-OK: (X NIL NIL) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA (Y) (FLET ((F (Z) (1+ Z))) Y)))) WARNING: function X-F is not used. Misspelled or missing IGNORE declaration? EQUAL-OK: (X 1 NIL) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA NIL (FLET ((F (Z) (1+ Z))) #'F)))) EQUAL-OK: (X NIL NIL) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA (Y) (FLET ((F (Z) (1+ Z))) Y)))) WARNING: function X-F is not used. Misspelled or missing IGNORE declaration? EQUAL-OK: (X 1 NIL) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA (Y) (FLET ((F (Z) (1+ Z))) (DECLARE (IGNORABLE #'F)) Y)))) EQUAL-OK: (X NIL NIL) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA (Y) (FLET ((F (Z) (1+ Z))) (DECLARE (IGNORE #'F)) Y)))) EQUAL-OK: (X NIL NIL) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA NIL (FLET ((F (Z) (1+ Z))) (DECLARE (IGNORE #'F)) #'F)))) WARNING: in X : function X-F is used despite IGNORE declaration. EQUAL-OK: (X 1 NIL) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA (Y) (FLET ((F (Z) (1+ Z))) (DECLARE (IGNORE #'F)) #'F)))) WARNING: in X : variable Y is not used. Misspelled or missing IGNORE declaration? WARNING: in X : function X-F is used despite IGNORE declaration. EQUAL-OK: (X 2 NIL) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA (Y) (DECLARE (IGNORE Y)) (FLET ((F (Z) (1+ Z))) #'F)))) EQUAL-OK: (X NIL NIL) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA (Y) (DECLARE (IGNORE Y)) (FLET ((F (Z) (1+ Z))) (F Y))))) WARNING: in X : variable Y is used despite IGNORE declaration. EQUAL-OK: (X 1 NIL) (HANDLER-CASE (FUNCALL (LOCALLY (DECLARE (OPTIMIZE (SAFETY 3))) (COMPILE NIL (LAMBDA (A) (AREF A 0) 1))) 2) (TYPE-ERROR (C) (PRINC-ERROR C) :GOOD) (ERROR (C) (PRINC-ERROR C) :BAD)) [SIMPLE-TYPE-ERROR]: AREF: argument 2 is not an array EQL-OK: :GOOD (FUNCALL (LOCALLY (DECLARE (OPTIMIZE (SAFETY 2))) (COMPILE NIL (LAMBDA (A) (AREF A 0) 1))) 2) EQL-OK: 1 (HANDLER-CASE (FUNCALL (LOCALLY (DECLARE (OPTIMIZE (SAFETY 0))) (COMPILE NIL (LAMBDA (S) (PARSE-INTEGER S) 1))) "a") (ERROR (C) (PRINC-ERROR C) :GOOD)) [SIMPLE-PARSE-ERROR]: PARSE-INTEGER: substring "a" does not have integer syntax at position 0 EQL-OK: :GOOD (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA NIL (LET (A) T)))) WARNING: in X : variable A is not used. Misspelled or missing IGNORE declaration? EQUAL-OK: (X 1 NIL) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA NIL T))) EQUAL-OK: (X NIL NIL) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA NIL (LET (A) (SETQ A 1))))) WARNING: in X : variable A is assigned but not read EQUAL-OK: (X 1 NIL) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA (&OPTIONAL A &KEY B) (CONS A B)))) WARNING: in X : Mixing &OPTIONAL and &KEY in lambda list (&OPTIONAL A &KEY B) is bad design EQUAL-OK: (X 1 NIL) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA (S) (READ-FROM-STRING S :START 7)))) WARNING: in X : Apparently passing &KEY arguments without &OPTIONAL arguments in (READ-FROM-STRING S :START 7) EQUAL-OK: (X 1 NIL) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA (S) (READ-FROM-STRING S T T :START 7)))) EQUAL-OK: (X NIL NIL) (MULTIPLE-VALUE-LIST (COMPILE 'X (LAMBDA (S) (FORMAT "~A" S)))) WARNING: in X : The FORMAT destination is invalid (not NIL or T or a stream or a string with fill-pointer): "~A" EQUAL-OK: (X 1 1) (SYMBOLS-CLEANUP '(*C* *DONC* *MY-TYPEOF-COUNTER* *NOTINLINE-TEST-VAR* *S* *V* *Z* ADD-CRLF ALPHA ARITHMETIC-IF BAR BETA CALLER CHECK-CONST-FOLD CIRCULARITY-IN-CODE DELTA DM1A DM1B DM2A DM2B FEXPAND FEXPAND-1 FOO FOO137 FOO138 FOO140 FOO141 FOO142 FOO143 G HALIBUT INCFQ LTV1 LTV2 LTV3 TEST-WARNING-COMPILE-FILE-1 TEST-WARNING-COMPILE-FILE-2 M M1 MEXPAND MEXPAND-1 MY-MAC MY-TYPEOF NOTINLINE-TEST-FUNC-1 NOTINLINE-TEST-FUNC-2 P STEM T1 TEST-COMPILE-TIME-VALUE-C TEST-COMPILE-TIME-VALUE-F TEST-COMPILE-TIME-VALUE-V TEST-COMPILER TEST-CONSTANT-FOLDING TEST-FUN-ARGLIST TEST-KEY TEST-MACRO-ARGLIST TEST-MACRO-DOTTED-ARGS TEST10 TEST11 TEST12 TEST6 TEST9 TESTF TESTP TESTW WITH-VAR X)) WARNING: (SETF FIND-CLASS): redefining class TEST-WARNING-COMPILE-FILE-1 in top-level, was defined in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-warn.lisp WARNING: (SETF FIND-CLASS): redefining class TEST-WARNING-COMPILE-FILE-2 in top-level, was defined in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/macro8-tst-warn.lisp EQL-OK: NIL RUN-TEST: finished "macro8" (0 errors out of 253 tests) RUN-TEST: started # (SETF A-VECTOR (MAKE-ARRAY 10)) EQUALP-OK: #(NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) (DO ((I 0 (1+ I)) (N (LENGTH A-VECTOR))) ((= I N)) (WHEN (NULL (AREF A-VECTOR I)) (SETF (AREF A-VECTOR I) 0))) EQL-OK: NIL (SETQ LISTE '(A B C D)) EQUAL-OK: (A B C D) (SETQ X 'ANFANGSWERT-VON-X) EQL-OK: ANFANGSWERT-VON-X (DO ((X LISTE (CDR X)) (OLDX X X)) ((NULL X)) (PRINT OLDX) (PRINT X)) ANFANGSWERT-VON-X (A B C D) (A B C D) (B C D) (B C D) (C D) (C D) (D) EQL-OK: NIL (DEFUN LIST-REVERSE (LIST) (DO ((X LIST (CDR X)) (Y 'NIL (CONS (CAR X) Y))) ((ENDP X) Y))) EQL-OK: LIST-REVERSE (LIST-REVERSE '(A B C D)) EQUAL-OK: (D C B A) (SETQ FOO '(A B C D)) EQUAL-OK: (A B C D) (SETQ BAR '(1 2 3 4)) EQUAL-OK: (1 2 3 4) (DEFUN FKT (A B) (CONS A B)) EQL-OK: FKT (MAPCAR #'ABS '(3 -4 2 -5 -6)) EQUAL-OK: (3 4 2 5 6) (MAPCAR #'CONS '(A B C) '(1 2 3)) EQUAL-OK: ((A . 1) (B . 2) (C . 3)) (MAPCAR #'FKT FOO BAR) EQUAL-OK: ((A . 1) (B . 2) (C . 3) (D . 4)) (DO ((X FOO (CDR X)) (Y BAR (CDR Y)) (Z 'NIL (CONS (FKT (CAR X) (CAR Y)) Z))) ((OR (NULL X) (NULL Y)) (NREVERSE Z))) EQUAL-OK: ((A . 1) (B . 2) (C . 3) (D . 4)) (LET ((L '(1 2 3)) (R 0)) (DOLIST (X L R) (SETF R (+ R X)))) EQL-OK: 6 (LET ((L '(1 2 3))) (DOLIST (X L) (IF (> 0 X) (INCF X) (RETURN 10)))) EQL-OK: 10 (LET ((L '(1 2 3))) (DOLIST (X L) (INCF X))) EQL-OK: NIL (LET ((S 0)) (DOTIMES (I (+ 1 9) S) (SETF S (+ S I)))) EQL-OK: 45 (DOLIST (X '(A B C D)) (PRIN1 X) (PRINC " ")) A B C D EQL-OK: NIL (DEFUN PALINDROMEP (STRING &OPTIONAL (START 0) (END (LENGTH STRING))) (DOTIMES (K (FLOOR (- END START) 2) T) (UNLESS (CHAR-EQUAL (CHAR STRING (+ START K)) (CHAR STRING (- END K 1))) (RETURN NIL)))) EQL-OK: PALINDROMEP (PALINDROMEP "Able was I ere I saw Elba") EQL-OK: T (PALINDROMEP "einnegermitgazellezagtimregennie") EQL-OK: T (PALINDROMEP "eisgekuehlter bommerlunder") EQL-OK: NIL (PALINDROMEP (REMOVE-IF-NOT #'ALPHA-CHAR-P "A man, a plan, a canal -- Panama")) EQL-OK: T (MAPCAR #'(LAMBDA (X) (LIST X)) '(A B C)) EQUAL-OK: ((A) (B) (C)) (MAPCAR #'(LAMBDA (X Y) (LIST X Y)) '(A B C) '(1 2 3)) EQUAL-OK: ((A 1) (B 2) (C 3)) (MAPCAR #'(LAMBDA (X Y) (LIST X Y)) '(A B C) '(1 2)) EQUAL-OK: ((A 1) (B 2)) (MAPCAR #'(LAMBDA (X Y) (LIST X Y)) '(C) '(1 2)) EQUAL-OK: ((C 1)) (MAPCAR #'(LAMBDA (X Y Z) (LIST X Y)) '(C) '(1 2) (U V W)) [SIMPLE-UNDEFINED-FUNCTION]: EVAL: undefined function U EQL-OK: ERROR (MAPCAR #'(LAMBDA (X Y Z) (LIST X Y)) '(C) '(1 2) '(U V W)) EQUAL-OK: ((C 1)) (MAPCAR #'(LAMBDA (X Y Z) (LIST X Y)) '(A B C) '(1 2 3) '(U V W)) EQUAL-OK: ((A 1) (B 2) (C 3)) (MAPCAR #'(LAMBDA (X Y Z) (LIST X Y Z)) '(A B C) '(1 2 3) '(U V W)) EQUAL-OK: ((A 1 U) (B 2 V) (C 3 W)) (MAPCAR #'(LAMBDA (X Y Z) (LIST X Y Z)) '(A B C) '(1 2 3) '(U V W . X)) EQUAL-OK: ((A 1 U) (B 2 V) (C 3 W)) (MAPCAR #'(LAMBDA (X Y Z) (LIST X Y Z)) '(A B C) '(1 2 3) '(U V . W)) [SIMPLE-TYPE-ERROR]: MAPCAR: A proper list must not end with W EQL-OK: ERROR (FUNCALL (COMPILE NIL (LAMBDA NIL (MAPCAR #'(LAMBDA (X Y Z) (LIST X Y Z)) '(A B C) '(1 2 3) '(U V . W))))) [SIMPLE-TYPE-ERROR]: ENDP: A proper list must not end with W EQL-OK: ERROR (MAPC #'ABS '(3 -4 2 -5 -6)) EQUAL-OK: (3 -4 2 -5 -6) (MAPC #'(LAMBDA (X Y Z) (LIST X Y Z)) '(A B C) '(1 2 3) '(U I V)) EQUAL-OK: (A B C) (MAPCAR #'(LAMBDA (X Y Z) (LIST X Y Z)) '(A B C) '(1 2 3) '(U I V)) EQUAL-OK: ((A 1 U) (B 2 I) (C 3 V)) (MAPL #'(LAMBDA (X Y) (CONS X Y)) '(A B C D) '(1 2 3 4)) EQUAL-OK: (A B C D) (MAPL #'(LAMBDA (X Y Z) (LIST X Y Z)) '(A B C) '(1 2 3) '(U I V)) EQUAL-OK: (A B C) (MAPLIST #'(LAMBDA (X) (CONS 'FOO X)) '(A B C D)) EQUAL-OK: ((FOO A B C D) (FOO B C D) (FOO C D) (FOO D)) (MAPLIST #'(LAMBDA (X) (IF (MEMBER (CAR X) (CDR X)) 0 1)) '(A B A C D B C)) EQUAL-OK: (0 0 1 0 1 1 1) (MAPLIST #'(LAMBDA (X Y Z) (LIST X Y Z)) '(A B C) '(1 2 3) '(U I V)) EQUAL-OK: (((A B C) (1 2 3) (U I V)) ((B C) (2 3) (I V)) ((C) (3) (V))) (MAPLIST #'(LAMBDA (X Y Z) (LIST X Y Z)) '(A B C) '(1 2 3) '(U I)) EQUAL-OK: (((A B C) (1 2 3) (U I)) ((B C) (2 3) (I))) (MAPLIST #'(LAMBDA (X Y Z) (LIST X Y Z)) '(A B C) '(1 2) '(U I V)) EQUAL-OK: (((A B C) (1 2) (U I V)) ((B C) (2) (I V))) (MAPLIST #'(LAMBDA (X Y Z) (LIST X Y Z)) '(A B) '(1 2 3) '(U I V)) EQUAL-OK: (((A B) (1 2 3) (U I V)) ((B) (2 3) (I V))) (MAPCON #'(LAMBDA (X) (AND (ODDP (CAR X)) (LIST (CAR X)))) '(5 4 3 2 1)) EQUAL-OK: (5 3 1) (MAPCON #'(LAMBDA (X Y Z) (LIST X Y Z)) '(A B) '(1 2 3) '(U I V)) EQUAL-OK: ((A B) (1 2 3) (U I V) (B) (2 3) (I V)) (MAPCON #'(LAMBDA (X Y Z) (LIST X Y Z)) '(A B C) '(1 2 3) '(U I V)) EQUAL-OK: ((A B C) (1 2 3) (U I V) (B C) (2 3) (I V) (C) (3) (V)) (MAPCON (CONSTANTLY 1) (LIST 2)) EQL-OK: 1 (MAPLAP #'LIST '(A B) '(1 2 3) '(U I V)) EQUAL-OK: ((A B) (1 2 3) (U I V) (B) (2 3) (I V)) (MAPLAP #'LIST '(A B C) '(1 2 3) '(U I V)) EQUAL-OK: ((A B C) (1 2 3) (U I V) (B C) (2 3) (I V) (C) (3) (V)) (MAPCAN #'(LAMBDA (X) (AND (NUMBERP X) (LIST X))) '(A 1 B C 3 4 D 5)) EQUAL-OK: (1 3 4 5) (MAPCAN #'(LAMBDA (X Y Z) (LIST X Y Z)) '(A B C) '(1 2 3) '(U I V)) EQUAL-OK: (A 1 U B 2 I C 3 V) (MAPCAN #'(LAMBDA (X Y) (LIST X Y)) '(A B C) '(1 2 3)) EQUAL-OK: (A 1 B 2 C 3) (MAPCAN #'(LAMBDA (X) (LIST X)) '(A B C)) EQUAL-OK: (A B C) (MAPCON #'(LAMBDA (X) (LIST X)) '(A B C)) EQUAL-OK: ((A B C) (B C) (C)) (MAPCON #'(LAMBDA (X Y) (LIST X Y)) '(A B C) '(1 2)) EQUAL-OK: ((A B C) (1 2) (B C) (2)) (MAPCON #'(LAMBDA (X) (LIST X)) '(A B C)) EQUAL-OK: ((A B C) (B C) (C)) (MAPCAN #'IDENTITY '(1)) EQL-OK: 1 (MAPCAN #'IDENTITY '(1 2 3)) EQL-OK: 3 (MAPCAP #'LIST '(A B) '(1 2 3) '(U I V)) EQUAL-OK: (A 1 U B 2 I) (MAPCAP #'LIST '(A B C) '(1 2 3) '(U I V)) EQUAL-OK: (A 1 U B 2 I C 3 V) (SYMBOLS-CLEANUP '(A-VECTOR X LISTE LIST-REVERSE FOO BAR FKT PALINDROMEP)) EQL-OK: NIL RUN-TEST: finished "map" (0 errors out of 64 tests) RUN-TEST: started # (PROGN (DEFSTRUCT RECTANGLE1 (X #1=0.0) (Y #1#)) (DEFCLASS COUNTED1-CLASS (STRUCTURE-CLASS) ((COUNTER :INITFORM 0))) (DEFCLASS COUNTED1-RECTANGLE (RECTANGLE1) NIL (:METACLASS COUNTED1-CLASS)) (DEFMETHOD MAKE-INSTANCE :AFTER ((C COUNTED1-CLASS) &REST ARGS) (INCF (SLOT-VALUE C 'COUNTER))) (SLOT-VALUE (FIND-CLASS 'COUNTED1-RECTANGLE) 'COUNTER) (MAKE-INSTANCE 'COUNTED1-RECTANGLE) (LIST (SLOT-VALUE (FIND-CLASS 'COUNTED1-RECTANGLE) 'COUNTER) (SYMBOLS-CLEANUP '(RECTANGLE1 COUNTED1-CLASS COUNTED1-RECTANGLE)))) EQUAL-OK: (1 NIL) (PROGN (DEFCLASS RECTANGLE2 NIL ((X :INITFORM #1=0.0 :INITARG X) (Y :INITFORM #1# :INITARG Y))) (DEFCLASS COUNTED2-CLASS (STANDARD-CLASS) ((COUNTER :INITFORM 0))) (DEFCLASS COUNTED2-RECTANGLE (RECTANGLE2) NIL (:METACLASS COUNTED2-CLASS)) (DEFMETHOD MAKE-INSTANCE :AFTER ((C COUNTED2-CLASS) &REST ARGS) (INCF (SLOT-VALUE C 'COUNTER))) (SLOT-VALUE (FIND-CLASS 'COUNTED2-RECTANGLE) 'COUNTER) (MAKE-INSTANCE 'COUNTED2-RECTANGLE) (LIST (SLOT-VALUE (FIND-CLASS 'COUNTED2-RECTANGLE) 'COUNTER) (SYMBOLS-CLEANUP '(RECTANGLE2 COUNTED2-CLASS COUNTED2-RECTANGLE)))) EQUAL-OK: (1 NIL) (PROGN (DEFCLASS COUNTER NIL ((COUNT :ALLOCATION :CLASS :INITFORM 0 :READER HOW-MANY))) (DEFCLASS COUNTED-OBJECT (COUNTER) ((NAME :INITARG :NAME))) (DEFMETHOD INITIALIZE-INSTANCE :AFTER ((OBJ COUNTER) &REST ARGS) (INCF (SLOT-VALUE OBJ 'COUNT))) (UNLESS (CLASS-FINALIZED-P (FIND-CLASS 'COUNTER)) (FINALIZE-INHERITANCE (FIND-CLASS 'COUNTER))) (LIST (HOW-MANY (MAKE-INSTANCE 'COUNTED-OBJECT :NAME 'FOO)) (HOW-MANY (CLASS-PROTOTYPE (FIND-CLASS 'COUNTER))) (HOW-MANY (MAKE-INSTANCE 'COUNTED-OBJECT :NAME 'BAR)) (HOW-MANY (CLASS-PROTOTYPE (FIND-CLASS 'COUNTER))) (CLOS::GF-DYNAMICALLY-MODIFIABLE #'HOW-MANY) (SYMBOLS-CLEANUP '(COUNTER COUNTED-OBJECT HOW-MANY)))) EQUAL-OK: (1 1 2 2 NIL NIL) (PROGN (DEFCLASS STRUCTURE01 NIL ((X :INITARG :X :ACCESSOR STRUCTURE01-X)) (:METACLASS STRUCTURE-CLASS)) (LET ((OBJECT (MAKE-INSTANCE 'STRUCTURE01 :X 17))) (LIST (TYPEP #'STRUCTURE01-X 'GENERIC-FUNCTION) (STRUCTURE01-X OBJECT) (PROGN (INCF (STRUCTURE01-X OBJECT)) (STRUCTURE01-X OBJECT)) (SYMBOLS-CLEANUP '(STRUCTURE01 STRUCTURE01-X))))) EQUAL-OK: (T 17 18 NIL) (PROGN (DEFSTRUCT STRUCTURE02A SLOT1 (SLOT2 T) (SLOT3 (FLOOR PI)) (SLOT4 44)) (DEFCLASS STRUCTURE02B (STRUCTURE02A) ((SLOT4 :INITFORM -44) (SLOT5) (SLOT6 :INITFORM T) (SLOT7 :INITFORM (FLOOR (* PI PI))) (SLOT8 :INITFORM 88)) (:METACLASS STRUCTURE-CLASS)) (DEFSTRUCT (STRUCTURE02C (:INCLUDE STRUCTURE02B (SLOT8 -88))) SLOT9 (SLOT10 T) (SLOT11 (FLOOR (EXP 3)))) (LET ((A (MAKE-STRUCTURE02C)) (B (MAKE-INSTANCE 'STRUCTURE02C))) (LIST (STRUCTURE02C-SLOT1 A) (STRUCTURE02C-SLOT2 A) (STRUCTURE02C-SLOT3 A) (STRUCTURE02C-SLOT4 A) (STRUCTURE02C-SLOT5 A) (STRUCTURE02C-SLOT6 A) (STRUCTURE02C-SLOT7 A) (STRUCTURE02C-SLOT8 A) (STRUCTURE02C-SLOT9 A) (STRUCTURE02C-SLOT10 A) (STRUCTURE02C-SLOT11 A) (STRUCTURE02C-SLOT2 B) (STRUCTURE02C-SLOT3 B) (STRUCTURE02C-SLOT4 B) (STRUCTURE02C-SLOT6 B) (STRUCTURE02C-SLOT7 B) (STRUCTURE02C-SLOT8 B) (STRUCTURE02C-SLOT10 B) (STRUCTURE02C-SLOT11 B) (EQUALP A (COPY-STRUCTURE A)) (EQUALP B (COPY-STRUCTURE B)) (EQUALP A B) (SYMBOLS-CLEANUP '(STRUCTURE02A STRUCTURE02B STRUCTURE02C))))) EQUAL-OK: (NIL T 3 -44 NIL T 9 -88 NIL T 20 T 3 -44 T 9 -88 T 20 T T NIL NIL) (PROGN (DEFCLASS STRUCTURE03A NIL ((SLOT1) (SLOT2 :INITFORM T) (SLOT3 :INITFORM (FLOOR PI)) (SLOT4 :INITFORM 44)) (:METACLASS STRUCTURE-CLASS)) (DEFSTRUCT (STRUCTURE03B (:INCLUDE STRUCTURE03A (SLOT4 -44))) SLOT5 (SLOT6 T) (SLOT7 (FLOOR (* PI PI))) (SLOT8 88)) (DEFCLASS STRUCTURE03C (STRUCTURE03B) ((SLOT8 :INITFORM -88) (SLOT9) (SLOT10 :INITFORM T) (SLOT11 :INITFORM (FLOOR (EXP 3)))) (:METACLASS STRUCTURE-CLASS)) (LET ((B (MAKE-INSTANCE 'STRUCTURE03C))) (LIST (SLOT-VALUE B 'SLOT2) (SLOT-VALUE B 'SLOT3) (SLOT-VALUE B 'SLOT4) (SLOT-VALUE B 'SLOT6) (SLOT-VALUE B 'SLOT7) (SLOT-VALUE B 'SLOT8) (SLOT-VALUE B 'SLOT10) (SLOT-VALUE B 'SLOT11) (EQUALP B (COPY-STRUCTURE B)) (SYMBOLS-CLEANUP '(STRUCTURE03A STRUCTURE03B STRUCTURE03C))))) EQUAL-OK: (T 3 -44 T 9 -88 T 20 T NIL) (DEFUN AS-STRING (OBJ) (LET ((STRING (WRITE-TO-STRING OBJ :ESCAPE T :PRETTY NIL))) (LET ((I (SEARCH "#x" STRING))) (WHEN I (LET ((J (OR (POSITION-IF-NOT #'(LAMBDA (C) (DIGIT-CHAR-P C 16)) STRING :START (+ I 2)) (LENGTH STRING)))) (SETQ STRING (CONCATENATE 'STRING (SUBSEQ STRING 0 I) (SUBSEQ STRING J)))))) (DO ((POS 0)) (NIL) (LET ((I (SEARCH "{" STRING :START2 POS))) (UNLESS I (RETURN)) (LET ((J (POSITION-IF-NOT #'(LAMBDA (C) (DIGIT-CHAR-P C 16)) STRING :START (+ I 1)))) (IF (AND J (EQL (CHAR STRING J) #\})) (PROGN (SETQ STRING (CONCATENATE 'STRING (SUBSEQ STRING 0 (+ I 1)) (SUBSEQ STRING J))) (SETQ POS (+ I 2))) (SETQ POS (+ I 1)))))) (DO ((POS 0)) (NIL) (LET ((I (SEARCH ">" STRING :START2 POS))) (UNLESS I (RETURN)) (IF (AND (>= (- I POS) 8) (EQL (POSITION-IF-NOT #'(LAMBDA (C) (DIGIT-CHAR-P C 16)) STRING :START (- I 8)) I)) (PROGN (SETQ STRING (CONCATENATE 'STRING (SUBSEQ STRING 0 (- I 8)) (SUBSEQ STRING I))) (SETQ POS (+ (- I 8) 1))) (SETQ POS (+ I 1))))) STRING)) EQL-OK: AS-STRING (AS-STRING (ALLOCATE-INSTANCE (FIND-CLASS 'SPECIALIZER))) EQUAL-OK: "#" (AS-STRING (ALLOCATE-INSTANCE (FIND-CLASS 'CLASS))) EQUAL-OK: "#>" (AS-STRING (ALLOCATE-INSTANCE (FIND-CLASS 'STANDARD-CLASS))) EQUAL-OK: "# :UNINITIALIZED>" (AS-STRING (ALLOCATE-INSTANCE (FIND-CLASS 'STRUCTURE-CLASS))) EQUAL-OK: "#>" (AS-STRING (ALLOCATE-INSTANCE (FIND-CLASS 'EQL-SPECIALIZER))) EQUAL-OK: "#>" (AS-STRING (ALLOCATE-INSTANCE (FIND-CLASS 'SLOT-DEFINITION))) EQUAL-OK: "# >" (AS-STRING (ALLOCATE-INSTANCE (FIND-CLASS 'DIRECT-SLOT-DEFINITION))) EQUAL-OK: "# >" (AS-STRING (ALLOCATE-INSTANCE (FIND-CLASS 'EFFECTIVE-SLOT-DEFINITION))) EQUAL-OK: "# >" (AS-STRING (ALLOCATE-INSTANCE (FIND-CLASS 'STANDARD-DIRECT-SLOT-DEFINITION))) EQUAL-OK: "# >" (AS-STRING (ALLOCATE-INSTANCE (FIND-CLASS 'STANDARD-EFFECTIVE-SLOT-DEFINITION))) EQUAL-OK: "# >" (AS-STRING (ALLOCATE-INSTANCE (FIND-CLASS 'METHOD-COMBINATION))) EQUAL-OK: "# >" (AS-STRING (ALLOCATE-INSTANCE (FIND-CLASS 'METHOD))) EQUAL-OK: "#" (AS-STRING (ALLOCATE-INSTANCE (FIND-CLASS 'STANDARD-METHOD))) EQUAL-OK: "#" (AS-STRING (ALLOCATE-INSTANCE (FIND-CLASS 'STANDARD-READER-METHOD))) EQUAL-OK: "#" (AS-STRING (ALLOCATE-INSTANCE (FIND-CLASS 'STANDARD-WRITER-METHOD))) EQUAL-OK: "#" (AS-STRING (ALLOCATE-INSTANCE (FIND-CLASS 'FUNCALLABLE-STANDARD-OBJECT))) EQUAL-OK: "#>" (AS-STRING (ALLOCATE-INSTANCE (FIND-CLASS 'GENERIC-FUNCTION))) EQUAL-OK: "#>" (AS-STRING (ALLOCATE-INSTANCE (FIND-CLASS 'STANDARD-GENERIC-FUNCTION))) EQUAL-OK: "#>" (PROGN (DEFCLASS FOO135B NIL ((S :INITARG :S :ACCESSOR FOO135B-S))) (UNLESS (CLASS-FINALIZED-P (FIND-CLASS 'FOO135B)) (FINALIZE-INHERITANCE (FIND-CLASS 'FOO135B))) (CLASS-PROTOTYPE (FIND-CLASS 'FOO135B)) (DEFCLASS FOO135B (FOO135A) ((S :ACCESSOR FOO135B-S))) (SYMBOLS-CLEANUP '(FOO135B FOO135B-S)) T) EQL-OK: T (LET ((WRONG 'NIL)) (LABELS ((CHECK-TREE (C) (UNLESS (MEMBER (CLASS-NAME C) '(STREAM SEQUENCE LIST NUMBER REAL RATIONAL)) (LET ((P (CLASS-PROTOTYPE C))) (UNLESS (EQ (CLASS-OF P) C) (PUSH (LIST C P) WRONG)))) (UNLESS (OR (MEMBER (FIND-CLASS 'STANDARD-OBJECT) (CLASS-PRECEDENCE-LIST C)) (MEMBER (FIND-CLASS 'STRUCTURE-OBJECT) (CLASS-PRECEDENCE-LIST C))) (MAPC #'CHECK-TREE (CLASS-DIRECT-SUBCLASSES C))))) (CHECK-TREE (FIND-CLASS 'T)) WRONG)) EQL-OK: NIL (PROGN (SETQ *FORWARD-REFERENCED-CLASS-MISDESIGN* T) (DEFCLASS FOO133 (FORWARDCLASS03) NIL) (DEFPARAMETER *FORWARDCLASS* (FIRST (CLASS-DIRECT-SUPERCLASSES (FIND-CLASS 'FOO133)))) T) EQL-OK: T (TYPEP 1 *FORWARDCLASS*) [SIMPLE-ERROR]: TYPEP: invalid type specification #1=# EQL-OK: ERROR (LOCALLY (DECLARE (COMPILE)) (TYPEP 1 *FORWARDCLASS*)) [SIMPLE-ERROR]: TYPEP: invalid type specification #1=# EQL-OK: ERROR (TYPE-EXPAND *FORWARDCLASS*) [SIMPLE-ERROR]: TYPE-EXPAND: invalid type specification #1=# EQL-OK: ERROR (SUBTYPEP *FORWARDCLASS* 'T) [SIMPLE-ERROR]: SUBTYPEP: invalid type specification #1=# EQL-OK: ERROR (SUBTYPEP 'NIL *FORWARDCLASS*) [SIMPLE-ERROR]: SUBTYPEP: invalid type specification #1=# EQL-OK: ERROR (SYSTEM::SUBTYPE-INTEGER *FORWARDCLASS*) [SIMPLE-ERROR]: SUBTYPEP: invalid type specification #1=# EQL-OK: ERROR (SYSTEM::SUBTYPE-SEQUENCE *FORWARDCLASS*) EQL-OK: NIL (WRITE-TO-STRING *FORWARDCLASS* :READABLY T) [SIMPLE-PRINT-NOT-READABLE]: PRINT: Despite *PRINT-READABLY*, #1=# cannot be printed readably. EQL-OK: ERROR (SETF (FIND-CLASS 'FOO133A) *FORWARDCLASS*) [SIMPLE-TYPE-ERROR]: (SETF FIND-CLASS): #1=# is not a class EQL-OK: ERROR (CLASS-NAME *FORWARDCLASS*) EQL-OK: FORWARDCLASS03 (SETF (CLASS-NAME *FORWARDCLASS*) 'FORWARDCLASS03CHANGED) [SIMPLE-ERROR]: REINITIALIZE-INSTANCE: It is not allowed to reinitialize #1=# EQL-OK: ERROR (CLASS-NAME *FORWARDCLASS*) EQL-OK: FORWARDCLASS03 (CLASS-DIRECT-SUPERCLASSES *FORWARDCLASS*) WARNING: CLASS-DIRECT-SUPERCLASSES being called on #1=#, but class FORWARDCLASS03 is not yet defined. EQL-OK: NIL (CLASS-DIRECT-SLOTS *FORWARDCLASS*) WARNING: CLASS-DIRECT-SLOTS being called on #1=#, but class FORWARDCLASS03 is not yet defined. EQL-OK: NIL (CLASS-DIRECT-DEFAULT-INITARGS *FORWARDCLASS*) WARNING: CLASS-DIRECT-DEFAULT-INITARGS being called on #1=#, but class FORWARDCLASS03 is not yet defined. EQL-OK: NIL (CLASS-PRECEDENCE-LIST *FORWARDCLASS*) [METHOD-CALL-TYPE-ERROR]: NO-APPLICABLE-METHOD: When calling #1=# with arguments #2=(#3=#), no method is applicable. EQL-OK: ERROR (CLASS-SLOTS *FORWARDCLASS*) [METHOD-CALL-TYPE-ERROR]: NO-APPLICABLE-METHOD: When calling #1=# with arguments #2=(#3=#), no method is applicable. EQL-OK: ERROR (CLASS-DEFAULT-INITARGS *FORWARDCLASS*) [METHOD-CALL-TYPE-ERROR]: NO-APPLICABLE-METHOD: When calling #1=# with arguments #2=(#3=#), no method is applicable. EQL-OK: ERROR (CLASS-FINALIZED-P *FORWARDCLASS*) EQL-OK: NIL (CLASS-PROTOTYPE *FORWARDCLASS*) [METHOD-CALL-TYPE-ERROR]: NO-APPLICABLE-METHOD: When calling #1=# with arguments #2=(#3=#), no method is applicable. EQL-OK: ERROR (FINALIZE-INHERITANCE *FORWARDCLASS*) [METHOD-CALL-TYPE-ERROR]: NO-APPLICABLE-METHOD: When calling #1=# with arguments #2=(#3=#), no method is applicable. EQL-OK: ERROR (CLASS-FINALIZED-P *FORWARDCLASS*) EQL-OK: NIL (EVAL `(DEFMETHOD FOO133A ((X ,*FORWARDCLASS*)))) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFMETHOD FOO133A: Invalid specializer #1=# in lambda list #2=((X #1#)) EQL-OK: ERROR (PROGN (DEFGENERIC FOO133B (X) (:METHOD ((X INTEGER)) X)) (ADD-METHOD #'FOO133B (MAKE-INSTANCE 'STANDARD-METHOD :QUALIFIERS 'NIL :LAMBDA-LIST '(X) :SPECIALIZERS (LIST *FORWARDCLASS*) :FUNCTION #'(LAMBDA (ARGS NEXT-METHODS) (FIRST ARGS))))) [SIMPLE-ERROR]: (INITIALIZE-INSTANCE STANDARD-METHOD): The element #1=# of the :SPECIALIZERS argument is not yet defined. EQL-OK: ERROR (NOT (NOT (TYPEP *FORWARDCLASS* 'CLASS))) EQL-OK: T (NOT (NOT (TYPEP *FORWARDCLASS* 'SPECIALIZER))) EQL-OK: T (SUBTYPEP 'FORWARD-REFERENCED-CLASS 'CLASS) EQL-OK: T (SUBTYPEP 'FORWARD-REFERENCED-CLASS 'SPECIALIZER) EQL-OK: T (PROGN (SETQ *FORWARD-REFERENCED-CLASS-MISDESIGN* NIL) (DEFCLASS FOO134 (FORWARDCLASS04) NIL) (DEFPARAMETER *FORWARDCLASS* (FIRST (CLASS-DIRECT-SUPERCLASSES (FIND-CLASS 'FOO134)))) T) EQL-OK: T (TYPEP 1 *FORWARDCLASS*) [SIMPLE-ERROR]: TYPEP: invalid type specification #1=# EQL-OK: ERROR (LOCALLY (DECLARE (COMPILE)) (TYPEP 1 *FORWARDCLASS*)) [SIMPLE-ERROR]: TYPEP: invalid type specification #1=# EQL-OK: ERROR (TYPE-EXPAND *FORWARDCLASS*) [SIMPLE-ERROR]: TYPE-EXPAND: invalid type specification #1=# EQL-OK: ERROR (SUBTYPEP *FORWARDCLASS* 'T) [SIMPLE-ERROR]: SUBTYPEP: invalid type specification #1=# EQL-OK: ERROR (SUBTYPEP 'NIL *FORWARDCLASS*) [SIMPLE-ERROR]: SUBTYPEP: invalid type specification #1=# EQL-OK: ERROR (SYSTEM::SUBTYPE-INTEGER *FORWARDCLASS*) [SIMPLE-ERROR]: SUBTYPEP: invalid type specification #1=# EQL-OK: ERROR (SYSTEM::SUBTYPE-SEQUENCE *FORWARDCLASS*) EQL-OK: NIL (WRITE-TO-STRING *FORWARDCLASS* :READABLY T) [SIMPLE-PRINT-NOT-READABLE]: PRINT: Despite *PRINT-READABLY*, #1=# cannot be printed readably. EQL-OK: ERROR (SETF (FIND-CLASS 'FOO134A) *FORWARDCLASS*) [SIMPLE-TYPE-ERROR]: (SETF FIND-CLASS): #1=# is not a class EQL-OK: ERROR (CLASS-NAME *FORWARDCLASS*) EQL-OK: FORWARDCLASS04 (SETF (CLASS-NAME *FORWARDCLASS*) 'FORWARDCLASS04CHANGED) [METHOD-CALL-TYPE-ERROR]: NO-APPLICABLE-METHOD: When calling #1=# with arguments #2=(FORWARDCLASS04CHANGED #3=#), no method is applicable. EQL-OK: ERROR (CLASS-NAME *FORWARDCLASS*) EQL-OK: FORWARDCLASS04 (CLASS-DIRECT-SUPERCLASSES *FORWARDCLASS*) WARNING: CLASS-DIRECT-SUPERCLASSES being called on #1=#, but class FORWARDCLASS04 is not yet defined. EQL-OK: NIL (CLASS-DIRECT-SLOTS *FORWARDCLASS*) WARNING: CLASS-DIRECT-SLOTS being called on #1=#, but class FORWARDCLASS04 is not yet defined. EQL-OK: NIL (CLASS-DIRECT-DEFAULT-INITARGS *FORWARDCLASS*) WARNING: CLASS-DIRECT-DEFAULT-INITARGS being called on #1=#, but class FORWARDCLASS04 is not yet defined. EQL-OK: NIL (CLASS-PRECEDENCE-LIST *FORWARDCLASS*) [METHOD-CALL-TYPE-ERROR]: NO-APPLICABLE-METHOD: When calling #1=# with arguments #2=(#3=#), no method is applicable. EQL-OK: ERROR (CLASS-SLOTS *FORWARDCLASS*) [METHOD-CALL-TYPE-ERROR]: NO-APPLICABLE-METHOD: When calling #1=# with arguments #2=(#3=#), no method is applicable. EQL-OK: ERROR (CLASS-DEFAULT-INITARGS *FORWARDCLASS*) [METHOD-CALL-TYPE-ERROR]: NO-APPLICABLE-METHOD: When calling #1=# with arguments #2=(#3=#), no method is applicable. EQL-OK: ERROR (CLASS-FINALIZED-P *FORWARDCLASS*) EQL-OK: NIL (CLASS-PROTOTYPE *FORWARDCLASS*) [METHOD-CALL-TYPE-ERROR]: NO-APPLICABLE-METHOD: When calling #1=# with arguments #2=(#3=#), no method is applicable. EQL-OK: ERROR (FINALIZE-INHERITANCE *FORWARDCLASS*) [METHOD-CALL-TYPE-ERROR]: NO-APPLICABLE-METHOD: When calling #1=# with arguments #2=(#3=#), no method is applicable. EQL-OK: ERROR (CLASS-FINALIZED-P *FORWARDCLASS*) EQL-OK: NIL (EVAL `(DEFMETHOD FOO134A ((X ,*FORWARDCLASS*)))) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFMETHOD FOO134A: Invalid specializer #1=# in lambda list #2=((X #1#)) EQL-OK: ERROR (PROGN (DEFGENERIC FOO134B (X) (:METHOD ((X INTEGER)) X)) (ADD-METHOD #'FOO134B (MAKE-INSTANCE 'STANDARD-METHOD :QUALIFIERS 'NIL :LAMBDA-LIST '(X) :SPECIALIZERS (LIST *FORWARDCLASS*) :FUNCTION #'(LAMBDA (ARGS NEXT-METHODS) (FIRST ARGS))))) [SIMPLE-ERROR]: (INITIALIZE-INSTANCE STANDARD-METHOD): The element #1=# of the :SPECIALIZERS argument is not of type SPECIALIZER. EQL-OK: ERROR (NOT (NOT (TYPEP *FORWARDCLASS* 'CLASS))) EQL-OK: NIL (NOT (NOT (TYPEP *FORWARDCLASS* 'SPECIALIZER))) EQL-OK: NIL (SUBTYPEP 'FORWARD-REFERENCED-CLASS 'CLASS) EQL-OK: NIL (SUBTYPEP 'FORWARD-REFERENCED-CLASS 'SPECIALIZER) EQL-OK: NIL (LET ((F (MAKE-INSTANCE 'FUNCALLABLE-STANDARD-OBJECT))) (SET-FUNCALLABLE-INSTANCE-FUNCTION F #'CONS) (FUNCALL F 'A 'B)) EQUAL-OK: (A . B) (LET ((F (MAKE-INSTANCE 'FUNCALLABLE-STANDARD-OBJECT))) (SET-FUNCALLABLE-INSTANCE-FUNCTION F #'(LAMBDA (X Y) (DECLARE (COMPILE)) (CONS X Y))) (FUNCALL F 'A 'B)) EQUAL-OK: (A . B) (LET ((F (MAKE-INSTANCE 'FUNCALLABLE-STANDARD-OBJECT))) (SET-FUNCALLABLE-INSTANCE-FUNCTION F #'(LAMBDA (X Y) (DECLARE (COMPILE)) (LIST 'START X Y 'END))) (FUNCALL F 'A 'B)) EQUAL-OK: (START A B END) (LET ((F (MAKE-INSTANCE 'FUNCALLABLE-STANDARD-OBJECT))) (SET-FUNCALLABLE-INSTANCE-FUNCTION F #'(LAMBDA (X Y) (CONS X Y))) (FUNCALL F 'A 'B)) EQUAL-OK: (A . B) (LET ((F (MAKE-INSTANCE 'FUNCALLABLE-STANDARD-OBJECT))) (DEFGENERIC TEST-FUNCALLABLE-01 (X Y) (:METHOD (X Y) (CONS X Y))) (SET-FUNCALLABLE-INSTANCE-FUNCTION F #'TEST-FUNCALLABLE-01) (LIST (FUNCALL F 'A 'B) (SYMBOL-CLEANUP 'TEST-FUNCALLABLE-01))) EQUAL-OK: ((A . B) T) (PROGN (DEFCLASS MY-GF-CLASS (STANDARD-GENERIC-FUNCTION) ((MYSLOT :INITFORM 17 :ACCESSOR MY-MYSLOT)) (:METACLASS FUNCALLABLE-STANDARD-CLASS)) T) EQL-OK: T (PROGN (DEFGENERIC FOO110 (X)) (DEFMETHOD FOO110 ((X INTEGER)) (* X X)) (DEFGENERIC FOO110 (X) (:GENERIC-FUNCTION-CLASS MY-GF-CLASS)) (DEFMETHOD FOO110 ((X FLOAT)) (* X X X)) (LIST (FOO110 10) (FOO110 3.0) (MY-MYSLOT #'FOO110) (SYMBOL-CLEANUP 'FOO110))) EQUAL-OK: (100 27.0 17 T) (PROGN (DEFGENERIC FOO111 (X)) (DEFMETHOD FOO111 ((X INTEGER)) (* X X)) (DEFGENERIC FOO111 (X) (:GENERIC-FUNCTION-CLASS MY-GF-CLASS)) (GC) (DEFMETHOD FOO111 ((X FLOAT)) (* X X X)) (LIST (FOO111 10) (FOO111 3.0) (MY-MYSLOT #'FOO111) (EQ (SYSTEM::%RECORD-REF #'FOO111 0) (CLOS::CLASS-CURRENT-VERSION (FIND-CLASS 'MY-GF-CLASS))) (SYMBOL-CLEANUP 'FOO111))) EQUAL-OK: (100 27.0 17 T T) (PROGN (DEFGENERIC FOO112 (X)) (DEFMETHOD FOO112 ((X INTEGER)) (* X X)) (DEFGENERIC FOO112 (X) (:GENERIC-FUNCTION-CLASS MY-GF-CLASS)) (DEFMETHOD FOO112 ((X FLOAT)) (* X X X)) (GC) (LIST (FOO112 10) (FOO112 3.0) (MY-MYSLOT #'FOO112) (EQ (SYSTEM::%RECORD-REF #'FOO112 0) (CLOS::CLASS-CURRENT-VERSION (FIND-CLASS 'MY-GF-CLASS))) (SYMBOL-CLEANUP 'FOO112))) EQUAL-OK: (100 27.0 17 T T) (PROGN (ENSURE-GENERIC-FUNCTION 'FOO113 :DECLARE '((OPTIMIZE (SPEED 3)))) (LIST (GENERIC-FUNCTION-DECLARATIONS #'FOO113) (SYMBOL-CLEANUP 'FOO113))) EQUAL-OK: (((OPTIMIZE (SPEED 3))) T) (PROGN (ENSURE-GENERIC-FUNCTION 'FOO114 :DECLARATIONS '((OPTIMIZE (SPEED 3)))) (LIST (GENERIC-FUNCTION-DECLARATIONS #'FOO114) (SYMBOL-CLEANUP 'FOO114))) EQUAL-OK: (((OPTIMIZE (SPEED 3))) T) (PROGN (ENSURE-GENERIC-FUNCTION 'FOO115) (DEFMETHOD FOO115 (X Y) (LIST X Y)) (LIST (FOO115 3 4) (SYMBOL-CLEANUP 'FOO115))) EQUAL-OK: ((3 4) T) (PROGN (DEFCLASS OPTION-CLASS (STANDARD-CLASS) ((OPTION :ACCESSOR CL-OPTION :INITARG :MY-OPTION))) (MACROLET ((EVAL-SUCCEEDS (FORM) `(NOT (NTH-VALUE 1 (IGNORE-ERRORS (EVAL ',FORM)))))) (LIST (EVAL-SUCCEEDS (DEFCLASS TESTCLASS02A NIL NIL (:MY-OPTION FOO) (:METACLASS OPTION-CLASS))) (CL-OPTION (FIND-CLASS 'TESTCLASS02A)) (EVAL-SUCCEEDS (DEFCLASS TESTCLASS02B NIL NIL (:MY-OPTION BAR) (:MY-OPTION BAZ) (:METACLASS OPTION-CLASS))) (EVAL-SUCCEEDS (DEFCLASS TESTCLASS02C NIL NIL (:OTHER-OPTION FOO) (:METACLASS OPTION-CLASS))) (SYMBOLS-CLEANUP '(OPTION-CLASS TESTCLASS02A TESTCLASS02B TESTCLASS02C))))) EQUAL-OK: (T (FOO) NIL NIL NIL) (PROGN (DEFCLASS OPTION-SLOT-DEFINITION (STANDARD-DIRECT-SLOT-DEFINITION) ((OPTION :ACCESSOR SL-OPTION :INITARG :MY-OPTION))) (DEFCLASS OPTION-SLOT-CLASS (STANDARD-CLASS) NIL) (DEFMETHOD DIRECT-SLOT-DEFINITION-CLASS ((C OPTION-SLOT-CLASS) &REST ARGS) (DECLARE (IGNORE ARGS)) (FIND-CLASS 'OPTION-SLOT-DEFINITION)) (MACROLET ((EVAL-SUCCEEDS (FORM) `(NOT (NTH-VALUE 1 (IGNORE-ERRORS (EVAL ',FORM)))))) (LIST (EVAL-SUCCEEDS (DEFCLASS TESTCLASS03A NIL ((X :MY-OPTION FOO)) (:METACLASS OPTION-SLOT-CLASS))) (SL-OPTION (FIRST (CLASS-DIRECT-SLOTS (FIND-CLASS 'TESTCLASS03A)))) (EVAL-SUCCEEDS (DEFCLASS TESTCLASS03B NIL ((X :MY-OPTION BAR :MY-OPTION BAZ)) (:METACLASS OPTION-SLOT-CLASS))) (SL-OPTION (FIRST (CLASS-DIRECT-SLOTS (FIND-CLASS 'TESTCLASS03B)))) (EVAL-SUCCEEDS (DEFCLASS TESTCLASS03C NIL ((X :OTHER-OPTION FOO)) (:METACLASS OPTION-SLOT-CLASS))) (EVAL-SUCCEEDS (DEFCLASS TESTCLASS03D NIL ((X :MY-OPTION FOO)) (:MY-OPTION BAR) (:METACLASS OPTION-SLOT-CLASS))) (SYMBOLS-CLEANUP '(OPTION-SLOT-DEFINITION OPTION-SLOT-CLASS TESTCLASS03A TESTCLASS03B TESTCLASS03C TESTCLASS03D))))) EQUAL-OK: (T FOO T (BAR BAZ) NIL NIL NIL) (PROGN (DEFCLASS EXTENDED-SLOT-DEFINITION (STANDARD-DIRECT-SLOT-DEFINITION) ((OPTION1 :INITARG :OPTION1) (OPTION2 :INITARG :OPTION2))) (DEFCLASS EXTENDED-SLOT-CLASS (STANDARD-CLASS) NIL) (DEFMETHOD DIRECT-SLOT-DEFINITION-CLASS ((C EXTENDED-SLOT-CLASS) &REST ARGS) (DECLARE (IGNORE ARGS)) (FIND-CLASS 'EXTENDED-SLOT-DEFINITION)) (DEFCLASS TESTCLASS03E NIL ((X :OPTION1 BAR)) (:METACLASS EXTENDED-SLOT-CLASS)) (DEFCLASS TESTCLASS03E NIL ((X :OPTION2 BAZ)) (:METACLASS EXTENDED-SLOT-CLASS)) (LET ((CL (FIND-CLASS 'TESTCLASS03E))) (LIST (LENGTH (CLASS-DIRECT-SLOTS CL)) (SLOT-BOUNDP (FIRST (CLASS-DIRECT-SLOTS CL)) 'OPTION1) (SLOT-BOUNDP (FIRST (CLASS-DIRECT-SLOTS CL)) 'OPTION2) (SYMBOLS-CLEANUP '(EXTENDED-SLOT-DEFINITION EXTENDED-SLOT-CLASS TESTCLASS03E))))) EQUAL-OK: (1 NIL T NIL) (PROGN (DEFCLASS TESTCLASS51 (STANDARD-CLASS) NIL (:DEFAULT-INITARGS :DOCUMENTATION "some doc")) (LIST (MAPCAR #'(LAMBDA (X) (DOCUMENTATION X 'TYPE)) (LIST (DEFCLASS TESTCLASS51A NIL NIL) (DEFCLASS TESTCLASS51B NIL NIL (:METACLASS TESTCLASS51)) (DEFCLASS TESTCLASS51C NIL NIL (:DOCUMENTATION "some other doc") (:METACLASS TESTCLASS51)))) (SYMBOLS-CLEANUP '(TESTCLASS51 TESTCLASS51A TESTCLASS51B TESTCLASS51C)))) EQUAL-OK: ((NIL "some doc" "some other doc") NIL) (PROGN (DEFCLASS OPTION-GENERIC-FUNCTION (STANDARD-GENERIC-FUNCTION) ((OPTION :ACCESSOR GF-OPTION :INITARG :MY-OPTION)) (:METACLASS FUNCALLABLE-STANDARD-CLASS)) (MACROLET ((EVAL-SUCCEEDS (FORM) `(NOT (NTH-VALUE 1 (IGNORE-ERRORS (EVAL ',FORM)))))) (LIST (EVAL-SUCCEEDS (DEFGENERIC TESTGF04A (X Y) (:MY-OPTION FOO) (:GENERIC-FUNCTION-CLASS OPTION-GENERIC-FUNCTION))) (GF-OPTION #'TESTGF04A) (EVAL-SUCCEEDS (DEFGENERIC TESTGF04B (X Y) (:MY-OPTION BAR) (:MY-OPTION BAZ) (:GENERIC-FUNCTION-CLASS OPTION-GENERIC-FUNCTION))) (EVAL-SUCCEEDS (DEFGENERIC TESTGF04C (X Y) (:MY-OPTION BAR) (:OTHER-OPTION BAZ) (:GENERIC-FUNCTION-CLASS OPTION-GENERIC-FUNCTION))) (SYMBOLS-CLEANUP '(OPTION-GENERIC-FUNCTION TESTGF04A TESTGF04B TESTGF04C))))) EQUAL-OK: (T (FOO) NIL NIL NIL) (PROGN (DEFCLASS TESTMETHOD50 (STANDARD-METHOD) NIL) (DEFCLASS TESTGENERICFUNCTION50 (STANDARD-GENERIC-FUNCTION) NIL (:DEFAULT-INITARGS :METHOD-CLASS (FIND-CLASS 'TESTMETHOD50)) (:METACLASS FUNCALLABLE-STANDARD-CLASS)) (LIST (MAPCAR #'CLASS-NAME (MAPCAR #'GENERIC-FUNCTION-METHOD-CLASS (LIST (DEFGENERIC TESTGF50A (X)) (DEFGENERIC TESTGF50B (X) (:GENERIC-FUNCTION-CLASS TESTGENERICFUNCTION50)) (DEFGENERIC TESTGF50C (X) (:METHOD-CLASS STANDARD-METHOD) (:GENERIC-FUNCTION-CLASS TESTGENERICFUNCTION50)) (DEFGENERIC TESTGF50D (X) (:METHOD-CLASS TESTMETHOD50) (:GENERIC-FUNCTION-CLASS TESTGENERICFUNCTION50))))) (SYMBOLS-CLEANUP '(TESTMETHOD50 TESTGENERICFUNCTION50 TESTGF50A TESTGF50B TESTGF50C TESTGF50D)))) EQUAL-OK: ((STANDARD-METHOD #1=#:TESTMETHOD50 STANDARD-METHOD #1#) NIL) (PROGN (DEFCLASS DEPENDENT05 NIL ((COUNTER :INITFORM 0))) (DEFCLASS TESTCLASS05 NIL NIL) (DEFMETHOD UPDATE-DEPENDENT ((C CLASS) (D DEPENDENT05) &REST ARGS) (INCF (SLOT-VALUE D 'COUNTER))) (LET ((TESTCLASS (FIND-CLASS 'TESTCLASS05)) (DEP1 (MAKE-INSTANCE 'DEPENDENT05)) (DEP2 (MAKE-INSTANCE 'DEPENDENT05)) (DEP3 (MAKE-INSTANCE 'DEPENDENT05))) (ADD-DEPENDENT TESTCLASS DEP1) (ADD-DEPENDENT TESTCLASS DEP2) (ADD-DEPENDENT TESTCLASS DEP3) (ADD-DEPENDENT TESTCLASS DEP1) (REINITIALIZE-INSTANCE TESTCLASS :NAME 'TESTCLASS05-RENAMED) (REMOVE-DEPENDENT TESTCLASS DEP2) (REINITIALIZE-INSTANCE TESTCLASS :NAME 'TESTCLASS05-RERENAMED) (LIST (SLOT-VALUE DEP1 'COUNTER) (SLOT-VALUE DEP2 'COUNTER) (SLOT-VALUE DEP3 'COUNTER) (SYMBOLS-CLEANUP '(DEPENDENT05 TESTCLASS05))))) EQUAL-OK: (2 1 2 NIL) (DEFUN DEPENDENT-METHODS (OBJECTS SLOT) (MAPCAR (LAMBDA (OBJ) (MAPCAR (LAMBDA (EVENT) (MAPCAR (LAMBDA (X) (IF (TYPEP X 'METHOD) (LIST 'METHOD (MAPCAR #'CLASS-NAME (METHOD-SPECIALIZERS X))) X)) EVENT)) (REVERSE (SLOT-VALUE OBJ SLOT)))) OBJECTS)) EQL-OK: DEPENDENT-METHODS (PROGN (DEFCLASS DEPENDENT06 NIL ((HISTORY :INITFORM 'NIL))) (DEFGENERIC TESTGF06 (X)) (DEFMETHOD UPDATE-DEPENDENT ((GF GENERIC-FUNCTION) (D DEPENDENT06) &REST ARGS) (PUSH ARGS (SLOT-VALUE D 'HISTORY))) (LET ((TESTGF #'TESTGF06) (DEP1 (MAKE-INSTANCE 'DEPENDENT06)) (DEP2 (MAKE-INSTANCE 'DEPENDENT06)) (DEP3 (MAKE-INSTANCE 'DEPENDENT06))) (ADD-DEPENDENT TESTGF DEP1) (ADD-DEPENDENT TESTGF DEP2) (ADD-DEPENDENT TESTGF DEP3) (ADD-DEPENDENT TESTGF DEP1) (REINITIALIZE-INSTANCE TESTGF :NAME 'TESTGF06-RENAMED) (DEFMETHOD TESTGF06 ((X INTEGER))) (REMOVE-DEPENDENT TESTGF DEP2) (DEFMETHOD TESTGF06 ((X REAL))) (REMOVE-METHOD TESTGF (FIND-METHOD TESTGF 'NIL (LIST (FIND-CLASS 'INTEGER)))) (LIST (DEPENDENT-METHODS (LIST DEP1 DEP2 DEP3) 'HISTORY) (SYMBOLS-CLEANUP '(DEPENDENT06 TESTGF06))))) WARNING: Adding method # #2=#)> to an already called generic function # EQUAL-OK: ((((:NAME TESTGF06-RENAMED) (ADD-METHOD (METHOD (INTEGER))) (ADD-METHOD (METHOD (REAL))) (REMOVE-METHOD (METHOD (INTEGER)))) ((:NAME TESTGF06-RENAMED) (ADD-METHOD (METHOD (INTEGER)))) ((:NAME TESTGF06-RENAMED) (ADD-METHOD (METHOD (INTEGER))) (ADD-METHOD (METHOD (REAL))) (REMOVE-METHOD (METHOD (INTEGER))))) NIL) (PROGN (DEFPARAMETER *TIMESTAMP* 0) (DEFCLASS PRIORITIZED-DEPENDENT NIL ((PRIORITY :TYPE REAL :INITFORM 0 :INITARG :PRIORITY :READER DEPENDENT-PRIORITY))) (DEFCLASS PRIORITIZED-DISPATCHER NIL ((DEPENDENTS :TYPE LIST :INITFORM NIL))) (DEFMETHOD ADD-DEPENDENT ((METAOBJECT PRIORITIZED-DISPATCHER) (DEPENDENT PRIORITIZED-DEPENDENT)) (UNLESS (MEMBER DEPENDENT (SLOT-VALUE METAOBJECT 'DEPENDENTS)) (SETF (SLOT-VALUE METAOBJECT 'DEPENDENTS) (SORT (CONS DEPENDENT (SLOT-VALUE METAOBJECT 'DEPENDENTS)) #'> :KEY #'DEPENDENT-PRIORITY)))) (DEFMETHOD REMOVE-DEPENDENT ((METAOBJECT PRIORITIZED-DISPATCHER) (DEPENDENT PRIORITIZED-DEPENDENT)) (SETF (SLOT-VALUE METAOBJECT 'DEPENDENTS) (DELETE DEPENDENT (SLOT-VALUE METAOBJECT 'DEPENDENTS)))) (DEFMETHOD MAP-DEPENDENTS ((METAOBJECT PRIORITIZED-DISPATCHER) FUNCTION) (DOLIST (DEPENDENT (SLOT-VALUE METAOBJECT 'DEPENDENTS)) (FUNCALL FUNCTION DEPENDENT) (INCF *TIMESTAMP*))) T) EQL-OK: T (PROGN (SETQ *TIMESTAMP* 0) (DEFCLASS PRIORITIZED-CLASS (PRIORITIZED-DISPATCHER STANDARD-CLASS) NIL) (DEFCLASS TESTCLASS07 NIL NIL (:METACLASS PRIORITIZED-CLASS)) (DEFCLASS DEPENDENT07 (PRIORITIZED-DEPENDENT) ((HISTORY :INITFORM NIL))) (DEFMETHOD UPDATE-DEPENDENT ((C CLASS) (D DEPENDENT07) &REST ARGS) (PUSH (CONS *TIMESTAMP* ARGS) (SLOT-VALUE D 'HISTORY))) (LET ((TESTCLASS (FIND-CLASS 'TESTCLASS07)) (DEP1 (MAKE-INSTANCE 'DEPENDENT07 :PRIORITY 5)) (DEP2 (MAKE-INSTANCE 'DEPENDENT07 :PRIORITY 10)) (DEP3 (MAKE-INSTANCE 'DEPENDENT07 :PRIORITY 1))) (ADD-DEPENDENT TESTCLASS DEP1) (ADD-DEPENDENT TESTCLASS DEP2) (ADD-DEPENDENT TESTCLASS DEP3) (ADD-DEPENDENT TESTCLASS DEP1) (REINITIALIZE-INSTANCE TESTCLASS :NAME 'TESTCLASS07-RENAMED) (REMOVE-DEPENDENT TESTCLASS DEP2) (REINITIALIZE-INSTANCE TESTCLASS :NAME 'TESTCLASS07-RERENAMED) (LIST (REVERSE (SLOT-VALUE DEP1 'HISTORY)) (REVERSE (SLOT-VALUE DEP2 'HISTORY)) (REVERSE (SLOT-VALUE DEP3 'HISTORY)) (SYMBOLS-CLEANUP '(PRIORITIZED-CLASS TESTCLASS07 DEPENDENT07))))) WARNING: Adding method # #2=#)> to an already called generic function # EQUAL-OK: (((1 :NAME TESTCLASS07-RENAMED) (3 :NAME TESTCLASS07-RERENAMED)) ((0 :NAME TESTCLASS07-RENAMED)) ((2 :NAME TESTCLASS07-RENAMED) (4 :NAME TESTCLASS07-RERENAMED)) NIL) (PROGN (SETQ *TIMESTAMP* 0) (DEFCLASS PRIORITIZED-GENERIC-FUNCTION (PRIORITIZED-DISPATCHER STANDARD-GENERIC-FUNCTION) NIL (:METACLASS FUNCALLABLE-STANDARD-CLASS)) (DEFGENERIC TESTGF08 (X) (:GENERIC-FUNCTION-CLASS PRIORITIZED-GENERIC-FUNCTION)) (DEFCLASS DEPENDENT08 (PRIORITIZED-DEPENDENT) ((HISTORY :INITFORM 'NIL))) (DEFMETHOD UPDATE-DEPENDENT ((GF GENERIC-FUNCTION) (D DEPENDENT08) &REST ARGS) (PUSH (CONS *TIMESTAMP* ARGS) (SLOT-VALUE D 'HISTORY))) (LET ((TESTGF #'TESTGF08) (DEP1 (MAKE-INSTANCE 'DEPENDENT08 :PRIORITY 1)) (DEP2 (MAKE-INSTANCE 'DEPENDENT08 :PRIORITY 10)) (DEP3 (MAKE-INSTANCE 'DEPENDENT08 :PRIORITY 5))) (ADD-DEPENDENT TESTGF DEP1) (ADD-DEPENDENT TESTGF DEP2) (ADD-DEPENDENT TESTGF DEP3) (ADD-DEPENDENT TESTGF DEP1) (REINITIALIZE-INSTANCE TESTGF :NAME 'TESTGF08-RENAMED) (DEFMETHOD TESTGF08 ((X INTEGER))) (REMOVE-DEPENDENT TESTGF DEP2) (DEFMETHOD TESTGF08 ((X REAL))) (REMOVE-METHOD TESTGF (FIND-METHOD TESTGF 'NIL (LIST (FIND-CLASS 'INTEGER)))) (LIST (DEPENDENT-METHODS (LIST DEP1 DEP2 DEP3) 'HISTORY) (SYMBOLS-CLEANUP '(PRIORITIZED-GENERIC-FUNCTION TESTGF08 DEPENDENT08))))) WARNING: Adding method # #2=#)> to an already called generic function # EQUAL-OK: ((((2 :NAME TESTGF08-RENAMED) (5 ADD-METHOD (METHOD (INTEGER))) (7 ADD-METHOD (METHOD (REAL))) (9 REMOVE-METHOD (METHOD (INTEGER)))) ((0 :NAME TESTGF08-RENAMED) (3 ADD-METHOD (METHOD (INTEGER)))) ((1 :NAME TESTGF08-RENAMED) (4 ADD-METHOD (METHOD (INTEGER))) (6 ADD-METHOD (METHOD (REAL))) (8 REMOVE-METHOD (METHOD (INTEGER))))) NIL) (PROGN (DEFCLASS REINIT-INSTANCE-CLASS (STANDARD-CLASS) NIL) (DEFMETHOD VALIDATE-SUPERCLASS ((CLASS REINIT-INSTANCE-CLASS) (SUPERCLASS STANDARD-CLASS)) T) (DEFPARAMETER *FINALIZE-INHERITANCE-COUNT* 0) (DEFMETHOD FINALIZE-INHERITANCE :BEFORE ((CLASS REINIT-INSTANCE-CLASS)) (INCF *FINALIZE-INHERITANCE-COUNT*)) (DEFCLASS REINIT-INSTANCE-OBJECT NIL ((A-SLOT)) (:METACLASS REINIT-INSTANCE-CLASS)) (UNLESS (CLASS-FINALIZED-P (FIND-CLASS 'REINIT-INSTANCE-OBJECT)) (FINALIZE-INHERITANCE (FIND-CLASS 'REINIT-INSTANCE-OBJECT))) (REINITIALIZE-INSTANCE (FIND-CLASS 'REINIT-INSTANCE-OBJECT)) (LIST *FINALIZE-INHERITANCE-COUNT* (SYMBOLS-CLEANUP '(REINIT-INSTANCE-CLASS *FINALIZE-INHERITANCE-COUNT* REINIT-INSTANCE-OBJECT)))) WARNING: Adding method #)> to an already called generic function # EQUAL-OK: (2 NIL) (LET (( (FIND-CLASS 'T)) (OPERATION-COUNTER 0)) (DEFMETHOD ADD-DIRECT-METHOD ((SPECIALIZER (EQL )) (METHOD METHOD)) (INCF OPERATION-COUNTER)) (DEFMETHOD REMOVE-DIRECT-METHOD ((SPECIALIZER (EQL )) (METHOD METHOD)) (INCF OPERATION-COUNTER)) (DEFMETHOD SPECIALIZER-DIRECT-GENERIC-FUNCTIONS ((CLASS (EQL ))) 'NIL) (DEFMETHOD SPECIALIZER-DIRECT-METHODS ((CLASS (EQL ))) 'NIL) (SETQ OPERATION-COUNTER 0) (FMAKUNBOUND 'TESTGF09) (DEFMETHOD TESTGF09 (X Y Z) (+ X Y Z)) (LIST (NULL (SPECIALIZER-DIRECT-GENERIC-FUNCTIONS (FIND-CLASS 'T))) (NULL (SPECIALIZER-DIRECT-METHODS (FIND-CLASS 'T))) OPERATION-COUNTER (CLOS::GF-DYNAMICALLY-MODIFIABLE #'TESTGF09) (SYMBOL-CLEANUP 'TESTGF09))) EQUAL-OK: (T T 3 NIL T) (PROGN (DEFGENERIC FOO142 (X) (:METHOD ((X T)))) (DEFGENERIC FOO142 (X)) (LIST (NULL (MEMBER #'FOO142 (SPECIALIZER-DIRECT-GENERIC-FUNCTIONS (FIND-CLASS 'T)))) (SYMBOL-CLEANUP 'FOO142))) EQUAL-OK: (T T) (PROGN (DEFCLASS VOLATILE-CLASS (STANDARD-CLASS) ((INSTANTIATED :TYPE BOOLEAN :INITFORM NIL))) (DEFPARAMETER *VOLATILE-CLASS-HACK* NIL) (DEFMETHOD ADD-DIRECT-SUBCLASS :AROUND ((SUPERCLASS VOLATILE-CLASS) (SUBCLASS VOLATILE-CLASS)) (WHEN *VOLATILE-CLASS-HACK* (CALL-NEXT-METHOD))) (DEFMETHOD REMOVE-DIRECT-SUBCLASS :AROUND ((SUPERCLASS VOLATILE-CLASS) (SUBCLASS VOLATILE-CLASS)) NIL) (DEFUN NOTE-VOLATILE-CLASS-INSTANTIATED (CLASS) (UNLESS (SLOT-VALUE CLASS 'INSTANTIATED) (SETF (SLOT-VALUE CLASS 'INSTANTIATED) T) (DOLIST (SUPERCLASS (CLASS-DIRECT-SUPERCLASSES CLASS)) (WHEN (TYPEP SUPERCLASS 'VOLATILE-CLASS) (UNLESS (MEMBER CLASS (CLASS-DIRECT-SUBCLASSES SUPERCLASS)) (LET ((*VOLATILE-CLASS-HACK* T)) (ADD-DIRECT-SUBCLASS SUPERCLASS CLASS)) (NOTE-VOLATILE-CLASS-INSTANTIATED SUPERCLASS)))))) (DEFMETHOD ALLOCATE-INSTANCE :AFTER ((CLASS VOLATILE-CLASS) &REST INITARGS) (NOTE-VOLATILE-CLASS-INSTANTIATED CLASS)) (DEFCLASS TESTCLASS10 NIL NIL (:METACLASS VOLATILE-CLASS)) (DEFCLASS TESTCLASS10A (TESTCLASS10) NIL (:METACLASS VOLATILE-CLASS)) (DEFCLASS TESTCLASS10B (TESTCLASS10) NIL (:METACLASS VOLATILE-CLASS)) (DEFCLASS TESTCLASS10C (TESTCLASS10) NIL (:METACLASS VOLATILE-CLASS)) (DEFCLASS TESTCLASS10D (TESTCLASS10B) NIL (:METACLASS VOLATILE-CLASS)) (LET ((RESULTS 'NIL)) (PUSH (CLASS-DIRECT-SUBCLASSES (FIND-CLASS 'TESTCLASS10)) RESULTS) (PUSH (CLASS-DIRECT-SUBCLASSES (FIND-CLASS 'TESTCLASS10A)) RESULTS) (PUSH (CLASS-DIRECT-SUBCLASSES (FIND-CLASS 'TESTCLASS10B)) RESULTS) (PUSH (CLASS-DIRECT-SUBCLASSES (FIND-CLASS 'TESTCLASS10C)) RESULTS) (PUSH (CLASS-DIRECT-SUBCLASSES (FIND-CLASS 'TESTCLASS10D)) RESULTS) (MAKE-INSTANCE 'TESTCLASS10D) (PUSH (CLASS-DIRECT-SUBCLASSES (FIND-CLASS 'TESTCLASS10)) RESULTS) (PUSH (CLASS-DIRECT-SUBCLASSES (FIND-CLASS 'TESTCLASS10A)) RESULTS) (PUSH (CLASS-DIRECT-SUBCLASSES (FIND-CLASS 'TESTCLASS10B)) RESULTS) (PUSH (CLASS-DIRECT-SUBCLASSES (FIND-CLASS 'TESTCLASS10C)) RESULTS) (PUSH (CLASS-DIRECT-SUBCLASSES (FIND-CLASS 'TESTCLASS10D)) RESULTS) (LIST (MAPCAR #'(LAMBDA (L) (MAPCAR #'CLASS-NAME L)) (NREVERSE RESULTS)) (SYMBOLS-CLEANUP '(VOLATILE-CLASS *VOLATILE-CLASS-HACK* NOTE-VOLATILE-CLASS-INSTANTIATED TESTCLASS10 TESTCLASS10A TESTCLASS10B TESTCLASS10C TESTCLASS10D))))) EQUAL-OK: ((NIL NIL NIL NIL NIL (#:TESTCLASS10B) NIL (#:TESTCLASS10D) NIL NIL) NIL) (PROGN (DEFCLASS MSL-GENERIC-FUNCTION (STANDARD-GENERIC-FUNCTION) NIL (:METACLASS FUNCALLABLE-STANDARD-CLASS)) (DEFUN REVERSE-METHOD-LIST (METHODS) (LET ((RESULT 'NIL)) (DOLIST (METHOD METHODS) (IF (AND (CONSP RESULT) (EQUAL (METHOD-QUALIFIERS METHOD) (METHOD-QUALIFIERS (CAAR RESULT)))) (PUSH METHOD (CAR RESULT)) (PUSH (LIST METHOD) RESULT))) (REDUCE #'APPEND RESULT))) (DEFMETHOD COMPUTE-APPLICABLE-METHODS ((GF MSL-GENERIC-FUNCTION) ARGUMENTS) (REVERSE-METHOD-LIST (CALL-NEXT-METHOD))) (DEFMETHOD COMPUTE-APPLICABLE-METHODS-USING-CLASSES ((GF MSL-GENERIC-FUNCTION) CLASSES) (REVERSE-METHOD-LIST (CALL-NEXT-METHOD))) (DEFGENERIC TESTGF11 (X) (:GENERIC-FUNCTION-CLASS MSL-GENERIC-FUNCTION) (:METHOD ((X INTEGER)) (CONS 'INTEGER (IF (NEXT-METHOD-P) (CALL-NEXT-METHOD)))) (:METHOD ((X REAL)) (CONS 'REAL (IF (NEXT-METHOD-P) (CALL-NEXT-METHOD)))) (:METHOD ((X NUMBER)) (CONS 'NUMBER (IF (NEXT-METHOD-P) (CALL-NEXT-METHOD)))) (:METHOD :AROUND ((X INTEGER)) (COERCE (CALL-NEXT-METHOD) 'VECTOR))) (LIST (TESTGF11 5.0) (TESTGF11 17) (SYMBOLS-CLEANUP '(MSL-GENERIC-FUNCTION REVERSE-METHOD-LIST TESTGF11)))) EQUALP-OK: ((NUMBER REAL) #(NUMBER REAL INTEGER) NIL) (PROGN (DEFCLASS NONUMBER-GENERIC-FUNCTION (STANDARD-GENERIC-FUNCTION) NIL (:METACLASS FUNCALLABLE-STANDARD-CLASS)) (DEFUN NONUMBER-METHOD-LIST (METHODS) (REMOVE-IF #'(LAMBDA (METHOD) (MEMBER (FIND-CLASS 'NUMBER) (METHOD-SPECIALIZERS METHOD))) METHODS)) (DEFMETHOD COMPUTE-APPLICABLE-METHODS ((GF NONUMBER-GENERIC-FUNCTION) ARGUMENTS) (NONUMBER-METHOD-LIST (CALL-NEXT-METHOD))) (DEFMETHOD COMPUTE-APPLICABLE-METHODS-USING-CLASSES ((GF NONUMBER-GENERIC-FUNCTION) CLASSES) (NONUMBER-METHOD-LIST (CALL-NEXT-METHOD))) (DEFGENERIC TESTGF12 (X) (:GENERIC-FUNCTION-CLASS NONUMBER-GENERIC-FUNCTION) (:METHOD ((X INTEGER)) (CONS 'INTEGER (IF (NEXT-METHOD-P) (CALL-NEXT-METHOD)))) (:METHOD ((X REAL)) (CONS 'REAL (IF (NEXT-METHOD-P) (CALL-NEXT-METHOD)))) (:METHOD ((X NUMBER)) (CONS 'NUMBER (IF (NEXT-METHOD-P) (CALL-NEXT-METHOD)))) (:METHOD :AROUND ((X INTEGER)) (COERCE (CALL-NEXT-METHOD) 'VECTOR))) (LIST (TESTGF12 5.0) (TESTGF12 17) (SYMBOLS-CLEANUP '(NONUMBER-GENERIC-FUNCTION NONUMBER-METHOD-LIST TESTGF12)))) EQUALP-OK: ((REAL) #(INTEGER REAL) NIL) (PROGN (DEFCLASS BFS-CLASS (STANDARD-CLASS) NIL) (DEFMETHOD COMPUTE-CLASS-PRECEDENCE-LIST ((CLASS BFS-CLASS)) (LET ((QUEUE (LIST CLASS)) (NEXT-QUEUE 'NIL) (CPL 'NIL)) (LOOP (WHEN (NULL QUEUE) (SETQ QUEUE (REVERSE NEXT-QUEUE) NEXT-QUEUE 'NIL) (WHEN (NULL QUEUE) (RETURN))) (LET ((C (POP QUEUE))) (UNLESS (MEMBER C CPL) (PUSH C CPL) (SETQ NEXT-QUEUE (REVAPPEND (CLASS-DIRECT-SUPERCLASSES C) NEXT-QUEUE))))) (NREVERSE CPL))) (DEFCLASS TESTCLASS13A NIL NIL (:METACLASS BFS-CLASS)) (DEFCLASS TESTCLASS13B (TESTCLASS13A) NIL (:METACLASS BFS-CLASS)) (DEFCLASS TESTCLASS13C (TESTCLASS13B) NIL (:METACLASS BFS-CLASS)) (DEFCLASS TESTCLASS13D (TESTCLASS13A) NIL (:METACLASS BFS-CLASS)) (DEFCLASS TESTCLASS13E (TESTCLASS13D) NIL (:METACLASS BFS-CLASS)) (DEFCLASS TESTCLASS13F (TESTCLASS13C TESTCLASS13E) NIL (:METACLASS BFS-CLASS)) (UNLESS (CLASS-FINALIZED-P (FIND-CLASS 'TESTCLASS13F)) (FINALIZE-INHERITANCE (FIND-CLASS 'TESTCLASS13F))) (LIST (MAPCAR #'CLASS-NAME (SUBSEQ (CLASS-PRECEDENCE-LIST (FIND-CLASS 'TESTCLASS13F)) 0 6)) (SYMBOLS-CLEANUP '(BFS-CLASS TESTCLASS13A TESTCLASS13B TESTCLASS13C TESTCLASS13D TESTCLASS13E TESTCLASS13F)))) EQUAL-OK: ((#:TESTCLASS13F #:TESTCLASS13C #:TESTCLASS13E #:TESTCLASS13B #:TESTCLASS13D #:TESTCLASS13A) NIL) (PROGN (DEFPARAMETER *EXTRA-VALUE* 'EXTRA) (DEFCLASS CUSTOM-DEFAULT-INITARGS-CLASS (STANDARD-CLASS) NIL) (DEFMETHOD COMPUTE-DEFAULT-INITARGS ((CLASS CUSTOM-DEFAULT-INITARGS-CLASS)) (LET ((ORIGINAL-DEFAULT-INITARGS (REMOVE-DUPLICATES (REDUCE #'APPEND (MAPCAR #'CLASS-DIRECT-DEFAULT-INITARGS (CLASS-PRECEDENCE-LIST CLASS))) :KEY #'CAR :FROM-END T))) (CONS (LIST ':EXTRA '*EXTRA-VALUE* #'(LAMBDA NIL *EXTRA-VALUE*)) (REMOVE ':EXTRA ORIGINAL-DEFAULT-INITARGS :KEY #'CAR)))) (DEFCLASS TESTCLASS14 NIL ((SLOT :INITARG :EXTRA)) (:METACLASS CUSTOM-DEFAULT-INITARGS-CLASS)) (LIST (SLOT-VALUE (MAKE-INSTANCE 'TESTCLASS14) 'SLOT) (SYMBOLS-CLEANUP '(*EXTRA-VALUE* CUSTOM-DEFAULT-INITARGS-CLASS TESTCLASS14)))) EQUAL-OK: (EXTRA NIL) (PROGN (DEFCLASS AUTO-ACCESSORS-2-CLASS (STANDARD-CLASS) NIL) (DEFMETHOD COMPUTE-DIRECT-SLOT-DEFINITION-INITARGS ((CLASS AUTO-ACCESSORS-2-CLASS) &REST SLOT-SPEC) (IF (AND (NULL (GETF SLOT-SPEC ':READERS)) (NULL (GETF SLOT-SPEC ':WRITERS))) (LET* ((CONTAINING-CLASS-NAME (CLASS-NAME CLASS)) (ACCESSOR-NAME (INTERN (CONCATENATE 'STRING (SYMBOL-NAME CONTAINING-CLASS-NAME) "-" (SYMBOL-NAME (GETF SLOT-SPEC ':NAME))) (SYMBOL-PACKAGE CONTAINING-CLASS-NAME)))) (LIST* :READERS (LIST ACCESSOR-NAME) :WRITERS (LIST (LIST 'SETF ACCESSOR-NAME)) (CALL-NEXT-METHOD))) (CALL-NEXT-METHOD))) (DEFCLASS TESTCLASS15 NIL ((X :INITARG :X) (Y)) (:METACLASS AUTO-ACCESSORS-2-CLASS)) (LET ((INST (MAKE-INSTANCE 'TESTCLASS15 :X 12))) (LIST (TESTCLASS15-X INST) (SETF (TESTCLASS15-Y INST) 13) (SYMBOLS-CLEANUP '(AUTO-ACCESSORS-2-CLASS TESTCLASS15))))) EQUAL-OK: (12 13 NIL) (PROGN (DEFCLASS TRACED-GENERIC-FUNCTION (STANDARD-GENERIC-FUNCTION) NIL (:METACLASS FUNCALLABLE-STANDARD-CLASS)) (DEFVAR *LAST-TRACED-ARGUMENTS* NIL) (DEFVAR *LAST-TRACED-VALUES* NIL) (DEFMETHOD COMPUTE-DISCRIMINATING-FUNCTION ((GF TRACED-GENERIC-FUNCTION)) (LET ((ORIG-DF (CALL-NEXT-METHOD)) (NAME (GENERIC-FUNCTION-NAME GF))) #'(LAMBDA (&REST ARGUMENTS) (DECLARE (COMPILE)) (FORMAT *TRACE-OUTPUT* "~%=> ~S arguments: ~:S" NAME ARGUMENTS) (SETQ *LAST-TRACED-ARGUMENTS* ARGUMENTS) (LET ((VALUES (MULTIPLE-VALUE-LIST (APPLY ORIG-DF ARGUMENTS)))) (FORMAT *TRACE-OUTPUT* "~%<= ~S values: ~:S" NAME VALUES) (SETQ *LAST-TRACED-VALUES* VALUES) (VALUES-LIST VALUES))))) (DEFGENERIC TESTGF15 (X) (:GENERIC-FUNCTION-CLASS TRACED-GENERIC-FUNCTION) (:METHOD ((X NUMBER)) (VALUES X (- X) (* X X) (/ X)))) (TESTGF15 5) (LIST *LAST-TRACED-ARGUMENTS* *LAST-TRACED-VALUES* (SYMBOLS-CLEANUP '(TRACED-GENERIC-FUNCTION *LAST-TRACED-ARGUMENTS* *LAST-TRACED-VALUES* TESTGF15)))) => TESTGF15 arguments: (5) <= TESTGF15 values: (5 -5 25 1/5) EQUAL-OK: ((5) (5 -5 25 1/5) NIL) (PROGN (DEFUN PROMPT-FOR-NEW-VALUES NIL (FORMAT *DEBUG-IO* "~&New values: ") (LIST (READ *DEBUG-IO*))) (DEFUN ADD-METHOD-RESTARTS (FORM METHOD) (LET ((BLOCK (GENSYM)) (TAG (GENSYM))) `(BLOCK ,BLOCK (TAGBODY ,TAG (RETURN-FROM ,BLOCK (RESTART-CASE ,FORM (METHOD-REDO NIL :REPORT (LAMBDA (STREAM) (FORMAT STREAM "Try calling ~S again." ,METHOD)) (GO ,TAG)) (METHOD-RETURN (L) :REPORT (LAMBDA (STREAM) (FORMAT STREAM "Specify return values for ~S call." ,METHOD)) :INTERACTIVE (LAMBDA NIL (PROMPT-FOR-NEW-VALUES)) (RETURN-FROM ,BLOCK (VALUES-LIST L))))))))) (DEFUN CONVERT-EFFECTIVE-METHOD (EFM) (IF (CONSP EFM) (IF (EQ (CAR EFM) 'CALL-METHOD) (LET ((METHOD-LIST (THIRD EFM))) (IF (OR (TYPEP (FIRST METHOD-LIST) 'METHOD) (REST METHOD-LIST)) (CONVERT-EFFECTIVE-METHOD `(CALL-METHOD ,(SECOND EFM) ((MAKE-METHOD (CALL-METHOD ,(FIRST METHOD-LIST) ,(REST METHOD-LIST)))))) (IF (TYPEP (SECOND EFM) 'METHOD) (ADD-METHOD-RESTARTS (CONS (CONVERT-EFFECTIVE-METHOD (CAR EFM)) (CONVERT-EFFECTIVE-METHOD (CDR EFM))) (SECOND EFM)) (CONS (CONVERT-EFFECTIVE-METHOD (CAR EFM)) (CONVERT-EFFECTIVE-METHOD (CDR EFM)))))) (CONS (CONVERT-EFFECTIVE-METHOD (CAR EFM)) (CONVERT-EFFECTIVE-METHOD (CDR EFM)))) EFM)) (DEFCLASS DEBUGGABLE-GENERIC-FUNCTION (STANDARD-GENERIC-FUNCTION) NIL (:METACLASS FUNCALLABLE-STANDARD-CLASS)) (DEFMETHOD COMPUTE-EFFECTIVE-METHOD ((GF DEBUGGABLE-GENERIC-FUNCTION) METHOD-COMBINATION METHODS) (CONVERT-EFFECTIVE-METHOD (CALL-NEXT-METHOD))) (DEFGENERIC TESTGF16 (X) (:GENERIC-FUNCTION-CLASS DEBUGGABLE-GENERIC-FUNCTION)) (DEFCLASS TESTCLASS16A NIL NIL) (DEFCLASS TESTCLASS16B (TESTCLASS16A) NIL) (DEFCLASS TESTCLASS16C (TESTCLASS16A) NIL) (DEFCLASS TESTCLASS16D (TESTCLASS16B TESTCLASS16C) NIL) (DEFMETHOD TESTGF16 ((X TESTCLASS16A)) (LIST 'A (NOT (NULL (FIND-RESTART 'METHOD-REDO))) (NOT (NULL (FIND-RESTART 'METHOD-RETURN))))) (DEFMETHOD TESTGF16 ((X TESTCLASS16B)) (CONS 'B (CALL-NEXT-METHOD))) (DEFMETHOD TESTGF16 ((X TESTCLASS16C)) (CONS 'C (CALL-NEXT-METHOD))) (DEFMETHOD TESTGF16 ((X TESTCLASS16D)) (CONS 'D (CALL-NEXT-METHOD))) (LIST (TESTGF16 (MAKE-INSTANCE 'TESTCLASS16D)) (SYMBOLS-CLEANUP '(PROMPT-FOR-NEW-VALUES ADD-METHOD-RESTARTS CONVERT-EFFECTIVE-METHOD DEBUGGABLE-GENERIC-FUNCTION TESTGF16 TESTCLASS16A TESTCLASS16B TESTCLASS16C TESTCLASS16D)))) EQUAL-OK: ((D B C A T T) NIL) (PROGN (DEFCLASS AUTO-INITARGS-CLASS (STANDARD-CLASS) NIL) (DEFMETHOD COMPUTE-EFFECTIVE-SLOT-DEFINITION ((CLASS AUTO-INITARGS-CLASS) NAME DIRECT-SLOT-DEFINITIONS) (LET ((EFF-SLOT (CALL-NEXT-METHOD))) (UNLESS (SLOT-DEFINITION-INITARGS EFF-SLOT) (SETF (SLOT-DEFINITION-INITARGS EFF-SLOT) (LIST (INTERN (SYMBOL-NAME (SLOT-DEFINITION-NAME EFF-SLOT)) (FIND-PACKAGE "KEYWORD"))))) (UNLESS (SLOT-DEFINITION-INITFUNCTION EFF-SLOT) (SETF (SLOT-DEFINITION-INITFUNCTION EFF-SLOT) #'(LAMBDA NIL 42) (SLOT-DEFINITION-INITFORM EFF-SLOT) '42)) EFF-SLOT)) (DEFCLASS TESTCLASS17 NIL ((X) (Y)) (:METACLASS AUTO-INITARGS-CLASS)) (LET ((INST (MAKE-INSTANCE 'TESTCLASS17 :X 17))) (LIST (SLOT-VALUE INST 'X) (SLOT-VALUE INST 'Y) (SYMBOLS-CLEANUP '(AUTO-INITARGS-CLASS TESTCLASS17))))) EQUAL-OK: (17 42 NIL) (PROGN (DEFCLASS AUTO-INITARGS-2-CLASS (STANDARD-CLASS) NIL) (DEFMETHOD COMPUTE-EFFECTIVE-SLOT-DEFINITION-INITARGS ((CLASS AUTO-INITARGS-2-CLASS) DIRECT-SLOT-DEFINITIONS) (LET ((INITARGS (CALL-NEXT-METHOD))) (UNLESS (GETF INITARGS ':INITARGS) (SETQ INITARGS (LIST* ':INITARGS (LIST (INTERN (SYMBOL-NAME (GETF INITARGS ':NAME)) (FIND-PACKAGE "KEYWORD"))) INITARGS))) (UNLESS (GETF INITARGS ':INITFUNCTION) (SETQ INITARGS (LIST* ':INITFUNCTION #'(LAMBDA NIL 42) ':INITFORM '42 INITARGS))) INITARGS)) (DEFCLASS TESTCLASS17-2 NIL ((X) (Y)) (:METACLASS AUTO-INITARGS-2-CLASS)) (LET ((INST (MAKE-INSTANCE 'TESTCLASS17-2 :X 17))) (LIST (SLOT-VALUE INST 'X) (SLOT-VALUE INST 'Y) (SYMBOLS-CLEANUP '(AUTO-INITARGS-2-CLASS TESTCLASS17-2))))) EQUAL-OK: (17 42 NIL) (PROGN (DEFCLASS TESTCLASS18B (TESTCLASS18A) NIL) (DEFMETHOD COMPUTE-SLOTS ((CLASS (EQL (FIND-CLASS 'TESTCLASS18B)))) (APPEND (CALL-NEXT-METHOD) (LIST (MAKE-INSTANCE 'STANDARD-EFFECTIVE-SLOT-DEFINITION :NAME 'Y :ALLOCATION :INSTANCE)))) (DEFCLASS TESTCLASS18A NIL ((X :ALLOCATION :CLASS))) (FINALIZE-INHERITANCE (FIND-CLASS 'TESTCLASS18B)) (APPEND (MAPCAR #'(LAMBDA (SLOT) (LIST (SLOT-DEFINITION-NAME SLOT) (INTEGERP (SLOT-DEFINITION-LOCATION SLOT)))) (CLASS-SLOTS (FIND-CLASS 'TESTCLASS18B))) (LET ((INST1 (MAKE-INSTANCE 'TESTCLASS18B)) (INST2 (MAKE-INSTANCE 'TESTCLASS18B))) (SETF (SLOT-VALUE INST1 'Y) 'ABC) (SETF (SLOT-VALUE INST2 'Y) 'DEF) (LIST (SLOT-VALUE INST1 'Y) (SLOT-VALUE INST2 'Y))) (SYMBOLS-CLEANUP '(TESTCLASS18A TESTCLASS18B)))) EQUAL-OK: ((X NIL) (Y T) ABC DEF) (PROGN (DEFCLASS TESTCLASS19B (TESTCLASS19A) NIL) (DEFMETHOD COMPUTE-SLOTS ((CLASS (EQL (FIND-CLASS 'TESTCLASS19B)))) (APPEND (CALL-NEXT-METHOD) (LIST (MAKE-INSTANCE 'STANDARD-EFFECTIVE-SLOT-DEFINITION :NAME 'Y :ALLOCATION :CLASS)))) (DEFCLASS TESTCLASS19A NIL ((X :ALLOCATION :CLASS))) (FINALIZE-INHERITANCE (FIND-CLASS 'TESTCLASS19B)) (APPEND (MAPCAR #'(LAMBDA (SLOT) (LIST (SLOT-DEFINITION-NAME SLOT) (INTEGERP (SLOT-DEFINITION-LOCATION SLOT)))) (CLASS-SLOTS (FIND-CLASS 'TESTCLASS19B))) (LET ((INST1 (MAKE-INSTANCE 'TESTCLASS19B)) (INST2 (MAKE-INSTANCE 'TESTCLASS19B))) (SETF (SLOT-VALUE INST1 'Y) 'ABC) (SETF (SLOT-VALUE INST2 'Y) 'DEF) (LIST (SLOT-VALUE INST1 'Y) (SLOT-VALUE INST2 'Y))) (SYMBOLS-CLEANUP '(TESTCLASS19B TESTCLASS19A)))) EQUAL-OK: ((X NIL) (Y NIL) DEF DEF) (PROGN (DEFCLASS AUTO-ACCESSORS-DIRECT-SLOT-DEFINITION-CLASS (STANDARD-CLASS) ((CONTAINING-CLASS-NAME :INITARG :CONTAINING-CLASS-NAME))) (DEFCLASS AUTO-ACCESSORS-CLASS (STANDARD-CLASS) NIL) (DEFMETHOD DIRECT-SLOT-DEFINITION-CLASS ((CLASS AUTO-ACCESSORS-CLASS) &REST INITARGS) (LET ((DSD-CLASS-NAME (GENSYM))) (ENSURE-CLASS DSD-CLASS-NAME :METACLASS (FIND-CLASS 'AUTO-ACCESSORS-DIRECT-SLOT-DEFINITION-CLASS) :DIRECT-SUPERCLASSES (LIST (FIND-CLASS 'STANDARD-DIRECT-SLOT-DEFINITION)) :CONTAINING-CLASS-NAME (CLASS-NAME CLASS)) (EVAL `(DEFMETHOD INITIALIZE-INSTANCE :AROUND ((DSD ,DSD-CLASS-NAME) &REST ARGS) (IF (AND (NULL (GETF ARGS ':READERS)) (NULL (GETF ARGS ':WRITERS))) (LET* ((CONTAINING-CLASS-NAME (SLOT-VALUE (CLASS-OF DSD) 'CONTAINING-CLASS-NAME)) (ACCESSOR-NAME (INTERN (CONCATENATE 'STRING (SYMBOL-NAME CONTAINING-CLASS-NAME) "-" (SYMBOL-NAME (GETF ARGS ':NAME))) (SYMBOL-PACKAGE CONTAINING-CLASS-NAME)))) (APPLY #'CALL-NEXT-METHOD DSD :READERS (LIST ACCESSOR-NAME) :WRITERS (LIST (LIST 'SETF ACCESSOR-NAME)) ARGS)) (CALL-NEXT-METHOD)))) (FIND-CLASS DSD-CLASS-NAME))) (DEFCLASS TESTCLASS20 NIL ((X :INITARG :X) (Y)) (:METACLASS AUTO-ACCESSORS-CLASS)) (LET ((INST (MAKE-INSTANCE 'TESTCLASS20 :X 12))) (LIST (TESTCLASS20-X INST) (SETF (TESTCLASS20-Y INST) 13) (SYMBOLS-CLEANUP '(AUTO-ACCESSORS-DIRECT-SLOT-DEFINITION-CLASS AUTO-ACCESSORS-CLASS TESTCLASS20))))) EQUAL-OK: (12 13 NIL) (PROGN (DEFPARAMETER *EXTERNAL-SLOT-VALUES* 'NIL) (DEFCLASS EXTERNAL-SLOT-DEFINITION (STANDARD-EFFECTIVE-SLOT-DEFINITION) NIL) (LET ((UNBOUND (GENSYM "UNBOUND"))) (DEFMETHOD SLOT-VALUE-USING-CLASS ((CLASS STANDARD-CLASS) INSTANCE (SLOT EXTERNAL-SLOT-DEFINITION)) (LET ((VALUE (GETF (GETF *EXTERNAL-SLOT-VALUES* INSTANCE) (SLOT-DEFINITION-NAME SLOT) UNBOUND))) (IF (EQ VALUE UNBOUND) (SLOT-UNBOUND CLASS INSTANCE (SLOT-DEFINITION-NAME SLOT)) VALUE))) (DEFMETHOD (SETF SLOT-VALUE-USING-CLASS) (NEW-VALUE (CLASS STANDARD-CLASS) INSTANCE (SLOT EXTERNAL-SLOT-DEFINITION)) (SETF (GETF (GETF *EXTERNAL-SLOT-VALUES* INSTANCE) (SLOT-DEFINITION-NAME SLOT)) NEW-VALUE)) (DEFMETHOD SLOT-BOUNDP-USING-CLASS ((CLASS STANDARD-CLASS) INSTANCE (SLOT EXTERNAL-SLOT-DEFINITION)) (LET ((VALUE (GETF (GETF *EXTERNAL-SLOT-VALUES* INSTANCE) (SLOT-DEFINITION-NAME SLOT) UNBOUND))) (NOT (EQ VALUE UNBOUND)))) (DEFMETHOD SLOT-MAKUNBOUND-USING-CLASS ((CLASS STANDARD-CLASS) INSTANCE (SLOT EXTERNAL-SLOT-DEFINITION)) (REMF (GETF *EXTERNAL-SLOT-VALUES* INSTANCE) (SLOT-DEFINITION-NAME SLOT)) INSTANCE)) (DEFCLASS EXTERNAL-SLOT-DEFINITION-CLASS (STANDARD-CLASS) NIL) (DEFMETHOD EFFECTIVE-SLOT-DEFINITION-CLASS ((CLASS EXTERNAL-SLOT-DEFINITION-CLASS) &REST ARGS) (FIND-CLASS 'EXTERNAL-SLOT-DEFINITION)) (DEFCLASS TESTCLASS22 NIL ((X :INITARG :X) (Y :INITARG :Y)) (:METACLASS EXTERNAL-SLOT-DEFINITION-CLASS)) (LET ((INST1 (MAKE-INSTANCE 'TESTCLASS22 :X 3 :Y 4)) (INST2 (MAKE-INSTANCE 'TESTCLASS22 :X 5 :Y 12)) (RESULTS 'NIL)) (PUSH (SLOT-VALUE INST1 'X) RESULTS) (PUSH (SLOT-VALUE INST2 'X) RESULTS) (PUSH (SLOT-VALUE INST1 'Y) RESULTS) (PUSH (SLOT-VALUE INST2 'Y) RESULTS) (PUSH (OR (EQUAL *EXTERNAL-SLOT-VALUES* (LIST INST2 (LIST 'X 5 'Y 12) INST1 (LIST 'X 3 'Y 4))) (EQUAL *EXTERNAL-SLOT-VALUES* (LIST INST2 (LIST 'Y 12 'X 5) INST1 (LIST 'Y 4 'X 3)))) RESULTS) (SETF (SLOT-VALUE INST2 'X) -5) (PUSH (SLOT-VALUE INST2 'X) RESULTS) (SLOT-MAKUNBOUND INST1 'Y) (PUSH (LIST (SLOT-BOUNDP INST1 'X) (SLOT-BOUNDP INST1 'Y)) RESULTS) (SLOT-MAKUNBOUND INST1 'X) (PUSH (OR (EQUAL *EXTERNAL-SLOT-VALUES* (LIST INST2 (LIST 'X -5 'Y 12) INST1 NIL)) (EQUAL *EXTERNAL-SLOT-VALUES* (LIST INST2 (LIST 'Y 12 'X -5) INST1 NIL))) RESULTS) (LIST (NREVERSE RESULTS) (SYMBOLS-CLEANUP '(*EXTERNAL-SLOT-VALUES* EXTERNAL-SLOT-DEFINITION EXTERNAL-SLOT-DEFINITION-CLASS TESTCLASS22))))) EQUAL-OK: ((3 5 4 12 T -5 (T NIL) T) NIL) (PROGN (DEFPARAMETER *DOC-DATABASE* '((TESTCLASS23 . "This is a dumb class for testing.") (TESTGF24 . "This is a dumb generic function for testing."))) (DEFCLASS EXTERNALLY-DOCUMENTED-CLASS (STANDARD-CLASS) NIL) (DOLIST (GIVEN-NAME (MAPCAR #'CAR *DOC-DATABASE*)) (DEFMETHOD ENSURE-CLASS-USING-CLASS ((CLASS CLASS) (NAME (EQL GIVEN-NAME)) &REST ARGS &KEY DOCUMENTATION &ALLOW-OTHER-KEYS) (IF (AND (NULL DOCUMENTATION) (SETQ DOCUMENTATION (CDR (ASSOC NAME *DOC-DATABASE*)))) (APPLY #'CALL-NEXT-METHOD CLASS NAME (LIST* ':DOCUMENTATION DOCUMENTATION ARGS)) (CALL-NEXT-METHOD))) (DEFMETHOD ENSURE-CLASS-USING-CLASS ((CLASS NULL) (NAME (EQL GIVEN-NAME)) &REST ARGS &KEY DOCUMENTATION &ALLOW-OTHER-KEYS) (IF (AND (NULL DOCUMENTATION) (SETQ DOCUMENTATION (CDR (ASSOC NAME *DOC-DATABASE*)))) (APPLY #'CALL-NEXT-METHOD CLASS NAME (LIST* ':DOCUMENTATION DOCUMENTATION ARGS)) (CALL-NEXT-METHOD)))) (DEFCLASS TESTCLASS23 NIL NIL (:METACLASS EXTERNALLY-DOCUMENTED-CLASS)) (LIST (DOCUMENTATION 'TESTCLASS23 'TYPE) (SYMBOLS-CLEANUP '(*DOC-DATABASE* EXTERNALLY-DOCUMENTED-CLASS TESTCLASS23)))) EQUAL-OK: ("This is a dumb class for testing." NIL) (PROGN (DEFPARAMETER *DOC-DATABASE* '((TESTCLASS23 . "This is a dumb class for testing.") (TESTGF24 . "This is a dumb generic function for testing."))) (DEFCLASS EXTERNALLY-DOCUMENTED-GENERIC-FUNCTION (STANDARD-GENERIC-FUNCTION) NIL (:METACLASS FUNCALLABLE-STANDARD-CLASS)) (DOLIST (GIVEN-NAME (MAPCAR #'CAR *DOC-DATABASE*)) (DEFMETHOD ENSURE-GENERIC-FUNCTION-USING-CLASS ((GF GENERIC-FUNCTION) (NAME (EQL GIVEN-NAME)) &REST ARGS &KEY DOCUMENTATION &ALLOW-OTHER-KEYS) (IF (AND (NULL DOCUMENTATION) (SETQ DOCUMENTATION (CDR (ASSOC NAME *DOC-DATABASE* :TEST #'EQUAL)))) (APPLY #'CALL-NEXT-METHOD GF NAME (LIST* ':DOCUMENTATION DOCUMENTATION ARGS)) (CALL-NEXT-METHOD))) (DEFMETHOD ENSURE-GENERIC-FUNCTION-USING-CLASS ((GF NULL) (NAME (EQL GIVEN-NAME)) &REST ARGS &KEY DOCUMENTATION &ALLOW-OTHER-KEYS) (IF (AND (NULL DOCUMENTATION) (SETQ DOCUMENTATION (CDR (ASSOC NAME *DOC-DATABASE* :TEST #'EQUAL)))) (APPLY #'CALL-NEXT-METHOD GF NAME (LIST* ':DOCUMENTATION DOCUMENTATION ARGS)) (CALL-NEXT-METHOD)))) (DEFGENERIC TESTGF24 (X) (:GENERIC-FUNCTION-CLASS EXTERNALLY-DOCUMENTED-GENERIC-FUNCTION)) (LIST (DOCUMENTATION 'TESTGF24 'FUNCTION) (SYMBOLS-CLEANUP '(*DOC-DATABASE* EXTERNALLY-DOCUMENTED-GENERIC-FUNCTION TESTGF24)))) EQUAL-OK: ("This is a dumb generic function for testing." NIL) (PROGN (DEFCLASS TYPECHECKING-READER-METHOD (STANDARD-READER-METHOD) NIL) (DEFMETHOD INITIALIZE-INSTANCE ((METHOD TYPECHECKING-READER-METHOD) &REST INITARGS &KEY SLOT-DEFINITION) (LET ((NAME (SLOT-DEFINITION-NAME SLOT-DEFINITION)) (TYPE (SLOT-DEFINITION-TYPE SLOT-DEFINITION))) (APPLY #'CALL-NEXT-METHOD METHOD :FUNCTION #'(LAMBDA (ARGS NEXT-METHODS) (DECLARE (IGNORE NEXT-METHODS)) (DECLARE (COMPILE)) (APPLY #'(LAMBDA (INSTANCE) (LET ((VALUE (SLOT-VALUE INSTANCE NAME))) (UNLESS (TYPEP VALUE TYPE) (ERROR "Slot ~S of ~S is not of type ~S: ~S" NAME INSTANCE TYPE VALUE)) VALUE)) ARGS)) INITARGS))) (DEFCLASS TYPECHECKING-READER-CLASS (STANDARD-CLASS) NIL) (DEFMETHOD READER-METHOD-CLASS ((CLASS TYPECHECKING-READER-CLASS) DIRECT-SLOT &REST ARGS) (FIND-CLASS 'TYPECHECKING-READER-METHOD)) (DEFCLASS TESTCLASS25 NIL ((PAIR :TYPE (CONS SYMBOL (CONS SYMBOL NULL)) :INITARG :PAIR :ACCESSOR TESTCLASS25-PAIR)) (:METACLASS TYPECHECKING-READER-CLASS)) (MACROLET ((SUCCEEDS (FORM) `(NOT (NTH-VALUE 1 (IGNORE-ERRORS ,FORM))))) (LET ((P (LIST 'ABC 'DEF)) (X (MAKE-INSTANCE 'TESTCLASS25))) (LIST (SUCCEEDS (MAKE-INSTANCE 'TESTCLASS25 :PAIR '(SEVENTEEN 17))) (SUCCEEDS (SETF (TESTCLASS25-PAIR X) P)) (SUCCEEDS (SETF (SECOND P) 456)) (SUCCEEDS (TESTCLASS25-PAIR X)) (SUCCEEDS (SLOT-VALUE X 'PAIR)) (SYMBOLS-CLEANUP '(TYPECHECKING-READER-METHOD TYPECHECKING-READER-CLASS TESTCLASS25 TESTCLASS25-PAIR)))))) EQUAL-OK: (T T T NIL T NIL) (PROGN (DEFCLASS TYPECHECKING-WRITER-METHOD (STANDARD-WRITER-METHOD) NIL) (DEFMETHOD INITIALIZE-INSTANCE ((METHOD TYPECHECKING-WRITER-METHOD) &REST INITARGS &KEY SLOT-DEFINITION) (LET ((NAME (SLOT-DEFINITION-NAME SLOT-DEFINITION)) (TYPE (SLOT-DEFINITION-TYPE SLOT-DEFINITION))) (APPLY #'CALL-NEXT-METHOD METHOD :FUNCTION #'(LAMBDA (ARGS NEXT-METHODS) (DECLARE (IGNORE NEXT-METHODS)) (DECLARE (COMPILE)) (APPLY #'(LAMBDA (NEW-VALUE INSTANCE) (UNLESS (TYPEP NEW-VALUE TYPE) (ERROR "Slot ~S of ~S: new value is not of type ~S: ~S" NAME INSTANCE TYPE NEW-VALUE)) (SETF (SLOT-VALUE INSTANCE NAME) NEW-VALUE)) ARGS)) INITARGS))) (DEFCLASS TYPECHECKING-WRITER-CLASS (STANDARD-CLASS) NIL) (DEFMETHOD WRITER-METHOD-CLASS ((CLASS TYPECHECKING-WRITER-CLASS) DIRECT-SLOT &REST ARGS) (FIND-CLASS 'TYPECHECKING-WRITER-METHOD)) (DEFCLASS TESTCLASS26 NIL ((PAIR :TYPE (CONS SYMBOL (CONS SYMBOL NULL)) :INITARG :PAIR :ACCESSOR TESTCLASS26-PAIR)) (:METACLASS TYPECHECKING-WRITER-CLASS)) (MACROLET ((SUCCEEDS (FORM) `(NOT (NTH-VALUE 1 (IGNORE-ERRORS ,FORM))))) (LET ((P (LIST 'ABC 'DEF)) (X (MAKE-INSTANCE 'TESTCLASS26))) (LIST (SUCCEEDS (MAKE-INSTANCE 'TESTCLASS26 :PAIR '(SEVENTEEN 17))) (SUCCEEDS (SETF (TESTCLASS26-PAIR X) P)) (SUCCEEDS (SETF (SECOND P) 456)) (SUCCEEDS (TESTCLASS26-PAIR X)) (SUCCEEDS (SETF (TESTCLASS26-PAIR X) P)) (SUCCEEDS (SETF (SLOT-VALUE X 'PAIR) P)) (SYMBOLS-CLEANUP '(TYPECHECKING-WRITER-METHOD TYPECHECKING-WRITER-CLASS TESTCLASS26 TESTCLASS26-PAIR)))))) EQUAL-OK: (T T T T NIL T NIL) (PROGN (DEFMETHOD VALIDATE-SUPERCLASS ((C1 STANDARD-CLASS) (C2 FUNCALLABLE-STANDARD-CLASS)) T) (DEFCLASS UNCALLABLE-GENERIC-FUNCTION (STANDARD-GENERIC-FUNCTION) NIL (:METACLASS STANDARD-CLASS)) (LET ((INST (MAKE-INSTANCE 'UNCALLABLE-GENERIC-FUNCTION :NAME 'TESTGF27 :LAMBDA-LIST '(X Y) :METHOD-CLASS (FIND-CLASS 'STANDARD-METHOD) :METHOD-COMBINATION (FIND-METHOD-COMBINATION #'PRINT-OBJECT 'STANDARD NIL)))) (LIST (TYPEP INST 'STANDARD-OBJECT) (TYPEP INST 'FUNCALLABLE-STANDARD-OBJECT) (TYPEP (CLASS-OF INST) 'STANDARD-CLASS) (TYPEP (CLASS-OF INST) 'FUNCALLABLE-STANDARD-CLASS)))) [SIMPLE-PACKAGE-ERROR]: DEFMETHOD((VALIDATE-SUPERCLASS NIL STANDARD-CLASS FUNCALLABLE-STANDARD-CLASS)): (#1=# # #1# #1#) is locked EQL-OK: ERROR (PROGN (DEFPARAMETER *COUNTER27* 0) (DEFCLASS COUNTED27-CLASS (STANDARD-CLASS) NIL) (DEFMETHOD MAKE-INSTANCE :AFTER ((C COUNTED27-CLASS) &REST ARGS) (INCF *COUNTER27*)) (DEFCLASS TESTCLASS27A NIL NIL (:METACLASS COUNTED27-CLASS)) (MAKE-INSTANCE 'TESTCLASS27A) (DEFMETHOD VALIDATE-SUPERCLASS ((C1 STANDARD-CLASS) (C2 COUNTED27-CLASS)) T) (DEFCLASS TESTCLASS27B (TESTCLASS27A) NIL (:METACLASS STANDARD-CLASS)) (MAKE-INSTANCE 'TESTCLASS27B) (MAKE-INSTANCE 'TESTCLASS27B) (LIST *COUNTER27* (SYMBOLS-CLEANUP '(*COUNTER27* COUNTED27-CLASS TESTCLASS27A TESTCLASS27B)))) EQUAL-OK: (1 NIL) (LET ((FINALIZE-INHERITANCE-HISTORY 'NIL)) (WITHOUT-PACKAGE-LOCK ("CLOS") (DEFMETHOD FINALIZE-INHERITANCE :AFTER ((CLASS CLASS)) (PUSH (CLASS-NAME CLASS) FINALIZE-INHERITANCE-HISTORY))) (DEFCLASS TESTCLASS52A NIL NIL) (DEFCLASS TESTCLASS52C (TESTCLASS52A TESTCLASS52B) NIL) (DEFCLASS TESTCLASS52D (TESTCLASS52C) NIL) (DEFCLASS TESTCLASS52B NIL NIL) (MAKE-INSTANCE 'TESTCLASS52D) (LIST FINALIZE-INHERITANCE-HISTORY (PROGN (REMOVE-METHOD #'FINALIZE-INHERITANCE (FIND-METHOD #'FINALIZE-INHERITANCE '(:AFTER) (LIST (FIND-CLASS 'CLASS)))) (SYMBOLS-CLEANUP '(TESTCLASS52A TESTCLASS52B TESTCLASS52C TESTCLASS52D))))) WARNING: Adding method #)> to an already called generic function # WARNING: Removing method #1=#)> from an already called generic function # EQUAL-OK: ((#:TESTCLASS52D #:TESTCLASS52C #:TESTCLASS52B #:TESTCLASS52A) NIL) (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS01 NIL NIL))) (DEFMETHOD CLASS-DEFAULT-INITARGS ((C (EQL *SAMPCLASS*))) (CALL-NEXT-METHOD)) (UNLESS (CLASS-FINALIZED-P *SAMPCLASS*) (FINALIZE-INHERITANCE *SAMPCLASS*)) (CLASS-DEFAULT-INITARGS *SAMPCLASS*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS02 NIL NIL))) (LET ((BADMETHOD (DEFMETHOD CLASS-DEFAULT-INITARGS ((C (EQL *SAMPCLASS*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNLESS (CLASS-FINALIZED-P *SAMPCLASS*) (FINALIZE-INHERITANCE *SAMPCLASS*)) (UNWIND-PROTECT (NTH-VALUE 1 (CLASS-DEFAULT-INITARGS *SAMPCLASS*)) (REMOVE-METHOD #'CLASS-DEFAULT-INITARGS BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: CLASS-DEFAULT-INITARGS: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: NIL Values returned by the extending method: NIL, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS03 NIL NIL))) (DEFMETHOD CLASS-DIRECT-DEFAULT-INITARGS ((C (EQL *SAMPCLASS*))) (CALL-NEXT-METHOD)) (CLASS-DIRECT-DEFAULT-INITARGS *SAMPCLASS*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS04 NIL NIL))) (LET ((BADMETHOD (DEFMETHOD CLASS-DIRECT-DEFAULT-INITARGS ((C (EQL *SAMPCLASS*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (CLASS-DIRECT-DEFAULT-INITARGS *SAMPCLASS*)) (REMOVE-METHOD #'CLASS-DIRECT-DEFAULT-INITARGS BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: CLASS-DIRECT-DEFAULT-INITARGS: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: NIL Values returned by the extending method: NIL, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS05 NIL NIL))) (DEFMETHOD CLASS-DIRECT-SLOTS ((C (EQL *SAMPCLASS*))) (CALL-NEXT-METHOD)) (CLASS-DIRECT-SLOTS *SAMPCLASS*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS06 NIL NIL))) (LET ((BADMETHOD (DEFMETHOD CLASS-DIRECT-SLOTS ((C (EQL *SAMPCLASS*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (CLASS-DIRECT-SLOTS *SAMPCLASS*)) (REMOVE-METHOD #'CLASS-DIRECT-SLOTS BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: CLASS-DIRECT-SLOTS: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: NIL Values returned by the extending method: NIL, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS07 NIL NIL))) (DEFMETHOD CLASS-DIRECT-SUPERCLASSES ((C (EQL *SAMPCLASS*))) (CALL-NEXT-METHOD)) (CLASS-DIRECT-SUPERCLASSES *SAMPCLASS*) T) EQL-OK: T (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS08 NIL NIL))) (LET ((BADMETHOD (DEFMETHOD CLASS-DIRECT-SUPERCLASSES ((C (EQL *SAMPCLASS*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (CLASS-DIRECT-SUPERCLASSES *SAMPCLASS*)) (REMOVE-METHOD #'CLASS-DIRECT-SUPERCLASSES BADMETHOD)))) [SIMPLE-ERROR]: CLASS-DIRECT-SUPERCLASSES: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: #1=(#2=#) Values returned by the extending method: #1#, T EQL-OK: ERROR (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS09 NIL NIL))) (DEFMETHOD CLASS-FINALIZED-P ((C (EQL *SAMPCLASS*))) (CALL-NEXT-METHOD)) (CLASS-FINALIZED-P *SAMPCLASS*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS10 NIL NIL))) (LET ((BADMETHOD (DEFMETHOD CLASS-FINALIZED-P ((C (EQL *SAMPCLASS*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (CLASS-FINALIZED-P *SAMPCLASS*)) (REMOVE-METHOD #'CLASS-FINALIZED-P BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: CLASS-FINALIZED-P: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: T Values returned by the extending method: T, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS11 NIL NIL))) (DEFMETHOD CLASS-PRECEDENCE-LIST ((C (EQL *SAMPCLASS*))) (CALL-NEXT-METHOD)) (UNLESS (CLASS-FINALIZED-P *SAMPCLASS*) (FINALIZE-INHERITANCE *SAMPCLASS*)) (CLASS-PRECEDENCE-LIST *SAMPCLASS*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS12 NIL NIL))) (LET ((BADMETHOD (DEFMETHOD CLASS-PRECEDENCE-LIST ((C (EQL *SAMPCLASS*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNLESS (CLASS-FINALIZED-P *SAMPCLASS*) (FINALIZE-INHERITANCE *SAMPCLASS*)) (UNWIND-PROTECT (NTH-VALUE 1 (CLASS-PRECEDENCE-LIST *SAMPCLASS*)) (REMOVE-METHOD #'CLASS-PRECEDENCE-LIST BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: CLASS-PRECEDENCE-LIST: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: #1=(#2=# #3=# #4=#) Values returned by the extending method: #1#, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS13 NIL NIL))) (DEFMETHOD CLASS-PROTOTYPE ((C (EQL *SAMPCLASS*))) (CALL-NEXT-METHOD)) (UNLESS (CLASS-FINALIZED-P *SAMPCLASS*) (FINALIZE-INHERITANCE *SAMPCLASS*)) (CLASS-PROTOTYPE *SAMPCLASS*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS14 NIL NIL))) (LET ((BADMETHOD (DEFMETHOD CLASS-PROTOTYPE ((C (EQL *SAMPCLASS*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNLESS (CLASS-FINALIZED-P *SAMPCLASS*) (FINALIZE-INHERITANCE *SAMPCLASS*)) (UNWIND-PROTECT (NTH-VALUE 1 (CLASS-PROTOTYPE *SAMPCLASS*)) (REMOVE-METHOD #'CLASS-PROTOTYPE BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: CLASS-PROTOTYPE: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: #1=# Values returned by the extending method: #1#, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS15 NIL NIL))) (DEFMETHOD CLASS-SLOTS ((C (EQL *SAMPCLASS*))) (CALL-NEXT-METHOD)) (UNLESS (CLASS-FINALIZED-P *SAMPCLASS*) (FINALIZE-INHERITANCE *SAMPCLASS*)) (CLASS-SLOTS *SAMPCLASS*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS16 NIL NIL))) (LET ((BADMETHOD (DEFMETHOD CLASS-SLOTS ((C (EQL *SAMPCLASS*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNLESS (CLASS-FINALIZED-P *SAMPCLASS*) (FINALIZE-INHERITANCE *SAMPCLASS*)) (UNWIND-PROTECT (NTH-VALUE 1 (CLASS-SLOTS *SAMPCLASS*)) (REMOVE-METHOD #'CLASS-SLOTS BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: CLASS-SLOTS: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: NIL Values returned by the extending method: NIL, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS17 NIL NIL))) (DEFMETHOD (SETF CLASS-NAME) (NEW-VALUE (C (EQL *SAMPCLASS*))) (CALL-NEXT-METHOD)) (SETF (CLASS-NAME *SAMPCLASS*) 'SAMPCLASS17RENAMED) T) EQL-OK: T (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS18 NIL NIL))) (LET ((BADMETHOD (DEFMETHOD (SETF CLASS-NAME) (NEW-VALUE (C (EQL *SAMPCLASS*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (SETF (CLASS-NAME *SAMPCLASS*) 'SAMPCLASS18RENAMED)) (REMOVE-METHOD #'(SETF CLASS-NAME) BADMETHOD)))) [SIMPLE-ERROR]: #1=(SETF CLASS-NAME): Extending a standardized method is only allowed if it returns the same values as the next method. Original values: SAMPCLASS18RENAMED Values returned by the extending method: SAMPCLASS18RENAMED, T EQL-OK: ERROR (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS19 NIL NIL))) (DEFMETHOD FINALIZE-INHERITANCE ((C (EQL *SAMPCLASS*))) (CALL-NEXT-METHOD)) (FINALIZE-INHERITANCE *SAMPCLASS*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS20 NIL NIL))) (LET ((BADMETHOD (DEFMETHOD FINALIZE-INHERITANCE ((C (EQL *SAMPCLASS*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (FINALIZE-INHERITANCE *SAMPCLASS*)) (REMOVE-METHOD #'FINALIZE-INHERITANCE BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: FINALIZE-INHERITANCE: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: #1=# Values returned by the extending method: #1#, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPGF* (DEFGENERIC SAMPGF01 (X Y)))) (DEFMETHOD FIND-METHOD-COMBINATION ((GF (EQL *SAMPGF*)) NAME OPTIONS) (CALL-NEXT-METHOD)) (FIND-METHOD-COMBINATION *SAMPGF* 'STANDARD NIL) T) WARNING: Adding method #) #1=# #1#)> to an already called generic function # EQL-OK: T (LET ((*SAMPGF* (DEFGENERIC SAMPGF02 (X Y)))) (LET ((BADMETHOD (DEFMETHOD FIND-METHOD-COMBINATION ((GF (EQL *SAMPGF*)) NAME OPTIONS) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (FIND-METHOD-COMBINATION *SAMPGF* 'STANDARD NIL)) (REMOVE-METHOD #'FIND-METHOD-COMBINATION BADMETHOD)))) WARNING: Adding method #) #1=# #1#)> to an already called generic function # [SIMPLE-ERROR]: FIND-METHOD-COMBINATION: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: #1=# Values returned by the extending method: #1#, T WARNING: Removing method #1=#) #2=# #2#)> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPGF* (DEFGENERIC SAMPGF03 (X Y)))) (DEFMETHOD GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER ((GF (EQL *SAMPGF*))) (CALL-NEXT-METHOD)) (GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER *SAMPGF*) T) EQL-OK: T (LET ((*SAMPGF* (DEFGENERIC SAMPGF04 (X Y)))) (LET ((BADMETHOD (DEFMETHOD GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER ((GF (EQL *SAMPGF*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER *SAMPGF*)) (REMOVE-METHOD #'GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: #1=(X Y) Values returned by the extending method: #1#, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPGF* (DEFGENERIC SAMPGF05 (X Y)))) (DEFMETHOD GENERIC-FUNCTION-DECLARATIONS ((GF (EQL *SAMPGF*))) (CALL-NEXT-METHOD)) (GENERIC-FUNCTION-DECLARATIONS *SAMPGF*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPGF* (DEFGENERIC SAMPGF06 (X Y)))) (LET ((BADMETHOD (DEFMETHOD GENERIC-FUNCTION-DECLARATIONS ((GF (EQL *SAMPGF*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (GENERIC-FUNCTION-DECLARATIONS *SAMPGF*)) (REMOVE-METHOD #'GENERIC-FUNCTION-DECLARATIONS BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: GENERIC-FUNCTION-DECLARATIONS: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: NIL Values returned by the extending method: NIL, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPGF* (DEFGENERIC SAMPGF07 (X Y)))) (DEFMETHOD GENERIC-FUNCTION-LAMBDA-LIST ((GF (EQL *SAMPGF*))) (CALL-NEXT-METHOD)) (GENERIC-FUNCTION-LAMBDA-LIST *SAMPGF*) T) EQL-OK: T (LET ((*SAMPGF* (DEFGENERIC SAMPGF08 (X Y)))) (LET ((BADMETHOD (DEFMETHOD GENERIC-FUNCTION-LAMBDA-LIST ((GF (EQL *SAMPGF*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (GENERIC-FUNCTION-LAMBDA-LIST *SAMPGF*)) (REMOVE-METHOD #'GENERIC-FUNCTION-LAMBDA-LIST BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: GENERIC-FUNCTION-LAMBDA-LIST: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: #1=(X Y) Values returned by the extending method: #1#, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPGF* (DEFGENERIC SAMPGF09 (X Y)))) (DEFMETHOD GENERIC-FUNCTION-METHOD-CLASS ((GF (EQL *SAMPGF*))) (CALL-NEXT-METHOD)) (GENERIC-FUNCTION-METHOD-CLASS *SAMPGF*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPGF* (DEFGENERIC SAMPGF10 (X Y)))) (LET ((BADMETHOD (DEFMETHOD GENERIC-FUNCTION-METHOD-CLASS ((GF (EQL *SAMPGF*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (GENERIC-FUNCTION-METHOD-CLASS *SAMPGF*)) (REMOVE-METHOD #'GENERIC-FUNCTION-METHOD-CLASS BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: GENERIC-FUNCTION-METHOD-CLASS: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: #1=# Values returned by the extending method: #1#, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPGF* (DEFGENERIC SAMPGF11 (X Y)))) (DEFMETHOD GENERIC-FUNCTION-METHOD-COMBINATION ((GF (EQL *SAMPGF*))) (CALL-NEXT-METHOD)) (GENERIC-FUNCTION-METHOD-COMBINATION *SAMPGF*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPGF* (DEFGENERIC SAMPGF12 (X Y)))) (LET ((BADMETHOD (DEFMETHOD GENERIC-FUNCTION-METHOD-COMBINATION ((GF (EQL *SAMPGF*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (GENERIC-FUNCTION-METHOD-COMBINATION *SAMPGF*)) (REMOVE-METHOD #'GENERIC-FUNCTION-METHOD-COMBINATION BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: GENERIC-FUNCTION-METHOD-COMBINATION: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: #1=# Values returned by the extending method: #1#, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPGF* (DEFGENERIC SAMPGF13 (X Y)))) (DEFMETHOD GENERIC-FUNCTION-METHODS ((GF (EQL *SAMPGF*))) (CALL-NEXT-METHOD)) (GENERIC-FUNCTION-METHODS *SAMPGF*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPGF* (DEFGENERIC SAMPGF14 (X Y)))) (LET ((BADMETHOD (DEFMETHOD GENERIC-FUNCTION-METHODS ((GF (EQL *SAMPGF*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (GENERIC-FUNCTION-METHODS *SAMPGF*)) (REMOVE-METHOD #'GENERIC-FUNCTION-METHODS BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: GENERIC-FUNCTION-METHODS: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: NIL Values returned by the extending method: NIL, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPGF* (DEFGENERIC SAMPGF15 (X Y)))) (DEFMETHOD GENERIC-FUNCTION-NAME ((GF (EQL *SAMPGF*))) (CALL-NEXT-METHOD)) (GENERIC-FUNCTION-NAME *SAMPGF*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPGF* (DEFGENERIC SAMPGF16 (X Y)))) (LET ((BADMETHOD (DEFMETHOD GENERIC-FUNCTION-NAME ((GF (EQL *SAMPGF*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (GENERIC-FUNCTION-NAME *SAMPGF*)) (REMOVE-METHOD #'GENERIC-FUNCTION-NAME BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: GENERIC-FUNCTION-NAME: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: SAMPGF16 Values returned by the extending method: SAMPGF16, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPGF* (DEFGENERIC SAMPGF17 (X Y)))) (DEFMETHOD (SETF GENERIC-FUNCTION-NAME) (NEW-VALUE (GF (EQL *SAMPGF*))) (CALL-NEXT-METHOD)) (SETF (GENERIC-FUNCTION-NAME *SAMPGF*) 'SAMPGF17RENAMED) T) EQL-OK: T (LET ((*SAMPGF* (DEFGENERIC SAMPGF18 (X Y)))) (LET ((BADMETHOD (DEFMETHOD (SETF GENERIC-FUNCTION-NAME) (NEW-VALUE (GF (EQL *SAMPGF*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (SETF (GENERIC-FUNCTION-NAME *SAMPGF*) 'SAMPGF18RENAMED)) (REMOVE-METHOD #'(SETF GENERIC-FUNCTION-NAME) BADMETHOD)))) WARNING: Adding method # (EQL #))> to an already called generic function # [SIMPLE-ERROR]: #1=(SETF GENERIC-FUNCTION-NAME): Extending a standardized method is only allowed if it returns the same values as the next method. Original values: SAMPGF18RENAMED Values returned by the extending method: SAMPGF18RENAMED, T WARNING: Removing method #1=# (EQL #))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPMETHOD* (DEFMETHOD SAMPGF19 NIL 'BAR))) (DEFMETHOD METHOD-FUNCTION ((METHOD (EQL *SAMPMETHOD*))) (CALL-NEXT-METHOD)) (METHOD-FUNCTION *SAMPMETHOD*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPMETHOD* (DEFMETHOD SAMPGF20 NIL 'BAR))) (LET ((BADMETHOD (DEFMETHOD METHOD-FUNCTION ((METHOD (EQL *SAMPMETHOD*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (METHOD-FUNCTION *SAMPMETHOD*)) (REMOVE-METHOD #'METHOD-FUNCTION BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: METHOD-FUNCTION: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: #1=# Values returned by the extending method: #1#, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPMETHOD* (DEFMETHOD SAMPGF21 NIL 'BAR))) (DEFMETHOD METHOD-GENERIC-FUNCTION ((METHOD (EQL *SAMPMETHOD*))) (CALL-NEXT-METHOD)) (METHOD-GENERIC-FUNCTION *SAMPMETHOD*) T) EQL-OK: T (LET ((*SAMPMETHOD* (DEFMETHOD SAMPGF22 NIL 'BAR))) (LET ((BADMETHOD (DEFMETHOD METHOD-GENERIC-FUNCTION ((METHOD (EQL *SAMPMETHOD*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (METHOD-GENERIC-FUNCTION *SAMPMETHOD*)) (REMOVE-METHOD #'METHOD-GENERIC-FUNCTION BADMETHOD)))) [SIMPLE-ERROR]: METHOD-GENERIC-FUNCTION: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: #1=# Values returned by the extending method: #1#, T EQL-OK: ERROR (LET ((*SAMPMETHOD* (DEFMETHOD SAMPGF23 NIL 'BAR))) (DEFMETHOD METHOD-LAMBDA-LIST ((METHOD (EQL *SAMPMETHOD*))) (CALL-NEXT-METHOD)) (METHOD-LAMBDA-LIST *SAMPMETHOD*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPMETHOD* (DEFMETHOD SAMPGF24 NIL 'BAR))) (LET ((BADMETHOD (DEFMETHOD METHOD-LAMBDA-LIST ((METHOD (EQL *SAMPMETHOD*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (METHOD-LAMBDA-LIST *SAMPMETHOD*)) (REMOVE-METHOD #'METHOD-LAMBDA-LIST BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: METHOD-LAMBDA-LIST: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: NIL Values returned by the extending method: NIL, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPMETHOD* (DEFMETHOD SAMPGF25 NIL 'BAR))) (DEFMETHOD METHOD-SPECIALIZERS ((METHOD (EQL *SAMPMETHOD*))) (CALL-NEXT-METHOD)) (METHOD-SPECIALIZERS *SAMPMETHOD*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPMETHOD* (DEFMETHOD SAMPGF26 NIL 'BAR))) (LET ((BADMETHOD (DEFMETHOD METHOD-SPECIALIZERS ((METHOD (EQL *SAMPMETHOD*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (METHOD-SPECIALIZERS *SAMPMETHOD*)) (REMOVE-METHOD #'METHOD-SPECIALIZERS BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: METHOD-SPECIALIZERS: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: NIL Values returned by the extending method: NIL, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPMETHOD* (PROGN (DEFCLASS SAMPCLASS21 NIL ((X :READER SAMPCLASS21X))) (FIRST (GENERIC-FUNCTION-METHODS #'SAMPCLASS21X))))) (DEFMETHOD ACCESSOR-METHOD-SLOT-DEFINITION ((METHOD (EQL *SAMPMETHOD*))) (CALL-NEXT-METHOD)) (ACCESSOR-METHOD-SLOT-DEFINITION *SAMPMETHOD*) T) EQL-OK: T (LET ((*SAMPMETHOD* (PROGN (DEFCLASS SAMPCLASS22 NIL ((X :READER SAMPCLASS22X))) (FIRST (GENERIC-FUNCTION-METHODS #'SAMPCLASS22X))))) (LET ((BADMETHOD (DEFMETHOD ACCESSOR-METHOD-SLOT-DEFINITION ((SLOTDEF (EQL *SAMPMETHOD*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (ACCESSOR-METHOD-SLOT-DEFINITION *SAMPMETHOD*)) (REMOVE-METHOD #'ACCESSOR-METHOD-SLOT-DEFINITION BADMETHOD)))) WARNING: Adding method #)>))> to an already called generic function # [SIMPLE-ERROR]: ACCESSOR-METHOD-SLOT-DEFINITION: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: #1=# Values returned by the extending method: #1#, T WARNING: Removing method #1=#)>))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPSLOT* (FIRST (CLASS-DIRECT-SLOTS (DEFCLASS SAMPCLASS23 NIL ((X))))))) (DEFMETHOD SLOT-DEFINITION-ALLOCATION ((SLOTDEF (EQL *SAMPSLOT*))) (CALL-NEXT-METHOD)) (SLOT-DEFINITION-ALLOCATION *SAMPSLOT*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPSLOT* (FIRST (CLASS-DIRECT-SLOTS (DEFCLASS SAMPCLASS24 NIL ((X))))))) (LET ((BADMETHOD (DEFMETHOD SLOT-DEFINITION-ALLOCATION ((SLOTDEF (EQL *SAMPSLOT*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (SLOT-DEFINITION-ALLOCATION *SAMPSLOT*)) (REMOVE-METHOD #'SLOT-DEFINITION-ALLOCATION BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: SLOT-DEFINITION-ALLOCATION: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: :INSTANCE Values returned by the extending method: :INSTANCE, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPSLOT* (FIRST (CLASS-DIRECT-SLOTS (DEFCLASS SAMPCLASS25 NIL ((X))))))) (DEFMETHOD SLOT-DEFINITION-INITARGS ((SLOTDEF (EQL *SAMPSLOT*))) (CALL-NEXT-METHOD)) (SLOT-DEFINITION-INITARGS *SAMPSLOT*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPSLOT* (FIRST (CLASS-DIRECT-SLOTS (DEFCLASS SAMPCLASS26 NIL ((X))))))) (LET ((BADMETHOD (DEFMETHOD SLOT-DEFINITION-INITARGS ((SLOTDEF (EQL *SAMPSLOT*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (SLOT-DEFINITION-INITARGS *SAMPSLOT*)) (REMOVE-METHOD #'SLOT-DEFINITION-INITARGS BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: SLOT-DEFINITION-INITARGS: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: NIL Values returned by the extending method: NIL, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPSLOT* (FIRST (CLASS-DIRECT-SLOTS (DEFCLASS SAMPCLASS27 NIL ((X))))))) (DEFMETHOD SLOT-DEFINITION-INITFORM ((SLOTDEF (EQL *SAMPSLOT*))) (CALL-NEXT-METHOD)) (SLOT-DEFINITION-INITFORM *SAMPSLOT*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPSLOT* (FIRST (CLASS-DIRECT-SLOTS (DEFCLASS SAMPCLASS28 NIL ((X))))))) (LET ((BADMETHOD (DEFMETHOD SLOT-DEFINITION-INITFORM ((SLOTDEF (EQL *SAMPSLOT*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (SLOT-DEFINITION-INITFORM *SAMPSLOT*)) (REMOVE-METHOD #'SLOT-DEFINITION-INITFORM BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: SLOT-DEFINITION-INITFORM: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: NIL Values returned by the extending method: NIL, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPSLOT* (FIRST (CLASS-DIRECT-SLOTS (DEFCLASS SAMPCLASS29 NIL ((X))))))) (DEFMETHOD SLOT-DEFINITION-INITFUNCTION ((SLOTDEF (EQL *SAMPSLOT*))) (CALL-NEXT-METHOD)) (SLOT-DEFINITION-INITFUNCTION *SAMPSLOT*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPSLOT* (FIRST (CLASS-DIRECT-SLOTS (DEFCLASS SAMPCLASS30 NIL ((X))))))) (LET ((BADMETHOD (DEFMETHOD SLOT-DEFINITION-INITFUNCTION ((SLOTDEF (EQL *SAMPSLOT*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (SLOT-DEFINITION-INITFUNCTION *SAMPSLOT*)) (REMOVE-METHOD #'SLOT-DEFINITION-INITFUNCTION BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: SLOT-DEFINITION-INITFUNCTION: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: NIL Values returned by the extending method: NIL, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPSLOT* (FIRST (CLASS-DIRECT-SLOTS (DEFCLASS SAMPCLASS31 NIL ((X))))))) (DEFMETHOD SLOT-DEFINITION-NAME ((SLOTDEF (EQL *SAMPSLOT*))) (CALL-NEXT-METHOD)) (SLOT-DEFINITION-NAME *SAMPSLOT*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPSLOT* (FIRST (CLASS-DIRECT-SLOTS (DEFCLASS SAMPCLASS32 NIL ((X))))))) (LET ((BADMETHOD (DEFMETHOD SLOT-DEFINITION-NAME ((SLOTDEF (EQL *SAMPSLOT*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (SLOT-DEFINITION-NAME *SAMPSLOT*)) (REMOVE-METHOD #'SLOT-DEFINITION-NAME BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: SLOT-DEFINITION-NAME: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: X Values returned by the extending method: X, T WARNING: Removing method [SIMPLE-ERROR]: SLOT-DEFINITION-NAME: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: X Values returned by the extending method: X, T #1=#))> to an already called generic function # EQL-OK: T (LET ((*SAMPSLOT* (FIRST (CLASS-DIRECT-SLOTS (DEFCLASS SAMPCLASS34 NIL ((X))))))) (LET ((BADMETHOD (DEFMETHOD SLOT-DEFINITION-TYPE ((SLOTDEF (EQL *SAMPSLOT*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (SLOT-DEFINITION-TYPE *SAMPSLOT*)) (REMOVE-METHOD #'SLOT-DEFINITION-TYPE BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: SLOT-DEFINITION-TYPE: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: T Values returned by the extending method: T, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPSLOT* (FIRST (CLASS-DIRECT-SLOTS (DEFCLASS SAMPCLASS35 NIL ((X))))))) (DEFMETHOD SLOT-DEFINITION-READERS ((SLOTDEF (EQL *SAMPSLOT*))) (CALL-NEXT-METHOD)) (SLOT-DEFINITION-READERS *SAMPSLOT*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPSLOT* (FIRST (CLASS-DIRECT-SLOTS (DEFCLASS SAMPCLASS36 NIL ((X))))))) (LET ((BADMETHOD (DEFMETHOD SLOT-DEFINITION-READERS ((SLOTDEF (EQL *SAMPSLOT*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (SLOT-DEFINITION-READERS *SAMPSLOT*)) (REMOVE-METHOD #'SLOT-DEFINITION-READERS BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: SLOT-DEFINITION-READERS: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: NIL Values returned by the extending method: NIL, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((STRUCT (DEFSTRUCT STRUCT04 SLOT1))) (NCONC (MAPCAR #'SLOT-DEFINITION-READERS (CLASS-DIRECT-SLOTS (FIND-CLASS STRUCT))) (MAPCAR #'SLOT-DEFINITION-WRITERS (CLASS-DIRECT-SLOTS (FIND-CLASS STRUCT))))) EQUAL-OK: ((STRUCT04-SLOT1) ((SETF STRUCT04-SLOT1))) (LET ((STRUCT (DEFSTRUCT STRUCT04RO (SLOT1 T :READ-ONLY T)))) (NCONC (MAPCAR #'SLOT-DEFINITION-READERS (CLASS-DIRECT-SLOTS (FIND-CLASS STRUCT))) (MAPCAR #'SLOT-DEFINITION-WRITERS (CLASS-DIRECT-SLOTS (FIND-CLASS STRUCT))))) EQUAL-OK: ((STRUCT04RO-SLOT1) NIL) (LET ((STRUCT (DEFSTRUCT (STRUCT04V (:TYPE VECTOR)) SLOT1))) (NCONC (MAPCAR #'SLOT-DEFINITION-READERS (STRUCTURE-DIRECT-SLOTS STRUCT)) (MAPCAR #'SLOT-DEFINITION-WRITERS (STRUCTURE-DIRECT-SLOTS STRUCT)))) EQUAL-OK: ((STRUCT04V-SLOT1) ((SETF STRUCT04V-SLOT1))) (LET ((STRUCT (DEFSTRUCT (STRUCT04ROV (:TYPE VECTOR)) (SLOT1 T :READ-ONLY T)))) (NCONC (MAPCAR #'SLOT-DEFINITION-READERS (STRUCTURE-DIRECT-SLOTS STRUCT)) (MAPCAR #'SLOT-DEFINITION-WRITERS (STRUCTURE-DIRECT-SLOTS STRUCT)))) EQUAL-OK: ((STRUCT04ROV-SLOT1) NIL) (LET* ((F "mop-tst-defstruct-test.lisp") (*SUPPRESS-CHECK-REDEFINITION* NIL) (*BREAK-ON-SIGNALS* T)) (WITH-OPEN-FILE (S F :DIRECTION :OUTPUT :IF-EXISTS :SUPERSEDE) (WRITE '(DEFSTRUCT STRUCT05 SLOT) :STREAM S) (TERPRI S) (WRITE '(DEFSTRUCT (STRUCT05V (:TYPE VECTOR)) SLOTV) :STREAM S) (TERPRI S)) (UNWIND-PROTECT (PROGN (COMPILE-FILE F) NIL) (POST-COMPILE-FILE-CLEANUP F))) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/mop-tst-defstruct-test.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/mop-tst-defstruct-test.fas 0 errors, 0 warnings EQL-OK: NIL (LET ((*SAMPSLOT* (FIRST (CLASS-DIRECT-SLOTS (DEFCLASS SAMPCLASS37 NIL ((X))))))) (DEFMETHOD SLOT-DEFINITION-WRITERS ((SLOTDEF (EQL *SAMPSLOT*))) (CALL-NEXT-METHOD)) (SLOT-DEFINITION-WRITERS *SAMPSLOT*) T) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPSLOT* (FIRST (CLASS-DIRECT-SLOTS (DEFCLASS SAMPCLASS38 NIL ((X))))))) (LET ((BADMETHOD (DEFMETHOD SLOT-DEFINITION-WRITERS ((SLOTDEF (EQL *SAMPSLOT*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (SLOT-DEFINITION-WRITERS *SAMPSLOT*)) (REMOVE-METHOD #'SLOT-DEFINITION-WRITERS BADMETHOD)))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: SLOT-DEFINITION-WRITERS: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: NIL Values returned by the extending method: NIL, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS39 NIL ((X))))) (UNLESS (CLASS-FINALIZED-P *SAMPCLASS*) (FINALIZE-INHERITANCE *SAMPCLASS*)) (LET ((*SAMPSLOT* (FIRST (CLASS-SLOTS *SAMPCLASS*)))) (DEFMETHOD SLOT-DEFINITION-LOCATION ((SLOTDEF (EQL *SAMPSLOT*))) (CALL-NEXT-METHOD)) (SLOT-DEFINITION-LOCATION *SAMPSLOT*) T)) WARNING: Adding method #))> to an already called generic function # EQL-OK: T (LET ((*SAMPCLASS* (DEFCLASS SAMPCLASS39 NIL ((X))))) (UNLESS (CLASS-FINALIZED-P *SAMPCLASS*) (FINALIZE-INHERITANCE *SAMPCLASS*)) (LET ((*SAMPSLOT* (FIRST (CLASS-SLOTS *SAMPCLASS*)))) (LET ((BADMETHOD (DEFMETHOD SLOT-DEFINITION-LOCATION ((SLOTDEF (EQL *SAMPSLOT*))) (VALUES (CALL-NEXT-METHOD) T)))) (UNWIND-PROTECT (NTH-VALUE 1 (SLOT-DEFINITION-LOCATION *SAMPSLOT*)) (REMOVE-METHOD #'SLOT-DEFINITION-LOCATION BADMETHOD))))) WARNING: Adding method #))> to an already called generic function # [SIMPLE-ERROR]: SLOT-DEFINITION-LOCATION: Extending a standardized method is only allowed if it returns the same values as the next method. Original values: 1 Values returned by the extending method: 1, T WARNING: Removing method #1=#))> from an already called generic function # EQL-OK: ERROR (LET ((ADD-METHOD-CALLED NIL)) (DEFCLASS TESTGENERICFUNCTION142 (STANDARD-GENERIC-FUNCTION) NIL (:METACLASS FUNCALLABLE-STANDARD-CLASS)) (DEFMETHOD ADD-METHOD :BEFORE ((GF TESTGENERICFUNCTION142) (METHOD STANDARD-METHOD)) (SETQ ADD-METHOD-CALLED T)) (DEFGENERIC TESTGF142 (X) (:GENERIC-FUNCTION-CLASS TESTGENERICFUNCTION142)) (DEFMETHOD TESTGF142 (X) (DECLARE (IGNORE X))) (LIST ADD-METHOD-CALLED (SYMBOLS-CLEANUP '(TESTGENERICFUNCTION142 TESTGF142)))) EQUAL-OK: (T NIL) (LET ((REMOVE-METHOD-CALLED NIL)) (DEFCLASS TESTGENERICFUNCTION143 (STANDARD-GENERIC-FUNCTION) NIL (:METACLASS FUNCALLABLE-STANDARD-CLASS)) (DEFMETHOD REMOVE-METHOD :BEFORE ((GF TESTGENERICFUNCTION143) (METHOD STANDARD-METHOD)) (SETQ REMOVE-METHOD-CALLED T)) (DEFGENERIC TESTGF143 (X) (:GENERIC-FUNCTION-CLASS TESTGENERICFUNCTION143)) (DEFMETHOD TESTGF143 (X) (DECLARE (IGNORE X)) 17) (DEFMETHOD TESTGF143 (X) (DECLARE (IGNORE X)) 19) (LIST REMOVE-METHOD-CALLED (SYMBOLS-CLEANUP '(TESTGENERICFUNCTION143 TESTGF143)))) WARNING: Replacing method #)> in # EQUAL-OK: (T NIL) (PROGN (DEFGENERIC FOO141 (X) (:METHOD ((X INTEGER)) (ISQRT X)) (:METHOD ((X REAL)) (- X))) (LET ((MY-METHOD (FIND-METHOD #'FOO141 NIL (LIST (FIND-CLASS 'REAL)))) (MY-ARGLIST (LIST 43))) (LIST (FUNCALL (METHOD-FUNCTION MY-METHOD) MY-ARGLIST 'NIL) (SYMBOL-CLEANUP 'FOO141)))) EQUAL-OK: (-43 T) (PROGN (DEFCLASS CUSTOM-METHOD (METHOD) ((QUALIFIERS :READER METHOD-QUALIFIERS :WRITER (SETF CUSTOM-METHOD-QUALIFIERS)) (LAMBDA-LIST :READER METHOD-LAMBDA-LIST :WRITER (SETF CUSTOM-METHOD-LAMBDA-LIST)) (SPECIALIZERS :READER METHOD-SPECIALIZERS :WRITER (SETF CUSTOM-METHOD-SPECIALIZERS)) (FUNCTION :READER METHOD-FUNCTION :WRITER (SETF CUSTOM-METHOD-FUNCTION)) (DOCUMENTATION :ACCESSOR CUSTOM-METHOD-DOCUMENTATION) (GENERIC-FUNCTION :READER METHOD-GENERIC-FUNCTION :WRITER (SETF CUSTOM-METHOD-GENERIC-FUNCTION)))) (DEFMETHOD SHARED-INITIALIZE ((METHOD CUSTOM-METHOD) SITUATION &REST ARGS &KEY (QUALIFIERS NIL QUALIFIERS-P) (LAMBDA-LIST NIL LAMBDA-LIST-P) (SPECIALIZERS NIL SPECIALIZERS-P) (FUNCTION NIL FUNCTION-P) (DOCUMENTATION NIL DOCUMENTATION-P)) (CALL-NEXT-METHOD) (WHEN (OR (EQ SITUATION 'T) QUALIFIERS-P) (SETF (CUSTOM-METHOD-QUALIFIERS METHOD) QUALIFIERS)) (WHEN (OR (EQ SITUATION 'T) LAMBDA-LIST-P) (SETF (CUSTOM-METHOD-LAMBDA-LIST METHOD) LAMBDA-LIST)) (WHEN (OR (EQ SITUATION 'T) SPECIALIZERS-P) (SETF (CUSTOM-METHOD-SPECIALIZERS METHOD) SPECIALIZERS)) (WHEN (OR (EQ SITUATION 'T) FUNCTION-P) (SETF (CUSTOM-METHOD-FUNCTION METHOD) FUNCTION)) (WHEN (OR (EQ SITUATION 'T) DOCUMENTATION-P) (SETF (CUSTOM-METHOD-DOCUMENTATION METHOD) DOCUMENTATION)) (WHEN (EQ SITUATION 'T) (SETF (CUSTOM-METHOD-GENERIC-FUNCTION METHOD) NIL)) METHOD) (DEFMETHOD DOCUMENTATION ((X CUSTOM-METHOD) (DOC-TYPE (EQL 'T))) (DECLARE (IGNORE DOC-TYPE)) (CUSTOM-METHOD-DOCUMENTATION X)) (DEFMETHOD (SETF DOCUMENTATION) (NEW-VALUE (X CUSTOM-METHOD) (DOC-TYPE (EQL 'T))) (DECLARE (IGNORE DOC-TYPE)) (SETF (CUSTOM-METHOD-DOCUMENTATION X) NEW-VALUE)) (DEFMETHOD (SETF METHOD-GENERIC-FUNCTION) (NEW-GF (METHOD CUSTOM-METHOD)) (SETF (CUSTOM-METHOD-GENERIC-FUNCTION METHOD) NEW-GF)) (LET ((RESULT 'NIL)) (DEFGENERIC TESTGF30 (A B) (:METHOD ((A INTEGER) (B INTEGER)) (- (CALL-NEXT-METHOD) (FLOOR A B))) (:METHOD ((A REAL) (B REAL)) (/ (FLOAT A) (FLOAT B))) (:METHOD-CLASS CUSTOM-METHOD)) (PUSH (NOT (FIND-METHOD #'TESTGF30 NIL (LIST (FIND-CLASS 'INTEGER) (FIND-CLASS 'INTEGER)) NIL)) RESULT) (PUSH (TESTGF30 17 2) RESULT) (DEFGENERIC TESTGF30 (A B) (:METHOD ((A REAL) (B REAL)) (/ (FLOAT A) (FLOAT B))) (:METHOD-CLASS CUSTOM-METHOD)) (PUSH (NOT (FIND-METHOD #'TESTGF30 NIL (LIST (FIND-CLASS 'INTEGER) (FIND-CLASS 'INTEGER)) NIL)) RESULT) (PUSH (TESTGF30 17 2) RESULT) (LIST (NREVERSE RESULT) (CLOS::GF-DYNAMICALLY-MODIFIABLE #'(SETF CUSTOM-METHOD-FUNCTION)) (CLOS::GF-DYNAMICALLY-MODIFIABLE #'CUSTOM-METHOD-DOCUMENTATION) (SYMBOLS-CLEANUP '(TESTGF30))))) WARNING: Adding method #)> to an already called generic function # WARNING: Adding method #)> to an already called generic function # WARNING: Adding method #)> to an already called generic function # WARNING: Redefining an already called generic function # EQUAL-OK: ((NIL 0.5 T 8.5) NIL NIL NIL) (PROGN (DEFGENERIC TESTGF34 (X)) (DEFMETHOD TESTGF34 ((X INTEGER)) 'OLD-INTEGER) (DEFMETHOD TESTGF34 ((X REAL)) 'REAL) (LIST* (TESTGF34 3) (TESTGF34 22/7) (PROGN (LET ((METHOD (FIND-METHOD #'TESTGF34 'NIL (LIST (FIND-CLASS 'INTEGER))))) (CHANGE-CLASS METHOD (FIND-CLASS 'CUSTOM-METHOD) :QUALIFIERS 'NIL :LAMBDA-LIST '(X) :SPECIALIZERS (LIST (FIND-CLASS 'RATIONAL)) :FUNCTION #'(LAMBDA (ARGUMENTS NEXT-METHODS) 'NEW-RATIONAL) :DOCUMENTATION NIL)) (LIST (TESTGF34 3) (TESTGF34 22/7) (SYMBOLS-CLEANUP '(CUSTOM-METHOD TESTGF34)))))) EQUAL-OK: (OLD-INTEGER REAL NEW-RATIONAL NEW-RATIONAL NIL) (PROGN (DEFGENERIC TESTGF35 (X)) (DEFMETHOD TESTGF35 ((X INTEGER)) (CONS 'INTEGER (IF (NEXT-METHOD-P) (CALL-NEXT-METHOD)))) (DEFMETHOD TESTGF35 ((X REAL)) (CONS 'REAL (IF (NEXT-METHOD-P) (CALL-NEXT-METHOD)))) (DEFCLASS CUSTOMIZED5-GENERIC-FUNCTION (STANDARD-GENERIC-FUNCTION) NIL (:METACLASS FUNCALLABLE-STANDARD-CLASS)) (DEFMETHOD COMPUTE-EFFECTIVE-METHOD ((GF CUSTOMIZED5-GENERIC-FUNCTION) METHOD-COMBINATION METHODS) `(REVERSE ,(CALL-NEXT-METHOD))) (LIST (TESTGF35 3) (PROGN (CHANGE-CLASS #'TESTGF35 'CUSTOMIZED5-GENERIC-FUNCTION) (TESTGF35 3)) (SYMBOLS-CLEANUP '(TESTGF35 CUSTOMIZED5-GENERIC-FUNCTION)))) EQUAL-OK: ((INTEGER REAL) (REAL INTEGER) NIL) (PROGN (DEFGENERIC TESTGF36 (X)) (DEFMETHOD TESTGF36 ((X INTEGER)) (CONS 'INTEGER (IF (NEXT-METHOD-P) (CALL-NEXT-METHOD)))) (DEFMETHOD TESTGF36 ((X REAL)) (CONS 'REAL (IF (NEXT-METHOD-P) (CALL-NEXT-METHOD)))) (DEFCLASS CUSTOMIZED6-GENERIC-FUNCTION (STANDARD-GENERIC-FUNCTION) NIL (:METACLASS FUNCALLABLE-STANDARD-CLASS)) (DEFMETHOD COMPUTE-DISCRIMINATING-FUNCTION ((GF CUSTOMIZED6-GENERIC-FUNCTION)) (LET ((ORIG-DF (CALL-NEXT-METHOD))) #'(LAMBDA (&REST ARGUMENTS) (REVERSE (APPLY ORIG-DF ARGUMENTS))))) (LIST (TESTGF36 3) (PROGN (CHANGE-CLASS #'TESTGF36 'CUSTOMIZED6-GENERIC-FUNCTION) (TESTGF36 3)) (SYMBOLS-CLEANUP '(TESTGF36 CUSTOMIZED6-GENERIC-FUNCTION)))) EQUAL-OK: ((INTEGER REAL) (REAL INTEGER) NIL) (PROGN (DEFCLASS TYPECHECKED-SLOT-DEFINITION (STANDARD-EFFECTIVE-SLOT-DEFINITION) NIL) (DEFMETHOD SLOT-VALUE-USING-CLASS ((CLASS STANDARD-CLASS) INSTANCE (SLOT TYPECHECKED-SLOT-DEFINITION)) (LET ((VALUE (CALL-NEXT-METHOD))) (UNLESS (TYPEP VALUE (SLOT-DEFINITION-TYPE SLOT)) (ERROR "Slot ~S of ~S has changed, no longer of type ~S" (SLOT-DEFINITION-NAME SLOT) INSTANCE (SLOT-DEFINITION-TYPE SLOT))) VALUE)) (DEFMETHOD (SETF SLOT-VALUE-USING-CLASS) (NEW-VALUE (CLASS STANDARD-CLASS) INSTANCE (SLOT TYPECHECKED-SLOT-DEFINITION)) (UNLESS (TYPEP NEW-VALUE (SLOT-DEFINITION-TYPE SLOT)) (ERROR "Slot ~S of ~S: new value is not of type ~S: ~S" (SLOT-DEFINITION-NAME SLOT) INSTANCE (SLOT-DEFINITION-TYPE SLOT) NEW-VALUE)) (CALL-NEXT-METHOD)) (DEFCLASS TYPECHECKED-SLOT-DEFINITION-CLASS (STANDARD-CLASS) NIL) (DEFMETHOD EFFECTIVE-SLOT-DEFINITION-CLASS ((CLASS TYPECHECKED-SLOT-DEFINITION-CLASS) &REST ARGS) (FIND-CLASS 'TYPECHECKED-SLOT-DEFINITION)) (DEFCLASS TESTCLASS28 NIL ((PAIR :TYPE (CONS SYMBOL (CONS SYMBOL NULL)) :INITARG :PAIR :ACCESSOR TESTCLASS28-PAIR)) (:METACLASS TYPECHECKED-SLOT-DEFINITION-CLASS)) (MACROLET ((SUCCEEDS (FORM) `(NOT (NTH-VALUE 1 (IGNORE-ERRORS ,FORM))))) (LET ((P (LIST 'ABC 'DEF)) (X (MAKE-INSTANCE 'TESTCLASS28))) (LIST (SUCCEEDS (MAKE-INSTANCE 'TESTCLASS28 :PAIR '(SEVENTEEN 17))) (SUCCEEDS (SETF (TESTCLASS28-PAIR X) P)) (SUCCEEDS (SETF (SECOND P) 456)) (SUCCEEDS (TESTCLASS28-PAIR X)) (SUCCEEDS (SLOT-VALUE X 'PAIR)) (SYMBOLS-CLEANUP '(TYPECHECKED-SLOT-DEFINITION TESTCLASS28 TESTCLASS28-PAIR TYPECHECKED-SLOT-DEFINITION-CLASS)))))) EQUAL-OK: (NIL T T NIL NIL NIL) (PROGN (DEFCLASS CLASS-SUPPORTING-CLASSOF-SLOTS (STANDARD-CLASS) ((SLOTNAME-TO-DUMMYSLOTNAME :TYPE LIST :INITFORM NIL))) (DEFCLASS CLASSOF-DIRECT-SLOT-DEFINITION-MIXIN NIL NIL) (LET ((ADD-MIXIN-TABLE (MAKE-HASH-TABLE :TEST 'STABLEHASH-EQ))) (DEFUN ADD-CLASSOF-DIRECT-MIXIN (SLOT-CLASS) (IF (SUBTYPEP SLOT-CLASS (FIND-CLASS 'CLASSOF-DIRECT-SLOT-DEFINITION-MIXIN)) SLOT-CLASS (OR (GETHASH SLOT-CLASS ADD-MIXIN-TABLE) (SETF (GETHASH SLOT-CLASS ADD-MIXIN-TABLE) (ENSURE-CLASS (MAKE-SYMBOL (CONCATENATE 'STRING (SYMBOL-NAME (CLASS-NAME SLOT-CLASS)) "-WITH-CLASSOF-SUPPORT")) :METACLASS (CLASS-OF SLOT-CLASS) :DIRECT-SUPERCLASSES (LIST SLOT-CLASS (FIND-CLASS 'CLASSOF-DIRECT-SLOT-DEFINITION-MIXIN)))))))) (DEFMETHOD DIRECT-SLOT-DEFINITION-CLASS ((CLASS CLASS-SUPPORTING-CLASSOF-SLOTS) &REST INITARGS) (IF (GETF INITARGS ':PER-SUBCLASS) (ADD-CLASSOF-DIRECT-MIXIN (CALL-NEXT-METHOD)) (CALL-NEXT-METHOD))) (DEFMETHOD INITIALIZE-INSTANCE :AFTER ((SLOT CLASSOF-DIRECT-SLOT-DEFINITION-MIXIN) &REST INITARGS &KEY PER-SUBCLASS) (DECLARE (IGNORE PER-SUBCLASS))) (DEFMETHOD COMPUTE-EFFECTIVE-SLOT-DEFINITION-INITARGS ((CLASS CLASS-SUPPORTING-CLASSOF-SLOTS) DIRECT-SLOT-DEFINITIONS) (IF (TYPEP (FIRST DIRECT-SLOT-DEFINITIONS) 'CLASSOF-DIRECT-SLOT-DEFINITION-MIXIN) (APPEND (CALL-NEXT-METHOD) (LIST ':PER-SUBCLASS T)) (CALL-NEXT-METHOD))) (DEFCLASS CLASSOF-EFFECTIVE-SLOT-DEFINITION-MIXIN NIL ((VALUE-SLOT-NAME :TYPE SYMBOL))) (LET ((ADD-MIXIN-TABLE (MAKE-HASH-TABLE :TEST 'STABLEHASH-EQ))) (DEFUN ADD-CLASSOF-EFFECTIVE-MIXIN (SLOT-CLASS) (IF (SUBTYPEP SLOT-CLASS (FIND-CLASS 'CLASSOF-EFFECTIVE-SLOT-DEFINITION-MIXIN)) SLOT-CLASS (OR (GETHASH SLOT-CLASS ADD-MIXIN-TABLE) (SETF (GETHASH SLOT-CLASS ADD-MIXIN-TABLE) (ENSURE-CLASS (MAKE-SYMBOL (CONCATENATE 'STRING (SYMBOL-NAME (CLASS-NAME SLOT-CLASS)) "-WITH-CLASSOF-SUPPORT")) :METACLASS (CLASS-OF SLOT-CLASS) :DIRECT-SUPERCLASSES (LIST SLOT-CLASS (FIND-CLASS 'CLASSOF-EFFECTIVE-SLOT-DEFINITION-MIXIN)))))))) (DEFMETHOD EFFECTIVE-SLOT-DEFINITION-CLASS ((CLASS CLASS-SUPPORTING-CLASSOF-SLOTS) &REST INITARGS) (IF (GETF INITARGS ':PER-SUBCLASS) (ADD-CLASSOF-EFFECTIVE-MIXIN (CALL-NEXT-METHOD)) (CALL-NEXT-METHOD))) (DEFMETHOD INITIALIZE-INSTANCE :AFTER ((SLOT CLASSOF-EFFECTIVE-SLOT-DEFINITION-MIXIN) &REST INITARGS &KEY PER-SUBCLASS) (DECLARE (IGNORE PER-SUBCLASS))) (DEFMETHOD COMPUTE-SLOTS ((CLASS CLASS-SUPPORTING-CLASSOF-SLOTS)) (LET* ((SLOTS (CALL-NEXT-METHOD)) (DUMMY-SLOTS (LET ((OLD-DUMMYSLOTNAMES (SLOT-VALUE CLASS 'SLOTNAME-TO-DUMMYSLOTNAME)) (NEW-DUMMYSLOTNAMES 'NIL)) (PROG1 (MAPCAN #'(LAMBDA (SLOT) (IF (TYPEP SLOT 'CLASSOF-EFFECTIVE-SLOT-DEFINITION-MIXIN) (LET* ((VALUE-SLOT-NAME (OR (GETF OLD-DUMMYSLOTNAMES (SLOT-DEFINITION-NAME SLOT)) (MAKE-SYMBOL (CONCATENATE 'STRING "VALUE-OF-" (SYMBOL-NAME (SLOT-DEFINITION-NAME SLOT)) "-IN-" (SYMBOL-NAME (CLASS-NAME CLASS)))))) (VALUE-SLOT (MAKE-INSTANCE 'STANDARD-EFFECTIVE-SLOT-DEFINITION :NAME VALUE-SLOT-NAME :ALLOCATION :CLASS :INITFORM (SLOT-DEFINITION-INITFORM SLOT) :INITFUNCTION (SLOT-DEFINITION-INITFUNCTION SLOT) :TYPE (SLOT-DEFINITION-TYPE SLOT)))) (SETF (SLOT-VALUE SLOT 'VALUE-SLOT-NAME) VALUE-SLOT-NAME) (SETF (GETF NEW-DUMMYSLOTNAMES (SLOT-DEFINITION-NAME SLOT)) VALUE-SLOT-NAME) (LIST VALUE-SLOT)) 'NIL)) SLOTS) (SETF (SLOT-VALUE CLASS 'SLOTNAME-TO-DUMMYSLOTNAME) NEW-DUMMYSLOTNAMES))))) (APPEND SLOTS DUMMY-SLOTS))) (DEFMETHOD SLOT-VALUE-USING-CLASS ((CLASS STANDARD-CLASS) OBJECT (SLOT CLASSOF-EFFECTIVE-SLOT-DEFINITION-MIXIN)) (SLOT-VALUE OBJECT (SLOT-VALUE SLOT 'VALUE-SLOT-NAME))) (DEFMETHOD (SETF SLOT-VALUE-USING-CLASS) (NEW-VALUE (CLASS STANDARD-CLASS) OBJECT (SLOT CLASSOF-EFFECTIVE-SLOT-DEFINITION-MIXIN)) (SETF (SLOT-VALUE OBJECT (SLOT-VALUE SLOT 'VALUE-SLOT-NAME)) NEW-VALUE)) (DEFMETHOD SLOT-BOUNDP-USING-CLASS ((CLASS STANDARD-CLASS) OBJECT (SLOT CLASSOF-EFFECTIVE-SLOT-DEFINITION-MIXIN)) (SLOT-BOUNDP OBJECT (SLOT-VALUE SLOT 'VALUE-SLOT-NAME))) (DEFMETHOD SLOT-MAKUNBOUND-USING-CLASS ((CLASS STANDARD-CLASS) OBJECT (SLOT CLASSOF-EFFECTIVE-SLOT-DEFINITION-MIXIN)) (SLOT-MAKUNBOUND OBJECT (SLOT-VALUE SLOT 'VALUE-SLOT-NAME))) (DEFGENERIC INITIALIZE-CLASSOF-SLOT (CLASS SLOT) (:METHOD ((CLASS CLASS-SUPPORTING-CLASSOF-SLOTS) (SLOT CLASSOF-EFFECTIVE-SLOT-DEFINITION-MIXIN)))) (DEFMETHOD INITIALIZE-INSTANCE :AFTER ((CLASS CLASS-SUPPORTING-CLASSOF-SLOTS) &REST INITARGS) (DOLIST (SLOT (CLASS-SLOTS CLASS)) (WHEN (AND (TYPEP SLOT 'CLASSOF-EFFECTIVE-SLOT-DEFINITION-MIXIN) (NOT (SLOT-BOUNDP (CLASS-PROTOTYPE CLASS) (SLOT-DEFINITION-NAME SLOT)))) (INITIALIZE-CLASSOF-SLOT CLASS SLOT)))) (DEFCLASS TESTCLASS29A NIL ((X :ALLOCATION :INSTANCE) (Y :ALLOCATION :CLASS :PER-SUBCLASS T) (Z :ALLOCATION :CLASS)) (:METACLASS CLASS-SUPPORTING-CLASSOF-SLOTS)) (DEFCLASS TESTCLASS29B (TESTCLASS29A) NIL (:METACLASS CLASS-SUPPORTING-CLASSOF-SLOTS)) (LET ((INSTA1 (MAKE-INSTANCE 'TESTCLASS29A)) (INSTA2 (MAKE-INSTANCE 'TESTCLASS29A)) (INSTB1 (MAKE-INSTANCE 'TESTCLASS29B)) (INSTB2 (MAKE-INSTANCE 'TESTCLASS29B))) (SETF (SLOT-VALUE INSTA1 'X) 'X1) (SETF (SLOT-VALUE INSTA1 'Y) 'Y1) (SETF (SLOT-VALUE INSTA1 'Z) 'Z1) (SETF (SLOT-VALUE INSTB1 'X) 'X2) (SETF (SLOT-VALUE INSTB1 'Y) 'Y2) (SETF (SLOT-VALUE INSTB1 'Z) 'Z2) (SETF (SLOT-VALUE INSTB2 'X) 'X3) (SETF (SLOT-VALUE INSTB2 'Y) 'Y3) (SETF (SLOT-VALUE INSTB2 'Z) 'Z3) (SETF (SLOT-VALUE INSTA2 'X) 'X4) (SETF (SLOT-VALUE INSTA2 'Y) 'Y4) (SETF (SLOT-VALUE INSTA2 'Z) 'Z4) (LIST (SLOT-VALUE INSTA1 'X) (SLOT-VALUE INSTA1 'Y) (SLOT-VALUE INSTA1 'Z) (SLOT-VALUE INSTA2 'X) (SLOT-VALUE INSTA2 'Y) (SLOT-VALUE INSTA2 'Z) (SLOT-VALUE INSTB1 'X) (SLOT-VALUE INSTB1 'Y) (SLOT-VALUE INSTB1 'Z) (SLOT-VALUE INSTB2 'X) (SLOT-VALUE INSTB2 'Y) (SLOT-VALUE INSTB2 'Z)))) EQUAL-OK: (X1 Y4 Z4 X4 Y4 Z4 X2 Y3 Z4 X3 Y3 Z4) (PROGN (LOAD (MERGE-PATHNAMES "mop-aux.lisp" *RUN-TEST-TRUENAME*)) (LOAD (MERGE-PATHNAMES "hash-classes.lisp" *RUN-TEST-TRUENAME*)) T) ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/tests/mop-aux.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/tests/mop-aux.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/tests/hash-classes.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/tests/hash-classes.lisp EQL-OK: T (PROGN (DEFCLASS VIRTUAL-CLASS (CLASS-SUPPORTING-CLASSOF-SLOTS STANDARD-CLASS) NIL) (DEFCLASS VIRTUAL-BASE-CLASS (VIRTUAL-CLASS) ((VT-FUNCTIONS :TYPE VECTOR :ACCESSOR VTBASE-VT-FUNCTIONS) (VT-SLOT-NAME :TYPE SYMBOL :ACCESSOR VTBASE-VT-SLOT-NAME))) (DEFMETHOD VALIDATE-SUPERCLASS ((C1 VIRTUAL-CLASS) (C2 VIRTUAL-BASE-CLASS)) T) (DEFMETHOD INITIALIZE-INSTANCE ((CLASS VIRTUAL-BASE-CLASS) &REST INITARGS &KEY (DIRECT-SLOTS 'NIL)) (SETF (VTBASE-VT-FUNCTIONS CLASS) (MAKE-ARRAY 10 :ADJUSTABLE T :FILL-POINTER 0)) (SETF (VTBASE-VT-SLOT-NAME CLASS) (GENSYM "VTABLE")) (APPLY #'CALL-NEXT-METHOD CLASS :DIRECT-SLOTS (CONS (LIST ':NAME (VTBASE-VT-SLOT-NAME CLASS) ':ALLOCATION ':CLASS ':PER-SUBCLASS T ':BASE-CLASS CLASS) DIRECT-SLOTS) INITARGS)) (DEFCLASS VIRTUAL-TABLE-DIRECT-SLOT-DEFINITION (STANDARD-DIRECT-SLOT-DEFINITION CLASSOF-DIRECT-SLOT-DEFINITION-MIXIN) ((BASE-CLASS :INITARG :BASE-CLASS))) (DEFCLASS VIRTUAL-TABLE-EFFECTIVE-SLOT-DEFINITION (STANDARD-EFFECTIVE-SLOT-DEFINITION CLASSOF-EFFECTIVE-SLOT-DEFINITION-MIXIN) ((BASE-CLASS :INITARG :BASE-CLASS))) (DEFMETHOD DIRECT-SLOT-DEFINITION-CLASS ((CLASS VIRTUAL-BASE-CLASS) &REST INITARGS) (IF (GETF INITARGS ':BASE-CLASS) (FIND-CLASS 'VIRTUAL-TABLE-DIRECT-SLOT-DEFINITION) (CALL-NEXT-METHOD))) (DEFMETHOD COMPUTE-EFFECTIVE-SLOT-DEFINITION-INITARGS ((CLASS VIRTUAL-CLASS) DIRECT-SLOT-DEFINITIONS) (IF (TYPEP (FIRST DIRECT-SLOT-DEFINITIONS) 'VIRTUAL-TABLE-DIRECT-SLOT-DEFINITION) (APPEND (CALL-NEXT-METHOD) (LIST ':BASE-CLASS (SLOT-VALUE (FIRST DIRECT-SLOT-DEFINITIONS) 'BASE-CLASS))) (CALL-NEXT-METHOD))) (DEFMETHOD EFFECTIVE-SLOT-DEFINITION-CLASS ((CLASS VIRTUAL-CLASS) &REST INITARGS) (IF (GETF INITARGS ':BASE-CLASS) (FIND-CLASS 'VIRTUAL-TABLE-EFFECTIVE-SLOT-DEFINITION) (CALL-NEXT-METHOD))) (DEFUN COMPUTE-VIRTUAL-GENERIC-FUNCTION-EFFECTIVE-METHOD (GF CLASS) (MULTIPLE-VALUE-BIND (METHODS CERTAIN) (COMPUTE-APPLICABLE-METHODS-USING-CLASSES GF (CONS CLASS (MAKE-LIST (1- (LENGTH (GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER GF))) :INITIAL-ELEMENT (FIND-CLASS 'T)))) (UNLESS CERTAIN (ERROR "Problem determining the applicable methods of ~S on ~S" GF CLASS)) (COMPUTE-EFFECTIVE-METHOD-AS-FUNCTION GF METHODS (CONS (CLASS-PROTOTYPE CLASS) (MAKE-LIST (1- (LENGTH (GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER GF))) :INITIAL-ELEMENT NIL))))) (DEFMETHOD INITIALIZE-CLASSOF-SLOT ((CLASS VIRTUAL-CLASS) (SLOT VIRTUAL-TABLE-EFFECTIVE-SLOT-DEFINITION)) (SETF (SLOT-VALUE (CLASS-PROTOTYPE CLASS) (SLOT-DEFINITION-NAME SLOT)) (LET* ((BASE-CLASS (SLOT-VALUE SLOT 'BASE-CLASS)) (CURRENT-LENGTH (LENGTH (VTBASE-VT-FUNCTIONS BASE-CLASS))) (VTABLE (MAKE-ARRAY CURRENT-LENGTH :ADJUSTABLE T :FILL-POINTER CURRENT-LENGTH))) (DOTIMES (I CURRENT-LENGTH) (SETF (AREF VTABLE I) (COMPUTE-VIRTUAL-GENERIC-FUNCTION-EFFECTIVE-METHOD (AREF (VTBASE-VT-FUNCTIONS BASE-CLASS) I) CLASS))) VTABLE))) (DEFUN COLLECT-ALL-SUBCLASSES (CLASS) (LET ((RESULT 'NIL) (TODO (LIST CLASS))) (LOOP (UNLESS TODO (RETURN)) (LET ((LAST-TODO TODO)) (SETQ TODO 'NIL) (DOLIST (C LAST-TODO) (UNLESS (MEMBER C RESULT) (SETQ TODO (REVAPPEND (CLASS-DIRECT-SUBCLASSES C) TODO)) (PUSH C RESULT))))) (NREVERSE RESULT))) (DEFCLASS VIRTUAL-GENERIC-FUNCTION (STANDARD-GENERIC-FUNCTION) ((BASE-CLASS :TYPE CLASS :ACCESSOR VTGF-BASE-CLASS) (VT-INDEX :TYPE FIXNUM :ACCESSOR VTGF-VT-INDEX)) (:METACLASS FUNCALLABLE-STANDARD-CLASS)) (DEFMETHOD SHARED-INITIALIZE ((GF VIRTUAL-GENERIC-FUNCTION) SITUATION &REST ARGS &KEY (BASE-CLASS NIL BASE-CLASS-P)) (CALL-NEXT-METHOD) (WHEN BASE-CLASS-P (WHEN (CONSP BASE-CLASS) (SETQ BASE-CLASS (CAR BASE-CLASS))) (UNLESS (TYPEP BASE-CLASS 'CLASS) (SETQ BASE-CLASS (FIND-CLASS BASE-CLASS))) (SETF (VTGF-BASE-CLASS GF) BASE-CLASS) (SETF (VTGF-VT-INDEX GF) (OR (POSITION GF (VTBASE-VT-FUNCTIONS BASE-CLASS)) (LET ((INDEX (VECTOR-PUSH-EXTEND GF (VTBASE-VT-FUNCTIONS BASE-CLASS))) (VT-SLOT-NAME (VTBASE-VT-SLOT-NAME BASE-CLASS))) (DOLIST (CL (COLLECT-ALL-SUBCLASSES BASE-CLASS)) (LET ((CL-PROTO (CLASS-PROTOTYPE CL))) (ASSERT (= (FILL-POINTER (SLOT-VALUE CL-PROTO VT-SLOT-NAME)) INDEX)) (VECTOR-PUSH-EXTEND '#:NOT-YET-UPDATED (SLOT-VALUE CL-PROTO VT-SLOT-NAME)))) INDEX)))) GF) (DEFUN UPDATE-VIRTUAL-GENERIC-FUNCTION (GF &OPTIONAL (CLASS (VTGF-BASE-CLASS GF))) (LET ((VT-SLOT-NAME (VTBASE-VT-SLOT-NAME (VTGF-BASE-CLASS GF))) (VT-INDEX (VTGF-VT-INDEX GF))) (DOLIST (CL (COLLECT-ALL-SUBCLASSES CLASS)) (SETF (AREF (SLOT-VALUE (CLASS-PROTOTYPE CL) VT-SLOT-NAME) VT-INDEX) (COMPUTE-VIRTUAL-GENERIC-FUNCTION-EFFECTIVE-METHOD GF CL))))) (DEFCLASS VIRTUAL-GENERIC-FUNCTION-UPDATER NIL NIL) (DEFPARAMETER *VIRTUAL-GENERIC-FUNCTION-UPDATER* (MAKE-INSTANCE 'VIRTUAL-GENERIC-FUNCTION-UPDATER)) (DEFMETHOD UPDATE-DEPENDENT ((GF VIRTUAL-GENERIC-FUNCTION) (DEPENDENT VIRTUAL-GENERIC-FUNCTION-UPDATER) &REST DETAILS) (DECLARE (IGNORE DETAILS)) (UPDATE-VIRTUAL-GENERIC-FUNCTION GF)) (DEFMETHOD INITIALIZE-INSTANCE :AFTER ((GF VIRTUAL-GENERIC-FUNCTION) &REST ARGS) (UPDATE-VIRTUAL-GENERIC-FUNCTION GF) (ADD-DEPENDENT GF *VIRTUAL-GENERIC-FUNCTION-UPDATER*)) (DEFMETHOD ADD-METHOD ((GF VIRTUAL-GENERIC-FUNCTION) (METHOD METHOD)) (LET (( (FIND-CLASS 'T))) (UNLESS (EVERY #'(LAMBDA (SPECIALIZER) (EQ SPECIALIZER )) (REST (METHOD-SPECIALIZERS METHOD))) (ERROR "invalid method for ~S: ~S. May only dispatch on the first argument." GF METHOD))) (UNLESS (TYPEP (FIRST (METHOD-SPECIALIZERS METHOD)) 'CLASS) (ERROR "invalid method for ~S: ~S. The specializer on the first argument must be a class." GF METHOD)) (CALL-NEXT-METHOD)) (DEFMETHOD COMPUTE-DISCRIMINATING-FUNCTION ((GF VIRTUAL-GENERIC-FUNCTION)) (LET ((VT-SLOT-NAME (VTBASE-VT-SLOT-NAME (VTGF-BASE-CLASS GF))) (VT-INDEX (VTGF-VT-INDEX GF))) (ASSERT (EQ (AREF (VTBASE-VT-FUNCTIONS (VTGF-BASE-CLASS GF)) VT-INDEX) GF)) #'(LAMBDA (FIRST-ARG &REST OTHER-ARGS) (APPLY (AREF (SLOT-VALUE FIRST-ARG VT-SLOT-NAME) VT-INDEX) FIRST-ARG OTHER-ARGS)))) (DEFCLASS TESTCLASS30A NIL NIL (:METACLASS VIRTUAL-BASE-CLASS)) (DEFCLASS TESTCLASS30B (TESTCLASS30A) NIL (:METACLASS VIRTUAL-CLASS)) (DEFCLASS TESTCLASS30C NIL NIL (:METACLASS VIRTUAL-BASE-CLASS)) (DEFGENERIC TESTGF30F (X) (:METHOD ((X TESTCLASS30A)) "f on A") (:GENERIC-FUNCTION-CLASS VIRTUAL-GENERIC-FUNCTION) (:BASE-CLASS TESTCLASS30A)) (DEFGENERIC TESTGF30G (X Y) (:METHOD ((X TESTCLASS30A) Y) (LIST "g on A" Y)) (:METHOD ((X TESTCLASS30B) Y) (LIST "g on B" Y)) (:GENERIC-FUNCTION-CLASS VIRTUAL-GENERIC-FUNCTION) (:BASE-CLASS TESTCLASS30A)) (DEFGENERIC TESTGF30H (X Y) (:METHOD ((X TESTCLASS30C) Y) (LIST "h on C" Y)) (:GENERIC-FUNCTION-CLASS VIRTUAL-GENERIC-FUNCTION) (:BASE-CLASS TESTCLASS30C)) (DEFCLASS TESTCLASS30D (TESTCLASS30B TESTCLASS30C) NIL (:METACLASS VIRTUAL-CLASS)) (DEFMETHOD TESTGF30G ((X TESTCLASS30D) Y) (LIST "g on D" Y)) (DEFMETHOD TESTGF30H ((X TESTCLASS30D) Y) (LIST "h on D" Y)) (LET ((INSTA (MAKE-INSTANCE 'TESTCLASS30A)) (INSTC (MAKE-INSTANCE 'TESTCLASS30C)) (INSTD (MAKE-INSTANCE 'TESTCLASS30D))) (LIST (TESTGF30F INSTA) (TESTGF30F INSTD) (TESTGF30G INSTA 10) (TESTGF30G INSTD 20) (TESTGF30H INSTC 30) (TESTGF30H INSTD 40) (SYMBOLS-CLEANUP '(VIRTUAL-CLASS VIRTUAL-BASE-CLASS VIRTUAL-TABLE-DIRECT-SLOT-DEFINITION VIRTUAL-TABLE-EFFECTIVE-SLOT-DEFINITION COMPUTE-VIRTUAL-GENERIC-FUNCTION-EFFECTIVE-METHOD COLLECT-ALL-SUBCLASSES VIRTUAL-GENERIC-FUNCTION UPDATE-VIRTUAL-GENERIC-FUNCTION VIRTUAL-GENERIC-FUNCTION-UPDATER *VIRTUAL-GENERIC-FUNCTION-UPDATER* TESTCLASS30A TESTCLASS30B TESTCLASS30C TESTCLASS30D TESTGF30F TESTGF30G TESTGF30H))))) WARNING: Adding method # #2=#)> to an already called generic function # WARNING: Adding method # #2=#)> to an already called generic function # EQUAL-OK: ("f on A" "f on A" ("g on A" 10) ("g on D" 20) ("h on C" 30) ("h on D" 40) NIL) (PROGN (DEFCLASS PERSON NIL ((NAME :INITARG :NAME :ALLOCATION :HASH :ACCESSOR PERSON-NAME) (ADDRESS :INITARG :ADDRESS :ALLOCATION :HASH :ACCESSOR PERSON-ADDRESS)) (:METACLASS HASH-CLASSES:HASH-CLASS)) (LET ((DILBERT (MAKE-INSTANCE 'PERSON :NAME "Dilbert"))) (LIST (STRING= (PERSON-NAME DILBERT) "Dilbert") (SLOT-BOUNDP DILBERT 'NAME) (SLOT-BOUNDP DILBERT 'ADDRESS) (SLOT-EXISTS-P DILBERT 'FOO) (STRING= (GETHASH 'NAME (SLOT-VALUE DILBERT 'HASH-CLASSES::HASH-SLOTS)) "Dilbert") (PROGN (REMHASH 'NAME (SLOT-VALUE DILBERT 'HASH-CLASSES::HASH-SLOTS)) (SLOT-BOUNDP DILBERT 'NAME)) (SYMBOLS-CLEANUP '(PERSON PERSON-NAME PERSON-ADDRESS))))) EQUAL-OK: (T T NIL NIL T NIL NIL) (PROGN (DEFCLASS CLASS-BAD-SLOT NIL ((BAD-SLOT :ALLOCATION :BAD-ALLOCATION))) (MAKE-INSTANCE 'CLASS-BAD-SLOT)) [SIMPLE-ERROR]: CLOS::%INITIALIZE-INSTANCE: Invalid location NIL of slot #1=# in # (check the :ALLOCATION slot option) EQL-OK: ERROR (LET (CONSTRUCTOR) (DEFCLASS CONSTRUCTOR NIL ((NAME :INITARG :NAME :ACCESSOR CONSTRUCTOR-NAME) (FIELDS :INITARG :FIELDS :ACCESSOR CONSTRUCTOR-FIELDS)) (:METACLASS FUNCALLABLE-STANDARD-CLASS)) (DEFMETHOD INITIALIZE-INSTANCE :AFTER ((C CONSTRUCTOR) &KEY) (WITH-SLOTS (NAME FIELDS) C (SET-FUNCALLABLE-INSTANCE-FUNCTION C #'(LAMBDA NIL (LET ((NEW (MAKE-ARRAY (1+ (LENGTH FIELDS))))) (SETF (AREF NEW 0) NAME) NEW))))) (SETQ CONSTRUCTOR (MAKE-INSTANCE 'CONSTRUCTOR :NAME 'POSITION :FIELDS '(X Y))) (LIST (STRINGP (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (DESCRIBE CONSTRUCTOR))) (FUNCALL CONSTRUCTOR) (SYMBOLS-CLEANUP '(CONSTRUCTOR CONSTRUCTOR-NAME CONSTRUCTOR-FIELDS)))) EQUALP-OK: (T #(POSITION NIL NIL) NIL) (PROGN (DEFCLASS TESTGF38CLASS (STANDARD-GENERIC-FUNCTION) NIL (:METACLASS FUNCALLABLE-STANDARD-CLASS) (:DEFAULT-INITARGS :METHOD-COMBINATION (FIND-METHOD-COMBINATION (CLASS-PROTOTYPE (FIND-CLASS 'TESTGF38CLASS)) '+ 'NIL))) (DEFGENERIC TESTGF38 (X) (:GENERIC-FUNCTION-CLASS TESTGF38CLASS)) (DEFMETHOD TESTGF38 + (X) 0) (SYMBOLS-CLEANUP '(TESTGF38CLASS TESTGF38))) EQL-OK: NIL (DEFMACRO WITH-COLLECTING-MOP-WARNINGS (&BODY BODY) `(LET ((ALREADY-CALLED NIL) (REPLACING-METHOD NIL)) (FLET ((WARNING-GF (W) (GENERIC-FUNCTION-NAME (CAR (LAST (SIMPLE-CONDITION-FORMAT-ARGUMENTS W)))))) (WITHOUT-PACKAGE-LOCK ("CL" "CLOS") (DEFMETHOD INITIALIZE-INSTANCE :AFTER ((O GF-ALREADY-CALLED-WARNING) &REST OPTS) (PUSH (WARNING-GF O) ALREADY-CALLED)) (DEFMETHOD INITIALIZE-INSTANCE :AFTER ((O GF-REPLACING-METHOD-WARNING) &REST OPTS) (PUSH (WARNING-GF O) REPLACING-METHOD))) (LIST (PROGN ,@BODY) (LIST ALREADY-CALLED REPLACING-METHOD))))) EQL-OK: WITH-COLLECTING-MOP-WARNINGS (WITH-COLLECTING-MOP-WARNINGS (DEFCLASS GRAY-TEST (FUNDAMENTAL-CHARACTER-OUTPUT-STREAM) NIL) (DEFMETHOD STREAM-WRITE-CHAR ((S GRAY-TEST) CH) NIL) (STREAM-WRITE-CHAR (MAKE-INSTANCE 'GRAY-TEST) #\A) (SYMBOL-CLEANUP 'GRAY-TEST)) EQUAL-OK: (T (NIL NIL)) (LET ((BOOK-COUNTER 0) (SALE-STATS (MAKE-HASH-TABLE :TEST 'EQUAL))) (WITH-COLLECTING-MOP-WARNINGS (DEFCLASS WARE NIL ((TITLE :INITARG :TITLE :ACCESSOR TITLE))) (DEFCLASS BOOK (WARE) NIL) (DEFCLASS COMPACT-DISK (WARE) NIL) (DEFCLASS DVD (WARE) NIL) (DEFGENERIC ADD-TO-INVENTORY (OBJECT)) (DEFMETHOD ADD-TO-INVENTORY ((OBJECT WARE)) NIL) (ADD-TO-INVENTORY (MAKE-INSTANCE 'BOOK :TITLE "CLtL1")) (DEFMETHOD ADD-TO-INVENTORY ((OBJECT BOOK)) (INCF BOOK-COUNTER)) (ADD-TO-INVENTORY (MAKE-INSTANCE 'BOOK :TITLE "CLtL2")) (DEFMETHOD ADD-TO-INVENTORY ((OBJECT BOOK)) (SETF (GETHASH (TITLE OBJECT) SALE-STATS) (CONS 0 0))) (ADD-TO-INVENTORY (MAKE-INSTANCE 'BOOK :TITLE "AMOP")) (LIST BOOK-COUNTER (HASH-TABLE-COUNT SALE-STATS) (SYMBOLS-CLEANUP '(WARE BOOK COMPACT-DISK DVD TITLE ADD-TO-INVENTORY))))) WARNING: Replacing method #1=#)> in # WARNING: Replacing method #1=#)> in # WARNING: Adding method #)> to an already called generic function # WARNING: Adding method #)> to an already called generic function # WARNING: Replacing method #1=#)> in # EQUAL-OK: ((1 1 NIL) ((#1=#:ADD-TO-INVENTORY #1#) (#1#))) (LET ((BOOK-COUNTER 0) (SALE-STATS (MAKE-HASH-TABLE :TEST 'EQUAL))) (WITH-COLLECTING-MOP-WARNINGS (DEFCLASS WARE NIL ((TITLE :INITARG :TITLE :ACCESSOR TITLE))) (DEFCLASS BOOK (WARE) NIL) (DEFCLASS COMPACT-DISK (WARE) NIL) (DEFCLASS DVD (WARE) NIL) (DEFGENERIC ADD-TO-INVENTORY (OBJECT) (DECLARE (DYNAMICALLY-MODIFIABLE))) (DEFMETHOD ADD-TO-INVENTORY ((OBJECT WARE)) NIL) (ADD-TO-INVENTORY (MAKE-INSTANCE 'BOOK :TITLE "CLtL1")) (DEFMETHOD ADD-TO-INVENTORY ((OBJECT BOOK)) (INCF BOOK-COUNTER)) (ADD-TO-INVENTORY (MAKE-INSTANCE 'BOOK :TITLE "CLtL2")) (DEFMETHOD ADD-TO-INVENTORY ((OBJECT BOOK)) (SETF (GETHASH (TITLE OBJECT) SALE-STATS) (CONS 0 0))) (ADD-TO-INVENTORY (MAKE-INSTANCE 'BOOK :TITLE "AMOP")) (LIST BOOK-COUNTER (HASH-TABLE-COUNT SALE-STATS) (SYMBOLS-CLEANUP '(WARE BOOK COMPACT-DISK DVD TITLE ADD-TO-INVENTORY))))) WARNING: Replacing method #1=#)> in # WARNING: Replacing method #1=#)> in # WARNING: Replacing method #1=#)> in # EQUAL-OK: ((1 1 NIL) (NIL (#:ADD-TO-INVENTORY))) (LET (BAD) (DO-ALL-SYMBOLS (S) (WHEN (AND (FBOUNDP S) (TYPEP (FDEFINITION S) 'GENERIC-FUNCTION) (NOT (MEMBER (CLOS::GF-DYNAMICALLY-MODIFIABLE (FDEFINITION S)) '(T NIL)))) (PUSH S BAD))) BAD) EQL-OK: NIL (SYMBOLS-CLEANUP '(AS-STRING FOO133 FOO133A FOO133B FOO134 *FORWARDCLASS* FOO134A FOO134B MY-GF-CLASS DEPENDENT-METHODS *TIMESTAMP* PRIORITIZED-DEPENDENT PRIORITIZED-DISPATCHER UNCALLABLE-GENERIC-FUNCTION *SAMPCLASS* SAMPCLASS01 SAMPCLASS02 SAMPCLASS03 SAMPCLASS04 SAMPCLASS05 SAMPCLASS06 SAMPCLASS07 SAMPCLASS08 SAMPCLASS09 SAMPCLASS10 SAMPCLASS11 SAMPCLASS12 SAMPCLASS13 SAMPCLASS14 SAMPCLASS15 SAMPCLASS16 SAMPCLASS17 SAMPCLASS18 SAMPCLASS19 SAMPCLASS20 *SAMPGF* SAMPGF01 SAMPGF02 SAMPGF03 SAMPGF04 SAMPGF05 SAMPGF06 SAMPGF07 SAMPGF08 SAMPGF09 SAMPGF10 SAMPGF11 SAMPGF12 SAMPGF13 SAMPGF14 SAMPGF15 SAMPGF16 SAMPGF17 SAMPGF18 *SAMPMETHOD* SAMPGF19 SAMPGF20 SAMPGF21 SAMPGF22 SAMPGF23 SAMPGF24 SAMPGF25 SAMPGF26 SAMPCLASS21 SAMPCLASS21X SAMPCLASS22 SAMPCLASS22X *SAMPSLOT* SAMPCLASS23 SAMPCLASS24 SAMPCLASS25 SAMPCLASS26 SAMPCLASS27 SAMPCLASS28 SAMPCLASS29 SAMPCLASS30 SAMPCLASS31 SAMPCLASS32 SAMPCLASS33 SAMPCLASS34 SAMPCLASS35 SAMPCLASS36 STRUCT04 STRUCT04RO STRUCT04V STRUCT04ROV STRUCT05 STRUCT05V SAMPCLASS37 SAMPCLASS38 SAMPCLASS39 CLASS-SUPPORTING-CLASSOF-SLOTS CLASSOF-DIRECT-SLOT-DEFINITION-MIXIN ADD-CLASSOF-DIRECT-MIXIN CLASSOF-EFFECTIVE-SLOT-DEFINITION-MIXIN ADD-CLASSOF-EFFECTIVE-MIXIN INITIALIZE-CLASSOF-SLOT TESTCLASS29A TESTCLASS29B CLASS-BAD-SLOT WITH-COLLECTING-MOP-WARNINGS)) WARNING: (SETF FIND-CLASS): redefining class STRUCT05 in top-level, was defined in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/mop-tst-defstruct-test.lisp EQL-OK: NIL RUN-TEST: finished "mop" (0 errors out of 225 tests) RUN-TEST: started # (+ 17009115185923538769 -12047631083067675031) EQL-OK: 4961484102855863738 (+ 12677011568664239747 3269056182420253574) EQL-OK: 15946067751084493321 (+ 9315504781982082433 13857624532376678678) EQL-OK: 23173129314358761111 (+ 15226508728194069537 11481952022080775416) EQL-OK: 26708460750274844953 (+ 7461641943684774743 12249026721402718630) EQL-OK: 19710668665087493373 (+ 1180469445886971055 -3208456171287181032) EQL-OK: -2027986725400209977 (+ 18358552990465743315 221529797579218180385160273426219343697) EQL-OK: 221529797579218180403518826416685087012 (+ -14819874956616484359 30498815629431206969122152847973230849) EQL-OK: 30498815629431206954302277891356746490 (+ -11781881800334342169 112219460388643619332860331282276228017) EQL-OK: 112219460388643619321078449481941885848 (+ 3570694277032201957 284821691832196381859344006870088122712) EQL-OK: 284821691832196381862914701147120324669 (+ -17005463295060938595 69162171850264911722979835561124066203) EQL-OK: 69162171850264911705974372266063127608 (+ 15647113311796203488 150750467185419235519670165664526735459) EQL-OK: 150750467185419235535317278976322938947 (+ -14330150541101371097 -13054027994001826312503071338715966858478218093171762021549815587520723118772963817341751396703629529810372702877555022105594068768886421335353882155416908) EQL-OK: -13054027994001826312503071338715966858478218093171762021549815587520723118772963817341751396703629529810372702877555022105594068768886435665504423256788005 (+ 7406427184711759740 -4059250217961011548005203450962458026528281798230141192186669580689721046971433745892994467792118611646113962840750314719233572760336084100766391093756252) EQL-OK: -4059250217961011548005203450962458026528281798230141192186669580689721046971433745892994467792118611646113962840750314719233572760336076694339206381996512 (+ 8819522415901031498 7274905269237471130619913887005155660991437201841760414347836177003483932007334374478344594178179032728521106519295465031750530183363793325150672647162846) EQL-OK: 7274905269237471130619913887005155660991437201841760414347836177003483932007334374478344594178179032728521106519295465031750530183363802144673088548194344 (+ -7242932332215698200 -10558564312909325527488520195600871241245891651644550509993750377630234801225525279855157008009255586978047154906058790342845859331159009687703010657137320) EQL-OK: -10558564312909325527488520195600871241245891651644550509993750377630234801225525279855157008009255586978047154906058790342845859331159016930635342872835520 (+ 9794320575955609492 13380937715397052566925484435342184213544885758759259410983243841206628594840271850190097746775475837233042430565529099681550277688470325394342993771343357) EQL-OK: 13380937715397052566925484435342184213544885758759259410983243841206628594840271850190097746775475837233042430565529099681550277688470335188663569726952849 (+ -18404048401680891243 6690884608978704096379677348142836785900717005050936986370615083929607190833180925295418079551348559691161519822750772440155040888224482801864925665484770) EQL-OK: 6690884608978704096379677348142836785900717005050936986370615083929607190833180925295418079551348559691161519822750772440155040888224464397816523984593527 (+ -10763220363947284865 -30985722824355332972176356513316569304601382411274079243859710673739383446566598659878378034375348869471278415635671865753349734809209959160389615096293457362383744562507969316522225741589739150453090393424063226271167062127000223628785686999799282795143706407082119829140399988180879618548495395684946331608899565543458192773899200054228140747414544792128323269250618482622488195333106891323515989863192944848391405358725993695671970811097285270641251816244586360288952156538400321933146150313939864593445583603568771077260174826348411367609521412133720180359748539721570562669201065857989876521301209899829037444385) EQL-OK: -30985722824355332972176356513316569304601382411274079243859710673739383446566598659878378034375348869471278415635671865753349734809209959160389615096293457362383744562507969316522225741589739150453090393424063226271167062127000223628785686999799282795143706407082119829140399988180879618548495395684946331608899565543458192773899200054228140747414544792128323269250618482622488195333106891323515989863192944848391405358725993695671970811097285270641251816244586360288952156538400321933146150313939864593445583603568771077260174826348411367609521412133720180359748539721570562669201065857989876521311973120192984729250 (+ -12742462236537568498 8711131313747826394504271797986775572294949693272674156076339989631171694968899228610359983845552623710580616605402899155485071497929100432998183040757832449369366844015907530612334721882095163137705867337969942902346066961718232788529860214990099385213558935023241940238638069647809530490438245386869385682221280939688108487754251075630026707075310465788398213293782900699868609660892232563106662995330591906155134237356516622436517046191466823447743155250482328613449506396571170001248589926831956459700467126756876526930443317428628239358666456771112897986098390410773312792390699312960051747534683311506465130527) EQL-OK: 8711131313747826394504271797986775572294949693272674156076339989631171694968899228610359983845552623710580616605402899155485071497929100432998183040757832449369366844015907530612334721882095163137705867337969942902346066961718232788529860214990099385213558935023241940238638069647809530490438245386869385682221280939688108487754251075630026707075310465788398213293782900699868609660892232563106662995330591906155134237356516622436517046191466823447743155250482328613449506396571170001248589926831956459700467126756876526930443317428628239358666456771112897986098390410773312792390699312960051747521940849269927562029 (+ 9991390529516174614 7879872958436992955898278403297937595295396115022400543178444946646147916754852888072481665174663073269556311758611700754643170639645548596647557683044355930340624784190093631808382820554407595007761070026239341594197877214157118335743842022627898879376346092898666610367809537340994845045475091410516226225078052019727419030585524815982151736622865401299588936172760762386183577504972623377661437665668080131418564228642443266935225613702941906491478788336262289516199380144218708241406077806669686589734333554945412904560108150202389909124657090061223183441083590340175629756198442568877659538345749595968764873879) EQL-OK: 7879872958436992955898278403297937595295396115022400543178444946646147916754852888072481665174663073269556311758611700754643170639645548596647557683044355930340624784190093631808382820554407595007761070026239341594197877214157118335743842022627898879376346092898666610367809537340994845045475091410516226225078052019727419030585524815982151736622865401299588936172760762386183577504972623377661437665668080131418564228642443266935225613702941906491478788336262289516199380144218708241406077806669686589734333554945412904560108150202389909124657090061223183441083590340175629756198442568877659538355740986498281048493 (+ 831234034418847630 -744676478858160349467117341859049692149463503380690495147216354303526704924280287782902146026018180364963325847811379182950159627878800024734206345960410146056000392683000433501805629464626281031086102425271022388473812300724085127447081771317912465921636737545371909901577246384446144919253141375367648958387948463576516115079816552636772639965957498569187848459747361493535081532845254971492261148968198806736512864867151355002902241562014241077734122599581732704243705918200179789271894804233542502502119523149682814025979598424744685548054183678652651244898867735764030968089217841214778606507809487462642341164) EQL-OK: -744676478858160349467117341859049692149463503380690495147216354303526704924280287782902146026018180364963325847811379182950159627878800024734206345960410146056000392683000433501805629464626281031086102425271022388473812300724085127447081771317912465921636737545371909901577246384446144919253141375367648958387948463576516115079816552636772639965957498569187848459747361493535081532845254971492261148968198806736512864867151355002902241562014241077734122599581732704243705918200179789271894804233542502502119523149682814025979598424744685548054183678652651244898867735764030968089217841214778606506978253428223493534 (+ -6996572501442843347 -16567158719848992553565776505785820491834685475229611199353714982570065913508303466008005931649515528390057456882757990896824841386431756898386429000065518724021230756426613661219891419166146764347562529640689229693578574350948436847247856000438153789455857903402883189892697143647998643667467614427922009931545254965075041050860609824086811877108940020349157317276288348430058535959434983921323332907180869396258655826781438419383792024592535415693101119109484610789291889841197827977530804650015884500878613240443324806805475203272442094530735476095374446946252236490708915034012846683015547314889561060687692538144) EQL-OK: -16567158719848992553565776505785820491834685475229611199353714982570065913508303466008005931649515528390057456882757990896824841386431756898386429000065518724021230756426613661219891419166146764347562529640689229693578574350948436847247856000438153789455857903402883189892697143647998643667467614427922009931545254965075041050860609824086811877108940020349157317276288348430058535959434983921323332907180869396258655826781438419383792024592535415693101119109484610789291889841197827977530804650015884500878613240443324806805475203272442094530735476095374446946252236490708915034012846683015547314896557633189135381491 (+ -8920936222630165483 -18738991973681679876688842391791783563249057933653045519186959571392922172943405646958686202208790537612746921398028331540617848217445632123805070077600768524509025758950743971128222843292926773668584735575066246660802064630842300367821042873152766467703905048558085377302000898639290554395913805527529259855535801856020623830262396582180677933562523957295341539162448074423901242873918231922121053192425691524797238343327318801359521456598967984637483081312932069399045363737622797213185099130529375169698811801965974416555301085043300426947769193582129151016159057101028336667142913854943018973494705119572045938607) EQL-OK: -18738991973681679876688842391791783563249057933653045519186959571392922172943405646958686202208790537612746921398028331540617848217445632123805070077600768524509025758950743971128222843292926773668584735575066246660802064630842300367821042873152766467703905048558085377302000898639290554395913805527529259855535801856020623830262396582180677933562523957295341539162448074423901242873918231922121053192425691524797238343327318801359521456598967984637483081312932069399045363737622797213185099130529375169698811801965974416555301085043300426947769193582129151016159057101028336667142913854943018973503626055794676104090 (+ -243510292488206214847646757340020705642 5940577100149745132) EQL-OK: -243510292488206214841706180239870960510 (+ 35446324064743728955945058978206455057 -6248622708755929572) EQL-OK: 35446324064743728949696436269450525485 (+ -285342226760657637664173494795024413673 -11942737781617905307) EQL-OK: -285342226760657637676116232576642318980 (+ 180790435817422032042321866247362452865 12401641959336396832) EQL-OK: 180790435817422032054723508206698849697 (+ -179994871947239535956826388240542999950 13573822506399140772) EQL-OK: -179994871947239535943252565734143859178 (+ -308198027295905163635866438671452347268 -8790069282378476990) EQL-OK: -308198027295905163644656507953830824258 (+ -139324757925833055762410227358605285566 -190622873846936719063564661032771271922) EQL-OK: -329947631772769774825974888391376557488 (+ 332866352618304570046318203427223999347 147978646177673305481282943528696833018) EQL-OK: 480844998795977875527601146955920832365 (+ -39471620476300923970352914034802271156 28992893610776120142668950821916856486) EQL-OK: -10478726865524803827683963212885414670 (+ 274120253734611965146455315763505869288 254675910805265090692978775702306142625) EQL-OK: 528796164539877055839434091465812011913 (+ -122086811464559635596206661886176775901 287312583034687582188356355813963609701) EQL-OK: 165225771570127946592149693927786833800 (+ 288576174771266329955482943556556984728 -57843540651903655425270706396868707777) EQL-OK: 230732634119362674530212237159688276951 (+ -47977736580820486006305788441965482221 984809271313988066640898939725532304075331399066274624928410251834520283291912387208948664716457549646483445981126881113426109906085249657168046936670489) EQL-OK: 984809271313988066640898939725532304075331399066274624928410251834520283291912387208948664716457549646483445981126833135689529085599243351379604971188268 (+ 21225484205143479814642328762121362291 11839789093732539327981861490012713257538550745921177905266671749716203131127256902110452504526721633943016923389974867770082516862899595554460170417713940) EQL-OK: 11839789093732539327981861490012713257538550745921177905266671749716203131127256902110452504526721633943016923389974888995566722006379410196788932539076231 (+ -193095363331703875886398909106293703000 4389392021031719669078675478621418677903292147307684123866099084349756491860737402449105804868232530632178577388168068485304437343508442251302846768269976) EQL-OK: 4389392021031719669078675478621418677903292147307684123866099084349756491860737402449105804868232530632178577388167875389941105639632555852393740474566976 (+ -14827657635864183514988182371035598180 -7256545787852407071411458891023580461638051949278710509801472046178301830006724297747051044450550248499056073213660185258676369175307019300952192657194576) EQL-OK: -7256545787852407071411458891023580461638051949278710509801472046178301830006724297747051044450550248499056073213660200086334005039490534289134563692792756 (+ 54301423175725658626298504084995819705 -13385853291610595576947504757201441006088030688464261540642594993520424631577281077984278942244446266776534612440941312995898184903431893212829646845766101) EQL-OK: -13385853291610595576947504757201441006088030688464261540642594993520424631577281077984278942244446266776534612440941258694475009177773266914325561849946396 (+ 195114404067053480147948948510253723990 -8373866462448797623435948949281383906369538962237624940506813188612614128993186653340202956656303504523161255703176374041758276069255591562198514767063594) EQL-OK: -8373866462448797623435948949281383906369538962237624940506813188612614128993186653340202956656303504523161255703176178927354209015775443613250004513339604 (+ -308030589512186791277525017840002670741 -11922204352024596469278978325035646517433105521287613403902396944414655739824695945028308092245747333098422116078042326104667969967224788442970266049942774583538734406057081597034454910987815490244451193242377705191422489528853976486607580169986057592557285271953385769215318545520155212402919465580052078255078759756709086185424029620805084776442744700501748376290562843380642608395240491162047933014854466267084965223593172702334466729933986413870670083326499598274393380692146118979961818816348097032083332695128587696590646086980241100792624502607816103195636761141133903550454815591457829485684936036414823492160) EQL-OK: -11922204352024596469278978325035646517433105521287613403902396944414655739824695945028308092245747333098422116078042326104667969967224788442970266049942774583538734406057081597034454910987815490244451193242377705191422489528853976486607580169986057592557285271953385769215318545520155212402919465580052078255078759756709086185424029620805084776442744700501748376290562843380642608395240491162047933014854466267084965223593172702334466729933986413870670083326499598274393380692146118979961818816348097032083332695128587696590646086980241100792624502607816103195636761141133903550762846180970016276962461054254826162901 (+ -172649878347923210775992373331623646864 22180935775581457002090790736532281654456312526625354262953960635330604551829750571440878712430708012807252279301365732385899228826740712544768476577874129759972563823209525283326887563301081200476495752033290851190327066070873711444930389093339915885090143783170994309089448293499799071372787520776773788274677288230540162485916160484352398851925328125588729604931589867889917097887951581817207079060016091919559509735997493084833476849835444339835031436580214492450731100723026312163752403946315983551266206214298679421644737804098691991631489261658890937663698502561036246447760919715595005106669653475931803053499) EQL-OK: 22180935775581457002090790736532281654456312526625354262953960635330604551829750571440878712430708012807252279301365732385899228826740712544768476577874129759972563823209525283326887563301081200476495752033290851190327066070873711444930389093339915885090143783170994309089448293499799071372787520776773788274677288230540162485916160484352398851925328125588729604931589867889917097887951581817207079060016091919559509735997493084833476849835444339835031436580214492450731100723026312163752403946315983551266206214298679421644737804098691991631489261658890937663698502561036246447588269837247081895893661102600179406635 (+ 17539006966816771902104329685391462527 15609797782337099611892065465036826453911053690739041627254619195700021040383385710184052653282070244915503750549545390475671883312314708978681904377133928647935359080875691628246716591529028104762422990155477702994042953196747769893182153631482194578269859879402160062955490194674372351117284129320011166238130774752386987036267064693133554447596069886693581191241594745541512444806003236372840085705813835001957163976961730871756250344335996073970142337882238844723800849054637237549515249957267772181010402413375667537558243971058326641257721901094391380667244006959028327507917720426571969997513984360849930719808) EQL-OK: 15609797782337099611892065465036826453911053690739041627254619195700021040383385710184052653282070244915503750549545390475671883312314708978681904377133928647935359080875691628246716591529028104762422990155477702994042953196747769893182153631482194578269859879402160062955490194674372351117284129320011166238130774752386987036267064693133554447596069886693581191241594745541512444806003236372840085705813835001957163976961730871756250344335996073970142337882238844723800849054637237549515249957267772181010402413375667537558243971058326641257721901094391380667244006959028327507935259433538786769416088690535322182335 (+ 244901855797156286376563377540855746602 -22138106346578776369849317622304392466030036563754663379976505966920461958652141160336156065177498990718609170201272980114106671808245437660234479124938853665375934080221740523696180221118540569603989748587853373569525751680828044059607889572522502629277877343410298879764820905044284757389006201848194571453112545228115550224254565141563427486518108434758694923122284117299374156393942906293546318323661938734959824887786185558612820887463537294120950912969343488704744978847504513710882720654330147775174336365363311173472002077960424794151168301281665765411704505095008907760396535767621855642720080219960822554492) EQL-OK: -22138106346578776369849317622304392466030036563754663379976505966920461958652141160336156065177498990718609170201272980114106671808245437660234479124938853665375934080221740523696180221118540569603989748587853373569525751680828044059607889572522502629277877343410298879764820905044284757389006201848194571453112545228115550224254565141563427486518108434758694923122284117299374156393942906293546318323661938734959824887786185558612820887463537294120950912969343488704744978847504513710882720654330147775174336365363311173472002077960424794151168301281665765411704505095008907760151633911824699356343516842419966807890 (+ -119403662992279138748600939857239307122 26272999248235953724172008428088697264933069743507017434844709711501131900922919455931092196539942532993887162365511473221418376205773427597933886270411672062672089518774390132453916538404354895529975888201032175628249480896964400801763570333497287321002961557096975786141940970260074557095118887294558700145949117395512768347250531196100831164663613049206690894640391431616112104502483838173255614981302462548882276825096564828583591963617871547373532874400764134244496979962241959713525053686209002866840900623246072884125102845824992994967009109046451949348656842486048332953732384499190437432898387573320391878853) EQL-OK: 26272999248235953724172008428088697264933069743507017434844709711501131900922919455931092196539942532993887162365511473221418376205773427597933886270411672062672089518774390132453916538404354895529975888201032175628249480896964400801763570333497287321002961557096975786141940970260074557095118887294558700145949117395512768347250531196100831164663613049206690894640391431616112104502483838173255614981302462548882276825096564828583591963617871547373532874400764134244496979962241959713525053686209002866840900623246072884125102845824992994967009109046451949348656842486048332953612980836198158294149786633463152571731 (+ 313963939617834410089002930298454269912 23286645405607099799151331553995799851855144387826191186590140820016670502830395945076644578998873585162998873396623634135231418574284200209367505115739462344028303923666952261030907434438322884189133236837089851688275865098623902644385995630973049587854251981548128145516004461191094062488421288607625783540996659060285661398859383778209495884203323937672739376151794507745282074538961033778823733980759695886879886017489555795079194346438911010371103435094677167286870898482214310646392174423422237727456012197253183422715313378603607058548706460095379882633958651034759773864354021315490712575535559549015858088608) EQL-OK: 23286645405607099799151331553995799851855144387826191186590140820016670502830395945076644578998873585162998873396623634135231418574284200209367505115739462344028303923666952261030907434438322884189133236837089851688275865098623902644385995630973049587854251981548128145516004461191094062488421288607625783540996659060285661398859383778209495884203323937672739376151794507745282074538961033778823733980759695886879886017489555795079194346438911010371103435094677167286870898482214310646392174423422237727456012197253183422715313378603607058548706460095379882633958651034759773864667985255108546985624562479314312358520 (+ 2000877973959266893810594143560134441447453310844726478119781029700338468704683515329516333146806175216349912753585564808803731447160643580198590073658869 -17993015014355471903) EQL-OK: 2000877973959266893810594143560134441447453310844726478119781029700338468704683515329516333146806175216349912753585564808803731447160625587183575718186966 (+ 5492930533666246223206322654398877802091439062008700770880939594548305919677404080859141226095489505872709347538974725998600861651942609010590873980143878 15372278140141207703) EQL-OK: 5492930533666246223206322654398877802091439062008700770880939594548305919677404080859141226095489505872709347538974725998600861651942624382869014121351581 (+ -13405500833215428652808705089190188280715732437731292502890523313631564795139560159124390691283401484515088713758307366404145018349044148223082253439210893 -14793401891248640808) EQL-OK: -13405500833215428652808705089190188280715732437731292502890523313631564795139560159124390691283401484515088713758307366404145018349044163016484144687851701 (+ 9945195259699924701593703207751086973468898794114625092150620088406276196469184233537941913755508476427888065765634203723512911676149274871082481174186606 8699133332160461067) EQL-OK: 9945195259699924701593703207751086973468898794114625092150620088406276196469184233537941913755508476427888065765634203723512911676149283570215813334647673 (+ -1785165974800693006461065312083337532938610906605533088558498259067461510781028452552786542598361030690629530721209490413999022804146471920873844686294838 -13079925952361275418) EQL-OK: -1785165974800693006461065312083337532938610906605533088558498259067461510781028452552786542598361030690629530721209490413999022804146485000799797047570256 (+ -4861207515430071951958387366611380234482792653010151054346367776006873932152600469133110239669746470475230906073865131648496652783311445471793936775767736 -9381557743227419896) EQL-OK: -4861207515430071951958387366611380234482792653010151054346367776006873932152600469133110239669746470475230906073865131648496652783311454853351680003187632 (+ -6638723469626495957966112633999375479181736600737250559572415894485618850919815869703127084789143821420728194272094956858541960962483734293877093635361160 277811698220276334443479876776376776138) EQL-OK: -6638723469626495957966112633999375479181736600737250559572415894485618850919815869703127084789143821420728194272094679046843740686149290814000317258585022 (+ 1983880417172931934469534542170437296262471214582817006917470485544552211448284732460451903536334682269123998240709059499894818265755197559390728940140016 -118940994129137705779355371753506018694) EQL-OK: 1983880417172931934469534542170437296262471214582817006917470485544552211448284732460451903536334682269123998240708940558900689128049418204018975434121322 (+ -9354509264984586574958285335910611806441061705184818350015454221731287473282231343722010109181841005578131927454778025302197744540571159656556971614966757 120224841184491944160266976391113485817) EQL-OK: -9354509264984586574958285335910611806441061705184818350015454221731287473282231343722010109181841005578131927454777905077356560048626999389580580501480940 (+ 4389359421234641412950681847970318834150108533025088077429496538447029921663033978550089607257809597829358374972237448178553189381274150213236222139873594 106674783386899772113212633712093787897) EQL-OK: 4389359421234641412950681847970318834150108533025088077429496538447029921663033978550089607257809597829358374972237554853336576281046263425869934233661491 (+ -9319417879153488839579936799737117639058244394679644240663244688680826325564084529474537634510092069422987165268448907193562300482925125162731530249763801 192969103435503875767216559494769734726) EQL-OK: -9319417879153488839579936799737117639058244394679644240663244688680826325564084529474537634510092069422987165268448714224458864979049357946172035480029075 (+ 1394404616168163951844558734723678125985464491792846741433683801962971891047718103736551854371207400145441134823994228143957746922511631911996296931168332 -211230038021470285136061932161632203274) EQL-OK: 1394404616168163951844558734723678125985464491792846741433683801962971891047718103736551854371207400145441134823994016913919725452226495850064135298965058 (+ -2935941510094051560788359387128767361559188973149773593522440619832472030019457317998381634585179453958737810428870232715146002408187749944694186205812791 -1221176156661231926164756142840452419679061324806989304452215660535991083923207702827717652226257158321829748247784282139952864899457896871473184473608543) EQL-OK: -4157117666755283486953115529969219781238250297956762897974656280368463113942665020826099286811436612280567558676654514855098867307645646816167370679421334 (+ -1338674579024795395027232680327531457830908239605718353094975139226848400289367913459076082700361212506196070727982446232782659114647371030398516119682505 -1298372177520411182435886041880377054374169787570856408996533471838082317927648953576721017727347029007573543972764860712708420553928791798580799809858729) EQL-OK: -2637046756545206577463118722207908512205078027176574762091508611064930718217016867035797100427708241513769614700747306945491079668576162828979315929541234 (+ -2072456075229532951804023218627137969798924912365258263779029006567941400203608770518731715660383378937120213112973528605594220795605977413985543331908189 -9744489461776287963808523409593616918248399004543154581056479712028497082820841423941781438667661074968238703192056877665754560746003512076830245760254982) EQL-OK: -11816945537005820915612546628220754888047323916908412844835508718596438483024450194460513154328044453905358916305030406271348781541609489490815789092163171 (+ -2570682164188734368809161664810917340861573482754788446510182252413437925852206735928397938304353826925422441004271229738766803460790995673395984247950088 656920705293329551826685120408221577679101260931105312141757138825917579070505267306626244216341686712802796891966598838285570807961966448181138356047523) EQL-OK: -1913761458895404816982476544402695763182472221823683134368425113587520346781701468621771694088012140212619644112304630900481232652829029225214845891902565 (+ 7846359203342053693101523606887617345982401999003795257520576318451663998927274759872692123323796450295314377046602880394071105863527900699633560551732837 3683380639347829102597675045842249667669675715600522157867595962635108482512780509393310714588544837398923613138772339053021025559943198965234376657126821) EQL-OK: 11529739842689882795699198652729867013652077714604317415388172281086772481440055269266002837912341287694237990185375219447092131423471099664867937208859658 (+ -11692323148567132684205145901751681947225824260005631214936266006610207543813382900867093989444659986091234552140689684476541703112098935301322850961583953 -8534276689564199122569555420819240948691777228327984555753862457592427992599992931175844172478864477440165366128106812103785256271256853749622592560655914) EQL-OK: -20226599838131331806774701322570922895917601488333615770690128464202635536413375832042938161923524463531399918268796496580326959383355789050945443522239867 (+ -10734754884168724884333968138739681643742524619139397687680049322697740991391014196697040576174049452737571835233123127815762146577096625434481167057340772 17059878151450238567815178684522345445687980385106446646013863901583786249398194029757376950491550197185231926262467028755342392379269039238766592672298850588065335172902157386017520689203005559576263548017475991638498600879259882041932152385436968424098224966518534467302264172016376096778201462205990822825056602379115848799619564610033123837036507127427054121975400703490855123544706355545059512146550901507159940126280812512339749605195422987937677650572797378799103456094203126081464905326203083057134061673694975250599375795827437561275156235513192978645909947341297774926450637694325145427434486258223666250272) EQL-OK: 17059878151450238567815178684522345445687980385106446646013863901583786249398194029757376950491550197185231926262467028755342392379269039238766592672298850588065335172902157386017520689203005559576263548017475991638498600879259882041932152385436968424098224966518534467302264172016376096778201462205990822825056602379115848799619564610033123837036507127427054121975400703490855123544706355545059512146550901507159940126280812512339749605195422987937677650572797368064348571925478241747496766586521439314609442534297287570550053098086446170260959538472616804596457209769462541803322821932178568330809051777056608909500 (+ 1982582032974021971225071139786536402936929744496433027195224299475980201425925452469321205602618940472354066218156609448199804973454183972974358405933935 -5591374624026484498020036332218412149978824230210339582240360391202660977358546150723165491729699122647688030937226316069237264083850854032732663284717882873051337566653841254365703461654061656817936193716386141166210237666314879751427421825450110467888973152907618520704486700443275358649289847595635931220181024199692771066498714511145489237541761266539978351840438236927937894376002981658065431416811632941197501676956304254109064936038146674412392128883565757325842468006824235119684861972224857533964558963441079998949499582965764591461900562931342373507763081479989957632695010603500633322408246084430203281475) EQL-OK: -5591374624026484498020036332218412149978824230210339582240360391202660977358546150723165491729699122647688030937226316069237264083850854032732663284717882873051337566653841254365703461654061656817936193716386141166210237666314879751427421825450110467888973152907618520704486700443275358649289847595635931220181024199692771066498714511145489237541761266539978351840438236927937894376002981658065431416811632941197501676956304254109064936038146674412392128883565755343260435032802263894613722185688454597034814467008052803725200106985563165536448093610136770888822609125923739476085562403695659868224273110071797347540 (+ 11532228364136654310006206557545352284448588590560137249197311142901246089838098630841794341370689745410654263817911440601934362503092628725755210859171724 -25776236925500995542036591604259749301547568770017466769502569415611770276300787105037848049555500555975152877716727294374436703766730618054071617947449695177320842403963009384468257891933593584757723535299746543328292715942626303315235241470269740287031317322772461137186093930239744879822272349431389779234805703118929710210161489122272898252221025966631463842234537744822906696719691188223105175714602909117904182229960075276443648211003011686250829474364425483901920822837775032295913486152631638908227467242772081310515646217115760180349854601959031626524004201825198439309850266508687796415478396821644422350208) EQL-OK: -25776236925500995542036591604259749301547568770017466769502569415611770276300787105037848049555500555975152877716727294374436703766730618054071617947449695177320842403963009384468257891933593584757723535299746543328292715942626303315235241470269740287031317322772461137186093930239744879822272349431389779234805703118929710210161489122272898252221025966631463842234537744822906696719691188223105175714602909117904182229960075276443648211003011686250829474364425472369692458701120722289706928607279354459638876682634832113204503315869670342251223760164690255834258791170934621398409664574325293322849671066433563178484 (+ -2603756427337798371354526130541868239006085657393372011847827118826669474695402075575479286172808099892726251004549675772420422527946534088483901153485670 -10844269742362409682236511127219508926736627172993604953084481596070757241623728297275447608738915355190715664012379562650777199088096670239050254578284071100042116609747208178716191571268815994455064584659920497876052406993834873124981417288518101426395560764186717660091472734401090302285129741058888303693710456902635092811413971399734306158050053239768185860958896447298052082493590498954512083131068867270078638929796561440903919430094619437872896595720463663570751134804664228918188923926951933302878771189484614604311920655871182974081898031051411394311700207305532216445616083858025977851570522763537300875989) EQL-OK: -10844269742362409682236511127219508926736627172993604953084481596070757241623728297275447608738915355190715664012379562650777199088096670239050254578284071100042116609747208178716191571268815994455064584659920497876052406993834873124981417288518101426395560764186717660091472734401090302285129741058888303693710456902635092811413971399734306158050053239768185860958896447298052082493590498954512083131068867270078638929796561440903919430094619437872896595720463666174507562142462600272715054468820172308964428582856626452139039482540657669483973606530697567119800100031783220995291856278448505798104611247438454361659 (+ -5929887196386997518766568868806997104240129372360669348628384183712406620199102166145939206783172815805659513128544493795329100599632286529420772709366102 24544958491142793859949310604465694574872439331169358241746200808802938771527900616394258199996170862256988647191747967628756772368808644819831481350919782560499270148419601775750932556119448001824346026042068416905254113155445053931789404515589532235225580737103411251232560863878948880220469490014568323308965914171394449781093816607870593225534700167342589927524232815571862258490314644577819742372918446373756857848586825568514909823940075182825283229026250682015641747568282510036326125505522447591703308661608718100933027549520132308555240654655887041040427813131621391320267698106519650611462269033902177180035) EQL-OK: 24544958491142793859949310604465694574872439331169358241746200808802938771527900616394258199996170862256988647191747967628756772368808644819831481350919782560499270148419601775750932556119448001824346026042068416905254113155445053931789404515589532235225580737103411251232560863878948880220469490014568323308965914171394449781093816607870593225534700167342589927524232815571862258490314644577819742372918446373756857848586825568514909823940075182825283229026250676085754551181284991269757256698525343351573936300939369472548843837113512109453074508716680257867612007472108262775773902777419050979175739613129467813933 (+ -8848084327536592532063677611386811805244460767433749071435930786126721080365289638381557872263825830664387392539638767251180242665642373539064690745095464 -15917950175678012281826361248776190984758236997789474333609547749168308439513527143790323694526378056113636462939674273462177686456811495629631337058042159570336251822399402513133598701991665209363955263097315081570618652783181494594400709239428597117944511110842795526862595552977665064029517628515465251448116061875878430407784298951946811321795808932206846491091803276390661869369638950672478828532423383951689632136029256108992610781912267083149156104328033893238864631158195280554850035949666897861529711006187241710164902350100555999894332438423857208747342184052953230247487231455921360593096823760117493579248) EQL-OK: -15917950175678012281826361248776190984758236997789474333609547749168308439513527143790323694526378056113636462939674273462177686456811495629631337058042159570336251822399402513133598701991665209363955263097315081570618652783181494594400709239428597117944511110842795526862595552977665064029517628515465251448116061875878430407784298951946811321795808932206846491091803276390661869369638950672478828532423383951689632136029256108992610781912267083149156104328033902086948958694787812618527647336478703105990478439936313146095688476821636365183970819981729472573172848440345769886254482636164026235470362824808238674712 (+ -16314775600714318471451792035636584056297958597339492996728118376578145765736873313518831390349547274517050864260054903974054712997529177834428786007341762649083404743713562157667828894017440065599882523458121037421757904691003094608420565550031561905074671735751685371533975894842331113347413787808917193134135744321547478500861021485075363990553639161661734684228250909589741380076008551020384304303171431833670236949934603973673998262066558668396388979463892768199916011368116729432353268535563246463324517035331079693172060671712718486388759443825620676228470068291448236914050793177812037679396721657020438979754 12553426083939460917) EQL-OK: -16314775600714318471451792035636584056297958597339492996728118376578145765736873313518831390349547274517050864260054903974054712997529177834428786007341762649083404743713562157667828894017440065599882523458121037421757904691003094608420565550031561905074671735751685371533975894842331113347413787808917193134135744321547478500861021485075363990553639161661734684228250909589741380076008551020384304303171431833670236949934603973673998262066558668396388979463892768199916011368116729432353268535563246463324517035331079693172060671712718486388759443825620676228470068291448236914050793177812037679384168230936499518837 (+ 20637030084881771176788188367974505419050866216433677435050410899110162793040751338330447574748263391136356400036001988938659722098883893353523409458775455519257672423829361150611806294256710309281788819450225670112435352092313483086404714074567539245791066202051788986426960935796927738180831688497683293306590464598379493141645539253898709000874685535467854788184424886911457134522632486730390913239660179785071885982403741669161655812015114272497907946919026898579927936299607156006210124954460880383605958519412435713868501997649784658832599101777001703519408664662715322044086646014163774269660274683400619225321 11620128128044940816) EQL-OK: 20637030084881771176788188367974505419050866216433677435050410899110162793040751338330447574748263391136356400036001988938659722098883893353523409458775455519257672423829361150611806294256710309281788819450225670112435352092313483086404714074567539245791066202051788986426960935796927738180831688497683293306590464598379493141645539253898709000874685535467854788184424886911457134522632486730390913239660179785071885982403741669161655812015114272497907946919026898579927936299607156006210124954460880383605958519412435713868501997649784658832599101777001703519408664662715322044086646014163774269671894811528664166137 (+ -9838804688358141062268493389453191808060717708062736103828856866310283812230958467655270667206937622979717683919584610288962829724022506216738929136418489468786902364550847498615864720240589837282441807174290461916292258263929411081218952357662703079709351365960916688275651864441386750529258343003652300629003597744958152243494244227986280506395347894285277364095898602965258114321853474000520432831298793365139040664543928707100657375292032051256485942532600998813627925626928634068613637417702688610315924917761411247617905738119218110678854564441914784262998574445847209847985439514580300936248281049628734475702 2380166482232871816) EQL-OK: -9838804688358141062268493389453191808060717708062736103828856866310283812230958467655270667206937622979717683919584610288962829724022506216738929136418489468786902364550847498615864720240589837282441807174290461916292258263929411081218952357662703079709351365960916688275651864441386750529258343003652300629003597744958152243494244227986280506395347894285277364095898602965258114321853474000520432831298793365139040664543928707100657375292032051256485942532600998813627925626928634068613637417702688610315924917761411247617905738119218110678854564441914784262998574445847209847985439514580300936245900883146501603886 (+ -30961575335426221869515496362216292453766907587859856766456625722888557357647164641922707199324601608700561081422636642523431947551124957385652791834855425829101761914145137205962610515642614866296480715893528289170482422505734612327038754622917335073993027434927547277037587173529054849390646376806910407207016292483185533697336599641898250465186168797820802225861771331652801064811222606773495565340386327294310913503461903243119204619412324538886439122443769008953829820425376589389335553937319588224864611583436327810214798652896733118881040503785110481197462772022447173744898802421806800203373153221004361953729 -10586442965055062759) EQL-OK: -30961575335426221869515496362216292453766907587859856766456625722888557357647164641922707199324601608700561081422636642523431947551124957385652791834855425829101761914145137205962610515642614866296480715893528289170482422505734612327038754622917335073993027434927547277037587173529054849390646376806910407207016292483185533697336599641898250465186168797820802225861771331652801064811222606773495565340386327294310913503461903243119204619412324538886439122443769008953829820425376589389335553937319588224864611583436327810214798652896733118881040503785110481197462772022447173744898802421806800203383739663969417016488 (+ 8835746018617511846981408800319983340292665114153404569022025834059427359831684523399830234196625160662387716033871154398104436720494608541518837969397374272734698261557358249258503982414578618525420572597611597792132117034895074841909295420434392963714805547538976612884853497014341345150095544449860198192757839489063747595073430612069212219930749783824683135433987509303139260133564905961552149844964215891730262218278214035649706577154652729844092199333026620127958228847111442161350881527928460177763370427262298116900358910460957772350452949782281117704005514462730290063772968929608448642592954601418753021512 -12227722924075527556) EQL-OK: 8835746018617511846981408800319983340292665114153404569022025834059427359831684523399830234196625160662387716033871154398104436720494608541518837969397374272734698261557358249258503982414578618525420572597611597792132117034895074841909295420434392963714805547538976612884853497014341345150095544449860198192757839489063747595073430612069212219930749783824683135433987509303139260133564905961552149844964215891730262218278214035649706577154652729844092199333026620127958228847111442161350881527928460177763370427262298116900358910460957772350452949782281117704005514462730290063772968929608448642580726878494677493956 (+ -5455184800550144006991157215735481579353213544152145628297990102571936052187486515129266239245491863623978659179559754999567936067584384479787934704340911556625153536160778495579370425428019248950494107696016864499055854257192071541354806671987402367524770228296322497224645429524493838356022616251290117624472061673033274133156467148770562815676767117605001434288573911556053311048284534341905722947046607192815465807736361991479044698448267471087552952494477144251510778491315012457514838113324210534577956298926109164909779987221094000880908857594198276812276890284008572664102792405452379662935026125770444036994 -7349798942312432150) EQL-OK: -5455184800550144006991157215735481579353213544152145628297990102571936052187486515129266239245491863623978659179559754999567936067584384479787934704340911556625153536160778495579370425428019248950494107696016864499055854257192071541354806671987402367524770228296322497224645429524493838356022616251290117624472061673033274133156467148770562815676767117605001434288573911556053311048284534341905722947046607192815465807736361991479044698448267471087552952494477144251510778491315012457514838113324210534577956298926109164909779987221094000880908857594198276812276890284008572664102792405452379662942375924712756469144 (+ 27233955893140063612427006607965940109569052437681267421929959186535416115028420267622879017163568256526042146282241931623674996867133390355390677118211537487769195270234259640386625552763891339073878417517169618832945750393661600092643257470064376916337734385887099957095417541169462231630821139075814859604097878094729685589777579267192538715202397220666651307185763054526407234767132218634060693076054116575833737797189157152326979078121760900891899319809724675232853322526718686306470372869701173824664984405178677187081936624687293494821338781534163633206006387449585716391843039459733925494003066841874935048611 -66646390577667468207341453008390168215) EQL-OK: 27233955893140063612427006607965940109569052437681267421929959186535416115028420267622879017163568256526042146282241931623674996867133390355390677118211537487769195270234259640386625552763891339073878417517169618832945750393661600092643257470064376916337734385887099957095417541169462231630821139075814859604097878094729685589777579267192538715202397220666651307185763054526407234767132218634060693076054116575833737797189157152326979078121760900891899319809724675232853322526718686306470372869701173824664984405178677187081936624687293494821338781534163633206006387449585716391776393069156258025795725388866544880396 (+ 15030400024888781078933103028897733817304421960545019199443871381537070197157227994520524631721701055962609956080413517776229513420814407790533237358129529547793422514837651333555776540939235592155512951229106778709351772195248438493792786143040421233061520515971787881798980515709417481015662862327435825812557205663033601853937647320838585333754027488605638576977560072206293290493215523194883494322543800546276353830683084405428005815296131527861252717516620765986589669237487765523936713749717927502645633123584240464131140829496052170285171610845098023517906586134613874506419828208611247177336492131262918439281 -164048419232636429449474429717211197442) EQL-OK: 15030400024888781078933103028897733817304421960545019199443871381537070197157227994520524631721701055962609956080413517776229513420814407790533237358129529547793422514837651333555776540939235592155512951229106778709351772195248438493792786143040421233061520515971787881798980515709417481015662862327435825812557205663033601853937647320838585333754027488605638576977560072206293290493215523194883494322543800546276353830683084405428005815296131527861252717516620765986589669237487765523936713749717927502645633123584240464131140829496052170285171610845098023517906586134613874506255779789378610747887017701545707241839 (+ -10227062646189307616073129048534031298512434237226774743330733206156788005874968173984804649812506029813402205606562016228122184161577517837608957023376079537037472977098465137152327215807765130656192272994478964341604278041664840636982572214751638093860605132350960802560601354006634296348422600320863531059118477125143903734159707623839282511184908969206873548650544269932394344952983661665472663102992782521888857016369837211403335306200813816060883478434441858442549261115972947741929087886423170398410216855322384956160289855500229952405068604320121652911887067414460828300146993858360430784079225137421074839819 117460076430162201914796277915447781936) EQL-OK: -10227062646189307616073129048534031298512434237226774743330733206156788005874968173984804649812506029813402205606562016228122184161577517837608957023376079537037472977098465137152327215807765130656192272994478964341604278041664840636982572214751638093860605132350960802560601354006634296348422600320863531059118477125143903734159707623839282511184908969206873548650544269932394344952983661665472663102992782521888857016369837211403335306200813816060883478434441858442549261115972947741929087886423170398410216855322384956160289855500229952405068604320121652911887067414460828300029533781930268582164428859505627057883 (+ 27989453264793973121573869640708223239762902243991948581280654553806618470632044367386680716040316895884976837122054709584963028986161694425215067648887944710852278135008221491665079705797192389681328802747226171436158375378499411314855257919224316919346771317457123252623293612958336691335423245293660257386649100685560072354549579281852792682734916555498283053758141666658137856828164206947320523255487437004565021167276952652515632644458005291855624829941937578229983628962137595011570216766689546500517528191189928660433013004254032861383790553611840534023221000900694995707453499030166286828319347894538505334235 -59175168207571178843658955348404514921) EQL-OK: 27989453264793973121573869640708223239762902243991948581280654553806618470632044367386680716040316895884976837122054709584963028986161694425215067648887944710852278135008221491665079705797192389681328802747226171436158375378499411314855257919224316919346771317457123252623293612958336691335423245293660257386649100685560072354549579281852792682734916555498283053758141666658137856828164206947320523255487437004565021167276952652515632644458005291855624829941937578229983628962137595011570216766689546500517528191189928660433013004254032861383790553611840534023221000900694995707394323861958715649475688939190100819314 (+ 1178650930337394440162727078866515771626896502845852711186000991913866844090831426017480263676964607121490209778220339316756171449922437605552456088105443130477974682689512446683178356259305893852096425478878588001446154476458310269704392486398646169362313605456233489086567865316333034897433650974160168545492823208575634152241341906068149887959566983066154182855136114289266802474404127414747112706158621650063987662749553991791509795764642256261917497984177610694405881831052199417235241109412927893781778469398975117797578753730248539151297798807326284978255001046995523851829184120171969918537718488250577987049 -151873924489040812813761508259707631973) EQL-OK: 1178650930337394440162727078866515771626896502845852711186000991913866844090831426017480263676964607121490209778220339316756171449922437605552456088105443130477974682689512446683178356259305893852096425478878588001446154476458310269704392486398646169362313605456233489086567865316333034897433650974160168545492823208575634152241341906068149887959566983066154182855136114289266802474404127414747112706158621650063987662749553991791509795764642256261917497984177610694405881831052199417235241109412927893781778469398975117797578753730248539151297798807326284978255001046995523851677310195682929105723956979990870355076 (+ 28233332719950979786871881804755080223325040620170668729385709165879717973040387558150293205758215739710262749733170837042434162049732587908182282319848154049410849721309988807368466228286699721201975848741931128639324322061892706638973259354962358866000024260698793885547287093369940035337370984725857550291339492871017395328145015077506882578124550084937438336881072124376107623716831044079223921566902242543198986921476998895559488862309653154914291349588095330683589871173449191854284433182368052817373384461363574550061788800329400860372148193491004593903732351395815409821222597665222975816418433744748143385431 -43245950360315656184924888243641533635) EQL-OK: 28233332719950979786871881804755080223325040620170668729385709165879717973040387558150293205758215739710262749733170837042434162049732587908182282319848154049410849721309988807368466228286699721201975848741931128639324322061892706638973259354962358866000024260698793885547287093369940035337370984725857550291339492871017395328145015077506882578124550084937438336881072124376107623716831044079223921566902242543198986921476998895559488862309653154914291349588095330683589871173449191854284433182368052817373384461363574550061788800329400860372148193491004593903732351395815409821179351714862660160233508856504501851796 (+ 17311283930487575047109155431670372891723312431004343097275158353815289445461275098157423001160013464866170709729134076291306322952612660169010483426086431377525432637844274608988581691477819008626983761905899834444008235608280930166913911248710072733217113558125600345343437000427963292980921009445490627620344145866648036116660335905940809860199697939729919140888034303887423527841395304960072549430314367914315102150378504502158659627719016733307736583749830415574905929299482373462584995162798576853564481617711234957058703455021082855018642616999836886763535412642684228990890160568207941504887072856663966242787 1954009743321912552050341299974626734964446274711484506734354360114801426013796892421541915293157994203607853436799102383078659985249097057923578528366737) EQL-OK: 17311283930487575047109155431670372891723312431004343097275158353815289445461275098157423001160013464866170709729134076291306322952612660169010483426086431377525432637844274608988581691477819008626983761905899834444008235608280930166913911248710072733217113558125600345343437000427963292980921009445490627620344145866648036116660335905940809860199697939729919140888034303887423527841395304960072549430314367914315102150378504502158659627719016733307736583749830417528915672621394925512926295137425311818010756329195741691413063569822508868815535038541752179921529616250537665789992543646867926753984130780242494609524 (+ 1135960177108146621604027872788612991247811085764456406834564014092038611848908717507207251239454266163702244932570537009884467598603226302482406831131219148530146321028801515381981782506355042255201016953375149829517466449677312249611502599434850555618739830488706171667035140895674806873502543300909514568759918040129665855731078258004983486524477103833885001539135541445685573269814159175744401893663504523858005835387122082112362666991112899837534230326730196110477118156871579503345757821268248575583821695674912517830056856597644827244194658166928026249459511837772775196175188368236573504643083995409774002567 -5513982495816270388232134254127393284677692173792609278582774509636977743203029647121158805174638642867428501907786521939155900331399058909602425073976766) EQL-OK: 1135960177108146621604027872788612991247811085764456406834564014092038611848908717507207251239454266163702244932570537009884467598603226302482406831131219148530146321028801515381981782506355042255201016953375149829517466449677312249611502599434850555618739830488706171667035140895674806873502543300909514568759918040129665855731078258004983486524477103833885001539135541445685573269814159175744401893663504523858005835387122082112362666991112899837534230326730190596494622340601191271211503693874963897891647903065633935055547219619901624214547537008122851610816644409270867409653249212336242105584174392984700025801 (+ -30369736932762868789456108597366835061749107555998091727589163626331595118680326568212941898571309672187038272915036839449380083450246957904300051802617002374912724325419651633014408152565340519439718081357147324136023867003917288524338643759680061563616479323818330115572573568245719292922176485298767387601922362893307843067637295955606642841006993776777666041277965868780958830666697755738164183356399977211227424725670822944234275611849032230010745799964550976844117943559190671369193871330514473741920389633762695829790016565565261170688485790141638094160105909405353382982945608773290740598479367828342651860878 3451570547959142767282758882796967240086418127970526029661337442068316209707489088420708984628065070358319478649952710478991064476168799556496237099109563) EQL-OK: -30369736932762868789456108597366835061749107555998091727589163626331595118680326568212941898571309672187038272915036839449380083450246957904300051802617002374912724325419651633014408152565340519439718081357147324136023867003917288524338643759680061563616479323818330115572573568245719292922176485298767387601922362893307843067637295955606642841006993776777666041277965868780958830666697755738164183356399977211227424725670822944234275611849032230010745799964550973392547395600047904086434988533547233655502261663236666168452574497249051463199397369432653466095035551085874733030235129782226264429679811332105552751315 (+ 24749014370880469345815230363662696846133977441600857690896762642529872426102613384561609594131771018575590861342023688138502403609639138062665279129058939911797019091643704220495944170754490238422880589600838613701783818105188827633578438439212856537589855796204839275633245851474930725845096235668385012500773524750522781174430369067441632028068262240870795850561389232369373523415592833273932285308223863420210049445377497367753786125779044716949754454461623397410528064697616617917065021866397277409044449982605591256067763430930720398889239414812509701319783809830072841056369381573100589260104551934136733317845 -9461623592584966196513107657889418526847060851423069480904645009418813160370721071067349946095573698635859409908288864150475056170059858850823883834932131) EQL-OK: 24749014370880469345815230363662696846133977441600857690896762642529872426102613384561609594131771018575590861342023688138502403609639138062665279129058939911797019091643704220495944170754490238422880589600838613701783818105188827633578438439212856537589855796204839275633245851474930725845096235668385012500773524750522781174430369067441632028068262240870795850561389232369373523415592833273932285308223863420210049445377497367753786125779044716949754454461623387948904472112650421403957363976978750561983598559536110351422754012117560028168168347462563605746085173970662932767505231098044419200245701110252898385714 (+ 19070246171469235561279483225919489206942407814032615339351735800304747459507922411906751965555240682457214768298108831815622470433175555196912899313888991765436434867025639919521068437191248198117664398275835972573354886915721765715992151871453808224011999677700078879590132676060988550961950472536029228350169237717222998397029428440792110955380302156159849645211726041489206565536560827557279129751110297078563108009278363910936720061216511798518178957070787710331228500533067546198458251241005176280410230146430275074766072259256583499095689284871987010372039977403712023630453400259082684930755893684499232318008 12330599952818018622104330691506128012101935028731995985677032980931398338453806827555760801312052792065671886621851470997557806941112316627790755867100463) EQL-OK: 19070246171469235561279483225919489206942407814032615339351735800304747459507922411906751965555240682457214768298108831815622470433175555196912899313888991765436434867025639919521068437191248198117664398275835972573354886915721765715992151871453808224011999677700078879590132676060988550961950472536029228350169237717222998397029428440792110955380302156159849645211726041489206565536560827557279129751110297078563108009278363910936720061216511798518178957070787722661828453351086168302788942747133188382345258878426260751799053190654921952902516840632788322424832043075598645481924397816889626043072521475255099418471 (+ -20895998178036569919774658790651496115060841511658297683195804524712012347695091074325978179977718571444320688167469052862702339462089668992243209990795362064005869602003990235714500149401994013174762139297327430396441552225926368085284222509085197484452650071390132794942944512235132641643003294762547138305644086106533258432786768644384855008506026923783604514268955071498269812887794817192371944269611642901807443894686178438687102834127061425955994253034824027771176714559050403098437684091684851207513969915720607528045624635094984539637789113651579846373399975502788877555747414523231999341294756679330384323996 764238600803843266244444637050072967342049538611688895792923539838804953492110953673720766879606601435939162680753428779068917662740403667549850724878795) EQL-OK: -20895998178036569919774658790651496115060841511658297683195804524712012347695091074325978179977718571444320688167469052862702339462089668992243209990795362064005869602003990235714500149401994013174762139297327430396441552225926368085284222509085197484452650071390132794942944512235132641643003294762547138305644086106533258432786768644384855008506026923783604514268955071498269812887794817192371944269611642901807443894686178438687102834127061425955994253034824027006938113755207136853993047041611883865464431304031711735122084796290031047526835439930812966766798539563626196802318635454314336600891089129479659445201 (+ 6243894672855694190803081952962387322599009058758027960092936187687064819462191583137945440936085088260632250436567758576422207449236613172605950116622271404444221039084346501796818945639456207912207604248991842124079786471250102192718092353598850889806607728696519257402580732995770031331187089424192803722612735557735028710899438934171272639518928194764526910590046378401600819132587804143949995694950116915803127294011661411525934100144319021440919928013617766507409909846670172516021888661284467975865076091834094160862228180625536450124272957206172214541444266874056050295270719541605687740822711659847211976891 11877496607682442993105675644902145742318375725225741293060927105303783712520284640625374957608051032540491531573337817824773543104969422017506696018037874641947740606655370938613842356322585858034851150595788166740174872996252792014218946552442572806242471174234462119454014379628228878122072189387777413014452140618318641689597452676091677588204537830401725113931418426919671512011822864583481449136550835952005765386885680701637038206002172218712504732572449659704181315669255320876647592649071711438131711904976335957846353867776093588236311654631696625859173554395714740218099921290128795607292259527492722462071) EQL-OK: 18121391280538137183908757597864533064917384783983769253153863292990848531982476223763320398544136120801123782009905576401195750554206035190112646134660146046391961645739717440410661301962042065947058754844780008864254659467502894206937038906041423696049078902930981376856595112623998909453259278811970216737064876176053670400496891610262950227723466025166252024521464805321272331144410668727431444831500952867808892680897342113162972306146491240153424660586067426211591225515925493392669481310356179413996787996810430118708582048401630038360584611837868840400617821269770790513370640831734483348114971187339934438962 (+ -24023960171862805266003610953999097357395283354964456554686635290239019705581779621120391229617494503580661676939681517550103414632840981987397485411400553792707518662609532504246677658012933762605038799352109564432278094548068984563394926376371580465135388578139331334464060067790936072127680597181415407099723844313625277987147283697141407959289588588489162704824409673099509423520008795428217612706997355591985894255450783091681112776112997887084157623388943538145736618168104404283342039105202585543852590302154958791010622670839015475427693311663800177428904406869645066988663292128104453773413982185343111560886 -31939808827732134714870375774276102357277346245583282398423150631754622253109692213928642228787888509211781331649081002266227303203259124984426497846441848502574293640959494009564992092503141598640200823656998243767453860939156780549404892392521391484933772285520949470194562525777116137058001008184603332597820522016200623301007194309404025522056113671560767212894303567191067178003014955596425115379852712737129325098876542459702682095445350281859042779889411325882123213577906096942649941285655935053362468972482748617111598313960198743596285343178242282172686940700127068972627110105953098737923773182254460772630) EQL-OK: -55963768999594939980873986728275199714672629600547738953109785921993641958691471835049033458405383012792443008588762519816330717836100106971823983257842402295281812303569026513811669750516075361245239623009107808199731955487225765112799818768892971950069160863660280804658622593568052209185681605366018739697544366329825901288154478006545433481345702260049929917718713240290576601523023751024642728086850068329115219354327325551383794871558348168943200403278354864027859831746010501225991980390858520597215059274637707408122220984799214219023978654842042459601591347569772135961290402234057552511337755367597572333516 (+ 14513652183174940741664411990199277445706189147726874603036586212536012746892966848269748909379750612027025331446918381470766609543142456872580466135425754204680927122749772612276850998180593344389487924747722210296498854143380696064338777945015153982467675141485724865534995199700908286263993697988986805404864429385840512740226775506122190698806967785494289035976495492863456705096841250592980439363856397663738211335801835896091823148249303370609165910779981271035234045185574995335952208702661648744928539539455138167482396767268362221492607154709559716065850417221174683768503217544145599044845325824451589309835 -12814535978730024053359592817368712576084646962861720729844389627130663192435154658607204342320327460695280260731620465435530495952836598646143907272825807563512741964987882356778796849529260646503692618525570185450780889283642116889481314560395290434301143877809550098309214046129802023655714098730144464028249594406616074059558969757405392170810220921023905546104487938441503430332099605473144930508420331873995741851604525954472341693863067199617721032815462094767522339305487934030130207039176659398466616780628644572276059410087128533031562978399689702766028716401176531098447698206272762966470643604141938670152) EQL-OK: 1699116204444916688304819172830564869621542184865153873192196585405349554457812189662544567059423151331745070715297916035236113590305858226436558862599946641168185157761890255498054148651332697885795306222152024845717964859738579174857463384619863548166531263676174767225781153571106262608279599258842341376614834979224438680667805748716798527996746864470383489872007554421953274764741645119835508855436065789742469484197309941619481454386236170991444877964519176267711705880087061305822001663484989346461922758826493595206337357181233688461044176309870013299821700819998152670055519337872836078374682220309650639683 (+ 11356479761814008572465147431830778885327227506593483181241437802252618729479905490826767363633131720717461693888023278837835457496021519184903984385091047829540007466025527592005114414671285638168997562037691602144751434208304408870143450743278437854754504713023422097017723330207792526222436928747286558205279330508360438281011315147578105966454344087225699378388309094140949428028313539634103047841948634832398526343605363013644180832752120081735152285507591096001749463421326282317713079361827765412853023201330345752038722069405404812511739634687282327711258974520622248165974215116400638833123609666501349513623 -2451734542868054449539778460457497703609327132304922810342762480808881050209276687756391911546806187586640918078231508181876445466503459873508196878629364924241891220686182517218825181707207808769770392864734466652524094735160185556148554260517746279303022469784592528209667497664672945900929888144529727881050106027775707933311860110618130543481573815538047460723253898548348335762406437618625388229555824532715231231491787570056329865617082709588903922431713098922691537317839185452018617461891748518176708607861270770493263960554805373552348256747200291438630960804647686832667981625018361034564086859426490014044) EQL-OK: 8904745218945954122925368971373281181717900374288560370898675321443737679270628803070375452086325533130820775809791770655959012029518059311395787506461682905298116245339345074786289232964077829399227169172957135492227339473144223313994896482760691575451482243238829568808055832543119580321507040602756830324229224480584730347699455036959975422972770271687651917665055195592601092265907102015477659612392810299683295112113575443587850967135037372146248363075877997079057926103487096865694461899936016894676314593469074981545458108850599438959391377940082036272628013715974561333306233491382277798559522807074859499579 (+ -1814184401790217165873937825605141478060935014868566665644215718762341535891730598045990231798382966074312671040257824056876679135909008140059087311700216658095793352051583071432744886316274989901835606602224927350560604355249919901932382803472476702792978322468747380191775778902733911968522382089332819162367884984027854067607561808704316828316820133400099093450636968732151876570835173932998599031643640476109466728761033062776578175554441947411139184426213290292577467587355369954997241091769769542810051228504545831588488726789173405585678190671534386784806998695797717346491308862362775748058331375692317599945 15466182953987394334491149436346080039471412309427279110582769586053943302670765125931570041904640518032832554998553018838321871748542118021556398569294085708441934948186080236498081517178574839977996802813431873543309853609838200338534343580791382510179184571852290959723696010410340740895530535423959476873857191548113125728667781953125153120447892632916574768078583174099545013854248664119997703948998871566374080719541931440495888606776561795893839624084254684939434035018741535261951124673664746010067859317726891535170781460914710499572006592206360512398012457295755926986236618644330364227754380084585899275327) EQL-OK: 13651998552197177168617211610740938561410477294558712444938553867291601766779034527885579810106257551958519883958295194781445192612633109881497311257593869050346141596134497165065336630862299850076161196211206946192749249254588280436601960777318905807386206249383543579531920231507606828927008153334626657711489306564085271661060220144420836292131072499516475674627946205367393137283413490186999104917355231090264613990780898377719310431222119848482700439658041394646856567431386165306953883581894976467257808089222345703582292734125537093986328401534826125613205458599958209639745309781967588479696048708893581675382 (+ -27127130599753372624001250456405972983012981437652156246797208697430661165612459362971759027335854588888552031022264244768883843080959804690580574272908031271224646245152017114094021048441971097191444782106551075175878815012595015584723250801765859461211934306789890718268168352614164589637346918581658850565274510502652089457352942736418509881708568727739912127781455473660768550022762222130489047215089836402367851853412705556570667960548570630054608024914653686223423908494006675057953013815512203710764854485332282975729323105427143207127239069826750682633272289409910001698385240596625059970587393681128674617278 5719655139276246085992066702308194672442413085748146924567717361937179810269300239821879673460959112727066470468217892213025828988023367028158410455624528688729907493639908638553730770145274142147983721694721139760883483821883267129411125364089207412089113869427479340283853501026803387874124668123626271531796990801822527792189514551888019206405597994403243358155410088320317141454525417323186389587327532772638942220300149829241141659063128602316305332848477566686425551944956989370838072872906293845914921103561360871571846865478762953536949621421094416539099628942010528483544062050170673327754206501716239719529) EQL-OK: -21407475460477126538009183754097778310570568351904009322229491335493481355343159123149879353874895476161485560554046352555858014092936437662422163817283502582494738751512108475540290278296696955043461060411829935414995331190711748455312125437676652049122820437362411377984314851587361201763222250458032579033477519700829561665163428184530490675302970733336668769626045385340451408568236804807302657627762303629728909633112555727329526301485442027738302692066176119536998356549049685687114940942605909864849933381770922104157476239948380253590289448405656266094172660467899473214841178546454386642833187179412434897749 (- 3872339191937382556 13437882608410293981) EQL-OK: -9565543416472911425 (- 12702320881720530101 13823645380834800545) EQL-OK: -1121324499114270444 (- 10222969257152373972 -3454292165863475982) EQL-OK: 13677261423015849954 (- 591233951053628288 -17639978232337836611) EQL-OK: 18231212183391464899 (- -7878405903223218778 9050739027069287469) EQL-OK: -16929144930292506247 (- 11347120771894057376 8443917396834074370) EQL-OK: 2903203375059983006 (- 7831959259127703467 -257470007821066702597399141202130667973) EQL-OK: 257470007821066702605231100461258371440 (- 1092406341647857980 -325710450166845666190895573961860069495) EQL-OK: 325710450166845666191987980303507927475 (- -4220606126689357919 73461013742902296577411907972196819778) EQL-OK: -73461013742902296581632514098886177697 (- -5112059189225304080 334306213789148650102245018234146620793) EQL-OK: -334306213789148650107357077423371924873 (- 3093346224554776175 -204967241927023874963787190016588249299) EQL-OK: 204967241927023874966880536241143025474 (- -5735747638156472357 -3881750746805128137401544408305666047) EQL-OK: 3881750746805128131665796770149193690 (- 17639095392510638323 13312205908441007415860933757605397223142073616822325142416364932887680287063250296996056787873086490231950036662943632990219865746131453861285495087665017) EQL-OK: -13312205908441007415860933757605397223142073616822325142416364932887680287063250296996056787873086490231950036662943632990219865746131436222190102577026694 (- 16304056910692545233 1463591032326743052350022746892396184459320617971409440301562638996633667625451301419074212369365394140737678584830314878769698416417465834928609990708982) EQL-OK: -1463591032326743052350022746892396184459320617971409440301562638996633667625451301419074212369365394140737678584830314878769698416417449530871699298163749 (- -10347586523508777315 12614325304787850623826535169596975975360455924114817820074336137897280818245940873677389644701038550150832199897314137414727161192173691528917744363375331) EQL-OK: -12614325304787850623826535169596975975360455924114817820074336137897280818245940873677389644701038550150832199897314137414727161192173701876504267872152646 (- 16875252323587344863 -10230183557696638447600885112945653217398839137450096120772416948425622105048400944465287395231588821521217980407867153259741079758527788318592431794213674) EQL-OK: 10230183557696638447600885112945653217398839137450096120772416948425622105048400944465287395231588821521217980407867153259741079758527805193844755381558537 (- 8574302739232756920 2945205250727759066959418729185252318153395797902208079569164623770839848878181416073351760975066439564334127158302281471631001294503759011790017443478716) EQL-OK: -2945205250727759066959418729185252318153395797902208079569164623770839848878181416073351760975066439564334127158302281471631001294503750437487278210721796 (- -17657597319577965851 -470389901349206124503884936612357721199915776516939967013182926735009022045917047211666512521578494339222795740836335004070464944715357800461845632614015) EQL-OK: 470389901349206124503884936612357721199915776516939967013182926735009022045917047211666512521578494339222795740836335004070464944715340142864526054648164 (- 11472336850218354926 16764018932433717867649699977474298016589762238077229911249331402108995850754999065988360217500238643747316139204767820295123085026049273617874157749889925712672510963712964034497935503076689670786498045302562704435768723916334451317158760704743066709581593570757498670622547878516907127632802801541072452593999435195637193819500375063696114131057474475407791672955417184592088612921927282233762919112197264895445408873539746256555444555901857369535350160665235184955438709679669964546134487688796078142789125799020704969226557493354453298489954288702387159956161243151013189140749021799388406290339231792790773612376) EQL-OK: -16764018932433717867649699977474298016589762238077229911249331402108995850754999065988360217500238643747316139204767820295123085026049273617874157749889925712672510963712964034497935503076689670786498045302562704435768723916334451317158760704743066709581593570757498670622547878516907127632802801541072452593999435195637193819500375063696114131057474475407791672955417184592088612921927282233762919112197264895445408873539746256555444555901857369535350160665235184955438709679669964546134487688796078142789125799020704969226557493354453298489954288702387159956161243151013189140749021799388406290327759455940555257450 (- 12682607562584942903 32133619583510009354538204193505267426986629771080807813988708187761849276650847958886764459302043799013813125903744946349479743277662066609741649009023451783267511140245797235200413941774959851628239089013586399425314412329003636059313583335807925401822165199322334470452126484173417518861322963430951772895619791799137157183662289329901964728384697377777905235894234370773419160283767144177627084271804319157013765325677633945370597318765372346484383325176768117059688792498687750479618961541872574768601477738410497806623403054372221338126223825515939164627992974469102910882915893925327931884157735553718792115929) EQL-OK: -32133619583510009354538204193505267426986629771080807813988708187761849276650847958886764459302043799013813125903744946349479743277662066609741649009023451783267511140245797235200413941774959851628239089013586399425314412329003636059313583335807925401822165199322334470452126484173417518861322963430951772895619791799137157183662289329901964728384697377777905235894234370773419160283767144177627084271804319157013765325677633945370597318765372346484383325176768117059688792498687750479618961541872574768601477738410497806623403054372221338126223825515939164627992974469102910882915893925327931884145052946156207173026 (- 14621880654476679971 -10075923784619510279100488003620810539888599376089081798647754628017452762406215094511315867213396543200861274584884759429891242650999761503100661310915213260386281412125687376866399124849043409890009033179987278297335571911640353059036551139958369871790768643514550179661619387008678118363266091945225880595898524898713646458647465935791224159084684209727153050053537752111696883536364966526666445737103854446009305531519860527938394412863332757413309423156200192973778629503534709731073637828912608835085933003410694216843775182940057891552358942312728978810053715387504707194992816961400377579655168106377696154728) EQL-OK: 10075923784619510279100488003620810539888599376089081798647754628017452762406215094511315867213396543200861274584884759429891242650999761503100661310915213260386281412125687376866399124849043409890009033179987278297335571911640353059036551139958369871790768643514550179661619387008678118363266091945225880595898524898713646458647465935791224159084684209727153050053537752111696883536364966526666445737103854446009305531519860527938394412863332757413309423156200192973778629503534709731073637828912608835085933003410694216843775182940057891552358942312728978810053715387504707194992816961400377579669789987032172834699 (- -3220156644655019630 -8347829670073174550775641165362740628312221836466572623516708794243074870361401136762432100726575330214254748615114820602945887237367461962207075265579588481261313345359877816874924645801358760718027997416917747796144940020489321523749233377708490614979453376328244189926517907474704635785063100359787580409065317918203485474119227673185211436285930586838616288721370975925191964611302275354365110550116042403226844820172448647475637867255305805337047967053177320593337377763657329816935516961201488840745892529800883680912275812320160312651894919502389242002380151562481051684439333368396132543667539444686619670713) EQL-OK: 8347829670073174550775641165362740628312221836466572623516708794243074870361401136762432100726575330214254748615114820602945887237367461962207075265579588481261313345359877816874924645801358760718027997416917747796144940020489321523749233377708490614979453376328244189926517907474704635785063100359787580409065317918203485474119227673185211436285930586838616288721370975925191964611302275354365110550116042403226844820172448647475637867255305805337047967053177320593337377763657329816935516961201488840745892529800883680912275812320160312651894919502389242002380151562481051684439333368396132543664319288041964651083 (- 11628988978410243120 21091260149209133824278525560739673446778991946138130571540201996950100883736332286627324787663044982195445635023357027423513202277912840570399895946346028843517588470258087913846945044832851780108963206182331994065720076983528527849542421619745503796476103034657238118665288185878258232226731582201217795631247916614224227701409259346052937919425072595891571572960468193421257458185693656090215937518204243652916583730260295885562094977775951577484951577581277292356830523013216949489797535362720471761788697932265967910160407593278848113303674799017334692501935041730808945554336564957621028111014116286675587727714) EQL-OK: -21091260149209133824278525560739673446778991946138130571540201996950100883736332286627324787663044982195445635023357027423513202277912840570399895946346028843517588470258087913846945044832851780108963206182331994065720076983528527849542421619745503796476103034657238118665288185878258232226731582201217795631247916614224227701409259346052937919425072595891571572960468193421257458185693656090215937518204243652916583730260295885562094977775951577484951577581277292356830523013216949489797535362720471761788697932265967910160407593278848113303674799017334692501935041730808945554336564957621028111002487297697177484594 (- -15960716439913426281 18799211173341989380260980155501104944815245973352765317821146163884181375747259542484535639646490774929026134833947975785613727050541297797675705933339289016115326958150660323801621778641184271728990164666383865587422591755046779736996211052149338115836473967202556153668963815595875844414662034458693455631979862997316049580586739835122770408911308146605671192538040301857163633538268589024651373766021087864982140201615461513687698136663128896835597598904095187715456109340116329587986878167776146023396961265667934659006280575496363066974484893764810659481361856335795455814679851690737943592227795474197104696127) EQL-OK: -18799211173341989380260980155501104944815245973352765317821146163884181375747259542484535639646490774929026134833947975785613727050541297797675705933339289016115326958150660323801621778641184271728990164666383865587422591755046779736996211052149338115836473967202556153668963815595875844414662034458693455631979862997316049580586739835122770408911308146605671192538040301857163633538268589024651373766021087864982140201615461513687698136663128896835597598904095187715456109340116329587986878167776146023396961265667934659006280575496363066974484893764810659481361856335795455814679851690737943592243756190637018122408 (- -181065640455671431985325539445069267017 14120143334024043377) EQL-OK: -181065640455671431999445682779093310394 (- -91295299684959299024846233061686623774 6891102275697080803) EQL-OK: -91295299684959299031737335337383704577 (- -252582289949155881579950873916766853744 883304029266526072) EQL-OK: -252582289949155881580834177946033379816 (- -10104159950635417603045689770006558103 17251490913777465304) EQL-OK: -10104159950635417620297180683784023407 (- 288463495341489091297108607960869684860 -16376960611483226267) EQL-OK: 288463495341489091313485568572352911127 (- 204661965092367792468062569536290631004 7774991291341524479) EQL-OK: 204661965092367792460287578244949106525 (- 174559967167400201536723778015754014369 168183438971818617783400303174116396891) EQL-OK: 6376528195581583753323474841637617478 (- -253300708624436983509156598368557395374 -77166863757693227553099778725240875400) EQL-OK: -176133844866743755956056819643316519974 (- -38587765028356074196061530813295290944 5999161273284748726648331130480323187) EQL-OK: -44586926301640822922709861943775614131 (- -236400856885875891058508662756360145662 222191413471626205952456600591947275777) EQL-OK: -458592270357502097010965263348307421439 (- 212937903940173587742882129816769611096 336470165768472077447806282475185249734) EQL-OK: -123532261828298489704924152658415638638 (- -264812595676159375893264580577855253845 -247068943830535581577267897204259299723) EQL-OK: -17743651845623794315996683373595954122 (- -1725732715479127274526681751197327660 -2279805492899538651574406423954277869507456204136276822451602661149698386520868702017367409743272511010382761246500508887739763323997191435566266331339917) EQL-OK: 2279805492899538651574406423954277869507456204136276822451602661149698386520868702017367409743272511010382761246500507162007047844869916908884515134012257 (- -220007189346579184019349894240059989979 9116030813176547770422918633286023943039811682891023288884273747820892639481842291616424036020927750322528731882517057595815179415042385175627374957565803) EQL-OK: -9116030813176547770422918633286023943039811682891023288884273747820892639481842291616424036020927750322528731882517277603004525994226404525521615017555782 (- 139683266109784685815165642637380856544 5782493350903499652295971390391981928106911831248674750993968151944332845911526084530951283012280786005612601970108688202931002414214353708335212597807345) EQL-OK: -5782493350903499652295971390391981928106911831248674750993968151944332845911526084530951283012280786005612601970108548519664892629528538542692575216950801 (- 239160165978290709841254489756277328273 5152132850125501873897264811465207492706871561577273155117982457627773151595716641409297120994045059130053034927464958986304380141364542178714472948085275) EQL-OK: -5152132850125501873897264811465207492706871561577273155117982457627773151595716641409297120994045059130053034927464719826138401850654700924224716670757002 (- 315772704643232632782106484978382006176 -3689252327480456512393153800679864208480329729627292260734151097785848947569336194072922395859496552999163037466184616218582046814434719444842678248982224) EQL-OK: 3689252327480456512393153800679864208480329729627292260734151097785848947569336194072922395859496552999163037466184931991286690047067501551327656630988400 (- 82735713197488344149642668226610301853 -12473025194535761005577066561696471986140205263843017221991729197337093872383371857001077050460827652296473928714097816492579684543651922277865558518876774) EQL-OK: 12473025194535761005577066561696471986140205263843017221991729197337093872383371857001077050460827652296473928714097899228292882031996071920533785129178627 (- 63472235942371758467270296983419551089 -7866520408163137968600317959735552406794938230345293650627055135268307695389903092041438746530663083967329111232451176014649873249349534808700483360707382397988918594143264031213181385790969271527978925616276399184489007642142996251807222768397530946779296600805549276528669432847672215219943599871223372831999133812100481632278022608906065923652981249057846548868473376683960144009223047416366697876553049362242497225174860431577034875737250719899362881567590934060155436179316063810148362442197071642183371654740845983314705249832168923202400873364289483910868432511677656218937984504828452980698439495961392749596) EQL-OK: 7866520408163137968600317959735552406794938230345293650627055135268307695389903092041438746530663083967329111232451176014649873249349534808700483360707382397988918594143264031213181385790969271527978925616276399184489007642142996251807222768397530946779296600805549276528669432847672215219943599871223372831999133812100481632278022608906065923652981249057846548868473376683960144009223047416366697876553049362242497225174860431577034875737250719899362881567590934060155436179316063810148362442197071642183371654740845983314705249832168923202400873364289483910868432511677656219001456740770824739165709792944812300685 (- -284018520801241078671538235859630240269 -5529748211779294240854894683633173443789067073881249229985499707296461959655918837051490512357840133495603640185675483847478587849599477020706893805485599954539589062532211767295361120129440287144117406526027552427750375526095104163474774446716012360038076376952619723549765229763943818011605991300849052030142173100367582906381575666628005795818339029350398340616624791399526643991489247585213423174803853961438830286737553181353007081438503238779644371968004083452645077716952159339978836669723137339898471600546912430030276920763475622536295311290657163861398519747560279682401429552174530714298081464588450842581) EQL-OK: 5529748211779294240854894683633173443789067073881249229985499707296461959655918837051490512357840133495603640185675483847478587849599477020706893805485599954539589062532211767295361120129440287144117406526027552427750375526095104163474774446716012360038076376952619723549765229763943818011605991300849052030142173100367582906381575666628005795818339029350398340616624791399526643991489247585213423174803853961438830286737553181353007081438503238779644371968004083452645077716952159339978836669723137339898471600546912430030276920763475622536295311290657163861398519747560279682117411031373289635626543228728820602312 (- -171812101820192353275910956459431262142 11401673303315394031728944442295528921842441448377692701102691446500671963119794838260543877466107345474902885032629120622020177051592733148817057943390167845763358795044702079370835841331467130719834250134674578757640577473495192331790176510774020541399177011446664359866582351045889299070080989390219063301859447807907203943168891690028442190793548699886572720360741686677780644932612683647303776634496172481504075784427704287335805355801794320914944330891519283383694196486986108936857630373759865062862204149003789919218681050221366182434949855054760827976853645027544605870235074909890698574792562001595287630131) EQL-OK: -11401673303315394031728944442295528921842441448377692701102691446500671963119794838260543877466107345474902885032629120622020177051592733148817057943390167845763358795044702079370835841331467130719834250134674578757640577473495192331790176510774020541399177011446664359866582351045889299070080989390219063301859447807907203943168891690028442190793548699886572720360741686677780644932612683647303776634496172481504075784427704287335805355801794320914944330891519283383694196486986108936857630373759865062862204149003789919218681050221366182434949855054760827976853645027544605870406887011710890928068472958054718892273 (- -243638660221338112796448050030955119997 -32214383478080953899491069562585164652288236626686985994647827422262342469970423345510055643470262764747630363450204055220886177681745412924556264758690138113272748656941509018308925555317383307928766093730384151056027828368474245304944063213926492719166086055718735381341569379006804236876950175122702350552198046290567043195716369691666842524594399597143281611765509174168738392889075290806378316647736667077047013214732267367344808724905727602402784621437141760604478301412768904784950365257469208085143467704875589485635570084387755189599791857576855454112556762755762408826226326879491415484319411662301650468948) EQL-OK: 32214383478080953899491069562585164652288236626686985994647827422262342469970423345510055643470262764747630363450204055220886177681745412924556264758690138113272748656941509018308925555317383307928766093730384151056027828368474245304944063213926492719166086055718735381341569379006804236876950175122702350552198046290567043195716369691666842524594399597143281611765509174168738392889075290806378316647736667077047013214732267367344808724905727602402784621437141760604478301412768904784950365257469208085143467704875589485635570084387755189599791857576855454112556762755762408825982688219270077371522963612270695348951 (- -126332081511349770866908261827634312283 31497387372874133218238910173378055967910722258532087598053588964599898753455370244114881403020152175272452951858324158004662566613339529101292284073176382818309096142522412043073218657587031893636358434796164444941535757484360125937835242214199979245499374972029624710574236962978707708765065292759037309958875006017588240959790355958632745299212449602934380927677385974488564420550408281673927387615657765312151272852486266800510090872812376232597458154951925709496664568906509814364388823105469855516803225244972466742963619633076158367569109107733990828830121948130235858799809203410103682003414364238243553515261) EQL-OK: -31497387372874133218238910173378055967910722258532087598053588964599898753455370244114881403020152175272452951858324158004662566613339529101292284073176382818309096142522412043073218657587031893636358434796164444941535757484360125937835242214199979245499374972029624710574236962978707708765065292759037309958875006017588240959790355958632745299212449602934380927677385974488564420550408281673927387615657765312151272852486266800510090872812376232597458154951925709496664568906509814364388823105469855516803225244972466742963619633076158367569109107733990828830121948130235858799935535491615031774281272500071187827544 (- 219979452670016849533060110266815720199 3900115048441644499033281842448985956665866771934663536385503692700586024397767816761943054115584011069129310718114010862034970648115172218305599786238607524420973404711138276011261135403209178420948996472570042497859127324157786975578751148348046315727383390370594954695454631662061021971027739429505825056455676233533511412589936865597034183410893428831818716136282201523804692574965779771140320669492229416601369453681528301333865290947482219850340728455965391492610516639151652595539203632139883064874286555941718154489936421274731413286355640404192677546692090304496817063325766995908926108582896362623757323811) EQL-OK: -3900115048441644499033281842448985956665866771934663536385503692700586024397767816761943054115584011069129310718114010862034970648115172218305599786238607524420973404711138276011261135403209178420948996472570042497859127324157786975578751148348046315727383390370594954695454631662061021971027739429505825056455676233533511412589936865597034183410893428831818716136282201523804692574965779771140320669492229416601369453681528301333865290947482219850340728455965391492610516639151652595539203632139883064874286555941718154489936421274731413286355640404192677546692090304496817063105787543238909259049836252356941603612 (- 585873325961105129055557280004608765382109855007674169500308242261038324959928764512890600512016613154122762798104714052579267789493643522748210870974797 -1855792162818946202) EQL-OK: 585873325961105129055557280004608765382109855007674169500308242261038324959928764512890600512016613154122762798104714052579267789493645378540373689920999 (- -3026050092505200332789765255096964033685859497096213532090644235603419347590512426830117415222669642053441336442247132403948783838396746566100575461602162 18009081534399282710) EQL-OK: -3026050092505200332789765255096964033685859497096213532090644235603419347590512426830117415222669642053441336442247132403948783838396764575182109860884872 (- -11124638695599888462310706699308855434715251048597328942409434888923094027849143412724699165971400546471660924330688750607774759764580214088920441698992069 -4827559068742614723) EQL-OK: -11124638695599888462310706699308855434715251048597328942409434888923094027849143412724699165971400546471660924330688750607774759764580209261361372956377346 (- 4950293428090696283711882613183655723616682297360442241017758383241177602498881186549809051670562038601658285833496694108818253845693871318067007752043113 17597810481352184048) EQL-OK: 4950293428090696283711882613183655723616682297360442241017758383241177602498881186549809051670562038601658285833496694108818253845693853720256526399859065 (- -5733769947958740467479139247420201065087494801172241127791526686385518674532830661413722661802560247463032020003355494614502034002778775472609306735864748 -3892174127829225880) EQL-OK: -5733769947958740467479139247420201065087494801172241127791526686385518674532830661413722661802560247463032020003355494614502034002778771580435178906638868 (- 8320894458193427045187598554188178307429755504967209344418448624882517461814957461249858674758807195827056824653471934409067429988676743031117653237018365 -12861394200627120797) EQL-OK: 8320894458193427045187598554188178307429755504967209344418448624882517461814957461249858674758807195827056824653471934409067429988676755892511853864139162 (- 13033402737450594044106258936169013897237368708138118260402180886096095497725071502601849887805439844083105685971731015312020770945603825344926844435936044 236396022362585261770052671762207864597) EQL-OK: 13033402737450594044106258936169013897237368708138118260402180886096095497725071502601849887805439844083105685971730778915998408360342055292255082228071447 (- 12170667278114656173974716189098171384426379753661081475485441559687661443127166543908925678856145097632475832903680828294561265828775791256812588754280222 -276673555533799047589626400978981416789) EQL-OK: 12170667278114656173974716189098171384426379753661081475485441559687661443127166543908925678856145097632475832903681104968116799627823380883213567735697011 (- -12755594876262399860618168642932232021734362385933348033134635580177924615701078617214764415318471507488803810365565826229169313660087149542130819663319659 -157671440495648010763311068579191828684) EQL-OK: -12755594876262399860618168642932232021734362385933348033134635580177924615701078617214764415318471507488803810365565668557728818012076386231062240471490975 (- 8664063140780163008577373335591938905735059211566906376953760862047748343846207426667781783874718320339071949903053785280430612875488847226724390758938740 54361107931665215623681874454167019934) EQL-OK: 8664063140780163008577373335591938905735059211566906376953760862047748343846207426667781783874718320339071949903053730919322681210273223544849936591918806 (- 3699576825118349347309026261327541749454660339251578894574483235547605815416603169143590292164644149607672871236942391817131531474661895913650810587431606 -50508350367572393968128467319633674717) EQL-OK: 3699576825118349347309026261327541749454660339251578894574483235547605815416603169143590292164644149607672871236942442325481899047055864042118130221106323 (- 5626548453644136572409808769267055618695663227750732922630041368983808478347120771651822300668480671524976882745306794511840379704578900504784165956486985 170502882789371639987361620116696459267) EQL-OK: 5626548453644136572409808769267055618695663227750732922630041368983808478347120771651822300668480671524976882745306624008957590332938913143164049260027718 (- -10859007735074693411217019392659638207496329895257318665547454149984863458541990037760564769787816800806064437172810158051442267508476778676439633382657890 -7558060977666720080449823996328496253877735754811271086853901493753796001778345391546991917892931500169890406340928835457635973812901681485438886367096185) EQL-OK: -3300946757407973330767195396331141953618594140446047578693552656231067456763644646213572851894885300636174030831881322593806293695575097191000747015561705 (- 9842028993407961669727766131360795288615020071102475108883839785397865740828387076847892646234215787999498419839351470775471313077046438080666908734795616 8259939762466350877481193620364896193464602165170783019804380181692322874550956777598992104871440502758410340359413403619753571535498118388286469082729503) EQL-OK: 1582089230941610792246572510995899095150417905931692089079459603705542866277430299248900541362775285241088079479938067155717741541548319692380439652066113 (- 3122315115429970622394662815735050825423438028108957393747131991771456957037829402044934484343765915727397519247940959221091465331254497476137639859816450 10737995515603450913722681305571315249864367824351372254572936648132763616823019940208526402092654554035074813865303483747097673960803093638463005072804384) EQL-OK: -7615680400173480291328018489836264424440929796242414860825804656361306659785190538163591917748888638307677294617362524526006208629548596162325365212987934 (- 11618335890332522671268040181306950825004789685088262996478365976802329054158653675768163009290064139158450983598701977173152384425333441365287895694522192 -13130287008197231017935223399369698658354829835061356451363818961959486828237111511740029441613108087354987794332115218978284937263725126538295501305403242) EQL-OK: 24748622898529753689203263580676649483359619520149619447842184938761815882395765187508192450903172226513438777930817196151437321689058567903583396999925434 (- -4829477140897377009195646150061276059814366801005389903693533021027427566117360765323647260121062827801190746646296803957067548167571028717513392985791293 10716557117391614298810040587314742187092120526669273567183969821384063434473189717686678450880765426943205955814024872764413373364846268902370055526485180) EQL-OK: -15546034258288991308005686737376018246906487327674663470877502842411491000590550483010325711001828254744396702460321676721480921532417297619883448512276473 (- 1560421244904974852620371975782132605421448226892487453928759432083522187778803424020804578027100625536441377609275030418285893555753560195716001014786650 -11797558308994912054526619290334311429749533070145154703018977152548370444659962978040151671210413666186432921816690953994784423526183449271023503069393845) EQL-OK: 13357979553899886907146991266116444035170981297037642156947736584631892632438766402060956249237514291722874299425965984413070317081937009466739504084180495 (- -7701347923966912534344428538744620884561375267012102797292378941649984539207353887059064943586048644516121387166836442084007442716291792933061162738380376 5290969389374230541016502448421359606252744677802288901830045825873182202718418905866055323957065013553046698199939002159982374580735362593037515863844280108947533575824820196689891621498006303535207762625068798755031433921940066544809959896067184147997503827988613858484669349726945188167613248195147619673963531690938913245110754715059472477991342216448470339490385593605806518967792963339193162830698488489270925945408227996742278697477358272529028932771642478870844024835907350391770605391526921411004262446196112836319091260967898895009427182171643279100998182191816962677328417390867021108292139204864164048286) EQL-OK: -5290969389374230541016502448421359606252744677802288901830045825873182202718418905866055323957065013553046698199939002159982374580735362593037515863844280108947533575824820196689891621498006303535207762625068798755031433921940066544809959896067184147997503827988613858484669349726945188167613248195147619673963531690938913245110754715059472477991342216448470339490385593605806518967792963339193162830698488489270925945408227996742278697477358272529028932771642486572191948802819884736199144136147805972379529458298910128698032910952438102363314241236586865149642698313204129513770501398309737400085072266026902428662 (- 9733743430220591762422540139212426729307515492818443460852332805653889275463385649305231919846970974905736816260992940027028218064265519723018527155353151 -29407855293830047984154639411082591337348779678279017647951764366455421210163494489475996514661359700145916243499452007595041420522019751347743105082745321262372977262641488359297167392118038994384136863563032667040671405618315550876997904307423736276844997706938133936081058323434935833614475654922773162140266784233792639117145232791514703532554345086520312281500696798706889025860427142771458666376271994240028586899592254884476941388776984078337603148583453255593120138178690189726206775893096279000909079330468718593887702543025737308336025198677457129910473491269839827087491228569718246503140134413881896746751) EQL-OK: 29407855293830047984154639411082591337348779678279017647951764366455421210163494489475996514661359700145916243499452007595041420522019751347743105082745321262372977262641488359297167392118038994384136863563032667040671405618315550876997904307423736276844997706938133936081058323434935833614475654922773162140266784233792639117145232791514703532554345086520312281500696798706889025860427142771458666376271994240028586899592254884476941388776984078337603148583453265326863568399281952148746915105523008308424572148912179446220508196915012771721674503909376976881448397006656088080431255597936310768659857432409052099902 (- -276731217243271862683214238489380950428392903790808046630969592255272629537001990355375434170910931115552132394269672247616298060929507021008951190291387 100289083769237476480554074865040988004216167545459907207847010762380733541100608695693297149249375537088329431700364201275915507683345148401600569951338052791424407090330310974243070931256108167365334162914085216447196038922091547331474328250886730614683299908003398886233860613008266913065047699535081030427106800418656336608005860846045905149012346378286475449307630537665901621055008855374148058291266835796203075976592585729940879567246284967856356337849150102261744547461816282538319258966892339056695718919291240188920586288417893106046698069355647145603908383687239983874164793005765733782432717429040621674) EQL-OK: -100289083769237476480554074865040988004216167545459907207847010762380733541100608695693297149249375537088329431700364201275915507683345148401600569951338052791424407090330310974243070931256108167365334162914085216447196038922091547331474328250886730614683299908003398886233860613008266913065047699535081030427106800418656336608005860846045905149012346378286475449307630537665901621055008855374148058291266835796203075976592585729940879567246284967856356337849150378992961790733678965752557748347842767449599509727337871158512841561047430108037053444789818056535023935819634253546412409303826663289453726380230913061 (- 8505070389896098095621766692413480203366379968950158493268895987250690600795955783113900096527432416791184386061684833478921638080978014176210898461637606 -16410711613672171332126342754193842244915477287016327757357714698751777287458963458682349581881560880814595167244857846847668988374679430572782121021084683986742283012573569894084166107235597351093334125816075658348307113218478800035703971671113417712009419861470917307849916674203301497919242668373376352901312309673053175315189945730756118172940886476343290174961420986113367531057713782438374928471960914578818951372282574754612716278516397754222547513576728677459134022062202283647690649100602260948409511070624300011106517649666031530376191755817891213910847547809248990517666613043010292627100428536737652546738) EQL-OK: 16410711613672171332126342754193842244915477287016327757357714698751777287458963458682349581881560880814595167244857846847668988374679430572782121021084683986742283012573569894084166107235597351093334125816075658348307113218478800035703971671113417712009419861470917307849916674203301497919242668373376352901312309673053175315189945730756118172940886476343290174961420986113367531057713782438374928471960914578818951372282574754612716278516397754222547513576728685964204411958300379269457341514082464314789480020782793280002504900356632326331974869717987741343264338993635052202500091964648373605114604747636114184344 (- -12618010259109779267590315037969998053964054382853891516547435925972388025118492931596200697357628900783311183940584302426381939302632641549019984810957030 -30500906828861638007306362171210132987300359439962044769219457463653547834815716264412200930088623097530758080891972640000479943534665059199377729854850415258341537838023739964147532129877743393965857370995558748807382396090020006195649251292012405690725917389684473999400905751109361754679152179983739269026226054012963756892488872262522587481931950410504651253101938824790285623805566521723062029033001745636445860437154344665483641408727637784045030118212476306906983993748299291616038887011943864441807818857508443930272872365334665976442185494702520760793786640113779099219233665607521784524244604432396247693263) EQL-OK: 30500906828861638007306362171210132987300359439962044769219457463653547834815716264412200930088623097530758080891972640000479943534665059199377729854850415258341537838023739964147532129877743393965857370995558748807382396090020006195649251292012405690725917389684473999400905751109361754679152179983739269026226054012963756892488872262522587481931950410504651253101938824790285623805566521723062029033001745636445860437154344665483641408727637784045030118212476294288973734638520024025723849041945810477753436003616927382836946392946640857949253898501823403164885856802595158634931239225582481891603055412411436736233 (- 793528769616879938852241178439496352527042950647521648629732169156958768358523029837406526207126598190786120139491813624819360632811627576064199559812277 -7357484069649002655190557040768215614708659708788999334802985986235721030962928900092675952032143512196279092521450986819067071570862007086586132687661085824939677603953832219860573980632016025218580608321648907608385784471745482257672314890331358256478273312255285010343369949412955387472116587504557483184506548209831317705115523967163525846685455369176657510129844566195941925821733027993620517287411895496215426174909366458092382652675628195464969405904518323018004882611048769247228828875493680284766874334247375868318795940759082324831733175858991629741478124633015067484305547002438816473086042218906532116413) EQL-OK: 7357484069649002655190557040768215614708659708788999334802985986235721030962928900092675952032143512196279092521450986819067071570862007086586132687661085824939677603953832219860573980632016025218580608321648907608385784471745482257672314890331358256478273312255285010343369949412955387472116587504557483184506548209831317705115523967163525846685455369176657510129844566195941925821733027993620517287411895496215426174909366458092382652675628195464969405904518323811533652227928708099470007314990032811809824981769024498050965097717850683354763013265517836868076315419135206976119171821799449284713618283106091928690 (- 30958566711373255787092081401292877738974978442987704470984765018293851031728996862405055424093249924047528792113585028592262445810946419909807061004531455817427671594281537965628880611732831524185850161910304038646992464838306728350704966234151134620041799373762432970330864023007632010865749239024802839173884778578927209741320635135275002489733299806669933393428518104197594560039136096527206600870299327752296492029012993590212340409989598323540081430189567580333356380487749078595746626408529223195894600223743978246922817054226858311823994547784553612982586322603593335538875728113115443554199017672360091721648 9164115638960783470) EQL-OK: 30958566711373255787092081401292877738974978442987704470984765018293851031728996862405055424093249924047528792113585028592262445810946419909807061004531455817427671594281537965628880611732831524185850161910304038646992464838306728350704966234151134620041799373762432970330864023007632010865749239024802839173884778578927209741320635135275002489733299806669933393428518104197594560039136096527206600870299327752296492029012993590212340409989598323540081430189567580333356380487749078595746626408529223195894600223743978246922817054226858311823994547784553612982586322603593335538875728113115443554189853556721130938178 (- -22540807692474380279530794404584230073523360203115293035869063366926380719566516089428840111682263403627532047214106171892715667227836310498366393991106231487046533598391969789120283294510723096483520917309134391072655861112766764278247568027435618337967113341863713181603534251049249873125130781073437913954718595729437608729446837417196899902194261111827656247095442897532040935029872731410799530408713850806239149348700486268275019296069828199088780767614008685960242354118969741283398882689239770114582524756296906388861630890288875920861344939520380841337675934551587994259348267613541166769237154904791412049964 16928681651977808800) EQL-OK: -22540807692474380279530794404584230073523360203115293035869063366926380719566516089428840111682263403627532047214106171892715667227836310498366393991106231487046533598391969789120283294510723096483520917309134391072655861112766764278247568027435618337967113341863713181603534251049249873125130781073437913954718595729437608729446837417196899902194261111827656247095442897532040935029872731410799530408713850806239149348700486268275019296069828199088780767614008685960242354118969741283398882689239770114582524756296906388861630890288875920861344939520380841337675934551587994259348267613541166769254083586443389858764 (- -5403850875869356031749551669837202919756114555261706106905659104903792701565965475066159243529680606410723686422444947172225540145977333194008702465610630608545009270872541652430806931212184915840724378685979865349848151917650322286497417985248678815214889868576385900691591784772762893647315325310416150353725001943778473686980157692817497562783521120544549784746647104651038037129984152623720529803205580894126664077380391379306511348324442512538418658728022685805514196592544294177914956734669359073791151050869328577099869772182315103156047405800398706114122356939316464974680113324979723289916823063616573634058 -10755560408227106818) EQL-OK: -5403850875869356031749551669837202919756114555261706106905659104903792701565965475066159243529680606410723686422444947172225540145977333194008702465610630608545009270872541652430806931212184915840724378685979865349848151917650322286497417985248678815214889868576385900691591784772762893647315325310416150353725001943778473686980157692817497562783521120544549784746647104651038037129984152623720529803205580894126664077380391379306511348324442512538418658728022685805514196592544294177914956734669359073791151050869328577099869772182315103156047405800398706114122356939316464974680113324979723289906067503208346527240 (- 16201587974698660164372991183566748501003872177894450603471850345714117528335101264234127789041855420954511595895378320972957964222386731614839583078498685801156670229700092209313747849610762975747730086443186821337319452128253859293962343891549207804191088925361935683615063225197130192492652062735684739784075955094308092423304262201429421582566117390598395895220976999990205945523225411701169301910362640419341608407294018105959688929256136725564385243617240412649023368133778798063226772467915584333795357813292935080009919284755332034998122912861893282865727947810588086156919649131720183722427134042574317487793 -126159569916621842) EQL-OK: 16201587974698660164372991183566748501003872177894450603471850345714117528335101264234127789041855420954511595895378320972957964222386731614839583078498685801156670229700092209313747849610762975747730086443186821337319452128253859293962343891549207804191088925361935683615063225197130192492652062735684739784075955094308092423304262201429421582566117390598395895220976999990205945523225411701169301910362640419341608407294018105959688929256136725564385243617240412649023368133778798063226772467915584333795357813292935080009919284755332034998122912861893282865727947810588086156919649131720183722427260202144234109635 (- -9976758107386398142455037422077809088581080675608340830198269021688955930541332630075972471934165382030070969307731206728197760190279942894255740733209190331510591013089699837164445642396864912572863786290237335963836376543389815671640509582958465164874961381137096877288362944469137669502842448492172241151419831252572392809173900377271652074261706120638052379886108764460001026094198502028776365675088466580595870167840105746912975236851293882732079317535103041585285239081516202482201377111734010788198635874359396626004300532752450289119192633850562141516671742961938277967783337559307443617308447853505824391099 13449070890444925581) EQL-OK: -9976758107386398142455037422077809088581080675608340830198269021688955930541332630075972471934165382030070969307731206728197760190279942894255740733209190331510591013089699837164445642396864912572863786290237335963836376543389815671640509582958465164874961381137096877288362944469137669502842448492172241151419831252572392809173900377271652074261706120638052379886108764460001026094198502028776365675088466580595870167840105746912975236851293882732079317535103041585285239081516202482201377111734010788198635874359396626004300532752450289119192633850562141516671742961938277967783337559307443617321896924396269316680 (- -8570952518585194406209873586517687582701183275108243979199329595605282282125006489076327154374449108678257552384372919282846744626955206382078850958298637157198962032090439427286914716782317030245513658212430127586764421559372214829010306717557679285031617989735914399954286846456953917915955558448774972943731602144914068097214910567329340361564904028964471241318105967747431610163083002382821902859161510204381788262611298660559327478615315484763561786397041779926288206767156863141140852268323253657685018587945456372648431446464389004257999049529945532453598011773843788498650935959375182414447893892341891463988 4431555062692055371) EQL-OK: -8570952518585194406209873586517687582701183275108243979199329595605282282125006489076327154374449108678257552384372919282846744626955206382078850958298637157198962032090439427286914716782317030245513658212430127586764421559372214829010306717557679285031617989735914399954286846456953917915955558448774972943731602144914068097214910567329340361564904028964471241318105967747431610163083002382821902859161510204381788262611298660559327478615315484763561786397041779926288206767156863141140852268323253657685018587945456372648431446464389004257999049529945532453598011773843788498650935959375182414452325447404583519359 (- 4117976000917214601143188578494558474138167055110060832594841842655428229500889876131794484851166401425675703592388271925904534237338595998991043982676292549088043959446082382516734793718348862105938692342851330680670593768890094290655852108130945387988863730762717733881418314989528719379494082656897158942547008663543153236129762264443358316776532465284014215413819415615612452225913947961681691310132286840303081453109375175436902292224029179426794714036524361081174901146731799945483243427138748119832116750910126386838614645397770107366925613473924955965862778639046707637382775371488874447622330992324750207465 329466253508616383200261654231797136951) EQL-OK: 4117976000917214601143188578494558474138167055110060832594841842655428229500889876131794484851166401425675703592388271925904534237338595998991043982676292549088043959446082382516734793718348862105938692342851330680670593768890094290655852108130945387988863730762717733881418314989528719379494082656897158942547008663543153236129762264443358316776532465284014215413819415615612452225913947961681691310132286840303081453109375175436902292224029179426794714036524361081174901146731799945483243427138748119832116750910126386838614645397770107366925613473924955965862778639046707637053309117980258064422069338092953070514 (- 28857935543824608075326348244201981931023939250259142606733822094071772153858420201297951828741003977413353359215638528196235956061529059419904405354390715114239219947402126760298132539402386106279333968395498788354937020337343839325588433318100331044091923709732742795159387846354148919054314582749477292946200912006940503778924320301062789466388997936618573519744795661160190636101768486096961991215006236190655062992372061052426455063703038765465688361316141792840153608145888307784845264037109867657483109819380082597605481013612040648149090345778910883349230476481347645708269410828528742743794495302359380494607 126536164564464424337714470705049463978) EQL-OK: 28857935543824608075326348244201981931023939250259142606733822094071772153858420201297951828741003977413353359215638528196235956061529059419904405354390715114239219947402126760298132539402386106279333968395498788354937020337343839325588433318100331044091923709732742795159387846354148919054314582749477292946200912006940503778924320301062789466388997936618573519744795661160190636101768486096961991215006236190655062992372061052426455063703038765465688361316141792840153608145888307784845264037109867657483109819380082597605481013612040648149090345778910883349230476481347645708142874663964278319456780831654331030629 (- 3146199586408378667812619157270468624370984629500707476575291934586478540055436137993431548830607708293475788354970610669452058906009873485175438772484599603993015239438297747261356407887781450787482447252615210880612867127689283653562498484594955015919746443263740095372831444793239911996227663006098501180972347442107190398034048225264564325230296723559400768342331039755765597288518435463475921534765025262262798267314969774604439319964638461636007229819888743218820584570149249791727508891676067767073852694327748467914037392778283816153183422263956621516748627574334199731850712255885395479903525322397561293553 -169494171680584797187706369710105239124) EQL-OK: 3146199586408378667812619157270468624370984629500707476575291934586478540055436137993431548830607708293475788354970610669452058906009873485175438772484599603993015239438297747261356407887781450787482447252615210880612867127689283653562498484594955015919746443263740095372831444793239911996227663006098501180972347442107190398034048225264564325230296723559400768342331039755765597288518435463475921534765025262262798267314969774604439319964638461636007229819888743218820584570149249791727508891676067767073852694327748467914037392778283816153183422263956621516748627574334199732020206427565980277091231692107666532677 (- -17024716654716744558842421452239026542281806678754026383430912733874686056449261218428541803113383766132449624540209841726047308927951820311213785345168358108138304716549475322223600292513384537980742126687035576531330089447100646214364923043445903103768701639992829171572718403272488931980504461938688955457870904289239032709146514866818331202329982821151580491257491540240579366183525075936339515949345815704583685855315810611089822402567649542290589282153225725537026309623090382054078872576985425957096858376112688308214148412270019118710904983829984589093557307164347051152307499446188262820058714564165108542508 -26845770031559702758807696432929071597) EQL-OK: -17024716654716744558842421452239026542281806678754026383430912733874686056449261218428541803113383766132449624540209841726047308927951820311213785345168358108138304716549475322223600292513384537980742126687035576531330089447100646214364923043445903103768701639992829171572718403272488931980504461938688955457870904289239032709146514866818331202329982821151580491257491540240579366183525075936339515949345815704583685855315810611089822402567649542290589282153225725537026309623090382054078872576985425957096858376112688308214148412270019118710904983829984589093557307164347051152280653676156703117299906867732179470911 (- -20875354448001792153279041347864644172439177882677780548397567327274288309764204295853633150227327732322157811413794613378828291977852467550695289535036337326494269114787031260705326469002279939986228049380615128280814933748700667874022724707001736732724010699175779382411342385842744973636495738468838244099596215421975861650998954057316519632062827510021706536194961332185926551767127180751211669386674770139039516623606727799489291663572125587356845055646322930167536458093283930082765496058330805117442824718962237069840252138957395570892073194575112213410604881673785921789655406716271370732069643455590690035701 -321447426701397438572265325285879998363) EQL-OK: -20875354448001792153279041347864644172439177882677780548397567327274288309764204295853633150227327732322157811413794613378828291977852467550695289535036337326494269114787031260705326469002279939986228049380615128280814933748700667874022724707001736732724010699175779382411342385842744973636495738468838244099596215421975861650998954057316519632062827510021706536194961332185926551767127180751211669386674770139039516623606727799489291663572125587356845055646322930167536458093283930082765496058330805117442824718962237069840252138957395570892073194575112213410604881673785921789333959289569973293497378130304810037338 (- -6750548706930727136186675393752693335334383613941059024795513640678178119089262068912855951615043660442324823673049951182143778744824110223137384940032268718291241014850714197673735719784663896993460156686600813524168487673234842233781654493200950459723884918456280719440022930492599128086690014332139955274261568563155723011697763382009890186816226119314994799655369791620499988988986590903148198659095740939986627235565633349906453726759224441608018598520571182643709143072528030332708598472074166415467718451869993686505339408706320298338691467040585228617379086727764240955696690287600957842671916189752415855520 132223863177855649509430852484092802671) EQL-OK: -6750548706930727136186675393752693335334383613941059024795513640678178119089262068912855951615043660442324823673049951182143778744824110223137384940032268718291241014850714197673735719784663896993460156686600813524168487673234842233781654493200950459723884918456280719440022930492599128086690014332139955274261568563155723011697763382009890186816226119314994799655369791620499988988986590903148198659095740939986627235565633349906453726759224441608018598520571182643709143072528030332708598472074166415467718451869993686505339408706320298338691467040585228617379086727764240955828914150778813492181347042236508658191 (- 15737797902964168014939893286340956118635524170934156177365242966267432695262586636031957242055461736359478270642576860414422844075672388559647477705484719667060463718865742735598799928335211410004369240278699196301127699945374217439676378682879115442203681638050752745036508637214733712716867800216723838016099572951915042604603457902610639317648800296497583507890473114507231814851908526534709496988648572353272479026750068932474334642929727977996779536604912743446197670724757690108283368934769626461285961947257397454619164856011847736479229692086038931510067165282571276049292116713101550911614590774659556899356 -6114512833799784097991148713266650451765474382378581896952003894922931741133332233338460555227243451198289670274036744955599177213449957470212981501678055) EQL-OK: 15737797902964168014939893286340956118635524170934156177365242966267432695262586636031957242055461736359478270642576860414422844075672388559647477705484719667060463718865742735598799928335211410004369240278699196301127699945374217439676378682879115442203681638050752745036508637214733712716867800216723838016099572951915042604603457902610639317648800296497583507890473114507231814851908526534709496988648572353272479026750068932474334642929727977996779536604912749560710504524541788099432082201420078226760344325839294406623059778943588869811463030546594158753518363572241550086037072312278764361572060987641058577411 (- -26633154627863501044020127597209297142657179797586777727331879111280843451446814109347357601013807189824906954310855123313836812409388745541128842840054310853220032505914307470215180950497357091093642400638925719682307925365402618310180378684705799724964274776149984064608716300479893889145492885897234574442542501896696821902329473018442082678749291668341477914681413039643187020003425962922948452894682558162414623956491734656939841377698702802567258906642912449969621455596132708975438173455827361542712483153981422051943690720556013580161324856788091093465837542336129629269227369781823515673967591796132853515009 3321161637038961370471515250185392889390643163295535903347391615170504064647249127732639364682803744773593849851778894972403397573953564801884397178069327) EQL-OK: -26633154627863501044020127597209297142657179797586777727331879111280843451446814109347357601013807189824906954310855123313836812409388745541128842840054310853220032505914307470215180950497357091093642400638925719682307925365402618310180378684705799724964274776149984064608716300479893889145492885897234574442542501896696821902329473018442082678749291668341477914681413039643187020003425962922948452894682558162414623956491734656939841377698702802567258906642912453290783092635094079446953423641220250933355646449517325399335305891060078227410452589427455776269582315929979481048122342185221089627532393680530031584336 (- 27668394897866653012794531261739800318882766882548843941974485394983434533400277607364280566269718161470415771058329222680901477416257843578362127708934184467195154000133252468684612556324066063725677629160438683034201285122508880444372096430021219637788794365539396242345208611990491721052691567092029622640533057073151980959055665792776356282961971341363712186503783566960850166774438868528799819047163739437906559674823146932668464230936946321915236658512741918196732794332451120218658490129307932187658010681746557120172585093207839141764683325214902696969028472942954863209641597556494684135445935915485525220911 204625459185084436546676461283890328511903949966691877662249903659689934813784661695047569885195881142676761876303280806728760511429260843727967794322777) EQL-OK: 27668394897866653012794531261739800318882766882548843941974485394983434533400277607364280566269718161470415771058329222680901477416257843578362127708934184467195154000133252468684612556324066063725677629160438683034201285122508880444372096430021219637788794365539396242345208611990491721052691567092029622640533057073151980959055665792776356282961971341363712186503783566960850166774438868528799819047163739437906559674823146932668464230936946321915236658512741917992107335147366683671982028845417603675754060715054679457922681433517904327980021630167332811773147330266192986906360790827734172706185092187517730898134 (- 18944451653774463090918576081661764936021793389045063662102219434278236461286997354190032851092512146937346521704215170240383659165117708716738711782597164244188741818096207452074083439983059414271417130274747048227795964884943105011205424198661201055104372863019759130697888820715782179466491256695453118035286889359217448004524564796840711987314064158194625731263591557915838970249677548534895064545467992194029425250039951132361639559343536937119283951538321037694842089561504643350632756961329867761604760788760440497535611072991056505806805291706178639395690245460397975614715123591611301423752799666149495108752 994321141213369910357526037382331323092462599623554452705525887587326552002660849455542761618020243106424015447778226642816634338781654345001677083881111) EQL-OK: 18944451653774463090918576081661764936021793389045063662102219434278236461286997354190032851092512146937346521704215170240383659165117708716738711782597164244188741818096207452074083439983059414271417130274747048227795964884943105011205424198661201055104372863019759130697888820715782179466491256695453118035286889359217448004524564796840711987314064158194625731263591557915838970249677548534895064545467992194029425250039951132361639559343536937119283951538321036700520948348134732993106719578998544669142161165205987792009723485664504503145955836163417021375447139036382527836488480774976962642098454664472411227641 (- -25075128489482657321316021943980016828761861550379828525731288423212311433274066958090940464803020097932875912251380196071686918459370667428905844496548191635733867314315152547202859654044591981512687559437417616479425752991419002108503390319869665933757684966460526631533822984311725217788657567199485442486045019468844265484117570385156844404625735176559901986920712550964238722824122000259551821135404274194791706113272773768366572120227974096419295159271316157215551931810740200836725504693738229444336470213883741520460842708733150362983831267583568258736572295448486287825894301201018490203520738439038977754991 -7402949251688548738762242219263594861535354011996392637087346760786292549376145193266590582054224293289596877537643409310483743293801574030358189880866069) EQL-OK: -25075128489482657321316021943980016828761861550379828525731288423212311433274066958090940464803020097932875912251380196071686918459370667428905844496548191635733867314315152547202859654044591981512687559437417616479425752991419002108503390319869665933757684966460526631533822984311725217788657567199485442486045019468844265484117570385156844404625735176559901986920712550964238722824122000259551821135404274194791706113272773768366572120227974096419295159271316149812602680122191462074483285430143367908982458217491104433114081922440600986838638000992986204512279005851608750182484990717275196401946708080849096888922 (- -26509487378481600038412836495388065888781507388737194948728047318975269277448073484403390476243134990463394380967295356958474984927721196047241216945988250219075749832868804186657201899994373052648345989716938779173325348547767647529160988985542438998030764420175306438858518207072038513664360905985908879070216069156102379349899544471658754952888660878997691670566078979940005195987259493512159628198906090101827331841914429358969184839073862821059400943312264269215878469013316796620921077244799814690434355127994011220041638393750697699141479399553359747084811371804524490919966410379714725200415331414459870271869 -9247155945465656153397925559476432992975541781462281935278489123804934847762489500833913193183733932905776020790478662969835879365116238125565077744775032) EQL-OK: -26509487378481600038412836495388065888781507388737194948728047318975269277448073484403390476243134990463394380967295356958474984927721196047241216945988250219075749832868804186657201899994373052648345989716938779173325348547767647529160988985542438998030764420175306438858518207072038513664360905985908879070216069156102379349899544471658754952888660878997691670566078979940005195987259493512159628198906090101827331841914429358969184839073862821059400943312264259968722523547660643222995517768366821714892573665712075941552514588815849936651978565640166563350878466028503700441303440543835360084177205849382125496837 (- -17010604274474750006607667808593883725990508452473783283717890546525148212376267233909567638545898628257361383837671935903199638230375408397752251127816717091041943873728526445398525706450929660366518707254053655364610471112296477865068960744948010561798109833411657930112293904378353445961131058136287425064317621271289456901138718557297733713446119244533144377470099270824020439428168481914824420861176457152299497728390918971852021025089592998997807574907789524112450146545688385954763667980124432645276563626082835790429598328230426471161191074551543308732791287559033843466623138171520961684959997180979203053477 -17319079025684619178510812811805110270463447771889107440996086020812918555191263705580533644731591929176480040622705607552852994906782176254877135818109655911838591767583157894999741648979817400330572419476101372927546509769818404491634583907246692993992514876697330603464497645633398167129555001859772111887143352351860130929715392173452396253437927361301990735683539169040916027268831202732178553152351117118606495416985612909248422655861312689027789401950549626643389790516560291620711705848717875304929186131258525831197192620523261738944873398924939726689336762464320190834794155527335576391767307110012289717973) EQL-OK: 308474751209869171903145003211226544472939319415324157278195474287770342814996471670966006185693300919118656785033671649653356676406767857124884690292938820796647893854631449601215942528887739964053712222047717562936038657521926626565623162298682432194405043285672673352203741255044721168423943723484686822825731080570674028576673616154662539991808116768846358213439898216895587840662720817354132291174659966306997688594693937396401630771719690029981827042760102530939643970871905665948037868593442659652622505175690040767594292292835267783682324373396417956545474905286347368171017355814614706807309929033086664496 (- -28362352496476494327713713233021518136860402239251781438945998574753662942796270292818595738100959519541952077905620088422871490191217157269435052965329201030095268586136492980900212955645939325800541690754639292707053269767151001292253701853012092829784482071789669480438026889625605099744553642207773753943711175375843649210118677569597324789367425691177169929576236753018329085700397911235750600921874606148324025962628852167093806152864269874177214562322576097931390470469397118268354868919899638376323751276807304678316688836173746719723312665764603485606350244811113608471530958617108833879194264695174468397461 -4081062111675377984305281082755054920741203741273067094307824323728798665450292976016160959354997082250970415737745853292134965575242789548167162064123232363464302136338349828801951197252612093077640695564825095503535921549690447893467349156939791370286866987224201115453216606688305427702274940837032716124925028835914047967887674858015919302546781010326385758988488478290741665427521820112231266659657169118374988259423444686317389869729817643396097464874333968181509317307320406521221309011946212308190273531009796563611621389720223920155554879800901239072885025170342349379379336047732368458185953903872634982504) EQL-OK: -24281290384801116343408432150266463216119198497978714344638174251024864277345977316802434778745962437290981662167874235130736524615974367721267890901205968666630966449798143152098261758393327232722900995189814197203517348217460553398786352696072301459497615084565468364984810282937299672042278701370741037818786146539929601242231002711581405486820644680850784170587748274727587420272876091123519334262217437029949037703205407480776416283134452230781117097448242129749881153162076711747133559907953426068133477745797508114705067446453522799567757785963702246533465219640771259092151622569376465421008310791301833414957 (- 10367142604728811799331249565431331488313655422005202933702176605382043644320209814639311439871418581341534233560256605231366966869093495784665834232350567124110194965198962966795893926025854156729633358240069116588609932539289897499402463770167927610848388138020589286461244557962368497723086593344721146859584146431437967506007518396464517349944129896971137720357645026281243138165214047233258394590454775153944241555543594427555914116439316287902470043292624597940465373006598913770411505099332700167695871387948271302951230983772351549087620538875967635100644404345317626621438913980275970160864401622986870735123 -13323117602411502623386235160326625769048477819798659261203460002048250420188223753407093545503703207645050883770850457071863684414849353264890601744588860687970804808452855795406182324143949747985869939791374195222513169904228914579995165180964917538177994190229733465224857616114628815752065632238207474599531507602861647623695058640735949593381112671690796335596142010430124683781417828023076027476816068202219709673411776556090962187853799456968290579708094595903778622705850818245685205707447012659247018940946510378371952655457988959551256869060428488498330109152756599450626641948447980234503249330875085656261) EQL-OK: 23690260207140314422717484725757957257362133241803862194905636607430294064508433568046404985375121788986585117331107062303230651283942849049556435976939427812080999773651818762202076250169803904715503298031443311811123102443518812079397628951132845149026382328250322751686102174076997313475152225582928621459115654034299615129702577037200466943325242568661934055953787036711367821946631875256334422067270843356163951228955370983646876304293115744870760623000719193844243995712449732016096710806779712826942890328894781681323183639230340508638877407936396123598974513498074226072065555928723950395367650953861956391384 (- -25321281404861286799950777949097462701962113587443565138655462269365151737118518315058035825695270231347401755128007072923189452859397209062457461602335603630181865680063451525170253746137368267674863889514153713728814272332433431604233690200451816570240227260445028630591376891139306370205846627093813889699170594185178241812081296510140572331372738998993116117098817936927692238682202717231675283209016857095739468507690090676681400453024293870135659990528969837132054786661560150259115734877162158755858653364070279937027014730947342216816307219127474721622123875699701715404820384545693058511056735799834754890692 -15870257059811626693754498423136372480069134596343998984549199283973854570508228359295418026089909378687774627821225399931314225867711515277913855368473873536462450935842786002269065816311054834857109074848803122494252885020527074586145467185882674518032764708782999568002770206995683800833252068328835778749976046128872525287656002968632147457840467536682726059599593635219947081138082647985895437016641903078766878782632503812736486529143041369932038649270950453231711525943737962179463585338023463992816994328519710963267459007592689204838965317062070771191372220277256094361390952025057574056586665509010902583686) EQL-OK: -9451024345049660106196279525961090221892978991099566154106262985391297166610289955762617799605360852659627127306781672991875226991685693784543606233861730093719414744220665522901187929826313432817754814665350591234561387311906357018088223014569142052207462551662029062588606684143622569372594558764978110949194548056305716524425293541508424873532271462310390057499224301707745157544120069245779846192374954016972589725057586863944913923881252500203621341258019383900343260717822188079652149539138694763041659035550568973759555723354653011977341902065403950430751655422445621043429432520635484454470070290823852307006 (- -10064759312484387184876313010284016458560725440641239737323234767636591183611201479885347260175161165340917225306019885202675573016295152797559983194160634880140345743489989007821872426587698574795394887035658449467358615185057180305109018898637903449135520486663185036663238956537895356325733583128141439025002140924158670346599492383552938312402521066705186885506193758499006001382444818328802338159713646715901977137011576113434170842422373328479181457354927400927267448788528116619711184792932525071391797130057189079431487557270366699175956757661488296856660145077706273571985222726397848614141194988258117115194 -3689074607001776735792882994440038588887963294487080609346609068733026224735369468180206799966728461935654851527895876039403151156669223687679382665269013769686991783531091821265184956524448064027733731862929686596729449196238312997460578818232100254940830907672953344544031914926653652310468671685310332327057444910423081752028857828828473637496272809899061573593874011995802487442092326045415689987885712749026491545159340468151000027397821404233369034594141219014219707193746581364791219277489927025992135462852894714639406751538919395016165215641239054420028872350709704191189169571752512626755385998505584006855) EQL-OK: -6375684705482610449083430015843977869672762146154159127976625698903564958875832011705140460208432703405262373778124009163272421859625929109880600528891621110453353959958897186556687470063250510767661155172728762870629165988818867307648440080405803194194689578990231692119207041611241704015264911442831106697944696013735588594570634554724464674906248256806125311912319746503203513940352492283386648171827933966875485591852235645283170815024551924245812422760786181913047741594781535254919965515442598045399661667204294364792080805731447304159791542020249242436631272726996569380796053154645335987385808989752533108339 (- -4621513851362114851854472268081584822344822740665629177305004335694395719163541988311496405455186973857145245414214464449674464879082042971313025249648887349614046805778335573547862191522938924075560443632614665169520240664970180760364771373836023824195690134618554368845612471858027311791638881380352344527105480173917778084361560336490212845414303819150625355111300877737042696291233444311426721588476948565949641149735838580313236869041013210454558557732497012037162735013212361842433337324577522358968152852532145622765032318936569346015498130151789662274686368870963891262060214274101000058555635785833724062234 20283847238128227963042817384468009365120280641032764409860857066215336820785816567924217697745867082423864450685360959383940995237907453126362378908108545669654749698030305432673477271848544313029448526561606175059997663752601262173667861202924953502866611309434183496911206954880840674239880495147451496219568787221129244201657487090244435562896841733049066453539864301122516559479757096183362477594406691085946787803323712522074578611082872627361465163804239673539339633332349145205596371287028267780080937728455742966681547897652607170788637996317683436193829274172400558140357237480809582038468874094877651383053) EQL-OK: -24905361089490342814897289652549594187465103381698393587165861401909732539949358556235714103201054056281009696099575423833615460116989496097675404157757433019268796503808641006221339463371483237105008970194220840229517904417571442934032632576760977327062301444052737865756819426738867986031519376527803840746674267395047022286019047426734648408311145552199691808651165178859559255770990540494789199182883639651896428953059551102387815480123885837816023721536736685576502368345561507048029708611605790139049090580987888589446580216589176516804136126469473098468515643043364449402417451754910582097024509880711375445287 (* -1412797070596191471 -15492755620416346417) EQL-OK: 21888119755986895161222137392796809407 (* 16686841096925954110 1491135775021813104) EQL-OK: 24882345731730524499708005167300657440 (* 13262412958100188045 -18379071970155621919) EQL-OK: -243750842254847872704698616507823758355 (* 889503034794263569 -16600674457216690894) EQL-OK: -14766350309325860687849239111838240686 (* 3148165694020236318 -11771070679825280729) EQL-OK: -37057280896113409834434531491271315822 (* -4443818546267181727 -12001052312087213799) EQL-OK: 53330498839175802532024121011435050873 (* 8305259347214213793 -229351169208067535459370186456659711595) EQL-OK: -1904820941859811670566233132773219565154696335396051029835 (* -18273334758510166901 290047155020180552782039318570071650475) EQL-OK: -5300128759437251944808204783222405076790289915320785927975 (* -703280433697652940 91110448009482115063492795153459771021) EQL-OK: -64076195390496041906141380919369524419358692517527451740 (* 15279634596127882146 -220998726467849290098339792307263567896) EQL-OK: -3376779786638352686104608499923871317791563686466157184816 (* -4472497681184076830 325612942672822430032905460436166528379) EQL-OK: -1456303131067722058341139305566346079551678140995111358570 (* -6180420673489141029 -161157288800853703711204405567379740552) EQL-OK: 996019839388256252540244286609069684717518686623358308008 (* 14044956603588468379 10163190459901171254101452124764637970005230126310661589196828892266636678427020930101076689732526935899135126391465178494895371156141265424428405590113790) EQL-OK: 142741568963316278148132287599703960511135825069792278910440475692913696263448088587778211787403889397993501704943449376875999977937418748662459138952952917221024170426846410 (* 2133283347509865817 10577710515843519541178984366353275630877942729579274295972091544607384358263130633386329706527832990861547566574369528634541156662300858851752195966167381) EQL-OK: 22565253698228972909216255630133478029433774404794962869038558824053350969301054394347471181756471783852326407546652836376109109470959746153989521923555764579738243072315277 (* 7812722507014599311 -5055959518947106416800910724733658104378582281318226107212861190073091017493970778425583956006925004399967175604321778956828368132273155364830637407968648) EQL-OK: -39500808728232764770485117356353304373275127104839804121600969932458363071148383405901570717732548020267052999198017578112731079638156026910705662052515278317807704170401528 (* -17560801708050275829 9842515227842383346577123873881045824143545509071137371075701856197189100217561683579562062872293951325890789283651221922663521213150065638405410634222129) EQL-OK: -172842458224605375239887212582262805312641302639067963604956593404910080268476692854082531021580381176489626536608405283010496488558204787140272050713264572452317265305619941 (* 16743386830114877156 7347065846171565625701636575261347705942035850951855454324853850791855951431141198155170102434274509450315416946729031216385536668189501958761688618635668) EQL-OK: 123014765528775807847206414290825117502032199391400884957413813554539073118943905948723779020186281150198999824020769031248882909461419778092564985979904308229718874140000208 (* 12697192948029671719 -11416780209809507417142822520376617951137069007568339428552592261458272400645205700952156716454820410468812274673183389934216970221062627926131479014990611) EQL-OK: -144961061169197993494569769162151457365959287966302572862364500950127981616038900865036521107816831702945678695331078399461327412574397914795455218447174498277798426197230309 (* 17005139720743105479 -29990519259587469661876904501488342396062731024702923152492275204626478246142153608222329335341363164148761307659972897552084842238285026253664841395295138667328930482145590159132144957515157474957872335043653264146346772142483721767458961320947069718037828473530001033848282453826154763424789967441239969918856795769965946388666154136004597297855416503729657013008165049478441197537144135384444157408972370236442813734429031404855591324183846423588871065272526864866155918285777640819778251612915859290336548446745308788013234099839998683451658620461972798204104633072664604846231692505409653434538208644416538994256) EQL-OK: -509992970306921990341332390474393215554862069848994183152714032617297815196921655222705396130464246880845576204295466273071779248718654338767559016551390771145212884412809612574391658668778295682412755916528976282396155832617323980694289208942491001345059122414240884660276842648466533488559879226195446807748573906940273568334343093922652142252689341425941673567630236228358747411926991658260241924294146562230425295426217833820067881064577380516936937782688004146531121831211284735538742160763820814174631414364095096099434285754767091040812242751724012532803037860394426031234340719537172735695313262283511554154662650333168783128624 (* -15877530153400521290 27863984127681242643954505352420303514833683768731313003271701952957204538094398204984051331105594788039352443762851136101330385230866919393696564428736685568762923746771275677491379334452751710169529933675128178840986001684425353245791752781476028565228371147542431713985092322787978914276414008774443194161599919167210582437024618824616489802661351916633993681556274980075051797120207655478780052593534285265078265845445633803877185868676955831374479850746658711791169579387317321983669227930929736238215792068273805543745311609083833407544342964285215427999724272264458975101474080574470499647168865409458531868592) EQL-OK: -442411248181132450919255517905812929771246981404050821923231762557171158858876183536414772404562764742655092127161703706239729646027465795612501446223663310668879007072125975886873343449629108246953385822769744013416908613100114754904323190537317463286500657291202287742354250227377164455244103312266617146454847578457073139633297517170508179596166314955134347046515455569689877574427319658085169791949003021426613961459610227430636932814700361914589752207776142403364490846294795496119883683491811246550808038342285518518431538295199537270236275774546666026424361019715280652576803278928827199810150387207105149968313623040090578323680 (* -14162897687527555611 -23016403916121951319848021112075986869602408568431399211927062304968548663313037929311574133954267816204873252195499803324830278637331653769648377216095499136975244697758388851688873078022850203685120154634090802825656419418077380419130449990938627982123188424119187922828250625318327074513352279785514062876718714640725789938556578327139793467832731546881422469843509318627826856881082450937188956068348931459011923844607158528494902828851692203126881727638511348944908726926619613375594042390434147948508706733126737304560579515324106834237197081860910657003346633962662773394999353766192391746258372744063777808796) EQL-OK: 325978973798843759388794644178802841408656469654887121096165875654577046313115917671847505813174070119516580105483409446057747653173640660143855580491229746795572929387698247460831363721394707501497262525550824977473864621747159715947297817600227665840640555029633517390896890601028716769035575763283168066843141870124768085499453574902575378368669494153555135898430469356384416638130459557518713454927909937610851489821263029886989981438507377741962130296498574556444168140838201069779040087521405032426995145166201901368032136008107323350679784004016321425234898132080844200202007395427054392280809376612533414505539109579739614954356 (* 10844738523441551664 13010289169828379103330191247192587220592807931898339555723704078985668371901953113936581573750666143303899278973814509164982887504269303358034042953769514772858989849512527461308415676004712388964136857232374888643347097138114199889581495448978914022318770898259317738823514820591042321773469959130347470144905381758960436645008051488666423115693738341045851119808222048272924385188356021826450267608127588500233526688704136268009202730309974485584784539415807259862449203760469406037505772435323036790641520939576046423540699016607317147689982042035523118533555744274806239272109508745089640043900389441390176681340) EQL-OK: 141093184161152226992592021994885140117836445291515772908453669279294934817987511015413332614094493905560980363483549300117114491702466085602279965168041684355125886388302948336158133555051817733078300668260616983283027038746214728386770752826764135491650323133831923154477800324207350667020747545837613879364064704092093040155243919335078139087599906324684688427176309081290932504214653249366429592335409761783188358003723753633106574740731573467850133547164922532633897844647383889253777956821171583261238607289172489135768839436605233457738153233579088224808850428203888700116300637190661108848906846940291749737998056247719674749760 (* -16402132873169057380 8202725117980211375579199554494319645475746305836527475507064811368616698686329266053570766100878145903342129595869654087772486685252653587846560946850102095086896668181099435964053041678323706849735936082196618754721606824996486473796843333331029865501790248862590712245450877098960007272754260813822886287008295409755783478345202299352891066800825979067590290793893933819913530599309037639082839491869155044147367415785329077864525961799400923643936705317921900308490987828345313709179960659814100113658528990241758360711799009722683007157350272749544178688961738222930753008443755881419398858537860612954576778456) EQL-OK: -134542187307192759584182063854799850608007421111316277594191532129597970622559949723743396309231347084450105499455916612009290113746722460358793168839937004812915757145655285798961178877391232945062437277255128401572171216279188126380587081673725314534095093062983435026047851041796084651601813918099532876684901239903769891552275465470747567830660442193995685219383258617057944010709906130655663966913354414611799232001438943448374556294933488875450563987147224709383408815994320229340710143082135667640802837699940654151297907451396297241124380508001357553893328703788960812706653503939250831164194874527033594779746890593262611805280 (* -12094905083549825231 -7303327854122277566083382629094740392048421584433028903125893639493993705575691832165314461496849401726460344615713884253150283931509897329926825128629833541892164122168618243719393446304446866677253728405617434021389128710195093788280203239300086905325641224801020413858421914412156234316517981228056539721130386645649016559425091470643854813419057026759188125291655398451427686659900364573485593902992038773538760663063071699966278379037038361219424927031644750173900916227834573604566165762753650347331082640552394430002401423199016978155236550541225512734287851807727860645247391524620773399994302380387697957581) EQL-OK: 88333057189654571362020288527489792875655269960629008914349561689924145109953656394378545526256758871407020025766992398117775520525507898420898102744530402370720932219749861094609497366188371774072368034971851022164946370916317410415503705484491514312339956381120953283812334833067601825812118392757289250628861166579446800637104996060739031010579056633535166403083327528575504427815713481850979373113173151813491831551023902022537957860211597622343157802805275942920911544696695931809085743355666792408029743911424760065578742910735408262758198787195579745280191859776661700139596074108035867940154338953640690242795671183308201526211 (* -81618231044418675360403541307856740187 9751573706924018395) EQL-OK: -795906195858402819552264165081526765614024708979523739865 (* -167600745660011044249531125104202473984 -12960244919927910377) EQL-OK: 2172146712516287908809731894157839567367040369214826131968 (* 90306383312124738690336097936949488486 156109477991590792) EQL-OK: 14097682358164298866835386043901377722456291173827620912 (* 126202800261728727198105694812165074067 -17404362862588500316) EQL-OK: -2196479330029905727399352310201914876903532806486592905172 (* -80093647977875266525946940496137725572 -9499399805878278852) EQL-OK: 760841584053111508349403804472960020663660465509267203344 (* 304052889577333477963637861956318521374 7233536405885618691) EQL-OK: 2199377646072361697737485358722028853038393128548297401434 (* -124787646062877233829165925777950698937 -125798384154373172164515376683173327013) EQL-OK: 15698084237137783175768362160964949930745617334715009097620154581879012485181 (* 259623502197082370239517374851053110076 307089583871541575627915295134832918432) EQL-OK: 79727673252974285068387698133566605944659309374400074880377824560177225320832 (* -245358177397026033963771466683003477163 -285087883756432161967673595037725276963) EQL-OK: 69948643556453419103498093570621669430956866597291662675473644085666220495969 (* 46731711386059374483493216849082745840 -216522280665540473581476116002923812173) EQL-OK: -10118456728713381305690589407461434638634240429858378588644634276171257110320 (* -301422430661955757433852743238845048860 -737194742467573013847855072675441356) EQL-OK: 222207031145790358162820429948896977201848379524899474475604149595884654160 (* 109781582310220385246795023904554278713 -273317662617851276579672019029762858338) EQL-OK: -30005245475518685175699313262818315773200953201653075289648004177366787958994 (* -312236719893391897821327608828679767006 -661158307192284418474080017860142217763949256471548515134335997907628404839044913830388499435166012788226998900468665646723366842553747501004752506346280) EQL-OK: 206437901167986463762021023207669068873036145952740267172145693855475451354717023377588805030022300923600718715029262618794758202955817341818233889201852381575043965927328029955969846754837680 (* -134379788461141842858846278268259347105 -5535479645589936472405910397299739073641612836770238183712206042659632410776896398062277742229906915852933418684231779996404071421767274180368154310128427) EQL-OK: 743856583805332082970350662728998610690268824090148728726850517499798631519601137183443104910590855501252539324674812560702657332874686395923181633958702249128106139207076314713649515720653835 (* 278271843790644800793473851247546123375 -3845690285506025443856370771250487683891303505653819308540635173436088084480277686684743918745832832765066355874381847690771330587033980524869033600561589) EQL-OK: -1070147326395532917564114389205677334125034378502074943828571411806344559859053091006175486397820822872698474899835730026158782698085673635033947150554253148685482702599776833910878579880042875 (* 22345490710865165412267189692679994671 -13168094845644809414256057134926669929759930873747535851687323456073141938879368460977723280750841588750507348317544461824280674332488497533955177541413394) EQL-OK: -294247541053147552931885013427268298282376074124656716577088212043667912662239091316191145352314750820026626159649861330384837204227899202392764926604802655267738710003310052268554637728023374 (* -223445051950608517881717261787296926498 -2609806601119499724524852022247741111662431776874117401343811680374867931883996125145979162937751368655661775097445043144114599069842524778189198926688379) EQL-OK: 583148371568187658089071213924575304457465978545376486297236105670932990897420147110485946155066725440999079357995678147717407410446012970360780626554347417807723098476525833332400212113766742 (* 12604140228725912459681435851589379433 10671266866958584640992033560488052420339425977492420594983497264069815016478448589306666811246532193922229713077112601565462530332258877522384022088660628) EQL-OK: 134502144009302626262781543880199144227907004673612064586081220538754991037447647926963488301214672345398823354945333417956344119228084327815583754032364976497975702972112644238248704660063924 (* -221289678591114384943252477126208006780 20020996887149770966522122735176842174467884990518978494604707026520269232864200848420530223248762875769520715632742683760311747174524709550334825291720803698613541109690224185041740294906022358446325921538593105347423518731748623037078340006459454656405997570119591344894717789372844612253617591807770017562530034107842444403952657949565007792107071767260484233194674888488789619319597151367813735192433631007526015463229060702510632792171187339118004038505860316305860704455466207113207893106982258864355430481457640304138738182009363353560090082819036973601710432437342931523433079941958203038050750205966472435692) EQL-OK: -4430439966231074415853738608900692925851705818190624801199561884242897308817127146763274284287396980593383317678766559004881552228480591814939402896201244425805503258878061459604511214900528594870260206969839682573246490602076070316760182753341371682323914671418233629420599310422437691170629449435494697829163966912842611408632129590129483811802031178053300073562716917597174161526976287351465154825036851645956354853960835948518860624747958440181683978083391663149733813297698623499283645627889274004656942800842013709298338912226207338477579862672216831422765369078886850523202897989792734789430796029206661261129141144642117177625405158700499049991760 (* 180785619668676509441152734583033930295 -11909038209406834057075682058438206007134213485822042209417443270921391661498900475635417780140585878716264253792335317341527677051828500780153492153490249297998660274828986996948999762620400587091118252205695562417522111840305140989214300921122857271717052213225664738544344394774362885331856170636862181712515248810239601812262573113794334115259873527539564296101166439562124016438281173202196876398090029995104489712272260608848551754611421227761245487365953257890749115194455096508613617028024932657498899001119282498614739316599704645009607294747043489655424155986912576002393048535846081096337705941547991821928) EQL-OK: -2152982852345560218506186041143281789706715672110278207735389192913214838321097754496849942223194392302524369156102301165660674797665128931611291246607346536492650554391248756408556789391955568308599431054809433808337036546281323840555452571430884302696950144068129601527530304907460164571704857360215834011779559395577299313379666503707563751314135201994045874159291100986903645360754621200008830207429980872071814202801994486961737459218017354210479544121100423399040398021780750351097082070296255480707530391964970754186799748521538525274241709676878827522138880241734356460339681718690408853314007343934035505873192699052380699509877559455199604508760 (* -196121729286794751535600080816329923561 31755463535476988506639447113088283661031267977524968610501132544098607201258848456920865390506381665724254592728643925608893982794532243733117636645689751360224314774452374503339856173343683819017479955914451013484169313685311530532055735999039466721411777061709328450052490025363788971916050033904534189719389237878257877112162843506491071470067738867693853480174965212750301808781573369342701195147083717623066339671595077736036738235636996351642097684597005928843274525502529735435418805821748637387888409663397547514467435322454217015563134545731593492200855670248739786405074231658957946422903165662016649229286) EQL-OK: -6227936422881500100190187768375947805694946596622670066116457374856427496311253030141271922822486386675428302332027411428470488965226898801659352566022706152307022438261392466548357753526474097246042956052374187605144719189465046544498482461077851578811186829094445089366592317045580466302238653533114619908864036973070346979261546801894831273337217021756025770590122176562027129481076270727248949609326868225755958667670279949371399535144788247565199415296122873444199709788941984099349149684384486618280260678252604631431089580057102263617056951788273430713908768738965854953667135156866028646584137788146112300214498814212865170902491169332389942607446 (* -149247491509558553673630984739524508601 -9241905448313719916485289537122695595500213295294799660583133638026091750542612875183284894676615989153030773719811347110864468582634048542108726080717551794580656021381515769591713295631818532114918070215760259364277583650102628486861397602958930509695263902920994329409932518607260720657755504091822028630927071374796474717671220452208310602827254296323761245420486376569048549643478954846020045263141546849795367522490793641049509748005893155533480849922847230018411440739584477452313387881413141538766185123978087175960946255649923135634987656065468774634483495944248865774633962770893338531522570776854773975281) EQL-OK: 1379331204929344851843348280532786532350930013132149419346606977890849868537539899667631713548510207947097949976792337278764045110931774279794402312944786743575421497528669859045492875676005849752425421867514661792129580445000023570590786705609341859529483054902802038173138834528021423393677908655442991197348183257271932188161681770513283703502340499171444058119260228931558784004778969491586252899270869275893402714040693571919281494643765571068045362364213060063345212881008657925426024923296369533374671614852576576041747836643356665301762059898161073609265572267138950725010661453917338098901465732991316661901878681888138048552901254914604845891881 (* -246070233154436622785727814428081917418 29761582253452470642591719346200231425423204062498655510037025199574178834762931489817919404889920159374886981199608181795387339523762458361385170203883094308920011218315748466148953320570427838912637152446837553950810011344492780712558515815917745810385725989241835877316836808088478276603934260581342710503593237081689944686263274319354100341139245512159619947319496638082702549196795236216458749363904150768879765280332386830831409591769966706351022328535490587838695167807967607003680703048770719240872629379640571077329748828739281770075441660330884779539288220944313294762143588847790653176774089774033399559617) EQL-OK: -7323439484151992757431054484912931979861244043627630118213112440051387392428853497035249623931234821362770902740177541812170377563064854590834087655133962963430877452052749127605572395112726398103244974178157574726551814002744001021805127518246639418981066588073652668879613252372759895389345727455380224104332342029151667860553645106555190741775758687650292791318963679857313030729683299101577207875499929500963723267185390425716927303375831321783415003339099100562942730763231688479910689887284950156875532151104047755803876078837921949287811575034368641167438367411569736575067233548122814012421044943430647665260439418887639347030312118291762161708906 (* 203826295936164259559522643510940430939 428315860474710981601019542870649234168732095026625500771233691514247613083810271191136212287636290276352210600151884730196161003906066671915478570992925366265552107746965374246537358349673161970290367972281768471743836339191023211359427335141701167253694144280251188008871929010775436125645541749886873478179599464478734149706121117222690271210887178499620737860802605991262799781279373870647695125320153193063528861104479576369448865373971847676465682752435142074973627172566791961541105525781297462635428308325033717669972726101583722868689418677558787287897456521530400671342257419067050354522203242849353639864) EQL-OK: 87302035331271280954456598486072605056704393103691656908943847729634903654600322194677794243221825233700566108459784062758955025931450719283517278054268553004951352280583820782976072352456972931479389375165173986780482062859853305469143408707179895843295115510597584169486406323435925707638987591151227843652210256611991940374072593149367903739596883229844326054223707236369465710416960023659329202073724249764308867733476242261506975691004092043954515337899900837434270833782490145948781128533218641649564543508314976001614187701395586824982250794852925954991265270537649691628899148413763865280007928191637215283244406869662872539567459561720369352296 (* -5899540498246269366107488541138263797694914692322476860852796858749106720144552037986906792251681094769894732746138541066810195167688318229720888479512583 5834015210744942902) EQL-OK: -34418009003174534626858248456163154666511779871358190892629413477534042866009573638264296461516598238780495750056279721797403178867717911762916049857737963922333901125535866 (* -7558198374656605586076446665394545534375963428962439959101805545423930654069723860456022097647139432324162475685494459942871728608277717748075653794546685 -2079670855873590264) EQL-OK: 15718564882684481784074014915267371190416032453294568239793060140651422710113447422494938907375595456199203928496644205320139985222135619659630853564447794621716315309474840 (* -9442744083812363570102321552182535031605446031706376100893354933468482520577272174689455502380973733378565213055641110431767353396963744600184737808983381 -7204974197101757391) EQL-OK: 68034727473703353914019458883709211780958983263702756416891835054494728840771498925306650413027883039860202168095834137357212487561983607389479135319040711944281262212918971 (* -10658732210276096534851972646242288663170038580488752611749460640657411087860047053151548660331707024718100598181073744715506934778234716535781332588396176 9193953347013373121) EQL-OK: -97995886679587166046252015742839992974979220158813197140160489510432960510418039749924861744197553021702396544307690217470606424904065359660871469041838900287446937257585296 (* 3330096979672637104536573277593029682675932033891010715180474877149733802060455951241981993421466123791200840797318740359792251505430948855600408060492000 -9413190658845804679) EQL-OK: -31346837782105095097578725347257193539696338226258990009265748336528353873277500144838721882313026604404426563737656928378230261942407473822851842589487713775609448642068000 (* 2224201331350479188470378485954814766783857696988331736807430786504130570570323948774102396158334805040994159865821844362926631687258969480929122732089195 10226747830478556903) EQL-OK: 22746346139936030910929166328517425029735137934434969334578972386859485783192993228082340012742115893176871887387993591191632260444955081663604449277961804869872353878963085 (* -12394770820700925077767705800588617445613665027183406054209162910642613421436080064653443098327137503596792411463268187212855350864330592654862321763110243 336135860956209890623046930607725140868) EQL-OK: -4166326961171213704571179876442248501325782360170764344978629523457550315208845439497110652079907652744850691289494398473488033083739905461347650605270023127087625641779424751335704552988710924 (* 11792778994619176404079667787533709801900490264171877873621265044313417667869688303207909681289642260521608966405181881416781694320672906600599581862090088 -197661229068721548419113517262926820105) EQL-OK: -2330975190212228827672814304508257223671550753091700552243633152084831515892056240354560520878171696176381845689952044935988868477421447557890739834031207059212175922089523097911477486879619240 (* 11608994516281296345925963401821217560860934641820086911326880657644311461955556832927259499969983808078591149768068360172431078248807463030805586293656663 -40654941048774156019243747229920736005) EQL-OK: -471962987694958552110784676392477007070112288398143925079396435246284471999814508543057304008480666763661066976653446723271982094424149279649226771823800871458389214002872916339341019732251315 (* 4821517917539756801293776911844480642406562140007084392649374723119190602353617113036081438891134008988421494142194891002983491670246762173236312873933599 -255528396376819316172341014108564420589) EQL-OK: -1232034741571035406264710387186737842510579499938716343220834781077329515145216794636313459582844773420679078031627466542930137302257934575129329529129776153159694412903937370462708576694469811 (* 7638751115643228563298483305056828584775811590562130101723525925933790010789130133831569153863129513189315440899053288261039147463032870669035935364282061 114438828287750304954799140618669114911) EQL-OK: 874169727255956505920153418854946321208907128396839975975317705220623267360648189969313978740314703015845506506608054761304647627635292132043887080298168302864314697920637105700927041824911571 (* -3653826017463740005170218884285271512636869606149686475539243914909566619638259666405831445823138528809165270360144267462878986866506114069923299116957450 215752050445782448772085819939961259625) EQL-OK: -788320455239949216234629350585027855111249573063377172522422069903710014529292638311216050777840734448624510386643245486023092483841464815987597578151663227035102742664709136512524899527956250 (* -43242564273985683175827997542883970694363047476880657467026050730764924897992516355909421962249292250047896135687573746158665836208681548975073555418266 4424346097667245771102179669235543742385176589624011161914909311078645828684936231569739522607200308028372644149306431599085361996722603718517735348761218) EQL-OK: -191320070498733614136284309000213964486426347688040889144514933290125387693498098446328694172047943298442181705949005984031677324306763731212307716485454004382079159622650481983102917517993601466178931324415483972311904823997211920702201161092866663969163567426868740120661073974542958600768774774949607988 (* -5093597555679260616199210906198149266592665304134802327659606846977583233938836318559188141955851256260954289429418183711191354912372372976165948043123133 -2240632735861652612028397136046974907251405868353380459030143407902436514978447480884513019736738955326732458088791830752499716417751919868492224207936623) EQL-OK: 11412881426559848135724717164530530041659963797467536748076144863846600718211858527283843975968920120508569299672573958424908957105703597501013710262110218780710678312197455759181436286391257283676806548463507528765947919856827004176416634630489598937924092540289712219714362500246928243091408698274649199859 (* 6049789822056553589237940133475342650218069231558204589924996117723031491205673061674252841792149409384720347601549237626288416453061224734057079515141650 -826416247951451524584060567988229017033981218652490450160817307801130685352465013890931297548015267655971295627931896259998420078888499206031390299169584) EQL-OK: -4999644605638856588581238481465237523157457201817697008198975191261856978252081380810200468420738807464233192102972784271159116426108806200426852134469939032473362689081653859652824862066224063273799612269941254948709760659691148103622071316554194507524610166457990087959160807415102946877307193349131573600 (* -1175978338162966145239180473229656000174129248706173549637767835154921467129547950144109700900405904250603515318348888619371004435353505449762899046094747 8633693716102199391202401198009047492431980605560930404972542822133579985462906768067706391388213605203282586546130434156768523403030127356256666478340720) EQL-OK: -10153036788469908062299722391986722149392791936544969945546931764708792252481931153733789787389051773529081688846141949513463792442701686406966696738286561777611293604311491896230769507535896070984747493738525389837795316954065260075941524322954935690803870500012809797698319359975893462672845329776468197840 (* -5083395547684319640767882199938390155755986838939007846911062687871291096073452055061784159768637502151635665247461348347470360218957222873087414506633886 10813098236568616588240471432239693891825284805405416395976866126102880121934298269375465735278296789484402954117593716698067735458182402220278016922449294) EQL-OK: -54967255432446073625448401244836956268872685687128644401372608170106281377801209665004925733448944141633739594240156882328181133879414641109484442890809130544146420476457200729843868300396656004198615619691952536924980482714767859804902602805398865249514544806725162402291122143659939645240358379962457176484 (* -8944626200084865988157251013718979706166428261352840753194709093968177704853157211364231059892647813839391802007588961807572842923682104089512428902387812 3814836951264415657788614449012480613328314590744410079075164918748648723114236698412482309581077603776489883375576245233128800002373843611668945838558629) EQL-OK: -34122290543331565327874124324135450224668275222811493728051290368641401807963502623692504750924543845019291736982354932620821594287780848608647686402233097059022704206628297180782771812500512744911371653368388270442874670230118309469599458827222162362901084328510647514081302476000779049412605744638457029748 (* 5186176030253526423885531264483408352469356233262336223619904269047786350470477526433506158542551137478071074193659876898065998079440819597952826155782068 21428324964794197485898135923805540163916541943812058590308650649384013587098638034673796533027113673143959572855470411726978105342739938341516634354246514986124789451866589211982659199267654387148420461876524076040233779391563396552267276880650559148637067641021059664960876301072636635299261389450890094318429077561092553337025096293793433968243940381587994428364726938534453507046761494257538813861046058298873206568935790790373886840765817404479239485444563488020955730741209738203470138117422899051269778988135668626686262669881048094388220931264751830393793846372816717368806996496715219806062282836392457741918) EQL-OK: 111131065300898907482632501071313138589398597291097276435916516379173430095773463468344138866282820740991088290299992221985607057347883717514843661030457396422379155394966857856069231504805779448809986906434617741485942621643754096548512120178021034054648207248963478122178145159262707381679354401629366698488021743300737044695960363216253889163551918513521913593214414139637549577618641974388739304727218804595402055185824193445089425262833385286117064481648652550355832014346131722965510192584901901111154083186713580209077544982897821477349293279848852596241762198202012197892321827305803333334823616660229870976569043453639028059771892706354703750763908127611939169337399882784092285804830644630059487027413697220038110815990084742241055099963659761569486906596326424 (* -12615422028124847936088012564413126213419674293830655240645918456932358053670311316461359727921727680491520480380615359506308571290338231702217134487397730 21538722931308708400287621200994476771789912594554241036641406577761480056366647329031140922034590767810855360008375309986798226712928670905618807986829790199948665185268081173685941421700542631395958882077936923141152528333121096909688700106365468854487023847026564219531968849793109908193037522063952753477768381591929787242143631287330811801315216116212154423972654430356675401769729358415036943501470085182304183033246682446978634892995900678975109490698283226559860736462409705544079080978470202336645384768211440438501339641775269445439018148409151795830925198162301321965042997632479354427154223366199106583051) EQL-OK: -271720079725309675925162538296715595434811519956795637977932956405490708202732964133816538801099235844279338645471102896234318181092598033040518838847055114923365599862266767493227393553801736813141780001130539648588341196802606083178208108557367013886856183999712817955194261262279080641101769944037282423238147653270651419282545398168930625797556638625301898893565965773914460998322350526545278664715332414172614761548301364063397364632709194713561073496860524124460861314674679928692398440036071116570829193414179054372604203478369755566003622621281005164747628075596444178089558747835994702060740334079222508147598079351187013336751322569865313532407367116553748939535664259669808534100091049960040092785009707220249025633808590643620557093069849490009472441113874230 (* 10381022953674450046578890619826448644067144294659610359943634722044183130638243233110364436029778310048006743033299956844491228999113516347401915490861208 -20974871685432829994714153210121536409377362402944992609230062091789259307033495284524234519701670462495676590513192861649457148897274608767543942797542628100823017887236899471151903799837558453043431373811892813126194662218472834650841742305925226558315372771353677064933578639099452438843500601586038910108679737480263349221244638463171088589123712367802373159421798288708123925853179931628847579314900787361946716531755600236755527982132768286927549323465697241340003870259800347640599467922823203446834792229595507968354687630029075884034263531531423883902851487995214646322431057626558858528344843531280263328354) EQL-OK: -217740624416854507100100919338835880277259264187442792458843251425095703739537223785767883764746809214920580060316177442387941385712712426957388995082877226019966428812240179251716274377143798847348759498926420314709056615470455134468678662646006408843897699718742372199854223008996321568642038054564397441209859567556502098420151667437837356649730396360374136203172669776530655738388121236079327354422138744456395348910073462618440421257604563050031602590345028438897601523520973759458890228893913090702884911857207117714231568437403212806578764580006787626657709435954760239671948147344463295520930250155876010414461245194991189183956653772752290656063730950237649394743456230607077768595983629559996700837383822873994717987698780007691157576205450973669241823945091632 (* -3984492646329789478973994496812455855595578196959138558282015917391108383154917581748539892089090551298072688793487597623310815918942283997753800645644511 22199897116873160263914990610762123553075230334116099569358672964060004245706770678771431369917479502828754815568950371273785689812698287446020480951417047185190067265849637510591502642000414540862689426343523077229502494771352820057572619644085930901096534031496492870227890836816886496090287321502805172125273822231241073590840684742085641304915656543831190976008986490532066597410386596132766422026234488163435487889876791504407434387555507637783709991326338482319227500686541368087892665100076351075069628862376686619537655838590687615291898971286325099164241688147975845320979841704002364545072665891829427213069) EQL-OK: -88455326811459002089798581395024759975871889172872668466370443703433800509268320055453743803627754859670391415348970278548381190662701716228279482045339649051139909543850883613464992501666524385524517648069873862957915620016943364950043289963237718026629805297916194484838158010754666017024585366330526135823515744339445036315966714684052345462172808299142368905939297220895721123725415007532441824406115746741972351142687017849809593982432484296719999502992792447259391592152463664807498752410740679664044620898308783634092355737296495489953554685938970593890496829484673393665321572846542839714620847185428664388282452532264810310019327395691530430185946743995669191791841546685206884247468693248673484055915613115527492005264289557719000245333079386593840592027314259 (* -10672574004830373997900438516438419278676753890756925443116289034080220708922677740383425352837266631691319394850521121221541344600832530724104047804922665 -7307684417326792807224298894786988180161884427390942431653062127076829842696634441114228528164049031680536693195116703321494895319862805505304314401000204515985676763063862569446064343853536464020413910728442475032187317639476018710375702206456631041987826826225461927793241495220512935434301833094232834266749666697332380140380619185254354273073522191066457437931022783436360434167505326773192959291779779370530770935758482422581712556111319611455306383173529090289274267200543081481693078804068524057891845603351773722737987393428313340760607600482724483853560340630587029610437280601010173185018227638972500038072) EQL-OK: 77991802747865927212086621295493124451256238920588746597961055391511562690441964216934615500942858653797884925704270904527938466874924049039962754703188019915846345804228044693122758075602494985337649496117180241872910247079655077012999375809878184011356481981590430241786534827516536543734645410817621964035091467871491521760928486006653992134635010794346993161329777270345449763927429735191213854873362673179799811714902439637861750855639857969259787075469241319618538795721956528400353086156169058060112255274542232054021662809196965752800525093125763127895334967094763817500702626282397394521201385439419885607578137159972521677923972708827090645776826953976605193554447841693259586575931864396484621463004541561908426383260772786784541411548146173991869741515701880 (* 1420855003086789510813111205540636553863493314684153860389816109865085846062678305775289632805233481596171530412925552158799875183492757047174905459819169 13897739053062356545217161606361735964779941697726983959749295377836209520566715597422965426908191354971972501742952706730523748574796773473606175934144970768662226027157110240776527834790487577863781140089347362129598158760833470434895693782503529955845076709376071972727346128409008293671217324995682020009675316075606538241192607139905488719485728099428376369506685875348346231688684483781160648420909364963718027571565217314827671844485031440079254478598236877074793221578612249882886835580737423192061550370069895525711885220268707201966615936769696379335772521903910689934596134239331592980694745008817040569590) EQL-OK: 19746672065138309742065153069587996891492444461032276894328314121573439684229636534026409362850111716212254549198595854140809664451286626009917828620279583631575940837712663100442879662416765138504151063632823014639305658882804073655537352377258786105147057375069447099908107785635606190515362082317465738205179108333064680370909383338688734129396788764959056886328471374018961975554190739706996184818378586233017775166959010668462907838359485424792026496574369912033757997469014639705459505746723512361959074802456098328538419933637295482429555127226978561859965498424173552676019033370307387047798600024901453757451579262061785051932535359410827170361533603618131510421439128567361259204833501190218719779570258541358012741265599985490513564378203502703406698160470710 (* -25117824099635104147178796272946098711514362630774369209876335291088434247131228189812265510495277875692804180473811834186270331245779845635089547499275113671007257221593872123397418355506777725721168216892830217596134983713752526559153149600553468865338887605949011743043425900799896245185282419637806859906582214420191794114207677635194054239563071023206500505880052007267243210206807805387341085613436600843317096291021780624738422589234020279836961194869688005260369009833026575446099544900581955685627511787510900479881434909308757027825050977932238481841909425598834367032841935054158448815026264505726593064239 7846111496222858966) EQL-OK: -197077248428250572361351389692146917243277049539013604789802566767174747369897711991559940484392921619974209620152008632450612546796556905740493507885376190913893140368029841033442857949219716681475253727058707723386016055991276120001690579154370788782636181079931076758384034193266737114305362492836167078199155929937891579224024229182935372106924021709421948701131654358516297806197381566809357458374057189773041520552821330635689748583803171230633654728360451100477472934847975252390985102859262992904778849652221553818627134153578436315973777720706502751232660284910468721430874674021521629540714057383398858244828214000543075116874 (* -12000343217458212092754251360179138661969968218789048702097501439124892987400633614429800307263114371624489988815324366411323242909652002510513570900627875514001409309670202055060404640758548257776155562167062337394219073071639153822126554525439988062676648294108951003012550815746564810508912122306190725453386412796036693387315128514162061147675205485143205925649214342646148112549805850530430229663418469577245456944558387628002442451042105749848177325651852669794048215063957689756465788955050513359977166122710392613631703123491357791351447110169966270916789849428298930624807758982400706608788793481972190953569 15463017349709835150) EQL-OK: -185561515374029078700596518575548896805308728003103939537818954646551372890610870275966055765608887701776880889777402229764948269089126750201922167386201171243298907675542965323275634529293654817279957832652909009385491998537031060285890512199675273422070784691446251899120095880199298512230290860589352290462643231396804350623684034400741386070220057232978556614620855818271117742675632435727751812101639747357642295230273344552327870600519422276996860893842363996198017494117619585153346745838853026029459826407782259598477529242420507010652705302341725948095720110508044256096963772599572721279996322424269691990173052929936294150350 (* 20244597897909303129995907707212050478823487084391413473821544089492035634291726811145005824559631386634261268723753786161463497881725871168747275110149007801865428978596190887145324535224079986377522166727137028753272158887188902047835658826867304220850429481233026043496635847568448251753504834367809877190895369288045026559783632709799678639927825194847005181499299410953860627694080906167346078299421796974815616608326704894611151743720515377248152215241639534004099341398238713597030368980166731393247619511322804984829747216779359780372801101821087516269912916462719248736442644433057333788741151270815989388229 17931151643499274580) EQL-OK: 363008954869078360197158713265773114114991766614027768774402465306840646219477262855625957403406166192075865834283840624408916170935610374573318606346031792128003204902147985329385955814330782527184421959263266167048755628089412213360508944817963403092490479480264538027768728303095523018598016863928762335410109567604756183580676503045557867957273324581082608248341332512325136675167966306268035077761004923732568405295901819511346235524577361289712297365403327125212199451099538443576479787130510546755789504852631291774614010584650672707483555436445926222945298928326313943231688436271883746272589347954697213098866117569339490918820 (* 18134862906191691435095953372467318196853760384894170022863300447691250350836421337333332682828557871096554531436829166444150586004379181099133295174348038948038399079336722004125999533719492457544642570217406286811480006881054375314838605871238868968956868878182133492469763282800195060849734382249696543089869191257451321764806079423169235271658993054867624410589213892458246001270123109841429271429275464249821855221014782727398959126117031823977229309775211695677345378510417534328974531801634095862859684508240122911023047425473036305928743193594967362216559973174709883576295373749738633873828863608550295977368 15082354452174510460) EQL-OK: 273516430292774638949326170314933525797985748367549139070674899956657807928629067317576809269188258819686207094298714770978509118959142516619521080722291318367607601498107007447014759288176261262818034997399866363248136237609824401265450913244758024085739876914482935655100890803279961929047974391299795570244708811454483314898873277493486428279875241232025231140855860469097028388778917980779775554139507550577255217032521719099071084956515691364008526064349956553916033914728254580848198941020806723485184338914882588931083516851849558411503129184026079582257756707601984686901646494090820169212279581209612798749779318126482639269280 (* 19213874382308276075905228027166553836726993832150876980655958901416537033385379180983129528081628446454583401834309285184752924794893846406622935494758142810049493348116192315865522516744262115026742103678965417868790607689989205765793528434388393584537260717130892518011447327847533083474230074174308157934463971640826422302901570010591182715932658037868980053012095115562188975692530473556182305847290196895478280679341869546292639446526021874910117953225154204035612531584978136604161393474554294315903436682283787080297348697922389355209790646124024053098888687638640826064745026930980189268652291562437512941810 3155416591710364359) EQL-OK: 60627778016974262766014671335614995348970065077989108071534610098195400001445248886220725085881796599270026085183075312353388418711598523030563716616967792282609748819081238929738105086199457414615236966895805539596649555457494710621217412773036416007129418290246899690911654008867819945724649185574237527152410775686803449108977881160831441280833577932476667657759420192656716352190871667386955409426879693856001112340390304980532208752863058384169885129364117656404549585836664647784765508649117301622797243353610345828189312360124462238989888436478381583689386509617357901461416012201469794664889076397809504626996523928173064949790 (* -6561903839860415551587224953276060627466820222543175464705113686962550773423611522044145975606965294164125376820288981286542044306677764776675868357117109664125730405280822770267329297542599719353907954399688197248115043785617436343303277493146049939491224480136371029084354063731401026459653680017632996944506546122253686805764620116169065663214526857151412139439538335533979733329962892417175374550305659302592107472151941922230309227785266745974334776462642676959433923828440435340579340133192678341787895007461237846313005612116885419002449356480017828933592324336731295317076205553526568668826499450826560670163 14908715577157091280) EQL-OK: -97829557993133908713082095435440645457469053259814412551982534425389603663024461131358343104414088618618030154957456050473312402460589893359522167472060177968099538846750606564761307960896264958539903740023783283814849937681270591589750181462708056758506230073751440847913386576449367635057595344744119561166438538811561109125506233466453974371464999669336530949393433719456191822836826214814780222021267726528396849558417851727452246676857867278196266042327956933753121947589485377148388716839519782819642328655117625818256334190717182923260613562191698788004591479576661108985313450029332968584240383859113741485244318702724563478640 (* -10378013547095983701124686671659666242518351347561698092030999302329372512356819420877395264401390796163955327080881297568412490286247154759694714275858127906305200295043241717769593877683535229411640745872559018085757273530771413156968541499388413497221629366848027355125816131586610997516488552323667400115617175682996681969687885201321292153656071894385242141321468096793766926179134511319941715949712230831768643024119693594235207988046511542691719002262040067921088838755337917414526554050602539873232518619281766327369577617796816586064895744680567067970817494102948032924671421242699225194947982378019119315136 30004910492448871409155105619400474385) EQL-OK: -311391367570036811050052853596227388481520279736812036769684195465110674594690412517879149770622679377262288447706750813509857551308594851067359841826754786725926298013483569424123912020079066150719085450400229896983461212531213110847425940968466564079253939695853896434719530729030897976597410468081535234663568150722646854183317007227669132983719314653861536414057481478039579810285535699518386214012059191958557306338432321511585867535008319640705419431310336566447165302011113284064246284641707577414470505948868362067233709611758700034131461348997580441628136979257037186480770286846026250437141175360847735150981343952303257191661069675154710791360 (* 6311357747888359229575837883366949670125882865462293491587368290797766017168248637163030339387377997726585769250585768079027576213724941259801478313127113803503561717311996500019522893295813684259416551410025111443510215766297835872165689077882298506134885487991732718254835036694083204758447948541157893533099634169589161496492972953698758234452126564385255035294546278732684663873459439615228706684138982066055370429797835904846166362278557095045056472775166294675997320598469599722704075215700819354957397052721573993997624711445698656580401684113096559767093466880001548887739825916626416328760047783071058963451 -212654096583990292869707082365869207538) EQL-OK: -1342136080095566600483524091094048745061145155430997807005186206704767933140306297188996797343723817220160636373424666345108189275851749622201429179882167381735732553825696482751584102093819432866729465599060815670807282181979889263381844726842751894916887860819210652174987999919869623292751389157233409465756974677789790982740267208982768450215563288024088369480574425410032306456026930809228182100949940216614156925537929648841127727165386031716586596638254705402653861723407930666152691102484352058909219619985877341630210918347460471644327858114815713557305185589162775699323253049631349906791700893878999711846225062306568467992135934882289075693638 (* 25104391676237653962996674810232896003857294806799086059884413856421530328279649263948893056601611073815235439115612155497964541323584159786678357898152394779494741995735881624055133443980324145256438160990490767324719276757840825641421547232460969806196141938571103617707677351907526127993230143577974386169402623023560579220343920203666762052525898442578990183400559087522259053245822827313206196194989095468393682721753147596892214609346047051670610252732846805143964713621673722554204896154742594858056891979146566683467510164875593192581407047920719605560716270697985110227952698114701527191421628561835164291236 -205991315859231724218751687295926841150) EQL-OK: -5171286675233738337789203670843122752625713948587464573381323151628930998435518250812603433784823922283042037694290795352461861058217142213862777203850665369756106838860420507328654214723398688455622487003912073924323587826356928211672752672052670663842775836967587150049181838707784871641183683742967716787111671792311389517753578360293551031540853470719098360013225516593755039537796518619542838794169319227197212817921098393499332268929332950035803734983497370378852859829228973012039890600437082235032378948656232679080766068869430262740600476498399803176452431728914806536862849281928869092524387549297345184969051926149006293586531930828748109161400 (* -25971587288596053786734900662696128734726180676323130693160397208008930123341700520454723462226657743365779183466120836187720332442041321870351823609046027805781414454998487673927365486893294110931852680018706479684281928396163669935417207859889405108139261480861908067489849403284000981453574189898304616775302917687860062501465417706095450121596418236563421425311420755550335597318818628123183624214438801254105808079227429950505879366254661664881055965092586612702279548151277733307180663770432418397550642136953750720624507617115504303570076531620003848642167562950736271141440609700821621532583527124386811144839 -182748557863603655835821910989658558236) EQL-OK: 4746270122419629115710902425435990509747636609113505336611751359043717100752575149404352359855260443259846554733621122684788488984010741203981300775978945529551335641218319619542248418128319220383298229263331638090009313676486209764655429828385994626323209879925281409485074778611946493692237774852428345451174837474328995186242262565013937544898941834362941815633750896882758939509605799422068815435202904271722442099465950700886702949580264958171808372530471918175963644209760378395316412115175988232945569517230829200985652504383431054550902852797293952515652017940918628980037316292352828228005975466732028971159947131994753006597870175664981312344004 (* 2117427896392849163304163145095251890404997781812823978967013619233450901604407363671467658244435728579079751353560538034596183240362499870272373308111405924505741579887345118857908796509418246599428633956038017783178050402412769812823236255234302205027282366926174916871858199918908361186936687654278623156607813451034087735179167324944824913226799346886951212979149617678949292799645035425029596869092844906629996914674904522806258932192931217652241231736891642224851547474205131131019084734780208254203537633402057673465583362982905095029133132240839391503135932501785844503813910210348239157828902668852795945482 -296778668392678698960782643314222141731) EQL-OK: -628407431508980610909134894336322264939705333430111861505965183839156278363647883745193463537783397824947515214540990712455315080515980803996660089847066076833542492719707493333185909990202372284811233272987993068106356248349054482194817336258302692039392400931536481136340269417905505366385505196886218794044229758585631131853635721528813397816307666671727692971421531381290925317161326036075629905443938124481334173158440927555118173661486114828362551889594188958723424604273078091320087897088472418346754088900034854230711982602435635574895960156993014703292551046970069204857846207328434544990709459402656908170089318995291341536347275682867153109342 (* 24743327715258194976385899813930363006464428087412805068703455203318769863096919192538751530954777047772548306936907016751357570434930538612382851621309732767199276228580401695793317612267605312672263736938703887622824117576912830029817460033437752668221355377879837833796222831371174014543622739933433581963103361464022058091243110136610854806189138108937004805781857031030005354158991203388998364340053773883952742645161560754545458260688560269655272249435540890073696261770299845722705104648358053080678920468895189601731801025555650490534399590288852165862135571140382055044665678298182909026026068995867606241201 309156501491030456401354118244509785044) EQL-OK: 7649560631695275371386748526795333430293346807872366006552933839286343590101586516802834568317627508914888989005968805867728947519409222814667350103434422356009252082456906520988877859152125402282765775845766265340707473525444185795403554160270722809642681642831847296672303556012796775586274347178092325226458743113317655523655255626670958156216225968018208281266858684283741496986683426354716284780229004376492833583965647875097951642088252875535823145900129967026856898970545720526282798418382467634180690243423325770596949644122541224189780082061715230852249880601371985342796525016176048518593825361248232406051886794538203297084423942036889326397844 (* 31345149697924857384985323414506591310628538098830133854928154990821019223495435414394178930529373634315044777562902565397455028894455733092896622048288278424884040917250546068175763309233883078972879622697667174865833277342334219810618450605650614585133187005110148963483824629405555603493157452295284935004578187488673124814714326405406894084902824045787647963172437833905574178160343833139650913077173865287057167288286708807322607983179910358234015596109655900840652230258122852488289951986129788952718105898226951651151495867246384586164892018870981480003722043190639707903266193064807571586900961788679579912089 2067227180806746570739122295766566373146995767544546241400900414826379465803168632854028593293108913670556431832056563218709444199286888840721753894461468) EQL-OK: 64797545442006646811970698282511426059102976298051534827345388707272469591333019870381858263624490336448197115781363489554169207652559213486772008013638214870324260793199674746523791257170452738018910619029072942848422098770309928561867618844814267276213608306045020686764830302020953883994906997293368193331696747777630621086600981981357507299729947717565760536305785574555255589190221698706036770081438750974356437738060098906046001271392354762036427049946092656701257615490057677558059955825843182799904828201890893555678855718728417223845757559310912618029462136640226686626513375024547351747669476392735304999046232068947570708757930233036922714350584650744960478326257916948676866148362166017752159953504981324652709881831381637989229842766220141292801807437886652 (* 1965759082776833678304908699214846485256126608825750175641683294458978302204367346739996602241053060915897480812220051082619942907491598551933638540412113496542245474287364500698693202553692963910123752514310355402167440783023542848697962967771951714434359320001430281377747193083851165947498546085410216620013287853719686698746328198021011905482303248172483782066908570502837009924228011993318265674390462360820566174204659723461994730913995303015012684826295802887547970851558451858623353950391701673651959262042520584275132971807158231859672678070714276061110616753309305801080136339206017351200193800253572481467 -11092241138073130060021642325471345789108575712118027611362686690749327689527135459714040658411176246054106270789083336195599640521602432629024562630323934) EQL-OK: -21804673765518097879589124792137157558586438669762099454880024920520894260754279593873244443852337739758694535682558790532827482894104906218015712179591886600693703465749571299271429989154199263793230178266758966678432691901731270899259065726530463438316383699558373053423999416350780342222940065486831353604365192968606300436304827279383661172824549131179471364227618431414928702407510473319879188990689163932586727702195573766225861364297410904859137393184592815970592502081722125458353280743087607273547490382023433724488604177909671497082747464946083901888849483505451426245881736990810339421864101129619181017696837017966116165703320918568645290788634265522956017905246042460811062666193790657969385648522736090098231379029903772234867701846824572274796526421531178 (* -4067457132547237558852016696244696525033953641638067592741078194074861352472861925779476293767777560910963786727886946479865734639031042985368829200802420611189793957001730656623744670821921724417176679009632346904384261431052972127975733031277489967119978909321422086102208644766894305071609385305464547231057263658903212521469801833214062476735046735467944834107695748433481665714184831786462886261252526036621257865158497049125410241033365487816324425563483999957660557670189397770488996359512245971368638615503320507431381893539767352426795415898379765583574977542068222040889423739693921998717145084904555464058 9635268828818063607505341812331931088336041632536136269505180222913464638532245578488168867093853062326136774925531196873279749483997619950077042084971972) EQL-OK: -39191042921786100943542578352486285322085069425292685238158202937549417928185097567102615300826629615520476316505465412722375794150552330462353356124896483739321653441446703127728441315609093330694305784991844511900128172079464896650958648496336601612657347012294121239821167759496102233234525084695798195547141521849769350204659392602605928907953707277320590923278178152903602506284861018886300148663530071056792375593665422754923886137410482547324901798328311927545105456397213670390651819229021443747424183114992653572959318104053511452473611466305149349027962240989590453237778130260105665310067480846969449221473610614214933278048389171979184119355459010233147440293881252851501522689209874112819966647846701257081192324007280573826673895648273593609466000383382376 (* -22047771987573494284336211037167956208924595972749016352929724093971147687332865088249749580556015503923927321586913446367676445848750229391300778587369581738560634537089081840938984779012854694220894920437076215176060179241185151442003472788530160589267677502568156006531439509890061829154786579353177129190813899423306499631144919702707240832059008168851983259611724134448165201725432622521420667808597545410136493805873769372831833878868603946583848422310946469083400330960925084024624317866822897278934924368888332618046649078771617892961267312226309927786691384460940015979582201446635756024251269978545916298961 7481502540911026808093162425787184755732317118387068406204973030847892995155568099553397887864257088525242568880427634318737874025160499293315047534753494) EQL-OK: -164950462146458057264341765173378248123415893870534274075422323606836246718538063890359159423074703472625232511667875897808555123518162244263016096627959208397334135559180524195701526029092734741010866589515172934676451385008535538102832400604699294088534999994990970130226363762230944961249818769566697211068918154629209895730969522747736738946126971914549491889482944152891334838234907190697109929512401661529882587076352559260375439428815896053844621297552401396168240947357044985051323834074355418902009161796886350497072010833513601114819625605048943438304411954380599728561071485061414856047768286383287807924135081902458690495890129203192613070824670256334683011083767124852354110322463725619194174195587835939047474059288568764831570274891727391545546467943319734 (* 22607201423790553279447786193696575272983924506336369475058795405894123712509544256099524616893423762658394830755129501447553593365768543361107397299007141714383407862976654294384881771985218996697067215804348472693636567074361380875512341556932579903687576929186215185312685712277482751425466251201421842248749944123326048360909954588266368306843116245625635467041934524547983478110533044085242847795585598341867070787331785945399446665919396062565614516404861115244243161694059679274045050270546536781907061002623188435269769778378780371158624481539046590932125320888745103158180784231722265376331553893647061533815 10075764395489719205294189472045365742345400155046712954334138069917417587273618147303160957788995022989479371576840422540097479703418600112174202202728054) EQL-OK: 227784835187493343385594867881830022845566753253174983274076326016001091958812135049265213053390506720261776960833046225700903422206015373488419693650378821159134369608830936915027161415300759990632038898164509761337714774392506802504397626551196717184785586630245704512525844329038355790338277254618639554796026366029578805283659986085947726260520495140332204643887370987929304924491772630534558682402396784510750317396488402942581973350428066695976988812610467654886227733900635715495731445319565054848075104982244316563526232071957624002266648721592744376122065531440026836549316222728280595228806728872537793522244957258060730038589170810090676474272044568671474692128168357087077816573419470273384256552275636517940058764711467508281344270125535855785388198570146010 (* 21997874907846585575969651776904015812729615626636027149446399573806943459105370044846476738175828244018281160136531735881270437472624605280356112191272531838028896521621800558410217146758345955334174583639352151367532676985598470747138461153212653362188252002768647808852054182649808145379073620834551216386805267446360709820441771932135218282126427988826945094538034579367527908530151926679515746133600376612899354099328788736038811470295396365432559354070365548930628714861826464935305416998192532029724853617023971964507955475554955277722555849603716733374588174421463022213135839490633927005539569058361144905451 -1400498192750070094581812894241996480373581610489471746158083224360249880335094841398529960182484181641387946900090289855375996313447832474435929084180606) EQL-OK: -30807984052781257825246153008277875918087659020905755686964119182052911551148620538090633516362197112383237624321406969368641524681503231262834662890145617622830207559490089313283375890353617292096501953380469351747504928597461154633889236826060654886877907382241867167198409355653371944304660938495445848950444683274236538890057643038410268234731745456035923559528706349316582901179686671568504971088561096469997823300883298811440849031903066114422309644669680078733839046643542078157684064686933779591609758494599988463628362190034612412739669041368897594110022347872452261447359402810277413572637740870748949093642723240662839444216981630862346445890780016393330114883270596630385367407921496982236074288475142085411632630374714528706189796772213264952893973677883306 (* -270155241925436273159477510619232592261228150696806729750247050 15545126743930076938536195287546926534964892301082800206802745964245668351235397 72127079799316080210744562119267314209211162112457416152560774669179705347659265 58427280233475514109627698916382980237252687770812483048907352594138577656301900 91336330475502063985843547526216808965829995610054777216888670176112782119332811 99495081134815818196404370468895496198561677002653930126818668800341380375657337 6904264296552316628911621065724553059847235903647375662685025031963599691416829398469283631386160328944460790101458427909545198569619131058877708293713734 -16074984786353617526516141164566295497596312655026144270863093715961484079732496604871734572736757225277596743795506589617891195569235287256031608792067121393492186703333733526879481948463529609113624075923052999494363547340563039654910799974388353472433635130983731604982117092991918514078659590068643956240711810902756784590442416249652077644077280371860780741318193975770906075446772544431670392964384669681404295839302410058434872964315897505894833409101781069230919347279857855594782111721176074849502391457684148683668165019969667481755384384017844104770253558111588611189351637275389688093074751942960310850074) EQL-OK: 17849860827147993486644896214424106325295064110723402251474432199595968349198253682890653243676378684005650871261983711134190416277366473221365848417375107498764965893729640224952922241531788638514200018520970345581414705756736222535562338748426356003659523260330725662384208724142177900990027225665451069059291754155591197426279006090296512196415617974140965334686090032257444820748820516976632201388937358434205022475303705442914044454220818215336283948743042841946229853366515552653568436171217572212088935263340599371830215580988184775240338748954666846379831467518505260487989636951404886967842600777836444030434816421999334066711024026401362115623932221335906548647785232855815515579448393689650116225664467056283988125816950714780486880294535933597118808163054631168063568847830481653855357008353733414826165759079092633441356914450038756281940532159493763482047244493174370100586359619040444818634156576789665732998111907245928253704097384811414269835758656988678207624731164159069547745777423464124959379113843649940896359346515513936964849811155238140671698227057228045173997904545787593258286212427476788605370334985423461194148838623911634821153061693257996982252745844329344589168264774527631972524787804330730506700000 (* 6411564443509812216548163965666668398784964137255201222920640150 65325385402074288043601436729391841747319174569548241717675134253657593233436152 63305037198546989906433329294566491017476837189978173607681765241525113921707860 72383582945810879300930057856704905379805338886592055772943486702915907397618845 35525980101796892634292856352740658817031405780112750352735419884048051630180860 47579150292602967366908574298176357632207539947399443701205872093150879604391127 7775494633965874654516687741429737470333189902121089184439228657893110997221737422210698789286625633365548095171257583020272703565350668755439139356570 -7847653632223099338936161226557020783515367997970448568586056286591257384101422312757649765574456754668588904917800060981155642916520580540801153603733496143328839018174649200566737789874193483124577734129346933208306772618814806884416239295732454033604210880463262467564639515484363761639994642888910703066277724414372379965872478153546766131136324967950786993982228851928269842355632200589446224738709869729930285189047112131897218464505263042012855229737941639093204086147932759923796947642895167078971517834730472596647456786099215405165290569214043431009370032818978995463168133051136053246705694337584724712230) EQL-OK: -197949741939898550383903354028842356745461597695099989904494711851411610441324234089773644533872304737431480244289438922163630848266242200711131210228027234579469457105291847132071566876246332653149194709623963836885480655282595345693084881617726426841183231475364991154699746506928116505297453355016975688761948609740314324443406930215518937775475617384099331839748494157863510168743547396262979908353122625808170296763676837551973930928848463398657587603606321137626467028732193151671337338929938959296176472483674270114824853018199281637976410726195357458134038379491704909997939715446657856320452698914513791221947734373322868574099599391493563479057703049036936132407025278683219316357543078875410080612067641232277376174351958080693019953378024732243763129075732499165068171168470237875348580987967740148512425201518758344757030205911031119619416763996490581551977913711646761182756531618786226541010835120092904291975494846126923510483263978074437667987560077422810120462938292680423746968095994108344184522240467647491991837793653579480334442342102339933473270535800619630342940590477752278184994533764839125736268376640933720554199782388890444619996919031351334561766248781813883867406045414518951152508504891407920000000 (* 1669833986019218156514274418186396165434871163342486930502417566 58528969848472951398118375496887849181512821636583415470809040929690124231959506 50098163184827557635697120379841225459445103589988345336880332217224622666020381 90445522698871905833766573423181067004916996574451008349087758531794463581708977 92366726802191504770638415639612204654473958526592425718659284841373421985393966 69096133232785816552402133765198624674167660496399099321713067612475604030259084 323971624832697152056406152359288553860210436839331005469891386690556929684663075996719803995137130737141925308417709520389528780839777347463558171582753 2635514624483961079560488004237441873979133312246005082134175818331132377114926863102436691793380965631848192666106793612266994709357524826644421074908075389316030912936338175907209987972553710900613011802455058538786723149316934049388525865455871552882282353445228425640452635081303490379594663330152071465360003249884180020993032086861074931796165970076448856988084523672973069824258299029863033098237556417571526135639288006133579174344589248428714474318969988990720790226604664141927030250855550010512291136517209169959021730625428868037074528890516086527430801590050720467893089085308995719513895962750896813152) EQL-OK: 2413207990093478676325592386500172980330574558867366638913149256222218924700401110600319869300256745035993991818342784487193857053589994816247466074246569162659879368383295411190237107255160498774228460295857931362161062884154872938368166514128474751716517750517217000290486110198899480877593169193610813452614906598055909439037075588626529658637140089909227353944313408987644743661503976835580507054926908821206921014266535160031749397432350114673787218438589065861056449106115395189057409933330355574558853874223262465965933679584884152813357065227868165556818717270584803360466149860292769520737249610469675917864449261901859162854558012721179400237645357401213337423255109839806528503425658270050436129019270883446965562683284298538825840361267548675967778385927410390726055957928634152514415917053614892441910675109517307682075989998558764742821214685548219206933043196677521610851950501225469125512893859254575460130829051324112015464552874242522140166275233893076603452098841950130740353331198999756316969161591691095397245996664755249875720008141774247384884623389430842799829690618405724986702942913150258769060684255363816662231923570491001519802836627028431389746450987110456127797025006251203111629141890634728548553728 (MULTIPLE-VALUE-LIST (FLOOR 7853255233330224291 -3336928547114505419)) EQUAL-OK: (-3 -2157530408013291966) (MULTIPLE-VALUE-LIST (FLOOR 14068934522023857270 16292006600125740074)) EQUAL-OK: (0 14068934522023857270) (MULTIPLE-VALUE-LIST (FLOOR 10985143198741137410 2820546847025452162)) EQUAL-OK: (3 2523502657664780924) (MULTIPLE-VALUE-LIST (FLOOR -8108344024060626734 17657489924906565585)) EQUAL-OK: (-1 9549145900845938851) (MULTIPLE-VALUE-LIST (FLOOR 9793321542618752251 18086526939764980195)) EQUAL-OK: (0 9793321542618752251) (MULTIPLE-VALUE-LIST (FLOOR -17146297557940039430 12031974228591547856)) EQUAL-OK: (-2 6917650899243056282) (MULTIPLE-VALUE-LIST (FLOOR -11002425733929018635 317353195315898710776749437474283191162)) EQUAL-OK: (-1 317353195315898710765747011740354172527) (MULTIPLE-VALUE-LIST (FLOOR -7045772845268193739 -89864936462331315327547597221973588375)) EQUAL-OK: (0 -7045772845268193739) (MULTIPLE-VALUE-LIST (FLOOR -3519209948682231610 336646025916394184314065151550367317320)) EQUAL-OK: (-1 336646025916394184310545941601685085710) (MULTIPLE-VALUE-LIST (FLOOR -14043580588957562420 -222396907959379818229719625081455476397)) EQUAL-OK: (0 -14043580588957562420) (MULTIPLE-VALUE-LIST (FLOOR -9551193686327136711 75278849342865310446781730521816023755)) EQUAL-OK: (-1 75278849342865310437230536835488887044) (MULTIPLE-VALUE-LIST (FLOOR -5159693807678286583 -271047212583781769863421872046042817014)) EQUAL-OK: (0 -5159693807678286583) (MULTIPLE-VALUE-LIST (FLOOR -468628810409465000 4096333242794181573565417750313678008664626221486481835906739336082806890901464399325558358976385254948318232837795406709018062193288308568894691407903633)) EQUAL-OK: (-1 4096333242794181573565417750313678008664626221486481835906739336082806890901464399325558358976385254948318232837795406709018062193288308100265880998438633) (MULTIPLE-VALUE-LIST (FLOOR -5244261521146873643 4921965954460062114436531997676458648483262898583452823054595308486273272424691697564822554202559195140246785942292198280651275061385828405859241079703409)) EQUAL-OK: (-1 4921965954460062114436531997676458648483262898583452823054595308486273272424691697564822554202559195140246785942292198280651275061385823161597719932829766) (MULTIPLE-VALUE-LIST (FLOOR -7155077620310044967 8812163272024170253854686552273644496512722723120222844613502711675792665532423218585794856067792762737333036865054171911349107383532358686613366666267909)) EQUAL-OK: (-1 8812163272024170253854686552273644496512722723120222844613502711675792665532423218585794856067792762737333036865054171911349107383532351531535746356222942) (MULTIPLE-VALUE-LIST (FLOOR -6816314458740361202 12075686527410596248188273566406493470578404199548730085391183041200273406509336777783445118538744079686672261898288597639090345296674064493442338947240247)) EQUAL-OK: (-1 12075686527410596248188273566406493470578404199548730085391183041200273406509336777783445118538744079686672261898288597639090345296674057677127880206879045) (MULTIPLE-VALUE-LIST (FLOOR -1890766085089344496 -7408951123352997019624764400646833541081866912262454311449242781355699966135127365870537542305320515188627454777019144990896651509964466134772403923321917)) EQUAL-OK: (0 -1890766085089344496) (MULTIPLE-VALUE-LIST (FLOOR -17760474272160473768 10671898954663586353020741847122236830297651230263271051052178674502913972809415507874936117140992859978582852208528956402833042707438860216609301338079639)) EQUAL-OK: (-1 10671898954663586353020741847122236830297651230263271051052178674502913972809415507874936117140992859978582852208528956402833042707438842456135029177605871) (MULTIPLE-VALUE-LIST (FLOOR 17203040353218460773 -2087162439393804055245476778327445230668947133920484097696589818636894139336038424853265430700117127209095408439503149361955520500062568298413951113007815520417010757436097548975086796164496676384718866185751276003374984886645837833063272909444571294955778352876647505220277070946109654595325494251711661808952794932834009121950804034627054856954463330684354292113876259596011570415522831755074832239680022834732540878425796300024337145992774113324576942861121693541507092307262607720008434123040550199401165667835993232451530119579950363100932584067714571588474895040209606410481479858029354372704983248137195749442)) EQUAL-OK: (-1 -2087162439393804055245476778327445230668947133920484097696589818636894139336038424853265430700117127209095408439503149361955520500062568298413951113007815520417010757436097548975086796164496676384718866185751276003374984886645837833063272909444571294955778352876647505220277070946109654595325494251711661808952794932834009121950804034627054856954463330684354292113876259596011570415522831755074832239680022834732540878425796300024337145992774113324576942861121693541507092307262607720008434123040550199401165667835993232451530119579950363100932584067714571588474895040209606410481479858029354372687780207783977288669) (MULTIPLE-VALUE-LIST (FLOOR -669078238914427842 -2079683283534812796000190145696654156804430677578086735229530182730363039425073862859919937645919418081821481495275802097707156965850792454067873053943961704938117974314269568411834037549827330778321735965757574814268024643310969429104824266062514450939201453648232801402417276979456869834703061150723202264463831469016146310260625377771326468627250569024458585844135123967133684658903385261562998370487428947011971199332502829621504477139578507890165895257527873153869666215808793006714467381179632834850697420959155528830942491523671012905291756947015477293335637719271764878661266856465788562934083754663149622043)) EQUAL-OK: (0 -669078238914427842) (MULTIPLE-VALUE-LIST (FLOOR 7327608361251253460 -11696871058150243071087622230096689496181624466205249401376348902965608647385664229774648233384515557654898456058685820740766304363182039373157014626506361274439760335671626498691756724181737933201816787306863365879304649516313681157144055793349950077334014446025781487249267998958541998722387302987853596488202173446477234627919885268339967510098356435511938337505060706688248914394292741973765745281640737883810857064447143652281758869836897346742791897670275478332406904414773228555812810686551346417028168391700814494167715137071887755902595471083839770070956620494992791342919563605887139693691074220696797086954)) EQUAL-OK: (-1 -11696871058150243071087622230096689496181624466205249401376348902965608647385664229774648233384515557654898456058685820740766304363182039373157014626506361274439760335671626498691756724181737933201816787306863365879304649516313681157144055793349950077334014446025781487249267998958541998722387302987853596488202173446477234627919885268339967510098356435511938337505060706688248914394292741973765745281640737883810857064447143652281758869836897346742791897670275478332406904414773228555812810686551346417028168391700814494167715137071887755902595471083839770070956620494992791342919563605887139693683746612335545833494) (MULTIPLE-VALUE-LIST (FLOOR 294675307927425004 -9548883545732446060252072829565833006884749934819836721462955213854827688043000170303649263042149519854567992890424662453846646328000352698376041008580371118805742958892669824820331301849741711055204656684075622499980143446475914450482604391515448002257899292716976191315018524528823574850034894770209999447615978958086058881855069519056370913875205852377738400734853568252684386414540818555760214483168738870291995504569592275824832746669965860852593991220739290892286776371571179317949624919667076576237866033103387061005489130212740740367035039239029315995502459013799346342754507246725497131746887762156527202924)) EQUAL-OK: (-1 -9548883545732446060252072829565833006884749934819836721462955213854827688043000170303649263042149519854567992890424662453846646328000352698376041008580371118805742958892669824820331301849741711055204656684075622499980143446475914450482604391515448002257899292716976191315018524528823574850034894770209999447615978958086058881855069519056370913875205852377738400734853568252684386414540818555760214483168738870291995504569592275824832746669965860852593991220739290892286776371571179317949624919667076576237866033103387061005489130212740740367035039239029315995502459013799346342754507246725497131746593086848599777920) (MULTIPLE-VALUE-LIST (FLOOR 14347605674351973575 16781108313723465798753322947549009969874803839178924211234447140560213638432451682705091051257464849827979202356053729300113370530117630421654608371240669238603643549128642643200948947465613904905607632005913664436128507306181734648889038561843797684348733053132088104433891457988693229945931772136047702319895617567109469705064237812979865949533824478284021673220084274688077361876364538071423609125747407610677136416454538389383594373243559248761308999294417964846813960148782443892858983199711111035244418968070018974928177662516580063782128203214203321005133744081558995859628472663680467632605080081460859254457)) EQUAL-OK: (0 14347605674351973575) (MULTIPLE-VALUE-LIST (FLOOR -13687180458303546035 -19965807258690898827399047857329749541944041888361526571512375013574840494217451526698619297248029675659091093507275385543103914023886879938416253663550378748995953654394575052030527774451712268159052917447058332864628753215292671454945836228787137495936035900814206996568155366945096185932229795907560606361081170245972586794828085080152240904698184990372898689089164281206741448028676272453255619644103230837682506759429084083781590844603079867247577101977877828608823440256009103689824572652465343135798570848914557962085239341382269526989381779235955669274286569338275810475113610787290242075588029043316765795281)) EQUAL-OK: (0 -13687180458303546035) (MULTIPLE-VALUE-LIST (FLOOR -18925243707105550517292233464727657082 9190307209239173280)) EQUAL-OK: (-2059261271274988371 2728041824926269798) (MULTIPLE-VALUE-LIST (FLOOR -2268729715267556753620172461333386061 2091801429708129323)) EQUAL-OK: (-1084581778674907194 1902605633041663601) (MULTIPLE-VALUE-LIST (FLOOR 240105871177433673480858499581307555362 -18137436669813972164)) EQUAL-OK: (-13238136984210147236 -7622864679137983342) (MULTIPLE-VALUE-LIST (FLOOR -262280851402380072992262860428676408462 -16900353177245877861)) EQUAL-OK: (15519252683754978805 -1413263307002672357) (MULTIPLE-VALUE-LIST (FLOOR 232088877459084367318095567773397104766 6879279671528853911)) EQUAL-OK: (33737380734733937751 5401711328350210605) (MULTIPLE-VALUE-LIST (FLOOR 28127709642032836544705999676759725409 10932535648386303235)) EQUAL-OK: (2572844081801336427 10537089091686284064) (MULTIPLE-VALUE-LIST (FLOOR -306937202176830380291551701368328539229 -296436198830834971825518518346845101512)) EQUAL-OK: (1 -10501003345995408466033183021483437717) (MULTIPLE-VALUE-LIST (FLOOR 53182351345555180643155906117731554036 -239211638592486301383761475381736024507)) EQUAL-OK: (-1 -186029287246931120740605569264004470471) (MULTIPLE-VALUE-LIST (FLOOR 280879521805922529084106054377533635149 86259942955448859132329436894499980462)) EQUAL-OK: (3 22099692939575951687117743694033693763) (MULTIPLE-VALUE-LIST (FLOOR 270479016313808755540727122565065208981 324912300098276215771804552548480817149)) EQUAL-OK: (0 270479016313808755540727122565065208981) (MULTIPLE-VALUE-LIST (FLOOR -36931767825051824504116995033958612864 319307981922121038618879980001580483695)) EQUAL-OK: (-1 282376214097069214114762984967621870831) (MULTIPLE-VALUE-LIST (FLOOR 107405040163562716679444439233633957914 -141652913538112981614728925754765362880)) EQUAL-OK: (-1 -34247873374550264935284486521131404966) (MULTIPLE-VALUE-LIST (FLOOR 184790583924323275311064238756309559899 9405763068924930772523308542613843828189472529194204592633223103364008985533829727911596099340788835060163612329614413033927995456162272921833539208882402)) EQUAL-OK: (0 184790583924323275311064238756309559899) (MULTIPLE-VALUE-LIST (FLOOR -232146313651929815140292892576650425884 127874042542498530491272428412953321188339770863893691736473766303033699167382382296818126363236257463426694846772750451609560841554300961480864245159756)) EQUAL-OK: (-1 127874042542498530491272428412953321188339770863893691736473766303033699167382382296818126363236257463426694846772518305295908911739160668588287594733872) (MULTIPLE-VALUE-LIST (FLOOR 8728026917336931021644334642968359261 -4025737651718879467086249421940400743845718511565541383201031450532496911741243591880148294568060736532264934821412351158153056198557273134546519285439196)) EQUAL-OK: (-1 -4025737651718879467086249421940400743845718511565541383201031450532496911741243591880148294568060736532264934821412342430126138861626251490211876317079935) (MULTIPLE-VALUE-LIST (FLOOR -21247806463473594155821742168531145877 9874623814693251335287095436063900170315895560443374584548447111313954604343515085076726174459237734570523327188441412904116251434030306488421699399082287)) EQUAL-OK: (-1 9874623814693251335287095436063900170315895560443374584548447111313954604343515085076726174459237734570523327188441391656309787960436150666679530867936410) (MULTIPLE-VALUE-LIST (FLOOR 286071012976663674972497644839812778135 8117963470049102990205107814791130105126121536354646949522748212681559213640860255350655907507344188574393108661850973221437234442503731759547377868482253)) EQUAL-OK: (0 286071012976663674972497644839812778135) (MULTIPLE-VALUE-LIST (FLOOR -31984072490103846239901254171623218449 5692584577100138206704178766874348327662006017031045734962382737701553237360572309466111381682998567474445884555969155997528896962520199289069413649945515)) EQUAL-OK: (-1 5692584577100138206704178766874348327662006017031045734962382737701553237360572309466111381682998567474445884555969124013456406858673959387815242026727066) (MULTIPLE-VALUE-LIST (FLOOR -118786321298036108045826901623494422286 -13104687393529855246189161514016061367829206536234756076440701117699438900634808212710497707688898041370523685367660273492555927331371333817584456923437812254937564791326005224466260676246116823279440552837098144298072108885163702544652442198253976130758036230979750526665070549806140578651660117367824058664768255971820333797528263566114021182845197585116811208610765478558726491630221448907739229750716647693886681440731920621825762708622208585945445501310666367635378515829380161368994361558247741326227866296163878689192696502960274515396418704173356117106149549811507516298161494760216869495774889685228097554343)) EQUAL-OK: (0 -118786321298036108045826901623494422286) (MULTIPLE-VALUE-LIST (FLOOR -243504960196882294351576664380857968998 -21587937181410571895883243216668490389074705797891859245233974857468088393972175783210897703383951091997858590608339069503309630378648345491373074180865032523580053667127292664354305946146706860083207200717386662398495588729927890691458790805600368902559075452315483293077820819619965677979632040202844747133012382862591603017396270452230496812292060122531819615885125296991557805051862986461441377986436031061301043809602913037623299360710776463563079053501286633046825608308134411478010516309133407298319800662521169341026639016773610132691088293480775753098006068864600975258749129292334356727402877150032641596013)) EQUAL-OK: (0 -243504960196882294351576664380857968998) (MULTIPLE-VALUE-LIST (FLOOR -232153120215337418381368832017470265942 30369869998519160635038439385899036531726274899243107662193573776561025086030508184579231487739439638990032661366370630132003795988534362627493292132764049369361254377811101088096885616264297545296183017838644655031800075015262568240918564555865889092855166242732548296118581123607728694721796055009838837557999873738362196508994398492388283391000153200151108985088421583241872508945550713986000643154770628316896294096213588875028875159647959209523043158262383137987983806573391208706198841017176042216759223869369001945418516819972673432636326816040752486579776281338052626173120273068890045743383055115108151149136)) EQUAL-OK: (-1 30369869998519160635038439385899036531726274899243107662193573776561025086030508184579231487739439638990032661366370630132003795988534362627493292132764049369361254377811101088096885616264297545296183017838644655031800075015262568240918564555865889092855166242732548296118581123607728694721796055009838837557999873738362196508994398492388283391000153200151108985088421583241872508945550713986000643154770628316896294096213588875028875159647959209523043158262383137987983806573391208706198841017176042216759223869369001945418516819972673432636326816040752486579776281338052626172888119948674708325001686283090680883194) (MULTIPLE-VALUE-LIST (FLOOR -259060284965774946595436776839639567158 -21169437398760148980356190208468018621145492999838564155598571671707045137252408058263155870788514173361612648418947991691931017566701206182096411121805142388703524692384188551391839307655250861401059757668540803453257330609840260191124331324376455691656017965418225557221321063048013134701879342357330536176553693912196231407222911508076200690973402778332647229863066211873019193191946948707769594605725700542299351271155436324879464212647734978854222464094486372144771948169422844206687239103281296767882465060755610256361348437002775612357787333990788742488962974294617778863800504758143312112916148210635178700875)) EQUAL-OK: (0 -259060284965774946595436776839639567158) (MULTIPLE-VALUE-LIST (FLOOR -306407220440527520801126245152934343544 23776904469041910002999929986640006577749806048379780143306978176280330224333859620859305982085584460504452577150094943864349273103240498588108336792264540481132832425653265046674475461727185564436156797869482735166850827691928781085870354146365177855543550807539877079785312955597311473866546268560309551339704009052837019611095284429480282839060448969927393502922337023493529232757886223011597039473438267362519775173848264262428693937605086393282678388857244739695710639089112115821491015511241179389623611704128686301802869094211111183507607222840602723592206395532989319304742353354849715544201896997806941793031)) EQUAL-OK: (-1 23776904469041910002999929986640006577749806048379780143306978176280330224333859620859305982085584460504452577150094943864349273103240498588108336792264540481132832425653265046674475461727185564436156797869482735166850827691928781085870354146365177855543550807539877079785312955597311473866546268560309551339704009052837019611095284429480282839060448969927393502922337023493529232757886223011597039473438267362519775173848264262428693937605086393282678388857244739695710639089112115821491015511241179389623611704128686301802869094211111183507607222840602723592206395532989319304435946134409188023400770752654007449487) (MULTIPLE-VALUE-LIST (FLOOR -195344089877883615473604540022799066156 3662747206396136814780716441352319011395583880744440623779519524132715621398922492090110915810914165138435343905061143614931233310311653264955206314385113727380922840781471233570237875610273247058183529977038444774890036917021403875269188605058323112809901006876685005810599540694986877767813641408707144817551209014119080068666341132956917595575721029282915413432788003670940873484464479035116187361986468817764174983360339341760904395062935668506379254915132158079325547293981795720009601997338615068852024788929328937759791477545407878160402653256560646902444406842976796122784294159073232675729939439754133572694)) EQUAL-OK: (-1 3662747206396136814780716441352319011395583880744440623779519524132715621398922492090110915810914165138435343905061143614931233310311653264955206314385113727380922840781471233570237875610273247058183529977038444774890036917021403875269188605058323112809901006876685005810599540694986877767813641408707144817551209014119080068666341132956917595575721029282915413432788003670940873484464479035116187361986468817764174983360339341760904395062935668506379254915132158079325547293981795720009601997338615068852024788929328937759791477545407878160402653256560646902444406842976796122588950069195349060256334899731334506538) (MULTIPLE-VALUE-LIST (FLOOR 9264891165355739565190184416501921531110089392234481682785663537978152834210043205322426048946857682928713233093454298987718151514375312698287977140085629 7037874176512351849)) EQUAL-OK: (1316433191754927814343121270936699199595699278862016004420926865721433832616431797693201713416985056700387482358940219476958754936526117 3725966351458345296) (MULTIPLE-VALUE-LIST (FLOOR 4200307032774171266112621290628586259036811354993551074625290503853725932886889027855146647188583607214617803535833936888841730747156500044307235280341823 1284895891758199540)) EQUAL-OK: (3268986273297707492966046995014614916998242647231210827092764188090140439361457237468815188241626314878458369000334553644889671709204514 686385384999618263) (MULTIPLE-VALUE-LIST (FLOOR 4633581426210593840116821588308941075113609939505374670564216205139790589811590001728944069668539972864711443927654873778749890460797761818777105143436310 -2962967916964005701)) EQUAL-OK: (-1563831116658993795279542101101791208522139405163357327177345954575873595639420625598557391282445499923781922172975036467881769387028636 -2305528351410817526) (MULTIPLE-VALUE-LIST (FLOOR 12717552468498637611743035736272812618998169576927971614333302239794587794960622996075191568720328790968571121428403438724885597787608886055291630047062012 13314634913503466421)) EQUAL-OK: (955155928128432692468469826248574845938797371431354312846155816839032798664341688948121282840353830287784283921940330056923616110441287 3054936783550538185) (MULTIPLE-VALUE-LIST (FLOOR 12062294501874959722722826646961478850437392058690935960962546316456440331759806886386062852332964852589981740852222339370133938328830299239599161668985128 -16763340409247566945)) EQUAL-OK: (-719563894032763567901416565485723597235798340734444183600832520303761799320002945942723929422229544393458648487318438477478730610009081 -8784252901936442417) (MULTIPLE-VALUE-LIST (FLOOR 3044847544275515285523698330617680562098304367055502952571345800359603621492376638228899902071703358030930686556600015395721763778348780143354036450288026 -346996692199522190)) EQUAL-OK: (-8774860431593785670059820118794469144363980632658525112469174051232043754755411530275560319174086707639904288765947602493995823751245651 -238735003065207664) (MULTIPLE-VALUE-LIST (FLOOR 2509912747961300370421908848463238376627618739583712646450568707494390365647434163992939257405972498499963653610934135188560348612028561201284997136414467 -103539220471632131715513528655357150478)) EQUAL-OK: (-24241178719797015812049763065806339919024561304709065585003455368093218973185992185403749066840410575011438662859226 -96472873114015658715754743886276195561) (MULTIPLE-VALUE-LIST (FLOOR 903584156603757584665316743639288345339689627067279191353819345586609786559389840933430566508676924801215959188934167984436460131912383813696092800782502 331768089796013775863175470747253254043)) EQUAL-OK: (2723541486944457282998823558887230609702011905460231484608706829329099534108144630923237396663979818212898288888162 206235332161320659528701690369799443536) (MULTIPLE-VALUE-LIST (FLOOR 5673315779132616764913839385550510388979090539569302085655840858178135330568442902409259209441411672724870197775936862625748838206738247202566588717953664 174314453261637397091517016624017866910)) EQUAL-OK: (32546445076572334426551736182476341541840123356058415149120265601377736759669652080905093959104527787429999911903291 116692109360780668718335531020688952854) (MULTIPLE-VALUE-LIST (FLOOR -1042174796681883628708939541235268651605049912220225874766096393016094308719465113556241387514699104237113811358810257758037463299809921161083533137718034 -222161050831883826404696847740663687900)) EQUAL-OK: (4691077903977550484144586938760520043889189188344556635834217114054282381408390083982959968194813858480017307031811 -99596643070173880773679158795261931134) (MULTIPLE-VALUE-LIST (FLOOR 514620852714641065399283188571474686623886013323210978774935263256584816823822985571618774823719005380283570413767760460152207111047429811764462688164598 -249379962778237023348159084806351533829)) EQUAL-OK: (-2063601449697349844851896329155481297775287042332288194884672211603708613220802144442049441368964502372230090742486 -95322380544583572818596570976868394296) (MULTIPLE-VALUE-LIST (FLOOR 4269600385716644031357008587416832262633392539755787971157199376810061034292825362806383550016756143465036715717235613514913396047178769910869994174370663 285417980748490192096950554131180300340)) EQUAL-OK: (14959114960171371128118740711875740516756226597819143207915053559296218628291049058344647983358827408473567791787490 241314195989544958480263376470519624063) (MULTIPLE-VALUE-LIST (FLOOR 6257762944066060502889009610562625466881502649685643619949901701091938859953222566838296129679249506961399045004819501125771060525963805468605899184284857 2403901388951678895074087838271029994884292204266026258064846860089259517515609086601789420041871201768080771502802345608184755582676267305500365461987443)) EQUAL-OK: (2 1449960166162702712740833934020565477112918241153591103820207980913419824922004393634717289595507103425237501999214809909401549360611270857605168260309971) (MULTIPLE-VALUE-LIST (FLOOR -11993484600336960787296361130458404039545119394875472848786275539588308627572632551925095053909141197737731742215007587172062102742960429155637516154567478 -10601606227266649325153572936490025724316912773656025997862708934485961793376598665748396482615905529759961488391911046336857148489489874009257983913322770)) EQUAL-OK: (1 -1391878373070311462142788193968378315228206621219446850923566605102346834196033886176698571293235667977770253823096540835204954253470555146379532241244708) (MULTIPLE-VALUE-LIST (FLOOR -8099353584218727402496117482244315513694479151831901237119469501251316930293170263154474101121202090352876083340578448720444998702069748972927117400667238 3544314361305784888681580682051379178614889611356920001389193108853540699763802421224233206957629368752496825814976307915371579698349690086107445288844845)) EQUAL-OK: (-3 2533589499698627263548624563909822022150189682238858767048109825309305168998237000518225519751686015904614394104350475025669740392979321285395218465867297) (MULTIPLE-VALUE-LIST (FLOOR -2978635751180326260478380464684854159186938695694356726729544155114559498149136630265180287452727795680214540092030170434165319182046797389540988376220992 -11044560433803724847345327269572156674554851849210901400046696801586678634230888624140822828361962132102290537138655249676050009778590939633587416463610415)) EQUAL-OK: (0 -2978635751180326260478380464684854159186938695694356726729544155114559498149136630265180287452727795680214540092030170434165319182046797389540988376220992) (MULTIPLE-VALUE-LIST (FLOOR 13340538348613289212198643243040710073441733600226599862111857175429956610033827913042723029883753278922272401272143183977342753296395660841047710386806625 -12505012580354283714273335370179473407347376833608196161777727706326565713505585671787333065372262611606233460666323939469037058474587043990269917174242835)) EQUAL-OK: (-2 -11669486812095278216348027497318236741253020066989792461443598237223174816977343430531943100860771944290194520060504694960731363652778427139492123961679045) (MULTIPLE-VALUE-LIST (FLOOR -3452499360915990528305851079744650498637858290301947784400848134276013289408593218875969649149167701046100505360083493320272180164238716241369492874982856 -2841735595132421145030480470066423226109731223189024018875906078709951146850527470934664784555907173906888591079310297248898808599295604861461544021697908)) EQUAL-OK: (1 -610763765783569383275370609678227272528127067112923765524942055566062142558065747941304864593260527139211914280773196071373371564943111379907948853284948) (MULTIPLE-VALUE-LIST (FLOOR -12837726014506093148099404481188410844577204272048603185395045047349565142592994407238657335674129551317417810603584063833795494760777857363295221929632592 -5400672038070763758928059302309515863608512780764658336296609520612929827128710430832496604060142364086061442480255889774184624927820479974807630834638627053061502551989845184646873008822134065011205730341955561862333543891572685472831543459711809182159609688999832404181689665081467086838440500602969410420032314939424736094367166550148605570451238900811316075091818613634658092771400323953464835124475741159313252328998401218032670762735091435255199537815920258090766640501899817468173756745613666544200642455036991967916355826412137450931256645775349763991939102903236911444655964118925598580974976427195132959063)) EQUAL-OK: (0 -12837726014506093148099404481188410844577204272048603185395045047349565142592994407238657335674129551317417810603584063833795494760777857363295221929632592) (MULTIPLE-VALUE-LIST (FLOOR 6578123342051874578301723989032639872736755816906003001838468752363433436477439123182015773040480790196872643618542950300401093404997067180920740266777136 30227534847135453106177887048045830910966009330493682541426640262878585964314188306388368740002450969080153107270718818194095421631888634061517731024627240634873991685067246458822125591350775226166707968203074411304172314390138208453777131423508042090910198631120304798774511984974823253005683386272038346156403540545900138637964682890471751795844957640450350739073841005154467987598913264762974403365908691068629911370262907886883158252280853615622312950774196097179304856495254526220900137020823369927850276669023897589972466867500466273084668060310345544901231841857904496215091732346299276586847479136514947400671)) EQUAL-OK: (0 6578123342051874578301723989032639872736755816906003001838468752363433436477439123182015773040480790196872643618542950300401093404997067180920740266777136) (MULTIPLE-VALUE-LIST (FLOOR 12403944923950846249231475663107427245396603223802100275104415443763524399953865335344297718622152249002880852792246968794311649331174399649925724682365691 -12888526328266820415927145054786787145889555649382608442248161845973745960691528655550360088202102799744537495406020539568745771467756467183613368156733378808019164713600978887019905699871417123365613340681673916006626966649924170996253273073733852663021384681382051909095614154557333966638418401258055946731820806422207820872515345183005729150326803604361512295955159943694411555067679327842378949865992521340416781113735936437694218150384351520004302169462501770232864597266654390198260481651327159066598217103147752784312005857617885666670915444340917773878003125490279146098981790584757296196254721882965728596834)) EQUAL-OK: (-1 -12888526328266820415927145054786787145889555649382608442248161845973745960691528655550360088202102799744537495406020539568745771467756467183613368156733378808019164713600978887019905699871417123365613340681673916006626966649924170996253273073733852663021384681382051909095614154557333966638418401258055946731820806422207820872515345183005729150326803604361512295955159943694411555067679327842378949865992521340416781113735936437694218150384351520004302169462501757828919673315808140966784818543899913669994993301047477679896562094093485712805580100043199151725754122609426353852012996273107965021855071957241046231143) (MULTIPLE-VALUE-LIST (FLOOR 10948926687039959668263034501276830818625159748756208667794639002017960671515169323966433371280908617310031465455790806503858320395456591407286777524363944 15489368888944605373650389556533647343231613227589912336942045556008797399070972592836944702007913599282985878262526911196097512734678645706417084706692047107683744531285802197270639216129852640210205547180574081479052109734758880839510339349237982383997307379952940072013079809351763653427560483156946719035644278683384662348499193303099798764213152890786143522348717903997482162057330324665060570551176318195643585920374603137371921517627526609290876303058743280212715019326447206678291320236859616579863769668727778545628289338458285997742887048186232356815344233169348134282594953756462483528235310248146271138654)) EQUAL-OK: (0 10948926687039959668263034501276830818625159748756208667794639002017960671515169323966433371280908617310031465455790806503858320395456591407286777524363944) (MULTIPLE-VALUE-LIST (FLOOR 11464576772189320419261665628466949872551044398628568459420638211702970737332076526558331636045640676437486199912474581890841933557822038200509907802936313 -22467560825853172479037421968188386486420879368653733048793951227030601094142939166908251610058992921146938740897141065727494001469172869273657374887890530345239013255211792126218659779037493454354985213639803588241949068595974842726845550080803721118359501094994460828504625140423100683538018569820187798018489678377090273255263020908779694768888896507998040871877361662889436371169588814603494476932238384716309803290555316924487478792149178773379217766514013266795383492328680695659480010501872205935050314706513127406414046031915649062646891311739001532048668245929929298605152418405630093221583825629790103566902)) EQUAL-OK: (-1 -22467560825853172479037421968188386486420879368653733048793951227030601094142939166908251610058992921146938740897141065727494001469172869273657374887890530345239013255211792126218659779037493454354985213639803588241949068595974842726845550080803721118359501094994460828504625140423100683538018569820187798018489678377090273255263020908779694768888896507998040871877361662889436371169588814603494476932238384716309803290555316924487478792149178773379217766514013255330806720139360276397814382034922333384005916077944667985775834328944911730570364753407365486407991808443729386130570527563696535399545625119882300630589) (MULTIPLE-VALUE-LIST (FLOOR 8938867625495530153186421114297747048040597826172184076413640033054738602015847458230139602813250873350372960139469151926251587994978713194477868118851140 32078375072910127937267277353555359769886046039319229674839329288579279294400524798815635423380870475101996161416889444654312193048344262195882716890119398121411812112449203794619431500846260449790771355510015457009235934372609093350279916863051987911050185220414029935306290325311701907978862607656115228781358052463349741922708496995681137879712967466047121123132315277071458202185149672157950295326835513685167006326116804121841993768353882369640078584371838201520000042076939249781755766637255305083290727182613012935978235950698890245889658464214791358409590524627630419359189066595841389501082705783042993303059)) EQUAL-OK: (0 8938867625495530153186421114297747048040597826172184076413640033054738602015847458230139602813250873350372960139469151926251587994978713194477868118851140) (MULTIPLE-VALUE-LIST (FLOOR 8722682937170431050833187146084378340001260037987475887522226657702929497643381574300242436757970258082372353322466430729560481174965555877218498123235127972650642792093407571195465205419575987213014443482975328738475261835806620444520634849116095235065774422144459742716160248838471185163698000228745859478158104063095766855794756463409807333016407203497851105737138480852953389782284594500871170431951978989370255765328498664056929197514187424012915608945460596104718351333193752820591185791608965252963085687083606400804224201063308456591357967802486377986437493144904666736661926951141864058594174814702200209409 17412472792254218853)) EQUAL-OK: (500944526446044913245854704095754296476914947449773601840238266000641308362538841153234090543298285278030309320940403936325404298435972916448525262079072487832742313980507689645024811947475736929391921911894727993931203210832413457668815952782782949239897550712034201783959782842323270598876666346488371315244615931371511266927466746002593260083813695350859233907674818312186201150675556646229110170730257749054381148001252368819048293261475322932890858943640868603051493461480912552795132518076648186629059596407623028993206501153697237322059149347109211519809718392500920402797396035977014151301 13717640401691531656) (MULTIPLE-VALUE-LIST (FLOOR 28355649069936648964480577421600521514076854589748655538478527484386692848040560920378270353295750065522502408426901852657385194373002516782134462463403619404085937808470896616603996134884288656277511001166614643845546560002367982733683422291378278295503032478358197654941019479109634084898326003113897170044006328598213579789377859798284810297339455100733353158770429621612618690067430491463355522146151298846940191011096497912423339688256950368577997428204387561345591508638698782496102293891198658979297125431373501637906166414269821235570899541062164735301390814949753951678580623524363615439367796948526661114273 8633859053023126034)) EQUAL-OK: (3284238125245742016855698157684933898976923158153988299571059835059738533454483417199061360717949675767825259147742326435714596823475742487511565640155717557287585352355724513814056546156034557507060565711152037955657280498048473524523497495066421726381315710512047045674071154161308957202034177182801687183543929989744017034272683534975659632492076519296858840261469439577557507171156150551483889412665000065287799665100306570592222219949067222441707356112651967102951988787499729560738632591896472356839552808850928783757605816255738706660766653939585897846868373880810762740938652879077841365007 8480542101902822035) (MULTIPLE-VALUE-LIST (FLOOR 695804210379264643979583966247939985121477063798866833769029083451619832314943028815111717357207629373097980486420088049066444875218919515464168730784010670913213630418336413807551517181427706050442981412812560910674568907086122536915068847926867597666432252300779682993163510641754139318056267379096886236384894321926559804092457910184502775704660359338939407870665678723351102313495695271753077268239934810069567863069912893064736153816317584230084541663742856849855885433861537874945479324326871485256528265492542514387227516996450338546971631790859699133015684902494112907242906699969802617955900147949678000702 6681774530135049718)) EQUAL-OK: (104134643759851814351147451693200005177949603843035721223567744815305881538588822665583702468671678158123657386652154620049781061631961328262453617035662063853637317024464861861946266314086911857166878173456014196637218631863393572542109069255296051532325807248516303174349857623773438852122643289226264801658953137748153296436411578898337203701260654377419646372368642303334799023574274991890918545934625239992964365706183254509198057965378271765137299881104144690382322308740670412140492093203922319672781421992523823019735773183797196153517598307995654976625437636949948229208840097078305544042 753510048969320546) (MULTIPLE-VALUE-LIST (FLOOR 23793846839231724395641481096168600821165863841834871677817770057997115862268350281729411419898015728222764385314741974298570203231459954889026804768374989204737469979104608191592488617915776065920825549826544170491376474603565313317103382409887303248767928207436610335921923003830631904883475966155908755916279914050461058817604412376332860234542206749755476863494453482771627934874030957391163592500144106720406855489772599751499515034904792907346159848425450017939743424553771285003901024075692162881112993617392057913260097840038314973483416617082316428401467936188718832437149607288888734084245887947167600476942 14251636779665730013)) EQUAL-OK: (1669551870223134151303903342674455433642542678166026329327716199552424270739267924882373474967130314854205248773422856606186537084529373808518256136223710801915037299873741750309033582768093390015183894640465684163714303454407585554851774795653260663343812169894506517621409762650950455752948417517702896344204545008148927831629685230911115972567815995382195887880974480058637498609515045000261275580213450984765289759768577989085446697886224919418538617830152205807256503108619376475835548388022966261347231830397100233962945745245326537590040744120991719469590787920917431072137837209281279829978 13846244437708747228) (MULTIPLE-VALUE-LIST (FLOOR 5157109352853249971318864071100809054313778706912280725237530653514718017885603638808994268309662830522966266131723296476071219223553003512249189605920498878997009866938158487186969488205976122254188731320527219934117903279062529020046834522969499499006879142996400588997334123741485390256248878878301063076286830584096271875934275097457786951285271567141607668681320623976130528011279831938224824782139301311433982239041406699687231975177586985955350651094601995816681979048980035660883809964491229857363116776116215144288428315817606755704237448380042774619545204701291306469557276264456990236770565662987790837189 -10013270743141522218)) EQUAL-OK: (-515027455577944332776599219259294388811187969682242219239790206822600106136108551964834930674442778634657645567794824061780492131991288077428371773780758138983535394992930162959647831148714333399217585802721010849103285390761891312665489859363343081240130486926587552859706337223282598959658826457912110150229463850079329163597771797337822709730777565370953422223408595882843118286956939988955846229075579330815290845722563420243422752650828997772215730429207767090119357203878107337884921705286570049639435686342039828502912430702417787311741719990865608911989344378016685337998208215872207554274 -920760231421022543) (MULTIPLE-VALUE-LIST (FLOOR 6494479986256116541104296929948745881595810377963953264991072983439840586308068782167240611739100078965050725068818882183756338815160036859027539278041681781661292616356111680897493765185363894557565156777508945778492400417041556530072176186473028646756075186621344659621007329706013704866019055199752880400583535752226648517005237843095412900402261752786336175778761394870284838510406493285835836510084377115102990988520712094164167646661458280428910514014249834132126729469995977022911113044853980749549364759880528586645949565758303087716543654543586861828638440479331739588108393797432477382024670823562517526646 5646044948886972124)) EQUAL-OK: (1150270684178027997729638025310141697535651329313468129284627631873742535270359534840413194117215304029010709513909008920532146218787185595227269977210380838656683242728568521891853665038056999715825712357842110695616824097006318159870253326008969365677078769387050477555367309756230306675796151995910498740461667569866473279089249936015985131524549691332989894205425117195925594673141706705491188937755834316410829046680432307112608812689099288880996341318638564624566449876699247700823589547245730672763432749619618807750355174780947014272103851229064036660484535227006468477136474311066305263226 3785857158573214622) (MULTIPLE-VALUE-LIST (FLOOR -31360864680221422030140415094508859225037184177278863690330048646310966010764143021431123151508104188281687033827937090369965061135751835578522568620174870624326364591751719134017727476315825913896303730502231987133828454596458972192605628269836766485752863341723932456882638706013143064500915331711791221807863285445277518932935928879510111580179238430718068897684115464091110803073393785115849134031970572952341156248906594900067269723116623961645695573540685417690666812895681389324387236630659047254288574908905115640816788218380202062908240234242061857266935270268131606785945960533363545765413571210356588614272 158731480268028865375787109312788454557)) EQUAL-OK: (-197571802564094255018835618501836237470451780852464910702917947610328490115600879542277218044587953977482033832066853445897949746594340123621010571525423525283265694134335278880857970722363261435835440841138075424370755023622549046990506755720823389094963930373207384718204282462412342807880786115573288541223692700693236309165845190755419998468567231783954117079063183652374494384463667165956585068985935341133217173168221529758860606207789154326413767211275484817995028454435144966634656180655573506329003296926488159246532512031996848763667993503525898127688305577417054301089 22128982064863884081225183621483498301) (MULTIPLE-VALUE-LIST (FLOOR 6972688127252138459564959519023672734797720350352562732688801457617542500099509865574973489633915033719003377224851429368921013349700580153017928134596084737004044411366993842119504403376959959480789333673755655063117787017101298662107070542628327980482897959181812093955456006698786827411711446400770298021381400926276799694253767942575674933967663793055141073318481678170963516082521833862017762649825976536694779299584090771859213561628651925244725218133964348562464473355036335901024895778660125505334188112559810228121975479770611339038859346371817450184722764849484125019138077786325611240207689562646177214862 212229494710249959442576275005814060115)) EQUAL-OK: (32854472639496801513625266171869868980490382632885983229822011721729192329270622778562010916862699719016516950898363598128121229189750116863530046554995732003476968354657890095157193194509736774942176733534056571834590366060961121671289385934253368995757730753667329275656966343378668081666905678760988072374390324867142186156887369444294667350127131255070935565628787125782523108523608392770938414227072810340675454608542379054058487857197652824285799185253955626498482144435788461420918351383205430463919873128183751743772403931916447474872579786344165522578418757820262494633 202602247999430336716424978770050352067) (MULTIPLE-VALUE-LIST (FLOOR 16146477881044981814872185978005786543642189695578037880128585850657582227346785609949631520306446259385630057714250080634804935779512167368598228578137970013047546260870411704532863029107179381174130047754949458719207263855344249323475379597824225167477700328511898116621808311449385399905867898699564040099050435706021172544369947305690899952295406293447506146823515423102232662385522802025721933657658703659553626211653699561780784625213816227416468145185123310306319508640423290747072654284738002434784128270456278391972933415297337582959158202392632248570451671740383769937167912379559021602080900933189192375421 -20310422672054016316639412907518719590)) EQUAL-OK: (-794984828319777650694385094127543908631549711061207837016795411776676915426259473368853160688756737034823729254185786121643208845684214393842790938031685686187522759314947140818495607328399712740082388950671812621562726517214947696883370445215206445278987678057453772575168165658852145270562955365137991966349779422574705948837912807073553643238677887356778699590679423929808592396737386221680984966466476609537799000714595283015387280145210362603689829188312020767177147038887361232908826207585485585717770550283815412266616448789002231614634998653868395118016500112836083648523 -11799925147898511149643800539362290149) (MULTIPLE-VALUE-LIST (FLOOR -13333386402689284528955650425278647711888918022382802858930735354762601039626630790596510115878972126652469762677159574447095103432811719733783031083771953511074739306201836852090205483055377050725227473420407492132102122918222222661174330427122421429872287465154597256840268514193104109407101719163350519145025605863849817679140939130213133277602018019855074419919415918787364400403970284236218639542926948339939839929520062948689163759711059171596722904754429438151009753108425737178467425999202826949155777669899192519705543679208977557190789421238295365156644743397621766685402593133067165504533347334868817548870 107895899863035416090758241115761545328)) EQUAL-OK: (-123576395577726995467509810094692559795501216776624732643654929468261569953970620516962817836961555200657486752392956631475337670018968072148956742753944568338154539759184635744464807131713977468703479999463417456632584312098725347773265375061594795112459950102134313707118281441803361728717545150343139196161174674989680811767284271234273952364761695483244122531302983909975719498713709629935106791776293856798291478157380963024628448230576871460269799644149756524167414024818290038046315016119726155391403548599527926110598142014566712845146844517328059271906387663525750970076 88916219636034843584282198824028056058) (MULTIPLE-VALUE-LIST (FLOOR 17396957313719309181655810621342598276769983942993211094806395284201495622288603530182348401034532670779772026613959220329662328631746748840677422913897389222211979435071300283979361385673923168895608787064277711550661080470385607194607715097404666355341496134600730286695020337462621706659365279865288817231582460135505994785679557826378614057840182487774381015927951405829305139118747627556929090278010945530871104877221509669969637405745641517281958386251071953311649218819211648218403974139963448683937267881136641329201897530450274203549882462469989176813129608929688681288830465486480047730094845155570312862849 104186547224209978415781641589908237686)) EQUAL-OK: (166978921724711432713743436094800137505239032223722714964309089009506614535895519867110422644603923287110323367280581626196181748165083370852210731028149827924135420402322644021166934074442323617970930798783252483767604446788478644579242675426052418474560530381252273076756647943610269802844827006798614570113552490465455602498689920520721194207399033534120048155924790694559525815508064767545247429922864279482054330586837508112647624007190343625308333109186981945018060033849826856038685383194624273212670683254990051450794748656874003602039616482791671154071071940218956513118 9689041137085346765396894259391897901) (MULTIPLE-VALUE-LIST (FLOOR 26296668029363560180578472840636347646283515109787546573773133131169235303278230292620358193183994696837168281782424510501462932715289179113988102147665778902989371433141498385910026219307721742927641650208826808587628688330897125412814594284814050899367007933796796475217266168539594147019546294897573039387284123267787652073296654465797846788961105602455421819896924940988943972769457383697764285807789932427485615761627567609238909525216550007481876466503244451415718439500787125259366798747857812030734235875561021422659158282642054300429948383202431010170473103089719168265166132037042278884136592980721399898848 -145151976679874338336058059363314537)) EQUAL-OK: (-181166447959297097309632649706277310462287087273328158550559504514077025970552462585976881228509338936991115036681066334762526041621219901153411893847383132947014037561714726163730996723689359625350327562359371926025189504119439124542211108302015324941630060663441114185165191476531119095379776949183747807676488899740428054170566283213350742091333006110702325305863276507428847828894436119391753135134140918882254262557249907254757481730047992171259860818951015886963391969368286964814563381601392580107247382831740092922947642920341973871311541502943677603328463821550096331015449 -110577937214275422567781046193383265) (MULTIPLE-VALUE-LIST (FLOOR -19994387832358687564296482880955715923586831477222916410597818184152857711804843023778287694318724091304456899035183525127967566364649938785565453184727547598671504088541688780249133503129117660562371945085803761853547276588271572826270417538713473845464667687405215144939251922714172491714494707146884856110703801489923219443900691887441959990915961809557008130581221371957930424791112777130507507175854695038524747304496126685506502272017923871345301904089286401283977464945598827719321374155830270851832155999413594990591210770207211404582078047399265487243377424091264415562555479103296829671606309227114918559411 -12290727751262531359522445814787932748157034294075544178515373320704162497192584943859172528304649072004548036058435558708785921268699678655127651925033127)) EQUAL-OK: (1626786325187686206254527912536268233229423573477257270053889346415589499220953871015742625081244397640382477041911954315181713027690095532216560352291641519082404655148801601548476351855968135320238312168182690718232048560912434032449056943124604465352409935769208624710904989903415445402236977791654195811881494578919123294926181940156782515461241607944723498957864382829554865120206763098110715049165623436566759235599826844834593966722456940122296028858654743 -9304614710679256891239598861411560332304324920434685965899525875715186019084445758952863067134832791421060008856516918122255022315420901512824783987888050) (MULTIPLE-VALUE-LIST (FLOOR 29916764548363516315213840380698377536192609328827808911066465815108876776179490417834258307994776308911573596103626976278007330105709262864909645777842169226871227147054313657605129607087589187123503174807369386299991859056839377153696490642393964375926230602462747312790529261100240727992473466712957240583216041201088172946856263144111813006598318253235946940685055230369936673556047728831107329646718919450916347559724523856479721600705891348359262178740659519774585983326669798219391447115538287743254388570949370216658299333436961807924794235560183973249587386381643272943817567729138289488897133971529039695757 8476334091496252719253471844340714224307718865976339399900779938495486609491382968889867250990569753004524377073297071391348967807704774866029247355531618)) EQUAL-OK: (3529446129120492576886933802306348265603546401021071145489371491655402978871242160302127070993421776756377896228018319062438889879832901903630775379375474362476945682118589732246954574638082665328364641573132346715748566497144048040413137331852635046499249704620713985392482170976329565026453768403409435575238922748145312555307402543771398751056417238642358386670853730480256387244547289563589645563705382910276075835741806800308617595407635175179549186349623407 1121598720662440742988451944089192258208677258393969079460095922943603039995215206852920630773807538691962340221388452566848135314318278502721876458313231) (MULTIPLE-VALUE-LIST (FLOOR -30744743258986840974825934925400463284355151584175701001085034454282509186617636999187209301942468580138651572968436145883508307958710953672541548503099036345172087541186583358599035971842953063792288589346835317805238011836025866089112384348158834439025788655670125182111347815257445264926636792871229400549827577321670531162443103810493815924151448637886392962948822485797619344455378736429734156821345757186019132123507024835777255364976075865806996283635073664232613154449751312293463363442122204887362535000774934247468263702545257658938264075634847752288018235968497021028555508346290918717339789336670514080457 9934634309555858804270980126309615970053320780519373855793924975583204316518242194797388422238716941854010764960600214725109000476250489194524103405530739)) EQUAL-OK: (-3094703066162616114961725586598761886126440000450319657542750158557542422972265973994772432239434133706930345695126019787070526540238058168248601279554005834087067802027491094801318957724338773860374084056857766237802500357570852135835098188033303615905411388899090151866056131910609183545491275118194384669083917607888152562507000146957250511707959497676133004912560741040750644659008842081402439245159076407113469036885418577123982203712293205143214370192534124 4583596897489701137708573201509728063693689464812281935974761545728663079569821440573072545991527054461975034582959468944964678550288258358252037074357179) (MULTIPLE-VALUE-LIST (FLOOR 24643502519803888691586762836893695554672668882609252497967357925433058477865049537403781351424439957461939549800248300068008928283760882152105280755728186165336818042947891471506568092832294726444765034759769551554808855491501013689374698042749154404230203678454785382207604303955330803002216399957247238380783055267792042696128953561495320963977422797650867160007702447898131066450706964885725041540562948429789541526915479497874153956586286026740960933319749986950590370162278200833957789772606366304927219928607487195862425188567871883130961914293433624774413725427494180502314592349900074269004608052919421088368 2717450167284225996753981867457220829510500841312068511238048532529427648370573174539553585183069673827813696207263846346713773366926177883038970327669336)) EQUAL-OK: (9068612486988930041452615817812610262395413380750714216172624755617167719146150429506179809229439286481063525474263171526993584649905549895379552966354856688607031124385144196292585204982548068977456744404073207215088901248836694827956726571697679223311674675917482789361649212542123782029147076771863216074461137218175127751607336902080642274682219411530926094644805942929937073627694007279189212959755881318530033893691479717411893927131774283641886860168845194 2630363844657415178536247490974293939778607568925570410250370678327072798984411202414449734187268017772490491616031334354084510652181851150192386816317184) (MULTIPLE-VALUE-LIST (FLOOR 1857471144762621226078309760048781819853808902834007243224510947324703640579895884811355396539307768563652552656687272466757001311647739575925654454617797724205998847128737511426204839085303003071906438273332520201294499647651016586411018765198623236956366866836742835368817430092030307634950795461633849978479504285561783793523293571899866834127333885745234267982498066548934305641020559144124243564372784715821253591393010485777361901806233522170298666402318233462164642692695586402286093353406704474285764942607399336515494566976327035651095257443119526233432484730549923908643983835638400244551332963304703341991 362612878824948204766041465498605121983038344328923889813821008133012829955553725429013872301357114460102737976404433762806451909620639548491755012601032)) EQUAL-OK: (5122463247256360173380682454830667735994909336257131094636868172398931453441644851286253058553683806107714242214425234484025628771776577335533690016729030113210376620329656025707882934177847398968795670307669192526890837607471635669459016090183544133427748745285201703705268883110778706355536331762965138118319801447738265213248123408984033840769670544118622199016226728679039309116650227118501163822195946867970684116882706924781160720494209768961175300546225784 299760236823448232299335077352435634442705524236228994156709162318327253866985319237312495500717724311867426639654094420477947147244359720759776119932903) (MULTIPLE-VALUE-LIST (FLOOR -15512250050509017569431653406374218468191654707236673402325185299702995515514048891881128604127259128940966966514594946451486134694476273851559935124397715410737724278746590654901453457150411276548615199767807502093455391898384739629715289928761836102897197661380120487438391395985221415090269132778914962364055598932950972975325423902250870789291669816092405224971234605691036355433974706922342506063057313987759468269851537540937400869685698983579620650290591582484180497444639057157757973753179907365231695893268694300775677678977541920955165836544926807198464657683328635157477957240884116233992874779933793654204 3358541127950670805593397985550958371637657834938091938230318311713415017140090677340291997759883758478618605945079413061265904587739160855880393703427541)) EQUAL-OK: (-4618746491270258642196486131268015112521835423420717615093174172980857448220383551186758990917205762587881579670823547496170992786073126440511182401809159567300795932372630208424356476743332043619346311088384079059435373790499576304419282368802375623485321283238175405485184862968207039638749406944454331623523507687428477960605913568521627594126207284882249627708423470608914416155986620408793531083231293214124556072929628635430705354422888702360112306375650944 3005102575063606384680566102915562580638230938191281335082512965430334791588194853068845397234960243041587407778382851298719244486316278864423824018594500) (MULTIPLE-VALUE-LIST (FLOOR -7795907266149417935880848054805638357926463272237741460640947569644048588447722511612181517607450880049915905557897989678236704307693907736247058983016545076253121570693500226105057772914231058133990872553093077477246778482972908671114493634160355090012802248700706280069417479488180111886570768297449284497993155476453139747448123977064178202693174347058572053686548952330935409613585349836865130827901523001778569465270141666026392762544863707172069660941583975586471593214627992137708766736399392527511202198595607734119123667475481080585901379489987633325665012548140296404667154265922084962379380813206642961141 3266322496024458154155982586177367205241879884975448114046439840444265881425140636480586339953113858345978121218157346057285955670573379845528853928778649121198573716895875372950665878135491926664618467827249347334921049358968885123014320008238518111491029267663871866232098994215220584035091470875989416180732388925174422587186795087858194659347743269411322176680238569785902471836835335166112452646235228206195081915725782645939016905926964169376697807870023636080042287120562847150399762713196525578131013908505157176421364232903071413436786302567498639276925676203136397430977438669196132229839190136276524068288)) EQUAL-OK: (-3 2003060221923956526587099703726463257799176382688602881498371951688749055827699397829577502251890694988018458096574048493621162704026231800339502803319402287342599579994125892746939861492244721859864530928654964527516369593933746697928466390555199244460285554290909318626879503157481640218703644330518964044204011299070128014112261286510405775350055461175394476354166757026772005896920655661472227110804161616806676281907206271790657955236028800958023762668486932653655268147060549313490521403190184206881839526919863795144969031233733159724457528212508284505112016061268895888265161741666311727138189595622929243723) (MULTIPLE-VALUE-LIST (FLOOR 11613527140000568192482756738253388762224453894786686024705324634643336086154640452808765642911437980109688560443031730927780624431102238262306897218656077453053740901919490705730434109001630505554615644472687423755323577388664893480041595787444776915986509240983988768996984961291424649229547505632144971266842770877960364848817464904515794389771780820407027606373375049573795106795237627834701205331678265805568350911815774813018183599320960878173351437520785364220474506113269284418886794765499703487689302735252054649064328797761871733823998210784410557300554983737071496100764692702245794941065431902323619975581 7587249511488455291481574592043097850017617150850944854151430663857438629054661904725186504711545142985024178310267212940242316767124495452290378757849233879415880641974894427201010329762690544890887138507664079244754338469394276854749839357593153274763991475638253761900794536890806900100092838214316658164432730592513062527370014192403678448098350118128696785002089891158354556141292773760767431084006166964515144211080310413063362654706066932594296395740249062444674285627590937186704887659632200604451417990996813320236575100574875972599186794102474813935877205799664448604353627460661673753990274449050152179527)) EQUAL-OK: (1 4026277628512112901001182146210290912206836743935741170553893970785897457099978548083579138199892837124664382132764517987538307663977742810016518460806843573637860259944596278529423779238939960663728505965023344510569238919270616625291756429851623641222517765345735007096190424400617749129454667417828313102410040285447302321447450712112115941673430702278330821371285158415440550653944854073933774247672098841053206700735464399954820944614893945579055041780536301775800220485678347232181907105867502883237884744255241328827753697186995761224811416681935743364677777937407047496411065241584121187075157453273467796054) (MULTIPLE-VALUE-LIST (FLOOR -7305781671042805086205879027901218372025263744748476920370936801215407682690507181906856060500614379569331564964369672229742583709815447579920249246854986585035499467980872113078927984775191185433409825799075510115669850322522523768142598684481781858254267858499128954637862215107851239397355311785880257523971110240017078879170794103136756816178851155500522519324993786026829680880063502983144325993463559477297984845168078230705008144229777150602704982383890956566628052218375163513110904344758464487972471262152773773566261138354198738738504010228322403241824600361830597196538559114936352203702189317843297305612 -11937423884971453925821024083751259499642447259766781297912835275709052311299551864192658177304486399283699058384364751376568714457361090099824205847610164922413207048832164141112741434740690851620879666916091683114805059397520385319965609291355819302668926633114618391597972110270104195729524521712155052417250364832858246777602394209216012243471719585422463867924602236259070514326289155605995143153426519592268534452020820494702940294360007255909971183689215427975382460838239606147437401771039532404179010791325434773433170447691511043481857627662741058910094855501029573945308325534013127380693322055343068093073)) EQUAL-OK: (0 -7305781671042805086205879027901218372025263744748476920370936801215407682690507181906856060500614379569331564964369672229742583709815447579920249246854986585035499467980872113078927984775191185433409825799075510115669850322522523768142598684481781858254267858499128954637862215107851239397355311785880257523971110240017078879170794103136756816178851155500522519324993786026829680880063502983144325993463559477297984845168078230705008144229777150602704982383890956566628052218375163513110904344758464487972471262152773773566261138354198738738504010228322403241824600361830597196538559114936352203702189317843297305612) (MULTIPLE-VALUE-LIST (FLOOR 17209502052655993695999949678678881817732805080961191774214537634467104669997820051278559964292611469011761231649311262525642916746094372962648405298787080759403024379693612743720557853611946286870304197122036126838107226222151419136402861650399432372524638862075613534601535719033760228742681750726602275976151585576407980278472053570791272866409613117043122126348697545507835143620584132787128003876247255766444872271317786602207376422907474443135464267851639815814827163426470735478362760843575789201717413221027220343295978806345517086041608240978720520050196395624694268550345436208830801369557317350938753101681 -25492366031674865714603800130440722297248675391454036922399382654290017832413394991423912006244487394226853780856833445493556957899686872020567315114599762113500546176766623020864155665149937580279148318691466089932874147998457966225079089491216886106456935347049916843309661581230809710698689198580162954443484103521650233141750002940462046212610545804018834324858009370780731978549694951052575612824613445810777717659953126577086301947235560041125102454055651800601741899891885690488712713049609045874194541526013910595588271596050758340197535035493872183554373796733932414738278642683363241812520579194986842248406)) EQUAL-OK: (-1 -8282863979018872018603850451761840479515870310492845148184845019822913162415574940145352041951875925215092549207522182967914041153592499057918909815812681354097521797073010277143597811537991293408844121569429963094766921776306547088676227840817453733932296484974303308708125862197049481956007447853560678467332517945242252863277949369670773346200932686975712198509311825272896834929110818265447608948366190044332845388635339974878925524328085597989638186204011984786914736465414955010349952206033256672477128304986690252292292789705241254155926794515151663504177401109238146187933206474532440442963261844048089146725) (MULTIPLE-VALUE-LIST (FLOOR -8264418404762904935971540586212553189369665581268178138984287355704267971035469114147004054957406066365602520300857203610010249719556414712966642864630190534880504909484466848336120976452116710282569157883499369927614177722612839620755683557142607127318366680113418741529273669250116389195268121444810596743918472573214391707744942602210637166261703132552343842498400457951297867678005414165609775233338084350550320105330065321705398390488050253072298385134487973139665686164664754618413684815943926055617247418686500187322182211450203615430634564054858334306443836925011966962933359925972720453678168762605413687214 5659270408666391096654451960229302202479994399681938594290004159630195588392730314741316662127233421095165804881532974934939182755121225362126950700260935754690609887023434283325604581248499606543036334396521593447377999307285561199879892626309791285854660250329582118972672086769638010239857182094917068742207521552140484875546416914612991626798295801703343486711676899362639653362756374154843829963089403048720579483739833657436575344900585844370562669493206999896738589003961397524062927929845521761767153927579517203070144813897742036471334901681673999002492983666998353060616069539877603853178826800408499832716)) EQUAL-OK: (-2 3054122412569877257337363334246051215590323218095699049595720963556123205749991515335629269297060775824729089462208746259868115790686036011287258535891680974500714864562401718315088186044882502803503510909543816967141820891958282779004101695476975444390953820545745496416070504289159631284446242745023540740496570531066578043347891227015346087334888470854343130924953340773981439047507334144077884692840721746890838862149601993167752299313121435668826953851926026653811491843258040429712171043747117467917060436472534218818107416345280457512035239308489663698542130408984739158298779153782487252679484838211585978218) (MULTIPLE-VALUE-LIST (FLOOR 4195250682093770808206657488351701663023767531608220002369022288787894743733460069813218793361969185403525213558437941222523116136985128137372308027033996674188008302853626391013869026313385724383785051935256506784450227965020957296318645208598488161413279403683346821629439117327209071527878791167163980953326296620631874274522101994118890706372879111377721965738161511000396672294975037034526549811513789043244305969633354034500541113123255063232374386942908997046756046017320772897856114275234707703184161983806610888947627465435762937561231247173215724615365040435541390265704981699351563837340527277633975576176 -11523670060248463390302653643248573080204626895667435502164973305972185748470395654926094006744012148505197326052121545710242241891352369937317053719774706293090545099894988182012473466703170157783937873302934404896538337261995680454862441735502556865637909145839304694688324140057229642104588273654096346180116632418345589170248829444934471179206795690822184585196864577932274205101316913141872261673241280391442045565990088555353753789476615480189520529331131737084431448177942371080785938641454814169544682945510387155405628842164935394830439534834414364899293061798829902686953424000191565445443376301466821322836)) EQUAL-OK: (-1 -7328419378154692582095996154896871417180859364059215499795951017184291004736935585112875213382042963101672112493683604487719125754367241799944745692740709618902536797041361790998604440389784433400152821367677898112088109296974723158543796526904068704224629742155957873058885022730020570576709482486932365226790335797713714895726727450815580472833916579444462619458703066931877532806341876107345711861727491348197739596356734520853212676353360416957146142388222740037675402160621598182929824366220106466360520961703776266458001376729172457269208287661198640283928021363288512421248442300840001608102849023832845746660) (/ 10105597264942543888 14352488138967388642) EQL-OK: 5052798632471271944/7176244069483694321 (/ -17631701977702695093 3931860028646338313) EQL-OK: -17631701977702695093/3931860028646338313 (/ -1606495881715082381 16324360910828438638) EQL-OK: -1606495881715082381/16324360910828438638 (/ -7960193178071300653 -10280747961248435844) EQL-OK: 7960193178071300653/10280747961248435844 (/ -11544909483975853384 -16041992360613233027) EQL-OK: 11544909483975853384/16041992360613233027 (/ -5758820541298901548 -2596462557714095861) EQL-OK: 5758820541298901548/2596462557714095861 (/ -13056342734667572546 46502284983183419157350605242474199851) EQL-OK: -13056342734667572546/46502284983183419157350605242474199851 (/ 12668118634717482325 -338544675918656078399121171905238525746) EQL-OK: -12668118634717482325/338544675918656078399121171905238525746 (/ -16738429327795346815 164053836541028518093058940786011794219) EQL-OK: -16738429327795346815/164053836541028518093058940786011794219 (/ -9884600460121235549 -53914696297933680001835530599748561584) EQL-OK: 9884600460121235549/53914696297933680001835530599748561584 (/ 6753521264659576004 71759828079371803409570464915096122874) EQL-OK: 3376760632329788002/35879914039685901704785232457548061437 (/ -6072478784520825268 83641961138289700975241455431547940418) EQL-OK: -3036239392260412634/41820980569144850487620727715773970209 (/ -6708950756971973620 -9847903810677323447803434015107261150885944735136350527205856921771320298384705376646797569973415403097847060539915279223391112430240736564839483430569706) EQL-OK: 3354475378485986810/4923951905338661723901717007553630575442972367568175263602928460885660149192352688323398784986707701548923530269957639611695556215120368282419741715284853 (/ 11263779860755455072 2292311486393743282743453705144070351222990311578446825826935237655927864700827857707370158936582804478427014131790879562565658386819339761919809732496450) EQL-OK: 1877296643459242512/382051914398957213790575617524011725203831718596407804304489206275987977450137976284561693156097134079737835688631813260427609731136556626986634955416075 (/ 9956488981426387585 -12351244248621474338537656633137999145154500022264356186225225426288301330225259889671144104952158102155582320296061124840400655528634050137479515338944145) EQL-OK: -1991297796285277517/2470248849724294867707531326627599829030900004452871237245045085257660266045051977934228820990431620431116464059212224968080131105726810027495903067788829 (/ -14875992781716065391 4906952781757522095285156014969507916562921709689447567404076064849249737893410245743456952512717420040816186768213920574809530298070437840356629617118643) EQL-OK: -2125141825959437913/700993254536788870755022287852786845223274529955635366772010866407035676841915749391922421787531060005830883824030560082115647185438633977193804231016949 (/ 16043178952268979636 -4962728781666935768923030490263743715131420507991284894489828489607808897271220927863958149140648859077934323268424257800724618076505149638049461104621679) EQL-OK: -5347726317422993212/1654242927222311922974343496754581238377140169330428298163276163202602965757073642621319383046882953025978107756141419266908206025501716546016487034873893 (/ -14889985628902581941 3075736124701105220602924325296812116294816310089906623707854625135862902005059305428034753787024827094954645083406870532379125275086885405969947540175361) EQL-OK: -14889985628902581941/3075736124701105220602924325296812116294816310089906623707854625135862902005059305428034753787024827094954645083406870532379125275086885405969947540175361 (/ -1719613957783789857 19860562547348050982501313785551054055826630539673708970554435103060535649825139319625648954889488501680865494719253019921780044205805557658109807483499994523398090829033362953135186523580359552555144614353929273831853529446536288544481045105104526669277307473478898498061888931858821517694257595658138564305517447595298378933983614114298000880741350618424855028965861930329619462261269994651112266861896630584883581092431090390354633458596611690990999635499563944625720180529318327647519405136188243979680965052005899543797270970540925042201315580510136864931200059448645464256385079735225156720340173280541113382758) EQL-OK: -1719613957783789857/19860562547348050982501313785551054055826630539673708970554435103060535649825139319625648954889488501680865494719253019921780044205805557658109807483499994523398090829033362953135186523580359552555144614353929273831853529446536288544481045105104526669277307473478898498061888931858821517694257595658138564305517447595298378933983614114298000880741350618424855028965861930329619462261269994651112266861896630584883581092431090390354633458596611690990999635499563944625720180529318327647519405136188243979680965052005899543797270970540925042201315580510136864931200059448645464256385079735225156720340173280541113382758 (/ -10969623867482498359 1292477254230352575769754773488799598312602810841892384475535212194939033905139960602724737178675944133847094464739764817257836826367652752931492512753561670732296265459534230949226553571982695924178928914002527460943582374603078611662312521259541641138419845784008028215876048965254023368247445173694441960256131358058174374542730502334351759171930973722361567186133851896057677818979314942434199157003833234473048838906103902832115569853657335216793235394595479328932380393044485884605451918890395812628720641212850763944658735838941829604119213195707479940053016354291972875689927240247563236506479099606571912595) EQL-OK: -10969623867482498359/1292477254230352575769754773488799598312602810841892384475535212194939033905139960602724737178675944133847094464739764817257836826367652752931492512753561670732296265459534230949226553571982695924178928914002527460943582374603078611662312521259541641138419845784008028215876048965254023368247445173694441960256131358058174374542730502334351759171930973722361567186133851896057677818979314942434199157003833234473048838906103902832115569853657335216793235394595479328932380393044485884605451918890395812628720641212850763944658735838941829604119213195707479940053016354291972875689927240247563236506479099606571912595 (/ -3716891004757979686 -19452372993227550502015765258932159656814363741878583541173956168837566077148160901999018823586675966076058615847408138956450751813058209394199427182041779436168298455103717521843644244801542056954603631432685194627158423459586845252167819811850263444712218938833443253125954475476481099092216538126519474183531297423759923656571895377587989169731023397615799830371852298135015608612181670362528239430952907458704415974164085176066242388561893721949244663406941558257051263727439679525692652639731850971185056484335828001005009903973037524233097329857690857731943951449292814500362180170793919266389501882641682782987) EQL-OK: 3716891004757979686/19452372993227550502015765258932159656814363741878583541173956168837566077148160901999018823586675966076058615847408138956450751813058209394199427182041779436168298455103717521843644244801542056954603631432685194627158423459586845252167819811850263444712218938833443253125954475476481099092216538126519474183531297423759923656571895377587989169731023397615799830371852298135015608612181670362528239430952907458704415974164085176066242388561893721949244663406941558257051263727439679525692652639731850971185056484335828001005009903973037524233097329857690857731943951449292814500362180170793919266389501882641682782987 (/ -4863232114852441787 -22963038454503597269981750990033903654256693514059439027985256604978917966584414065892146187253799108250061573972673983350956191446047978392921074610323648301008272837432907303975548030552369880338022067315042332692023645592417869181836251486577977896077712912433381480614752789750181208326525834629219729662085632321271870762094800588296544243340047360684854239747242066367921596241226349790282723168222543448385227922748241223520686047460119733024390425165073367321644498280127168757335614077882325524816799960018589278475564547840614315473357481582710826551932681173443524724802157570101916268510464302946527662720) EQL-OK: 4863232114852441787/22963038454503597269981750990033903654256693514059439027985256604978917966584414065892146187253799108250061573972673983350956191446047978392921074610323648301008272837432907303975548030552369880338022067315042332692023645592417869181836251486577977896077712912433381480614752789750181208326525834629219729662085632321271870762094800588296544243340047360684854239747242066367921596241226349790282723168222543448385227922748241223520686047460119733024390425165073367321644498280127168757335614077882325524816799960018589278475564547840614315473357481582710826551932681173443524724802157570101916268510464302946527662720 (/ -16248276650501285553 -3381199474840825715485713565301777938368574604710714363907009216856320913536015299178065264912798511857598595067318796576494480424838898250138649774858742984769125731728430552285782315111538920026330816414650913188340281906359149109963139438960274321560117812365241840204034925444652058916966934904097509799291744775242863360284348334605170437300543978049053839829106628489146216325576991696936733592366926096500684308845306493636196092408597450926695579897293944488261001228478152650490677071497874746121221519036861983646423005753475340900508665494162949119110128646472783016552527735050067363030838015919512260159) EQL-OK: 16248276650501285553/3381199474840825715485713565301777938368574604710714363907009216856320913536015299178065264912798511857598595067318796576494480424838898250138649774858742984769125731728430552285782315111538920026330816414650913188340281906359149109963139438960274321560117812365241840204034925444652058916966934904097509799291744775242863360284348334605170437300543978049053839829106628489146216325576991696936733592366926096500684308845306493636196092408597450926695579897293944488261001228478152650490677071497874746121221519036861983646423005753475340900508665494162949119110128646472783016552527735050067363030838015919512260159 (/ 18296946401228630959 3302341071702763311560113831030141639804425031433511503765833897787925467295486187687396312611805794369889470239777040624530990622212474466940548049117664906468330871893337410618797113677420975837622378808494314918471282099855916016026079371666730617071364751834080179173620476977670099126230223862266413091012344741482772771219725893630556702028108027870656512750807359335108428687238687397060104669074315031780019301768744978815422943986587389425726602444937024004102212071953113581935989741954695450085391443134273670514145585869912689150728183940456773133212037846765421397201956541430155664614978559762638030787) EQL-OK: 494512064898071107/89252461397371981393516590027841665940660135984689500101779294534808796413391518586145846286805562009997012709183163260122459206005742553160555352678855808282927861402522632719426949018308675022638442670499846349147872489185295027460164307342344070731658506806326491329016769648045137814222438482763957110567901209229264128951884483611636667622381298050558284128400198900948876451006451010731354180245251757615676197345101215643660079567205064579073691957971270919029789515458192258971242965998775552705010579544169558662544475293781424031100761728120453327924649671534200578302755582200815017962566988101692919751 (/ -60488682170925814337492051725122486652 14880088785789146426) EQL-OK: -30244341085462907168746025862561243326/7440044392894573213 (/ 126617729996196635247771282957911941277 -7166506344996883172) EQL-OK: -126617729996196635247771282957911941277/7166506344996883172 (/ -278675896803726074870988122161067771390 7744689831802931490) EQL-OK: -27867589680372607487098812216106777139/774468983180293149 (/ -283351838662873779255871649630248958879 6912311315831153835) EQL-OK: -14913254666467041013466928927907839941/363805858727955465 (/ -9715584046609700027352634666499181378 3368831995960494221) EQL-OK: -9715584046609700027352634666499181378/3368831995960494221 (/ -137493547985106345282009151869389470397 -1916381539906956855) EQL-OK: 137493547985106345282009151869389470397/1916381539906956855 (/ -328662747577960331872949773416436800743 -231069430804205460334599495337085157308) EQL-OK: 328662747577960331872949773416436800743/231069430804205460334599495337085157308 (/ 213595640581249636406536485951630735277 -48492294677143227478357598229530842959) EQL-OK: -213595640581249636406536485951630735277/48492294677143227478357598229530842959 (/ 85922846498729014445816145204889624189 193533957681757355413031965695625196813) EQL-OK: 85922846498729014445816145204889624189/193533957681757355413031965695625196813 (/ 24053342958857142686054803491202486471 196417511107100936775397820630955772553) EQL-OK: 24053342958857142686054803491202486471/196417511107100936775397820630955772553 (/ 102038936612518756467074084117019701214 -111946989731587760700903475996379168167) EQL-OK: -102038936612518756467074084117019701214/111946989731587760700903475996379168167 (/ -3006867214208872584699983438179656913 -234257597822744479264249663225224173340) EQL-OK: 3006867214208872584699983438179656913/234257597822744479264249663225224173340 (/ -279839802710533516603863620922251878907 -3244112647743502769852782626803305310331045534071805654982307107362388474314396636799597033636575215617240554815450017779373048313695795886893032630263219) EQL-OK: 279839802710533516603863620922251878907/3244112647743502769852782626803305310331045534071805654982307107362388474314396636799597033636575215617240554815450017779373048313695795886893032630263219 (/ 123635964546481689465778244982425098404 7701433613491146708866098469269971554817017737111287276993583150548359764165526640986060909954451793171933304569726872785964805121981749276421956645830854) EQL-OK: 61817982273240844732889122491212549202/3850716806745573354433049234634985777408508868555643638496791575274179882082763320493030454977225896585966652284863436392982402560990874638210978322915427 (/ 166158110049010486343321316578688184578 4093720847216792748840371965199135052196058344862447621818024731938681519017878880275303125899149558774718190527651555811733139227128378041055212888819294) EQL-OK: 83079055024505243171660658289344092289/2046860423608396374420185982599567526098029172431223810909012365969340759508939440137651562949574779387359095263825777905866569613564189020527606444409647 (/ 147416259636838312272435267341375281181 -11266711292262839805944890501811605204323255169233519804446548849178247889563130015168799346120099052214488209897402054530713234143622703174309015777885801) EQL-OK: -147416259636838312272435267341375281181/11266711292262839805944890501811605204323255169233519804446548849178247889563130015168799346120099052214488209897402054530713234143622703174309015777885801 (/ 102557200511608632541115941654031896919 3866177549962722728707550488877109233779215384377007088712280650225992470307822792085413087509167847767889824884877044539352696974351192629898363157976511) EQL-OK: 102557200511608632541115941654031896919/3866177549962722728707550488877109233779215384377007088712280650225992470307822792085413087509167847767889824884877044539352696974351192629898363157976511 (/ 47794953079190110032282671989549362415 3802290983508829335098916118339496411537222492645529399519373082799614656011270200284796148989094312601047370399228868583158444769807910513767845541589667) EQL-OK: 47794953079190110032282671989549362415/3802290983508829335098916118339496411537222492645529399519373082799614656011270200284796148989094312601047370399228868583158444769807910513767845541589667 (/ -169956065319483471022234920202991103615 -9934427489865644196610501807375648335352544234206717324511161205173460054921759084767897792996557220898467288533128078406604709773449948420404563411793533441010236017064154469575084055359823982786110746700747423674942932421964955746280671982635899487781780756099620799397239156211815110739544719746684712086075069101799537802834839550142629064374734870047412916259754010150500874430055034366305216104752636211802195447299210332237598443674867760860326529472901775427058078447963316168327741049511844237329137194533000697525539835371015163158135757326482343130221118201740819963770851200676279882978581431999960842565) EQL-OK: 33991213063896694204446984040598220723/1986885497973128839322100361475129667070508846841343464902232241034692010984351816953579558599311444179693457706625615681320941954689989684080912682358706688202047203412830893915016811071964796557222149340149484734988586484392991149256134396527179897556356151219924159879447831242363022147908943949336942417215013820359907560566967910028525812874946974009482583251950802030100174886011006873261043220950527242360439089459842066447519688734973552172065305894580355085411615689592663233665548209902368847465827438906600139505107967074203032631627151465296468626044223640348163992754170240135255976595716286399992168513 (/ -83006311763073652927964071041666508273 13480787677843057038436344704360462056114592749322481662307876594244244638227291805757775026215166740035048814729231681821563443093991755779505400592913963236010573873554317250153995160235771659208137440518282824497744092608999871327127239673370293239927529076145825972430101380272357235582367639159280348164804218713823424182167974242317526959809443701996053548231667727254858428867000011055354779789221097183515832386890638024105232865079002765479933320220378271026425568216748186200736499581088153390350474814123049637951929317200314355414551809067125550551841102097159644340520444983020267926123546444838010089690) EQL-OK: -83006311763073652927964071041666508273/13480787677843057038436344704360462056114592749322481662307876594244244638227291805757775026215166740035048814729231681821563443093991755779505400592913963236010573873554317250153995160235771659208137440518282824497744092608999871327127239673370293239927529076145825972430101380272357235582367639159280348164804218713823424182167974242317526959809443701996053548231667727254858428867000011055354779789221097183515832386890638024105232865079002765479933320220378271026425568216748186200736499581088153390350474814123049637951929317200314355414551809067125550551841102097159644340520444983020267926123546444838010089690 (/ -312626207169475064151212222217866488926 6989069923898656093413456232544365450599471748502878018530391549015151484336014906416216966193568842618920902504390187814247729346977677905224098932673981665869061845335443588666641982676550205160521286690015544764015602751932938178737949961754714143180917985455875095030469699198116593730005119922928175789172042067281849364217595912265452199938281052984802042194034638773435768458457616208103331213440768472281882976004050012769415198321241810008696147179275528426468408383757692656341606162350211696837361434874035354680073309142183699892959618671515841112321607728427286289324836870027735590091451421689980776552) EQL-OK: -52104367861579177358535370369644414821/1164844987316442682235576038757394241766578624750479669755065258169191914056002484402702827698928140436486817084065031302374621557829612984204016488778996944311510307555907264777773663779425034193420214448335924127335933791988823029789658326959119023863486330909312515838411616533019432288334186653821362631528673677880308227369599318710908699989713508830800340365672439795572628076409602701350555202240128078713647162667341668794902533053540301668116024529879254737744734730626282109390267693725035282806226905812339225780012218190363949982159936445252640185386934621404547714887472811671289265015241903614996796092 (/ -151709660794612786408772973806200383563 -26960472721919005254400858042130056790831511338891584787669209989714807518625849812230185079206081782191501696661436514815190623849929065098497737155759771863508038766934134444191240792356114381746781342181881402424707118515655119761011977116554236461222788625158348668147995099157685699761135150772589445239536582228655532345059046596356954495360132444243748421428095867292294626357084961338288369883088525401649234025290736504802104065029036642533076183281468647642956623788270236516849523210698622687255735945678505925047193818483603361307498423724202227256505312543145618362906047473400380196192622607541097732443) EQL-OK: 151709660794612786408772973806200383563/26960472721919005254400858042130056790831511338891584787669209989714807518625849812230185079206081782191501696661436514815190623849929065098497737155759771863508038766934134444191240792356114381746781342181881402424707118515655119761011977116554236461222788625158348668147995099157685699761135150772589445239536582228655532345059046596356954495360132444243748421428095867292294626357084961338288369883088525401649234025290736504802104065029036642533076183281468647642956623788270236516849523210698622687255735945678505925047193818483603361307498423724202227256505312543145618362906047473400380196192622607541097732443 (/ 138834496986391136939574372853300933725 -8052690543272184576133758511645801940246473546142520821850130421981395129853341888352999304040698251945886555605291324954368612109314080471658982022831338507499254609048475429862437003158379101603576571787302167207044118847876475134352180874260998595377014195145760071923429129767580115085764485254455919915567128572731355497418831212259648020550107573824886521471697331410754043280744066090848295906051303624846301488010249980896364883452154860562864255354208802313850527991005497484253401461375477060954782095047043919500670383372218536999834862885439984085848342867301834247551832677237328664699302165347765799113) EQL-OK: -15426055220710126326619374761477881525/894743393696909397348195390182866882249608171793613424650014491331266125539260209816999922671188694660654061733921258328263179123257120052406553558092370945277694956560941714429159667017597677955952952420811351911893790983097386126039131208251222066153001577238417785769269903307508901676196053917161768879507458730303483944157647912473294224505567508202765169052410814601194893697860451787872032878450144847205144609778916664544040542605794984506984917261578755812650058665667277498250377940152830784550531343894115991055630042596913170777759429209493331565094260318589092694172425853026369851633255796149751755457 (/ 276499207940187081393841843387608369874 27347897028734618663428054896349668572244941195143856840032842195489553215406302254043947382368793914074147314353589439281000471813879502242851166670252197853998033813694814376228360691543987661407996785043637351295817024680721181205269262470473172181965930243852520386958529041036476807810647578694133804796395977642274699322030062940721165202488695975750512485574440928370802874677938542169620505668128224812441566912043326338714451629730522324228356364241376445033028898865300103247057378058702233150414643818049655628999871012383236520330575609745427181485617250755214922048672375947942288446974485524776744246517) EQL-OK: 8919329288393131657865865915729302254/882190226733374795594453383753215115233707780488511510968801361144824297271171040453030560721573997228198300463019014170354853929479983943317779570008135414645097864957897237942850344888515731013161186614310882299865065312281328425976427821628166844579546136898468399579307388420531509929375728344972058219238579923944345139420324610991005329112538579862919757599175513818412995957352856199020016311875104026207792481033655688345627471926791042717043753685205691775258996737590325911195399292216201069368214316711279213838705516528491500655825019669207328435019911314684352324150721804772331885386273726605701427307 (/ -8979365591106781219797187096315899769868799444656824967426553299158070014074001230883484015880186603742048949313393413640240595706939311540002219411120389 -1698360947072008877) EQL-OK: 1282766513015254459971026728045128538552685634950974995346650471308295716296285890126212002268598086248864135616199059091462942243848473077143174201588627/242622992438858411 (/ -12831814656788829919185319784994714617782749504716966706877579983082880759985031662545957372565411439648298939198657738497464024214657609856476819270030801 454910754379715) EQL-OK: -273017333123166594025219569893504566335803180951424823550586808150699590637979397075445901543944924247836147642524632733988596259886332124605889771702783/9678952220845 (/ -7834266257250691217409788323211914445703052638619784568844628449769010091330019095736167988675873769434766592786720961949649685040028101508217441360672222 -428418418877192732) EQL-OK: 3917133128625345608704894161605957222851526319309892284422314224884505045665009547868083994337936884717383296393360480974824842520014050754108720680336111/214209209438596366 (/ 5737805823029931079838944835405107564434908634489801628049345331760087020955028323378020396677249341204498685189403657652738071833877470777083253103936452 9588993061977446661) EQL-OK: 5737805823029931079838944835405107564434908634489801628049345331760087020955028323378020396677249341204498685189403657652738071833877470777083253103936452/9588993061977446661 (/ -4001605821592542867351046644170905984672346731784670159062281252096012802838642896466582343641124674682428297533953704119505640938363392225910275838094045 15760991890495426717) EQL-OK: -4001605821592542867351046644170905984672346731784670159062281252096012802838642896466582343641124674682428297533953704119505640938363392225910275838094045/15760991890495426717 (/ 2876630161532936743269451364955814480771395635620140205538288339793482694260173239474830738010159518887660000673207712630507802368373928478641773477534499 -6788234478844960330) EQL-OK: -2876630161532936743269451364955814480771395635620140205538288339793482694260173239474830738010159518887660000673207712630507802368373928478641773477534499/6788234478844960330 (/ 6230070442453337264527950102774203962152836811174649694700041895216739851602598854067104967963392074425258687296947909484969927078206601660837276754799333 190237375887614033974333796608341639595) EQL-OK: 6230070442453337264527950102774203962152836811174649694700041895216739851602598854067104967963392074425258687296947909484969927078206601660837276754799333/190237375887614033974333796608341639595 (/ -12098771374444180013224380531550204930654718468097503123335711776524055419889032578894177605164827523969169377266342179411916625188550162928371789854647472 -41681385674896602840749705069663453185) EQL-OK: 12098771374444180013224380531550204930654718468097503123335711776524055419889032578894177605164827523969169377266342179411916625188550162928371789854647472/41681385674896602840749705069663453185 (/ 13185465843955116174925558412278612918939024395488172088108029202384613698982949554556435640011161663974075894844304583900497170806796813871943782330552768 -155202352609947911537719051033334010254) EQL-OK: -6592732921977558087462779206139306459469512197744086044054014601192306849491474777278217820005580831987037947422152291950248585403398406935971891165276384/77601176304973955768859525516667005127 (/ 12784980722915659825738808684740823452025110516624579136271791852138148426775553817114893299569867520414470532361018804123866264934222335562072872489963044 -249441012384365373362771955533424187237) EQL-OK: -12784980722915659825738808684740823452025110516624579136271791852138148426775553817114893299569867520414470532361018804123866264934222335562072872489963044/249441012384365373362771955533424187237 (/ 8517839393030302736298983538193047531846908718502576675615969705563208303329257882565359266876007571790337440612227785062203468682754778416335180236967433 -23101645464137481399279134347982485126) EQL-OK: -8517839393030302736298983538193047531846908718502576675615969705563208303329257882565359266876007571790337440612227785062203468682754778416335180236967433/23101645464137481399279134347982485126 (/ -10157767522292361462005308817460390811646115952647174687477824271227382383351453540195549992670001314693794150879368708343715654899952822395459036505947192 -25611473771508763579433379623726126173) EQL-OK: 10157767522292361462005308817460390811646115952647174687477824271227382383351453540195549992670001314693794150879368708343715654899952822395459036505947192/25611473771508763579433379623726126173 (/ -8580252632668820290302987230726290672170301642399871646484841866604753910447257372311950907045477729554307803379310475132687855999835211879267570997069974 5347050029330174629945013741349819215851040371727058829687387719215168997632386672310746837193930669173408831178932364105722911104309540550576485594530627) EQL-OK: -8580252632668820290302987230726290672170301642399871646484841866604753910447257372311950907045477729554307803379310475132687855999835211879267570997069974/5347050029330174629945013741349819215851040371727058829687387719215168997632386672310746837193930669173408831178932364105722911104309540550576485594530627 (/ 7706102251141221799524762336156378964168657337573751909064577951085535246905735244239132983582998872001001594454632956803416956154262109939446710205558308 6334400709835247308796432875490978646658012545184955441452799118298109610816693049400832749087993843490999852355789914065232784070007399786089389453289854) EQL-OK: 3853051125570610899762381168078189482084328668786875954532288975542767623452867622119566491791499436000500797227316478401708478077131054969723355102779154/3167200354917623654398216437745489323329006272592477720726399559149054805408346524700416374543996921745499926177894957032616392035003699893044694726644927 (/ 12609622044672092190084693450911157599596799695538449568681964257744962273690941575572590166273187189250007688411096790312605666562908125521094386992971478 -8237858212652788898158635047388584411011830102060269605835391741772914864422465141467281143809161251942948659243584296367296559912373856433388249393853968) EQL-OK: -6304811022336046095042346725455578799798399847769224784340982128872481136845470787786295083136593594625003844205548395156302833281454062760547193496485739/4118929106326394449079317523694292205505915051030134802917695870886457432211232570733640571904580625971474329621792148183648279956186928216694124696926984 (/ -9988492519236282081446302885464711911055350309732728352574982611126604133339499170845224383282665522673248920309221355720665956477799939031063172954469785 -1878204914631111607000020160429571305542722711529281855381736226230242796648854769713662269068364131804626863789957256573308715572826753755672493154125086) EQL-OK: 9988492519236282081446302885464711911055350309732728352574982611126604133339499170845224383282665522673248920309221355720665956477799939031063172954469785/1878204914631111607000020160429571305542722711529281855381736226230242796648854769713662269068364131804626863789957256573308715572826753755672493154125086 (/ -10729942326579120947061030583094707809945059776287551713953926998992375520903658867971835616518813070294302895655369081976222497359056962112544408591462495 -4917625712783289245414023733273041940212797202855299465496072729329693853584860839801663152618595377553772371725021213143455497822882736730281253858119747) EQL-OK: 10729942326579120947061030583094707809945059776287551713953926998992375520903658867971835616518813070294302895655369081976222497359056962112544408591462495/4917625712783289245414023733273041940212797202855299465496072729329693853584860839801663152618595377553772371725021213143455497822882736730281253858119747 (/ 8114113595157517238445304590338354472776364877475201453112450680537221171989478096363668912966343706408770932684807802285529572133696646343108263717309148 5443953102973235688784499815692116502566847594605098596244123647428188581304528525010862185203718640610834003873728718183528722470626702382993497913086105) EQL-OK: 8114113595157517238445304590338354472776364877475201453112450680537221171989478096363668912966343706408770932684807802285529572133696646343108263717309148/5443953102973235688784499815692116502566847594605098596244123647428188581304528525010862185203718640610834003873728718183528722470626702382993497913086105 (/ -7125100205152691887479515774712530950031072786448635736036405923401522078562323494262148946679985384635556474075282302608446439950458673260234175964199684 -23871420315894180764743988478670341498770583257649869670486332228804693253344466615199983955886679924409910043885402198203427975742868174334723967563526738510726448815413356678504144193747696164586135745786501041060322480940451156015256191962506052700295351077719851275026974629635679531161390660244641370183176979934485671396035404817388717005746812037357500295693454623478902942336087760288091719793968445716246099043828787040340339906538864570506773535078524092440112404847904632624419421052178754041718790915772437556681684830937503838434712179830722395832238257078212535157309743054115702650740005055678387806081) EQL-OK: 7125100205152691887479515774712530950031072786448635736036405923401522078562323494262148946679985384635556474075282302608446439950458673260234175964199684/23871420315894180764743988478670341498770583257649869670486332228804693253344466615199983955886679924409910043885402198203427975742868174334723967563526738510726448815413356678504144193747696164586135745786501041060322480940451156015256191962506052700295351077719851275026974629635679531161390660244641370183176979934485671396035404817388717005746812037357500295693454623478902942336087760288091719793968445716246099043828787040340339906538864570506773535078524092440112404847904632624419421052178754041718790915772437556681684830937503838434712179830722395832238257078212535157309743054115702650740005055678387806081 (/ 4801495919363827077158204249631885157347198552733998896638174958434968555935827788499392382851493568264006507028024783408190862186734863708684652212703744 29234959990138609668202089052356468732793041824333219340488007351402997202222578434579705387840772390513345507274006495462445058795870182760749392281528881636623188890883479914921272700981309656920982410970774047916714087713562927554033500521877735827036675598267184309367127514966388636440710253467328441763131873309183205727440365838789320851968108312559316922678357314418486932673434031479515016224407618177089903730349114511598373251388750023508633761000320088841886505077453257141723747388913336375142897897501529451618927178835485127020789481918641637409265186365292847057986276062625965612268181771076051892980) EQL-OK: 1200373979840956769289551062407971289336799638183499724159543739608742138983956947124848095712873392066001626757006195852047715546683715927171163053175936/7308739997534652417050522263089117183198260456083304835122001837850749300555644608644926346960193097628336376818501623865611264698967545690187348070382220409155797222720869978730318175245327414230245602742693511979178521928390731888508375130469433956759168899566796077341781878741597159110177563366832110440782968327295801431860091459697330212992027078139829230669589328604621733168358507869878754056101904544272475932587278627899593312847187505877158440250080022210471626269363314285430936847228334093785724474375382362904731794708871281755197370479660409352316296591323211764496569015656491403067045442769012973245 (/ 10769619761532897875307527770350128978615798426116103116325434914975512103385205123955114305107607195469345895102375220593168903042839441996791318999499708 -7224105715967976893083374742254251507019823877014718307738328810406361200631626366722837314776666720638271529652546975342143108973422364041422652163016078890272393678677152791565494865444430757858556891645947268886646732022748338160528677218733159766121781240328812893374941548395710123982510227501927393735585082736583984561348450061452997663109932611188779299623613963995350679177776686423432406091192517292522853783968685873925548901506191291253596763183277703635837071862492572256145656312023955675669362656148946145528559574994353884313568526553663370513565393821926602014407548325293145102073923450066319746913) EQL-OK: -10769619761532897875307527770350128978615798426116103116325434914975512103385205123955114305107607195469345895102375220593168903042839441996791318999499708/7224105715967976893083374742254251507019823877014718307738328810406361200631626366722837314776666720638271529652546975342143108973422364041422652163016078890272393678677152791565494865444430757858556891645947268886646732022748338160528677218733159766121781240328812893374941548395710123982510227501927393735585082736583984561348450061452997663109932611188779299623613963995350679177776686423432406091192517292522853783968685873925548901506191291253596763183277703635837071862492572256145656312023955675669362656148946145528559574994353884313568526553663370513565393821926602014407548325293145102073923450066319746913 (/ 1505915608160301518246681692927442986955390537144107830770082927276722640395785957392652130911646706470337068266772174699405268120590454296080828168261019 31152879253507543898583880698200027990847289346701738353567402100527465991154555548630544962150902011282973749886327325250084401181379196961322399337408341296727915922288276602390334861175305055229766353672502691855637668618950047400571070157436221479289152631256433294884836727331457389922838951144187501751190662594278336543502171639899940796536926507796271202659224890656712231014450702948847764643603683153113663072089256293587951842007583210791100743318865647555912543508324790181772321217524164822106191538518498016236866957803105254555578252294418243701672226181762763332992886540089416888889135117147250495261) EQL-OK: 1505915608160301518246681692927442986955390537144107830770082927276722640395785957392652130911646706470337068266772174699405268120590454296080828168261019/31152879253507543898583880698200027990847289346701738353567402100527465991154555548630544962150902011282973749886327325250084401181379196961322399337408341296727915922288276602390334861175305055229766353672502691855637668618950047400571070157436221479289152631256433294884836727331457389922838951144187501751190662594278336543502171639899940796536926507796271202659224890656712231014450702948847764643603683153113663072089256293587951842007583210791100743318865647555912543508324790181772321217524164822106191538518498016236866957803105254555578252294418243701672226181762763332992886540089416888889135117147250495261 (/ -4912349668310730778272626761660101328812783790262451913449395750351147048676353891314609774894027305081515542385381430403698808605768281804457186380542764 6582102431028556562269167182029950958541569095123705594954788174046339660437206159173417583841743892857066740116322758515837624700881569925244230209567223461401193316695082415261197843574563450002486582967745135870782254839990479649574452750850133306720341823136645982650022199634379361313745598455049448887744206616434903460504591098363901961758069797933831934878649993183747273660007900662110776570580293994733189753806312784239743585453090900671308673380802381312083077891736513388250097195232616017027333586286786139736783210630705878401429301217589001317082952461701571026008195534878902572422952568763551674434) EQL-OK: -2456174834155365389136313380830050664406391895131225956724697875175573524338176945657304887447013652540757771192690715201849404302884140902228593190271382/3291051215514278281134583591014975479270784547561852797477394087023169830218603079586708791920871946428533370058161379257918812350440784962622115104783611730700596658347541207630598921787281725001243291483872567935391127419995239824787226375425066653360170911568322991325011099817189680656872799227524724443872103308217451730252295549181950980879034898966915967439324996591873636830003950331055388285290146997366594876903156392119871792726545450335654336690401190656041538945868256694125048597616308008513666793143393069868391605315352939200714650608794500658541476230850785513004097767439451286211476284381775837217 (/ -11503235648135220410087372678575470255397243144180272745183844970864347348074104828328211521698012119761674096067066173927209129755062269068090560678650614 -5548338218081690289723998288742945948643693817491921699797822887914665364835947234564530865119623677435878746610856459141463506776423054050179729345956931675338102809929977610828639446535095411122377961067651902947030310564736893080382424590568134091858634304377553326990788802662029347894499019277621467098333287442862683493159356014650672092060912274570436879076161496563079759704321556494898013269338428360856068237785049960484767969682269790642298701577934519452927652996671267126348627432295779183359417597868330923329974640383630473044712419371517153268338860560601603043892503067815822312755611206254762903436) EQL-OK: 5751617824067610205043686339287735127698621572090136372591922485432173674037052414164105760849006059880837048033533086963604564877531134534045280339325307/2774169109040845144861999144371472974321846908745960849898911443957332682417973617282265432559811838717939373305428229570731753388211527025089864672978465837669051404964988805414319723267547705561188980533825951473515155282368446540191212295284067045929317152188776663495394401331014673947249509638810733549166643721431341746579678007325336046030456137285218439538080748281539879852160778247449006634669214180428034118892524980242383984841134895321149350788967259726463826498335633563174313716147889591679708798934165461664987320191815236522356209685758576634169430280300801521946251533907911156377805603127381451718 (/ -22964048032108117904633365483799091488990853392670636861794813863757795874434768543212887316456319246155824842161717179767513360050328383696194174741889496306018655333450647372293193335577883672679165775070112770359697627614883420620410888137853011387271594559450892054491963940112235887802995117234918878648066362268919389271696465517050425727202664230530633207566444357393843669758809938086228366322548799235049875711702216182219182908217345405023677260470015666831191434586902791186444958476491096759363292487221288620810273243009200212776634572092195691654105986099646006756823055390654876878195583529521482548988 10644501761877612307) EQL-OK: -22964048032108117904633365483799091488990853392670636861794813863757795874434768543212887316456319246155824842161717179767513360050328383696194174741889496306018655333450647372293193335577883672679165775070112770359697627614883420620410888137853011387271594559450892054491963940112235887802995117234918878648066362268919389271696465517050425727202664230530633207566444357393843669758809938086228366322548799235049875711702216182219182908217345405023677260470015666831191434586902791186444958476491096759363292487221288620810273243009200212776634572092195691654105986099646006756823055390654876878195583529521482548988/10644501761877612307 (/ -19058897134776675884737764093896349427183484738023061956638485191239529906311503740032626797095131123523175909943402828257449376045336777553758951620699386266853663342003969442142858702229701661125904623724248177901462857013835790939020450746503125344631958534655024089231193396521561965297735217497608287565163852923704017958259400904834287026933197193592591423799328167149965328232560408884408251535373934831244856695227539243433290481951528897142697352526450162440279318507285454432916819060795455956931254810171588139618689138022062041222735056137988435900866680084665165131313435515187611756148824388549448126467 -8326067459929079652) EQL-OK: 19058897134776675884737764093896349427183484738023061956638485191239529906311503740032626797095131123523175909943402828257449376045336777553758951620699386266853663342003969442142858702229701661125904623724248177901462857013835790939020450746503125344631958534655024089231193396521561965297735217497608287565163852923704017958259400904834287026933197193592591423799328167149965328232560408884408251535373934831244856695227539243433290481951528897142697352526450162440279318507285454432916819060795455956931254810171588139618689138022062041222735056137988435900866680084665165131313435515187611756148824388549448126467/8326067459929079652 (/ 25828007361450952719858846443651616751980622231808382804245407702688699228397920589229449608543284896555585501243582045708656531815385828908740757435341854996277769645696261182122648194952548457487178342682313459444433667556195761154944956714756269417591048771194019245925463541886773351873002480266654825771525233808830260734678788520487541379982691221386179066818743751876186761036101255542680066874888848011074569355779905086056095043888696435054884292698783753890317487209955316141370052511469715869816445031102161253514609763532756500340262263800747279044587806090353812452308490155782240390040070679663451429071 -16419739031141199968) EQL-OK: -25828007361450952719858846443651616751980622231808382804245407702688699228397920589229449608543284896555585501243582045708656531815385828908740757435341854996277769645696261182122648194952548457487178342682313459444433667556195761154944956714756269417591048771194019245925463541886773351873002480266654825771525233808830260734678788520487541379982691221386179066818743751876186761036101255542680066874888848011074569355779905086056095043888696435054884292698783753890317487209955316141370052511469715869816445031102161253514609763532756500340262263800747279044587806090353812452308490155782240390040070679663451429071/16419739031141199968 (/ -1669696848499325185991294008037906453080648048592518700324899343297324898656645662186964240087582483813312797482298159224575128489696846451225871663856944749639170892311973606684486632224811435175199158920841554176114937196187087530038509898368755036744105403511353564606301040888877621412514452110348953863172547944175251415725815533087344857665837809749724257466399374547882097484009980477192931829030533366309859182367479867549644502538060694266048652224732348150866071381652452605392696555259221463464108413747443898588713629829490175098280805280460168541344102200890646453100478450456898359263676257882174308268 -3154577849943484396) EQL-OK: 417424212124831296497823502009476613270162012148129675081224835824331224664161415546741060021895620953328199370574539806143782122424211612806467915964236187409792723077993401671121658056202858793799789730210388544028734299046771882509627474592188759186026350877838391151575260222219405353128613027587238465793136986043812853931453883271836214416459452437431064366599843636970524371002495119298232957257633341577464795591869966887411125634515173566512163056183087037716517845413113151348174138814805365866027103436860974647178407457372543774570201320115042135336025550222661613275119612614224589815919064470543577067/788644462485871099 (/ -2215504974719141921873290809898041836016933916943403987778356628123168736190963062169230280020568365292362281642280014010817115943641228422541948070912910166283758843455538187697141038676028739959626556519808411324617157646799936128314485433146912658200236754847332237438334421065771940922444296618134121662770699950019164632463150784605652351782139277998735272280336096528241168196650073301607171613955878761317417480490869592669781417658461696905996344800864447403426286476662235990122025654999230690604488053668524888833992415515434190712628587043474760836969696399229242018051635699746048823240033842587927229964 -11305319675542865070) EQL-OK: 1107752487359570960936645404949020918008466958471701993889178314061584368095481531084615140010284182646181140821140007005408557971820614211270974035456455083141879421727769093848570519338014369979813278259904205662308578823399968064157242716573456329100118377423666118719167210532885970461222148309067060831385349975009582316231575392302826175891069638999367636140168048264120584098325036650803585806977939380658708740245434796334890708829230848452998172400432223701713143238331117995061012827499615345302244026834262444416996207757717095356314293521737380418484848199614621009025817849873024411620016921293963614982/5652659837771432535 (/ 24358677073350645219370308521851912760304925518671532565724702185818845784332554892130070740233218685874351979772556877899278790031132507391155876157108663291716896413773711734271947599485714147026138105714458778787734198938526335256418673319464023475137997251085298903419563039860433435847755093653670989129405749785476487449599232956305952768800154351414655365461746574761818724131185410194605648466196476174400166047788352670171627261342369793028465418799251589432585363577887467959594667618177199696618852093807640490831859585621198048572586882398004957371434677752931134884039120875470266936204172511104679441462 8754800987327220648) EQL-OK: 12179338536675322609685154260925956380152462759335766282862351092909422892166277446065035370116609342937175989886278438949639395015566253695577938078554331645858448206886855867135973799742857073513069052857229389393867099469263167628209336659732011737568998625542649451709781519930216717923877546826835494564702874892738243724799616478152976384400077175707327682730873287380909362065592705097302824233098238087200083023894176335085813630671184896514232709399625794716292681788943733979797333809088599848309426046903820245415929792810599024286293441199002478685717338876465567442019560437735133468102086255552339720731/4377400493663610324 (/ -26302114071841994464108666310942614602208671348774320769941579409198660404735714925432808094014718434192516800374483192192707032773903982752997957629389083405320034044554226640590549491188742685901503166669355807243735533977994184111229208270447279559478659750835531593667003322059717930484363943660175452777363121025595100592911646539549735930625865256846706785601753749996181113742254145758187876411260965175520035400453360390392991183382425735199046574346992179663247011131958270717402007532256308394559029768974932620173103778338779940189812875680687510582798628982957687329572431433891809534332514765287899172737 196971971351558855568201373145365478995) EQL-OK: -26302114071841994464108666310942614602208671348774320769941579409198660404735714925432808094014718434192516800374483192192707032773903982752997957629389083405320034044554226640590549491188742685901503166669355807243735533977994184111229208270447279559478659750835531593667003322059717930484363943660175452777363121025595100592911646539549735930625865256846706785601753749996181113742254145758187876411260965175520035400453360390392991183382425735199046574346992179663247011131958270717402007532256308394559029768974932620173103778338779940189812875680687510582798628982957687329572431433891809534332514765287899172737/196971971351558855568201373145365478995 (/ -25700334917103749626396366612061842558162882395534131493737229591609654899446089376271023701490708870843231350129849819430092002268875830384992877382393956173037794109904701961390126146975281052960293513473777226100954163054292968509501976296424278813632162404905591038465215586347229260479401862039805429711982871702185657527199220459658257385112793877259572278229045135617281858788415643567614198333459934599272409406206213115625226065750113120833933806486512117533453281522448845990642550827848765145774541658722594353290694745164913189694785762218575339370800538946514325662656804799046877175035545715523049884960 56325873113907570153638933263921340484) EQL-OK: -6425083729275937406599091653015460639540720598883532873434307397902413724861522344067755925372677217710807837532462454857523000567218957596248219345598489043259448527476175490347531536743820263240073378368444306525238540763573242127375494074106069703408040601226397759616303896586807315119850465509951357427995717925546414381799805114914564346278198469314893069557261283904320464697103910891903549583364983649818102351551553278906306516437528280208483451621628029383363320380612211497660637706962191286443635414680648588322673686291228297423696440554643834842700134736628581415664201199761719293758886428880762471240/14081468278476892538409733315980335121 (/ -25716495567761925495340309269248196976121711927176026606462843116646034561721958499564011513233986043633061335866265799467020807570689498961190839877265773450484494789052182300993137822542881883769593344810286970036960228835955266304979090841345697560418139960733748874044680214388098802745248923989851173047158103142988835055585349795022662576576434371181693607267864646932929998659458265265400181839509356921460222604661909947838434113964465769102604033848276159366897885013231683417270877512514679528402888899725431524867260144325739317224922955028035417867933390409466302057857579158202739536568407090965929352402 -92089830031261826185903006947297196357) EQL-OK: 25716495567761925495340309269248196976121711927176026606462843116646034561721958499564011513233986043633061335866265799467020807570689498961190839877265773450484494789052182300993137822542881883769593344810286970036960228835955266304979090841345697560418139960733748874044680214388098802745248923989851173047158103142988835055585349795022662576576434371181693607267864646932929998659458265265400181839509356921460222604661909947838434113964465769102604033848276159366897885013231683417270877512514679528402888899725431524867260144325739317224922955028035417867933390409466302057857579158202739536568407090965929352402/92089830031261826185903006947297196357 (/ 6427758281007308443295844679532867042370757542760390680622584758338041709910068192973790897624827722686313216884084305612889554116246627679267186323854642904894988936981064543865794245002470271142875081223308666588659587718561791667575945670118263124267218395749059879636505504607358472659126298770422135028955713148882314050530771750859372048576074912599265823577267962213046012777760882389021047579367276198483178024744924299929585515193595330026399302022065656106472153858484998010254767462854235008343139218888170221421046454280858208068658907389288543063912721882521711363713136166478126504226820360347652405439 80854661163518168674595213426641201760) EQL-OK: 6427758281007308443295844679532867042370757542760390680622584758338041709910068192973790897624827722686313216884084305612889554116246627679267186323854642904894988936981064543865794245002470271142875081223308666588659587718561791667575945670118263124267218395749059879636505504607358472659126298770422135028955713148882314050530771750859372048576074912599265823577267962213046012777760882389021047579367276198483178024744924299929585515193595330026399302022065656106472153858484998010254767462854235008343139218888170221421046454280858208068658907389288543063912721882521711363713136166478126504226820360347652405439/80854661163518168674595213426641201760 (/ 1960728263483597985471065015024594804771170333646104429205729831998416939777820080209106943861368202560376682136488253096512360698625765514606930980274938979705620987031595592685578710084284618125325617453699875318678007463857705931376750632972266553809944621631324385690517092215690694024807784270742388108802858889381036105223858467345514041786882957807868961085072340965930749117411726729713477739990680381647988935514765113077094375924848051541167125595015542791382355149166582367766443782842193396221676952668624805183924877889696428989259842153378327156342464279071638070457876940165186524833987190050817072048 91266493124541431873557009470479491083) EQL-OK: 1960728263483597985471065015024594804771170333646104429205729831998416939777820080209106943861368202560376682136488253096512360698625765514606930980274938979705620987031595592685578710084284618125325617453699875318678007463857705931376750632972266553809944621631324385690517092215690694024807784270742388108802858889381036105223858467345514041786882957807868961085072340965930749117411726729713477739990680381647988935514765113077094375924848051541167125595015542791382355149166582367766443782842193396221676952668624805183924877889696428989259842153378327156342464279071638070457876940165186524833987190050817072048/91266493124541431873557009470479491083 (/ 4941680418946960910262990974014623728051861920391294141439502190044830922127013115391726343950340163023958511659132792063033185693862678433421115681422259770928656196358763089894449447854011668445981430826871764812047994423858851467292757304285634515474652989618200442851239459073981986390515468331839802701176644729973346052528164203299481240263263697394061787580128379398464090163611942724580936445878570184925290925246112514015572149640886198984723311273144361235138411362294735799814160816806773736605477503201836095726740734281001021071803299510239436683913500734680524381145064985356627091311888606290704759943 291575320383555320391938911470370670502) EQL-OK: 1647226806315653636754330324671541242683953973463764713813167396681610307375671038463908781316780054341319503886377597354344395231287559477807038560474086590309552065452921029964816482618003889481993810275623921604015998141286283822430919101428544838491550996539400147617079819691327328796838489443946600900392214909991115350842721401099827080087754565798020595860042793132821363387870647574860312148626190061641763641748704171338524049880295399661574437091048120411712803787431578599938053605602257912201825834400612031908913578093667007023934433170079812227971166911560174793715021661785542363770629535430234919981/97191773461185106797312970490123556834 (/ -17803449239532304707372697093467431202778585961066204978641168716990033159088600623106396534094218402005803618121159982050197012697237961155375180768349707725936023283589475384693590539312637333226292265409814019687105755522332846972859860649558844229320481883408457674560284773922666633054564243260924189551494368660033292970122831009582038986061326503238023206238467592238752824663935316307653075615249537594229930297642710570473007696494702367783692850946455203144153509057520651038068881755863521371187245025834292163874467913915588768778393773565536027848586260129438664753479013894698439967637389690509120223682 -10962227285754340409566802000064407225866105372406170304563353147415988225079632767886653994299800743521362563345682593189107807948342418743229049299449088) EQL-OK: 8901724619766152353686348546733715601389292980533102489320584358495016579544300311553198267047109201002901809060579991025098506348618980577687590384174853862968011641794737692346795269656318666613146132704907009843552877761166423486429930324779422114660240941704228837280142386961333316527282121630462094775747184330016646485061415504791019493030663251619011603119233796119376412331967658153826537807624768797114965148821355285236503848247351183891846425473227601572076754528760325519034440877931760685593622512917146081937233956957794384389196886782768013924293130064719332376739506947349219983818694845254560111841/5481113642877170204783401000032203612933052686203085152281676573707994112539816383943326997149900371760681281672841296594553903974171209371614524649724544 (/ -11349783565099575757929584771389010505157850113880084607145768380886038854233583951229136273631022011781914171912628263930864052254964518914857757025547156428098062812984733912827827545722979442676567330004437902674729872754963478834939047061999292143602525229120558979819117729589695377623970606315287270030693151486803968345724658003068961239204812937084581894755863859944500186226990319892122692007317326534880413455575446314965159569830188583093978564829748603480193166063624130610256395632946002879039047154077629561745862713628266069928068634042545592328263646730943717246953000457159714049930890865576634096206 -5169948998417532948043886408019867395123131165917923418040862036041756675786217242743410895008311710518018466892169868028617239526646914529999134517417939) EQL-OK: 11349783565099575757929584771389010505157850113880084607145768380886038854233583951229136273631022011781914171912628263930864052254964518914857757025547156428098062812984733912827827545722979442676567330004437902674729872754963478834939047061999292143602525229120558979819117729589695377623970606315287270030693151486803968345724658003068961239204812937084581894755863859944500186226990319892122692007317326534880413455575446314965159569830188583093978564829748603480193166063624130610256395632946002879039047154077629561745862713628266069928068634042545592328263646730943717246953000457159714049930890865576634096206/5169948998417532948043886408019867395123131165917923418040862036041756675786217242743410895008311710518018466892169868028617239526646914529999134517417939 (/ -4372008041495429462966226028389793326873997497126815043214338280101332483009650104005998792061125254101227371430911497751865710691604158789733634394053254604723940088324934622768312096370232736965692181452463495731681105253628558429524788376108667441329817524961077744083376843098018692898745743361309486938506049017980865957895278210133305721083115513131884239744064081819033733041876411992332060293539102545847193260167588667810376670587099064558298380310132769718526554738650709745767046942440481512965138461694790645096012018276362849398785863823724642554436182185786302301222529261914437437947741031113015699315 -13213007132248918651858333568248204618745148942720942572088217188768868803339938910599097839075045781852237705726227293430250507070717570662238736211897310) EQL-OK: 874401608299085892593245205677958665374799499425363008642867656020266496601930020801199758412225050820245474286182299550373142138320831757946726878810650920944788017664986924553662419274046547393138436290492699146336221050725711685904957675221733488265963504992215548816675368619603738579749148672261897387701209803596173191579055642026661144216623102626376847948812816363806746608375282398466412058707820509169438652033517733562075334117419812911659676062026553943705310947730141949153409388488096302593027692338958129019202403655272569879757172764744928510887236437157260460244505852382887487589548206222603139863/2642601426449783730371666713649640923749029788544188514417643437753773760667987782119819567815009156370447541145245458686050101414143514132447747242379462 (/ -24003371850945507239307096734506644624830254935119140199726507920301383328662376914775504920527918338079792692943250446679097229950654636321252144129692109999375967030689211646504258922323499994340282315270808545865248969923421472430657741998787024263629527291510416193284540865950122841477102934165296344839654902079279846705581902668360663987722715177845485423354226653585575109653937253382583158263755381721094429734122004436184054214443676096492583897635497699417294183504529284810360226314491839533303380490277211336049582128602304906849999737224506976061216780230350942535246958957024226614847691329767208211525 10686139440491678930358521446524488461285005495304677740436234635584738003880529034339295291091217655777627375148264449580064000634364863951333061091724053) EQL-OK: -1263335360576079328384584038658244453938434470269428431564553048436914912034861942882921311606732544109462773312802655088373538418455507174802744427878532105230314054246800612973908364332815789175804332382674133992907840522285340654245144315725632855980501436395285062804449519260532781130373838640278754991560784319962097195030626456229508630932774483044499232808117192293977637350207223862241218855987125353741812091269579180851792327075982952446978099875552510495647062289712067621597906648131149449121230552119853228213135901505384468781578933538131946108485093696334260133434050471422327716570931122619326747975/562428391604825206860974812974973076909737131331825144233486033451828315993712054438910278478485139777769861849908655241056000033387624418491213741669687 (/ 11114571678097117920369007866358540243142633567044843952020632081573546909920632543585596494530749645890342978505657174505155646987551523455565703297238406590291026899487431109110746657023874064284362499621762851387854720746040865741433394111425240861542892218169985953747711593827913014379823797703717216676877313898809377467394109623799717556800777662963842899812297087284510893865429864819927951428138755600792987191034272014681606301885821862650098620488569288170357746018556395309910262410994899971436293672676949544989196526035130226777567220128838888396668158456237490064462262193759918857287915854681904206680 4808076329737968688023887165061921594706561818755147855784713748545995818001333418509444774306288638038607173052166709335820929501845348060033808100812677) EQL-OK: 11114571678097117920369007866358540243142633567044843952020632081573546909920632543585596494530749645890342978505657174505155646987551523455565703297238406590291026899487431109110746657023874064284362499621762851387854720746040865741433394111425240861542892218169985953747711593827913014379823797703717216676877313898809377467394109623799717556800777662963842899812297087284510893865429864819927951428138755600792987191034272014681606301885821862650098620488569288170357746018556395309910262410994899971436293672676949544989196526035130226777567220128838888396668158456237490064462262193759918857287915854681904206680/4808076329737968688023887165061921594706561818755147855784713748545995818001333418509444774306288638038607173052166709335820929501845348060033808100812677 (/ -27971792815424016824370019866875377333122266892537700816201893161065327053508379094007350664178576160161460501442627646041422270472469587140689725524176629653056006769618104516779694726446739085332330345789012312708713495757968594985567285237456431009983022526625885024663335598317191838389804118084831445251467492693688286258834282078888862754754572546522075833632779922232880101875914894393005204887265821991459415144492487189071888581048779385051174007698853920104709378859053075296413813207007405843448595681090932498329066591349910723578718333092115184652723310842559914379989208301125396793101430807658654849482 3169580893680227534064172567436590084742349042688765883461923377455374714865282199177755353861979892274552092801376364846717140845237173266602633583445110) EQL-OK: -4661965469237336137395003311145896222187044482089616802700315526844221175584729849001225110696429360026910083573771274340237045078744931190114954254029438275509334461603017419463282454407789847555388390964835385451452249292994765830927880872909405168330503754437647504110555933052865306398300686347471907541911248782281381043139047013148143792459095424420345972272129987038813350312652482398834200814544303665243235857415414531511981430174796564175195667949808986684118229809842179216068968867834567640574765946848488749721511098558318453929786388848685864108787218473759985729998201383520899465516905134609775808247/528263482280037922344028761239431680790391507114794313910320562909229119144213699862959225643663315379092015466896060807786190140872862211100438930574185 (/ -138888658164471549506154385143989713534453638138516110941977029 48484067562152384719540184707188444570280914254129306788137384972303743285284814 56428088099244342456240635263153370817851703737803685168591843059886944388583310 6984617762898435035101945891920384937438416626357047934508608980105797822504000 90193136183227859939744547239819443586783276313678017953708293432043879247302040 70539472782976230144489157899475475029273447055080677052149474853222128626227832 2525164589393997980217929709704832829968554364529060039097810436136432713906553063644429644328565051224269893261942396763235990073001625976866246420775436 15614337547041181126817477188043219628044963126229393225781917631975649438502836750353253851523795212263078850399716875892512719059737913422781999218667136371648316387382440793865460028660248325297931269646982047533754121791358966254514009830876592200454797694143082163294323565673200905929297174223061890100210054105027025488322289599106119653451218493916291922340123640475500240519924011764050880374885136181582395113140580448936759383024305870622004464940344826337458060607492042593813585998516868215921180540240201095202617277388950504036371411600204964284568597705251929695275183521036281637399204541958859605054) EQL-OK: -138888658164471549506154385143989713534453638138516110941977029/4793535847709521198063287553243915170068914691727215964454867625024011698922303669226389748584276840530192157568469968220857898703102351955898913589325705637953049380748829567692600765708909637920797057370082064005557328769108356548100875674196976079597658854339583183901899349355521527519781721778545444496852540362424465770767219571362842157786846795990148969989617793004579188905882473140017509154008696803103206996067638134383708975696867028865870695941933200225325283190379262695816923376790224594063264297952504481719779782130509306530621779762254864669078635401870023086312919956154224782043667754741333688780367667466505233610011253346902821033707597517691608103391952937194719540981992469020284583499872663129517095879706480339710037976698298522952071766717472040399518290905103777436461474880898550115925718887748413534479076504168236430697214654069473800915087572730747027455509241250627470590715812698745630545585772046458363388764449879417348554556621640336029897762172500880501074103433267444717053504878282494505367980026597725927414511391047010801407870379019921551218005714825277162504166028680939100225793768617321830389705750902850499916610355200000 (/ 2902267908619179684129536324641634394442732593027015198805855082 4748067699021154152763168285921806700655154833226062437593302484475663167752990 92172802787151156076284963978247829387076983213530315481815585776147505007251090 15808981285029107672090190966349736198141855760941720122983980047623201110025085 60559202289239963744584432021634662330089323842876293477363484160210450706125345 20641717016962556495214267565148984505293698026059157698737040675346468206231142 142380249473014630955299439077662853963947100833592874440361316474000948841420058017600161066408668117933232436922811486348705081331372574460204309908598 22418721268614574393232189860262616514600143215945007038687873335656746730488694050883006164427390756358558140145027011322151188565843290717535647848841274550496431839061217253488169143292339455650565906288959125935798633464526818546688779845699340483771625364583343140648892889571715648295855169294054985996834093294240640072029711789359793649773566295329912082241637482772608479106201840565936084243727069954911883243252762742415647868355726139789907900798435783365130277592703989608678774745914668128791639635886550753850811717805962562157686110637810320436812644047534536168343578232389700410352900247092236175044) EQL-OK: 1451133954309589842064768162320817197221366296513507599402927541/13803211377640454778526029288269623376813125655593684775595099045285713415153039020789267800416616529908688645478733023490751981264976732618374046330204398361829051480928696426688037404239513603403603849882719851670264413777889524531938606364925013854252374108222701436535488401321603495905123597139234414735397259257280679663147039651553472142280954446675036289021783142392760217244908768132158498744301278889276778209560846418263599491357632762902447742083022806085077053406738681250354036208472026046315736408632370478801849290705001622808552373129971427533249307210975612625050706661691322027927380443494854794852235813844542319971019369687589916047377092369702778251658652143114091304960406840026816351348391618676357634544120732441610431417230403811846208113160343697557236265319994702483700922393762500190362776377442551539417224595247790865885105594005740401824824367904020732469833438717527758468635665777261969819260766044978137909489986407113029460354144391595512642835261443393260585888868936164331461486646676578398836326366036777321522851855085808626766493197635871100152761464712744017549919220291986785134521319127277292845352756807452050073157340000 (/ 7798204144688205291220879078360728451593323170355809361079096742 35808393784851478122520372074317359817820799318259895240196875729073154197251420 58532175726063855694248618287185551673975962776708803423334853085996022345828434 97834368697888769536063057370864051207348099191057106781292664602519775900739777 92489021460656714290092899983209031746574776013841975324837145038810562509209529 71083733375588666647468985607775761710974844539643116636307037921671845148256816 6123989271760127932230015643359630675168106436173654465119508990415235040641894537960236511442249258231302028977221206744158863083898145166446430168108 -27418900206398855942064397259705713102524342707255992250395147550519659429645343464288092288218160406382406024735131578979728501208163782063519839258876833755387025755815673514708453862847139552613587001235204464673999898312854941659541050445981594990466469147364579547089805525464252876345032296745312923488525701877655352034887018931755379078328147999631937419977103372927428613463482328465834563846802083044643719319690088670748858904291298575733560600669924511028715689681303059001186388754140003746463568171428267337107394361025465082282061651196456268663181772211292647101192148287507051053367729008997838464209) EQL-OK: -3899102072344102645610439539180364225796661585177904680539548371/113184205287561573324139833190653102440730360395399197973956984769580868365256138025034414373155098575475566747215877030265786675432252675717351889433714136838615056208470421665419618669892136317438270826178251174708190860235979949204785938786562420189510825909814566675745650194525647207897976611434325225523578368855952217879373499055292850828774005130267218801086474623429504045290678320168493275019256514768273116059350700654655821674309331585233552793659038912697151359657915391954687630783641745610431060563252789714638916120291482852533638921356624929690158752601417722733222880768367060672103351737811624242610815140332559619520810810999145535251960674284283045907801934328911198563750515779896457101601178888594882087326241517566336011980952110586199881600553269825310575512911473547251704677890770772166895623118832621335417348044312911888377718725944255218219811801447500167145561774582342171995333086224230231746597452848775656030037837271428187450747141983599129861631612369300880722326218963779650411119279310045263996988089484063433088077868691314162108392639864773907107325220582413508233901954483499166402135445110435112499264825479433389003494762240 (/ 6291885367078853457481986049409245691302078375827782321496819120 20959289231548357352292073342856567687394126070322865796282035211176720583560298 24366038587110130209541647226271577368736240640393242419005751016119649778306566 40118119174220166901790237425673316895032570534639145502274313654443256239236466 73598137358602854818844747625643480865061277528564461120022408463105339470504117 36695182446520138181079917512512743290981469731336486456411609014364293489978544 8671667981598505073194269824535189054936442262459158402875147736469644925300845122881093216273840895555488593258562684601176239455526568314028830532770 15920064019095473156324398162334173238735268739049399738654357508344572552411935473846021991360836375685872129737682603096450566258725052013769725919038955505690389573813769125933987978360857342250911865713011888064725725934341157729878064563080803955584985269499994186472079783942404183377695242296289152788154908185130552013951432753148997632323578507137074131845177376689609114975253308906745794984371839952312988353950198030866538756253618535421214253194954603293145507537939731320546686208032528588232652963255550963088571344119439249328480867640436815434047309164687808223851012490130534705427647158409623238123) EQL-OK: 1439421788255379275215959765325419043929720157723371200401/1747562187028503746686299553853635643553063923188506902759251937250022196751705340155682655202720363192751787186892107863159676381018035068965958466119538181810433273947829904580526582292369320932134048728374142501965682147541817431447933591106030690334465450755701191781243754499216697336293783127396687916725975251100500896467549458036395977769801208905203001097425041200299917628353220804629035768571072498715030261324138691471497255335498185741379289492513543474304524261634247519034231348033379344777678679950561777846684978640375273167561174451700942154388980887510088060818147834369595669846115248027925007288445161871535514130090907585140894883683709507099726386549038354860875469377442908932714711235823032704493155679240378374325069782368108779247450762222838197717507164088182062062215767468125843278459189085290703729281279344184417197883359351058003644499215541300350121854220342250451978930421772367851329849662028719768708399155817754711362398236471946313773603716759409265530444582884661320404389499624411965234669344882203618613097197387901166904575791500958722726774956950592290330175936039556139052663816485140080963740296685158607671768592 (/ 7377598052472799909620353419322603137723415431070641423056433630 50990728761110292768803869421408199244526424730838143228662194914314857136430737 89434155113971221138805303763480423496687322824531744020762041598590716339098287 91343386111124700155689622654961840380754244946720984970313893805578518003516073 5641075230099727784981579696383316732450130418277879081291954534985607255267932 91040802121912074401640073226003257602385910518707524375098380810792151468159323 59272268188012925764499414539835790113036863511169317924034366016920114706179376837448098952655862721652129333873020625135398431500899131874782270590048 26690053756452308398721390096804652429111408747235998849320348549870126230712525274708597346508961935323823048352116439255386668122483555236157562141222434006899926132549352821247340442387991613448730451171206857242290791156220288682675982609964518905569737166444127835826079348146626921864776959482079234994631361894786436656768739968380067890165160954836874044821979903056957225885565092422439358816023307475581832942250031121721325840673134241504501661692722633100336840768527354183989544434614842654682324213774503456414914613412547380720171088896588158750436205804689590730033393056191028424154915201435563063992) EQL-OK: 3688799026236399954810176709661301568861707715535320711528216815/169215718032454146095901737002485678790901914179482864125777331106759302744215797822810809511498045518338288799757661725047129775976254373463314416017128993811694804386237923340900604770406784566473173755998386770282409830097844352035251738093305402541509197084964701114515390028814839744480965823142680384744649624767291550851759670297818996073873968006960956353033659153219390871979066743795530136868490210455800714335529013059123604101460242870160400211866883478263106349349114199154533363251799944090298252763172390952446660627602934622584400932001701907172000401485323481964448487312714644861543740014645407417493588261100128985848137181719614326345024112347151970444057551896842474702539258687521054961314443551837168457190568932765925484427579811571491887599619302241390226818415165012748654917331557679228501007751078584244340346651276906088856205294333241792044902850102153793417101337667969641035858108457362954650972654353600494166650067557014544136240962457086782865870886529792004619668808741311540795514394731398977642092124679638585188974746423756335151669217754388004341907440529525288302872368689364872785975840444000802518095138062596107983803117056 (/ -239344771695510351349291992975349015183687755312261264640655565 59880027487583466136533364102518649070390160795136023810470091681171428955831193 48344457085007359228086666145324485903333773379391455489556219681156342646858065 96824393663737121700189215323825147927318524415097221824671795011444303522438090 73240728471954064253765051525185557601431281145369716902120469411886093226662465 53476482728312567840603110355495270554470432250981685279567813448298175801364992 2468459436652089730331798017030410049989399340882712030505584719342958436741536069714790640546086933185494149096286590992747248311590137695839482679011866 -20583944357058654336975302336113341974001469085102805363209530168831840401111182124827636905521584509677325966689931599005216123375088335255672290604710305325984961984791919524676460851699284525672773368217606895110240237523696098521003978238685169880199868729577660354717875890521074505342309726366304528678619465048659607726264456481345739318939431629704180230985397408136331466856633265343276511285483458860216756106887559724757372775728879136089013590836231272961497930729470443491032308329051560641396901204040829291495325588896591482909336032903587307512310970849256645908744180630660878534263566681640143534823) EQL-OK: 15956318113034023423286132865023267678912517020817417642710371/3718709813392127924163278362562751486187605430152002432053108623099406465632705761508167478249438322470295467114170871555665890539409511492475240415534629792791729596612426725326976353265532166735941330128195885206087665506220364347120981130748862937276841801804372097254983242962029582754709606117339082763083905960784323141929645331591164015455383939302728076410053178677168172481507115685831178503426055335630689722163467637005123748113214310366231893390818795405612007113310547901224920768646006621130651182788173442625298859454337696280614462941186626306295514630883052819172301830539345633711941340491653447613466053205836875456839023743314390098829184111583809697328393569588632000669468187410368485286035179259523632217543401146996259011916302393091677624838641658623073752023082344005134299104409908004250830639232078441523519412192782367689826532215394196055149255026188549091956300108740792221660678858924234682223183500313556198187095251404633698868186071148295957994257417049500872570631774233307260384902571112475241073598945295745287525486108978093728296107260155093397986671349139935376427469718767763295900745932105722655724205000829205748307261900800 (+ -6069217517368004039/4076344942716985944 -399587800008780737/578697755310708616) EQL-OK: -321318766345655960630110128852941297/147435729263904928853096856396980844 (+ -41285036778370718/305793940074617155 -1396094619926552183/15846027887642356854) EQL-OK: -1081121118676718273499338028514700537/4845619302294419132297197085940230370 (+ 15975644088444536091/18063939613598316583 17501188199168431305/2979264551795273683) EQL-OK: 363736076920798535449296038324193823968/53817254956563877935003279344562385189 (+ 10197734562406803221/17452826108659293487 14639450560606090654/236781760961536951) EQL-OK: 257914422508077920978698094723491089669/4132510899763835955061848877304138137 (+ -16810360766832230069/13652857552883800956 5011749175730438558/4169057419710079215) EQL-OK: -184295743992738197672588473692806043/6324394120121667288243293659228081060 (+ 2234573531734039025/1128831476977636536 5842177084459535064/10255356071975483971) EQL-OK: 29511180623959738330730559435115466579/11576568741659658592450950022331964456 (+ 2268894928233321367/45672733521488298991909987382109984899 -10510750087507287356/187832098427494353069556175466145198255) EQL-OK: -53883392376116199828369509984040539934420061636271022459/8578805378260910951788610598591490227836321974082207035230408675959411151245 (+ 14273433611429514043/7774518083776389556784045601066955324 17247074371340283485/225579726714102822702316919752160926694) EQL-OK: 1676942472465190408518249346164012571239098147062478293991/876886832336064155131767120243155911448808491410701588797601053820468509428 (+ -384768590020206817/26284423885474502132625533495652664626 -913687410374243983/254477371735734658619949996700223764026) EQL-OK: -10160887225658731404416073535892287983824191154410167550/557399258996959835387173465565070652935481894323496556880024318994528462023 (+ -4465222504572200650/89674568206322981678158378582739708537 4148550863841320780/74302497820894496090312266744880513261) EQL-OK: 2118016946376507498169590394563632549990739165791772590/350686547828419379316750498534703170285368675911953477374458878558215968903 (+ -4466938407638238142/281859125741189685767904931589784285893 7302241525893379697/204618108204962312932373858463395271264) EQL-OK: 1144186926000295881841982161759159994442430111060328362933/57673481089466829503954266461746705742702466399988738560842837126631263478752 (+ 6692616266348342275/280491911593106290120490189988812804382 5414100524539959087/183579771905991028181574615911067652873) EQL-OK: 2747240373316006570071525025488180559154305534334705425309/51492641151737853299832848099101317109893853469394209716061486746077629289486 (+ -2794289802081124319/15768464977850217600859580216291365931410230647587457388598921425875331529149 10869776169503285673/33805119742344157512165738805682358903614971418053290198565741206390317449856) EQL-OK: 76938383491719886409504555688515759257937029058461512747558964579607347503639994773101488934213/533054846729186819415263583890627325668798847177803707144003483502948153457972377767011992167761176556555806720273883868208938866192358148729990609852544 (+ -253222140119290489/2123024034843473393742534167007121513293496410591072104903085284304117612082 17957334013642389787/32058972871090153103034645121513493401113378486125580864856088310966601405847) EQL-OK: 30005809992231287609744177955201962181880644831204431411802631067134766877061419104162728517351/68061969937719269465960475690278941280799593161143759512261685488134507341176789799765185182008442410081522124548392827986923668912612728349293792643454 (+ -13318881947309618/3105936147298438543619802738126617974207009907186580731552500517452462642139 1850968757748704519/36469179946212878965111748233319050931475015876401494718861814560453153824935) EQL-OK: 5263262069792987469108717688485565287648879759118200779949761992573778798556738644541735401311/113270944257273905484832818286307416845956086746130199501242465128236430928807948126409718436237517505516279133169796919230385184900609912160483959935965 (+ -9937822914683494298/36414156259035675966580098631253549474580108307284844243190992829476777586283 -13712605099585970325/17758145954890657915358548152198427387923366136638180213650029984340849686198) EQL-OK: -675810254607579372158951115566887998278519717754376916387787672973408477396668549189167387350979/646647901672150721610792561233068038707362067627156669418022102308446036384411330678972562863413004325878365438890328206637571985169324874284800419222034 (+ 2479135971595944301/28169711053558469409458629766960029324030958129245230797895768033968717159836 3427244662960653095/28446538857424788738244844756675951434179713170118835630969510829753715142438) EQL-OK: 83533664807147783700314944003289704497366290621039272787320536148072960487262393639109696219129/400665390043739792096386856839000624247597803909916773326187593475005945995926511155915226239317839405221783416485999405286913042389632370302962776360084 (+ 14865500635281371370/56222262470894935247131881777606182311286871927285650835673424014252462156319 6436092572090050725/19282524131572095520593158313261757267758159099923763177708581262473988426947) EQL-OK: 648496060602737474174747620183913927791943082591316359990137585798909535115053578637078811588665/1084107132826611778585714784136700465449309125114745313342842325649687943726086785657821763235618936882528385000712567133180567926723616940173290425928093 (+ 340196811925805824067049620503247332111/14422464039094716975 51285507111580975533385007190438537498/3230944134273302873) EQL-OK: 1838820276033673324738967436225477772648372110186756083453/46598175588880723338390245118389369175 (+ -210449319160504160992731982827917332322/5436857856220342451 251628249079137248539965770847855056283/4323109210037952829) EQL-OK: 458271632943884346915405609513071881239303671882386130695/23504130271893362375786510953364243879 (+ -40984360445255688839942109197081457275/6593417935076565019 -138094174027187773198981391229349265879/7135512300754720691) EQL-OK: -1202957011856131413678873259651070808566709454882536663726/47047414779755620074837011989046108129 (+ -289704472880230079383856507128133962457/10452740760651010288 -55251460678415911958671096669490155237/10333740726609314202) EQL-OK: -1785630052601050832889834016432677758176770083879794496285/54007956451514283340719766211063255088 (+ 276702099951674677215621541062877777467/3899918017008359516 42623843937285717338660228144403811741/1973785812353331893) EQL-OK: 712380176058162142132059442064597996057720566915757732387/7697602851312240113570356856612843788 (+ -323480614013303716597188084301661616596/12957985934572321773 -72966206939397711493108854138997499334/4539020357040680881) EQL-OK: -2413780175334213399707013296172687953960842714316410700258/58816561943270580900205343368941122013 (+ 65443777543319569578713907336699651721/218804857459609839540825438673960136766 -61986861924091374470669233802827103921/65997977315012279293170493460332070399) EQL-OK: -9243869541956614722377007489838492339200370508580665293676272508698701352807/14440678019033825487758061900150103876633207457375858942267120523885980189634 (+ 75417845823236070411341994633288547531/70553457686181702397810927701121800017 -7132208259849175775323757110664708879/24379326462014713478002790304943339422) EQL-OK: 1335434330716260509518880689691257567128541829706203586134358870209350816139/1720045777955364955754847231620711706115121721983605654691934662747636370174 (+ -144692585186931942602350348772472248638/135233395864627580439431775527364081053 282512666765911374279543408363363928190/317835040256607665191397469890906044457) EQL-OK: -7783226336195038987381961251409043080655184208289882004756343793157154115496/42981911818671667582796085276418080952868666330715445603855323471628969373221 (+ 44888992584766727877549626240272070725/30583318432547259097085073976959329092 8004917623696885952432014881247978821/22005016116109025986417835664774768346) EQL-OK: 616299974987760892931461886440810919939264155149950328291076750435394215691/336493207496148335911511951044490614757807556827643881435283379298939260916 (+ 78378756441281199312006031491361997668/175125578595003447448566412156266355477 41128705932035853424044828385766740319/216359823601433445464965619660717081261) EQL-OK: 24160702340946845080381231961736762955784254747832931999121777482667650876511/37890139292913914697800186893609983979783140570423836226844401085057321416497 (+ -36669293296367265584135816683983780855/7341750629088488427994322429098120058 -110335983484012479290765295565662258281/5944410911181873015545360879141666465) EQL-OK: -1028036623331099574157832708037007047972965676333418398303213384036005227873/43642382546729990922161061763293407461832155878510163500678954788762454970 (+ 228535455883892721240720366651075744967/13353170075841095813026701300679754576855418298534901819672803635370738730013 50622643250826426975012800479360461693/18462345430382979738234695697296360785230118465695284267226773073149552698303) EQL-OK: 4895273294635392498665165879164922265508724130843670837390305811645771221742112327485665544066552056189958877583010/246530838530831602270074647792752210668736478466245992891169449973883874207653264921203783108295835419855394180777469634862446033810927048792871560267939 (+ 11355068601761731966774720678777239425/4604724775053993730579400400679579947095967462408565975449642189823843820753 140083339434585694465706029861026468774/44667214322013486680993684507177513903616004462434123967566781106229226297333) EQL-OK: 1152244506542792151980649054527153167035843960949499862764543674633978109831264344257976000890169981044543787620347/205680228421222079539939271800361418862113882206694593495620042859527547538342323521609420336002641308832164587573546802806916292021672743366881933951749 (+ -1347509007210283053816302848714698886/1127513773036247565111791991337919355855664936242166138889250311777351432819 -29464928273311615445392112247506626497/61933028109313748081628643142485450090725737246358993405254280723087421657760) EQL-OK: -116677425670791909053501267317366054796703074907755330120413752187834449333299886015456661052906469074533366060403/69830342199092322009251417145364324484174202256910311362396720371574344280505889954115533896831727771442604285956749924105078563356474162416148250025440 (+ -324250487660721070279458563122233299722/81069650926979269606211148691445887485067008319429991878657612702576019034861 221744296343315457943731256980089803078/69422237643162665956763790134527973903052044485041686255401689654420090859107) EQL-OK: -1511153903564243978242173323335554031611949546418082039382510246845821774680210236992700372319944685567533765722032/1876012190766999122356500320654631447623282613780323887424324139799202291067983209550065997185860196433399782230215269625922714982832188312141580824109709 (+ -5518324152042099343909980322067306333/114786626838714403445081775763480415805466836213320421844559660900880511042496 -34415425451618992284220085078832944671/96012285963709194218263616278916829663708037691620330613749177799086889040577) EQL-OK: -121088040955051148243092870850103339772063863319219725752028251933576579890093496821887384992074112246777968211161/297862876779681729593084954525306275464788137269287692384941959703420459939692410434239827100068259769782676124741025632728203586961467995819025176090816 (+ -14763921690861243371082340598041267817/5580497386043551028888310256097864185640794395615400088682607872958152738111 -37917865546640067592937379176813765341/6460563866107795917092814416816176677900242086501650458839130903088333290440) EQL-OK: -306983808565398982164654624310995401934900925070311336095043743767915008644459192438083753301097540174379867380331/36053159767181973313125557585868206969047484351694148822117591172786449966899079869470557965303954072842600790897257698854023751399649072014440219958840 (+ -50167218239107621378232529938205077788547946059832391744348095230748591585676/15685777859540025727 2959973815535345735348053015389999235839609978295604181643547897863515739931/7556072538495923601) EQL-OK: -332637648328710384664787658442281566361265475773778265650094684540358159241317316408573560734439/118522875329417757148187346888166482927 (+ 36275100136090483878026478935942224245036692059657264537598788566553406654319/7192442039871568876 31833552596558882106090352174644817045294359487590746360517241517440556146007/5115621724114081523) EQL-OK: 6795584791386081942310910570767193224876510928834120433155946649367201608618436115134135392229/603177258173744207443043238127434068 (+ 1518304705177739493483387141342904186483658277690975456045607777812450680478/1837349761252804045 -98159070764971437450169149833809835519268242923913777966502463698396945141091/17238232824535200528) EQL-OK: -154179655228376218743158291724235398278770272999447263973992852061897564252670941977524115620711/31672662964580000612902147746364535760 (+ -16820231344048323866426670709751443650129113909724546927974450301780935205864/4879137683452153951 41987219452495799378686134495924115238909423831017150785452046648616005475639/10470103987572807938) EQL-OK: 28751853386830083847297108941057082854166610198448421498169760256533906032780671559334244751257/51085078915429149801779227663330863038 (+ 106981694162678522688926793970551228214793665448093395251834862896418045995969/12359470989873920972 57736849967187961211538031441400807467468650239660040144967046985609433512403/9148121311784151716) EQL-OK: 211534804819567028232303054650327703050869189253958355919997046592895748577556985792570078031065/14133242495605447754080611005730273494 (+ 32477400086615533920132766925666506741908300936974348739732763951610256880146/9045135183308696243 -27444990730472195954051975667481893116650518055101159075033425831129583042846/14815776448343565085) EQL-OK: 232934248044934592851252865496377968609159820017147884670610366058217203617961573611006127074832/134010700820948737148715427669965475655 (+ -110053921687226074580746319073262192216481755737797790655164396095655530752161/255625377233605953547425802301922658850 104095037267817888539158192425982072195078148060302393917025130946535913363779/52156238014583575190277280296975732513) EQL-OK: 20869334635774913818120011435677143948904421430726712952150525645851498022294865158343391008006649321440592131083557/13332458017563665620865770931104425383051282278510599570476131200251352190050 (+ -29732769078100192507326444863945498799317005912797369958801703828462203585495/153426302667449722633466432797809987061 36094569840376017510791155197897623093337784636438580042046806320700826250193/73286165979315961333009750429763545174) EQL-OK: 3358855747298609357265422062476767573626163217619249414656940907348235709105513077913806378841119674678021275101643/11244025482879487592663298816607141776071841230792806495601092332558428993614 (+ -5942892427460131788264792587455286675871284855854073854440582948253436001319/42136930106315714728428443448730580823 4013357443728612356640061171485791666303136232331145404661874650095235381569/4039594279673425548586623641599574814) EQL-OK: 48367895947790658831309709091377784501687363167039737892874371817395083020674648576881857510385191335175551957207/56738700606823969419119152217721454504573192499839513549171731025354063974 (+ 83833896550100013648317056712064289497247852876055488793078639582729685477353/188580876675619574786621140720273228537 -94310653397371924313725082402708514144086936359594289802762093989853507835016/223423274286761439988276492107364036191) EQL-OK: 945257965914081840217765265999453398105151083284254483307155736205796420255026737575918161700355729594975143830831/42133356934734885127066999419230498520039134905254787577957770920054881982567 (+ -14753992026457621496269953958381833108089826525439816493815533773338622353285/187171041855711408638339193132645929319 41340837577662628944845446369855468662228665858415210386857356535970453143469/322471558852595372991189266479896691326) EQL-OK: 993354944176102401496932276511264091214577507066786487301109889019709943488537161608732610457423116833164991120567/20119112546425211128699888199278894685207186285215928241217590790016852128998 (+ 1370528773439579327226257222995383030603284075640526658282329726447335048230/305600505683287165495713194488435114383 65450762047588146235054351616480175308174618406941901794570541085963681607527/78934496562987400429145916504112602768) EQL-OK: 2234440886428442112499564751364146150136438855986167755259621093816030535881959724370423862435538502079424185584609/2680269118389404699570998335430047660909241475691839354273569734988880268016 (+ -76890617375308981455205142622328108690129081798840077873315966300000409208129/15716637731576156581128288257209679492686622162926707938907282962815471734862 38716252217351070567267262306332875768795464072349655597599997486613800623507/8966639693620677733207403249675415446338239705879120765911896990394928596139) EQL-OK: -80961151400006413290662155450270992168701818633203071886556882897757813544592915596861717853520674107309124394292702460320442121704840951425284048212897/140925427734207212133604717335369986754855062343668899363006574618520848268718851310007161609443093589067206438198588881828988648068282656538084484897818 (+ -43290760758277846058307167265569849910514905939554272559141355223092464986939/39390771697068809730875092892395235497943839933482798653607450783947201796777 -34021960935937170163894986285771504067448629886312440795733904794894095253649/106500928228745564800818258673435811176493306775154643113582742982704678574998) EQL-OK: -5950657500399238361998292872481533631424138885403498309639150240712482075115081624153513501886127772738596607451116548616099047843190357858736503567640395/4195153749384427435979718872073512266029328962522899010907363614544821318917440413166534226890289043064894115954085809567292470182917919104836361549181446 (+ 17906146982204022925114071077515882010955693727109005464426577098738402001871/11978213712662686419384559301746021856683603106261241838035626618416021524231 37108371752538653389309509075248119316034595087990649061240232817571629131708/23044877611981158676785639370406786635050056158699399001947422631523989139615) EQL-OK: 857136973087880657664203854652754375000000796400911171478039451763440064550649429609696307332611304395324153178602635490321877797571177424460384122636213/276036469018466057777760709173569478463866562650149880633721199971933767458324034017734890892482223472007882939609440193626728031771767304374122564511065 (+ -77062185592993847534024832256462395143306675613123510837298699277378172890089/108133793614758275822883834459865239455798743725021300772336023406871185253111 11169356025540464491224577661206910726665825152149521753528516637690366838655/6369000033300801574913390611244042297918207179453133439308688067382050608197) EQL-OK: 716975776667538986425481530620118513423964367153518065425241139444161780269039780459555836804116752462325735011822817367819625929553250251515977390346172/688704135133337463423649074673019029541747166391680122270752018123634233590688096940261480888455237095078029621363428114402137147558304641222314936350867 (+ 13583698920327742567560325715281067532806062839142769830536738488850089822247/37364394142255392010559408553278838878570049727027927213977555360874308098434 89809462356450792524214360688853318641058652796345720882094866396911421360072/67457610947238032712889230619376608100793287037427539672885124981055281513463) EQL-OK: 4272000026182362299819817378001862956001381379478285995446709640464951377212652125169846305230835604666564953883168949950485767679005929254184987140738609/2520512763327523955464432226120154092742373168521113224665257966793820057379494860454732800329019773731110452438496395974166220481124541266348389100216942 (+ -56124163112538495128545947597589743957824668875494126834084658670528264380488/4752969512023182700122983723156599300062332404522277372984645779569746369511 -24794747728228571193100294011820993825205231022194400752319729320185378063197/98168688073468429337427023004226732413974455700654808087001957859427678524065) EQL-OK: -5627484141989830997868845457242226973925524393512774885292323552602180052845805156311097870316601631410500655735815037997645271136502511615781690896430387/466592781448509275992390948177487068548424631274164031114910250651063315574511979617153568070687706304645818907382693929886654490427484894987856595782215 (- 8229768172162771789/4094631553683915058 14916542302144281688/9648520391570031013) EQL-OK: 18327341244785642013243791303754634353/39507136041685332578233153660317693754 (- 13554976081719376860/5850035209629724601 -6813034992928443315/16012083383654426278) EQL-OK: 256899901877002811987490932642058619395/93671251573905451634945335611797465078 (- -221798849980968127/896588178875000428 -10118632981534633697/16809799818197706916) EQL-OK: 333990778095757160537366868413422249/941966737890699707694484674257410003 (- -10398409463665680242/10672871071680021919 908300169382593227/1663860017749090135) EQL-OK: -2076589873614048366639515256135965791/1366012573135328609279238070700513005 (- -2198518713248421187/494031967775171833 162489257999262168/3608560229859558061) EQL-OK: -8013762081101965644053022173225152351/1782744111192743850497670941715295813 (- 4025149216228566945/640594137312937394 5467380276809034025/15813352732084653151) EQL-OK: 60148732603712157399679443099667862845/10129941051434949990590527231467828494 (- 45649282670476595/278386580761220266717341154184065537 -8637266763647548631/320617180101036447149595031898805939080) EQL-OK: 17040443444897688379155017841073877168061229451634462447/89255520501631886327999278515127058459530587144975987720686743155549485960 (- 5648415331928005377/86815630814151297970860026950116430492 -3858618729527320883/27855468652821710859204555976171379400) EQL-OK: 123081918822962876101148539477322308270739795776139149559/604572520679633516300271119677141637780408278090307422820905500994965166200 (- 9781572955588417059/112881800445343004034168709823458687843 -5059688483724168531/4577416283528891230944530353546966748) EQL-OK: 615921077060787960354561606126348783111829996215681822765/516706991472571912574910836774186280180852506048696459094758451180832844564 (- -4967914039344839478/238170260180199675500515253723794945205 1851848905279976507/5731170327270969184071911155742503278) EQL-OK: -469527297115675955424190428047537920421409443442551107819/1364994327983166854234805393053180119374354994464588574791772715189542881990 (- -16853061581795824324/96404437352723357070647888504166371117 2887610208906060444/32980643277330946266739822018299212963) EQL-OK: -834203249643667606680245846951263316484378801689149307960/3179480358681967952651970543397987660141008737601948320258541111852875189671 (- -10766003534404571638/1736320411127247334175538439020437437 -220564366893542891/24024005562370344889629855466198025799) EQL-OK: -11228676451427374102904112111967705085778332338188090365/1813624835433832784217556253227924899981441517333394378436857197512671181 (- -4039872531792560303/2717817538621352660433068255065439787147153801016478776178010367557953211548 -17969900169229544519/10371230759745501411127733226376204123221866394120596070959771442399588297129) EQL-OK: 6940459580028931824293913174633904994365279610168782399332846513086074139209123514834476635325/28187112855925579976299840753672542065528422968220885043792832460046226866036339425358907691441054924266606457279617295071355282523744922239122018045692 (- 11905720953886477738/26349991043344773150817457299711471013733618033386232710348739943906972457535 -1868508269239354100/7915113871665192715310471309271830385175189228544536787145345883401181858893) EQL-OK: 15941145914794937177093386304443205602552827651536706608400845076162777444155363739893353329726/23173686625047977587990304423741788120258508897732978034793987736019678129860415537604628640859289817332994555163435451240013483415438259775849311623195 (- -2449440712560236858/3924161613720467738425590715321110829708355586356453490516463081317902575263 3313932993860824279/18392642760231276916239249302906853654153090246504347205856270072174622214792) EQL-OK: -19352032211145724571420568734409847660231095572377236173431089875006133635431666731719362137971/24058567564857748536604240288023690440577404826273237225585673569644473540232022448230431237781096357243673961302816983638647478040822458289501843963432 (- 2375854596996813469/17171542567603713573317138241061150416263899780234956304631913156611236192733 -1690236091628058998/115698505401619203741389026136939663329574241316722960060260525901879106902321) EQL-OK: 303906786920788985464713527121698374469813384178920405503303785899916213843318155692692663023083/1986721810512032345893371071989737461519340072368099757524397292434629497187713075053126253107235936414498803590298681018206068059043963268488989361033293 (- -9066703779833220052/53996509329904595759286231403247566365148374715934463324003880626270687736687 10104829441267883881/34350188217372122913844475743718288066233853695548819225257606841719829170673) EQL-OK: -857068498550946301314281599902676812596945461499639532351672507051201056365247232693696093577243/1854790258563312749374056592838765632813507083399863975139987272744324437901043103651094837595789610803765303659351781344942305171362498886075754606580351 (- -712905705954993103/38361275706852471555340413672243335795384295466685977818182375699688812583403 -3487523845474404757/24004509207225606167828624323100421869226668573968691661898194620137716910067) EQL-OK: 116672912187985693533424614379662678476187446315443107971581372764612623068602629062267386180170/920843595906060126846114857872490000269306626188013726759480780006531676144330596572087176480154495471428384288229491172449159350622326294294528887818001 (- -104068455909264700529593875361271227125/3443783531459345396 94266182755532992545775726171008609186/10986871169556601787) EQL-OK: -1468019045636814162670978305715811638938423723806410280031/37836405995984502494576730289263822652 (- 6250188382163250356218308848100308290/74975517450841979 10057222263694104272437942231238950849/1377150882331486572) EQL-OK: 7853407001895533030925726629648778749078643531548391709/103252600010686800286181264132405988 (- -325869560300902552275820653500571757882/6390430580148850471 94468553562411191993094256419298214695/11908765973274803007) EQL-OK: -4484399064985071999330976874105690617426359030318059422519/76102142247451389303559481900024166297 (- -93570528036598407567281714804477572547/1681213810574384291 -244906502561054838674546679498356325029/6878656438675875801) EQL-OK: -231899320744132980638168050942881155823492361410591515708/11564492202898292712047439710761442091 (- -81411835730261219386583131450337332863/716127167248934 305772198898084305417824619321954306670/5852119619187572757) EQL-OK: -476650772889757879179369019399921041943854248979406203071/4190861845290706865359628655691038 (- 8378821874364768218652992773582270365/264620166167099506 -235085292482743132422942426826553295351/5218853722286899445) EQL-OK: 105936154887632142427944491040385766054707164161382644031/1381013939193345109641609957531174170 (- -46932041053326337601984043288899377207/83004348019257810472659105973646518650 -172752976692389001100875729845538600392/64697064048458368935602368307247306331) EQL-OK: 11302882932785858045495103305619355060523322049764297548269071809310077113283/5370137620102451116225827082734739449691101289924623877117727128768254573150 (- -5215113722152182902641295804790889582/37267147737183802417372262122851319461 -174324915479281952095382231256728338942/198797486533978895289571841018885549001) EQL-OK: 1819946959828587625889363843813156766676787993042778284071188313098762447560/2469538433480866339929667414220581052912334718874062150193407525506073469487 (- -308468863588547635528373349890793262605/277175417813474671446046438490775760091 -88071245580784145343997181342216325733/109042592277517238289414020635536175644) EQL-OK: -9225060231388102579469362745283215538990500777711808852192407359260779270917/30223926073985207174135233898799350451872811382182855106546181559011381423604 (- -139281160373255540085888405052544101003/21590054032847718908692432707921390245 -175128181843395150044469443628898278945/101874815793501611839718166887463701141) EQL-OK: -10408215647857282226079103083273257459322595128147732742048301223816698452898/2199482777568107961766315941206227462112836158088743951492692685709912769545 (- -13653637423911886957204229566898836211/6724361745919744069899921221745423919 60537422461958273742622747790343370991/323722395245687564470126807800714703749) EQL-OK: -4827063738484690108652046326448960810791170812913084889649499536314520788768/2176826490887613088066161490358401961235974091796973399049221882998503572331 (- 207284509647982883454717074874778610186/315575836476247924963087075944676754095 59454580888278446469281150437143941047/3799382139920332759258392540934029749) EQL-OK: -17974876032324524053425850245755672169670471578477359535347261991433397414151/1198993196898275844180025803639723883733761367273976879884312817813487572155 (- -149255714031984711085009662216310611563/61209488724728410476016289765233999883959861482512968048939594260689484910535 -206353007879160639705730135450663155/12341134377195982958424940281067948493740598784362073339140017508008773524522) EQL-OK: -1829354061323966095884091779117676852909282652562065419187935424186237303685407507859167669375269438805585201409961/755394525511335693198081866608161950899365908489933659716533239785460293292606918153507868614180865950008697266433342863460741791684603303270127798639270 (- 286228990947356503137685907205210886138/64525193112922470913382853022276019736227442678252533126077234112153953877503 -93778927468512815169462456699065596479/70019706577332037325570327903202382111804035215024271930215402736305222068556) EQL-OK: 26092773364888269343302672267572690894453186378630697330693315371426642609003667116358459590920104883240139740188665/4518035088612517412858008269349176355736855744033363257986123715832709510554983209440815107866748014413528943649032845277041680450752670951433682692095668 (- 128067958966292694713545212085241612749/50804897676960765097908813878456128842417954009101908722816951877006748778869 -331437715897535092432788513322484606485/102911257177761006574263802557003927106564530572416215828322919550454967864323) EQL-OK: 30018293903870953799879886574342637699455128356488843398998059810000258259055116602688738404467489640369684487419392/5228395890723542025866546462435908982096651119675992137235094920338650164475761939608730060759309002063498665792819192135030537577109853650729817121390687 (- 27065789167947870065829490227927612633/10795458608984562931374526676297845621730864739104955678079256994070639461197 53314096352440087811254806167289750292/44807028208492548064750449353871285104149154384082409595945081934090139448067) EQL-OK: 637187458285170434834128234123875152637450428605039275620795715002449318075555518355578432548587274399560043210887/483712418416385035748598509413117409273155809870339120248356475239836262578288026980177669113025449532258001487616187498682131415946755647640047843156199 (- 275528434092876314751862670579225752027/23290954563951481764306221308726902093226107549717031306984541394996363441752 118398743375843543978994815511147957868/26050691402435592629863948804505350954161759382372519491414484055670238339031) EQL-OK: 4420086456754111377514058698455330162869575963826459083894390154200727636413353382047981846196341965799691593361101/606745469813648893293125236863835131523556569847025597910312571817347251611730291043895952533706547565767925058454286630395458711598751591845070996622312 (- -263828172858355421790882308711676546531/27836884730007976814146538035133148053942251062564400015534567388490010158584 31580638196736633522674344981675107601/26210154715367115936541726366619494863883445533448748701891278370021519416412) EQL-OK: -1948520953518189888695889830515156795224640917019574042614412953331052369986548949517168001067643449389746489215939/182402263891837359872743630675214135004512597266032306942151126033873543370078488920825920736994254287019873146147276876145783659805845233146169813070152 (- 43029409555492054023102681165249027816896930295612442385573977041111849786681/17478431621804970398 -63831159286570708329826084149841946467426290005331979697932225104261019322894/15909114936773208135) EQL-OK: 1800228375210677909820927489860838061135888931548234366640994061734196466170531105718785437541747/278066377585826623354880511023167787730 (- -34677827126365037739221949705076349308552841821108642369491195428278121711851/12321935233094032355 2466652720703038662112375481129216761044838204088317060529010755963314905661/458077759838279587) EQL-OK: -46279076433142446690218423399092373290016631287423134630356063713373023144989129659854095947192/5644404488448083755690706619714037385 (- 75657421640076548917316021979547903196453821552146142751737530624725671569062/5416811919979369403 -51031635143911513328361770575139950616395278082588474953679149885798666896870/16274277637120569843) EQL-OK: 1507698654622877634185545368063085304919907004898369478770589865697455127479301592176158803465876/88154701093808389139357381843158713729 (- -86696779369804422745383183615836359604633179506005810847902134850836986706763/15354752711854066426 83875579121692496325618937810567731584819474189441279434601944065565889174333/1890321146489013312) EQL-OK: -725886765676185953186290796464189476910148783977596698524963064505627422317719186476684911836457/14512706875163632554860591439823131456 (- -2824584270835350806110810310308644313069326027498380007733023821989145840779/3128200028313826545 -16485532380752962986834975164722153533427821569516340079793116204530103476885/4044901389917631001) EQL-OK: 40144878017198534388242075435853869853984060096218401720566307902396394251666454424383286522546/12653260642466969643085415999628721545 (- -71140717297594692514165816539390347954764512441693085945645019026357644035048/15130773661553937219 106518314860779634188990156539381479314908411240039365434170935270962911954978/11202282371121185733) EQL-OK: -267626990691150539404999353980899804835901788880218020004516046839225745741587662342920970677374/18833244338916713919008552672213388503 (- -31372444086039981530710911528326367048894875160807395940269724829549418985367/149682691887362386596593782520991059630 13980025800771566396092717430902170466939197897483207383178768135899198010674/143215924045734814208985239450703841431) EQL-OK: -6585601463869631351127457963734548845246885851328680299125624347680443020577881573937479731612385878788264587830797/21436945032301618223045694723696447349670080755369221855700055538448185530530 (- 60002561005149795132492915799111287923312170708430066011808292212167201814322/16346766380600148228286881361520329811 104734497917913613491539581495799848702023341599268915776996571583385896191203/61937476024742321910315674059586179787) EQL-OK: 19844918952732846654680216616282727016967753441473733514766184661191061075852141231786969917096326062063227788681/10024529215648371311559365663430434349900555024451481776473735938354274557 (- 78980655687309201443760271907411093305339297143458162112992101000746746121121/24094471248783344167514231679460830840 10562090177736342378322146805187203837437609238688017154037816697523731420573/74961473522415640988394298626742882726) EQL-OK: 2833009175986364875175323375606672657538996734036576482627590142336455915129629838687125527863027857335645122892263/903078534276138789186206765245648729133926893901427360507431923032322034920 (- 96507496069338193466683209170737942070468924698476218759487496209308948365/19252547784216386872197161331387216893 12563973560096321588715986952435909079270363887929001032891628645353358046011/79879611474172059435223762585596250921) EQL-OK: -234179520035021783886726161079163865833895106001667476480293126893061678147610754451356994012799045797572757769658/1537886036891137155393554113191390737924110193971845147480358562685078008453 (- -95307376781556674397571761484869767912211504027346871580288574968524683908606/128329921725822403056205582017133271311 36170894925879686192917617159219095595164782822289198001474013555499918728596/240886887357120796976726436320063138705) EQL-OK: -27600105449672599524131749634403660999916186956076872373762346977331203119722064380924286397976905109959929163304586/30912995399316310109755266138690547023211992922143297688759057498082990192255 (- -22104893896795356297688360407985617971036912713007110938688208155601366216839/5790727918973991999188987227357894380 -2339372311396919406471876113751500811577555408710269902369834593304924842262/12937689744925498650506694361349920911) EQL-OK: -90813196841584888136609582546105640167792279132393576014002859436259486025871518847027719826829986116492656710923/24972880404321196721702428178050372850585634300866259560981343234830460060 (- -3426218098660813853559652497557253942819662042768623922183022792185928242671/2077407536662385613357832628600529321326686191757127715026249042748302985178 102639297566540827510784861997871251414598617775200449087621943894148321803293/83089038429507982364103335021257902316010144851865721965726693103637274338545) EQL-OK: -497904817589969304680335736144278473886197067420059149312627956679073246109792679236301202959163792633927112737045328517845259242265445360227131779644849/172609794647490471018785535271654901168315737813115654161745630290269473799997219289162551586864155467201760250711449118429648095083028041134558889086010 (- 1543899448831604569141696144740105016328586790221799945430718394112623114412/1094690716976737526626281319975432667416762320123576900412499904933271786567 -101835025746074730017715423582062511397387458863000475669454309217160145993/55116548932808468782187525862059393507883043749327746382569396580129398962) EQL-OK: 196572266866178229534134252625134989714563665559807019513454337864363053729628560611312158082929567528955985669620113192156991984486011150099776316375/60335574468539540262844259780498204139853746803235564167348945699931512713417761400790104247218084745081610815218855896912895393599203789305655343454 (- -37581128364300495505521143552535972339959603365602244668159915869829949338997/42947503543372015019662104425995959382231280059683481488692141811517675950053 -64888994735350842409379226446854438865448614840503930577860382883594178287934/83188698741706753136718468601650233481619465918167616089202536622553688681087) EQL-OK: -339504834548876267781536981106771553482515399809961247195394672491113984585270709765073243997043174508213253440272888923497173265137136111635177948889237/3572746933977957867604303713153220827104741303667912510494658617478381525690274918494624922428110123336345510454960178899375325287131764283538305257747611 (- -16230533405187239318665866908175768720879595131719076634847964191318368133798/22572606803697929681675696479626869642065470042484269772607381297011844085929 -3238806615045730440879378702226410558103197865253164974472379309242480970831/7167633180423354812410246140643720752789573307606828791458541239290047771821) EQL-OK: -43226201536346598702395278529841763047400215735214225929426206339139243925579733185594282160061132691154727543083543034702325848468839969037250195569159/161792165494835249202675342837643048016103040739685489755239980324180308179745586573032524649518850731442178659412287492012066453331740508600962908806709 (- -58154703770626762920775801228739843350302933064569814497417973139312614069763/25655935043535628671780902110427599603857741303802203417196105196580175051005 2291927744682353823611191393035210406213286149316388597509251757479544491322/2075117977066796442381930295725401140983312287419314083032058820231519915051) EQL-OK: -2848879691864593463404526996418656511058536739346277043463623510210968076493148319480555434626780964688210750895957968447300033820091387019574369485421/845064952814266442598400897276554701819815257830830535600041451476645443978805142044657833921127247033533628716506571358424324423237490438402971304385 (- 16233726784138742204308718138203086218138595789383817317246449554340898453104/16370584482945481446847872945862788646563748664837147378940234530469832625057 14431071141710676049963542765626402177344958369162454874051268130438178883381/21166786163219212747261378458659387864767326410261049063051557406799162784072) EQL-OK: 107370754167217929909136144689909613387440429633745577224054233373886366171618903318258855919060113440621302505589923655976636732694637334616990468681771/346512661117421566971293748815177161526095870176610277140325665174756629068111228154091043637596506814557119477231243643171068111260010676990408227692104 (* -6520062188352981842/3213004995534018829 -3812444292971845716/15284944374811818089) EQL-OK: 24857373879807849010516976362973488872/49110602632729971801355498746248797781 (* -844583948128454879/4750740551331102615 -1309778567130405125/4885884698278749707) EQL-OK: 221243590680205607733892613510570975/4642314113048197066962569716783636761 (* -4579815856418431271/16947444571374397297 7990245706938186906/12540719430158043191) EQL-OK: -36593853985314806270746820601513137526/212533147427761354206383017714519654727 (* -3587966953201943536/3194797554208122281 975954052071387816/2707062718507963111) EQL-OK: -3501690886675668292903668827990357376/8648517352177231144330968693325176191 (* 710265334225408429/567023629756400552 -5578988760400430103/4131535930210536898) EQL-OK: -3962562316545608552741467762441538187/2342678499616965424161446427863567696 (* 18305319006789031727/4480148641441744463 -1641093267260986094/16028097657311023719) EQL-OK: -30040735777106040963634910981471804338/71808259944297590021537032075729917897 (* 522499067029593907/142530390958606446621834761330018829110 1567459634764499377/31663510497342378306792964160850079086) EQL-OK: 818996196770998943862055820464495939/4513012530308148429025282037949729145117603192483641232823845248212618993460 (* 6214041481074460220/139497414619784295310756757536261769729 12187470171919324678/129216394212432939561557938117593031955) EQL-OK: 15146689039532873328968703771155061832/3605070583825050709361064709099418651298807367637359842488375232197429738039 (* 10022419596195177499/91129297586760817507648681092594591108 239769653037576215/24086455608554015268646156321002022494) EQL-OK: 104481394312031409685890479072416795/95433990476618390508514520731482064738017476445225501421324446942302103624 (* 127731839927226607/59760640855511386051149338950192132591 3679984267166095161/269870724770589242613062477043917992045) EQL-OK: 470051161348371979221331000573148727/16127647460431744118786930146746069875784110572380855085272434637353123238595 (* 4919926511230586366/29288587285987487013553554568227355149 -2914615432991234299/34407808954885309804037535414452526052) EQL-OK: -7169846869407694119621783007930483717/503878057947370143933800273784055481319429768630967123178484618174989420874 (* -4322680734125283661/246950524730861178141734701180345535020 11581515233057355754/82204027418720951285150957025638971309) EQL-OK: -3575942340708251875937466941988609671/1450023407574517046920597087724458064116343346221474061477327267648859624370 (* -5552456004563371781/36434418778024040927761226774271610950778609263056622471030041615086459120568 233319937833204741/228703279535756717601739981368829304509550463672786894384479957768850829340) EQL-OK: -1295498689806330283646616799874813721/8332671062513255913250553083541810221054209355142441164334390514659539371361850837178162594438925276666798780352514152276296209564179606228713851865120 (* 7279569964232187047/36316165899095632459738478614507512808578186173163489609755035948221062420580 4568992288187244990/18279847281938710983382796940666233712517527808023718591530848159479207220137) EQL-OK: 1108676634263212048809114991909788151/22128465550033953372731954247755694375180631486898426116907313824243654714198100644737500721615620412852035450119116976232805701601749863504629937973982 (* -8689289043809733973/34365105035540924847908154205433563929060132734873649554594240958996510665976 281724695877043289/3383396067954681850718083474385093262190311835985400909911383280975222535225) EQL-OK: -2447987313255021583629117408894957197/116270761252098802423406562021935246701911690887646043563899994409915142686943691634418411056232663942535537938126289647041118885713303684881867869004600 (* -4176416206981759902/47077361360975682486641492558477246171356187409295624938308162261216397376441 -10870319933050648575/51626085927005484523186190379579228801774286705829757742503501130303410401261) EQL-OK: 2670528255498212232918897515060496450/142965876637554026205455979922464979254073063785755559223760631646970673683621524411341782655829702451013418009338618833412062193643308417898164204593653 (* 4496049401725150702/8024116634872885909638996643719901973664008349644172107626390134736213108465 -5231341280619167012/99267989241776204190444307671763754306088564051099822830201760217121508089279) EQL-OK: -23520368834947889555464127765407042424/796537923785319116837266627763277272873506235001122453584405648384893204423914484193595265931840447141766909166026026228531619859740155558402735330646735 (* -2488955833769033882/80573015130339486598712021266263458487997757617589137912729682647628329090307 17723590657579960683/79078600039601362101827108583564759878924923849842119643649415446502020994810) EQL-OK: -22056617181258995266120581914227430703/3185800618738432636378738398589185111057563002909241393794402306079667392482341108052833514927720630087013771419748846412352850012097731569487991234153335 (* 24410613567363183821142175154197794689/2233491913446620869 -289777146895293391500645889398422195537/12394177861163531771) EQL-OK: -7073637953514043162500219088395995153310329907185649946877180402954938102993/27682296026727883467940485833673128999 (* 15029397898618080393623393093137341347/9939158597399833599 268484092305118852707129202725716126526/9752180454987984749) EQL-OK: 1345051417567645337656755504737828287428006597367109244226136136424901090174/32309489404196149853047846865649927217 (* 175291724581304230067306380062677652261/4791591464449055089 -207911166974886786162808240992513636954/957635297799905137) EQL-OK: -36445107018739410292029741836217649994267718828374576884161821761303211252994/4588597118993154438342028473487092193 (* 208446980882041538439350888438428103817/11756453246592156788 -99855903858077543170703702663212319708/7775813092266901197) EQL-OK: -1734555140205305628415286772698507060801514301420325900368570916304368260453/7617998589456250715053087609460739603 (* -49595797981179247160347259926801311825/16426101929443877636 104499598328969971414586784725010079457/3085074725343747115) EQL-OK: -1036548193567594227670217621556353400490405002875929378150074378019016735805/10135150379689493069951723318357604028 (* -288919818051255959565698296502103975540/9373352185361138021 77343596824463059344208562767410464067/8355013728778983070) EQL-OK: -319229970313622361785032672064391711775428287673147624981393545586243098874/1118778374191039878067165437747032921 (* 301194765217764762175383920433701358543/150076401641721289621709469985978858175 -109319143590504335906407585568245068241/158084148208214805386290412276525928977) EQL-OK: -32926353787549066990014316879429253235742017240010356390402491456481443332863/23724700119685440084214937112355810539035473428177368317381421021523605836975 (* 14575317438235510996984657523859363247/6747043355688580686998987940004831062 -98472042392613093668204392119412188287/152397803267436514292317070561082866275) EQL-OK: -1435261276663720115408306632770383012566806521695455296458086302958691687889/1028234585957093005711368462502470683211464374115746651290896689614112234050 (* 7543367187310376010646193530301789591/61115754966424662873097894247178344192 309940239796651595482411737112678240799/200261667764086238794802895148430893795) EQL-OK: 2337993034909171213000031444662193658341848356694420878002930517675329723209/12239143016237439360279809707749702660797878084581096344749106125186707088640 (* 306232835922656327867425959604977465100/55646521674811091128956181530575055283 45245255551837746690160535427248646677/3669533234425940180962041078287629087) EQL-OK: 13855582919684583969821610044729507626133731299765443289084519977056998472700/204196760665922729081584465192637337445710456706084552841012480810023816621 (* -280037880297253633994139513185953058494/23798550327416056573646642830182072429 13967268482262630670960486883264178489/7947215947745048068401387767511847243) EQL-OK: -434596028812829556627014314125713048434599389957141408329542154357763726174/21014690966139335562014814134594464675233042588696546668504776333756662583 (* 87160410649223805266866345018804635271/204719779683096591635231158476535039583 91197762560765392928084914476898132964/277206223024759381433146631560580134513) EQL-OK: 7948834435086720002947247338196997812861466884983039250681993725808882173244/56749596904412078223459353928850191672356004665473536520452927516595919428079 (* 272801380449749740391855824723351316848/2170368723435176720708253536680067463416474841046765138040214254204061862261 14545537787709209389572055399030228996/8381323291479119825335849511027103148981778425333781230074116361235206363821) EQL-OK: 3968042787871071204066360146704950989545352280096012736206796950415592924608/18190561932825050861659739926693806725838682397154479213760300500132465705680046683155463862909993066621811136554677896021527098482779305371951555659281 (* 58980225701104541897366713189611773567/10973700523953435846969235385386214078292603476932194022615006557054104506344 21633357583056027790037764923811848217/41236459355840549300942497778444413350482341379076368704834339005347182486274) EQL-OK: 1275940312921345964633100864283753667394719832288287163056787891633576680039/452516555639171997520308257003811683819837367444947027711901120987864272999978391252372420644671039873982401560595091423172287702745925783369137325922256 (* -39569537110370574225194522625562874655/36290593978404925051095380486087641410218299612051669925683823165483928853304 39273660356839128453616088747231247259/28875229647500294680887983884278577441525691250738380954940513956990510132534) EQL-OK: -1554040560950035541902707236381071410695075315482961522429891905381129320645/1047899235170633560739863801929205639611958070150694189488499584527041043137082563721218908614201921449076002548982308540689571766482794493357171683792336 (* 8957762734053174688386697837976422606/712105675122280831038408324375785815130945929819518342973925027507219300067 118977607972668646264715307919875588738/36563306353035936296510796886853084280648109576589600551753305930842020963283) EQL-OK: 355257727628119695756412145322380851760544279491883270008434507085780737076/8678979318410478400681656718586483785992423192579006235728835173903750764880944673586689792087386144715446501744012435157310426693657188196381455479987 (* 114386050140129336980347743358441052599/11994188887964574384037137314302737861703229337059619512751326848591488081229 -50822174853799566513638003084407139228/97406657802317796912648600328217961853548397771614449630742570869667560514587) EQL-OK: -5813347841057137571369557065847591420664634372223088557679866032754664253572/1168313852626327929522799656188055465298138284154709873285311568978496136227795809646907486798429717114923178357702460243511883684964123937654308495387423 (* -22147677230189664783449572410799931501/75580058176304394102183955194485040346816524663599269056794063928343401057143 -127672554664595215026114551202414743739/35777311684781371234035985601066874920871049301826919955489852676067316906014) EQL-OK: 2827650531865200718433745248471704607394596478050653604940563621773668622239/2704051298527551014378337257898371613519363350219566689647796093438747503077807722203668806231503452508016974614236112792032033672965127824348803574358002 (* 3468729773587632113679855593063165286551216344725198121609354788619580819847/7106612002452012151 20863200733446307102600190583661606839853255577505815215312643683864543217073/5700246487811068117) EQL-OK: 72368805556440529088812813715602124890901251289457147618293618526488567540302416253970205832659523238561757581481150988870947074663135867252252227647831/40509440107213064064897416415172689667 (* 43306673717838918980731699770600730039727453611468399058203483818093233880231/6173575908538565981 106634227988568775671050783423559067905086861634892257032833451008548321218936/17988169594879808463) EQL-OK: 1539324572884864883885215269788177741067901747630436643318399808029602335378536990210735234944615096105103848497832537965483619535769637171783464984418072/37017110149885307295697375341989232401 (* 61636028396239445662576777415312348317278054920190931147781159688109244233565/149659999183936017 50280832809996410949441105432174396823883728565382915986396125237655209339731/3406752842984125790) EQL-OK: 206607389257567119017662603624829733217835095238758046754428174885007999774491792658838812826043033826701244157167565054600950156595290052398436186551401/33990308513391731439280046802638562 (* -100579490802304807750359433955474958462342659278486016345156932756807754105945/15683759624513404963 7314396152134987983181095955389244247502417255088677055075146925285457081540/950287995699608967) EQL-OK: -735678240508074701153113537069655056596152436111651040530896921701439724727486696483134676487497031899584038731663111390949471467249259023050011663755300/14904088498613295322494450308817103221 (* 25984831699359211750216710442693374608159925357093100400945034699383345074385/10463598404993207796 -2395913226491242076662067669730978955981403048697660449593722338244504668974/7015215522730452775) EQL-OK: -6225740195664363384298636893730784883811595661227613249243163802476751022407971476247993440178871949687923603921101094083879668063131450147131783163099/7340439795432595812648347200273983390 (* 5173661857391320950903772549611256023540539838210520778403003347430938670915/2590493168574884173 100300641976357496491877756123729102910724064566692821682523911939220592349990/15304416107565779147) EQL-OK: 518921605664943617990486317157527087053001312760892500249127957517476408720600460633868004681188890038115877413554399588737851074382787744833707113540850/39645985375676570588146199684023740431 (* 30299639015164203561126609159677900559022306879488518544803392527841364186955/97638167801975054493877206805944332747 -50150465496280036231382225902610460555496341860773955714344071185921583266663/170117675960786609061777750278261277482) EQL-OK: -1519541000979732808188648781832621044050652591754537200855596768903085847105531546641139177813880505696192826380113425984545675787584857974943247950981165/16609978191541300835961154615181304582159561006676548938424954151558306303054 (* -34494394944257769716276791009665812125094062960425641316440943461722789694119/69239821080832171466311153221314488591 -68027404272124217088707268142523090163964888591405843143848585935878552833247/257149529774225346004390673137885895872) EQL-OK: 2346564149995340998782934409780604815295734898030424565252099571337345550054284934036215402972664245125313098735082896555892607540059632597741979943574393/17804987432587488254198543762235568841018786223139145264591718687823557996352 (* 22330754509472350470460807673039908304726422770752644988051418230315708975569/141163736844241522445115344332946835969 -3776092949566234532895208849184634613770861313997034923686862122594334787771/22367110097535579962848998753563258272) EQL-OK: -9369222740190326741203615957382420344247102784278353165345406236082475331042528539717966581690645628370939381978953360215380653092335198860022382107411/350824982641632215769272917522017419782283768012468846380070797128085153952 (* 1376215273451682681102140384578115142238259557166158859699272578561460124263/3593386179017642636485249017714833669104405991325015697577507088650274886871 37146275008876311604039415809582675415172661567487888072055609579242279390723/55424998453085285819414374477780690192979527887019008768378662580126754826472) EQL-OK: 51121271019052119686352858568900325361226598163234091421115939503875711782442415328681175322030659510284806538410228985354770913411724825992699509412149/199163423413390889071651575953261174839972499014963134990506980080139461063269751906284862132821075544766093817070661266293471833091996501160433036049112 (* -88175289711320073148300791156190227927348022787624424521937188958291199926437/38194742314758366741668899229532351990874883495690656157862650973602784662629 93421911195279228911508870033119580111709458306921869937709821511660370035352/66371395138592894543765954603571534463846496049156722497129962530412046587003) EQL-OK: -8237504085028962150049531747535213236460729066521397582683209771842938254589363802757604921456170821878391951762499073662677974506165863935238701489400824/2535038334389561782321790943041741331416028402594806464107449488311138037598457377927652600804722340759363172755193254192462811091332303758223034251210887 (* -88364214910455569163017945328431687038422451206033411348821431934742389780753/43010507830592044720656702803904712217809857004582018186125828892174875808576 10405170283887792832024806983921158923908589830001636723872220129826733402834/4055629711949631304631599195955105801456753694558712994574702123032807265321) EQL-OK: -459722351572673455425943766571506569631562018487574498847133029199411842205331593858852090421782204158679934054007027833206633183796877753882057444427001/87217346741895687976684378003169607737518608233754137677854312677618987931466495788077930577814677920791330694741284253568592140275298729115088619596448 (MULTIPLE-VALUE-LIST (FLOOR 13918288150951705093/1401140429528746218 8037346830653401534/12140087246062147767)) EQUAL-OK: (15 15819536596165521240797345101333717/5669989019487990500153722689252798402) (MULTIPLE-VALUE-LIST (FLOOR -3027396677293618661/17394867614909941317 -2291333958125929004/3188627451035828949)) EQUAL-OK: (0 -3027396677293618661/17394867614909941317) (MULTIPLE-VALUE-LIST (FLOOR 2672347537044132983/1242644867650938739 -18408840898134373335/10231522001278674776)) EQUAL-OK: (-2 -9204560351304414094275545654164256161/6357074151573303338260935869140273732) (MULTIPLE-VALUE-LIST (FLOOR 2909960574201625242/1140661215026522267 13303037060238089383/18166352033245030796)) EQUAL-OK: (3 7340592943788470245594328177983578849/20721653182840810059519494723194734532) (MULTIPLE-VALUE-LIST (FLOOR 8198662690782244017/1375380265264517299 -9940234650829186147/17690753691491997765)) EQUAL-OK: (-11 -486100547007747193780627302695509498/2211955773175772955922986386719257885) (MULTIPLE-VALUE-LIST (FLOOR 3966139130172032305/18040321970861620778 152082737803043526/946729689784517957)) EQUAL-OK: (1 1011240112172972726360628393816617657/17079308423086645837394450304465310546) (MULTIPLE-VALUE-LIST (FLOOR 10199468022732280591/121419468943382552600797741323914786260 -2627475271750260665/95465240194344921114274153619846654671)) EQUAL-OK: (-4 -302411943986468199606823674581501024373007929237189061039/11591338766949818909386523271402122174353420293128216789558932652732995620460) (MULTIPLE-VALUE-LIST (FLOOR -8471401573321747185/5927836485002954534423728282157030389 -10006560123550811854/209494971446104969537769985569938393355)) EQUAL-OK: (29 -54515717208483066409886298754350924985999966734110450701/1241851935162873209670541996670866824232223815534136678858726178724570665095) (MULTIPLE-VALUE-LIST (FLOOR 3041516402669280559/23467966340832028705164128018098446335 6098690148519419819/74694157223362514640536233319542912231)) EQUAL-OK: (1 12008521321399654679364472921217933270209469640706386252/250417138224955291159963090840561809997874350767164909187205124534624089055) (MULTIPLE-VALUE-LIST (FLOOR 12371726101368968041/23093272201098893335944386552801821150 552920335555268471/59704833009801809998987650097493815639)) EQUAL-OK: (57 10833671498697672110331389655963519805471190684307179149/1378779960416507709477447168250340219220272308941040290894608990101550964850) (MULTIPLE-VALUE-LIST (FLOOR 3936278768643199217/61530125725985401304656961990591319570 -4622522820386904221/99931589582562481620405120529601200875)) EQUAL-OK: (-2 -11699348415245273343366505594272785590391481515341739671/409920218067509498701508662179031915635595553469094563928706113041525908250) (MULTIPLE-VALUE-LIST (FLOOR 3378221394828629408/57360271731094852990248264232533113197 -4121489923477642292/582636574825978160767401314647264235)) EQUAL-OK: (-1 -234441506605160102966099186988989055202999923102442904644/33420192252492486160839993475212088893408362946965395344436948483624609295) (MULTIPLE-VALUE-LIST (FLOOR -3136864170660359113/44018155426864484368550814560728963265607376469242388043913852619483671810359 7592249764621265399/61218932554330370729612969835045191215382261653025522947071546902482986859295)) EQUAL-OK: (-1 142161354082922159316702479104046765633220994190482626315401062617857980099757409386379034462906/2694744488243248258380889922671073488004909384816885899374920518252041793957332742201117787314100221762775952924983170065632438581816845330037820256436905) (MULTIPLE-VALUE-LIST (FLOOR 8388845076992722039/113324439625023255923060004687633012536810961583168953468887128369059333869915 29270787347930250/338347801532036561796340241450622341080868991428994657767799334610272208941)) EQUAL-OK: (0 8388845076992722039/113324439625023255923060004687633012536810961583168953468887128369059333869915) (MULTIPLE-VALUE-LIST (FLOOR 4061469742865314937/64801603451247667482343238717974543532449298971352747107214551636724513855613 1344403291462061700/38470586305356068360716898225197866224089081322833216143931662358746898751411)) EQUAL-OK: (1 759644321951821493138045865317431182965861074290543254824595494322779964610920583206631767077/27395117343919593983759778902763691133722708413625034340026933459895718790907695509798551507285536033282436777270923749566119049487283571076783727846373) (MULTIPLE-VALUE-LIST (FLOOR -6300876868463754766/63495830134457398131576869576746882401947668656296419431644557856865817622371 2683373787654434721/32958906466135519543294750118994566579246721224880398401534853634103601897753)) EQUAL-OK: (-2 133096081053989316587079956940067402118415059770888001584265696499152144351877946562766899046184/2092753126391210514581307904104631961415819403699771474276457943469530908829049497503906750315560161637143522534287446520082226490203274292567625907432363) (MULTIPLE-VALUE-LIST (FLOOR -472307136668592250/36283411370339306010717878389083492352344779970196813667782297535345620767127 -3180306511295187523/75166923119981694900512094733973876755239261156251968596129974579413418042019)) EQUAL-OK: (0 -472307136668592250/36283411370339306010717878389083492352344779970196813667782297535345620767127) (MULTIPLE-VALUE-LIST (FLOOR -3148795985647001686/64429795462330994424525695145310698340316900821860011346129307089831843824641 -11298596415200487525/56650030835870774988744337125832477562271330606264442454925440669251648355512)) EQUAL-OK: (0 -3148795985647001686/64429795462330994424525695145310698340316900821860011346129307089831843824641) (MULTIPLE-VALUE-LIST (FLOOR -102545151309532699273956369870862301497/6030775709520909501 -3288683205470962892631604702141093469/1221554251153305018)) EQUAL-OK: (6 -348033375896483356529697355308057680498851424685117674/409273316984297575168605808523732001) (MULTIPLE-VALUE-LIST (FLOOR 262657016871433510082498751402781174749/7573480743368102221 51080528722906667824171406466289726452/1601607284756767193)) EQUAL-OK: (1 33815990969774126823949725673411671713268069951579559665/12129741929543448973808409847523235653) (MULTIPLE-VALUE-LIST (FLOOR 138482489784362691982393629835416135309/3631852344347114410 -24756007176022054565783765242491988918/219932185588761813)) EQUAL-OK: (-1 -59453406054861418860933161489781197608471921856017953163/798761223827929241442393231350025330) (MULTIPLE-VALUE-LIST (FLOOR -212217151846170123039362268732482984696/11596630494102963285 157767757347916893207763952109296030356/10257360923209581435)) EQUAL-OK: (-2 32941352246943117620876731374547894383947184420447916448/2643351654913607911070701558622724755) (MULTIPLE-VALUE-LIST (FLOOR -66747006612989726802598039638160699571/2655077042212383298 40811355885089157404164119163071734769/5571784139947382276)) EQUAL-OK: (-4 15382315863254661753182362315746357118308047043239937263/3698379038534340915097856546560906562) (MULTIPLE-VALUE-LIST (FLOOR 68762140087929702254258676232660238758/15300356027061891153 -35857327153107467171153230588794581375/12686181688605082704)) EQUAL-OK: (-2 -37488456798327399439537660212002603897618511901320984853/32350516076608496130809185423035152952) (MULTIPLE-VALUE-LIST (FLOOR 242045811640213090811968332747485173382/200549144102874156362839425688475328049 -14720899626826592765120758929463878529/55362986404688226126571951930830517493)) EQUAL-OK: (-5 -1360940123773119189782995319087829718305547957827775584170427519233923828279/11102999538439281856672090511521389719230333671905312848993361013013608061157) (MULTIPLE-VALUE-LIST (FLOOR -119845294654504250162135973476212065855/100235561394484311088266800183679226574 80594461105267736432364594799413149425/61631997559252488378599155330559465978)) EQUAL-OK: (-1 173031536634535211165479230108382118112369885610634326444128663790131209690/1544429468803790002857581373808877159258315141389178393568445604388376624843) (MULTIPLE-VALUE-LIST (FLOOR -230485693234637510798211679560546639349/52735224446003804525152654032694494673 -216057981617610709644611545583688426965/260006637986112259187147152181319007048)) EQUAL-OK: (5 -2958479432060194175681245276352090941756054532611547690395592385359334844527/13711508411648488620980405764270377927416829995446554240961159998044485455304) (MULTIPLE-VALUE-LIST (FLOOR -6594316542549343232263525515993767282/10217421010314527320204876001269664067 150738011702184633072457541580514087744/135040956724953232085930818414328999685)) EQUAL-OK: (-1 216550304321963092517168155612888510209814057236150214483836375316700196226/459923436164837338339599279302608001719626738369225259576013169605366272965) (MULTIPLE-VALUE-LIST (FLOOR 215280935061082631947114960623303029323/207354325693067193327551969107966799241 79751059907103262336474674983968289237/4337760464235769010513178238272088134)) EQUAL-OK: (0 215280935061082631947114960623303029323/207354325693067193327551969107966799241) (MULTIPLE-VALUE-LIST (FLOOR 310160128112311271225164732000676894965/86670395306350722800942425502835485142 178141651878134061724955020964246844473/148821875093870378260620578385076958277)) EQUAL-OK: (2 5093132355806944300558276298272344941234347692198850733707837927916021244991/4299483581539365588748720077960621199296398702837049138084337644406995806778) (MULTIPLE-VALUE-LIST (FLOOR -108659820552054791199784298344597956614/11790531032698157780195997261827578010352156078055016836768011974016954903741 -92538322534416259700833065660026629223/19585963177324586927996277066630337817907750129846119872015696245293090497388)) EQUAL-OK: (1 -1037131280631376361623284528995684848351041247146708940120596004521550738167239284685366257725745514224913041700989/230928906647528953486003129436653219142752591225509660589870619206780147714239888278154624266956202529317853226309156501996262035307639197627615351928508) (MULTIPLE-VALUE-LIST (FLOOR 5394706491096230323847274166255447931/10999333470518091906908673737442830723710024941373839628113269063387717150756 105688652677006186461732590041930264063/21972728496093720326374563200555762299989227113998910666496198593694363180514)) EQUAL-OK: (0 5394706491096230323847274166255447931/10999333470518091906908673737442830723710024941373839628113269063387717150756) (MULTIPLE-VALUE-LIST (FLOOR -191689412702065586724423672263415136270/93810201821180445246181740077575222573046098171118578720996957721548578622199 -96035306478379345278597023485459703599/90477882577875726723065337577743037040931870384035502080606137411367114071296)) EQUAL-OK: (1 -8334560691183765714134253806956288712175511004636349604358505688696669629914037375584956898475941052209595993911719/8487748424983587977143569651002086894691875550521839392659856872027244953584789975128015403703285861633097358090901236825413778659897331594626425134299904) (MULTIPLE-VALUE-LIST (FLOOR -23269937861894460494044792238228308465/36609152344338882339480850660297061488131282119857763060331849352205685148721 325068909216594106686082320524489871331/91177237475655724082435461235746167562462517272459785633509544221351873775622)) EQUAL-OK: (-1 9778808569440655820425835535754928474979020881405653286273845718180424961228320899578451645656486131670752875977421/3337921377082244749772660717107363339434489502423902307989133990817960972244485458695718522007125256227586389900645261310720433804087640398154830854279462) (MULTIPLE-VALUE-LIST (FLOOR -238326953836192259685740729837504392751/14355772111692545517089448796014758311054554297101342377064555342044509505629 -2243842813596041779461072557214411973/26977869328891440663623277939723739398284518432434090329689171706564354694000)) EQUAL-OK: (199 -6448765647740977471904737113847651808330060639815597135148713750030489976324569684096986913258458168828297495539/129096048048195144296601029799754739460578975322841318685536300111243981862070688561642588911885232705019881753766051653025282618058049676501115190842000) (MULTIPLE-VALUE-LIST (FLOOR -154358049055187385619395426022892405693/9651466522903571511806795329901971873531573523740147689205585933143787251744 234831599528611417562275088467151900111/23212020955553784427152057042945842586938059290340162186208579138883161355663)) EQUAL-OK: (-2 316658791137724604029754690574124702890700231484127998714230110560397057808441246896564869593555547226559779365903/74676681060487840411987924431521223169933844488425876950176937169482763523750924018302125631058404128587876741120722730563623397211887516476096033675424) (MULTIPLE-VALUE-LIST (FLOOR -43654015885600226452139253734240763904114948357839504394635758939147918485226/8959421350865475053 -71396498978827369985021009185210519228191289633806094987720268011017813959395/5118659875263168828)) EQUAL-OK: (0 -43654015885600226452139253734240763904114948357839504394635758939147918485226/8959421350865475053) (MULTIPLE-VALUE-LIST (FLOOR 30206748063040753946799836869317684942154090322823467523870425873885298155111/10481539418044277488 47024848487236673350978260730205414416590483746605328718368229684499622280474/7191921838593099535)) EQUAL-OK: (0 30206748063040753946799836869317684942154090322823467523870425873885298155111/10481539418044277488) (MULTIPLE-VALUE-LIST (FLOOR -78297878369391722158254897331818780133560455296543117876032852961696240531334/3439835335342974343 -12036259456916995957158314961009661904873237837146662571140339452059150719867/7648180594799196815)) EQUAL-OK: (14 -19197805765101853520494699712598051602631126933023081616555585309855479307669655742300981287876/26308481861074724148503061769552317545) (MULTIPLE-VALUE-LIST (FLOOR -11644466368871135752271367372638717312589950278007329817169736850185519100737/1311440431008130360 16666792145043036974187190230561351375866940864814143604767927371030164658327/1190204555866760523)) EQUAL-OK: (-1 7998208151350462202845967149504108047636942539158206705970028049633264098721802988652183702269/1560882375733744790369742288085778280) (MULTIPLE-VALUE-LIST (FLOOR -79973663368880337215592714973251653953011156710750446016524362581184906490344/13217906252057303539 58550120458525994168414457422879483045080411293174816365332363703279727325517/11983119832054095608)) EQUAL-OK: (-2 294743007488634911900879023610601157709203210196036764662698142539282328840165292825377976700087/79195877273629847756913363266891378356) (MULTIPLE-VALUE-LIST (FLOOR -41283916983957018057492477658728498328100012640087810269690534262888976961251/890401703093780527 37905097813993829793947873722213455441729327992618875876994782685865871567157/6801392244603328629)) EQUAL-OK: (-9 7656253348038361960592683452946138937700391767097248361228404271354846832369355003597180736924/2018657079334544839920956083927269161) (MULTIPLE-VALUE-LIST (FLOOR -18621387073793741287833632061282985993236184599525107084971126746444001531559/112377251064249742125143336262406044187 -80344252057643577515390451958447799739023169996897035042227858478107352127859/16565237077789941458934656364080562722)) EQUAL-OK: (0 -18621387073793741287833632061282985993236184599525107084971126746444001531559/112377251064249742125143336262406044187) (MULTIPLE-VALUE-LIST (FLOOR -11067278490740390186400140048488373691939192899502978554850454064301747327289/279730468938850077684950205987597341304 10742600231685337944302634339424380376867728558611903252501449407612160123471/85514692364145379323997472383947484080)) EQUAL-OK: (-1 85775736874497976296219552104494263998937714945890467644689458878788010379480929901293727971077618208617170461961/996711041507662039484243506170638972651237308243642442559705598573661101680) (MULTIPLE-VALUE-LIST (FLOOR 60114400703399744178227904113253512958642740092037841351403601970012663733574/137652538688206271590219421417082587275 48818636606796573849225811493965362933035106650390076441334389457476994620122/53029693036557887125608655547988906029)) EQUAL-OK: (0 60114400703399744178227904113253512958642740092037841351403601970012663733574/137652538688206271590219421417082587275) (MULTIPLE-VALUE-LIST (FLOOR 3914498366778062569843980805049542971189141573995351572704819538012574198620/2893535793927099250376915741311683101565016171163532500028982710856616653543 -64455977862771995990556362474021252617135665526576459531278423102067698175925/3427268293660091333898426457103031174054024747619806545506815375759964110507)) EQUAL-OK: (-1 -173089642940460836493548201378493831666834527213381638819285816422714170656111775323359444521902045952676537769939820706047335458029055584112252141651935/9916923483096927116177052980173451074387932639677487416966276325060341893415045555506102924285291258490295955820662010134773377007870870750288985076301) (MULTIPLE-VALUE-LIST (FLOOR 88685468991633001080737925907185943038820418099572822599681084512202985499349/12356339561700478684701129356342132279853496560835988907745653698832814553183 6529471572210817352014560971376587702394496047549533959161274051805568907/3739659250056306079416159597801009351379164652345884310988690700223397485)) EQUAL-OK: (4 8931962841313470806790103494237286341563410404854617106114803081793820819240374925219641539537617481113314045913411523358730270170471325648745013341/46208499538749877879324553712339970407875860449933229680283463405247211324108302788607460717099015088790299594129098751336540918286885704752480944755) (MULTIPLE-VALUE-LIST (FLOOR 5294621876959552948152278397535786930445255402598688035901577017296377116948/5881250468392395166026135319241737823103911942970361556821993967308880332607 -65630221834131781450865541487035630878349246622282004360445526978282263449249/98696808137715829282209856003081855629375417101578635063186137762415694777903)) EQUAL-OK: (-2 -249413266253338816038191146071217173249587815937933968995202267999853691656986532179554523041282106904325952906300316562845535251623832095499430051524242/580460649088775579832453445973177920831893989101100068436102498480125976298386547626652311003668489010795846489626845062951616643824353457996671633983121) (/ 7013212896988366906/12397903473277899947 818833870013215068/2125577647443895255) EQL-OK: 7453564285301859120853045020886215515/5075911640537211768265804260348400698 (/ -15781329068048599432/14942574238341613337 4388772934226358350/2640112802717985697) EQL-OK: -20832244458230302534551181278529162052/32789782692450857054331267544650656975 (/ -9015230453321124271/17425619133302730035 -10422000746814766599/14972344381173680534) EQL-OK: 134979135022768387806775446187867640714/181609815620990738305316999098032100965 (/ -14741075237791868512/12448692140900938227 -1090381863721238817/1060836378253796023) EQL-OK: 15637868866825840780217685066084527776/13573828137487503515304766902031557459 (/ -7371815071140740177/4722722556038701367 3872455829192658988/994203944294825175) EQL-OK: -7329087620340161131469364260313555975/18288534491791723206480607737200436596 (/ -9856364379969390509/7988230468709836259 -7208901117187058135/7430860779232874136) EQL-OK: 1093153305924514768551484985555671272/859497963436269188803272225817371895 (/ -16740689272507881147/56924866550406451570641164619431212169 -14712532880452686095/143481612520580129383584255576273223983) EQL-OK: 2401981091525408257128502717450566513166280001357873948501/837508970838236191644285394369194561392491093277901090055 (/ 1874027699956565000/65960003455647360668413772300355814843 -172394881832672950/2006879686300828197846469567507151887) EQL-OK: -75218962452157875130617756878839223573611935155763100/227423340028380523596387094039260091189651621559491937 (/ 851521912886492079/58839621451933520132430725102159653727 -5525838657334730480/268863138354222710211869290179088409033) EQL-OK: -228942853876053297959532391872114722003932597144466549607/325138254802036127673497464266072288930584674567672498960 (/ 2130823024472312937/30463932363736038600114358208342163020 413938864244113775/131673792970459944919771618253738144891) EQL-OK: 280573549781056638388629087822719475587456644826399754867/12610205563054396144647765193069861697742251186477600500 (/ 17234694073181371137/253506951459931119968572673772742357160 8407879684613951161/42697666588937447817581914537644794355) EQL-OK: 147176244259806896721181660841298454615950364713859506327/426291189417673978158704851675227114861497071554451732552 (/ 14739301038477826821/4801125431810347467140397350459581435 -1752125940488995048/127905197451270157484305628763539243969) EQL-OK: -1885233209620217720514367144506571751170505057476450692549/8412176412616337518572109406238500578932979745867733880 (/ 9194848570227974720/45448499872046683203864930109076126035374684748838016011669264943000310475483 -4572473918523931944/28941042619577200519536336906341131911598596429670188136734086846500956354149) EQL-OK: -33263563043940787786171015409141766453199063320923723716765930467953050399983260590187417389160/25976510037621464639740779963549572814837984766154635046133743883024710122710674726552171566119 (/ -2662376868940711929/2674240208804755702377222409224408783678596883960539287029565653749020338064 -5046618244273151929/26826013625152995057141957222948811537350409769204161465077735924332004069058) EQL-OK: 35710479080747854012875521001477955195584454274704368888444222736697434540936425667291700196441/6747934713661461716612153292457811722283965560031580498434684530869001786777260513409206862728 (/ 646980248518054663/28444849537262537816809349756569888989442483441699293309597267649158853799707 -10174938507557455325/16470612178414296088079890015341965945714023680627341561729034923083435428747) EQL-OK: -10656160760434978971303471120231114671340660575734505071429575384684610862775940451177787597261/289424594898370460244167952344748286246980979584479610186308309369583658143095854438992150589775 (/ 1268676597518744714/6024937921458004492480888468749320142603908196076058575752452561172018490893 17823595902143962912/85935047374548136904062562443188289405155329832270007415035044821925251080203) EQL-OK: 18170630585125644385503771892175817370913744757273904248648000044618805359154885235028182716157/17897676474595109057512045856227678061218241143085827332930191066967148125532813505892133626736 (/ -3035741006152688190/58890268425224581569217175195410848521985674465189565646495474378301884202047 -4870935665435665519/47998868922405332801456101880162843269583282603435159879276723163289928325531) EQL-OK: 145712134636693761356266465698326002831562744975420904782663360472436650653549187025441059178890/286850708819506259357726384810790881448875152111132928069815447961129371272624891025817707117393 (/ -4420263280205408439/38682162086456801604593696710774835436326970692840048042132553053971380151628 -758651402628235427/1755534012040040367913026343944696058732638465867705260088080517539506722166) EQL-OK: 3879961265286134914514096239640695384126081133972137242327715997675029567458817030555062379437/14673138261791601182714628661554161812345431143865809776872034934342213839184709418896670662578 (/ -312487180249669742743295380499853180353/9828632991038934281 -86131955660561774942466932680637336739/10268762916730341592) EQL-OK: 3208856768501438660232746468300370677374054716853273141976/846559380988100144557815474234956961169507773676687849659 (/ 105376075880566042097567073713047434893/11411565636673693365 -220737802783327232867818580441304577024/5817406274606660773) EQL-OK: -613015445021032499619145665530563205764250055719854552289/2518963924957071797477174332253152325843619212749200245760 (/ -311533429150518992652072799089375050497/4403073054828470603 -320230219907951760832723580313293021909/1370493254961533625) EQL-OK: 426954463345823097468320537904981772054351338526938461625/1409997052618498081840381197699863669488222338862641441127 (/ 305676222727436457375950609916137360009/2001517485431820526 324338803123828318219640932070020543912/11123178903397935211) EQL-OK: 3400091311912189654145957985944153094384781502787164376899/649169785656371151621897383467144093766684841422885937712 (/ 8845112929712368402815105446090151026/8124751572615311799 -107609110538267962880281203537194473336/8714443449141779053) EQL-OK: -38540118213625599008519681983731393728094066419546629189/437148645036763776481446937412401903340367189496615845732 (/ 152921217721894690043853278309581658066/11705615305395353865 184187448038871874764725486848823516773/4171619104693691390) EQL-OK: 127585814672335876029018138907883882524550368713261650348/431205482165106014329333719781838993214328411764819575529 (/ 16414254293541341780725162107696242521/155838132618727968561620486302365154071 323320173010032367023620851618405869489/49801924105617352177018959505967933104) EQL-OK: 817461446577249670665800625691379410535771218196808189195363718417488315184/50385611999847495177988476252475899813264458225659097815552272081452203039719 (/ -188149667625860588508273820953820709614/21438745582767797684161462130971215025 128458309657689922121539794960212789849/134174286369366827879740776978166655691) EQL-OK: -25244847384333405496229128525982900130397411994350175944375943735942831513274/2753985018743617742875555653653797261370358442640799457019039857068516281225 (/ 1218460641064115152742257147372113443/1773382194117714970762642066492794929 -105212349758139121832338365854603836112/35045896682356785176328011712384921341) EQL-OK: -42702045738251194875426595475683618047253961691478453648029952948483687063/186581707662369193907913729212042024270164277319717456729276609131940676048 (/ 1467722271775252460214852151179762687/1747611358981474614363356529179985509 25495740211005247928144692929451604259/29615224810946461612486375021101910565) EQL-OK: 14488975012885720730598332784736375353299643425098519766594278819666029385/14852215066131169889445443721709162270198753408805825268529301698140894277 (/ 6278399735526726207674375684072448068/13890681759576280617381650633747782321 -112063146811220963294237186476216238443/46495820670393894026441353693945662660) EQL-OK: -291919348200099113895651901892723884699250237261456280525601785996696740880/1556633509331345870779770006255469001211806559199158615405344674499795966203 (/ 248406099260780863433196593538936526373/315762135750029127758352280023694126018 -24578051912523675039725210046249323571/3033769619337997374435389027823294736) EQL-OK: -376803438597807975522050212312559316811899647514236724224019181136008036264/3880409082236781853269738100403484871805889674074731389226471480469265885139 (/ -305871752543087256004326578375555909668/80170799467978436032303243749692785696371676780847080230403479135749775915991 -208573266832391890136462745593008906685/96016271562601269514856687672805175650907293023094157826925793080307407361434) EQL-OK: 29368665255505841438632782694581946057561031972462112644657516768267440383833513431444679871238206541553985530943912/16721485549600848123731461311227384049611071114404954309505697259277905994635125654414916826332204568970567318299835 (/ -171651126582338417143004525987733942986/48126955023093310081685702171788275811688444573315712039582092051531229683107 32570134112026732491936310765048378699/18584159151613423191553551933672204731023422884196280183931777685641069715348) EQL-OK: -3189991854959918631828923606391779823799241149346421336570141741355492000935500642040047513113849334779592681149128/1567501379505627719887579027549074087653888429037997616626567546431482074522690424133509833932668944596793898937793 (/ -31304786393644787215292629624842492472/10539846271603297974613179098685212701091372728582260780054561526149580513583 43496364289252206338797704034889660065/966865502932307025364733802774045297740949567802356684866342045679773834966) EQL-OK: -30267518040679809082934454680954168768135550720881039440573156734314284479043791824457029301083428211405425375952/458444992982373700837242411005687390212275114474481688646320865335043970683786989531994936463047685893258985162895 (/ 124366625369659591476708994326732418029/107684759001536292829359995221778346870065030877016948429894748600664800488759 -90949754058598173499067700725927605729/79727020098830307921496202496061295138733611655702270828135321391380898414003) EQL-OK: -9915380440470549523296226431396644117384598256053664887332801972488440466568616812942647849957495261151611303260087/9793902347049141646079571573977765974008832433473016883117384010293158932212528563016145547341801740792289848500311 (/ 26792084925762094333829722201654015569/6815899891200140342329613369008754659665480100088941978786466272502677117648 179968988142253715757129058636648023126/97033837835570527321466682927970125702018459951415339098532052222053589117353) EQL-OK: 866579607987744230609336186273867662887766686833260209925103055244528379635362816895584608387230956963010276689619/408883535566062149539621907018509777969515872715944952500700527207173412646715462423653890585029605025758308909216 (/ 320794852821756057819990044473359503428/42380074203350930293358543616207018031675687905746455222111844144668904183229 -11813439835454851567822019323728871339/51852159737956631156972450987013128151750117741949546305537111598356497409240) EQL-OK: -5544635317209327550045071802859986261979158492907374734760649234578367469399038563605323839330681533705071632958240/166884818941132804535892580774781586387104334774784737031184369589400544303785250219152004898392301479219940857877 (/ 63160395612932962868082774785156358041658469338654564454114468396132462549944/5671929772244157797 19541045450680948617094710246839287171374470593288265457341382295544977156173/10827756125123268218) EQL-OK: 227961786821047895774887365257727015864174017882302289602409601101722343657899277052494444293264/36945145824164509580938949252327087600266044162541122809277442696583642758457532273140841543627 (/ 31389399613343712511677734270541516183531975055644318154870016415582858008412/11320913214023484367 -95931706646769408081251897664360951854776052790951374912970042200868629796051/14301831604104230477) EQL-OK: -149641969141325406602881756591195860220337618158488775091717625369334526143115090325362684257508/362011508473745439254610688691597507367516106821889963803421575701854031622412859179610532278239 (/ -50845041077039215658764589763556935122444212169574762080162289087527164772395/482986173890811026 -51342299909113507561385579724776151277474630060658338514843664853027455595538/3864573616937705869) EQL-OK: 196494404298439669659681446421686066898686292162412914850963937042669022612531239234324840686255/24797620991857267698917294149872672843409173617406514673128342148521539559341861421304646801988 (/ 76283614020376921713154299810619585257752996149145061806263596894412414185408/337890011287912517039286436540240936661 70530558237421368381589233382700323659036925075366138096846582768833233488577/12121510300837787759729092713205686989) EQL-OK: 924672613133132744522463879340347327755455994321131972145048214329608890428265966744607561005512244129921459256512/23831571118985077324412202325831974453532679575894228007993082738742295289254461850021038245882565939546151124021397 (/ 13518475961402756750057330871273933874583566313800024119371308450919239424622/71146816100737230880567880716110051085 -11914742388051168959634071864657967837347162591767656949770878950409478930980/166466796775669753065110807850377519909) EQL-OK: -1125188695291804746273664719520877594103080002716204716437885631737502681157239448228517736957154781558316254899699/423847992785167635691798025732868758201476408654527740579259436528169254792708107390082891890404030666159494556650 (/ -53624051286117226406327700847140806598091981633622544805551583455315188018537/149060170957501829683988930330276188371 -49540630291338976658332195799658601133012561780540500265134312414843218811481/313014990314092319823049811442768272842) EQL-OK: 16785131893926373429171158665038393627227592608630727377590747943991201054188961463248027101037470630205119769672154/7384534820569381535972144752572408048556227885764547207137140227958732266609348654686668662110083737942669493487451 (/ 2634758410586745842739353561704344884865889793873131750193619887157306355755/83106075320614705363810122092414199463231740446254118542567688658288107572919 10787649314660479714744029413883607304719873485501736976813666398631455642569/2439964488756696481271244145022481444549967702052558191280867337292105066432) EQL-OK: 2142905652761565172685487282499186838096673751132490328620490049367034561455889328384026705096013173825469773464105722689198047146574263705663366838720/298839732158850477765824602476778580028064205733214070073086531571837859351705342746223206218407306637658483098569582239416197836311325170250187389329637 (/ -1907320079310938642409293211056905401889419041722087613680756850005726714712/10387378553621846874105702088597026076825105075730032753153301604042569998683 113647247724474559442709588703965365251731833799417671287796250968092484717057/58756890421232187224353930678527831208703723187770044891160428018937233424397) EQL-OK: -37356065632762902117955690133395145368676268194116097031480521390942668514422835237280325034441435052929702455487858500299401976652159912902024146542888/393498994563785425899168694480259206994308562177080555315323154941891277193612821825931878224565302417504072329241812530787363937691786269618438039211977 (/ -54987418627898620923060954379316763081930842855917193391807940070173620336071/17370345837184638879794373707261631548922174314274224219546763452439685451597 107349939397731511365417710412808670916754334908520065561311453951414109180973/7800708635318451621630266369706695626474649690647985662113853436261704078874) EQL-OK: -428940831324519456770429889832838610542119304716244392653623661175655561457214418178921042544524225772650432309479656622489393939407340321261255371264054/1864705572939408818246392762570376592749103793151936455808919833872532407312841098160841844995663367019074328670998871082130543124576872890789577304863881 (+ 0.52019s0 0.98203s0) EQL-OK: 1.50223s0 (+ 0.026268s0 0.6137s0) EQL-OK: 0.63997s0 (+ -0.338943s0 0.450523s0) EQL-OK: 0.11158s0 (+ -0.032799s0 0.995186s0) EQL-OK: 0.96239s0 (+ 0.249222s0 0.96463s0) EQL-OK: 1.21385s0 (+ -0.46177s0 -0.80114s0) EQL-OK: -1.26291s0 (+ -0.127754s0 -1.88775s9) EQL-OK: -1.88775s9 (+ -0.65572s0 -9.1112s9) EQL-OK: -9.1112s9 (+ -0.99359s0 -7.6134s9) EQL-OK: -7.6134s9 (+ 0.0169907s0 -5.9027s9) EQL-OK: -5.9027s9 (+ 0.77272s0 -9.5384s9) EQL-OK: -9.5384s9 (+ -0.50671s0 1.95366s9) EQL-OK: 1.95366s9 (+ -0.281487s0 -1.4109s-13) EQL-OK: -0.281487s0 (+ 0.86259s0 -1.8225s-13) EQL-OK: 0.86259s0 (+ 0.42874s0 6.326s-14) EQL-OK: 0.42874s0 (+ -0.53545s0 3.607s-14) EQL-OK: -0.53545s0 (+ 0.63671s0 -4.723s-14) EQL-OK: 0.63671s0 (+ 0.34449s0 -4.873s-14) EQL-OK: 0.34449s0 (+ -0.480698s0 3.03292s19) EQL-OK: 3.03292s19 (+ 0.85132s0 -6.325s19) EQL-OK: -6.325s19 (+ -0.54742s0 -2.83806s19) EQL-OK: -2.83806s19 (+ 0.45269s0 1.62964s19) EQL-OK: 1.62964s19 (+ -0.5122s0 -3.6148s18) EQL-OK: -3.6148s18 (+ 0.192093s0 5.3618s19) EQL-OK: 5.3618s19 (+ -0.43486s0 -8.918s-24) EQL-OK: -0.43486s0 (+ 0.289955s0 -5.911s-24) EQL-OK: 0.289955s0 (+ 0.274345s0 -1.6779s-23) EQL-OK: 0.274345s0 (+ 0.392723s0 -7.441s-24) EQL-OK: 0.392723s0 (+ -0.62215s0 3.521s-24) EQL-OK: -0.62215s0 (+ -0.5406s0 -7.718s-24) EQL-OK: -0.5406s0 (+ 6.5444s9 -0.060898s0) EQL-OK: 6.5444s9 (+ -8.541s9 -0.181755s0) EQL-OK: -8.541s9 (+ 3.02993s9 0.694534s0) EQL-OK: 3.02993s9 (+ 9.3926s9 -0.77226s0) EQL-OK: 9.3926s9 (+ -6.4481s9 0.252235s0) EQL-OK: -6.4481s9 (+ -1.1734s8 0.94104s0) EQL-OK: -1.1734s8 (+ -5.1049s9 1.28059s9) EQL-OK: -3.82435s9 (+ -7.39554s9 8.9347s9) EQL-OK: 1.53911s9 (+ 3.11457s9 1.71478s9) EQL-OK: 4.82935s9 (+ -8.0461s9 9.0508s9) EQL-OK: 1.00467s9 (+ -8.58006s8 -2.82289s7) EQL-OK: -8.86235s8 (+ 1.82954s9 -1.83914s9) EQL-OK: -9601024.0s0 (+ 7.6292s9 1.3988s-13) EQL-OK: 7.6292s9 (+ -1.43837s9 -2.482s-15) EQL-OK: -1.43837s9 (+ -6.4696s9 -1.3269s-13) EQL-OK: -6.4696s9 (+ 9.6744s9 -3.132s-14) EQL-OK: 9.6744s9 (+ -1.18927s9 -1.9405s-13) EQL-OK: -1.18927s9 (+ -3.81462s9 -8.602s-14) EQL-OK: -3.81462s9 (+ 5.5761s9 1.32286s19) EQL-OK: 1.32286s19 (+ 7.1631s9 -9.3184s19) EQL-OK: -9.3184s19 (+ 4.7921s9 -5.8008s19) EQL-OK: -5.8008s19 (+ 7.792s9 9.7695s19) EQL-OK: 9.7695s19 (+ 8.9575s9 7.0198s19) EQL-OK: 7.0198s19 (+ 4.4688s9 7.2066s19) EQL-OK: 7.2066s19 (+ 8.9222s9 -1.3243s-23) EQL-OK: 8.9222s9 (+ -9.7717s9 3.434s-24) EQL-OK: -9.7717s9 (+ -4.22478s9 -7.938s-24) EQL-OK: -4.22478s9 (+ 3.9261s8 7.916s-24) EQL-OK: 3.9261s8 (+ -3.239s9 -8.986s-24) EQL-OK: -3.239s9 (+ -4.6268s9 -1.0129s-23) EQL-OK: -4.6268s9 (+ 1.1171s-13 0.73372s0) EQL-OK: 0.73372s0 (+ -3.575s-14 0.94588s0) EQL-OK: 0.94588s0 (+ 3.176s-14 -0.160759s0) EQL-OK: -0.160759s0 (+ 5.055s-15 -0.0258102s0) EQL-OK: -0.0258102s0 (+ 6.371s-14 0.480484s0) EQL-OK: 0.480484s0 (+ -9.257s-14 0.698975s0) EQL-OK: 0.698975s0 (+ -1.0281s-13 -9.4453s9) EQL-OK: -9.4453s9 (+ 5.96s-14 -1.71395s9) EQL-OK: -1.71395s9 (+ 6.805s-14 -5.8515s9) EQL-OK: -5.8515s9 (+ 1.1645s-13 7.4758s9) EQL-OK: 7.4758s9 (+ -1.0064s-13 -1.86868s9) EQL-OK: -1.86868s9 (+ 8.912s-15 -8.4908s9) EQL-OK: -8.4908s9 (+ 4.036s-14 3.308s-15) EQL-OK: 4.3668s-14 (+ -2.503s-15 -7.642s-14) EQL-OK: -7.8923s-14 (+ 4.653s-14 -4.612s-14) EQL-OK: 4.10262s-16 (+ 4.7s-14 -8.456s-14) EQL-OK: -3.756s-14 (+ 8.181s-14 -4.658s-14) EQL-OK: 3.52305s-14 (+ -1.5467s-13 2.3608s-13) EQL-OK: 8.1409s-14 (+ -4.341s-14 -5.14576s19) EQL-OK: -5.14576s19 (+ -3.159s-14 -9.4925s19) EQL-OK: -9.4925s19 (+ -7.325s-14 3.49983s19) EQL-OK: 3.49983s19 (+ 4.134s-14 7.07955s19) EQL-OK: 7.07955s19 (+ 4.08s-15 -3.7832s19) EQL-OK: -3.7832s19 (+ 1.1577s-13 3.30522s19) EQL-OK: 3.30522s19 (+ -6.838s-14 2.739s-24) EQL-OK: -6.838s-14 (+ 5.05s-14 6.768s-24) EQL-OK: 5.05s-14 (+ -1.9477s-13 -6.657s-24) EQL-OK: -1.9477s-13 (+ -6.348s-14 -5.222s-24) EQL-OK: -6.348s-14 (+ -8.77s-14 -1.58234s-22) EQL-OK: -8.77s-14 (+ 7.906s-14 4.9202s-22) EQL-OK: 7.906s-14 (+ 3.7985s19 0.8199s0) EQL-OK: 3.7985s19 (+ 9.891s19 0.79037s0) EQL-OK: 9.891s19 (+ -1.49583s19 -0.360153s0) EQL-OK: -1.49583s19 (+ -7.36023s19 0.8185s0) EQL-OK: -7.36023s19 (+ 3.62075s19 -0.364594s0) EQL-OK: 3.62075s19 (+ 8.0477s19 -0.531815s0) EQL-OK: 8.0477s19 (+ 3.62182s19 -7.2661s9) EQL-OK: 3.62182s19 (+ -3.23868s19 -9.6806s9) EQL-OK: -3.23868s19 (+ -6.08735s19 2.89138s9) EQL-OK: -6.08735s19 (+ 5.00175s19 -6.3548s9) EQL-OK: 5.00175s19 (+ 2.82944s19 4.7262s9) EQL-OK: 2.82944s19 (+ 4.6168s19 -6.8772s9) EQL-OK: 4.6168s19 (+ 1.15555s19 -3.786s-14) EQL-OK: 1.15555s19 (+ 8.1897s19 -8.971s-14) EQL-OK: 8.1897s19 (+ 4.32734s19 -4.794s-14) EQL-OK: 4.32734s19 (+ -9.4559s19 -1.9717s-13) EQL-OK: -9.4559s19 (+ -4.20726s19 -8.657s-14) EQL-OK: -4.20726s19 (+ 9.7697s19 -3.376s-14) EQL-OK: 9.7697s19 (+ 6.09264s19 -7.5608s18) EQL-OK: 5.33654s19 (+ -5.2828s19 6.8924s18) EQL-OK: -4.59356s19 (+ 5.73685s19 -1.4978s19) EQL-OK: 4.23907s19 (+ -1.30897s19 4.8593s19) EQL-OK: 3.55036s19 (+ -8.5586s19 -9.712s19) EQL-OK: -1.82707s20 (+ 3.8772s19 -8.6355s19) EQL-OK: -4.75833s19 (+ -1.03845s19 6.88s-24) EQL-OK: -1.03845s19 (+ 8.4716s19 9.614s-24) EQL-OK: 8.4716s19 (+ -4.3023s19 -7.649s-24) EQL-OK: -4.3023s19 (+ 5.9593s19 -2.552s-24) EQL-OK: 5.9593s19 (+ 9.8934s19 1.3093s-23) EQL-OK: 9.8934s19 (+ -5.70567s19 7.918s-24) EQL-OK: -5.70567s19 (+ -2.893s-24 -0.93898s0) EQL-OK: -0.93898s0 (+ 8.795s-24 -0.030014s0) EQL-OK: -0.030014s0 (+ -9.366s-24 0.200493s0) EQL-OK: 0.200493s0 (+ -9.3102s-22 -0.28704s0) EQL-OK: -0.28704s0 (+ 7.142s-24 -0.45701s0) EQL-OK: -0.45701s0 (+ 9.42s-24 0.957794s0) EQL-OK: 0.957794s0 (+ 2.975s-24 -6.84104s9) EQL-OK: -6.84104s9 (+ 2.26822s-22 -8.9898s9) EQL-OK: -8.9898s9 (+ -1.531s-23 8.1961s9) EQL-OK: 8.1961s9 (+ 1.7221s-23 -1.53725s9) EQL-OK: -1.53725s9 (+ -9.488s-24 -4.77676s8) EQL-OK: -4.77676s8 (+ -1.5077s-23 2.8251s9) EQL-OK: 2.8251s9 (+ 3.41s-24 -4.701s-14) EQL-OK: -4.701s-14 (+ -3.361s-24 -4.947s-15) EQL-OK: -4.947s-15 (+ 9.026s-24 7.353s-14) EQL-OK: 7.353s-14 (+ -6.385s-24 7.789s-14) EQL-OK: 7.789s-14 (+ 1.8237s-23 8.517s-14) EQL-OK: 8.517s-14 (+ 3.4439s-22 -4.345s-14) EQL-OK: -4.345s-14 (+ -6.817s-24 -9.8611s19) EQL-OK: -9.8611s19 (+ 6.213s-24 -2.7257s19) EQL-OK: -2.7257s19 (+ -1.9353s-23 -2.71446s19) EQL-OK: -2.71446s19 (+ -3.653s-24 -7.7565s19) EQL-OK: -7.7565s19 (+ 1.2298s-23 -1.56532s19) EQL-OK: -1.56532s19 (+ 2.905s-24 2.334s19) EQL-OK: 2.334s19 (+ 3.182s-24 -5.727s-24) EQL-OK: -2.545s-24 (+ -1.0745s-23 3.64s-24) EQL-OK: -7.1049s-24 (+ -9.7145s-22 8.77s-24) EQL-OK: -9.6267s-22 (+ 1.3734s-23 3.225s-24) EQL-OK: 1.69588s-23 (+ 2.745s-24 1.0505s-23) EQL-OK: 1.325s-23 (+ 2.78s-24 2.747s-24) EQL-OK: 5.527s-24 (- 0.57362s0 -0.0545654s0) EQL-OK: 0.62819s0 (- -0.121063s0 -0.157204s0) EQL-OK: 0.0361404s0 (- 0.75334s0 -0.186554s0) EQL-OK: 0.939896s0 (- 0.879036s0 -0.54558s0) EQL-OK: 1.42462s0 (- -0.245338s0 -0.003891s0) EQL-OK: -0.241447s0 (- -0.89576s0 0.61608s0) EQL-OK: -1.51184s0 (- -0.59227s0 6.61s9) EQL-OK: -6.61s9 (- 0.381363s0 1.88003s9) EQL-OK: -1.88003s9 (- 0.858986s0 1.31028s9) EQL-OK: -1.31028s9 (- 0.56377s0 -3.26553s9) EQL-OK: 3.26553s9 (- 0.80342s0 -1.46217s9) EQL-OK: 1.46217s9 (- 0.093941s0 8.30203s9) EQL-OK: -8.30203s9 (- 0.266243s0 4.98s-14) EQL-OK: 0.266243s0 (- -0.169983s0 8.01s-15) EQL-OK: -0.169983s0 (- 0.77925s0 -2.777s-15) EQL-OK: 0.77925s0 (- -0.379807s0 3.99s-15) EQL-OK: -0.379807s0 (- -0.392517s0 1.108s-13) EQL-OK: -0.392517s0 (- -0.26274s0 -7.575s-14) EQL-OK: -0.26274s0 (- 0.72031s0 4.1223s19) EQL-OK: -4.1223s19 (- 0.589775s0 -2.9271s19) EQL-OK: 2.9271s19 (- 0.205704s0 -8.4906s19) EQL-OK: 8.4906s19 (- 0.362556s0 6.8624s19) EQL-OK: -6.8624s19 (- -0.604004s0 -1.42777s19) EQL-OK: 1.42777s19 (- -0.53121s0 2.3539s19) EQL-OK: -2.3539s19 (- -0.684906s0 8.179s-24) EQL-OK: -0.684906s0 (- 0.43084s0 -5.849s-24) EQL-OK: 0.43084s0 (- 0.153358s0 3.633s-24) EQL-OK: 0.153358s0 (- 0.93678s0 9.13s-24) EQL-OK: 0.93678s0 (- 0.78924s0 -7.766s-24) EQL-OK: 0.78924s0 (- 0.33867s0 3.51s-24) EQL-OK: 0.33867s0 (- 8.0573s9 -0.86206s0) EQL-OK: 8.0573s9 (- 9.3318s9 -0.93273s0) EQL-OK: 9.3318s9 (- -4.26515s9 0.464104s0) EQL-OK: -4.26515s9 (- -3.35557s9 -0.93267s0) EQL-OK: -3.35557s9 (- -6.81614s9 -0.64528s0) EQL-OK: -6.81614s9 (- -5.099s9 0.67011s0) EQL-OK: -5.099s9 (- -4.2206s9 4.9182s9) EQL-OK: -9.1389s9 (- -5.18173s9 2.267s9) EQL-OK: -7.4487s9 (- 5.53314s9 6.08856s9) EQL-OK: -5.5542s8 (- 9.88s9 -3.3333s9) EQL-OK: 1.32132s10 (- 4.87404s9 7.17075s9) EQL-OK: -2.2967s9 (- -2.9911s9 -1.37177s8) EQL-OK: -2.85393s9 (- -8.1379s9 3.023s-15) EQL-OK: -8.1379s9 (- 4.8877s9 -1.1596s-13) EQL-OK: 4.8877s9 (- -1.89071s9 -4.33s-14) EQL-OK: -1.89071s9 (- 8.7563s9 -4.676s-14) EQL-OK: 8.7563s9 (- -4.4533s9 2.743s-15) EQL-OK: -4.4533s9 (- 4.0261s9 2.1618s-13) EQL-OK: 4.0261s9 (- 9.1731s9 -8.0954s19) EQL-OK: 8.0954s19 (- 6.984s9 1.09772s19) EQL-OK: -1.09772s19 (- -9.8832s9 -8.0905s19) EQL-OK: 8.0905s19 (- -8.5769s9 -6.24565s19) EQL-OK: 6.24565s19 (- 8.5486s9 2.77396s19) EQL-OK: -2.77396s19 (- -9.4026s9 -3.5611s19) EQL-OK: 3.5611s19 (- 5.1003s9 -1.9535s-23) EQL-OK: 5.1003s9 (- 1.88706s9 -1.6304s-23) EQL-OK: 1.88706s9 (- -9.4567s9 -1.9848s-23) EQL-OK: -9.4567s9 (- 9.6498s9 -1.57531s-21) EQL-OK: 9.6498s9 (- -5.733s9 1.23215s-21) EQL-OK: -5.733s9 (- -4.0567s9 -5.229s-24) EQL-OK: -4.0567s9 (- -4.379s-14 -0.0201035s0) EQL-OK: 0.0201035s0 (- -4.036s-14 0.82034s0) EQL-OK: -0.82034s0 (- 1.6661s-13 -0.70753s0) EQL-OK: 0.70753s0 (- 3.36s-14 0.60217s0) EQL-OK: -0.60217s0 (- 4.977s-14 -0.95905s0) EQL-OK: 0.95905s0 (- -2.967s-14 0.55465s0) EQL-OK: -0.55465s0 (- 4.394s-14 2.01859s9) EQL-OK: -2.01859s9 (- 3.683s-14 4.77836s9) EQL-OK: -4.77836s9 (- -6.887s-14 -9.26s9) EQL-OK: 9.26s9 (- -2.643s-15 -5.6812s9) EQL-OK: 5.6812s9 (- -8.498s-14 -9.3728s9) EQL-OK: 9.3728s9 (- 9.033s-14 2.18002s9) EQL-OK: -2.18002s9 (- 3.113s-14 -9.207s-14) EQL-OK: 1.232s-13 (- -3.239s-15 -1.2957s-13) EQL-OK: 1.26331s-13 (- 3.098s-15 -6.117s-15) EQL-OK: 9.2151s-15 (- 1.7706s-13 4.829s-14) EQL-OK: 1.2877s-13 (- 2.793s-15 8.62s-14) EQL-OK: -8.3407s-14 (- -5.019s-14 4.125s-14) EQL-OK: -9.144s-14 (- -9.495s-14 -6.06994s18) EQL-OK: 6.06994s18 (- 9.385s-14 -7.9288s19) EQL-OK: 7.9288s19 (- -3.099s-14 -6.64095s19) EQL-OK: 6.64095s19 (- 3.397s-15 2.92222s19) EQL-OK: -2.92222s19 (- -8.463s-14 -4.9708s19) EQL-OK: 4.9708s19 (- -2.735s-15 -9.2672s19) EQL-OK: 9.2672s19 (- -2.974s-14 -7.975s-24) EQL-OK: -2.974s-14 (- -2.1853s-13 2.736s-24) EQL-OK: -2.1853s-13 (- 3.243s-15 -6.867s-24) EQL-OK: 3.243s-15 (- 4.792s-14 -2.659s-24) EQL-OK: 4.792s-14 (- 4.672s-14 7.831s-24) EQL-OK: 4.672s-14 (- 2.0285s-13 2.741s-24) EQL-OK: 2.0285s-13 (- -9.1884s19 -0.22573s0) EQL-OK: -9.1884s19 (- 3.32245s19 0.7651s0) EQL-OK: 3.32245s19 (- 4.13513s17 0.85135s0) EQL-OK: 4.13513s17 (- 2.2249s19 0.45778s0) EQL-OK: 2.2249s19 (- 4.9103s19 0.84862s0) EQL-OK: 4.9103s19 (- 4.27386s19 -0.06662s0) EQL-OK: 4.27386s19 (- -6.725s19 5.11246s8) EQL-OK: -6.725s19 (- -2.40906s19 7.2238s9) EQL-OK: -2.40906s19 (- 6.1667s19 -7.4303s9) EQL-OK: 6.1667s19 (- -7.746s19 -4.29687s8) EQL-OK: -7.746s19 (- -1.81419s19 -5.68164s9) EQL-OK: -1.81419s19 (- 7.0665s19 -8.9546s8) EQL-OK: 7.0665s19 (- 2.47788s19 -2.2961s-13) EQL-OK: 2.47788s19 (- -7.4962s19 -3.378s-14) EQL-OK: -7.4962s19 (- 1.72135s19 7.168s-14) EQL-OK: 1.72135s19 (- 8.3699s19 4.887s-14) EQL-OK: 8.3699s19 (- -4.5701s19 -8.009s-14) EQL-OK: -4.5701s19 (- -2.845s18 1.1087s-13) EQL-OK: -2.845s18 (- 6.4084s19 -4.569s19) EQL-OK: 1.09774s20 (- 1.33888s19 -6.8446s19) EQL-OK: 8.1835s19 (- -4.0631s19 1.50864s19) EQL-OK: -5.57174s19 (- -5.61754s18 2.6413s18) EQL-OK: -8.2588s18 (- -9.0749s19 6.21626s19) EQL-OK: -1.5291s20 (- -8.5269s19 6.2002s19) EQL-OK: -1.47271s20 (- 3.15773s19 5.433s-24) EQL-OK: 3.15773s19 (- 5.1563s19 -1.6366s-23) EQL-OK: 5.1563s19 (- -5.8449s19 3.282s-24) EQL-OK: -5.8449s19 (- 4.70947s19 1.564s-23) EQL-OK: 4.70947s19 (- -4.32334s19 -1.0593s-23) EQL-OK: -4.32334s19 (- 7.9621s19 5.61s-24) EQL-OK: 7.9621s19 (- 8.164s-24 0.133362s0) EQL-OK: -0.133362s0 (- -1.57089s-21 0.3154s0) EQL-OK: -0.3154s0 (- -3.736s-24 -0.66536s0) EQL-OK: 0.66536s0 (- -6.923s-24 -0.431366s0) EQL-OK: 0.431366s0 (- 3.345s-24 0.77436s0) EQL-OK: -0.77436s0 (- -1.4322s-23 0.799644s0) EQL-OK: -0.799644s0 (- -1.3249s-23 -4.22035s9) EQL-OK: 4.22035s9 (- 2.707s-24 -6.5029s9) EQL-OK: 6.5029s9 (- -3.49s-24 -2.5205s9) EQL-OK: 2.5205s9 (- -1.0086s-23 1.35048s9) EQL-OK: -1.35048s9 (- 1.4406s-23 1.55487s9) EQL-OK: -1.55487s9 (- 3.37s-24 -4.3973s9) EQL-OK: 4.3973s9 (- -1.31249s-21 3.448s-14) EQL-OK: -3.448s-14 (- -7.706s-24 -1.9488s-13) EQL-OK: 1.9488s-13 (- -9.8403s-22 2.294s-13) EQL-OK: -2.294s-13 (- -3.355s-24 1.0187s-13) EQL-OK: -1.0187s-13 (- 9.5635s-22 -8.663s-14) EQL-OK: 8.663s-14 (- -5.713s-24 -3.169s-14) EQL-OK: 3.169s-14 (- 2.645s-24 -5.2307s19) EQL-OK: 5.2307s19 (- -9.96s-24 -9.2854s19) EQL-OK: 9.2854s19 (- 8.036s-24 -7.11434s19) EQL-OK: 7.11434s19 (- 3.475s-24 -4.845s19) EQL-OK: 4.845s19 (- -3.062s-24 4.91714s19) EQL-OK: -4.91714s19 (- -2.541s-24 -2.91276s19) EQL-OK: 2.91276s19 (- 1.4371s-23 1.1606s-23) EQL-OK: 2.76508s-24 (- -1.8769s-23 2.965s-24) EQL-OK: -2.1734s-23 (- 3.713s-24 -1.7581s-23) EQL-OK: 2.1294s-23 (- -5.954s-24 -2.764s-24) EQL-OK: -3.19s-24 (- 3.21502s-22 8.56s-24) EQL-OK: 3.12942s-22 (- 9.969s-24 5.912s-24) EQL-OK: 4.057s-24 (* -0.56581s0 -0.117477s0) EQL-OK: 0.06647s0 (* 0.73841s0 0.08886s0) EQL-OK: 0.065615s0 (* -0.75174s0 -0.173615s0) EQL-OK: 0.130512s0 (* 0.557236s0 -0.105034s0) EQL-OK: -0.0585284s0 (* -0.62105s0 0.828835s0) EQL-OK: -0.51475s0 (* -0.54287s0 -0.92243s0) EQL-OK: 0.50076s0 (* -0.2173s0 5.5084s9) EQL-OK: -1.19698s9 (* 0.467354s0 -7.9517s9) EQL-OK: -3.71625s9 (* -0.95485s0 5.6451s9) EQL-OK: -5.3902s9 (* 0.0472946s0 -6.774s9) EQL-OK: -3.20373s8 (* 0.196037s0 7.3548s8) EQL-OK: 1.44181s8 (* -0.25535s0 4.91907s9) EQL-OK: -1.25608s9 (* 0.047058s0 6.612s-14) EQL-OK: 3.11147s-15 (* -0.35054s0 3.764s-14) EQL-OK: -1.31943s-14 (* 0.372635s0 1.0613s-13) EQL-OK: 3.9548s-14 (* 0.627266s0 -9.519s-14) EQL-OK: -5.971s-14 (* -0.0293884s0 1.1626s-13) EQL-OK: -3.41667s-15 (* -0.88304s0 -1.116s-13) EQL-OK: 9.8547s-14 (* 0.318016s0 -6.86827s19) EQL-OK: -2.18422s19 (* 0.605064s0 3.4281s19) EQL-OK: 2.07422s19 (* -0.65415s0 -8.185s19) EQL-OK: 5.3542s19 (* 0.87548s0 6.72325s19) EQL-OK: 5.8861s19 (* 0.45806s0 -9.503s19) EQL-OK: -4.35295s19 (* -0.995384s0 1.62797s19) EQL-OK: -1.62045s19 (* 0.26301s0 -1.3169s-23) EQL-OK: -3.46357s-24 (* 0.82762s0 -3.411s-24) EQL-OK: -2.82304s-24 (* -0.042412s0 -3.339s-24) EQL-OK: 1.41613s-25 (* 0.858284s0 -7.61s-24) EQL-OK: -6.53157s-24 (* 0.75574s0 1.0518s-23) EQL-OK: 7.9488s-24 (* 0.977s0 -5.944s-24) EQL-OK: -5.8073s-24 (* 1.1316s9 0.87906s0) EQL-OK: 9.9474s8 (* 9.7596s9 0.58181s0) EQL-OK: 5.67824s9 (* 5.5896s9 -0.91708s0) EQL-OK: -5.12616s9 (* -7.677s9 -0.67695s0) EQL-OK: 5.19694s9 (* -4.73655s9 0.65572s0) EQL-OK: -3.10588s9 (* -3.2158s9 -0.30076s0) EQL-OK: 9.6717s8 (* 5.94916s9 -1.02867s9) EQL-OK: -6.1197s18 (* -3.19098s9 8.125s9) EQL-OK: -2.59267s19 (* -6.57215s9 9.4253s9) EQL-OK: -6.1944s19 (* -5.2792s9 3.93547s9) EQL-OK: -2.0776s19 (* 2.502s9 4.1275s9) EQL-OK: 1.0327s19 (* -8.9462s9 -4.72174s9) EQL-OK: 4.22415s19 (* -8.9588s9 -1.419s-14) EQL-OK: 1.27126s-4 (* -3.56218s9 -9.982s-14) EQL-OK: 3.5558s-4 (* -3.4449s9 4.582s-15) EQL-OK: -1.57845s-5 (* -3.7047s9 1.2985s-14) EQL-OK: -4.8105s-5 (* -8.9172s8 -7.294s-14) EQL-OK: 6.5043s-5 (* 1.64864s9 1.8344s-13) EQL-OK: 3.02427s-4 (* -9.935s8 -7.9116s19) EQL-OK: 7.8602s28 (* -7.0441s9 -6.3448s19) EQL-OK: 4.4693s29 (* 7.72866s9 1.44264s19) EQL-OK: 1.11497s29 (* 3.7816s9 -3.16285s19) EQL-OK: -1.19606s29 (* -1.06926s9 6.67816s19) EQL-OK: -7.1407s28 (* 4.04482s9 -3.52235s19) EQL-OK: -1.42473s29 (* -8.77s8 -3.499s-24) EQL-OK: 3.06864s-15 (* -9.5508s9 1.0006s-23) EQL-OK: -9.5566s-14 (* -2.98736s9 -7.07s-24) EQL-OK: 2.11207s-14 (* 9.9779s9 1.2683s-23) EQL-OK: 1.26548s-13 (* 7.4813s9 -1.373s-23) EQL-OK: -1.02719s-13 (* 8.5804s9 6.999s-24) EQL-OK: 6.0054s-14 (* 4.637s-14 0.895805s0) EQL-OK: 4.15384s-14 (* 1.0125s-13 -0.322685s0) EQL-OK: -3.26718s-14 (* 2.31s-16 0.0601425s0) EQL-OK: 1.38928s-17 (* 1.0579s-13 -0.27089s0) EQL-OK: -2.86576s-14 (* 9.54s-14 -0.21251s0) EQL-OK: -2.02735s-14 (* -4.463s-14 -0.96336s0) EQL-OK: 4.2995s-14 (* 3.27s-14 -5.9141s9) EQL-OK: -1.93391s-4 (* -6.515s-14 1.01791s9) EQL-OK: -6.6318s-5 (* 3.695s-14 8.7417s9) EQL-OK: 3.23005s-4 (* -1.09s-13 -6.75794s9) EQL-OK: 7.3662s-4 (* 4.551s-14 -7.1112s9) EQL-OK: -3.2363s-4 (* 5.456s-15 -5.44014s9) EQL-OK: -2.96813s-5 (* -3.377s-14 3.358s-15) EQL-OK: -1.13399s-28 (* 3.862s-14 7.278s-14) EQL-OK: 2.81079s-27 (* 9.449s-14 3.17s-14) EQL-OK: 2.99533s-27 (* 7.051s-14 -4.234s-14) EQL-OK: -2.98537s-27 (* -8.955s-14 9.895s-14) EQL-OK: -8.861s-27 (* -1.6752s-13 -7.341s-14) EQL-OK: 1.22977s-26 (* 9.42s-14 4.50844s19) EQL-OK: 4246912.0s0 (* 2.0183s-13 9.598s19) EQL-OK: 1.93715s7 (* -7.441s-14 -5.7324s19) EQL-OK: 4265472.0s0 (* 7.241s-14 -5.79135s19) EQL-OK: -4193504.0s0 (* 7.987s-14 8.1113s19) EQL-OK: 6478528.0s0 (* -1.1603s-13 7.4468s19) EQL-OK: -8640512.0s0 (* -4.432s-14 -6.851s-24) EQL-OK: 3.03637s-37 (* -5.064s-14 -8.119s-24) EQL-OK: 4.1115s-37 (* 3.553s-15 -6.404s-24) EQL-OK: -2.27533s-38 (* 8.699s-14 -3.558s-24) EQL-OK: -3.0951s-37 (* 9.82s-14 -5.771s-24) EQL-OK: -5.6671s-37 (* -3.477s-14 7.723s-24) EQL-OK: -2.6853s-37 (* 7.9082s19 0.71604s0) EQL-OK: 5.6626s19 (* -6.83905s19 -0.36905s0) EQL-OK: 2.52396s19 (* -7.7697s19 -0.34073s0) EQL-OK: 2.64736s19 (* -2.10557s19 -0.58961s0) EQL-OK: 1.24146s19 (* 9.0963s19 -0.37693s0) EQL-OK: -3.42865s19 (* -4.24076s19 0.91147s0) EQL-OK: -3.8653s19 (* -3.5865s19 -6.4046s9) EQL-OK: 2.297s29 (* 7.19225s18 -7.7232s9) EQL-OK: -5.5547s28 (* 1.98907s19 -9.9239s9) EQL-OK: -1.97393s29 (* -4.27195s19 7.0734s9) EQL-OK: -3.02173s29 (* -8.3115s19 5.2947s9) EQL-OK: -4.40073s29 (* 9.4386s19 8.6548s8) EQL-OK: 8.169s28 (* 6.21677s19 -3.135s-14) EQL-OK: -1948960.0s0 (* -6.30774s19 1.5884s-13) EQL-OK: -1.00192s7 (* 7.6073s19 3.922s-14) EQL-OK: 2983552.0s0 (* -1.44485s19 -3.355s-14) EQL-OK: 484748.0s0 (* 3.39653s19 -7.679s-14) EQL-OK: -2608192.0s0 (* -6.0072s19 1.7825s-13) EQL-OK: -1.07078s7 (* 1.06812s16 -1.19583s19) EQL-OK: -1.2773s35 (* 1.1438s19 2.616s-24) EQL-OK: 2.99218s-5 (* -5.79304s18 -3.095s-24) EQL-OK: 1.79296s-5 (* -7.6387s19 8.607s-24) EQL-OK: -6.5746s-4 (* 4.03933s19 3.058s-24) EQL-OK: 1.23523s-4 (* -2.06994s19 -1.1381s-23) EQL-OK: 2.3558s-4 (* 3.7857s18 -3.59s-24) EQL-OK: -1.35906s-5 (* 5.656s-24 -0.096458s0) EQL-OK: -5.4557s-25 (* -5.799s-24 -0.148445s0) EQL-OK: 8.6083s-25 (* -9.041s-24 0.86431s0) EQL-OK: -7.8143s-24 (* -2.645s-24 -0.911865s0) EQL-OK: 2.41187s-24 (* -9.758s-24 -0.397186s0) EQL-OK: 3.87574s-24 (* -5.345s-24 -0.27215s0) EQL-OK: 1.45463s-24 (* -3.713s-24 9.11335s8) EQL-OK: -3.38382s-15 (* -3.01s-24 -9.5278s9) EQL-OK: 2.86784s-14 (* -1.6904s-23 -8.37655s9) EQL-OK: 1.41599s-13 (* -5.074s-24 -9.2804s9) EQL-OK: 4.7089s-14 (* -6.942s-22 -8.7038s9) EQL-OK: 6.04217s-12 (* -7.643s-24 -3.1665s9) EQL-OK: 2.42018s-14 (* -2.659s-24 -9.238s-14) EQL-OK: 2.4564s-37 (* -1.7036s-23 3.138s-14) EQL-OK: -5.34586s-37 (* 7.684s-24 8.639s-14) EQL-OK: 6.6383s-37 (* -3.424s-24 -6.046s-14) EQL-OK: 2.07014s-37 (* 9.3102s-22 -1.1344s-13) EQL-OK: -1.05614s-34 (* 8.07s-24 3.573s-14) EQL-OK: 2.8834s-37 (* 3.557s-24 7.9957s19) EQL-OK: 2.84407s-4 (* 7.281s-24 -3.45443s19) EQL-OK: -2.5152s-4 (* -1.6093s-23 3.22463s19) EQL-OK: -5.1894s-4 (* -1.8628s-23 4.95593s19) EQL-OK: -9.2319s-4 (* 3.463s-24 -4.44685s19) EQL-OK: -1.53994s-4 (* -8.081s-24 -1.54701s19) EQL-OK: 1.25013s-4 (MULTIPLE-VALUE-LIST (FLOOR -0.403114s0 0.64293s0)) EQUAL-OK: (-1 0.239813s0) (MULTIPLE-VALUE-LIST (FLOOR -0.538574s0 0.74157s0)) EQUAL-OK: (-1 0.202993s0) (MULTIPLE-VALUE-LIST (FLOOR 0.59919s0 -0.433258s0)) EQUAL-OK: (-2 -0.26733s0) (MULTIPLE-VALUE-LIST (FLOOR -0.62148s0 -0.185875s0)) EQUAL-OK: (3 -0.063861s0) (MULTIPLE-VALUE-LIST (FLOOR 0.298317s0 -0.79534s0)) EQUAL-OK: (-1 -0.49703s0) (MULTIPLE-VALUE-LIST (FLOOR 0.84822s0 9.519s9)) EQUAL-OK: (0 0.84822s0) (MULTIPLE-VALUE-LIST (FLOOR 0.185059s0 -4.4452s9)) EQUAL-OK: (-1 -4.4452s9) (MULTIPLE-VALUE-LIST (FLOOR -0.442635s0 -4.64486s9)) EQUAL-OK: (0 -0.442635s0) (MULTIPLE-VALUE-LIST (FLOOR 0.78401s0 -8.4401s9)) EQUAL-OK: (-1 -8.4401s9) (MULTIPLE-VALUE-LIST (FLOOR 0.300156s0 -4.4083s9)) EQUAL-OK: (-1 -4.4083s9) (MULTIPLE-VALUE-LIST (FLOOR 0.67763s0 2.54755s9)) EQUAL-OK: (0 0.67763s0) (MULTIPLE-VALUE-LIST (FLOOR -0.189995s0 -1.9236s-13)) EQUAL-OK: (987708260352 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 0.442696s0 -4.184s-15)) EQUAL-OK: (-105806519336960 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 0.175987s0 -5.055s-15)) EQUAL-OK: (-34814468030464 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 0.30565s0 -4.296s-14)) EQUAL-OK: (-7114747543552 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 0.256264s0 4.541s-14)) EQUAL-OK: (5643318591488 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -0.51656s0 4.057s-14)) EQUAL-OK: (-12732698984448 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -0.221672s0 -5.9783s19)) EQUAL-OK: (0 -0.221672s0) (MULTIPLE-VALUE-LIST (FLOOR -0.441925s0 -8.1227s19)) EQUAL-OK: (0 -0.441925s0) (MULTIPLE-VALUE-LIST (FLOOR 0.73287s0 -3.99683s19)) EQUAL-OK: (-1 -3.99683s19) (MULTIPLE-VALUE-LIST (FLOOR -0.376198s0 9.1146s19)) EQUAL-OK: (-1 9.1146s19) (MULTIPLE-VALUE-LIST (FLOOR 0.61628s0 -5.83824s19)) EQUAL-OK: (-1 -5.83824s19) (MULTIPLE-VALUE-LIST (FLOOR -0.072037s0 4.40705s19)) EQUAL-OK: (-1 4.40705s19) (MULTIPLE-VALUE-LIST (FLOOR 0.378708s0 3.258s-24)) EQUAL-OK: (116238699015966918967296 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 0.98937s0 -7.698s-24)) EQUAL-OK: (-128524230569057480343552 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -0.94075s0 -1.0053s-23)) EQUAL-OK: (93579179764423948500992 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 0.263123s0 -3.06s-24)) EQUAL-OK: (-85988344578092468011008 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -0.58892s0 -1.1106s-23)) EQUAL-OK: (53027471682887319814144 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -0.38977s0 -2.812s-24)) EQUAL-OK: (138609987891358177689600 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -1.46599s9 0.338676s0)) EQUAL-OK: (-4328587264 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -6.326s9 0.91743s0)) EQUAL-OK: (-6895370240 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -3.63617s9 -0.569855s0)) EQUAL-OK: (6380847104 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -1.45737s9 0.9508s0)) EQUAL-OK: (-1532788736 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 5.24714s9 0.45768s0)) EQUAL-OK: (11464605696 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 8.1693s9 0.69472s0)) EQUAL-OK: (11759255552 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -2.7664s9 -1.9246s9)) EQUAL-OK: (1 -8.418s8) (MULTIPLE-VALUE-LIST (FLOOR 8.29057s9 -7.18694s9)) EQUAL-OK: (-2 -6.0833s9) (MULTIPLE-VALUE-LIST (FLOOR 6.7409s9 8.9158s9)) EQUAL-OK: (0 6.7409s9) (MULTIPLE-VALUE-LIST (FLOOR 9.4039s9 -1.80932s9)) EQUAL-OK: (-6 -1.45206s9) (MULTIPLE-VALUE-LIST (FLOOR 4.4432s9 -7.587s9)) EQUAL-OK: (-1 -3.14373s9) (MULTIPLE-VALUE-LIST (FLOOR -4.8365s9 -3.4401s8)) EQUAL-OK: (14 -2.03249s7) (MULTIPLE-VALUE-LIST (FLOOR 4.70575s9 2.813s-15)) EQUAL-OK: (1672861433068424397848576 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 8.37706s8 1.1696s-13)) EQUAL-OK: (7162308674587923054592 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 4.9421s9 3.384s-15)) EQUAL-OK: (1460410281571511491887104 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 9.4391s8 6.964s-14)) EQUAL-OK: (13554177553722320617472 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 3.56217s8 3.38s-14)) EQUAL-OK: (10538999588799264063488 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 7.53166s9 7.011s-14)) EQUAL-OK: (107426919956256787529728 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -5.3385s9 -7.8903s19)) EQUAL-OK: (0 -5.3385s9) (MULTIPLE-VALUE-LIST (FLOOR -5.5786s8 -6.5112s19)) EQUAL-OK: (0 -5.5786s8) (MULTIPLE-VALUE-LIST (FLOOR -7.0502s9 -2.57187s18)) EQUAL-OK: (0 -7.0502s9) (MULTIPLE-VALUE-LIST (FLOOR 3.48724s9 3.0864s19)) EQUAL-OK: (0 3.48724s9) (MULTIPLE-VALUE-LIST (FLOOR -1.195s9 6.9068s19)) EQUAL-OK: (-1 6.9068s19) (MULTIPLE-VALUE-LIST (FLOOR 6.40785s9 6.1696s19)) EQUAL-OK: (0 6.40785s9) (MULTIPLE-VALUE-LIST (FLOOR -9.9772s9 -3.455s-24)) EQUAL-OK: (2887787295482420840947083445796864 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 6.3337s9 -2.757s-24)) EQUAL-OK: (-2297319607304237298946798769930240 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 2.24916s9 8.958s-24)) EQUAL-OK: (251078998767860827355040375111680 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -4.695s9 -9.695s-24)) EQUAL-OK: (484267288087969338977238606938112 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -5.84457s9 -7.7713s-22)) EQUAL-OK: (7520717852416051178813723246592 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -2.01576s9 6.682s-24)) EQUAL-OK: (-301671132293375748429617783898112 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 1.7042s-13 -0.80732s0)) EQUAL-OK: (-1 -0.80732s0) (MULTIPLE-VALUE-LIST (FLOOR 4.959s-14 0.9918s0)) EQUAL-OK: (0 4.959s-14) (MULTIPLE-VALUE-LIST (FLOOR 2.082s-13 0.75837s0)) EQUAL-OK: (0 2.08202s-13) (MULTIPLE-VALUE-LIST (FLOOR 4.808s-14 0.89121s0)) EQUAL-OK: (0 4.808s-14) (MULTIPLE-VALUE-LIST (FLOOR -4.005s-14 0.71084s0)) EQUAL-OK: (-1 0.71084s0) (MULTIPLE-VALUE-LIST (FLOOR 4.497s-14 -0.83223s0)) EQUAL-OK: (-1 -0.83223s0) (MULTIPLE-VALUE-LIST (FLOOR -4.538s-14 3.81524s9)) EQUAL-OK: (-1 3.81524s9) (MULTIPLE-VALUE-LIST (FLOOR -1.0888s-13 2.5705s9)) EQUAL-OK: (-1 2.5705s9) (MULTIPLE-VALUE-LIST (FLOOR -1.0445s-15 3.9579s9)) EQUAL-OK: (-1 3.9579s9) (MULTIPLE-VALUE-LIST (FLOOR -3.399s-14 3.8115s9)) EQUAL-OK: (-1 3.8115s9) (MULTIPLE-VALUE-LIST (FLOOR 8.889s-14 1.02951s9)) EQUAL-OK: (0 8.889s-14) (MULTIPLE-VALUE-LIST (FLOOR -4.408s-14 -5.5562s9)) EQUAL-OK: (0 -4.40806s-14) (MULTIPLE-VALUE-LIST (FLOOR 1.4679s-13 -1.9105s-13)) EQUAL-OK: (-1 -4.426s-14) (MULTIPLE-VALUE-LIST (FLOOR 1.274s-14 -4.935s-14)) EQUAL-OK: (-1 -3.661s-14) (MULTIPLE-VALUE-LIST (FLOOR -4.321s-14 -8.355s-14)) EQUAL-OK: (0 -4.32102s-14) (MULTIPLE-VALUE-LIST (FLOOR -1.1228s-13 -3.641s-14)) EQUAL-OK: (3 -3.0501s-15) (MULTIPLE-VALUE-LIST (FLOOR 4.643s-14 9.809s-14)) EQUAL-OK: (0 4.643s-14) (MULTIPLE-VALUE-LIST (FLOOR 6.832s-14 1.2918s-13)) EQUAL-OK: (0 6.832s-14) (MULTIPLE-VALUE-LIST (FLOOR -3.186s-15 7.2502s19)) EQUAL-OK: (-1 7.2502s19) (MULTIPLE-VALUE-LIST (FLOOR 7.57s-14 -6.8838s19)) EQUAL-OK: (-1 -6.8838s19) (MULTIPLE-VALUE-LIST (FLOOR -1.5446s-14 -8.6798s19)) EQUAL-OK: (0 -1.5446s-14) (MULTIPLE-VALUE-LIST (FLOOR -1.2496s-13 -8.0029s19)) EQUAL-OK: (0 -1.24963s-13) (MULTIPLE-VALUE-LIST (FLOOR -3.303s-15 -9.7969s19)) EQUAL-OK: (0 -3.303s-15) (MULTIPLE-VALUE-LIST (FLOOR -3.832s-14 5.17976s19)) EQUAL-OK: (-1 5.17976s19) (MULTIPLE-VALUE-LIST (FLOOR -1.1039s-13 1.1031s-23)) EQUAL-OK: (-10007216128 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -3.303s-14 -1.61171s-21)) EQUAL-OK: (20493824 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 3.66s-14 -1.3664s-23)) EQUAL-OK: (-2678554624 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -1.9574s-13 -6.864s-24)) EQUAL-OK: (28516810752 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 3.285s-14 -3.329s-24)) EQUAL-OK: (-9867755520 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -3.291s-15 4.2038s-23)) EQUAL-OK: (-78285824 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -7.18707s19 0.231445s0)) EQUAL-OK: (-310527697906823069696 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 9.5173s19 -0.0566254s0)) EQUAL-OK: (-1680761395333178589184 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -6.6524s19 -0.697136s0)) EQUAL-OK: (95424520704539754496 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 3.42423s19 0.68306s0)) EQUAL-OK: (50130693352167833600 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -7.2388s19 0.0522995s0)) EQUAL-OK: (-1384100280679029276672 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 5.9235s18 -0.24643s0)) EQUAL-OK: (-24037400061136601088 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -2.63137s18 -1.6819s9)) EQUAL-OK: (1564524544 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 2.4749s19 -2.36457s9)) EQUAL-OK: (-10466623488 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -2.07847s19 6.4981s9)) EQUAL-OK: (-3198582784 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -2.54907s19 4.4446s9)) EQUAL-OK: (-5735186432 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 2.34573s19 3.0757s9)) EQUAL-OK: (7626620928 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -1.93055s19 4.8192s9)) EQUAL-OK: (-4005953536 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 4.4928s19 9.588s-14)) EQUAL-OK: (468585063670302141654816501268480 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -2.17698s19 -3.259s-14)) EQUAL-OK: (667992445198391196335567431270400 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -8.3605s19 -1.2702s-13)) EQUAL-OK: (658197863607565267600565560410112 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 5.2775s19 3.555s-15)) EQUAL-OK: (14845297722947765992252704150257664 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -5.0371s19 6.922s-15)) EQUAL-OK: (-7276948270610150879291824750460928 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR 8.3107s18 -1.0201s-13)) EQUAL-OK: (-81468833985370875891111365181440 0.0s0) (MULTIPLE-VALUE-LIST (FLOOR -3.8796s19 3.8685s19)) EQUAL-OK: (-2 3.85733s19) (MULTIPLE-VALUE-LIST (FLOOR 4.11224s18 -7.757s19)) EQUAL-OK: (-1 -7.34577s19) (MULTIPLE-VALUE-LIST (FLOOR -1.7228s19 -6.0107s19)) EQUAL-OK: (0 -1.72278s19) (MULTIPLE-VALUE-LIST (FLOOR 9.1191s19 -4.49645s19)) EQUAL-OK: (-3 -4.3702s19) (MULTIPLE-VALUE-LIST (FLOOR 4.2755s19 8.9417s19)) EQUAL-OK: (0 4.2755s19) (MULTIPLE-VALUE-LIST (FLOOR -4.3237s19 -1.9687s19)) EQUAL-OK: (2 -3.86314s18) (MULTIPLE-VALUE-LIST (FLOOR 3.109s-24 0.00614166s0)) EQUAL-OK: (0 3.109s-24) (MULTIPLE-VALUE-LIST (FLOOR -6.2027s-23 0.0328217s0)) EQUAL-OK: (-1 0.0328217s0) (MULTIPLE-VALUE-LIST (FLOOR -6.017s-24 0.76966s0)) EQUAL-OK: (-1 0.76966s0) (MULTIPLE-VALUE-LIST (FLOOR -7.628s-24 0.47249s0)) EQUAL-OK: (-1 0.47249s0) (MULTIPLE-VALUE-LIST (FLOOR 3.323s-24 -0.86671s0)) EQUAL-OK: (-1 -0.86671s0) (MULTIPLE-VALUE-LIST (FLOOR -5.302s-24 0.0245514s0)) EQUAL-OK: (-1 0.0245514s0) (MULTIPLE-VALUE-LIST (FLOOR 5.342s-24 6.0717s9)) EQUAL-OK: (0 5.34194s-24) (MULTIPLE-VALUE-LIST (FLOOR -2.664s-24 5.573s9)) EQUAL-OK: (-1 5.573s9) (MULTIPLE-VALUE-LIST (FLOOR -2.83s-24 7.0363s9)) EQUAL-OK: (-1 7.0363s9) (MULTIPLE-VALUE-LIST (FLOOR -3.176s-24 1.12686s9)) EQUAL-OK: (-1 1.12686s9) (MULTIPLE-VALUE-LIST (FLOOR -2.2026s-22 -3.99255s9)) EQUAL-OK: (0 -2.2026s-22) (MULTIPLE-VALUE-LIST (FLOOR 6.994s-24 5.81167s9)) EQUAL-OK: (0 6.994s-24) (MULTIPLE-VALUE-LIST (FLOOR 6.054s-24 -8.915s-14)) EQUAL-OK: (-1 -8.915s-14) (MULTIPLE-VALUE-LIST (FLOOR 2.875s-24 3.652s-14)) EQUAL-OK: (0 2.875s-24) (MULTIPLE-VALUE-LIST (FLOOR -1.57853s-22 -4.501s-14)) EQUAL-OK: (0 -1.57853s-22) (MULTIPLE-VALUE-LIST (FLOOR -1.388s-23 -1.0479s-13)) EQUAL-OK: (0 -1.388s-23) (MULTIPLE-VALUE-LIST (FLOOR -8.879s-24 3.974s-14)) EQUAL-OK: (-1 3.974s-14) (MULTIPLE-VALUE-LIST (FLOOR -1.14395s-21 -4.527s-14)) EQUAL-OK: (0 -1.14395s-21) (MULTIPLE-VALUE-LIST (FLOOR 6.149s-24 9.418s-24)) EQUAL-OK: (0 6.149s-24) (MULTIPLE-VALUE-LIST (FLOOR 7.661s-24 -2.956s-24)) EQUAL-OK: (-3 -1.20701s-24) (MULTIPLE-VALUE-LIST (FLOOR 3.254s-24 1.2764s-22)) EQUAL-OK: (0 3.254s-24) (MULTIPLE-VALUE-LIST (FLOOR -5.4542s-22 5.574s-24)) EQUAL-OK: (-98 8.2738s-25) (MULTIPLE-VALUE-LIST (FLOOR -1.4523s-23 3.091s-24)) EQUAL-OK: (-5 9.3198s-25) (MULTIPLE-VALUE-LIST (FLOOR -5.913s-24 8.419s-24)) EQUAL-OK: (-1 2.506s-24) (/ 0.4319s0 0.279747s0) EQL-OK: 1.5439s0 (/ 0.58111s0 0.474937s0) EQL-OK: 1.22354s0 (/ 0.95817s0 -0.209396s0) EQL-OK: -4.57587s0 (/ -0.30497s0 -0.182861s0) EQL-OK: 1.66777s0 (/ -0.69316s0 -0.32908s0) EQL-OK: 2.10635s0 (/ -0.87152s0 0.518326s0) EQL-OK: -1.68141s0 (/ -0.81208s0 3.27736s9) EQL-OK: -2.47784s-10 (/ 0.88465s0 2.15492s9) EQL-OK: 4.10527s-10 (/ -0.96446s0 8.0971s9) EQL-OK: -1.19112s-10 (/ -0.65258s0 -3.98033s9) EQL-OK: 1.6395s-10 (/ 0.663826s0 -7.88726s8) EQL-OK: -8.41645s-10 (/ -0.31185s0 4.1015s9) EQL-OK: -7.6033s-11 (/ -0.89607s0 -3.887s-14) EQL-OK: 2.3053s13 (/ -0.670135s0 -5.027s-14) EQL-OK: 1.33306s13 (/ 0.94663s0 -6.153s-14) EQL-OK: -1.5385s13 (/ -0.76772s0 4.033s-14) EQL-OK: -1.90358s13 (/ -0.446358s0 -1.9017s-13) EQL-OK: 2.34713s12 (/ -0.157814s0 -2.0401s-13) EQL-OK: 7.73555s11 (/ 0.636185s0 -3.78516s19) EQL-OK: -1.68073s-20 (/ -0.90556s0 7.7192s19) EQL-OK: -1.17314s-20 (/ 0.85053s0 8.3134s19) EQL-OK: 1.02309s-20 (/ -0.3058s0 3.00674s19) EQL-OK: -1.01705s-20 (/ 0.219429s0 -8.1184s19) EQL-OK: -2.70286s-21 (/ 0.319603s0 -2.0739s19) EQL-OK: -1.54106s-20 (/ 0.58943s0 -5.28s-24) EQL-OK: -1.11635s23 (/ 0.72955s0 7.852s-24) EQL-OK: 9.2914s22 (/ -0.66327s0 -3.124s-24) EQL-OK: 2.12315s23 (/ -0.0137558s0 -7.918s-24) EQL-OK: 1.73729s21 (/ 0.35823s0 5.467s-24) EQL-OK: 6.55263s22 (/ 0.93861s0 9.968s-24) EQL-OK: 9.4163s22 (/ 3.83346s9 0.99782s0) EQL-OK: 3.84185s9 (/ 8.7033s9 -0.81822s0) EQL-OK: -1.06369s10 (/ 3.52326s8 -0.79994s0) EQL-OK: -4.4044s8 (/ 8.0525s9 -0.91803s0) EQL-OK: -8.7715s9 (/ -2.12784s9 -0.761246s0) EQL-OK: 2.7952s9 (/ 1.18805s9 -0.903534s0) EQL-OK: -1.3149s9 (/ -6.50556s9 -5.4642s9) EQL-OK: 1.19058s0 (/ 3.3333s8 1.8341s8) EQL-OK: 1.81738s0 (/ 3.70934s9 9.1957s8) EQL-OK: 4.03375s0 (/ -8.0459s9 4.5511s9) EQL-OK: -1.76791s0 (/ 3.54982s9 4.6631s8) EQL-OK: 7.6126s0 (/ -6.27016s9 -3.42858s9) EQL-OK: 1.8288s0 (/ -4.3213s9 7.223s-15) EQL-OK: -5.98274s23 (/ -2.57753s9 -2.533s-15) EQL-OK: 1.01759s24 (/ 3.8858s9 -4.505s-14) EQL-OK: -8.6256s22 (/ 3.5946s9 -5.067s-14) EQL-OK: -7.0941s22 (/ 2.94434s9 8.333s-14) EQL-OK: 3.53333s22 (/ 5.6178s9 -8.241s-14) EQL-OK: -6.81694s22 (/ 4.9591s8 3.9972s19) EQL-OK: 1.24064s-11 (/ 2.4166s9 -9.2141s19) EQL-OK: -2.62272s-11 (/ -1.484s9 2.0281s19) EQL-OK: -7.3172s-11 (/ 2.2339s8 1.96374s19) EQL-OK: 1.13758s-11 (/ -6.6306s9 -2.414s19) EQL-OK: 2.7467s-10 (/ 9.9114s9 9.6187s19) EQL-OK: 1.03043s-10 (/ 4.4579s9 5.343s-24) EQL-OK: 8.3434s32 (/ -6.35994s9 -6.301s-24) EQL-OK: 1.00936s33 (/ 5.49677s9 -1.9306s-25) EQL-OK: -2.84717s34 (/ -5.007s9 3.692s-24) EQL-OK: -1.35617s33 (/ 8.6837s9 -1.6358s-23) EQL-OK: -5.3085s32 (/ 5.5898s9 -5.435s-24) EQL-OK: -1.02849s33 (/ -5.042s-14 0.79081s0) EQL-OK: -6.3758s-14 (/ -6.231s-14 0.96946s0) EQL-OK: -6.4273s-14 (/ 6.016s-14 0.418983s0) EQL-OK: 1.43587s-13 (/ -1.1682s-13 0.70944s0) EQL-OK: -1.64663s-13 (/ -1.7485s-13 0.83207s0) EQL-OK: -2.1014s-13 (/ 7.831s-15 -0.083374s0) EQL-OK: -9.3926s-14 (/ 3.947s-14 9.2342s9) EQL-OK: 4.2744s-24 (/ -1.1537s-13 -6.44075s9) EQL-OK: 1.79124s-23 (/ 6.751s-14 5.8395s8) EQL-OK: 1.1561s-22 (/ -5.026s-14 7.9677s9) EQL-OK: -6.308s-24 (/ -1.0105s-13 -1.71082s9) EQL-OK: 5.9066s-23 (/ -4.996s-14 9.426s9) EQL-OK: -5.30024s-24 (/ -6.837s-14 -3.573s-14) EQL-OK: 1.91351s0 (/ -7.736s-14 -4.898s-14) EQL-OK: 1.57942s0 (/ 3.777s-14 8.025s-14) EQL-OK: 0.470657s0 (/ -6.239s-14 8.518s-15) EQL-OK: -7.32446s0 (/ -7.548s-15 -4.573s-14) EQL-OK: 0.165056s0 (/ 1.6293s-14 4.712s-14) EQL-OK: 0.345776s0 (/ -4.47s-14 2.73658s19) EQL-OK: -1.63342s-33 (/ 1.0583s-13 2.52534s19) EQL-OK: 4.19073s-33 (/ 4.351s-15 2.70326s19) EQL-OK: 1.60955s-34 (/ 3.699s-14 -6.00707s19) EQL-OK: -6.1577s-34 (/ 6.358s-14 5.18274s19) EQL-OK: 1.22677s-33 (/ -2.971s-14 6.153s19) EQL-OK: -4.8286s-34 (/ -4.968s-14 7.699s-24) EQL-OK: -6.4528s9 (/ -3.654s-14 8.434s-24) EQL-OK: -4.3325s9 (/ -9.276s-14 -7.079s-24) EQL-OK: 1.31035s10 (/ -4.556s-14 1.39s-23) EQL-OK: -3.27772s9 (/ 3.832s-14 1.55715s-22) EQL-OK: 2.4609s8 (/ 1.4186s-13 1.64482s-21) EQL-OK: 8.6246s7 (/ -7.0974s19 -0.705536s0) EQL-OK: 1.00596s20 (/ -7.687s19 -0.241531s0) EQL-OK: 3.1826s20 (/ 3.37013s19 -0.425987s0) EQL-OK: -7.9114s19 (/ 6.56473s19 -0.60696s0) EQL-OK: -1.08158s20 (/ 4.1598s19 0.60135s0) EQL-OK: 6.9175s19 (/ 8.8312s19 0.93547s0) EQL-OK: 9.4404s19 (/ 2.81357s19 -2.62832s9) EQL-OK: -1.07048s10 (/ 5.9243s19 -4.5189s8) EQL-OK: -1.311s11 (/ -8.3887s19 9.5761s9) EQL-OK: -8.7601s9 (/ 7.7606s19 -8.5369s9) EQL-OK: -9.0906s9 (/ -7.9868s19 5.0173s9) EQL-OK: -1.59186s10 (/ 7.4128s19 -6.7781s9) EQL-OK: -1.09364s10 (/ 1.27472s19 1.1699s-13) EQL-OK: 1.0896s32 (/ 2.97578s19 4.448s-14) EQL-OK: 6.6901s32 (/ 7.19416s19 1.3834s-13) EQL-OK: 5.20034s32 (/ 6.61843s19 -4.268s-14) EQL-OK: -1.55071s33 (/ 2.8579s19 4.364s-14) EQL-OK: 6.5488s32 (/ 8.2451s18 -6.532s-14) EQL-OK: -1.26227s32 (/ 4.63364s19 9.4305s19) EQL-OK: 0.491344s0 (/ -1.81999s19 1.05424s19) EQL-OK: -1.72636s0 (/ -1.41579s19 -4.03517s19) EQL-OK: 0.350864s0 (/ -1.88523s18 -3.3165s18) EQL-OK: 0.568436s0 (/ 8.4152s17 -7.3293s19) EQL-OK: -0.0114815s0 (/ -8.674s19 -3.63595s19) EQL-OK: 2.38562s0 (/ -1.64643s-22 0.78035s0) EQL-OK: -2.10986s-22 (/ -7.455s-24 -0.63174s0) EQL-OK: 1.18009s-23 (/ -3.259s-24 -0.89363s0) EQL-OK: 3.64694s-24 (/ 1.5803s-23 -0.11338s0) EQL-OK: -1.39382s-22 (/ -3.534s-24 0.407562s0) EQL-OK: -8.6711s-24 (/ -7.221s-24 0.90274s0) EQL-OK: -7.999s-24 (/ 1.0479s-23 5.66256s8) EQL-OK: 1.85059s-32 (/ 1.62856s-21 -1.9551s9) EQL-OK: -8.3298s-31 (/ -8.102s-24 9.7896s9) EQL-OK: -8.2761s-34 (/ 9.693s-24 -8.777s9) EQL-OK: -1.10437s-33 (/ 8.643s-24 -1.25557s9) EQL-OK: -6.8837s-33 (/ 3.224s-24 9.8161s9) EQL-OK: 3.2844s-34 (/ 1.06582s-21 -1.0408s-13) EQL-OK: -1.02405s-8 (/ 1.6738s-23 9.851s-14) EQL-OK: 1.69914s-10 (/ -1.1514s-23 -6.509s-14) EQL-OK: 1.76893s-10 (/ 9.171s-24 9.292s-14) EQL-OK: 9.8698s-11 (/ 1.8589s-23 -4.213s-14) EQL-OK: -4.4123s-10 (/ 1.2837s-23 1.1034s-13) EQL-OK: 1.16341s-10 (/ 3.671s-24 1.0091s-23) EQL-OK: 0.363792s0 (/ -3.373s-24 -1.7017s-23) EQL-OK: 0.198214s0 (/ -2.0157s-23 1.0021s-23) EQL-OK: -2.01147s0 (/ 8.041s-24 -1.3974s-23) EQL-OK: -0.575424s0 (/ -5.391s-24 1.1762s-23) EQL-OK: -0.458344s0 (/ 1.7735s-23 -3.313s-24) EQL-OK: -5.3531s0 (+ 0.79351956 0.07393837) EQL-OK: 0.8674579 (+ -0.52145976 -0.14409256) EQL-OK: -0.6655523 (+ -0.094845235 -0.091273725) EQL-OK: -0.18611896 (+ -0.11106694 -0.90595967) EQL-OK: -1.0170267 (+ 0.46902913 0.6453068) EQL-OK: 1.114336 (+ -0.30989015 0.6634996) EQL-OK: 0.35360944 (+ -0.58887166 -3.1150198E9) EQL-OK: -3.1150198E9 (+ 0.08032262 -8.451643E9) EQL-OK: -8.451643E9 (+ -0.734433 7.601292E9) EQL-OK: 7.601292E9 (+ 0.77958024 -4.2334996E9) EQL-OK: -4.2334996E9 (+ -0.5492505 4.4427484E9) EQL-OK: 4.4427484E9 (+ -0.45681345 4.7386803E9) EQL-OK: 4.7386803E9 (+ -0.5951412 7.866326E-11) EQL-OK: -0.5951412 (+ 0.8511461 8.396644E-11) EQL-OK: 0.8511461 (+ -0.94777477 -7.635105E-11) EQL-OK: -0.94777477 (+ -0.20783025 -1.7222382E-11) EQL-OK: -0.20783025 (+ 0.82520634 -5.3449255E-11) EQL-OK: 0.82520634 (+ 0.7797032 3.7409843E-11) EQL-OK: 0.7797032 (+ 0.9915549 5.16192E19) EQL-OK: 5.16192E19 (+ -0.6311349 2.1599532E19) EQL-OK: 2.1599532E19 (+ 0.42801672 4.8533796E18) EQL-OK: 4.8533796E18 (+ -0.11165339 6.518633E19) EQL-OK: 6.518633E19 (+ -0.5133993 -5.5200484E19) EQL-OK: -5.5200484E19 (+ 0.11643493 -1.0541451E19) EQL-OK: -1.0541451E19 (+ -0.7063649 8.243067E-21) EQL-OK: -0.7063649 (+ 8.4728E-4 -7.5151976E-21) EQL-OK: 8.4728E-4 (+ -0.47157037 -8.748518E-21) EQL-OK: -0.47157037 (+ 0.7662331 -5.6591384E-21) EQL-OK: 0.7662331 (+ -0.9418909 -4.455382E-21) EQL-OK: -0.9418909 (+ -0.88412094 6.6664897E-21) EQL-OK: -0.88412094 (+ 5.5891533E9 -0.11624104) EQL-OK: 5.5891533E9 (+ -8.760519E9 0.22073412) EQL-OK: -8.760519E9 (+ 6.8390047E9 -0.6434584) EQL-OK: 6.8390047E9 (+ 5.1620844E9 -0.93939686) EQL-OK: 5.1620844E9 (+ 9.21372E9 -0.93054956) EQL-OK: 9.21372E9 (+ -2.7403366E9 -0.9354063) EQL-OK: -2.7403366E9 (+ 6.4755876E9 7.780013E9) EQL-OK: 1.4255601E10 (+ 3.6402857E9 -4.6589404E9) EQL-OK: -1.0186547E9 (+ 9.858497E9 -3.1216233E9) EQL-OK: 6.7368735E9 (+ -5.199144E9 -8.3410964E9) EQL-OK: -1.354024E10 (+ -2.2145843E9 7.4088115E9) EQL-OK: 5.194227E9 (+ 3.6034734E9 -4.7355105E9) EQL-OK: -1.1320371E9 (+ -3.974853E9 8.344858E-11) EQL-OK: -3.974853E9 (+ 9.633741E9 9.879035E-11) EQL-OK: 9.633741E9 (+ -5.84563E9 -2.8054357E-11) EQL-OK: -5.84563E9 (+ 1.6814709E8 -6.702281E-11) EQL-OK: 1.6814709E8 (+ 6.627381E8 8.1083654E-11) EQL-OK: 6.627381E8 (+ 6.617609E9 -7.74835E-11) EQL-OK: 6.617609E9 (+ -4.325255E9 7.48992E19) EQL-OK: 7.48992E19 (+ 8.963769E9 5.6527995E19) EQL-OK: 5.6527995E19 (+ 3.2307428E9 -3.772047E19) EQL-OK: -3.772047E19 (+ -1.5719092E9 9.119215E19) EQL-OK: 9.119215E19 (+ -3.1338138E9 2.7048826E19) EQL-OK: 2.7048826E19 (+ -4.4506363E9 9.624759E19) EQL-OK: 9.624759E19 (+ 1.8499094E9 4.968932E-21) EQL-OK: 1.8499094E9 (+ 1.1302281E9 1.590079E-21) EQL-OK: 1.1302281E9 (+ 5.7261727E9 -3.3212954E-21) EQL-OK: 5.7261727E9 (+ 1.8314988E9 -6.247946E-21) EQL-OK: 1.8314988E9 (+ -7.301286E9 -8.870309E-21) EQL-OK: -7.301286E9 (+ 8.0970737E9 -6.944993E-21) EQL-OK: 8.0970737E9 (+ 9.076142E-11 0.79629874) EQL-OK: 0.79629874 (+ -2.5569331E-11 -0.11109424) EQL-OK: -0.11109424 (+ 5.817238E-11 0.8669617) EQL-OK: 0.8669617 (+ 5.0001194E-11 0.1629681) EQL-OK: 0.1629681 (+ -5.314657E-11 0.33499128) EQL-OK: 0.33499128 (+ 3.4244614E-11 0.7846571) EQL-OK: 0.7846571 (+ 5.016508E-11 1.2850774E9) EQL-OK: 1.2850774E9 (+ -6.236206E-11 -3.9463657E9) EQL-OK: -3.9463657E9 (+ -9.461717E-11 -2.86016E9) EQL-OK: -2.86016E9 (+ 9.271425E-11 9.936099E9) EQL-OK: 9.936099E9 (+ -9.330213E-12 4.2810826E9) EQL-OK: 4.2810826E9 (+ 8.8110796E-11 -7.967343E9) EQL-OK: -7.967343E9 (+ -3.252064E-11 9.310712E-11) EQL-OK: 6.058648E-11 (+ 9.2616026E-11 -4.2321837E-11) EQL-OK: 5.029419E-11 (+ -6.138445E-11 2.0083374E-11) EQL-OK: -4.130108E-11 (+ -1.672895E-11 -4.1673078E-11) EQL-OK: -5.8402026E-11 (+ -5.054619E-11 -1.9569606E-11) EQL-OK: -7.0115795E-11 (+ -6.765585E-11 6.200571E-11) EQL-OK: -5.65014E-12 (+ -8.958499E-11 9.627367E18) EQL-OK: 9.627367E18 (+ -3.639458E-11 -6.774422E19) EQL-OK: -6.774422E19 (+ 5.885664E-11 7.710968E19) EQL-OK: 7.710968E19 (+ -2.8348934E-11 -6.8805507E19) EQL-OK: -6.8805507E19 (+ 3.783013E-11 -4.363011E19) EQL-OK: -4.363011E19 (+ 9.9192224E-11 7.840148E19) EQL-OK: 7.840148E19 (+ 1.5157771E-11 -6.578477E-21) EQL-OK: 1.5157771E-11 (+ 3.269849E-11 -1.5641468E-21) EQL-OK: 3.269849E-11 (+ -2.4697334E-11 -5.9471063E-21) EQL-OK: -2.4697334E-11 (+ -7.226034E-11 -8.027814E-21) EQL-OK: -7.226034E-11 (+ 6.705153E-12 1.3146739E-21) EQL-OK: 6.705153E-12 (+ -9.281199E-11 1.940757E-22) EQL-OK: -9.281199E-11 (+ 6.841885E19 0.29873258) EQL-OK: 6.841885E19 (+ -7.487633E19 -0.41199452) EQL-OK: -7.487633E19 (+ 9.324847E19 -0.12986994) EQL-OK: 9.324847E19 (+ 1.7454827E19 -0.9480438) EQL-OK: 1.7454827E19 (+ -2.2794772E19 -0.85242146) EQL-OK: -2.2794772E19 (+ -1.4789046E18 -0.3244334) EQL-OK: -1.4789046E18 (+ -1.0913384E19 6.2691034E8) EQL-OK: -1.0913384E19 (+ 9.054158E19 6.7361736E9) EQL-OK: 9.054158E19 (+ -2.404365E19 2.819194E9) EQL-OK: -2.404365E19 (+ 3.0628145E19 3.8188636E9) EQL-OK: 3.0628145E19 (+ -3.7020847E19 -4.248917E8) EQL-OK: -3.7020847E19 (+ 8.556466E19 -5.431256E9) EQL-OK: 8.556466E19 (+ 4.8590555E19 -4.0259546E-11) EQL-OK: 4.8590555E19 (+ -1.990289E19 -3.2150872E-11) EQL-OK: -1.990289E19 (+ -1.5843934E19 5.37822E-11) EQL-OK: -1.5843934E19 (+ 1.596058E19 2.465645E-11) EQL-OK: 1.596058E19 (+ 8.179266E19 -8.080585E-11) EQL-OK: 8.179266E19 (+ 8.673572E19 -2.1405459E-11) EQL-OK: 8.673572E19 (+ -4.5302206E19 4.4819714E19) EQL-OK: -4.824921E17 (+ 2.1413618E19 -7.160984E19) EQL-OK: -5.0196224E19 (+ 9.760235E19 -7.810464E19) EQL-OK: 1.949771E19 (+ -7.518544E19 -5.7398474E19) EQL-OK: -1.32583915E20 (+ -2.459352E19 6.0089863E19) EQL-OK: 3.5496343E19 (+ -9.009707E19 1.9710512E19) EQL-OK: -7.0386556E19 (+ 4.9167807E19 -1.261897E-21) EQL-OK: 4.9167807E19 (+ -8.647001E18 -1.4144885E-21) EQL-OK: -8.647001E18 (+ -6.2763383E19 6.69688E-21) EQL-OK: -6.2763383E19 (+ 1.6851938E19 -4.9109547E-21) EQL-OK: 1.6851938E19 (+ -7.0371058E19 -9.246501E-21) EQL-OK: -7.0371058E19 (+ -2.8498996E19 3.3614294E-21) EQL-OK: -2.8498996E19 (+ -4.8211753E-21 0.5153807) EQL-OK: 0.5153807 (+ -9.730312E-21 0.3705088) EQL-OK: 0.3705088 (+ -8.83036E-21 0.21063423) EQL-OK: 0.21063423 (+ 1.8688595E-21 -0.38304192) EQL-OK: -0.38304192 (+ -7.9137435E-21 -0.9482965) EQL-OK: -0.9482965 (+ -5.7913193E-21 -0.16538233) EQL-OK: -0.16538233 (+ -4.667948E-21 5.69782E9) EQL-OK: 5.69782E9 (+ -1.6254025E-21 1.100067E9) EQL-OK: 1.100067E9 (+ 5.4919865E-21 9.125866E9) EQL-OK: 9.125866E9 (+ 2.1973532E-21 -5.218964E9) EQL-OK: -5.218964E9 (+ -4.018586E-21 -6.5943096E9) EQL-OK: -6.5943096E9 (+ -7.7845274E-22 4.172669E9) EQL-OK: 4.172669E9 (+ -2.843846E-21 9.243441E-12) EQL-OK: 9.243441E-12 (+ 1.1533075E-21 3.327943E-11) EQL-OK: 3.327943E-11 (+ 5.977113E-21 6.507544E-11) EQL-OK: 6.507544E-11 (+ 1.1817801E-21 -4.1877824E-11) EQL-OK: -4.1877824E-11 (+ 1.932947E-21 9.4013144E-11) EQL-OK: 9.4013144E-11 (+ 8.526454E-21 8.396772E-11) EQL-OK: 8.396772E-11 (+ -4.8870485E-21 5.9277504E19) EQL-OK: 5.9277504E19 (+ -4.7174987E-21 2.5545484E19) EQL-OK: 2.5545484E19 (+ -8.818029E-21 1.2602901E19) EQL-OK: 1.2602901E19 (+ -1.2268113E-21 -9.071741E19) EQL-OK: -9.071741E19 (+ -7.0568975E-21 -6.9825405E19) EQL-OK: -6.9825405E19 (+ 8.723312E-21 -5.802767E19) EQL-OK: -5.802767E19 (+ 7.1661314E-21 4.10364E-21) EQL-OK: 1.1269772E-20 (+ 8.181265E-21 -4.6898657E-21) EQL-OK: 3.4913997E-21 (+ -8.570217E-21 -5.5145446E-21) EQL-OK: -1.4084761E-20 (+ 1.3507604E-23 -7.152723E-21) EQL-OK: -7.139215E-21 (+ -7.859527E-21 -9.369602E-21) EQL-OK: -1.7229128E-20 (+ -4.9014434E-21 1.4580911E-21) EQL-OK: -3.443352E-21 (- -0.41894162 0.23777992) EQL-OK: -0.65672153 (- 0.74937063 0.4803756) EQL-OK: 0.26899505 (- 0.46964037 -0.94880456) EQL-OK: 1.4184449 (- 0.16453332 0.035123527) EQL-OK: 0.12940979 (- 0.7353321 -0.3952883) EQL-OK: 1.1306204 (- -0.33693552 -0.6941588) EQL-OK: 0.35722327 (- -0.61853 -9.25498E9) EQL-OK: 9.25498E9 (- 0.5172653 -6.728693E9) EQL-OK: 6.728693E9 (- 0.1268478 -1.8808037E9) EQL-OK: 1.8808037E9 (- 0.29479754 -3.4643973E9) EQL-OK: 3.4643973E9 (- 0.34332883 1.4258218E9) EQL-OK: -1.4258218E9 (- -0.4093976 -1.6698813E9) EQL-OK: 1.6698813E9 (- 0.10942185 -2.015636E-11) EQL-OK: 0.10942185 (- 0.30351585 4.4276416E-11) EQL-OK: 0.30351585 (- -0.41279083 6.5274E-11) EQL-OK: -0.41279083 (- 0.7813598 -5.028443E-11) EQL-OK: 0.7813598 (- -0.72214615 2.5959075E-11) EQL-OK: -0.72214615 (- -0.8924311 -5.2076333E-11) EQL-OK: -0.8924311 (- -0.26128495 6.8887236E19) EQL-OK: -6.8887236E19 (- 0.906616 -2.0519019E18) EQL-OK: 2.0519019E18 (- 0.96452767 -1.6347343E19) EQL-OK: 1.6347343E19 (- -0.99801517 8.383864E19) EQL-OK: -8.383864E19 (- -0.60573876 -4.890489E19) EQL-OK: 4.890489E19 (- -0.004701972 6.3981E18) EQL-OK: -6.3981E18 (- 0.34311903 3.52871E-21) EQL-OK: 0.34311903 (- -0.38159567 -2.3400748E-21) EQL-OK: -0.38159567 (- -0.6719565 -5.4333447E-21) EQL-OK: -0.6719565 (- -0.21363729 8.021308E-21) EQL-OK: -0.21363729 (- 0.5275244 -4.88554E-21) EQL-OK: 0.5275244 (- 0.9064559 -6.5840867E-21) EQL-OK: 0.9064559 (- -3.0312538E8 0.26249015) EQL-OK: -3.0312538E8 (- -9.217122E9 0.22172129) EQL-OK: -9.217122E9 (- -1.157806E9 -0.95704305) EQL-OK: -1.157806E9 (- 6.743087E9 -0.37863714) EQL-OK: 6.743087E9 (- -4.0819942E8 -0.068549395) EQL-OK: -4.0819942E8 (- 4.586502E9 0.29215187) EQL-OK: 4.586502E9 (- 5.091125E9 -2.971223E9) EQL-OK: 8.0623483E9 (- -2.1147072E8 -8.537374E9) EQL-OK: 8.3259034E9 (- -9.075735E9 -9.072693E9) EQL-OK: -3041280.0 (- 1.4614451E9 3.0213921E9) EQL-OK: -1.559947E9 (- 8.960645E9 5.4822825E9) EQL-OK: 3.4783626E9 (- -3.7246787E9 -2.823592E9) EQL-OK: -9.010867E8 (- -3.4256804E9 -1.8245674E-11) EQL-OK: -3.4256804E9 (- 7.0777057E9 3.6826153E-11) EQL-OK: 7.0777057E9 (- 3.4600579E9 -5.207135E-11) EQL-OK: 3.4600579E9 (- 9.57872E9 8.222393E-11) EQL-OK: 9.57872E9 (- 8.388926E9 -1.1216945E-11) EQL-OK: 8.388926E9 (- 3.8273395E8 1.153788E-11) EQL-OK: 3.8273395E8 (- -1.2011469E8 -9.879852E19) EQL-OK: 9.879852E19 (- 3.850388E9 4.8155957E19) EQL-OK: -4.8155957E19 (- 5.5329756E9 -5.067925E19) EQL-OK: 5.067925E19 (- 3.3222902E9 5.2892763E19) EQL-OK: -5.2892763E19 (- 4.431185E9 -8.005187E19) EQL-OK: 8.005187E19 (- -7.307553E8 -6.8217897E19) EQL-OK: 6.8217897E19 (- 7.9813893E9 9.68989E-21) EQL-OK: 7.9813893E9 (- -5.7208223E9 9.790913E-21) EQL-OK: -5.7208223E9 (- -5.9564112E7 9.217466E-21) EQL-OK: -5.9564112E7 (- 5.4524237E9 4.947411E-21) EQL-OK: 5.4524237E9 (- 1.4269632E9 -5.1552662E-21) EQL-OK: 1.4269632E9 (- 3.7555832E9 -4.168443E-21) EQL-OK: 3.7555832E9 (- -4.1575327E-11 -0.38582206) EQL-OK: 0.38582206 (- -5.810516E-11 -0.5456566) EQL-OK: 0.5456566 (- -1.2386638E-11 -0.6209788) EQL-OK: 0.6209788 (- 2.0245033E-11 -0.7418727) EQL-OK: 0.7418727 (- 3.7671637E-11 0.1772576) EQL-OK: -0.1772576 (- -2.2774244E-11 -0.5959606) EQL-OK: 0.5959606 (- -5.6623112E-11 6.8330056E9) EQL-OK: -6.8330056E9 (- -9.2078116E-11 -3.4236897E9) EQL-OK: 3.4236897E9 (- -3.317883E-11 -3.2438755E8) EQL-OK: 3.2438755E8 (- 6.711307E-11 -7.9204526E9) EQL-OK: 7.9204526E9 (- -5.1150143E-11 9.1128E9) EQL-OK: -9.1128E9 (- -7.3234044E-11 -8.067016E9) EQL-OK: 8.067016E9 (- -3.217777E-11 -1.6301262E-11) EQL-OK: -1.5876508E-11 (- 9.6583325E-11 5.882668E-11) EQL-OK: 3.7756645E-11 (- -7.573351E-11 6.3386435E-11) EQL-OK: -1.3911994E-10 (- -4.5759726E-11 8.069604E-11) EQL-OK: -1.2645576E-10 (- -9.538651E-11 -9.01152E-11) EQL-OK: -5.271311E-12 (- 6.2486766E-11 -3.414284E-11) EQL-OK: 9.662961E-11 (- 5.530477E-13 -3.1361222E18) EQL-OK: 3.1361222E18 (- 1.7998643E-11 1.5437615E19) EQL-OK: -1.5437615E19 (- -4.7948378E-11 2.6669319E19) EQL-OK: -2.6669319E19 (- -6.8626884E-12 -5.7713735E19) EQL-OK: 5.7713735E19 (- 6.195949E-11 2.8851469E19) EQL-OK: -2.8851469E19 (- 2.4957127E-11 -2.661574E18) EQL-OK: 2.661574E18 (- 9.8157565E-11 -4.561507E-21) EQL-OK: 9.8157565E-11 (- -9.332288E-11 -9.280375E-21) EQL-OK: -9.332288E-11 (- -9.916877E-11 -1.6945641E-21) EQL-OK: -9.916877E-11 (- -6.460804E-11 -3.6695186E-21) EQL-OK: -6.460804E-11 (- 6.712223E-11 -2.5360524E-21) EQL-OK: 6.712223E-11 (- 2.3824066E-11 -7.439168E-21) EQL-OK: 2.3824066E-11 (- -5.189389E19 0.01453203) EQL-OK: -5.189389E19 (- 7.0132006E19 0.45530832) EQL-OK: 7.0132006E19 (- 2.9365046E19 0.36346745) EQL-OK: 2.9365046E19 (- -4.1377934E19 0.37368965) EQL-OK: -4.1377934E19 (- -1.891423E19 0.159002) EQL-OK: -1.891423E19 (- 1.8096083E19 -0.6511793) EQL-OK: 1.8096083E19 (- 6.4361307E19 6.651168E9) EQL-OK: 6.4361307E19 (- -1.8698508E19 1.1925399E9) EQL-OK: -1.8698508E19 (- 7.75824E19 7.7361823E9) EQL-OK: 7.75824E19 (- -7.2570015E19 3.0842496E9) EQL-OK: -7.2570015E19 (- -1.9014525E19 -3.8941514E9) EQL-OK: -1.9014525E19 (- 3.2787157E19 -8.612244E9) EQL-OK: 3.2787157E19 (- 6.4268583E19 -1.2707472E-11) EQL-OK: 6.4268583E19 (- -6.5179933E19 8.61941E-11) EQL-OK: -6.5179933E19 (- -8.106952E19 2.1709537E-11) EQL-OK: -8.106952E19 (- 2.5455064E19 3.5653924E-11) EQL-OK: 2.5455064E19 (- 1.574235E19 -2.7033407E-11) EQL-OK: 1.574235E19 (- -1.1099541E19 -8.620364E-12) EQL-OK: -1.1099541E19 (- -6.346294E19 2.9902512E19) EQL-OK: -9.336545E19 (- 4.9783164E19 -2.079425E19) EQL-OK: 7.0577414E19 (- -7.149202E19 1.4282865E19) EQL-OK: -8.577488E19 (- 6.0978866E19 5.256896E19) EQL-OK: 8.409905E18 (- -9.961146E19 -1.9834548E19) EQL-OK: -7.977691E19 (- 2.5196015E18 5.0534214E19) EQL-OK: -4.8014613E19 (- -3.6981453E19 -1.005367E-21) EQL-OK: -3.6981453E19 (- 8.881044E19 -9.717088E-22) EQL-OK: 8.881044E19 (- 4.9637263E19 -7.544846E-21) EQL-OK: 4.9637263E19 (- -4.2414725E19 1.3904184E-21) EQL-OK: -4.2414725E19 (- 7.844454E18 -8.659333E-21) EQL-OK: 7.844454E18 (- 1.5733016E19 8.638849E-21) EQL-OK: 1.5733016E19 (- 1.7531192E-21 -0.8690463) EQL-OK: 0.8690463 (- 9.449351E-21 0.7848489) EQL-OK: -0.7848489 (- 5.5016538E-21 -0.8998171) EQL-OK: 0.8998171 (- -6.977279E-21 -0.9815793) EQL-OK: 0.9815793 (- -7.9253305E-21 -0.21357381) EQL-OK: 0.21357381 (- 4.026555E-21 0.5610563) EQL-OK: -0.5610563 (- -7.080433E-21 -1.9501078E9) EQL-OK: 1.9501078E9 (- -8.152211E-21 8.164317E9) EQL-OK: -8.164317E9 (- 2.177096E-21 -8.591886E9) EQL-OK: 8.591886E9 (- 9.387247E-21 3.5730028E9) EQL-OK: -3.5730028E9 (- -7.589234E-21 -4.9193774E9) EQL-OK: 4.9193774E9 (- 1.5755653E-21 -2.3484498E9) EQL-OK: 2.3484498E9 (- 9.3034425E-21 8.28104E-11) EQL-OK: -8.28104E-11 (- -6.417297E-21 -8.352926E-11) EQL-OK: 8.352926E-11 (- 8.728735E-21 9.160732E-11) EQL-OK: -9.160732E-11 (- 3.8984202E-21 6.5116944E-12) EQL-OK: -6.5116944E-12 (- 6.288995E-21 -5.6701328E-11) EQL-OK: 5.6701328E-11 (- -2.7652023E-22 -1.01428276E-11) EQL-OK: 1.01428276E-11 (- 4.7200214E-21 -3.726995E18) EQL-OK: 3.726995E18 (- -2.2945808E-21 -7.3098524E19) EQL-OK: 7.3098524E19 (- -9.493033E-21 3.4235436E19) EQL-OK: -3.4235436E19 (- 3.7946773E-21 -5.126768E18) EQL-OK: 5.126768E18 (- -1.2865209E-21 3.5096026E19) EQL-OK: -3.5096026E19 (- -8.403449E-21 5.704743E18) EQL-OK: -5.704743E18 (- 2.928304E-21 -5.574477E-21) EQL-OK: 8.502781E-21 (- -9.46122E-21 -3.858943E-21) EQL-OK: -5.602277E-21 (- 7.296878E-22 1.8123137E-21) EQL-OK: -1.0826259E-21 (- 5.866651E-21 2.4605584E-21) EQL-OK: 3.4060923E-21 (- -7.633577E-21 9.915102E-21) EQL-OK: -1.7548679E-20 (- -8.7881085E-24 3.001468E-21) EQL-OK: -3.0102563E-21 (* 0.3098436 0.0057770014) EQL-OK: 0.001789967 (* -0.14583993 -0.028087378) EQL-OK: 0.004096261 (* 0.21399558 0.96054405) EQL-OK: 0.20555218 (* 0.7590452 0.8427266) EQL-OK: 0.6396676 (* -0.34523207 0.20272356) EQL-OK: -0.06998668 (* -0.98096234 0.98158866) EQL-OK: -0.96290153 (* 0.40309322 4.0009994E9) EQL-OK: 1.6127757E9 (* 0.15507132 9.481803E9) EQL-OK: 1.4703557E9 (* 0.5218476 -2.1933102E9) EQL-OK: -1.1445737E9 (* 0.17258328 2.6295781E8) EQL-OK: 4.538212E7 (* 0.25962013 8.699164E9) EQL-OK: 2.258478E9 (* 0.47902477 -1.4075732E9) EQL-OK: -6.7426246E8 (* 0.9642294 -1.6256952E-11) EQL-OK: -1.5675431E-11 (* 0.6098744 -8.802921E-12) EQL-OK: -5.3686764E-12 (* -0.25792134 4.804327E-11) EQL-OK: -1.2391385E-11 (* -0.8724403 -9.101418E-11) EQL-OK: 7.940444E-11 (* -0.13318628 8.1157005E-11) EQL-OK: -1.08089995E-11 (* -0.54116476 -9.353639E-11) EQL-OK: 5.0618596E-11 (* 0.9018487 7.411783E19) EQL-OK: 6.6843068E19 (* -0.6835444 -7.590606E19) EQL-OK: 5.188516E19 (* -0.9896146 5.195105E18) EQL-OK: -5.141152E18 (* -0.4838531 1.88174E19) EQL-OK: -9.1048573E18 (* -0.31826657 -3.3103586E19) EQL-OK: 1.0535765E19 (* 0.6818549 -9.227651E19) EQL-OK: -6.2919192E19 (* 0.7676919 7.320194E-21) EQL-OK: 5.6196534E-21 (* 0.49369502 4.9805288E-21) EQL-OK: 2.4588622E-21 (* 0.9599328 7.903804E-21) EQL-OK: 7.58712E-21 (* 0.13215566 7.603894E-21) EQL-OK: 1.0048976E-21 (* -0.35744518 -9.408464E-21) EQL-OK: 3.36301E-21 (* -0.79346496 9.006081E-21) EQL-OK: -7.146009E-21 (* 4.1775434E9 -0.13509268) EQL-OK: -5.643555E8 (* 7.27846E9 -0.8181822) EQL-OK: -5.9551063E9 (* 2.9669427E9 0.7082195) EQL-OK: 2.1012467E9 (* 7.609933E9 -0.33963126) EQL-OK: -2.5845711E9 (* 3.4241843E9 0.3924479) EQL-OK: 1.3438139E9 (* -3.8366538E9 0.56461394) EQL-OK: -2.1662282E9 (* 3.7237007E9 1.2646783E9) EQL-OK: 4.7092836E18 (* -2.7657871E9 -3.6314278E9) EQL-OK: 1.0043756E19 (* -4.753982E9 -5.8879616E8) EQL-OK: 2.7991263E18 (* 8.877933E9 7.973602E9) EQL-OK: 7.07891E19 (* -8.312081E9 -8.941637E9) EQL-OK: 7.432361E19 (* -4.297749E9 9.913122E9) EQL-OK: -4.260411E19 (* -7.893335E9 -4.7961794E-11) EQL-OK: 0.3785785 (* -4.1332334E9 7.221582E-11) EQL-OK: -0.29848483 (* 1.9981688E9 2.8169871E-11) EQL-OK: 0.056288157 (* -5.8555295E9 -7.562528E-11) EQL-OK: 0.44282603 (* 7.377872E9 -1.5020383E-11) EQL-OK: -0.11081846 (* 8.891134E9 -7.035395E-11) EQL-OK: -0.6255264 (* -7.1412096E9 5.1873507E19) EQL-OK: -3.7043958E29 (* 8.0983844E9 9.136914E19) EQL-OK: 7.399425E29 (* -6.1437537E9 -9.398771E19) EQL-OK: 5.7743737E29 (* -2.3000973E9 6.8743785E19) EQL-OK: -1.5811739E29 (* 3.5817969E9 -6.0353143E19) EQL-OK: -2.161727E29 (* 6.544234E9 8.265139E19) EQL-OK: 5.4089003E29 (* 2.1273733E8 -2.3684083E-21) EQL-OK: -5.0384886E-13 (* -4.2644698E9 2.956708E-21) EQL-OK: -1.2608792E-11 (* -5.1238026E9 5.341445E-21) EQL-OK: -2.7368509E-11 (* -3.0125368E9 5.201843E-21) EQL-OK: -1.5670742E-11 (* -4.4709827E9 -1.5399217E-22) EQL-OK: 6.8849635E-13 (* -4.934225E9 5.9229795E-21) EQL-OK: -2.9225313E-11 (* -2.1100623E-11 0.9615048) EQL-OK: -2.028835E-11 (* 6.6090705E-12 0.4100405) EQL-OK: 2.7099865E-12 (* -9.541609E-11 0.82497185) EQL-OK: -7.871559E-11 (* -2.7884627E-11 -0.5218528) EQL-OK: 1.4551671E-11 (* 9.180904E-13 -0.26436818) EQL-OK: -2.4271386E-13 (* 2.6154882E-11 0.2004636) EQL-OK: 5.2431015E-12 (* 9.751009E-11 -7.0098227E9) EQL-OK: -0.6835284 (* -1.312651E-11 1.9450307E8) EQL-OK: -0.0025531466 (* -4.591856E-11 -4.6141565E8) EQL-OK: 0.021187542 (* -4.1950752E-11 -9.55923E9) EQL-OK: 0.4010169 (* -2.1888996E-11 9.976215E9) EQL-OK: -0.21836932 (* 4.2696267E-11 -7.927695E9) EQL-OK: -0.33848298 (* 1.9615304E-11 -5.3584637E-12) EQL-OK: -1.05107896E-22 (* -8.7289814E-11 3.4389686E-11) EQL-OK: -3.0018693E-21 (* 6.8621386E-11 -1.4248663E-11) EQL-OK: -9.77763E-22 (* -9.5643375E-11 -7.7591066E-11) EQL-OK: 7.421071E-21 (* -6.3313584E-11 5.173857E-11) EQL-OK: -3.2757542E-21 (* -6.968663E-11 -4.966581E-12) EQL-OK: 3.461043E-22 (* 7.942278E-11 -3.1309486E19) EQL-OK: -2.4866865E9 (* 1.7023414E-11 2.5512804E19) EQL-OK: 4.34315E8 (* 2.6554937E-11 9.146128E19) EQL-OK: 2.4287485E9 (* 9.309172E-13 -3.6298406E19) EQL-OK: -3.3790812E7 (* -6.106873E-11 3.5271824E18) EQL-OK: -2.1540056E8 (* -2.8420502E-11 -6.6643682E19) EQL-OK: 1.8940468E9 (* -5.84991E-11 1.5304011E-21) EQL-OK: -8.952709E-32 (* 6.30787E-11 -9.366236E-21) EQL-OK: -5.9081004E-31 (* 1.9745445E-11 7.034156E-21) EQL-OK: 1.3889253E-31 (* 2.440728E-11 6.50959E-22) EQL-OK: 1.5888139E-32 (* 6.0243255E-11 -1.7734902E-21) EQL-OK: -1.0684082E-31 (* 1.0381073E-11 7.167948E-21) EQL-OK: 7.441099E-32 (* 6.3378214E18 0.022634745) EQL-OK: 1.43454966E17 (* 5.4942345E19 0.26696533) EQL-OK: 1.4667702E19 (* 9.807893E19 -0.99720424) EQL-OK: -9.780473E19 (* -7.1504E18 0.045440495) EQL-OK: -3.249177E17 (* -7.265508E19 0.37276286) EQL-OK: -2.7083115E19 (* 9.3705245E19 0.6617385) EQL-OK: 6.200837E19 (* 7.768628E19 1.37205E9) EQL-OK: 1.0658947E29 (* 1.5640021E18 9.344063E9) EQL-OK: 1.4614135E28 (* 3.8593804E19 -9.424651E8) EQL-OK: -3.6373312E28 (* -9.23689E19 -6.980498E9) EQL-OK: 6.447809E29 (* 7.926599E19 5.0871127E9) EQL-OK: 4.0323505E29 (* 3.540541E19 -5.11486E9) EQL-OK: -1.810937E29 (* -7.023858E19 6.959093E-11) EQL-OK: -4.8879683E9 (* -2.0809586E19 -4.045683E-12) EQL-OK: 8.418899E7 (* 5.3608545E19 -7.0354486E-11) EQL-OK: -3.7716017E9 (* 8.974303E19 -6.383404E-11) EQL-OK: -5.72866E9 (* -6.8900017E19 9.845904E-11) EQL-OK: -6.7838295E9 (* 9.325442E19 -3.9829796E-11) EQL-OK: -3.7143045E9 (* 5.9436735E19 -5.713992E-21) EQL-OK: -0.33962104 (* 7.266224E18 8.9780915E-21) EQL-OK: 0.06523682 (* -3.6717237E18 3.3338123E-21) EQL-OK: -0.012240837 (* 4.119367E19 -7.309974E-21) EQL-OK: -0.30112466 (* -8.453134E19 4.6281215E-22) EQL-OK: -0.03912213 (* -3.7493624E19 5.480264E-21) EQL-OK: -0.20547494 (* 6.3693945E-21 -0.25352144) EQL-OK: -1.6147781E-21 (* -8.51531E-21 0.6031129) EQL-OK: -5.135693E-21 (* -9.771993E-21 0.2740926) EQL-OK: -2.678431E-21 (* -4.2903415E-21 0.5916119) EQL-OK: -2.5382172E-21 (* -3.7330673E-21 0.9738175) EQL-OK: -3.6353263E-21 (* 5.860415E-21 -0.9997709) EQL-OK: -5.8590725E-21 (* -9.4827234E-21 7.6195564E9) EQL-OK: -7.225415E-11 (* 5.9501194E-21 9.102942E9) EQL-OK: 5.4163594E-11 (* 2.8867428E-21 -9.615872E9) EQL-OK: -2.7758549E-11 (* 5.0077543E-21 7.8715663E9) EQL-OK: 3.941887E-11 (* 7.082003E-21 4.5221494E9) EQL-OK: 3.2025875E-11 (* -2.9215627E-21 5.131017E9) EQL-OK: -1.4990589E-11 (* -9.1914904E-21 -2.3301847E-11) EQL-OK: 2.141787E-31 (* 1.3389891E-21 -7.032628E-11) EQL-OK: -9.4166125E-32 (* -8.540776E-21 3.052019E-11) EQL-OK: -2.6066613E-31 (* -2.7608417E-21 -6.8345785E-12) EQL-OK: 1.886919E-32 (* 1.2978333E-21 -2.1870255E-12) EQL-OK: -2.8383944E-33 (* 8.2235335E-23 -3.5080876E-11) EQL-OK: -2.8848876E-33 (* -3.958064E-21 8.038726E19) EQL-OK: -0.3181779 (* 7.752178E-21 1.0747784E19) EQL-OK: 0.08331874 (* -5.5964265E-21 -8.700492E19) EQL-OK: 0.48691663 (* 3.2236927E-21 3.6203593E19) EQL-OK: 0.116709255 (* -6.308517E-21 -3.8032156E19) EQL-OK: 0.2399265 (* 4.8663387E-21 9.008218E19) EQL-OK: 0.43837038 (MULTIPLE-VALUE-LIST (FLOOR -0.8227301 -0.25283414)) EQUAL-OK: (3 -0.06422769) (MULTIPLE-VALUE-LIST (FLOOR -0.6686161 0.4833234)) EQUAL-OK: (-2 0.29803064) (MULTIPLE-VALUE-LIST (FLOOR -0.57436657 0.52642506)) EQUAL-OK: (-2 0.47848356) (MULTIPLE-VALUE-LIST (FLOOR 0.60395426 -0.61624163)) EQUAL-OK: (-1 -0.012287392) (MULTIPLE-VALUE-LIST (FLOOR -0.21636301 0.90365344)) EQUAL-OK: (-1 0.68729043) (MULTIPLE-VALUE-LIST (FLOOR 0.8705054 -0.7953333)) EQUAL-OK: (-2 -0.72016126) (MULTIPLE-VALUE-LIST (FLOOR 0.4544462 -9.890925E9)) EQUAL-OK: (-1 -9.890925E9) (MULTIPLE-VALUE-LIST (FLOOR -0.4954149 -3.8786918E9)) EQUAL-OK: (0 -0.49541488) (MULTIPLE-VALUE-LIST (FLOOR -0.692049 6.4791506E9)) EQUAL-OK: (-1 6.4791506E9) (MULTIPLE-VALUE-LIST (FLOOR 0.75464755 -3.618496E9)) EQUAL-OK: (-1 -3.618496E9) (MULTIPLE-VALUE-LIST (FLOOR -0.5929247 -5.442471E9)) EQUAL-OK: (0 -0.5929247) (MULTIPLE-VALUE-LIST (FLOOR -0.30383867 9.262864E9)) EQUAL-OK: (-1 9.262864E9) (MULTIPLE-VALUE-LIST (FLOOR 0.9345329 3.26737E-11)) EQUAL-OK: (28601991168 0.0) (MULTIPLE-VALUE-LIST (FLOOR 0.3772617 -7.991702E-11)) EQUAL-OK: (-4720667648 0.0) (MULTIPLE-VALUE-LIST (FLOOR 0.74438447 -1.0977978E-11)) EQUAL-OK: (-67807064064 0.0) (MULTIPLE-VALUE-LIST (FLOOR -0.9220973 -1.2655998E-11)) EQUAL-OK: (72858525696 0.0) (MULTIPLE-VALUE-LIST (FLOOR -0.4615329 6.48833E-11)) EQUAL-OK: (-7113276928 0.0) (MULTIPLE-VALUE-LIST (FLOOR 0.2851941 -8.262349E-11)) EQUAL-OK: (-3451731456 0.0) (MULTIPLE-VALUE-LIST (FLOOR 0.61539984 3.5826177E19)) EQUAL-OK: (0 0.61539984) (MULTIPLE-VALUE-LIST (FLOOR -0.8195054 8.793426E19)) EQUAL-OK: (-1 8.793426E19) (MULTIPLE-VALUE-LIST (FLOOR -0.26412165 7.015103E18)) EQUAL-OK: (-1 7.015103E18) (MULTIPLE-VALUE-LIST (FLOOR -0.527393 8.434833E19)) EQUAL-OK: (-1 8.434833E19) (MULTIPLE-VALUE-LIST (FLOOR -0.1846056 1.8252128E19)) EQUAL-OK: (-1 1.8252128E19) (MULTIPLE-VALUE-LIST (FLOOR -0.6079822 6.106683E19)) EQUAL-OK: (-1 6.106683E19) (MULTIPLE-VALUE-LIST (FLOOR 0.5564819 5.953872E-21)) EQUAL-OK: (93465542827563810816 0.0) (MULTIPLE-VALUE-LIST (FLOOR -0.52575815 -1.8358678E-21)) EQUAL-OK: (286381261476583178240 0.0) (MULTIPLE-VALUE-LIST (FLOOR -0.6321403 -5.830945E-21)) EQUAL-OK: (108411292344853200896 0.0) (MULTIPLE-VALUE-LIST (FLOOR -0.9675891 -9.936226E-21)) EQUAL-OK: (97379936163841703936 0.0) (MULTIPLE-VALUE-LIST (FLOOR -0.63503754 -5.0137436E-21)) EQUAL-OK: (126659359065470140416 0.0) (MULTIPLE-VALUE-LIST (FLOOR 0.8053654 -3.4055888E-22)) EQUAL-OK: (-2364834534832713236480 0.0) (MULTIPLE-VALUE-LIST (FLOOR 8.784645E9 0.9775517)) EQUAL-OK: (8986374144 0.0) (MULTIPLE-VALUE-LIST (FLOOR -9.314413E9 -0.8318871)) EQUAL-OK: (11196726272 0.0) (MULTIPLE-VALUE-LIST (FLOOR 8.4695936E9 -0.9823455)) EQUAL-OK: (-8621807616 0.0) (MULTIPLE-VALUE-LIST (FLOOR -5.8406625E9 -0.031723082)) EQUAL-OK: (184113971200 0.0) (MULTIPLE-VALUE-LIST (FLOOR -7.325545E9 0.93169844)) EQUAL-OK: (-7862571008 0.0) (MULTIPLE-VALUE-LIST (FLOOR -5.2999526E9 0.11515945)) EQUAL-OK: (-46022733824 0.0) (MULTIPLE-VALUE-LIST (FLOOR 6.680458E9 7.170729E9)) EQUAL-OK: (0 6.680458E9) (MULTIPLE-VALUE-LIST (FLOOR -2.2146278E9 5.2909993E9)) EQUAL-OK: (-1 3.0763715E9) (MULTIPLE-VALUE-LIST (FLOOR 6.4947005E9 3.1265188E9)) EQUAL-OK: (2 2.4166298E8) (MULTIPLE-VALUE-LIST (FLOOR 7.947109E9 2.464481E9)) EQUAL-OK: (3 5.53666E8) (MULTIPLE-VALUE-LIST (FLOOR 8.899791E9 3.5788132E9)) EQUAL-OK: (2 1.7421644E9) (MULTIPLE-VALUE-LIST (FLOOR 5.272568E9 -5.3260964E9)) EQUAL-OK: (-1 -5.3528532E7) (MULTIPLE-VALUE-LIST (FLOOR 9.729838E8 8.6379175E-11)) EQUAL-OK: (11264101901890748416 0.0) (MULTIPLE-VALUE-LIST (FLOOR 1.210882E9 -4.412428E-11)) EQUAL-OK: (-27442532596777484288 0.0) (MULTIPLE-VALUE-LIST (FLOOR 9.169561E9 -9.41537E-11)) EQUAL-OK: (-97389277614631288832 0.0) (MULTIPLE-VALUE-LIST (FLOOR 9.289745E9 3.1269442E-11)) EQUAL-OK: (297087021478284623872 0.0) (MULTIPLE-VALUE-LIST (FLOOR -5.334722E9 2.0158666E-11)) EQUAL-OK: (-264636651022615314432 0.0) (MULTIPLE-VALUE-LIST (FLOOR 9.910798E9 -2.985589E-11)) EQUAL-OK: (-331954558296456691712 0.0) (MULTIPLE-VALUE-LIST (FLOOR -1.7169357E9 2.220112E19)) EQUAL-OK: (-1 2.220112E19) (MULTIPLE-VALUE-LIST (FLOOR 4.9906683E9 6.857979E19)) EQUAL-OK: (0 4.9906683E9) (MULTIPLE-VALUE-LIST (FLOOR -9.90463E9 -2.342953E19)) EQUAL-OK: (0 -9.90463E9) (MULTIPLE-VALUE-LIST (FLOOR -5.4878054E8 5.438576E19)) EQUAL-OK: (-1 5.438576E19) (MULTIPLE-VALUE-LIST (FLOOR -6.1080986E9 9.25119E19)) EQUAL-OK: (-1 9.25119E19) (MULTIPLE-VALUE-LIST (FLOOR -8.4138286E9 -9.682224E19)) EQUAL-OK: (0 -8.4138286E9) (MULTIPLE-VALUE-LIST (FLOOR 2.7084977E9 2.542436E-23)) EQUAL-OK: (106531597407755826831748572905472 0.0) (MULTIPLE-VALUE-LIST (FLOOR -5.720767E9 9.438407E-21)) EQUAL-OK: (-606115738076318963177881600000 0.0) (MULTIPLE-VALUE-LIST (FLOOR -3.4958034E9 9.250327E-21)) EQUAL-OK: (-377911344579488968728001904640 0.0) (MULTIPLE-VALUE-LIST (FLOOR -8.3702047E9 6.0186186E-21)) EQUAL-OK: (-1390718493086361392338557730816 0.0) (MULTIPLE-VALUE-LIST (FLOOR -7.517619E9 -9.417701E-21)) EQUAL-OK: (798243593937800371539149848576 0.0) (MULTIPLE-VALUE-LIST (FLOOR -2.1220838E9 3.931208E-21)) EQUAL-OK: (-539804494597454582830132625408 0.0) (MULTIPLE-VALUE-LIST (FLOOR -3.9606828E-11 0.34267086)) EQUAL-OK: (-1 0.34267086) (MULTIPLE-VALUE-LIST (FLOOR 2.495503E-11 -0.4518087)) EQUAL-OK: (-1 -0.4518087) (MULTIPLE-VALUE-LIST (FLOOR -7.98698E-11 -0.5665642)) EQUAL-OK: (0 -7.98698E-11) (MULTIPLE-VALUE-LIST (FLOOR 2.1465689E-11 0.17276591)) EQUAL-OK: (0 2.146569E-11) (MULTIPLE-VALUE-LIST (FLOOR 4.9463066E-11 -0.5659616)) EQUAL-OK: (-1 -0.5659616) (MULTIPLE-VALUE-LIST (FLOOR -1.8961567E-11 -0.7758364)) EQUAL-OK: (0 -1.8961567E-11) (MULTIPLE-VALUE-LIST (FLOOR 7.8871874E-11 -5.768549E9)) EQUAL-OK: (-1 -5.768549E9) (MULTIPLE-VALUE-LIST (FLOOR -9.079439E-11 -3.807195E9)) EQUAL-OK: (0 -9.079439E-11) (MULTIPLE-VALUE-LIST (FLOOR 7.879919E-12 -1.9198149E9)) EQUAL-OK: (-1 -1.9198149E9) (MULTIPLE-VALUE-LIST (FLOOR 4.389072E-11 -8.657572E9)) EQUAL-OK: (-1 -8.657572E9) (MULTIPLE-VALUE-LIST (FLOOR 7.430157E-11 -3.8599355E9)) EQUAL-OK: (-1 -3.8599355E9) (MULTIPLE-VALUE-LIST (FLOOR -5.8839114E-11 -5.3409536E9)) EQUAL-OK: (0 -5.8839114E-11) (MULTIPLE-VALUE-LIST (FLOOR -3.3353615E-11 8.9096924E-11)) EQUAL-OK: (-1 5.574331E-11) (MULTIPLE-VALUE-LIST (FLOOR 6.335122E-11 3.606541E-11)) EQUAL-OK: (1 2.7285809E-11) (MULTIPLE-VALUE-LIST (FLOOR -5.6885465E-11 7.070333E-12)) EQUAL-OK: (-9 6.7475353E-12) (MULTIPLE-VALUE-LIST (FLOOR -7.581576E-11 -3.4334775E-11)) EQUAL-OK: (2 -7.1462155E-12) (MULTIPLE-VALUE-LIST (FLOOR 3.6686505E-11 -1.9221425E-11)) EQUAL-OK: (-2 -1.7563462E-12) (MULTIPLE-VALUE-LIST (FLOOR 3.066395E-11 -2.3198866E-11)) EQUAL-OK: (-2 -1.573378E-11) (MULTIPLE-VALUE-LIST (FLOOR 9.1089344E-11 7.429058E19)) EQUAL-OK: (0 9.1089344E-11) (MULTIPLE-VALUE-LIST (FLOOR -7.2265194E-11 -6.5831596E19)) EQUAL-OK: (0 -7.2265194E-11) (MULTIPLE-VALUE-LIST (FLOOR -4.9087675E-11 1.9182038E19)) EQUAL-OK: (-1 1.9182038E19) (MULTIPLE-VALUE-LIST (FLOOR -7.907188E-11 4.405831E19)) EQUAL-OK: (-1 4.405831E19) (MULTIPLE-VALUE-LIST (FLOOR 6.118759E-11 3.4342181E19)) EQUAL-OK: (0 6.118759E-11) (MULTIPLE-VALUE-LIST (FLOOR 5.4731882E-11 -5.861447E19)) EQUAL-OK: (-1 -5.861447E19) (MULTIPLE-VALUE-LIST (FLOOR 6.121101E-11 -1.8234462E-21)) EQUAL-OK: (-33568860160 0.0) (MULTIPLE-VALUE-LIST (FLOOR 9.788758E-11 -2.65478E-21)) EQUAL-OK: (-36872200192 0.0) (MULTIPLE-VALUE-LIST (FLOOR 7.827001E-11 -8.5754775E-21)) EQUAL-OK: (-9127189504 0.0) (MULTIPLE-VALUE-LIST (FLOOR -3.738018E-11 -7.810784E-21)) EQUAL-OK: (4785714176 0.0) (MULTIPLE-VALUE-LIST (FLOOR 7.31308E-11 -2.0431058E-21)) EQUAL-OK: (-35793936384 0.0) (MULTIPLE-VALUE-LIST (FLOOR 9.4578095E-11 -3.0466443E-21)) EQUAL-OK: (-31043366912 0.0) (MULTIPLE-VALUE-LIST (FLOOR -4.8186137E19 -0.95250696)) EQUAL-OK: (50588749896299315200 0.0) (MULTIPLE-VALUE-LIST (FLOOR 9.548003E18 -0.9061317)) EQUAL-OK: (-10537102614582001664 0.0) (MULTIPLE-VALUE-LIST (FLOOR 5.5254813E19 0.51959753)) EQUAL-OK: (106341562860634636288 0.0) (MULTIPLE-VALUE-LIST (FLOOR -4.2787504E19 0.14769173)) EQUAL-OK: (-289708190148186865664 0.0) (MULTIPLE-VALUE-LIST (FLOOR -4.27109E17 -0.03677529)) EQUAL-OK: (11614021477430460416 0.0) (MULTIPLE-VALUE-LIST (FLOOR -3.9238043E19 0.26663417)) EQUAL-OK: (-147160597790283792384 0.0) (MULTIPLE-VALUE-LIST (FLOOR -2.0174873E19 -6.7035556E7)) EQUAL-OK: (300957794304 0.0) (MULTIPLE-VALUE-LIST (FLOOR 1.6296811E19 -7.2014956E9)) EQUAL-OK: (-2262976000 0.0) (MULTIPLE-VALUE-LIST (FLOOR 7.794499E19 -7.412829E9)) EQUAL-OK: (-10514876416 0.0) (MULTIPLE-VALUE-LIST (FLOOR -1.2546485E19 6.1565005E9)) EQUAL-OK: (-2037924864 0.0) (MULTIPLE-VALUE-LIST (FLOOR 5.4549757E18 -4.778849E9)) EQUAL-OK: (-1141483264 0.0) (MULTIPLE-VALUE-LIST (FLOOR -8.9214324E18 3.0002557E9)) EQUAL-OK: (-2973557248 0.0) (MULTIPLE-VALUE-LIST (FLOOR 8.790958E19 -8.224902E-11)) EQUAL-OK: (-1068822197453670185020302557184 0.0) (MULTIPLE-VALUE-LIST (FLOOR 9.029222E18 1.3127345E-11)) EQUAL-OK: (687817816164697187548814901248 0.0) (MULTIPLE-VALUE-LIST (FLOOR 6.7356843E19 -9.1816894E-11)) EQUAL-OK: (-733599685837775742566290948096 0.0) (MULTIPLE-VALUE-LIST (FLOOR 4.0346153E19 2.0593792E-11)) EQUAL-OK: (1959141510822234462049892564992 0.0) (MULTIPLE-VALUE-LIST (FLOOR 1.3402778E19 -4.8733902E-11)) EQUAL-OK: (-275019611403690085233016700928 0.0) (MULTIPLE-VALUE-LIST (FLOOR -1.3005549E19 5.6579824E-11)) EQUAL-OK: (-229861963021783171398467846144 0.0) (MULTIPLE-VALUE-LIST (FLOOR 8.550302E19 6.4624324E19)) EQUAL-OK: (1 2.0878699E19) (MULTIPLE-VALUE-LIST (FLOOR 4.7897585E19 -1.5724218E19)) EQUAL-OK: (-4 -1.4999288E19) (MULTIPLE-VALUE-LIST (FLOOR -8.6050445E19 1.4007867E19)) EQUAL-OK: (-7 1.2004627E19) (MULTIPLE-VALUE-LIST (FLOOR -6.0799387E19 -5.667626E19)) EQUAL-OK: (1 -4.1231221E18) (MULTIPLE-VALUE-LIST (FLOOR -7.847746E19 -3.972193E19)) EQUAL-OK: (1 -3.875553E19) (MULTIPLE-VALUE-LIST (FLOOR -6.425414E19 3.0601436E19)) EQUAL-OK: (-3 2.7550168E19) (MULTIPLE-VALUE-LIST (FLOOR 2.8220074E-21 -0.9401483)) EQUAL-OK: (-1 -0.9401483) (MULTIPLE-VALUE-LIST (FLOOR 9.867747E-21 0.86288685)) EQUAL-OK: (0 9.867747E-21) (MULTIPLE-VALUE-LIST (FLOOR 6.2856053E-21 -0.5235996)) EQUAL-OK: (-1 -0.5235996) (MULTIPLE-VALUE-LIST (FLOOR 8.709991E-22 0.42678982)) EQUAL-OK: (0 8.709991E-22) (MULTIPLE-VALUE-LIST (FLOOR 1.0493481E-21 0.9355661)) EQUAL-OK: (0 1.0493481E-21) (MULTIPLE-VALUE-LIST (FLOOR -6.137466E-21 0.4328317)) EQUAL-OK: (-1 0.4328317) (MULTIPLE-VALUE-LIST (FLOOR 6.5872774E-21 -8.80464E9)) EQUAL-OK: (-1 -8.80464E9) (MULTIPLE-VALUE-LIST (FLOOR -1.0479629E-22 -9.353607E9)) EQUAL-OK: (0 -1.0479629E-22) (MULTIPLE-VALUE-LIST (FLOOR -2.636932E-21 9.794678E9)) EQUAL-OK: (-1 9.794678E9) (MULTIPLE-VALUE-LIST (FLOOR -7.912024E-21 -2.9102356E9)) EQUAL-OK: (0 -7.912024E-21) (MULTIPLE-VALUE-LIST (FLOOR 1.0071349E-21 8.762459E9)) EQUAL-OK: (0 1.0071349E-21) (MULTIPLE-VALUE-LIST (FLOOR -6.795979E-21 -9.445545E9)) EQUAL-OK: (0 -6.795979E-21) (MULTIPLE-VALUE-LIST (FLOOR 6.0598967E-22 -3.961637E-11)) EQUAL-OK: (-1 -3.961637E-11) (MULTIPLE-VALUE-LIST (FLOOR 3.481348E-21 -7.485006E-11)) EQUAL-OK: (-1 -7.485006E-11) (MULTIPLE-VALUE-LIST (FLOOR -5.610974E-21 -4.073898E-11)) EQUAL-OK: (0 -5.610974E-21) (MULTIPLE-VALUE-LIST (FLOOR -6.2362584E-21 8.403202E-11)) EQUAL-OK: (-1 8.403202E-11) (MULTIPLE-VALUE-LIST (FLOOR 4.2029927E-21 7.823452E-11)) EQUAL-OK: (0 4.2029927E-21) (MULTIPLE-VALUE-LIST (FLOOR -7.765272E-21 -8.502908E-11)) EQUAL-OK: (0 -7.765272E-21) (MULTIPLE-VALUE-LIST (FLOOR 2.7845436E-21 3.490416E-21)) EQUAL-OK: (0 2.7845436E-21) (MULTIPLE-VALUE-LIST (FLOOR -1.4630091E-21 9.193901E-21)) EQUAL-OK: (-1 7.730892E-21) (MULTIPLE-VALUE-LIST (FLOOR -8.1823826E-21 8.941324E-21)) EQUAL-OK: (-1 7.5894165E-22) (MULTIPLE-VALUE-LIST (FLOOR -1.8218875E-21 3.8057304E-21)) EQUAL-OK: (-1 1.9838427E-21) (MULTIPLE-VALUE-LIST (FLOOR 5.8037763E-21 -5.1721612E-21)) EQUAL-OK: (-2 -4.5405462E-21) (MULTIPLE-VALUE-LIST (FLOOR -8.179982E-21 6.2204556E-21)) EQUAL-OK: (-2 4.2609293E-21) (/ 0.73739415 0.6416277) EQL-OK: 1.1492554 (/ 0.6736158 -0.25522494) EQL-OK: -2.6393025 (/ -0.44216943 0.31134832) EQL-OK: -1.420176 (/ -0.7041118 -0.26929635) EQL-OK: 2.6146355 (/ 0.3573562 0.73521775) EQL-OK: 0.4860549 (/ -0.7661392 0.77110463) EQL-OK: -0.9935606 (/ -0.91306114 1.6586358E9) EQL-OK: -5.504892E-10 (/ -0.68994707 4.0230333E8) EQL-OK: -1.7149921E-9 (/ 0.28498656 -7.617844E9) EQL-OK: -3.7410394E-11 (/ -0.72419757 -9.226896E9) EQL-OK: 7.848767E-11 (/ 0.8352187 8.3102536E9) EQL-OK: 1.00504605E-10 (/ 0.9707725 3.3669448E9) EQL-OK: 2.8832445E-10 (/ 0.50785017 6.048824E-11) EQL-OK: 8.3958497E9 (/ -0.17675805 4.1391092E-11) EQL-OK: -4.270437E9 (/ -0.42162335 -4.4007357E-11) EQL-OK: 9.580747E9 (/ -7.945299E-4 -5.4965265E-11) EQL-OK: 1.4455128E7 (/ -0.65178335 -9.78151E-12) EQL-OK: 6.6634228E10 (/ -0.6209788 -3.8544803E-11) EQL-OK: 1.611057E10 (/ 0.94332725 -4.9823833E19) EQL-OK: -1.8933253E-20 (/ 0.30150706 -4.9741757E19) EQL-OK: -6.061448E-21 (/ -0.8478371 -9.85865E18) EQL-OK: 8.5999306E-20 (/ -0.28524554 3.1389898E19) EQL-OK: -9.087176E-21 (/ -0.5260848 -7.936286E19) EQL-OK: 6.6288534E-21 (/ -0.12941593 -5.3575864E19) EQL-OK: 2.415564E-21 (/ -0.20859545 -9.867267E-21) EQL-OK: 2.1140145E19 (/ 0.35158414 -8.2825064E-22) EQL-OK: -4.2449002E20 (/ -0.05635804 -2.2999601E-21) EQL-OK: 2.450392E19 (/ -0.003138721 -3.3988403E-21) EQL-OK: 9.234682E17 (/ -0.91386896 -5.8199337E-21) EQL-OK: 1.5702395E20 (/ -0.5374476 2.256708E-21) EQL-OK: -2.3815556E20 (/ 1.9669795E9 -0.58137333) EQL-OK: -3.3833329E9 (/ -8.9879334E8 0.35829848) EQL-OK: -2.5085046E9 (/ -9.057627E9 0.4849478) EQL-OK: -1.867753E10 (/ 3.687799E8 -0.34055912) EQL-OK: -1.082866E9 (/ -5.1049994E9 -0.16858816) EQL-OK: 3.0280888E10 (/ -4.512774E9 0.9385354) EQL-OK: -4.8083154E9 (/ -1.9312024E9 -8.3940613E9) EQL-OK: 0.2300677 (/ -8.2104387E9 6.769607E9) EQL-OK: -1.2128383 (/ -6.9613486E9 4.576518E9) EQL-OK: -1.5211015 (/ -1.486333E9 1.2476433E9) EQL-OK: -1.1913126 (/ -7.653413E9 5.167656E9) EQL-OK: -1.4810221 (/ -2.9815204E9 8.942396E9) EQL-OK: -0.33341402 (/ 9.304549E9 -5.8002263E-11) EQL-OK: -1.60417E20 (/ -2.0750719E9 1.272735E-11) EQL-OK: -1.6304037E20 (/ -1.1557549E9 -7.2220556E-11) EQL-OK: 1.6003129E19 (/ -3.3273495E9 -9.9207274E-11) EQL-OK: 3.353937E19 (/ -3.2167434E9 7.7474506E-11) EQL-OK: -4.1520026E19 (/ 4.4169416E9 -4.638272E-11) EQL-OK: -9.5228166E19 (/ -3.732909E9 -2.2763849E18) EQL-OK: 1.6398409E-9 (/ -6.243126E9 -4.1274483E19) EQL-OK: 1.5125873E-10 (/ 4.7162563E9 -7.524631E19) EQL-OK: -6.267758E-11 (/ -1.3657349E9 7.728982E19) EQL-OK: -1.7670308E-11 (/ -4.6216906E8 -7.972877E19) EQL-OK: 5.7967663E-12 (/ 4.4542986E9 3.1531836E19) EQL-OK: 1.4126353E-10 (/ 1.4738977E9 -9.8130876E-21) EQL-OK: -1.5019714E29 (/ -5.918336E9 2.9877495E-21) EQL-OK: -1.9808676E30 (/ -3.7166292E9 -1.0826009E-21) EQL-OK: 3.433056E30 (/ 7.390683E9 -2.1678685E-22) EQL-OK: -3.4091935E31 (/ 6.2302886E8 8.9466635E-21) EQL-OK: 6.963812E28 (/ 5.2357125E9 4.854464E-22) EQL-OK: 1.0785356E31 (/ -2.7721167E-11 0.99550104) EQL-OK: -2.7846447E-11 (/ 5.754337E-11 -0.6344538) EQL-OK: -9.06975E-11 (/ -7.663363E-11 0.020810604) EQL-OK: -3.6824317E-9 (/ 3.2576632E-11 0.6209498) EQL-OK: 5.2462586E-11 (/ -9.507874E-11 -0.19174337) EQL-OK: 4.958645E-10 (/ -9.681176E-11 -0.82680905) EQL-OK: 1.1709084E-10 (/ 6.458532E-11 3.442031E8) EQL-OK: 1.8763725E-19 (/ 1.9113166E-11 -7.0712125E9) EQL-OK: -2.7029546E-21 (/ -2.0099402E-12 2.600844E9) EQL-OK: -7.7280303E-22 (/ -4.9634992E-12 8.041176E9) EQL-OK: -6.1726036E-22 (/ 3.2738747E-12 7.299675E9) EQL-OK: 4.484959E-22 (/ 9.133733E-12 -2.6318538E9) EQL-OK: -3.470456E-21 (/ -3.4146054E-11 -1.5331155E-11) EQL-OK: 2.227233 (/ 6.06336E-11 4.3750472E-11) EQL-OK: 1.385896 (/ -4.229064E-11 -9.169808E-11) EQL-OK: 0.4611944 (/ 6.166104E-11 -3.5474658E-11) EQL-OK: -1.7381715 (/ -3.979801E-11 -1.9510412E-11) EQL-OK: 2.0398343 (/ 9.726933E-11 -5.6926824E-11) EQL-OK: -1.7086731 (/ 8.041786E-11 2.3718388E19) EQL-OK: 3.3905282E-30 (/ -6.747094E-11 -6.7324465E19) EQL-OK: 1.0021756E-30 (/ -3.0713255E-11 -4.8310887E19) EQL-OK: 6.357419E-31 (/ -2.8496396E-11 -4.9017306E19) EQL-OK: 5.813538E-31 (/ -9.354275E-12 -9.035095E19) EQL-OK: 1.0353266E-31 (/ 4.9274265E-12 7.241873E19) EQL-OK: 6.8040775E-32 (/ -4.377009E-11 7.138917E-21) EQL-OK: -6.131195E9 (/ 9.422678E-12 -5.8862136E-21) EQL-OK: -1.6008046E9 (/ -6.83782E-11 -3.6098812E-21) EQL-OK: 1.8941952E10 (/ -8.1755075E-11 -6.8725736E-21) EQL-OK: 1.1895846E10 (/ -6.360949E-11 4.2976342E-21) EQL-OK: -1.4801049E10 (/ 3.3879413E-11 -1.7169743E-21) EQL-OK: -1.9732044E10 (/ -9.948093E18 -0.8695114) EQL-OK: 1.1441014E19 (/ 6.2748975E19 -0.94829553) EQL-OK: -6.6170272E19 (/ -6.204444E18 0.6874813) EQL-OK: -9.0248915E18 (/ 6.7599936E19 -0.45808762) EQL-OK: -1.4756988E20 (/ 7.624068E19 0.008471012) EQL-OK: 9.0001855E21 (/ 8.342225E19 -0.3031574) EQL-OK: -2.7517803E20 (/ -6.3366795E19 -1.4882481E9) EQL-OK: 4.2578113E10 (/ -1.7335874E19 -7.42875E9) EQL-OK: 2.3336195E9 (/ -8.662651E19 1.0327226E9) EQL-OK: -8.388168E10 (/ -4.9590965E19 8.334462E9) EQL-OK: -5.95011E9 (/ 8.191562E18 5.930472E9) EQL-OK: 1.3812664E9 (/ -3.5910857E19 -7.342098E9) EQL-OK: 4.8910894E9 (/ -3.6083056E19 5.7372277E-11) EQL-OK: -6.2892843E29 (/ 2.2896613E19 -4.541202E-11) EQL-OK: -5.0419717E29 (/ 6.1438805E19 8.512014E-11) EQL-OK: 7.217893E29 (/ 6.3211746E19 -6.185377E-12) EQL-OK: -1.0219547E31 (/ 4.5452835E18 2.0429606E-11) EQL-OK: 2.2248514E29 (/ 9.226608E19 1.3297486E-11) EQL-OK: 6.9386104E30 (/ 1.8852943E19 -1.623413E19) EQL-OK: -1.1613153 (/ -3.117305E18 -9.5760065E19) EQL-OK: 0.03255329 (/ -7.719376E19 3.3627052E19) EQL-OK: -2.295585 (/ 3.1309093E19 -7.820006E19) EQL-OK: -0.4003717 (/ 3.941958E19 -9.51598E19) EQL-OK: -0.41424614 (/ -3.6364467E19 -1.0757047E19) EQL-OK: 3.380525 (/ 2.906561E17 -8.595159E-21) EQL-OK: -3.3816258E37 (/ -7.826226E-21 -0.21695328) EQL-OK: 3.6073327E-20 (/ -1.888169E-21 0.5031878) EQL-OK: -3.7524144E-21 (/ 8.304594E-21 -0.3528648) EQL-OK: -2.3534775E-20 (/ -8.441606E-21 -0.3639353) EQL-OK: 2.3195348E-20 (/ -7.815205E-21 0.38263506) EQL-OK: -2.0424697E-20 (/ -3.2837188E-21 0.46961308) EQL-OK: -6.992392E-21 (/ -5.1739832E-21 -3.891728E9) EQL-OK: 1.3294822E-30 (/ -5.3318596E-21 -7.1995423E9) EQL-OK: 7.405831E-31 (/ -7.4979364E-22 9.148773E9) EQL-OK: -8.195565E-32 (/ 4.6800053E-21 3.9532006E8) EQL-OK: 1.1838522E-29 (/ 4.914653E-22 -2.414465E9) EQL-OK: -2.035504E-31 (/ 5.4722133E-21 -9.977777E9) EQL-OK: -5.484401E-31 (/ 9.815656E-21 6.059642E-11) EQL-OK: 1.619841E-10 (/ 7.660357E-21 9.7074675E-11) EQL-OK: 7.891201E-11 (/ 9.77743E-21 2.5170428E-11) EQL-OK: 3.8844908E-10 (/ 8.818017E-21 1.18070545E-11) EQL-OK: 7.468431E-10 (/ 5.445426E-21 9.6208916E-11) EQL-OK: 5.6600016E-11 (/ 4.6823916E-21 -1.9853067E-11) EQL-OK: -2.358523E-10 (/ 9.347429E-21 -7.285392E-22) EQL-OK: -12.830372 (/ -7.304412E-21 6.766496E-21) EQL-OK: -1.079497 (/ -2.6850204E-21 6.894023E-21) EQL-OK: -0.38947076 (/ -2.24644E-21 -9.533858E-21) EQL-OK: 0.23562758 (/ -8.525939E-21 -9.961187E-22) EQL-OK: 8.559159 (/ 8.145676E-21 4.304153E-22) EQL-OK: 18.925154 (+ 0.6049332056786565d0 -0.9611373574853808d0) EQL-OK: -0.35620415180672427d0 (+ -0.4763715667865308d0 0.25936932107685584d0) EQL-OK: -0.21700224570967497d0 (+ 0.2666481927718355d0 -0.04984768063142031d0) EQL-OK: 0.21680051214041518d0 (+ -0.29478659758474846d0 0.3371004337672615d0) EQL-OK: 0.042313836182513054d0 (+ 0.8203063910979178d0 0.28968607542857916d0) EQL-OK: 1.109992466526497d0 (+ -0.08207985138263585d0 0.4368723951711785d0) EQL-OK: 0.35479254378854264d0 (+ -0.8659875373355486d0 -6.631430771196765d9) EQL-OK: -6.631430772062753d9 (+ 0.15071385783307878d0 -7.154424279496395d9) EQL-OK: -7.154424279345681d9 (+ -0.8969642760814789d0 -2.4070067380831727d8) EQL-OK: -2.4070067470528156d8 (+ -0.9610362081435054d0 9.070410778399954d9) EQL-OK: 9.070410777438917d9 (+ 0.5129052501104072d0 -7.47841120327471d9) EQL-OK: -7.478411202761805d9 (+ 0.3840242289740675d0 7.793048210060242d9) EQL-OK: 7.793048210444266d9 (+ 0.07603066126204616d0 5.215008470388369d-11) EQL-OK: 0.07603066131419625d0 (+ -0.17187858025312586d0 -5.116645189173968d-11) EQL-OK: -0.17187858030429232d0 (+ 0.2521315816245864d0 8.603210607505339d-11) EQL-OK: 0.2521315817106185d0 (+ -0.3557185853193914d0 -2.0371324697272998d-11) EQL-OK: -0.3557185853397627d0 (+ 0.7142792289542045d0 -7.106356053331326d-11) EQL-OK: 0.7142792288831409d0 (+ 0.4380415886629452d0 -3.069969538383403d-11) EQL-OK: 0.43804158863224546d0 (+ 0.24798614227178573d0 3.972393639614975d19) EQL-OK: 3.972393639614975d19 (+ -0.5210677288128815d0 4.846393336901129d19) EQL-OK: 4.846393336901129d19 (+ 0.5825404819115d0 1.9710987361264255d19) EQL-OK: 1.9710987361264255d19 (+ 0.9105175208730549d0 2.391166552096775d19) EQL-OK: 2.391166552096775d19 (+ 0.48414423368371695d0 -9.696117779740095d19) EQL-OK: -9.696117779740095d19 (+ 0.25780758450697716d0 6.094683117025535d19) EQL-OK: 6.094683117025535d19 (+ 0.9824539149570484d0 -5.4680066990812835d-21) EQL-OK: 0.9824539149570484d0 (+ -0.9520982941158654d0 3.2513564801568073d-21) EQL-OK: -0.9520982941158654d0 (+ 0.0630170624560149d0 -9.858852595793203d-21) EQL-OK: 0.0630170624560149d0 (+ 0.24705141169888878d0 1.4582081178692862d-22) EQL-OK: 0.24705141169888878d0 (+ 0.7440948700757135d0 -3.0932442581890818d-21) EQL-OK: 0.7440948700757135d0 (+ -0.5055970869515372d0 4.0277457257516025d-21) EQL-OK: -0.5055970869515372d0 (+ 1.672355787134947d9 0.0064909681594120805d0) EQL-OK: 1.672355787141438d9 (+ -9.694504381396599d9 -0.8925470085542831d0) EQL-OK: -9.694504382289146d9 (+ -1.6695005924298635d9 -0.34426964741306d0) EQL-OK: -1.6695005927741332d9 (+ -6.085591212594774d9 0.5107956920100049d0) EQL-OK: -6.085591212083979d9 (+ 7.457486660952688d9 -0.4323787588338597d0) EQL-OK: 7.457486660520309d9 (+ -8.790796444526546d9 0.911415263281967d0) EQL-OK: -8.790796443615131d9 (+ 9.667548804251982d9 -1.266547751029956d8) EQL-OK: 9.540894029148987d9 (+ -6.169561898845145d9 9.627911197121864d9) EQL-OK: 3.458349298276719d9 (+ -9.870287253215279d9 9.004242781937655d8) EQL-OK: -8.969862975021513d9 (+ -8.175630881172554d9 -4.08632236263908d9) EQL-OK: -1.2261953243811634d10 (+ 2.9069444232153206d9 -7.961831315741894d9) EQL-OK: -5.054886892526573d9 (+ -7.003647401371184d9 -1.768371514817526d9) EQL-OK: -8.772018916188711d9 (+ -6.418847599138249d9 2.755257250162372d-11) EQL-OK: -6.418847599138249d9 (+ 2.3093152687241793d9 1.2205440142364766d-11) EQL-OK: 2.3093152687241793d9 (+ 8.634577667577518d9 -9.065714034538668d-11) EQL-OK: 8.634577667577518d9 (+ 1.711283212591781d9 -3.235019197733951d-11) EQL-OK: 1.711283212591781d9 (+ 2.583886638357791d9 -8.199109798920928d-11) EQL-OK: 2.583886638357791d9 (+ -7.517123950474774d9 5.2057802142431697d-11) EQL-OK: -7.517123950474774d9 (+ 3.266571938086574d9 -4.4782768261898355d19) EQL-OK: -4.478276825863179d19 (+ 2.1000389219899452d9 -8.547158903365463d19) EQL-OK: -8.54715890315546d19 (+ -3.9140926801217155d9 7.387959860641422d19) EQL-OK: 7.387959860250013d19 (+ -7.087607465790431d9 7.96875093387599d19) EQL-OK: 7.96875093316723d19 (+ -8.341000808926519d9 6.9360028397637304d19) EQL-OK: 6.93600283892963d19 (+ -5.507940634743809d9 9.760028858210094d19) EQL-OK: 9.7600288576593d19 (+ 8.492522971238823d9 -2.8253881864964467d-22) EQL-OK: 8.492522971238823d9 (+ 1.2731765723336241d9 -5.8473937102910264d-21) EQL-OK: 1.2731765723336241d9 (+ 9.654280758878323d9 -4.2332114049658973d-22) EQL-OK: 9.654280758878323d9 (+ -6.864618926120946d9 -1.245648314796599d-21) EQL-OK: -6.864618926120946d9 (+ -3.9916044043798673d8 1.697737588450543d-21) EQL-OK: -3.9916044043798673d8 (+ -7.818041624198686d9 4.635421587404246d-21) EQL-OK: -7.818041624198686d9 (+ 2.0609929543990767d-12 -0.2126306554359736d0) EQL-OK: -0.2126306554339126d0 (+ -1.5923091695877845d-11 0.515731533720818d0) EQL-OK: 0.515731533704895d0 (+ 4.794527092905871d-11 -0.9066947202676092d0) EQL-OK: -0.9066947202196639d0 (+ -8.63854477728633d-11 0.3122982022565777d0) EQL-OK: 0.3122982021701922d0 (+ -7.577966666552416d-11 -0.24137602092437593d0) EQL-OK: -0.2413760210001556d0 (+ -4.971730475882754d-11 -0.8202688719750202d0) EQL-OK: -0.8202688720247375d0 (+ -5.249369194379291d-11 -8.546120620321186d9) EQL-OK: -8.546120620321186d9 (+ 8.280786962526793d-11 5.758373397436368d9) EQL-OK: 5.758373397436368d9 (+ 6.370323595535815d-11 -8.470663335712393d9) EQL-OK: -8.470663335712393d9 (+ 3.59771226839467d-11 3.5042505440266216d8) EQL-OK: 3.5042505440266216d8 (+ -3.945501687396375d-11 -5.082779978069177d9) EQL-OK: -5.082779978069177d9 (+ 9.780590963267516d-11 -5.05591945120475d9) EQL-OK: -5.05591945120475d9 (+ 6.323293597096768d-11 -7.208898910487284d-11) EQL-OK: -8.85605313390516d-12 (+ -4.549781732354749d-11 -6.095452636416357d-11) EQL-OK: -1.0645234368771105d-10 (+ -5.372680267837374d-11 2.0748354219485134d-11) EQL-OK: -3.297844845888861d-11 (+ 3.550879553916665d-11 -4.374873254056574d-11) EQL-OK: -8.23993700139909d-12 (+ -6.746002242414832d-11 3.0803985031459436d-11) EQL-OK: -3.665603739268888d-11 (+ -7.902512161494214d-11 -8.907842858073236d-11) EQL-OK: -1.681035501956745d-10 (+ -4.1465935469350415d-11 6.244210696961323d19) EQL-OK: 6.244210696961323d19 (+ 4.921297536286578d-11 -1.694436650099881d19) EQL-OK: -1.694436650099881d19 (+ -7.879478980672654d-11 6.41757969360492d19) EQL-OK: 6.41757969360492d19 (+ -8.200749317872953d-11 -9.490225542618815d19) EQL-OK: -9.490225542618815d19 (+ -7.572981329795812d-11 -3.350367078181029d19) EQL-OK: -3.350367078181029d19 (+ -5.955255565125549d-11 -5.009913629288125d19) EQL-OK: -5.009913629288125d19 (+ -9.818180775332558d-11 -7.926156011681593d-21) EQL-OK: -9.818180776125174d-11 (+ -5.2466438379505935d-12 8.468830229031857d-21) EQL-OK: -5.246643829481763d-12 (+ 3.582774358441715d-11 3.6865211729351863d-22) EQL-OK: 3.58277435847858d-11 (+ 7.169296413565744d-11 -9.974881413980864d-21) EQL-OK: 7.169296412568256d-11 (+ -9.615073655516977d-11 4.9552491300097786d-21) EQL-OK: -9.615073655021452d-11 (+ 6.7696956269187d-11 4.1431488006404866d-21) EQL-OK: 6.769695627333016d-11 (+ -4.663397365185298d19 0.9758464195927673d0) EQL-OK: -4.663397365185298d19 (+ -4.77977261393851d19 0.04145189313162445d0) EQL-OK: -4.77977261393851d19 (+ 7.195364554121596d19 0.5169917736820715d0) EQL-OK: 7.195364554121596d19 (+ -7.766254779507882d19 0.5919134938460356d0) EQL-OK: -7.766254779507882d19 (+ -8.411122653901408d19 -0.14463225181516137d0) EQL-OK: -8.411122653901408d19 (+ -9.101920591747218d19 0.23349918704239836d0) EQL-OK: -9.101920591747218d19 (+ 7.037477746142529d18 -3.250947575909365d9) EQL-OK: 7.037477742891581d18 (+ -6.864341752972099d19 -4.0510449339565725d9) EQL-OK: -6.864341753377203d19 (+ -5.329540273290228d19 8.14869777458878d9) EQL-OK: -5.329540272475358d19 (+ -9.726234388247201d19 2.053976989398215d9) EQL-OK: -9.726234388041803d19 (+ -1.910324088450308d19 6.247052535748024d9) EQL-OK: -1.910324087825603d19 (+ -6.079933001949367d18 6.316829148809886d9) EQL-OK: -6.079932995632539d18 (+ -4.499107911798452d19 9.659763881732633d-11) EQL-OK: -4.499107911798452d19 (+ -3.0972208018542522d19 -9.077209886078653d-11) EQL-OK: -3.0972208018542522d19 (+ -2.3000547840875442d19 -3.2043634522621155d-11) EQL-OK: -2.3000547840875442d19 (+ 2.124555308489292d19 2.252166800652451d-11) EQL-OK: 2.124555308489292d19 (+ -7.74280238703686d19 1.7289553748884322d-11) EQL-OK: -7.74280238703686d19 (+ -8.119446783121816d19 -4.3461802389685114d-11) EQL-OK: -8.119446783121816d19 (+ -4.70848534032654d18 -4.698316648967506d19) EQL-OK: -5.169165183000161d19 (+ 2.853799842810312d19 -5.56805968603395d19) EQL-OK: -2.7142598432236384d19 (+ -2.9128622996090335d19 -5.153369106520702d19) EQL-OK: -8.066231406129735d19 (+ -5.415993984772977d19 4.481932558278175d19) EQL-OK: -9.340614264948015d18 (+ -1.4652301908531261d19 7.89284449966826d19) EQL-OK: 6.427614308815133d19 (+ -8.241911630479252d19 5.377001886877124d19) EQL-OK: -2.8649097436021277d19 (+ -6.923631123395076d19 7.100129853298664d-22) EQL-OK: -6.923631123395076d19 (+ -5.864213410820717d19 -2.649878514627326d-21) EQL-OK: -5.864213410820717d19 (+ 8.660575002861176d19 2.751926085897399d-21) EQL-OK: 8.660575002861176d19 (+ -3.0252871646631318d19 6.852831573716124d-21) EQL-OK: -3.0252871646631318d19 (+ -9.155476807340938d19 -5.552907466957205d-21) EQL-OK: -9.155476807340938d19 (+ -4.03382621358461d19 6.670808279457885d-21) EQL-OK: -4.03382621358461d19 (+ 8.842980509187577d-21 0.5028466982188534d0) EQL-OK: 0.5028466982188534d0 (+ 1.7292043381396136d-21 0.19490424064972922d0) EQL-OK: 0.19490424064972922d0 (+ -5.854820918836103d-21 -0.6700030154364615d0) EQL-OK: -0.6700030154364615d0 (+ -2.152396491682048d-21 0.5002930268902921d0) EQL-OK: 0.5002930268902921d0 (+ -1.0897149666610629d-21 0.16555534170490604d0) EQL-OK: 0.16555534170490604d0 (+ 6.321421497987867d-24 -0.08008112131564671d0) EQL-OK: -0.08008112131564671d0 (+ -6.1552667309563055d-21 7.235074489769488d9) EQL-OK: 7.235074489769488d9 (+ -2.2311335001219955d-22 1.220011008333989d9) EQL-OK: 1.220011008333989d9 (+ 8.523565724937177d-23 -4.1650242034123087d9) EQL-OK: -4.1650242034123087d9 (+ -2.4400041303825447d-21 4.435554678685388d9) EQL-OK: 4.435554678685388d9 (+ -3.4479065449345757d-22 8.491084033112451d8) EQL-OK: 8.491084033112451d8 (+ -7.919939059912893d-21 -7.610637842585286d9) EQL-OK: -7.610637842585286d9 (+ 4.4958602369105625d-21 5.758376768873417d-11) EQL-OK: 5.7583767693230034d-11 (+ 2.4375297386412195d-21 9.417086717671841d-11) EQL-OK: 9.417086717915595d-11 (+ 1.0040647133383462d-21 3.4701016271268983d-12) EQL-OK: 3.470101628130963d-12 (+ -3.885093055726793d-21 -8.523534862249969d-11) EQL-OK: -8.523534862638479d-11 (+ 1.027951323422187d-21 -7.65508060829868d-11) EQL-OK: -7.655080608195885d-11 (+ -9.83813940552434d-21 -5.048380063082019d-11) EQL-OK: -5.0483800640658324d-11 (+ -7.640856498925806d-21 -5.743808556015994d19) EQL-OK: -5.743808556015994d19 (+ 8.053891045717591d-21 4.0840032650134725d19) EQL-OK: 4.0840032650134725d19 (+ -4.794782783871528d-21 -3.431216587740782d18) EQL-OK: -3.431216587740782d18 (+ 1.860870988390988d-21 -3.757945694933625d19) EQL-OK: -3.757945694933625d19 (+ 5.445498222566789d-21 7.575823566817991d19) EQL-OK: 7.575823566817991d19 (+ 2.631896745307223d-21 4.906449817201212d19) EQL-OK: 4.906449817201212d19 (+ -6.61689881073516d-21 5.357007670385275d-21) EQL-OK: -1.2598911403498852d-21 (+ 3.0173001109587537d-21 5.2947222461350496d-21) EQL-OK: 8.312022357093803d-21 (+ -8.792518441030627d-21 -1.0516787854168774d-21) EQL-OK: -9.844197226447504d-21 (+ 7.349451992884509d-21 -8.427997362671486d-21) EQL-OK: -1.0785453697869767d-21 (+ -7.881179611953633d-21 3.2080446524364824d-21) EQL-OK: -4.6731349595171506d-21 (+ -9.614117725927607d-21 -5.35667712698602d-21) EQL-OK: -1.4970794852913628d-20 (- -0.011326914400453525d0 -0.6668141757661364d0) EQL-OK: 0.6554872613656829d0 (- -0.46185382764946437d0 0.7488210697846337d0) EQL-OK: -1.2106748974340982d0 (- -0.35834120541234993d0 -0.30919976341834987d0) EQL-OK: -0.04914144199400006d0 (- 0.44705025064976966d0 -0.9277893553610955d0) EQL-OK: 1.3748396060108652d0 (- -0.47647537517067917d0 0.29158058381073604d0) EQL-OK: -0.7680559589814152d0 (- -0.021697999002707746d0 0.1779871773524142d0) EQL-OK: -0.19968517635512195d0 (- 0.4179484378019861d0 9.9990307469939d9) EQL-OK: -9.999030746575953d9 (- -0.7475415524823718d0 1.3993312799214797d9) EQL-OK: -1.3993312806690214d9 (- 0.2519442433861928d0 -6.699632771871848d9) EQL-OK: 6.699632772123793d9 (- -0.5124988631497671d0 2.7959244812290273d9) EQL-OK: -2.795924481741526d9 (- -0.6870193827604301d0 4.851102442573468d9) EQL-OK: -4.851102443260488d9 (- 0.7609656780357723d0 7.481252865855436d8) EQL-OK: -7.481252858245779d8 (- -0.6301276042170191d0 -7.099314875214215d-11) EQL-OK: -0.630127604146026d0 (- -0.4139053484357884d0 -2.897413526398709d-11) EQL-OK: -0.41390534840681426d0 (- -0.6944623060197281d0 -3.291569879873739d-11) EQL-OK: -0.6944623059868125d0 (- -0.2057822500703933d0 3.6505182026159854d-11) EQL-OK: -0.2057822501068985d0 (- -0.8792706674467908d0 8.094527736950817d-11) EQL-OK: -0.8792706675277361d0 (- -0.6888184243601332d0 9.127622796988807d-11) EQL-OK: -0.6888184244514094d0 (- -0.980711030497252d0 8.752272461345245d19) EQL-OK: -8.752272461345245d19 (- 0.8035082489836539d0 -3.903355151264917d19) EQL-OK: 3.903355151264917d19 (- -0.7537841372394811d0 -5.879942447417834d19) EQL-OK: 5.879942447417834d19 (- -0.6877475951546845d0 -2.3972266191169642d19) EQL-OK: 2.3972266191169642d19 (- -0.43128282112433525d0 -5.422824998003439d19) EQL-OK: 5.422824998003439d19 (- 0.29538116818276694d0 1.1291858990580939d19) EQL-OK: -1.1291858990580939d19 (- 0.9166687388673976d0 6.395175407123937d-21) EQL-OK: 0.9166687388673976d0 (- 0.41840538498193025d0 -2.6655662412599155d-21) EQL-OK: 0.41840538498193025d0 (- -0.8036940092501853d0 6.7473779576832565d-21) EQL-OK: -0.8036940092501853d0 (- 0.8555054025209989d0 -7.939970418096797d-21) EQL-OK: 0.8555054025209989d0 (- 0.3365495704567003d0 8.694519827555395d-21) EQL-OK: 0.3365495704567003d0 (- -0.7430322011471231d0 7.430332379292914d-22) EQL-OK: -0.7430322011471231d0 (- 5.102372414731216d9 -0.5073635765350494d0) EQL-OK: 5.10237241523858d9 (- 4.629827365822252d9 0.6534380055543355d0) EQL-OK: 4.629827365168815d9 (- 7.218192507117569d9 0.9781542046565127d0) EQL-OK: 7.218192506139415d9 (- 6.595760326622413d8 0.7339510561932947d0) EQL-OK: 6.595760319282902d8 (- 7.191166637703489d9 0.80792475493853d0) EQL-OK: 7.191166636895564d9 (- -7.95531405213956d9 0.5353636841430115d0) EQL-OK: -7.955314052674924d9 (- 5.438904545553836d8 6.533536518165114d9) EQL-OK: -5.989646063609731d9 (- -7.389650313101625d8 -9.983943153365381d9) EQL-OK: 9.244978122055218d9 (- 8.364404619492165d9 -7.600563055115287d9) EQL-OK: 1.5964967674607452d10 (- 2.070813748323649d9 6.421052769114957d9) EQL-OK: -4.350239020791307d9 (- -2.8555256820439434d9 -3.4077342921686625d8) EQL-OK: -2.514752252827077d9 (- 9.147878229420991d8 8.439982790150545d9) EQL-OK: -7.5251949672084465d9 (- -4.315772980070098d9 -6.48869466068404d-11) EQL-OK: -4.315772980070098d9 (- -3.5186299785635023d9 3.990046539849716d-11) EQL-OK: -3.5186299785635023d9 (- 2.5645532837267537d9 8.566645694205622d-13) EQL-OK: 2.5645532837267537d9 (- 6.145110896031829d9 -9.242734002954773d-11) EQL-OK: 6.145110896031829d9 (- -6.6836855975624d9 9.117930361283473d-11) EQL-OK: -6.6836855975624d9 (- -1.7472828462085754d8 -5.125838712019503d-11) EQL-OK: -1.7472828462085754d8 (- 9.05675399397055d9 9.086705650502484d19) EQL-OK: -9.08670564959681d19 (- -5.834806594586836d9 9.981576053842906d19) EQL-OK: -9.981576054426386d19 (- 3.047010922754272d9 1.1715352070471352d19) EQL-OK: -1.1715352067424342d19 (- 7.294295638574767d9 2.845702947515113d19) EQL-OK: -2.8457029467856835d19 (- 8.264143132493019d9 -1.6322956072452289d19) EQL-OK: 1.6322956080716431d19 (- -9.597823287256088d9 3.954126758718671d19) EQL-OK: -3.954126759678453d19 (- 3.229389511771705d9 -4.329831377266493d-21) EQL-OK: 3.229389511771705d9 (- 6.897089200279753d9 2.4428208790287663d-21) EQL-OK: 6.897089200279753d9 (- 2.3579775300187545d9 4.729400988996349d-21) EQL-OK: 2.3579775300187545d9 (- 1.6718929117460046d9 5.8162277016717065d-21) EQL-OK: 1.6718929117460046d9 (- 2.537177500868296d9 1.4856605280697543d-21) EQL-OK: 2.537177500868296d9 (- 6.117674696930935d9 -1.6187214719634357d-21) EQL-OK: 6.117674696930935d9 (- 4.1877888304549216d-11 -0.06920550501017497d0) EQL-OK: 0.06920550505205286d0 (- 9.61054846124015d-11 0.885309193732889d0) EQL-OK: -0.8853091936367835d0 (- 2.5559085051828467d-11 -0.8112181469812297d0) EQL-OK: 0.8112181470067888d0 (- -1.4549570208293283d-12 -0.5049325945871657d0) EQL-OK: 0.5049325945857107d0 (- -7.091628047158497d-11 0.61946884965934d0) EQL-OK: -0.6194688497302563d0 (- 2.877466355456826d-11 0.4496491857374d0) EQL-OK: -0.44964918570862533d0 (- 1.3041612488449928d-12 5.408018587130755d9) EQL-OK: -5.408018587130755d9 (- -5.379752339715717d-11 -4.009594691514288d9) EQL-OK: 4.009594691514288d9 (- 7.023042501342336d-12 -3.4153434285746374d9) EQL-OK: 3.4153434285746374d9 (- 6.968174934871611d-11 4.713087404332662d9) EQL-OK: -4.713087404332662d9 (- -5.153562653896506d-11 -8.44732228013254d8) EQL-OK: 8.44732228013254d8 (- -8.424177457818745d-11 1.6817117809824567d9) EQL-OK: -1.6817117809824567d9 (- 3.374755984316538d-11 8.893678266883364d-11) EQL-OK: -5.5189222825668264d-11 (- -8.684123447823306d-11 -7.888825869147879d-11) EQL-OK: -7.952975786754267d-12 (- 7.788477523205632d-11 1.741674745286914d-11) EQL-OK: 6.046802777918718d-11 (- 6.546622477606044d-11 -4.7719651007530584d-11) EQL-OK: 1.1318587578359101d-10 (- -1.8595152377503265d-11 5.7288738553553045d-11) EQL-OK: -7.588389093105631d-11 (- -8.184033550427558d-11 -8.834399228929296d-11) EQL-OK: 6.503656785017376d-12 (- 5.749469292140762d-11 7.493129199779113d19) EQL-OK: -7.493129199779113d19 (- -5.2285095120702066d-11 -2.0611179974216552d19) EQL-OK: 2.0611179974216552d19 (- -8.84727820032067d-11 4.7423077384022024d19) EQL-OK: -4.7423077384022024d19 (- 3.437676989338625d-11 -3.5368755480277647d19) EQL-OK: 3.5368755480277647d19 (- 2.2665031619145437d-11 -6.072845659234921d19) EQL-OK: 6.072845659234921d19 (- -8.429070146313393d-11 5.134329153614969d18) EQL-OK: -5.134329153614969d18 (- -9.009531819191212d-11 2.301790665456671d-22) EQL-OK: -9.00953181921423d-11 (- -2.706942469371907d-11 9.282350542107287d-21) EQL-OK: -2.706942470300142d-11 (- 5.358266626996117d-11 -4.409057695582885d-22) EQL-OK: 5.358266627040208d-11 (- -7.189537285608088d-11 9.569273217393917d-21) EQL-OK: -7.189537286565016d-11 (- -4.160295905335358d-11 5.930867524794025d-21) EQL-OK: -4.160295905928445d-11 (- 6.7922062777334035d-12 -7.747524338474154d-22) EQL-OK: 6.792206278508156d-12 (- -9.038821102045805d19 0.04779131019959271d0) EQL-OK: -9.038821102045805d19 (- 2.2020595055495963d19 -0.424631558292516d0) EQL-OK: 2.2020595055495963d19 (- -8.164003027214308d19 0.6832198147365239d0) EQL-OK: -8.164003027214308d19 (- -3.878233560364984d19 -0.28756619113600546d0) EQL-OK: -3.878233560364984d19 (- 7.0829003521450525d19 -0.6071548125948544d0) EQL-OK: 7.0829003521450525d19 (- 5.968540808784698d19 0.7674294173432648d0) EQL-OK: 5.968540808784698d19 (- -2.2143621795153547d19 -2.443529365769125d9) EQL-OK: -2.2143621792710017d19 (- -9.77092538926342d18 5.903189771537687d8) EQL-OK: -9.77092538985374d18 (- 9.974714452399537d19 -6.980456691485629d9) EQL-OK: 9.974714453097582d19 (- 1.7428950527159094d18 3.68843657888816d9) EQL-OK: 1.742895049027473d18 (- -1.1094381875350845d19 -7.157723640671709d9) EQL-OK: -1.1094381868193122d19 (- -3.638795590369631d19 6.9246542750294075d9) EQL-OK: -3.6387955910620963d19 (- -5.66543282261991d19 -5.1005028153082024d-11) EQL-OK: -5.66543282261991d19 (- -3.901527864456216d19 -1.064153465992923d-12) EQL-OK: -3.901527864456216d19 (- 1.1477489418879848d19 3.327888063907735d-11) EQL-OK: 1.1477489418879848d19 (- 3.508978072054437d19 9.238453417997638d-11) EQL-OK: 3.508978072054437d19 (- -4.7642024461416964d19 -4.758309941438892d-11) EQL-OK: -4.7642024461416964d19 (- -8.307715835429606d19 3.313910202186439d-11) EQL-OK: -8.307715835429606d19 (- 2.704675010192592d18 -2.6840207147078365d19) EQL-OK: 2.954488215727096d19 (- -9.860969100714668d18 -4.719594638795429d19) EQL-OK: 3.7334977287239614d19 (- 7.87799781828944d18 -6.657221298850535d19) EQL-OK: 7.44502108067948d19 (- -3.3937781740759863d19 4.783805995045389d19) EQL-OK: -8.177584169121376d19 (- -1.0747572720102216d19 -1.7144708598072445d19) EQL-OK: 6.397135877970229d18 (- 1.3938845733158445d19 5.604369854609131d19) EQL-OK: -4.210485281293287d19 (- 6.0938348303695315d19 1.1005522580049531d-21) EQL-OK: 6.0938348303695315d19 (- -2.4870844028694925d19 1.5391650322730598d-22) EQL-OK: -2.4870844028694925d19 (- 7.323118607079343d19 6.637280375859432d-21) EQL-OK: 7.323118607079343d19 (- -4.181201584825501d19 4.768935182006663d-21) EQL-OK: -4.181201584825501d19 (- 4.1225910279381205d19 6.117191687463543d-21) EQL-OK: 4.1225910279381205d19 (- 6.438313875980151d17 -1.4883489002691529d-21) EQL-OK: 6.438313875980151d17 (- -4.573961206963222d-21 0.3586300020381973d0) EQL-OK: -0.3586300020381973d0 (- 7.74206782371325d-22 0.23168389210368656d0) EQL-OK: -0.23168389210368656d0 (- 8.572446613640605d-21 0.6114581963443891d0) EQL-OK: -0.6114581963443891d0 (- -8.539467934859551d-21 0.33474735899049d0) EQL-OK: -0.33474735899049d0 (- -5.55811309570968d-21 -0.9637216018651454d0) EQL-OK: 0.9637216018651454d0 (- -6.705839413964189d-21 0.3787619614522374d0) EQL-OK: -0.3787619614522374d0 (- 1.338539206480238d-22 6.683968625235106d9) EQL-OK: -6.683968625235106d9 (- -9.64078167549023d-21 3.291420859310843d9) EQL-OK: -3.291420859310843d9 (- -9.26536204591093d-22 2.9839295142529476d8) EQL-OK: -2.9839295142529476d8 (- -3.647737608953592d-21 6.115300020921433d8) EQL-OK: -6.115300020921433d8 (- 1.4069763806331204d-21 -1.183109060480878d9) EQL-OK: 1.183109060480878d9 (- -6.0037865798761924d-21 -7.442246743849378d9) EQL-OK: 7.442246743849378d9 (- -5.994118986299138d-21 -9.091558282012836d-11) EQL-OK: 9.091558281413425d-11 (- 6.969393585974241d-21 3.435352867093995d-11) EQL-OK: -3.435352866397056d-11 (- -6.278554484817533d-22 -4.7211920270841604d-11) EQL-OK: 4.721192027021375d-11 (- -8.603262886304741d-21 1.7296517702077242d-11) EQL-OK: -1.7296517710680505d-11 (- 4.104502790901735d-21 -4.8473213720301105d-11) EQL-OK: 4.847321372440561d-11 (- -4.449725859444968d-21 -8.944265568403936d-11) EQL-OK: 8.944265567958964d-11 (- 4.828216540804827d-21 -1.1712152029346877d19) EQL-OK: 1.1712152029346877d19 (- -5.65034940464881d-21 -9.445303840982011d19) EQL-OK: 9.445303840982011d19 (- -7.24107519738777d-21 2.340578690102746d19) EQL-OK: -2.340578690102746d19 (- 1.7659593956231534d-21 -8.048768257390671d18) EQL-OK: 8.048768257390671d18 (- -3.0538518255248124d-21 8.834631867521575d19) EQL-OK: -8.834631867521575d19 (- 8.57952908388053d-21 -5.730742870111307d19) EQL-OK: 5.730742870111307d19 (- -4.5090103564928485d-21 1.8907114777916313d-21) EQL-OK: -6.399721834284479d-21 (- -3.8487625143236447d-22 5.354282198078924d-21) EQL-OK: -5.739158449511288d-21 (- 2.6660110440404615d-22 3.833744224501756d-22) EQL-OK: -1.1677331804612944d-22 (- -7.503762004261027d-22 -9.623906576475644d-21) EQL-OK: 8.873530376049542d-21 (- -9.113431042260725d-21 -3.5516521546085545d-21) EQL-OK: -5.56177888765217d-21 (- -3.4813735333296525d-21 -2.6602650182385188d-21) EQL-OK: -8.211085150911337d-22 (* -0.2554913394465045d0 0.27042187315261135d0) EQL-OK: -0.0690904465873934d0 (* -0.4489211233229662d0 -0.42892136850270857d0) EQL-OK: 0.19255186256545986d0 (* -0.44586465919973783d0 -0.15168042462027043d0) EQL-OK: 0.0676289408305884d0 (* 0.5509395670465355d0 0.3577558280766836d0) EQL-OK: 0.19710184102894285d0 (* -0.42780066410606965d0 0.22704747885906007d0) EQL-OK: -0.0971310622395147d0 (* 0.20955388816500042d0 0.605628751935113d0) EQL-OK: 0.12691185975251945d0 (* 0.9993471610818964d0 -4.363771855901198d9) EQL-OK: -4.360923015803941d9 (* 0.10502219375257282d0 3.425205053451057d9) EQL-OK: 3.5972254876582843d8 (* 0.7768651149081368d0 1.666066330143864d9) EQL-OK: 1.2943088110117908d9 (* -0.6438389801759042d0 2.8922130868526487d9) EQL-OK: -1.8621195242906134d9 (* -0.7427680566504474d0 6.763974500466173d9) EQL-OK: -5.02406419494444d9 (* -0.8563035843259611d0 2.9100478627456827d9) EQL-OK: -2.4918844154292307d9 (* 0.6219502737119671d0 2.8868752190811842d-11) EQL-OK: 1.7954928326798375d-11 (* 0.6767479505813657d0 2.9324524289075574d-11) EQL-OK: 1.9845311714405376d-11 (* 0.7944531541461581d0 8.282076647859848d-11) EQL-OK: 6.579721915772496d-11 (* -0.4662914070981966d0 -6.921260263903422d-11) EQL-OK: 3.227324187348362d-11 (* 0.037804762510578516d0 -3.044514833184461d-11) EQL-OK: -1.1509716022847211d-12 (* -0.5364168049485208d0 -3.695280705974925d-11) EQL-OK: 1.9822106696869836d-11 (* 0.10343751426551051d0 4.8902635121181385d19) EQL-OK: 5.058367017968255d18 (* -0.45511004829813784d0 1.8210069906740634d19) EQL-OK: -8.287585794769196d18 (* -0.9675158737162977d0 8.097401718869682d19) EQL-OK: -7.83436469886405d19 (* -0.06573561186185628d0 2.6049125586869125d19) EQL-OK: -1.712355208919178d18 (* -0.5574365795036731d0 -8.822383181882661d19) EQL-OK: 4.917919103979403d19 (* -0.4222667103024276d0 -1.8561723355961213d19) EQL-OK: 7.837997859065477d18 (* -0.8412207478192143d0 2.3416069046402696d-22) EQL-OK: -1.9698083114201234d-22 (* 0.24291385591230452d0 -9.448120185342916d-21) EQL-OK: -2.295079305344525d-21 (* -0.37792600430678414d0 -2.3929024368177364d-21) EQL-OK: 9.043400566424941d-22 (* -0.007648867433060369d0 -5.3162210182098465d-21) EQL-OK: 4.066306981313633d-23 (* -0.7631807323096114d0 -4.534410248041209d-21) EQL-OK: 3.4605745336922964d-21 (* 0.4735366300649959d0 -1.3895270471326203d-21) EQL-OK: -6.579919552833457d-22 (* -8.64834403600587d9 -0.14057280586223464d0) EQL-OK: 1.215721987203268d9 (* -1.5525713051163936d9 0.10621224657238759d0) EQL-OK: -1.64902086280236d8 (* 3.297132746298694d9 0.05318660311813239d0) EQL-OK: 1.7536329080518654d8 (* 2.1659831568875275d9 0.11704159596099262d0) EQL-OK: 2.5351012550674528d8 (* -5.533403510176525d9 0.37778599060251605d0) EQL-OK: -2.0904423264954782d9 (* -2.4217306331294374d9 0.6051350227557695d0) EQL-OK: -1.465474021787126d9 (* 1.4048311850866513d9 -4.304799039580996d9) EQL-OK: -6.047515936334449d18 (* -5.070278162013437d9 -9.116233758795675d9) EQL-OK: 4.622184094703138d19 (* 8.452801605894673d9 -9.002885976919611d9) EQL-OK: -7.609960904339272d19 (* 6.352601599408395d9 -4.484034289922495d9) EQL-OK: -2.848528340196373d19 (* -6.565407710101401d8 -6.718825369609182d9) EQL-OK: 4.4111827884457016d18 (* -9.37193973536698d9 9.577576231327314d9) EQL-OK: -8.976046725088279d19 (* -1.7766859308675253d9 -4.079350537765101d-11) EQL-OK: 0.0724772470752413d0 (* 2.3810136983742104d9 9.195156930614704d-11) EQL-OK: 0.2189379461049417d0 (* -3.313966320976337d9 -3.44704749912067d-11) EQL-OK: 0.11423399318891611d0 (* 6.598963960681895d9 -2.4298605961767928d-11) EQL-OK: -0.1603456250365168d0 (* 7.908258993705348d9 1.528909719631646d-11) EQL-OK: 0.12091014040840486d0 (* -5.906667889594469d9 5.917852809041966d-11) EQL-OK: -0.3495479116251461d0 (* 4.86261281419926d9 -2.3925611132123714d19) EQL-OK: -1.1634098327861323d29 (* -9.753392818607462d9 -2.5653634777279775d18) EQL-OK: 2.502099772078992d28 (* 1.5861252889272392d9 5.12939252547053d19) EQL-OK: 8.135859201483165d28 (* -8.422142961023593d8 1.0428099441045047d19) EQL-OK: -8.782694430425161d27 (* -3.109042783121446d9 -4.138252722536039d19) EQL-OK: 1.286600476173335d29 (* -6.459303282089468d8 1.8408981660472957d19) EQL-OK: -1.189091956594178d28 (* -1.432764110232635d9 8.98766033001457d-21) EQL-OK: -1.2877197155806476d-11 (* 8.539623949953406d9 -3.498784805440049d-21) EQL-OK: -2.987830652026891d-11 (* 7.336784327799637d9 -1.048985206018761d-21) EQL-OK: -7.696178219612119d-12 (* -4.320357143553698d9 2.591531476439043d-21) EQL-OK: -1.119634152697768d-11 (* -9.374098076239548d9 5.5773248420603045d-21) EQL-OK: -5.228239007252054d-11 (* 9.118926580475056d9 -1.379170270330765d-21) EQL-OK: -1.2576552437120181d-11 (* 8.145792307872788d-11 -0.06511382435429458d0) EQL-OK: -5.304036895613926d-12 (* -6.1928426627437d-11 0.2526275616632321d0) EQL-OK: -1.5644827416529785d-11 (* -8.555119338859813d-11 -0.8366318482083728d0) EQL-OK: 7.157485304113478d-11 (* 8.243060442429263d-12 0.3939656708074719d0) EQL-OK: 3.2474828367081808d-12 (* 8.600529286105945d-11 -0.891441509265547d0) EQL-OK: -7.666868807288822d-11 (* -7.531046724969747d-11 0.24398797995196886d0) EQL-OK: -1.8374848773492595d-11 (* -3.7666526619188126d-12 4.659322150343885d9) EQL-OK: -0.017550048180330083d0 (* 3.032501107241211d-11 -9.592046453776636d9) EQL-OK: -0.2908789149178678d0 (* 7.311626957349528d-11 -9.061108567148174d9) EQL-OK: -0.6625144566303135d0 (* 4.898078204161461d-11 8.88014689134599d9) EQL-OK: 0.4349565393825394d0 (* 1.278207138618518d-11 -4.279966992086118d9) EQL-OK: -0.05470684362336102d0 (* -8.538580654966055d-11 -5.191059833953482d8) EQL-OK: 0.0443242830769665d0 (* 4.0761422500127225d-11 1.527607426117321d-11) EQL-OK: 6.226745171030001d-22 (* -9.186363051001198d-11 8.557763803549676d-11) EQL-OK: -7.861472520412421d-21 (* -9.89183505930065d-11 9.717968160611499d-11) EQL-OK: -9.612853815630427d-21 (* 7.440627873114725d-12 -4.535521332601712d-11) EQL-OK: -3.374712644646274d-22 (* 8.701410920357686d-11 -7.032883383151379d-12) EQL-OK: -6.119600827175551d-22 (* 9.866226673114161d-11 -2.814669610817353d-11) EQL-OK: -2.777016839025002d-21 (* 5.192240545105114d-11 -3.366056660574579d19) EQL-OK: -1.747737587015645d9 (* -1.372355669576939d-11 -4.819955130360066d19) EQL-OK: 6.61469275025609d8 (* 3.637511103766519d-11 -4.071776382810416d19) EQL-OK: -1.4811131804527159d9 (* 7.446388208685151d-13 2.7760294268649034d19) EQL-OK: 2.0671392791169815d7 (* 6.267855179410938d-11 7.471751480940298d19) EQL-OK: 4.683185621908299d9 (* -4.336562006766369d-11 8.143188451558233d19) EQL-OK: -3.5313441652966094d9 (* -1.0432655006975122d-11 -9.379512413340694d-21) EQL-OK: 9.785321714202411d-32 (* -8.167646898574611d-11 -5.810795749825724d-21) EQL-OK: 4.746052788431461d-31 (* -4.33805459341994d-11 -2.4289860591796017d-21) EQL-OK: 1.053707413137707d-31 (* -1.384613082275421d-11 2.2174009100764947d-21) EQL-OK: -3.070242308741339d-32 (* -4.910905591314494d-11 -5.456657623752349d-21) EQL-OK: 2.679713043437427d-31 (* 1.3653011366548008d-11 -3.925911962906968d-21) EQL-OK: -5.360052065363564d-32 (* 7.641468950470222d19 0.9034599537348024d0) EQL-OK: 6.903761184457755d19 (* 5.146778093125584d19 -0.2791459460022878d0) EQL-OK: -1.436702239669392d19 (* -8.874303077863696d19 -0.23153988023519345d0) EQL-OK: 2.054755071819369d19 (* 7.10798162637783d19 -0.4719034863212067d0) EQL-OK: -3.354281310194779d19 (* -9.820386602197546d19 0.03346146041258036d0) EQL-OK: -3.286044775256677d18 (* -5.210458089116161d19 0.11173798093222442d0) EQL-OK: -5.822060666098161d18 (* 3.257626718953688d18 -6.150510855712356d9) EQL-OK: -2.0036068498783283d28 (* -7.755105754004988d19 5.514896832715505d9) EQL-OK: -4.27686081601359d29 (* 2.426235084788384d19 8.685431434428486d9) EQL-OK: 2.1072898472734294d29 (* -2.847383850475709d19 -2.412830829567453d9) EQL-OK: 6.870255538040273d28 (* 1.4664659669727164d19 -4.8673539253155d9) EQL-OK: -7.1378088806862425d28 (* -4.24770317054668d19 1.3102543269150825d9) EQL-OK: -5.5655714586597015d28 (* 2.17116835964837d19 -3.654789326884115d-11) EQL-OK: -7.935162947711353d8 (* -1.8125809977916906d17 -5.944782899600832d-11) EQL-OK: 1.0775400519813456d7 (* -7.915462827540546d19 9.762153025588201d-11) EQL-OK: -7.727195939080587d9 (* -4.360953588949649d19 -7.152431005584812d-11) EQL-OK: 3.119141966351983d9 (* 3.550776271395866d19 -6.387656982922894d-11) EQL-OK: -2.268114084477872d9 (* -8.278954580496595d19 -7.359178231519021d-11) EQL-OK: 6.092630232852524d9 (* -5.5022682113038156d19 -8.979630229039327d19) EQL-OK: 4.940833395850589d39 (* 1.1716230943203277d19 5.5764415854118265d19) EQL-OK: 6.533487745596758d38 (* 7.462799608352103d19 6.061883497941003d19) EQL-OK: 4.523862179431019d39 (* -3.2160334983646097d19 -3.8817785710003675d19) EQL-OK: 1.2483929917571087d39 (* 5.868090263060238d19 -8.37300331667736d19) EQL-OK: -4.91335392351655d39 (* -7.3652924769962656d19 9.725738480757314d19) EQL-OK: -7.163290846555493d39 (* -6.447063647969567d19 4.0587529685661844d-21) EQL-OK: -0.2616703871973161d0 (* -3.1999317568381926d17 3.015031281949113d-21) EQL-OK: -9.647894346969533d-4 (* -1.5005852398726605d19 5.391316601974659d-21) EQL-OK: -0.080901301164036d0 (* 1.0084552719733576d19 2.78150956101201d-21) EQL-OK: 0.02805027980846861d0 (* -7.171404412051077d19 1.4733392992015492d-21) EQL-OK: -0.10565911950742231d0 (* -5.909802783283228d19 5.356071274587122d-21) EQL-OK: -0.31653324926018317d0 (* 8.272641144282955d-22 -0.16191056182923802d0) EQL-OK: -1.3394279754825238d-22 (* 8.410471541398583d-21 -0.43256058128353736d0) EQL-OK: -3.63803845881602d-21 (* -7.887238384137063d-22 0.5589746137044918d0) EQL-OK: -4.408766028968254d-22 (* 4.778995446616728d-21 0.21608373898977795d0) EQL-OK: 1.0326632047200663d-21 (* 3.992449163872154d-21 0.9593422165456676d0) EQL-OK: 3.830125030315009d-21 (* -9.700320218813958d-21 -0.42620535269852766d0) EQL-OK: 4.134328400148262d-21 (* -1.7901566262876555d-21 9.461674014776534d8) EQL-OK: -1.6937878433325936d-12 (* 1.0928019952544443d-22 8.279199780524873d9) EQL-OK: 9.047526039267738d-13 (* 9.942869097320962d-21 9.523169242022762d9) EQL-OK: 9.468762516506561d-11 (* -2.7432601692209267d-21 -4.922145522647528d9) EQL-OK: 1.3502725759388083d-11 (* -5.97929682563092d-21 -6.147792689359443d8) EQL-OK: 3.6759477312123895d-12 (* -1.3564305221188254d-21 1.0862842413758955d9) EQL-OK: -1.473469100698958d-12 (* -5.446806293721964d-21 -1.5358504316888942d-11) EQL-OK: 8.365479797538665d-32 (* -1.0222776562632463d-21 -1.9781477525280056d-11) EQL-OK: 2.0222162481967376d-32 (* 8.192540157543917d-21 3.3215076993103644d-11) EQL-OK: 2.7211585210191467d-31 (* 9.685592607330157d-21 6.034805605641166d-11) EQL-OK: 5.8450668560672665d-31 (* 6.671870463340688d-21 -9.07657686679269d-11) EQL-OK: -6.055774510579552d-31 (* -1.109409648670322d-21 -4.7905821901849965d-11) EQL-OK: 5.314718104539439d-32 (* -3.9052432481663676d-22 2.0306112771345453d19) EQL-OK: -0.007930030979680168d0 (* 8.596834841113507d-21 -9.453548987989818d19) EQL-OK: -0.8127059931212419d0 (* 3.946325780779758d-21 -9.084484011754447d19) EQL-OK: -0.35850333460668093d0 (* 5.3518824877647604d-21 -6.814116447592617d19) EQL-OK: -0.36468350485460743d0 (* -7.456278485417833d-22 9.61914445493285d19) EQL-OK: -0.07172301984744206d0 (* -5.0781537010216826d-21 9.216915512986622d19) EQL-OK: -0.4680491362427718d0 (* 3.2906792172396555d-22 4.571445785546992d-21) EQL-OK: 1.50431616392373d-42 (* 5.39814714322422d-21 6.687033308557664d-21) EQL-OK: 3.6097589751235757d-41 (* 4.3506183844841724d-21 7.266196706225928d-21) EQL-OK: 3.1612448975384865d-41 (* 6.910763289107986d-21 3.910584203890238d-21) EQL-OK: 2.702512175521024d-41 (* -4.6131515924393325d-21 5.228174479773633d-21) EQL-OK: -2.411836142691841d-41 (* -2.1886866436065787d-21 6.29322016055891d-22) EQL-OK: -1.3773886910690934d-42 (MULTIPLE-VALUE-LIST (FLOOR 0.6173351962722496d0 -0.11820538775792844d0)) EQUAL-OK: (-6 -0.09189713027532098d0) (MULTIPLE-VALUE-LIST (FLOOR -0.17517225806171177d0 0.1118228341753209d0)) EQUAL-OK: (-2 0.04847341028893004d0) (MULTIPLE-VALUE-LIST (FLOOR -0.9387909021047899d0 -0.16826318310698907d0)) EQUAL-OK: (5 -0.09747498656984459d0) (MULTIPLE-VALUE-LIST (FLOOR 0.8036728904567848d0 0.6774308237913269d0)) EQUAL-OK: (1 0.1262420666654578d0) (MULTIPLE-VALUE-LIST (FLOOR 0.6882568422881421d0 0.3302150266778784d0)) EQUAL-OK: (2 0.02782678893238538d0) (MULTIPLE-VALUE-LIST (FLOOR 0.3618917435888378d0 0.5454396894763598d0)) EQUAL-OK: (0 0.3618917435888378d0) (MULTIPLE-VALUE-LIST (FLOOR -0.478470818234076d0 9.035797971846054d9)) EQUAL-OK: (-1 9.035797971367584d9) (MULTIPLE-VALUE-LIST (FLOOR 0.6423779722022549d0 2.0589504447793393d9)) EQUAL-OK: (0 0.6423779722022549d0) (MULTIPLE-VALUE-LIST (FLOOR 0.21698095744051404d0 1.570908384361449d9)) EQUAL-OK: (0 0.21698095744051404d0) (MULTIPLE-VALUE-LIST (FLOOR 0.24033995915823747d0 6.968395233824382d9)) EQUAL-OK: (0 0.24033995915823747d0) (MULTIPLE-VALUE-LIST (FLOOR -0.8531247643149816d0 -5.299783511441018d9)) EQUAL-OK: (0 -0.8531247643149817d0) (MULTIPLE-VALUE-LIST (FLOOR -0.5134978162655872d0 2.297671112225289d9)) EQUAL-OK: (-1 2.297671111711791d9) (MULTIPLE-VALUE-LIST (FLOOR 0.6192405432591311d0 5.4403538407469436d-11)) EQUAL-OK: (11382357864 3.744539199218032d-11) (MULTIPLE-VALUE-LIST (FLOOR -0.20340731452742233d0 5.44351944436815d-12)) EQUAL-OK: (-37366875715 2.4681729170135434d-12) (MULTIPLE-VALUE-LIST (FLOOR -0.29394735220898527d0 -3.6328318262890404d-12)) EQUAL-OK: (80914109505 -3.3847154436219604d-12) (MULTIPLE-VALUE-LIST (FLOOR -0.8359336184185098d0 6.064791537508077d-11)) EQUAL-OK: (-13783385847 1.2432123964511977d-11) (MULTIPLE-VALUE-LIST (FLOOR -0.9762544843227843d0 2.2086465633336306d-11)) EQUAL-OK: (-44201480696 1.1997821346734454d-11) (MULTIPLE-VALUE-LIST (FLOOR -0.2919696169517234d0 6.922295436251983d-11)) EQUAL-OK: (-4217815025 3.3402028237741715d-11) (MULTIPLE-VALUE-LIST (FLOOR 0.9452118035872986d0 -1.1093667270485797d19)) EQUAL-OK: (-1 -1.1093667270485797d19) (MULTIPLE-VALUE-LIST (FLOOR 0.3379784391207531d0 -3.0106029588222304d19)) EQUAL-OK: (-1 -3.0106029588222304d19) (MULTIPLE-VALUE-LIST (FLOOR 0.3907483945162724d0 -9.823409070968835d19)) EQUAL-OK: (-1 -9.823409070968835d19) (MULTIPLE-VALUE-LIST (FLOOR -0.4293216868359586d0 5.965415751655242d19)) EQUAL-OK: (-1 5.965415751655242d19) (MULTIPLE-VALUE-LIST (FLOOR 0.13727607148241305d0 -8.310631671228052d19)) EQUAL-OK: (-1 -8.310631671228052d19) (MULTIPLE-VALUE-LIST (FLOOR -0.7478116595122868d0 7.235991436975452d19)) EQUAL-OK: (-1 7.235991436975452d19) (MULTIPLE-VALUE-LIST (FLOOR -0.9425796643098138d0 -1.7749544068364875d-21)) EQUAL-OK: (531044437355311857664 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR 0.20835281321620536d0 2.7983277403481253d-21)) EQUAL-OK: (74456186890490986496 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR -0.5404541167071248d0 9.266841531614177d-22)) EQUAL-OK: (-583212861537931100160 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR -0.06796825059990208d0 -6.350644782153893d-21)) EQUAL-OK: (10702574767038046208 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR 0.30647600932087793d0 -9.704243038852408d-21)) EQUAL-OK: (-31581650221851901952 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR -0.7939481974521416d0 -7.44148349933678d-21)) EQUAL-OK: (106692193501860495360 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR 2.622471924924206d9 0.3428958732728865d0)) EQUAL-OK: (7648012499 0.2776496600055352d0) (MULTIPLE-VALUE-LIST (FLOOR 9.96303133513731d9 -0.6839887200892081d0)) EQUAL-OK: (-14566075496 -0.09450688719173875d0) (MULTIPLE-VALUE-LIST (FLOOR 9.438132647041376d8 -0.9350840745499996d0)) EQUAL-OK: (-1009335193 -0.15301271996267998d0) (MULTIPLE-VALUE-LIST (FLOOR -5.031281076435459d9 0.8566679205528436d0)) EQUAL-OK: (-5873082155 0.5244045303768723d0) (MULTIPLE-VALUE-LIST (FLOOR -9.504293159523993d9 -0.17779074115973026d0)) EQUAL-OK: (53457750935 -0.058079864158457416d0) (MULTIPLE-VALUE-LIST (FLOOR 5.593337221858664d8 0.6365106532159245d0)) EQUAL-OK: (878749977 0.3121177083383602d0) (MULTIPLE-VALUE-LIST (FLOOR -9.849085830660753d9 5.465582064164139d9)) EQUAL-OK: (-2 1.0820782976675239d9) (MULTIPLE-VALUE-LIST (FLOOR 6.254242990207708d9 1.9986128256161973d9)) EQUAL-OK: (3 2.5840451335911673d8) (MULTIPLE-VALUE-LIST (FLOOR -9.644949290710447d9 3.677515142398587d9)) EQUAL-OK: (-3 1.3875961364853137d9) (MULTIPLE-VALUE-LIST (FLOOR 9.966654669106707d9 3.622741134738514d9)) EQUAL-OK: (2 2.7211723996296782d9) (MULTIPLE-VALUE-LIST (FLOOR -7.024110605080818d9 -1.3131548351819434d9)) EQUAL-OK: (5 -4.583364291711011d8) (MULTIPLE-VALUE-LIST (FLOOR -4.5982831731090415d8 -4.587607917895467d9)) EQUAL-OK: (0 -4.5982831731090415d8) (MULTIPLE-VALUE-LIST (FLOOR 6.779683583609543d9 -8.732134194560264d-11)) EQUAL-OK: (-77640625218895380480 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR 3.040910010354103d8 -6.386892985922651d-11)) EQUAL-OK: (-4761172634419539968 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR -9.081490496057175d9 -8.389512916135551d-11)) EQUAL-OK: (108248125807050637312 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR -2.3391140718625803d9 4.078343101769488d-11)) EQUAL-OK: (-57354519065541566464 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR 9.740679130260033d9 -4.1307299498162d-11)) EQUAL-OK: (-235810117064018001920 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR 4.630742761978566d9 -8.36053471494181d-11)) EQUAL-OK: (-55388117146413842432 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR 6.607827158404311d8 1.9791074337467208d19)) EQUAL-OK: (0 6.607827158404311d8) (MULTIPLE-VALUE-LIST (FLOOR 1.5835379695092866d9 -5.599741962857091d19)) EQUAL-OK: (-1 -5.599741962698737d19) (MULTIPLE-VALUE-LIST (FLOOR -9.972337740404726d9 -1.4833907125668299d19)) EQUAL-OK: (0 -9.972337740404726d9) (MULTIPLE-VALUE-LIST (FLOOR -2.8545208802037845d9 5.460276762513134d19)) EQUAL-OK: (-1 5.4602767622276825d19) (MULTIPLE-VALUE-LIST (FLOOR 3.4574292483978963d9 8.177006210253868d19)) EQUAL-OK: (0 3.4574292483978963d9) (MULTIPLE-VALUE-LIST (FLOOR -6.94800692720856d9 5.400944544004402d19)) EQUAL-OK: (-1 5.400944543309601d19) (MULTIPLE-VALUE-LIST (FLOOR 2.2301147741459103d9 4.352417825189536d-22)) EQUAL-OK: (5123852680777023531125296857088 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR 2.855798499915275d9 -2.1597757039453335d-21)) EQUAL-OK: (-1322266240285272897749142994944 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR 6.247757812861889d9 -8.000803060408911d-21)) EQUAL-OK: (-780891338743010366964468023296 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR -8.41352264607702d8 2.4583479152659926d-21)) EQUAL-OK: (-342242958933120698647142465536 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR 9.08798064415713d9 -4.6826703076651156d-21)) EQUAL-OK: (-1940768844921862497464005689344 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR -2.450923950975804d9 -8.516681149015905d-21)) EQUAL-OK: (287779230910741073293637320704 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR -6.535114995775952d-11 -0.4217447234387455d0)) EQUAL-OK: (0 -6.535114995775952d-11) (MULTIPLE-VALUE-LIST (FLOOR 6.91351782048677d-13 -0.8578740601420116d0)) EQUAL-OK: (-1 -0.8578740601413203d0) (MULTIPLE-VALUE-LIST (FLOOR -9.879448244992307d-11 -0.6016918305263045d0)) EQUAL-OK: (0 -9.879448244992307d-11) (MULTIPLE-VALUE-LIST (FLOOR 7.820572196574365d-11 -0.8508242256358738d0)) EQUAL-OK: (-1 -0.8508242255576681d0) (MULTIPLE-VALUE-LIST (FLOOR -4.4420680878896835d-11 0.6509799475016377d0)) EQUAL-OK: (-1 0.650979947457217d0) (MULTIPLE-VALUE-LIST (FLOOR -8.35377304874932d-11 -0.7623592484047194d0)) EQUAL-OK: (0 -8.35377304874932d-11) (MULTIPLE-VALUE-LIST (FLOOR -4.697219220983554d-11 -2.0199834401398075d9)) EQUAL-OK: (0 -4.697219220983554d-11) (MULTIPLE-VALUE-LIST (FLOOR 4.027899822164905d-11 -3.0043885624092436d8)) EQUAL-OK: (-1 -3.0043885624092436d8) (MULTIPLE-VALUE-LIST (FLOOR -9.473748837497406d-11 -6.081705720880249d8)) EQUAL-OK: (0 -9.473748837497406d-11) (MULTIPLE-VALUE-LIST (FLOOR -6.257060775257221d-11 4.479345462936419d9)) EQUAL-OK: (-1 4.479345462936419d9) (MULTIPLE-VALUE-LIST (FLOOR -4.076402998599221d-11 3.0379052042471523d9)) EQUAL-OK: (-1 3.0379052042471523d9) (MULTIPLE-VALUE-LIST (FLOOR 3.2516054170046405d-11 9.075782126517027d9)) EQUAL-OK: (0 3.2516054170046405d-11) (MULTIPLE-VALUE-LIST (FLOOR 7.77186165285192d-12 -7.011585244893556d-11)) EQUAL-OK: (-1 -6.234399079608364d-11) (MULTIPLE-VALUE-LIST (FLOOR -4.129939073543463d-11 -4.398862671531905d-11)) EQUAL-OK: (0 -4.129939073543463d-11) (MULTIPLE-VALUE-LIST (FLOOR -4.986332353670153d-11 4.056354917830567d-11)) EQUAL-OK: (-2 3.126377481990981d-11) (MULTIPLE-VALUE-LIST (FLOOR -6.358815251785654d-11 3.044610839789864d-11)) EQUAL-OK: (-3 2.7750172675839383d-11) (MULTIPLE-VALUE-LIST (FLOOR -1.5218538547762808d-11 -4.9239841620755075d-11)) EQUAL-OK: (0 -1.5218538547762808d-11) (MULTIPLE-VALUE-LIST (FLOOR -3.714719523899548d-11 -3.338962509681127d-11)) EQUAL-OK: (1 -3.757570142184203d-12) (MULTIPLE-VALUE-LIST (FLOOR -3.7559900032627426d-11 -7.103620895893612d19)) EQUAL-OK: (0 -3.7559900032627426d-11) (MULTIPLE-VALUE-LIST (FLOOR 3.442771371655891d-11 3.2650979291930292d19)) EQUAL-OK: (0 3.442771371655891d-11) (MULTIPLE-VALUE-LIST (FLOOR -8.026236668129701d-11 -7.030175018925641d19)) EQUAL-OK: (0 -8.026236668129701d-11) (MULTIPLE-VALUE-LIST (FLOOR 4.0245932625540036d-11 9.919022649131396d19)) EQUAL-OK: (0 4.0245932625540036d-11) (MULTIPLE-VALUE-LIST (FLOOR 6.558019989897738d-11 9.805879474847002d19)) EQUAL-OK: (0 6.558019989897738d-11) (MULTIPLE-VALUE-LIST (FLOOR -8.950419173616613d-11 7.8967335533488d19)) EQUAL-OK: (-1 7.8967335533488d19) (MULTIPLE-VALUE-LIST (FLOOR -4.2555105814142415d-11 -7.367149245343951d-22)) EQUAL-OK: (57763327980 -5.012024424412273d-22) (MULTIPLE-VALUE-LIST (FLOOR -7.125466497249949d-11 -9.625683307253578d-21)) EQUAL-OK: (7402556545 -6.2922712544984485d-21) (MULTIPLE-VALUE-LIST (FLOOR 8.076311292972551d-11 5.7198456178965606d-21)) EQUAL-OK: (14119806429 1.262169607592943d-21) (MULTIPLE-VALUE-LIST (FLOOR -7.024787982764915d-11 1.5125149703168537d-21)) EQUAL-OK: (-46444419531 6.648179051963393d-22) (MULTIPLE-VALUE-LIST (FLOOR 2.3153240875994985d-11 -1.5025822462858028d-21)) EQUAL-OK: (-15408967419 -1.3907844732195436d-21) (MULTIPLE-VALUE-LIST (FLOOR 9.445189938981536d-11 -1.8886893988697117d-21)) EQUAL-OK: (-50009228329 -8.218058303553574d-22) (MULTIPLE-VALUE-LIST (FLOOR -8.982223463756733d19 0.20677548795071854d0)) EQUAL-OK: (-434394983311440412672 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR -2.6872844858317455d19 0.00946240694180256d0)) EQUAL-OK: (-2839958693765316083712 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR -9.566658458393646d19 -0.38847162936974444d0)) EQUAL-OK: (246264018659858710528 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR -4.235085548018657d19 -0.06527446136754045d0)) EQUAL-OK: (648812025299173376000 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR 2.8443413501845017d19 -0.04996947402848739d0)) EQUAL-OK: (-569215787335074643968 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR -4.484750058861429d19 -0.2338784192921971d0)) EQUAL-OK: (191755616975433072640 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR -2.986802109112903d19 5.923385648786668d9)) EQUAL-OK: (-5042390090 3.561083576852057d9) (MULTIPLE-VALUE-LIST (FLOOR 8.088567504347222d18 9.070536452627407d9)) EQUAL-OK: (891740807 8.158341046664973d9) (MULTIPLE-VALUE-LIST (FLOOR -3.09688480137261d19 -6.508291621550677d9)) EQUAL-OK: (4758368219 -1.75538588669977d9) (MULTIPLE-VALUE-LIST (FLOOR 4.226418080435591d19 7.892147197133178d9)) EQUAL-OK: (5355219530 6.335538696917366d8) (MULTIPLE-VALUE-LIST (FLOOR 1.4013831972690205d19 -2.4924246236187544d9)) EQUAL-OK: (-5622570023 -6.556610185422871d8) (MULTIPLE-VALUE-LIST (FLOOR 6.1838203826708914d19 8.941814127664919d9)) EQUAL-OK: (6915621700 8.062833976289089d9) (MULTIPLE-VALUE-LIST (FLOOR -6.916774706038343d18 3.120694095597196d-11)) EQUAL-OK: (-221642189018039718512504602624 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR 9.435687674071892d19 -3.149833308668829d-11)) EQUAL-OK: (-2995614926067172775889444274176 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR -6.212546775235241d19 3.239266009361982d-11)) EQUAL-OK: (-1917887187183768183263136317440 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR 4.749482734068419d19 -5.5235623432819116d-11)) EQUAL-OK: (-859858627258009608103722483712 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR 3.0587261660909548d19 4.4929685621578874d-11)) EQUAL-OK: (680780674018761986414328414208 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR 4.141754743467259d19 5.235000122629564d-11)) EQUAL-OK: (791166121575339566219965497344 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR -1.2481803107227873d19 7.39878580568375d18)) EQUAL-OK: (-2 2.3157685041396265d18) (MULTIPLE-VALUE-LIST (FLOOR -1.5884453212818639d19 -8.336283910718495d19)) EQUAL-OK: (0 -1.5884453212818639d19) (MULTIPLE-VALUE-LIST (FLOOR 5.000368279611168d19 -5.031778160332162d19)) EQUAL-OK: (-1 -3.140988072099368d17) (MULTIPLE-VALUE-LIST (FLOOR -3.6360612893747024d19 4.7875734964388405d19)) EQUAL-OK: (-1 1.1515122070641383d19) (MULTIPLE-VALUE-LIST (FLOOR 2.357251757890727d19 -4.493498319637942d19)) EQUAL-OK: (-1 -2.136246561747215d19) (MULTIPLE-VALUE-LIST (FLOOR 5.0747068626287395d19 8.591364094011977d19)) EQUAL-OK: (0 5.0747068626287395d19) (MULTIPLE-VALUE-LIST (FLOOR 2.1440483442615423d19 9.668454918695627d-21)) EQUAL-OK: (2217570813838780736509865871750106972160 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR 8.818664212173065d19 -8.186497379734964d-21)) EQUAL-OK: (-10772206724212702608743560617665161592832 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR -7.376250633760416d19 -6.382238421048869d-21)) EQUAL-OK: (11557466435965877316178494055246213414912 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR -4.374244855009332d19 3.864539687646209d-21)) EQUAL-OK: (-11318928536282082575630148538694692241408 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR 7.578656580690454d19 9.103502086399884d-22)) EQUAL-OK: (83249902166909342613269419960118328426496 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR 5.759312769216988d19 -9.830658049049094d-21)) EQUAL-OK: (-5858522125865295462884970652182979280896 0.0d0) (MULTIPLE-VALUE-LIST (FLOOR -7.091696063135083d-21 0.3220521420236615d0)) EQUAL-OK: (-1 0.3220521420236615d0) (MULTIPLE-VALUE-LIST (FLOOR -7.472975994693659d-21 -0.06404310380828848d0)) EQUAL-OK: (0 -7.472975994693657d-21) (MULTIPLE-VALUE-LIST (FLOOR 2.2994935284804662d-21 0.8294627436562217d0)) EQUAL-OK: (0 2.2994935284804662d-21) (MULTIPLE-VALUE-LIST (FLOOR -6.098532726052559d-21 -0.5103342535054871d0)) EQUAL-OK: (0 -6.098532726052559d-21) (MULTIPLE-VALUE-LIST (FLOOR -7.8237727943808d-21 0.20193503990844952d0)) EQUAL-OK: (-1 0.20193503990844952d0) (MULTIPLE-VALUE-LIST (FLOOR -5.357065560054238d-21 0.535324456368991d0)) EQUAL-OK: (-1 0.535324456368991d0) (MULTIPLE-VALUE-LIST (FLOOR 8.67862366495009d-23 5.869284875063336d9)) EQUAL-OK: (0 8.67862366495009d-23) (MULTIPLE-VALUE-LIST (FLOOR -3.913399519946995d-21 4.645302733766437d9)) EQUAL-OK: (-1 4.645302733766437d9) (MULTIPLE-VALUE-LIST (FLOOR 6.256033435453117d-21 3.5904533516671333d9)) EQUAL-OK: (0 6.2560334354531166d-21) (MULTIPLE-VALUE-LIST (FLOOR -7.970558626381476d-21 4.548434922363557d9)) EQUAL-OK: (-1 4.548434922363557d9) (MULTIPLE-VALUE-LIST (FLOOR 7.442840440717647d-21 -3.3266294818989463d9)) EQUAL-OK: (-1 -3.3266294818989463d9) (MULTIPLE-VALUE-LIST (FLOOR -4.6732789449833775d-21 5.614289998802058d8)) EQUAL-OK: (-1 5.614289998802058d8) (MULTIPLE-VALUE-LIST (FLOOR 7.136201304639634d-21 -1.152382297069954d-12)) EQUAL-OK: (-1 -1.1523822899337527d-12) (MULTIPLE-VALUE-LIST (FLOOR -7.575364316308001d-21 -4.790622052171537d-11)) EQUAL-OK: (0 -7.575364316308001d-21) (MULTIPLE-VALUE-LIST (FLOOR 9.212759331893804d-21 -6.41398602124991d-11)) EQUAL-OK: (-1 -6.413986020328634d-11) (MULTIPLE-VALUE-LIST (FLOOR -1.9103188467401064d-21 -5.1860189481412404d-11)) EQUAL-OK: (0 -1.9103188467401064d-21) (MULTIPLE-VALUE-LIST (FLOOR -4.473075242507236d-21 2.3036197131739102d-11)) EQUAL-OK: (-1 2.303619712726603d-11) (MULTIPLE-VALUE-LIST (FLOOR 5.138595152941494d-21 2.9424719822474346d-11)) EQUAL-OK: (0 5.138595152941494d-21) (MULTIPLE-VALUE-LIST (FLOOR -5.137698996313833d-22 2.2468745456943227d19)) EQUAL-OK: (-1 2.2468745456943227d19) (MULTIPLE-VALUE-LIST (FLOOR -7.229848882029144d-21 -3.031606285079872d19)) EQUAL-OK: (0 -7.229848882029144d-21) (MULTIPLE-VALUE-LIST (FLOOR -6.85451854164106d-21 1.7676693722776926d19)) EQUAL-OK: (-1 1.7676693722776926d19) (MULTIPLE-VALUE-LIST (FLOOR 5.372223270507929d-21 -7.439745956384552d19)) EQUAL-OK: (-1 -7.439745956384552d19) (MULTIPLE-VALUE-LIST (FLOOR 5.598138480271164d-21 5.149401801116799d19)) EQUAL-OK: (0 5.598138480271163d-21) (MULTIPLE-VALUE-LIST (FLOOR 9.285618896860432d-21 6.546424273112694d19)) EQUAL-OK: (0 9.285618896860432d-21) (MULTIPLE-VALUE-LIST (FLOOR 7.511556502656318d-21 4.2351039143592516d-21)) EQUAL-OK: (1 3.2764525882970666d-21) (MULTIPLE-VALUE-LIST (FLOOR 6.050106800286075d-21 -1.187392681676287d-21)) EQUAL-OK: (-6 -1.0742492897716469d-21) (MULTIPLE-VALUE-LIST (FLOOR 4.274671258683056d-21 8.647095729321104d-21)) EQUAL-OK: (0 4.274671258683056d-21) (MULTIPLE-VALUE-LIST (FLOOR 7.344809600387072d-21 6.305446958850813d-21)) EQUAL-OK: (1 1.039362641536258d-21) (MULTIPLE-VALUE-LIST (FLOOR 9.753544125648588d-21 9.227661371269332d-21)) EQUAL-OK: (1 5.258827543792571d-22) (MULTIPLE-VALUE-LIST (FLOOR -7.227362780459908d-21 -6.70179577363263d-21)) EQUAL-OK: (1 -5.255670068272766d-22) (/ -0.651381628953465d0 -0.9237050214744277d0) EQL-OK: 0.7051835962889135d0 (/ 0.5067986732438687d0 0.6260017267692811d0) EQL-OK: 0.8095803119575966d0 (/ -0.8399445051045212d0 0.1829250718359493d0) EQL-OK: -4.591740742120902d0 (/ -0.5987041550692662d0 -0.4124053212463479d0) EQL-OK: 1.4517372211878756d0 (/ 0.5861382519823647d0 -0.7560374696447822d0) EQL-OK: -0.7752767230673855d0 (/ -0.012882644582824954d0 -0.4671067448591679d0) EQL-OK: 0.02757965866390787d0 (/ -0.7830198970435231d0 2.1690164135025935d9) EQL-OK: -3.610022921767931d-10 (/ -0.2339206226652567d0 2.729373380002701d9) EQL-OK: -8.57048817062271d-11 (/ -0.2285806315782951d0 -2.602073870582813d9) EQL-OK: 8.784555817667759d-11 (/ -0.5298716781559242d0 1.3509547453340487d9) EQL-OK: -3.9222015392151683d-10 (/ 0.7287190523338418d0 -8.244205871151566d9) EQL-OK: -8.839166121309548d-11 (/ 0.18973054487786212d0 6.557593452200545d9) EQL-OK: 2.893295326415727d-11 (/ 0.5084032300982587d0 4.5431682148621014d-11) EQL-OK: 1.119049980221105d10 (/ 0.6621212705475221d0 -1.838873437953206d-11) EQL-OK: -3.600689731450519d10 (/ -0.4041791750277005d0 7.707875701307648d-11) EQL-OK: -5.243716825365141d9 (/ -0.09569063343466655d0 4.789751448902253d-11) EQL-OK: -1.9978204392338054d9 (/ -0.6471008513340974d0 1.890250884404079d-11) EQL-OK: -3.4233596009563705d10 (/ -0.4301276572683971d0 9.134844738134672d-11) EQL-OK: -4.708647706651978d9 (/ -0.5061027989171409d0 4.246468515299164d19) EQL-OK: -1.1918204434902915d-20 (/ -0.9601783702217944d0 7.495754288877955d19) EQL-OK: -1.2809629734615065d-20 (/ -0.6477754868655262d0 -8.507334914535449d19) EQL-OK: 7.614317449272521d-21 (/ 0.1934462826116784d0 3.6173521417193476d19) EQL-OK: 5.347731573618163d-21 (/ -0.7794308505212441d0 4.172217291786081d19) EQL-OK: -1.8681453913144062d-20 (/ -0.8462346361305484d0 7.378170819620111d19) EQL-OK: -1.1469436759043748d-20 (/ 0.9783005897625496d0 6.175045007596078d-21) EQL-OK: 1.584280905740958d20 (/ -0.9700832605850568d0 -1.7695051741124812d-21) EQL-OK: 5.482229013948009d20 (/ 0.07062591404368701d0 -8.855398515753737d-21) EQL-OK: -7.975464223100028d18 (/ 0.4751383409805402d0 -8.1371029771106d-21) EQL-OK: -5.8391585103087485d19 (/ -0.5103510786836052d0 8.302178001281015d-21) EQL-OK: -6.14719509271975d19 (/ 0.7148807879199733d0 4.338856119331781d-21) EQL-OK: 1.6476250151158982d20 (/ 4.180670608983218d9 -0.8621420131862095d0) EQL-OK: -4.849167010818503d9 (/ 3.202209376555907d9 0.008113117870009012d0) EQL-OK: 3.9469528581523615d11 (/ 7.767843042272955d9 -0.04145956871894663d0) EQL-OK: -1.8735947532235483d11 (/ 1.1937839884817846d9 0.45557753834605563d0) EQL-OK: 2.6203749921818776d9 (/ -2.4205138097471213d9 -0.3737757916008485d0) EQL-OK: 6.475844247109412d9 (/ -7.534066568550288d9 -0.3609372553147958d0) EQL-OK: 2.0873618496321087d10 (/ 6.098867840095913d9 3.0464612528039427d9) EQL-OK: 2.0019515542771322d0 (/ 4.956687716396978d9 7.035407926465974d9) EQL-OK: 0.704534515724495d0 (/ 6.969049109639194d9 -8.115758334653503d9) EQL-OK: -0.8587058438990264d0 (/ -8.0699835500126705d9 -1.1896420666819375d9) EQL-OK: 6.783539163608158d0 (/ -2.229793060172571d9 -2.658809828346301d9) EQL-OK: 0.8386433043838396d0 (/ 3.0672739776038485d9 -7.988270854370873d9) EQL-OK: -0.3839722054398737d0 (/ 2.477055391151669d9 -1.3522358047779648d-11) EQL-OK: -1.8318220700851785d20 (/ 1.1318646612469008d9 -8.457695758685169d-11) EQL-OK: -1.3382659929385544d19 (/ -7.978772126259147d9 6.210468872769038d-11) EQL-OK: -1.2847294286013678d20 (/ -9.057338243339752d9 7.364415429198257d-11) EQL-OK: -1.2298787772658011d20 (/ -5.341117220720213d9 4.7359651161519756d-11) EQL-OK: -1.1277779902779204d20 (/ 5.838003830912871d9 -5.0625478501901024d-11) EQL-OK: -1.153175042225754d20 (/ 6.407156672927742d9 5.006339136594536d19) EQL-OK: 1.279808758079079d-10 (/ 4.687485139826675d8 -3.5561755068968083d19) EQL-OK: -1.3181253655045475d-11 (/ -5.838044723576891d9 -6.843985743599882d19) EQL-OK: 8.530182473036721d-11 (/ 3.9279221543350096d9 -5.882918042982924d19) EQL-OK: -6.67682623765291d-11 (/ -9.686323716926361d9 -3.44800215666902d19) EQL-OK: 2.8092568614527606d-10 (/ 7.301304808910639d9 1.2845297359643038d19) EQL-OK: 5.684029419085038d-10 (/ 4.380345662298534d9 -4.352751895415198d-21) EQL-OK: -1.0063393842668593d30 (/ 8.239490918139045d9 3.2397577733346748d-21) EQL-OK: 2.5432428886984834d30 (/ 3.8980499504872713d9 8.311650110069505d-21) EQL-OK: 4.689862901910189d29 (/ -9.425472285331268d9 -3.294031046828316d-21) EQL-OK: 2.861379310436876d30 (/ 2.517833161624173d9 3.6891560299469316d-21) EQL-OK: 6.824957093669991d29 (/ -5.463519676339016d9 -7.298583081866205d-22) EQL-OK: 7.485726496576409d30 (/ 1.39357009199772d-11 0.417842407627649d0) EQL-OK: 3.335157146709649d-11 (/ 8.58494900746665d-11 -0.6481371063028898d0) EQL-OK: -1.3245575548724563d-10 (/ -9.310282234439046d-11 0.9146343299129254d0) EQL-OK: -1.0179239866631073d-10 (/ -8.800556770159418d-11 -0.9305573406536135d0) EQL-OK: 9.45729659601417d-11 (/ -1.3361456473382827d-11 0.06420301636905124d0) EQL-OK: -2.081125970247039d-10 (/ 6.1406425153971765d-12 -0.3082496074575478d0) EQL-OK: -1.992100676476244d-11 (/ -3.6962256202372035d-11 3.089420488573177d9) EQL-OK: -1.1964139015418631d-20 (/ -6.145126590884831d-11 -6.225608984106817d9) EQL-OK: 9.870723661849874d-21 (/ 9.052281678541901d-11 -6.9187138778508625d9) EQL-OK: -1.3083763598782874d-20 (/ -3.4950245360118636d-11 7.543342567738434d9) EQL-OK: -4.633257080169575d-21 (/ -3.482822570743636d-11 -3.87599225187502d9) EQL-OK: 8.985628309909062d-21 (/ -9.42226868788213d-11 7.501937454180854d9) EQL-OK: -1.2559780383974101d-20 (/ -4.8165035309367155d-11 9.484620130429997d-11) EQL-OK: -0.5078225026096383d0 (/ 6.880022773725747d-11 -9.699156104509544d-11) EQL-OK: -0.7093424107822056d0 (/ 1.5817962388036865d-11 -7.11651152335492d-11) EQL-OK: -0.22227129593095693d0 (/ -7.0140750853949335d-12 -4.4677941652531186d-11) EQL-OK: 0.15699190307254357d0 (/ -2.6947489262085355d-11 8.365454450205894d-11) EQL-OK: -0.3221282169723859d0 (/ 8.703167674410303d-11 -4.88739813223768d-11) EQL-OK: -1.7807363834354917d0 (/ 1.165112061543483d-12 -5.899528740399518d19) EQL-OK: -1.9749239520860124d-32 (/ 7.126386981630328d-12 5.091741402945837d19) EQL-OK: 1.3995971942933598d-31 (/ -7.132349854872655d-13 7.70347159367981d19) EQL-OK: -9.258617712985763d-33 (/ 4.507266517270466d-11 -1.6192737232544485d19) EQL-OK: -2.7835111831566513d-30 (/ -3.025128309814261d-11 -5.606736896306867d19) EQL-OK: 5.395523930874836d-31 (/ -5.390258677516223d-11 6.628750121976767d18) EQL-OK: -8.131636550373976d-30 (/ -8.484515181627938d-11 6.226893371743352d-21) EQL-OK: -1.3625598954575508d10 (/ 5.110456708789676d-11 -7.434814854731122d-21) EQL-OK: -6.873683889434922d9 (/ -7.784815533665352d-11 -8.942884975553875d-21) EQL-OK: 8.705038200698988d9 (/ 6.06871371776654d-11 -8.4720755768444d-21) EQL-OK: -7.163195916657484d9 (/ 6.395725883763629d-11 3.2465500186809204d-21) EQL-OK: 1.970006883295217d10 (/ 8.23766365482318d-11 3.5665958051648335d-21) EQL-OK: 2.3096712116618633d10 (/ -6.882125490660233d19 0.680553203393516d0) EQL-OK: -1.0112545876418106d20 (/ -8.955858402134752d19 0.11144092291315044d0) EQL-OK: -8.03641801236189d20 (/ 4.517225460957592d19 -0.5804969398143229d0) EQL-OK: -7.781652496570381d19 (/ -9.741926397385082d19 -0.9037000739789977d0) EQL-OK: 1.0780043819728059d20 (/ 9.654390326446178d19 -0.061963385089831124d0) EQL-OK: -1.558079874501655d21 (/ 9.50855454738802d19 0.30375471599023185d0) EQL-OK: 3.130339727036138d20 (/ 4.323538184184934d19 -2.6027608151521606d9) EQL-OK: -1.661135421670383d10 (/ 4.0554081767557594d17 4.814123702784068d9) EQL-OK: 8.423979995384136d7 (/ 5.12727309625028d19 1.761988796449604d9) EQL-OK: 2.9099351293162037d10 (/ -7.335661993746345d19 -4.961351435504d9) EQL-OK: 1.4785612527368061d10 (/ 3.7135994768593306d18 3.273427798269768d8) EQL-OK: 1.1344681189614824d10 (/ 1.3911083524706402d19 8.651242909451927d9) EQL-OK: 1.6079866985942366d9 (/ 6.473382688386894d19 -3.700509647679497d-11) EQL-OK: -1.7493219325738552d30 (/ 7.25328632809461d19 6.793518758100849d-11) EQL-OK: 1.0676773828651782d30 (/ 7.053090091571119d19 8.009021819073383d-11) EQL-OK: 8.806431360661643d29 (/ -1.6322872380348074d19 -1.234889420758779d-11) EQL-OK: 1.3218084231637898d30 (/ -7.716951191497702d19 -2.473367210466666d-11) EQL-OK: 3.12001839388891d30 (/ -2.1174708383466066d19 -9.66632270128099d-11) EQL-OK: 2.1905650202077337d29 (/ 4.0902039392392786d18 -5.029423690873208d19) EQL-OK: -0.08132549951322827d0 (/ 1.4562115759233494d17 4.2665150414889705d19) EQL-OK: 0.0034131171735308037d0 (/ -3.309692589578652d19 1.1329455009949342d19) EQL-OK: -2.9213166799922274d0 (/ 3.059130103268258d19 -7.719433592654628d19) EQL-OK: -0.3962894513632647d0 (/ 5.622979366632147d19 -8.407251901594788d19) EQL-OK: -0.6688248945610293d0 (/ -7.457587910839625d18 1.102755747735572d19) EQL-OK: -0.6762683328700153d0 (/ 1.2026615920578564d19 -3.77964792582931d-21) EQL-OK: -3.1819407935832407d39 (/ -2.74643694419756d19 2.538907641816601d-22) EQL-OK: -1.0817396028760112d41 (/ 8.267361397156658d18 -4.986401395715489d-21) EQL-OK: -1.6579815263689556d39 (/ 9.876393891158812d19 -5.792612775193684d-22) EQL-OK: -1.7049981199250076d41 (/ 3.927461252713038d17 4.810589424292295d-21) EQL-OK: 8.164199656866003d37 (/ 7.29943837795987d19 -4.8820727437034755d-21) EQL-OK: -1.4951514983823475d40 (/ -7.837850970911807d-21 0.41514160181315674d0) EQL-OK: -1.8879945870708947d-20 (/ 1.1499234744049124d-21 0.4643166529612681d0) EQL-OK: 2.4765932194571437d-21 (/ -1.094368243984769d-21 0.9008053219044149d0) EQL-OK: -1.2148776404552516d-21 (/ 2.4821206327531197d-21 0.22988631081892086d0) EQL-OK: 1.0797165885654937d-20 (/ -4.56226662576732d-22 0.6695285124602162d0) EQL-OK: -6.814148375851899d-22 (/ 6.442796853653397d-21 -0.0419134640377401d0) EQL-OK: -1.5371663978553802d-19 (/ -5.584403218169678d-21 -8.092869169805251d9) EQL-OK: 6.9003997235062955d-31 (/ -9.796722996869492d-21 -3.2988270899833827d9) EQL-OK: 2.9697594719700335d-30 (/ 9.441829923771915d-22 5.464575083746736d9) EQL-OK: 1.7278250877830762d-31 (/ -6.419360319610147d-21 -7.333962810289677d9) EQL-OK: 8.752921831841952d-31 (/ 7.973734412555454d-21 -9.367577614661436d9) EQL-OK: -8.512055880994846d-31 (/ 8.105484193881594d-21 -8.664550975192905d9) EQL-OK: -9.354765431108951d-31 (/ -5.3151708182942476d-21 -3.406928289732576d-11) EQL-OK: 1.560106455516696d-10 (/ -7.026602845639829d-21 -9.92483846943868d-11) EQL-OK: 7.079815824989677d-11 (/ -5.901970468193158d-21 2.074489043942647d-11) EQL-OK: -2.8450236868815825d-10 (/ -6.40466723844613d-21 -2.551008177490094d-11) EQL-OK: 2.510641594550906d-10 (/ 8.056066940872177d-21 4.645883100460603d-11) EQL-OK: 1.7340227394170724d-10 (/ 7.453765056481805d-21 6.956136187014756d-11) EQL-OK: 1.0715381148511711d-10 (/ 7.357434693258832d-21 -7.093525088486332d19) EQL-OK: -1.0372042956753416d-40 (/ -3.3759558579798473d-21 9.991075630444324d19) EQL-OK: -3.3789713769084054d-41 (/ 6.908026973557955d-21 -4.20805893397862d19) EQL-OK: -1.6416183998227845d-40 (/ 5.181767322756247d-21 7.46986056263721d19) EQL-OK: 6.936899664063931d-41 (/ -5.7217313601659264d-21 5.604979023134118d19) EQL-OK: -1.0208301113260054d-40 (/ -9.340193892824771d-21 9.147101848766205d19) EQL-OK: -1.021109641857176d-40 (/ 8.331002176099931d-21 2.0276444314093977d-21) EQL-OK: 4.108709617449606d0 (/ -3.747505523684784d-21 4.394623185543803d-21) EQL-OK: -0.8527478615259381d0 (/ -3.310403953328861d-21 2.3420390876737627d-21) EQL-OK: -1.413470838617356d0 (/ 6.23845405853013d-21 -8.933620117412232d-21) EQL-OK: -0.6983119918397873d0 (/ -4.276770609150315d-21 6.853299965034864d-21) EQL-OK: -0.624045442483205d0 (/ -8.847946637724495d-21 6.33827952828724d-21) EQL-OK: -1.3959539963860554d0 (+ 0.31465012912061093874L0 -0.07221963987249409544L0) EQL-OK: 0.2424304892481168433L0 (+ 0.7168586654865411176L0 -0.19348808923554474066L0) EQL-OK: 0.52337057625099637695L0 (+ -0.64115701400120904706L0 0.70535558267169594756L0) EQL-OK: 0.0641985686704869005L0 (+ -0.8607621650923123159L0 0.8368256394262067108L0) EQL-OK: -0.023936525666105605082L0 (+ 0.44168990042410450855L0 -0.6041911435521196045L0) EQL-OK: -0.16250124312801509594L0 (+ 0.0234267775301613878L0 -0.43594485933986284478L0) EQL-OK: -0.41251808180970145698L0 (+ -0.99559578594307881024L0 -9.836107054378142702L9) EQL-OK: -9.836107055373738488L9 (+ -0.72423071295455899397L0 9.238843039595790172L9) EQL-OK: 9.238843038871559459L9 (+ -0.20719390117857393156L0 -9.029224604657100362L9) EQL-OK: -9.029224604864294263L9 (+ 0.20816015380514039224L0 -7.4782571284307568003L9) EQL-OK: -7.4782571282225966468L9 (+ -0.16613875159201114463L0 -1.203554507952656804L9) EQL-OK: -1.2035545081187955556L9 (+ -0.9837368636729942673L0 7.5892747601936916704L9) EQL-OK: 7.5892747592099548066L9 (+ -0.92391870362276300936L0 -5.309205414965326826L-11) EQL-OK: -0.9239187036758550635L0 (+ -0.2308075581152660786L0 -2.5400598439608570973L-11) EQL-OK: -0.23080755814066667704L0 (+ 0.5668336039528930528L0 1.9300606943253841182L-12) EQL-OK: 0.56683360395482311353L0 (+ -0.19685144163870526662L0 -8.548847281762266571L-11) EQL-OK: -0.19685144172419373944L0 (+ 0.053837363417219887007L0 -8.4734948552444605444L-11) EQL-OK: 0.053837363332484938454L0 (+ 0.24539562474220232599L0 -1.3753029433519360674L-11) EQL-OK: 0.24539562472844929655L0 (+ -0.83198492765474177585L0 -1.0728971972413839207L19) EQL-OK: -1.0728971972413839208L19 (+ 0.58494670591273850794L0 -2.6078285749436068966L19) EQL-OK: -2.6078285749436068966L19 (+ -0.6489422625947265175L0 5.675479528094312524L19) EQL-OK: 5.675479528094312524L19 (+ 0.82416783003308421654L0 3.4337105673864461624L19) EQL-OK: 3.4337105673864461624L19 (+ 0.5977825969561704576L0 9.447212597358366985L19) EQL-OK: 9.447212597358366985L19 (+ 0.81709616259702447027L0 1.8840697606071622024L19) EQL-OK: 1.8840697606071622024L19 (+ 0.99140689029640294337L0 -7.9441986163714183364L-21) EQL-OK: 0.99140689029640294337L0 (+ 0.49487318874207713882L0 -2.377409962381832069L-21) EQL-OK: 0.49487318874207713882L0 (+ 0.050320977002567080524L0 -1.3329877923173878127L-21) EQL-OK: 0.050320977002567080524L0 (+ -0.25724170819862546218L0 7.609825486664252559L-22) EQL-OK: -0.25724170819862546218L0 (+ 0.3667308347763138993L0 4.077152141636570548L-21) EQL-OK: 0.3667308347763138993L0 (+ 0.5130660492586603372L0 -5.091230019243679202L-21) EQL-OK: 0.5130660492586603372L0 (+ 8.916053557053472733L8 0.59999700846599703845L0) EQL-OK: 8.916053563053442818L8 (+ 1.250980635471676891L9 -0.46325398810664378442L0) EQL-OK: 1.2509806350084229029L9 (+ -5.548594356609427516L9 -0.21577258386321002115L0) EQL-OK: -5.5485943568252001L9 (+ 1.06508055885340104636L9 0.8422978396429581549L0) EQL-OK: 1.065080559695698886L9 (+ 6.225756677310580186L9 0.49531151031004978726L0) EQL-OK: 6.2257566778058916964L9 (+ -2.273191688409860673L9 -0.80983784631745405196L0) EQL-OK: -2.2731916892196985192L9 (+ 5.688674258485728496L8 8.2409948814224157357L9) EQL-OK: 8.809862307270988585L9 (+ -2.7544302700606018156L9 9.230174236450698873L9) EQL-OK: 6.4757439663900970574L9 (+ -4.588747139238971857L9 6.342892129519977196L9) EQL-OK: 1.7541449902810053392L9 (+ 1.5275587581475159762L9 4.3720035959575018324L9) EQL-OK: 5.8995623541050178087L9 (+ 2.8881760807020099163L9 7.5622154923755766074L9) EQL-OK: 1.0450391573077586524L10 (+ 6.1044519092512786468L9 1.3858854402983849103L9) EQL-OK: 7.490337349549663557L9 (+ 4.8767035174458515886L9 6.3051681974292703475L-11) EQL-OK: 4.8767035174458515886L9 (+ -9.4188975960705796466L8 -8.975187577611984141L-12) EQL-OK: -9.4188975960705796466L8 (+ -9.689819354179956828L9 -9.7453604450079548966L-11) EQL-OK: -9.689819354179956828L9 (+ 4.987209054002559248L9 9.284991248759031191L-11) EQL-OK: 4.987209054002559248L9 (+ -3.5572071813296941216L9 -6.261737879308894803L-11) EQL-OK: -3.5572071813296941216L9 (+ -7.5872628366112743053L9 2.2152240842834943001L-11) EQL-OK: -7.5872628366112743053L9 (+ 7.0206128338340270845L9 5.9246012493594508704L19) EQL-OK: 5.9246012500615121536L19 (+ 5.3017367315254228474L9 -1.0933628665004153848L19) EQL-OK: -1.0933628659702417116L19 (+ -6.339538144593375358L9 -8.0543624921112893224L19) EQL-OK: -8.054362492745243137L19 (+ -1.6010717980362600647L9 9.973849926670833376L19) EQL-OK: 9.973849926510726196L19 (+ 3.2030522063397198562L9 -2.4396867565423101768L19) EQL-OK: -2.4396867562220049562L19 (+ 8.8622195973163761245L9 -6.4961266512803550736L19) EQL-OK: -6.496126650394133114L19 (+ 5.45529926142043848L9 6.939479435912862762L-21) EQL-OK: 5.45529926142043848L9 (+ -4.484627189114150671L9 -1.6571134694524616111L-21) EQL-OK: -4.484627189114150671L9 (+ 8.813820141949620774L9 -2.8267147580155665537L-21) EQL-OK: 8.813820141949620774L9 (+ -9.972890003927356798L9 -3.0273462676816521264L-21) EQL-OK: -9.972890003927356798L9 (+ 6.792889851253184185L9 -5.937539083879130763L-21) EQL-OK: 6.792889851253184185L9 (+ -3.2663407400779399923L9 -4.0747082067253115984L-21) EQL-OK: -3.2663407400779399923L9 (+ -3.4242541190221825202L-11 -0.71988400153646663195L0) EQL-OK: -0.71988400157070917316L0 (+ -7.8906347145510431055L-11 -0.22021321631029436988L0) EQL-OK: -0.22021321638920071702L0 (+ -7.486719858997914782L-11 0.38102237422222776873L0) EQL-OK: 0.38102237414736057013L0 (+ -2.6956794925506179954L-12 -0.49627581161649902356L0) EQL-OK: -0.49627581161919470304L0 (+ -8.312064814531952837L-11 0.5797009072836515581L0) EQL-OK: 0.57970090720053090995L0 (+ -4.0305959593285763394L-11 0.16233584979062195143L0) EQL-OK: 0.16233584975031599183L0 (+ 3.731977491280278192L-11 3.0305998235716452734L9) EQL-OK: 3.0305998235716452734L9 (+ 2.7847304030282320388L-11 -6.146190065628934066L9) EQL-OK: -6.146190065628934066L9 (+ -1.1797664511795163538L-11 1.4888590774768513251L9) EQL-OK: 1.4888590774768513251L9 (+ -3.736849276790130025L-11 1.9988395869145483342L9) EQL-OK: 1.9988395869145483342L9 (+ 5.7818526942690563386L-12 3.5155514714363584847L9) EQL-OK: 3.5155514714363584847L9 (+ 1.8183862272066184134L-11 -4.635399960322760982L9) EQL-OK: -4.635399960322760982L9 (+ 3.5539523819420841283L-11 4.3044646394847154864L-11) EQL-OK: 7.858417021426799615L-11 (+ 8.719537619908441472L-11 -8.580989797275158101L-11) EQL-OK: 1.3854782263328337111L-12 (+ 2.49701168436805957L-12 -2.6066406246366064513L-11) EQL-OK: -2.3569394561998004944L-11 (+ 4.2774640500882048993L-11 3.7620100241760410496L-11) EQL-OK: 8.039474074264245949L-11 (+ 3.9907211434460210612L-11 9.72066373418363098L-11) EQL-OK: 1.3711384877629652041L-10 (+ -7.851637932849992129L-11 4.9296626910685147652L-11) EQL-OK: -2.9219752417814773637L-11 (+ 3.14874349918113769L-11 -1.8148353890339025639L19) EQL-OK: -1.8148353890339025639L19 (+ -8.444922682942673745L-11 -5.0034364072191331772L19) EQL-OK: -5.0034364072191331772L19 (+ 4.762299619586316462L-12 -1.3412404578328588061L19) EQL-OK: -1.3412404578328588061L19 (+ -9.22833351501850052L-12 3.1000370791158631634L19) EQL-OK: 3.1000370791158631634L19 (+ 6.1164399913981911425L-11 6.1863455383782109436L19) EQL-OK: 6.1863455383782109436L19 (+ -8.413645565754525347L-11 -2.5034082588556447364L19) EQL-OK: -2.5034082588556447364L19 (+ 3.4875247204061292656L-11 -7.8682893445087250245L-21) EQL-OK: 3.487524719619300331L-11 (+ -2.1647610944488691768L-11 -8.371089558230910183L-21) EQL-OK: -2.1647610952859781326L-11 (+ 5.7598234760228848032L-11 2.8011007358408259187L-21) EQL-OK: 5.7598234763029948767L-11 (+ -9.268425959344303144L-11 -6.4655012698265179856L-21) EQL-OK: -9.2684259599908532713L-11 (+ 7.067467072298381137L-11 -3.8206328350148818058L-21) EQL-OK: 7.0674670719163178536L-11 (+ 7.8912028748606542386L-11 8.456364925917236866L-21) EQL-OK: 7.891202875706290731L-11 (+ -6.976183652817340798L18 0.08822040416435015717L0) EQL-OK: -6.976183652817340798L18 (+ -1.2414457404200743984L19 -0.85791705029429396234L0) EQL-OK: -1.2414457404200743985L19 (+ -8.9687515173878579424L19 -0.3328210335620137057L0) EQL-OK: -8.9687515173878579424L19 (+ -5.438581645592863998L19 -0.67774278184358142436L0) EQL-OK: -5.438581645592863998L19 (+ -5.4350840695201649084L19 -0.72739900682842943577L0) EQL-OK: -5.4350840695201649084L19 (+ 7.814697448090367615L19 0.24326892882624165414L0) EQL-OK: 7.814697448090367615L19 (+ -2.4356768540932142124L19 6.5169042447583127604L9) EQL-OK: -2.435676853441523788L19 (+ -8.7464253032141704904L19 6.8315507162032823036L9) EQL-OK: -8.7464253025310154184L19 (+ -2.4810334273518910993L18 -7.638114077520272164L9) EQL-OK: -2.4810334349900051768L18 (+ -9.80334620432051716L19 4.474822777555302305L9) EQL-OK: -9.8033462038730348824L19 (+ -1.5185085475715921137L19 8.496315073274781452L9) EQL-OK: -1.5185085467219606064L19 (+ -9.3842548893937585184L19 -9.948865349103608366L9) EQL-OK: -9.3842548903886450536L19 (+ 5.939125398081864389L19 5.6213951287112563564L-11) EQL-OK: 5.939125398081864389L19 (+ -4.8270749631022207188L19 6.506986668488438766L-11) EQL-OK: -4.8270749631022207188L19 (+ 8.953940231252599753L19 -1.7735448342981541823L-11) EQL-OK: 8.953940231252599753L19 (+ -6.1065165153181616235L18 -1.8103764902203059955L-11) EQL-OK: -6.1065165153181616235L18 (+ -9.622495547727516122L19 9.4659333494557267205L-11) EQL-OK: -9.622495547727516122L19 (+ -9.2620034246522033504L19 -8.920063409062509698L-11) EQL-OK: -9.2620034246522033504L19 (+ 5.9633456897700879935L18 4.0390945943970882336L19) EQL-OK: 4.635429163374097033L19 (+ -6.1420542659063065884L19 -3.9869088703267959336L19) EQL-OK: -1.0128963136233102522L20 (+ 7.804124970286546613L19 8.061318173712112305L19) EQL-OK: 1.5865443143998658918L20 (+ -7.763817772329800516L19 -4.9349702057713961232L19) EQL-OK: -1.2698787978101196639L20 (+ -3.1480955091040648274L19 -4.706529024129812914L19) EQL-OK: -7.8546245332338777416L19 (+ -4.7131343507844737428L19 5.4602299451983202032L19) EQL-OK: 7.470955944138464604L18 (+ 5.9403761194093478956L19 -6.280541343011718101L-21) EQL-OK: 5.9403761194093478956L19 (+ -3.763295388652278206L19 -9.963494853851408371L-21) EQL-OK: -3.763295388652278206L19 (+ 2.5136958358030666948L19 5.335607709622335287L-21) EQL-OK: 2.5136958358030666948L19 (+ 6.2273952762016960176L19 -5.6012630121574213906L-21) EQL-OK: 6.2273952762016960176L19 (+ -9.3934610912833028936L19 -2.59552531586503232L-21) EQL-OK: -9.3934610912833028936L19 (+ 2.9584554660239488776L19 6.875837450751388893L-21) EQL-OK: 2.9584554660239488776L19 (+ -8.4905558825256936576L-21 0.112912972443893420624L0) EQL-OK: 0.11291297244389342062L0 (+ -5.3259362300699140443L-21 0.44064771529278198132L0) EQL-OK: 0.44064771529278198132L0 (+ -9.245572241572266517L-21 0.043497459079983070442L0) EQL-OK: 0.043497459079983070432L0 (+ 7.6311333407948593004L-22 0.74437178299084331024L0) EQL-OK: 0.74437178299084331024L0 (+ -7.71114100404407176L-21 -0.30667849853816871164L0) EQL-OK: -0.30667849853816871164L0 (+ 3.544120177696956032L-21 0.79322122717232419205L0) EQL-OK: 0.79322122717232419205L0 (+ 7.7913861181291523115L-21 8.526554352243632931L9) EQL-OK: 8.526554352243632931L9 (+ -3.9196632415032070805L-21 -2.5228304289307799614L9) EQL-OK: -2.5228304289307799614L9 (+ 7.643174046933518012L-22 2.9248526891356128762L9) EQL-OK: 2.9248526891356128762L9 (+ 1.8801815336593227227L-21 6.8178694125314363L9) EQL-OK: 6.8178694125314363L9 (+ -2.6985037225367287349L-21 -4.5571976978858014136L9) EQL-OK: -4.5571976978858014136L9 (+ 6.0444611510506986126L-21 -8.64585025875790907L9) EQL-OK: -8.64585025875790907L9 (+ -1.250177749198396931L-21 6.428634063301101147L-11) EQL-OK: 6.428634063176083372L-11 (+ -1.5666058964343815161L-21 3.552568414787808555L-11) EQL-OK: 3.5525684146311479653L-11 (+ -5.8078119773790503857L-21 8.896395897015492877L-12) EQL-OK: 8.8963958912076809L-12 (+ 6.7472260162031965506L-21 -6.617115409846031908L-11) EQL-OK: -6.617115409171309306L-11 (+ -4.16121984125470857L-21 -3.095053467302410671L-11) EQL-OK: -3.095053467718532655L-11 (+ -2.114411383443366621L-21 9.716046816037651671L-11) EQL-OK: 9.716046815826210533L-11 (+ -2.3406730990296292957L-21 7.900725768498098123L18) EQL-OK: 7.900725768498098123L18 (+ -4.1514248667302411754L-21 -8.4325334951006246184L19) EQL-OK: -8.4325334951006246184L19 (+ 8.433933541545648577L-21 -4.9459088765496691632L19) EQL-OK: -4.9459088765496691632L19 (+ 2.2922577085250648752L-21 7.813245819908182463L19) EQL-OK: 7.813245819908182463L19 (+ 8.887270525300553388L-21 8.651116139112459977L19) EQL-OK: 8.651116139112459977L19 (+ 1.1406539199130032192L-21 2.3931812472136783544L19) EQL-OK: 2.3931812472136783544L19 (+ -3.778523001798117503L-21 2.0779948578933832532L-22) EQL-OK: -3.5707235160087791776L-21 (+ -1.6066062689688361383L-21 -3.5232009896946632975L-21) EQL-OK: -5.1298072586634994358L-21 (+ 3.9703618511174300454L-21 -8.036088455194107478L-21) EQL-OK: -4.0657266040766774324L-21 (+ 6.46657477279861825L-21 2.6384883907642781157L-21) EQL-OK: 9.105063163562896366L-21 (+ 4.9706631077050274314L-21 2.3628052244020145395L-21) EQL-OK: 7.333468332107041971L-21 (+ 7.065951142271372955L-21 3.1965272324939519L-21) EQL-OK: 1.02624783747653248544L-20 (- 0.3211111183819802968L0 -0.7024866236309383056L0) EQL-OK: 1.0235977420129186024L0 (- -0.29770116676264721836L0 0.8494818768850108081L0) EQL-OK: -1.1471830436476580264L0 (- -0.7677860965279355367L0 0.9474539728585997539L0) EQL-OK: -1.7152400693865352905L0 (- -0.25414380069764370257L0 0.82619594943351718565L0) EQL-OK: -1.0803397501311608883L0 (- 0.21685951051311267031L0 0.13084151170902027524L0) EQL-OK: 0.08601799880409239507L0 (- -0.6658362643286463323L0 -0.101768362258000388376L0) EQL-OK: -0.56406790207064594393L0 (- -0.8594165074009265017L0 3.58724520062188585L9) EQL-OK: -3.5872452014813023575L9 (- -0.58779846333918551446L0 -2.8410824560251060135L9) EQL-OK: 2.84108245543730755L9 (- 0.37819983918255152712L0 1.75837003745458279L9) EQL-OK: -1.7583700370763829509L9 (- -0.19345242719447268632L0 -8.900743696911070234L9) EQL-OK: 8.900743696717617807L9 (- 0.9170636757513836193L0 -5.181144559509726756L9) EQL-OK: 5.1811445604267904316L9 (- 0.20643137049004858552L0 3.3215544303850617772L9) EQL-OK: -3.3215544301786304067L9 (- -0.4014437452394343757L0 4.7898418688154180505L-11) EQL-OK: -0.40144374528733279438L0 (- 0.0725076594551243524L0 -3.5321788599004111594L-11) EQL-OK: 0.072507659490446140996L0 (- -0.65551702819898271043L0 3.1653130032883009534L-11) EQL-OK: -0.6555170282306358405L0 (- 0.9237105409310637695L0 -8.9028024814928743296L-11) EQL-OK: 0.9237105410200917943L0 (- 0.8779771368966066218L0 7.399233988536237696L-12) EQL-OK: 0.8779771368892073878L0 (- 0.51385216558296334914L0 -3.3989256599054576304L-11) EQL-OK: 0.51385216561695260575L0 (- 0.74939199427992763254L0 -6.6998781480191798724L19) EQL-OK: 6.6998781480191798724L19 (- 0.8073774220299670944L0 2.0433771569275457978L18) EQL-OK: -2.043377156927545797L18 (- -0.75286822781531276375L0 -7.7011647701976081504L19) EQL-OK: 7.7011647701976081504L19 (- -0.6361916050116532222L0 1.2717052281488651182L19) EQL-OK: -1.2717052281488651183L19 (- 0.08977643006115956575L0 1.2624046205072289204L19) EQL-OK: -1.2624046205072289204L19 (- -0.4220171145412169327L0 8.9155115345908061576L19) EQL-OK: -8.9155115345908061576L19 (- 0.397772867452284942L0 5.7785851646148710778L-21) EQL-OK: 0.397772867452284942L0 (- -0.53062845978690011166L0 -3.648685738612220277L-21) EQL-OK: -0.53062845978690011166L0 (- 0.25409096540159836552L0 -7.8088660109317384514L-21) EQL-OK: 0.25409096540159836552L0 (- 0.78038095936361252965L0 5.166705522400390383L-21) EQL-OK: 0.78038095936361252965L0 (- 0.2384997171475220939L0 9.580584601627251829L-21) EQL-OK: 0.23849971714752209389L0 (- 0.38777493167494073L0 -7.930455614605653916L-22) EQL-OK: 0.38777493167494073L0 (- 9.34906594120583919L8 -0.06276538462885111519L0) EQL-OK: 9.349065941833493036L8 (- 3.8000098261497040978L9 0.08156195452126583918L0) EQL-OK: 3.8000098260681421433L9 (- -8.5084000619874580647L9 -0.49084164337509169664L0) EQL-OK: -8.5084000614966164213L9 (- -9.367354572017391158L9 0.7369625068937909906L0) EQL-OK: -9.367354572754353665L9 (- 6.810025547716964613L9 -0.65456201729278556224L0) EQL-OK: 6.8100255483715266306L9 (- -2.0476539871173359762L9 -0.61684944260168028793L0) EQL-OK: -2.0476539865004865336L9 (- 7.927587886187347037L9 -9.075678068210342653L9) EQL-OK: 1.700326595439768969L10 (- 8.3881162961959078424L9 -8.168276983460029623L9) EQL-OK: 1.6556393279655937465L10 (- -9.837108887605194379L9 -5.518197215327419734L9) EQL-OK: -4.3189116722777746445L9 (- 6.0530403690423784372L9 -4.794777582812792957L9) EQL-OK: 1.0847817951855171394L10 (- -7.6786817362598780694L8 3.0685743382723052597L9) EQL-OK: -3.8364425118982930668L9 (- -1.035869943077157163L9 6.964469962306024778L8) EQL-OK: -1.7323169393077596407L9 (- -5.236689202734255992L9 -3.2118444581504684365L-12) EQL-OK: -5.236689202734255992L9 (- -5.374622629137047618L9 6.0449117144963868685L-11) EQL-OK: -5.374622629137047618L9 (- -1.03444332932187716727L9 -7.849504746710041045L-11) EQL-OK: -1.0344433293218771672L9 (- 5.1103879354813158946L8 6.53093826849017485L-11) EQL-OK: 5.110387935481315894L8 (- -9.748335199611953219L9 -1.0598402609119659922L-11) EQL-OK: -9.748335199611953219L9 (- -7.3482164921795502603L9 7.644598674874161005L-11) EQL-OK: -7.3482164921795502603L9 (- -7.4770248834652064083L8 -6.510822784079429222L19) EQL-OK: 6.5108227840046589732L19 (- 8.3114910321533068423L9 -6.2387352982669333472L19) EQL-OK: 6.2387352990980824504L19 (- -1.0718584220381511548L9 8.521462332927085385L19) EQL-OK: -8.521462333034271227L19 (- -1.9155322368803175137L8 1.3150623743950738752L19) EQL-OK: -1.3150623744142291976L19 (- 3.8652241507510457716L9 8.702412273358053775L19) EQL-OK: -8.70241227297153136L19 (- 2.922009617968977308L8 -8.409184530486676791L19) EQL-OK: 8.409184530515896887L19 (- -7.3431860804237713437L9 9.020687655591526829L-21) EQL-OK: -7.3431860804237713437L9 (- -1.1188563145822172016L9 -2.7575065881283248758L-21) EQL-OK: -1.1188563145822172016L9 (- 2.5835681218682880315L9 -3.786022710650191692L-21) EQL-OK: 2.5835681218682880315L9 (- 4.3854765424506375063L9 1.8847509423241615905L-21) EQL-OK: 4.3854765424506375063L9 (- -3.4713769831512517224L9 -2.322290027198980782L-21) EQL-OK: -3.4713769831512517224L9 (- 414355.71501652302632L0 3.5411352752491676944L-21) EQL-OK: 414355.71501652302632L0 (- 9.032857346451659148L-11 0.45111022909893884074L0) EQL-OK: -0.45111022900861026729L0 (- -6.5860623447077106086L-11 -0.16349916999618723413L0) EQL-OK: 0.16349916993032661068L0 (- -9.239429491581222244L-11 0.34742997377809253703L0) EQL-OK: -0.34742997387048683193L0 (- -1.3189202177704638207L-11 0.6447775025861344695L0) EQL-OK: -0.64477750259932367166L0 (- -8.6095719029859522596L-11 0.36611643318066821885L0) EQL-OK: -0.3661164332667639379L0 (- -7.9284738631391966236L-11 -0.28883099180012157807L0) EQL-OK: 0.28883099172083683944L0 (- -9.9602023259578447484L-11 8.944817052366967221L9) EQL-OK: -8.944817052366967221L9 (- -4.7036434158090755064L-11 -7.652311009876441256L9) EQL-OK: 7.652311009876441256L9 (- -7.237899450242616437L-11 -2.0865196011945540415L9) EQL-OK: 2.0865196011945540414L9 (- 1.619466049424876382L-11 5.1184733211578935236L9) EQL-OK: -5.1184733211578935236L9 (- 4.1799408897021043963L-11 7.3289378733409777703L9) EQL-OK: -7.3289378733409777703L9 (- -7.1652994078281664426L-11 -8.756819754593247181L9) EQL-OK: 8.756819754593247181L9 (- -3.7074082585707708083L-11 7.8185038704847907146L-11) EQL-OK: -1.1525912129055561523L-10 (- -6.236585731179139659L-11 7.2778046100364844843L-11) EQL-OK: -1.3514390341215624144L-10 (- 4.435573645212270856L-11 -5.0777570123416204425L-11) EQL-OK: 9.5133306575538912986L-11 (- -8.308776483243665939L-11 9.147453931535851365L-11) EQL-OK: -1.7456230414779517304L-10 (- 9.9047307392438733836L-11 -2.5521271062995892868L-11) EQL-OK: 1.245685784554346267L-10 (- 7.964304540045338675L-11 -8.2763721216842256806L-11) EQL-OK: 1.6240676661729564355L-10 (- 6.3981149909251410836L-11 -8.199461198383311753L19) EQL-OK: 8.199461198383311753L19 (- 3.2676777703423324814L-11 4.4068061681801047868L19) EQL-OK: -4.4068061681801047868L19 (- -6.239367423070186989L-11 3.6883672788938434168L19) EQL-OK: -3.6883672788938434168L19 (- -2.2122757699951901351L-11 2.1264312306673926188L19) EQL-OK: -2.1264312306673926188L19 (- 8.873182931301984606L-11 1.6930709481447417272L19) EQL-OK: -1.6930709481447417272L19 (- -6.88393272917067128L-11 9.590650870092490293L19) EQL-OK: -9.590650870092490293L19 (- 6.858643038376546876L-11 7.344128953107545512L-21) EQL-OK: 6.858643037642133981L-11 (- 2.6458055358368033053L-11 5.403788941414579396L-21) EQL-OK: 2.6458055352964244111L-11 (- -2.0808117056914325832L-11 -9.598437242399057154L-21) EQL-OK: -2.080811704731588859L-11 (- -6.7475294377176982065L-11 7.066634775850918749L-21) EQL-OK: -6.747529438424361684L-11 (- -9.3542684131795074026L-11 -2.671834604826394793L-22) EQL-OK: -9.354268413152789057L-11 (- -3.656675383727620855L-11 -5.7226858095399702763L-21) EQL-OK: -3.656675383155352274L-11 (- 4.4004114393746579576L19 0.9981645829158248139L0) EQL-OK: 4.4004114393746579576L19 (- -2.1157157847974045162L19 -0.73136590134089295135L0) EQL-OK: -2.1157157847974045162L19 (- -6.58288354566033103L19 0.6435204448077814454L0) EQL-OK: -6.58288354566033103L19 (- -6.1300052513232283715L18 0.37782114066015354996L0) EQL-OK: -6.130005251323228372L18 (- -8.342898746965037642L19 0.092302889297602909923L0) EQL-OK: -8.342898746965037642L19 (- 4.478146018721476673L18 -0.7594367116407568048L0) EQL-OK: 4.4781460187214766738L18 (- 3.9553793567888621644L19 7.272309486263127643L9) EQL-OK: 3.9553793560616312156L19 (- 8.4985452245750157485L18 -8.180191224624705388L9) EQL-OK: 8.498545232755206973L18 (- -4.9006940756698268444L19 5.635530637330344937L9) EQL-OK: -4.900694076233379908L19 (- 3.321094625885548145L19 7.739325488496469393L9) EQL-OK: 3.3210946251116155962L19 (- -4.094717236852398814L19 2.8833151826524522544L9) EQL-OK: -4.0947172371407303324L19 (- -7.297938416992967256L19 1.7849049534461509205L9) EQL-OK: -7.2979384171714577512L19 (- -1.6274534493365811085L19 -7.214220253590898893L-11) EQL-OK: -1.6274534493365811085L19 (- -8.8349360721401487896L19 4.4201546048906225832L-11) EQL-OK: -8.8349360721401487896L19 (- 2.1193875854469716176L19 5.4852102858193519493L-11) EQL-OK: 2.1193875854469716176L19 (- 5.8956188285652689564L19 5.2591781987716878005L-12) EQL-OK: 5.8956188285652689564L19 (- 3.8130742288947136824L19 -6.2032926048476626596L-11) EQL-OK: 3.8130742288947136824L19 (- -8.2648264381835919784L19 5.240041099543619651L-11) EQL-OK: -8.2648264381835919784L19 (- -8.979570297959484002L19 5.3071479395700422216L19) EQL-OK: -1.4286718237529526223L20 (- 7.4902067869555502376L19 8.527286348112666809L18) EQL-OK: 6.637478152144283557L19 (- -9.945686226441305483L19 -7.164943842935287866L19) EQL-OK: -2.7807423835060176172L19 (- -6.9451908461424534725L18 1.7337328244166615333L19) EQL-OK: -2.4282519090309068806L19 (- -7.2554820480127785552L19 -3.6345553532831870424L19) EQL-OK: -3.6209266947295915128L19 (- 4.80739562024854996L19 -9.8058600290712759904L19) EQL-OK: 1.46132556493198259504L20 (- -2.2910115296639597206L19 3.7450560231732721633L-21) EQL-OK: -2.2910115296639597206L19 (- 6.3398397438838205245L18 5.9452907771459291318L-21) EQL-OK: 6.3398397438838205245L18 (- -3.6223171453314706578L19 -7.3897558037422565484L-21) EQL-OK: -3.6223171453314706578L19 (- -5.253323265732561348L19 -2.4894382246759080012L-21) EQL-OK: -5.253323265732561348L19 (- 8.706482285826808214L18 -5.353671688426432468L-21) EQL-OK: 8.706482285826808214L18 (- 2.2257683364797036278L18 -8.640543721759613242L-21) EQL-OK: 2.2257683364797036278L18 (- 4.793610535063041737L-21 -0.46707949288138879385L0) EQL-OK: 0.46707949288138879385L0 (- -8.1177127707349576126L-22 -0.524723160625887566L0) EQL-OK: 0.524723160625887566L0 (- 4.3845050204409245572L-21 0.25137862247046227512L0) EQL-OK: -0.25137862247046227512L0 (- 9.521149905664397992L-21 -0.8412363166750659234L0) EQL-OK: 0.8412363166750659234L0 (- 9.174773471390805996L-21 -0.101196005202611894716L0) EQL-OK: 0.10119600520261189472L0 (- 7.109559498077443181L-21 0.9205539164614073537L0) EQL-OK: -0.9205539164614073537L0 (- 4.698785699006337068L-21 -2.1800327611972026394L9) EQL-OK: 2.1800327611972026394L9 (- 5.613624265510662971L-21 -9.950548243828975189L9) EQL-OK: 9.950548243828975189L9 (- 4.6909741937286841078L-21 -1.7837781830572891826L9) EQL-OK: 1.7837781830572891826L9 (- -4.846242463794952647L-21 -8.0162418694778434667L9) EQL-OK: 8.0162418694778434667L9 (- 2.40959428070040729L-21 -8.889381116534260471L9) EQL-OK: 8.889381116534260471L9 (- 3.767840665510686708L-21 -6.5742819327593306936L9) EQL-OK: 6.5742819327593306936L9 (- -4.2984578582437655097L-21 -7.11707524430297521L-11) EQL-OK: 7.117075243873129424L-11 (- -8.2197602823824843314L-21 5.6157517586290544195L-11) EQL-OK: -5.6157517594510304478L-11 (- 9.693403466151038911L-21 -2.4790192993953556532L-11) EQL-OK: 2.4790193003646959998L-11 (- -1.7473025967684817638L-21 -6.763791909706180161L-11) EQL-OK: 6.763791909531449901L-11 (- -4.545821853960128388L-21 -2.0149758755990572603L-11) EQL-OK: 2.0149758751444750749L-11 (- -6.727743751498960878L-21 4.6105155267302345166L-11) EQL-OK: -4.6105155274030088917L-11 (- 3.1693009676315354841L-21 -8.292132887357976433L19) EQL-OK: 8.292132887357976433L19 (- -1.5197222855116101305L-21 -6.8790212191073234628L19) EQL-OK: 6.8790212191073234628L19 (- 9.221684449614781083L-21 -5.9085200983462461748L19) EQL-OK: 5.9085200983462461748L19 (- 8.784720275148798145L-21 -3.507151222326700691L19) EQL-OK: 3.507151222326700691L19 (- 3.824100155304652155L-21 1.2903444775641864255L19) EQL-OK: -1.2903444775641864255L19 (- -1.0750770892330241413L-21 2.516785805333378789L19) EQL-OK: -2.516785805333378789L19 (- -9.607606672669937465L-21 2.8158700323501294737L-21) EQL-OK: -1.2423476705020066939L-20 (- 7.9685140548406097L-21 -1.4252185339263422407L-21) EQL-OK: 9.393732588766951941L-21 (- -3.1900732903251523987L-21 1.30212230775860485605L-21) EQL-OK: -4.4921955980837572548L-21 (- 2.845180721925488069L-21 9.0340678136597289194L-21) EQL-OK: -6.1888870917342408505L-21 (- -5.1500491616497403683L-21 -5.4818765813663490764L-21) EQL-OK: 3.3182741971660870814L-22 (- 5.3946808417918276896L-21 2.1630450195342998269L-21) EQL-OK: 3.2316358222575278627L-21 (* 0.49162375558276684976L0 -0.27595139770835290185L0) EQL-OK: -0.13566426249969417521L0 (* -0.43085705615141429406L0 0.76537655129782028376L0) EQL-OK: -0.32976788773950077688L0 (* -0.34725675573811781168L0 -0.44040731024013641718L0) EQL-OK: 0.15293441375734052306L0 (* -0.47158645084591665022L0 -0.5531952534025612003L0) EQL-OK: 0.26087938617692133303L0 (* -0.86377959068682791106L0 -0.8711108145957097161L0) EQL-OK: 0.7524477428743513754L0 (* 0.07688091831246728666L0 -0.727039245375017451L0) EQL-OK: -0.055895444833634576195L0 (* -0.65693719777446694155L0 -5.4929597366864347663L9) EQL-OK: 3.6085295769067602507L9 (* 0.9553509506606886749L0 2.7316499794256227606L9) EQL-OK: 2.609684404716519364L9 (* 0.86245066819702621825L0 -5.6471738746979076876L9) EQL-OK: -4.8704088816580000957L9 (* -0.0011095142242845852372L0 3.5868904614046262004L9) EQL-OK: -3979705.9878791318615L0 (* -0.07537979049336559763L0 8.268739091555253606L9) EQL-OK: -6.2329582036573719373L8 (* -0.67924101443000006024L0 -4.2094803212494913754L9) EQL-OK: 2.8592516836286270604L9 (* 0.30774277681107480866L0 -2.7334742019139702906L-11) EQL-OK: -8.412069412384417957L-12 (* -0.35713749207523871768L0 -6.5398928539622633783L-11) EQL-OK: 2.3356409323048581577L-11 (* -0.14801577485738927266L0 -9.963460779718656755L-11) EQL-OK: 1.474749367571264873L-11 (* 0.3104124542612814659L0 -2.9286317751062608258L-11) EQL-OK: -9.09083776938307737L-12 (* -0.11446530018625016218L0 6.4232974401995419684L-11) EQL-OK: -7.352446696780128213L-12 (* -0.96939447601348607505L0 4.1094462170225605183L-11) EQL-OK: -3.9836744622561876338L-11 (* 0.051486415762180288123L0 9.676829213398296352L19) EQL-OK: 4.9822525214063672425L18 (* 0.6313327973134614946L0 3.2653448877462378072L19) EQL-OK: 2.06151932217404323L19 (* -0.37403303660944479204L0 9.102796469067070187L19) EQL-OK: -3.4047466049628882508L19 (* 0.8707828063294901403L0 -5.5603708853312765524L19) EQL-OK: -4.8418753637615606188L19 (* -0.21026381134874289964L0 -8.2572592232280544185L18) EQL-OK: 1.7362027955704909688L18 (* -0.77817271482774886984L0 -5.862569134483721118L19) EQL-OK: 4.5620913392465632268L19 (* 0.10774233598980040668L0 8.42277329172514105L-21) EQL-OK: 9.074892699629673044L-22 (* 0.25190108887664378198L0 9.9261121984538427104L-21) EQL-OK: 2.5003984711022594346L-21 (* -0.6756036645959631085L0 9.531794528346356556L-21) EQL-OK: -6.4397153135265482465L-21 (* -0.6857203923976410447L0 -1.6874445000752253093L-21) EQL-OK: 1.1571151047408247225L-21 (* -0.44633489376857998266L0 2.2805928928283052886L-21) EQL-OK: -1.0179081865499001544L-21 (* 0.6194914893234261562L0 6.122106446320417613L-21) EQL-OK: 3.7925928402275834338L-21 (* 6.0914569120648219218L9 -0.13082334282848865785L0) EQL-OK: -7.969047559320230858L8 (* 3.6214037646489572409L9 -0.42724054260765242458L0) EQL-OK: -1.5472105094100157093L9 (* -2.3587970682548096273L9 0.30389573937962490564L0) EQL-OK: -7.168283791037869264L8 (* -1.2092840284272862272L9 -0.9464357317324953064L0) EQL-OK: 1.1445096143169982957L9 (* 9.742195251878672378L9 -0.8436238049826486367L0) EQL-OK: -8.2187478272737786206L9 (* -1.6670311480587791415L9 -0.7664626357070004785L0) EQL-OK: 1.277717087546798815L9 (* -9.63709082566058824L8 3.5038182805272664595L9) EQL-OK: -3.376661500605117691L18 (* -6.819958133674458717L9 5.570090504807835795L9) EQL-OK: -3.7987784043567071428L19 (* 5.7990616985027046753L9 5.7633314369957429715L9) EQL-OK: 3.3421914592058566914L19 (* -8.4466610113280742876L9 -8.965949996407538079L9) EQL-OK: 7.573234026417263962L19 (* -7.670563670654851578L9 -6.431751468798164421L9) EQL-OK: 4.9335159155244181172L19 (* 8.268803418474998627L9 -6.6310260568279516366L9) EQL-OK: -5.4830650926695757004L19 (* -9.461472353405244053L9 -3.3101188730107237675L-11) EQL-OK: 0.31318598203475886787L0 (* 6.8579221981166585744L9 -8.515361268298587097L-11) EQL-OK: -0.5839768506684770405L0 (* 1.6137913170162297342L9 -8.897666779537493419L-11) EQL-OK: -0.14358977390521366923L0 (* 8.022366744559274285L9 6.8759798363047156095L-11) EQL-OK: 0.5516163197503107306L0 (* 6.268637730252729325L8 3.8798987053952144677L-13) EQL-OK: 2.4321679414199160154L-4 (* 8.165455714479826517L9 -7.748491839935670887L-11) EQL-OK: -0.6326996697300302909L0 (* -9.245309913477613381L9 -2.7267702243723164598L19) EQL-OK: 2.5209835787164953515L29 (* 9.113617507957836761L9 -3.6781774780542862056L19) EQL-OK: -3.3521502661371744663L29 (* 3695599.756951605604L0 -4.4160607831464309996L19) EQL-OK: -1.6319993156879467502L26 (* -3.1080975558777002585L9 4.5635619314557275256L19) EQL-OK: -1.41839956852540638L29 (* 4.379846040113489209L9 -2.380244519018666713L19) EQL-OK: -1.0425104531125744157L29 (* 7.799437686108443071L9 -8.213835920178370665L19) EQL-OK: -6.40633014233504056L29 (* -5.0032293022496024175L9 3.9947928432298324106L-21) EQL-OK: -1.9986864609664499789L-11 (* 5.1002825856458055377L9 -8.630588067810955288L-21) EQL-OK: -4.4018438026138695895L-11 (* -1.4798783656292287931L9 -2.1821599778945012917L-21) EQL-OK: 3.2293313416280286032L-12 (* 6.2153176651245460436L9 -4.842239650508967686L-21) EQL-OK: -3.009605763857489489L-11 (* 1.1476929860538426329L9 8.143327858153323155L-21) EQL-OK: 9.34604026593943011L-12 (* -6.8097130569212408313L9 -4.5006072118169309446L-21) EQL-OK: 3.0647843694383655263L-11 (* -8.088711469864653681L-11 0.55856748494727835656L0) EQL-OK: -4.518091222186502735L-11 (* 4.4880121763658923538L-11 0.14537105272497022953L0) EQL-OK: 6.52427054720794526L-12 (* 2.0273639671422034382L-11 0.5267742506127895251L0) EQL-OK: 1.0679631345107062621L-11 (* -9.078881981481347403L-11 0.86040896737522678964L0) EQL-OK: -7.811551470607918988L-11 (* -7.2713602444015266416L-11 0.029963115152720655096L0) EQL-OK: -2.1787260431991794891L-12 (* 5.8587076221559354985L-11 0.39205420166003709617L0) EQL-OK: 2.2969309395639195554L-11 (* 9.465227148840012531L-12 -8.4020295562921954743L9) EQL-OK: -0.07952711826157309293L0 (* -9.156088652050785426L-11 -7.272635024207867507L9) EQL-OK: 0.66588891015656744834L0 (* 3.6865969618651574387L-11 4.532198690564411727L9) EQL-OK: 0.16708389923204005057L0 (* -7.773548969171738747L-11 6.487140494299404015L9) EQL-OK: -0.5042810430233337584L0 (* 3.181536837232243521L-12 -8.8275599983550392825L8) EQL-OK: -0.0028085207317644360498L0 (* 3.512130320642090343L-11 -6.775467122704530228L9) EQL-OK: -0.23796323518164203024L0 (* -7.489684894543042722L-11 1.3562671200654034619L-11) EQL-OK: -1.015801336211924759L-21 (* -6.615171167169027831L-11 6.4492881876773102747L-11) EQL-OK: -4.2663145267886736825L-21 (* 5.9969037329081164062L-12 6.979117807067958578L-11) EQL-OK: 4.1853097629611348155L-22 (* -9.1419010578306515213L-11 -3.0321662473944421986L-11) EQL-OK: 2.7719763824573648138L-21 (* 8.653994294784604749L-11 -2.618325063862645785L-12) EQL-OK: -2.2658970164558872502L-22 (* 3.778177082827084054L-11 5.7986141594804582746L-11) EQL-OK: 2.1908191129505701787L-21 (* 9.107023861930220456L-11 -8.1609888558011610015L18) EQL-OK: -7.432232024672778029L8 (* -6.185675579794400257L-11 8.145498215172660237L19) EQL-OK: -5.0385409394852397568L9 (* -5.0086846264250856304L-12 7.333671928137704804L19) EQL-OK: -3.6732049841708537418L8 (* -6.133300578664362783L-11 -4.647031661618042392L19) EQL-OK: 2.8501641979273554706L9 (* 4.014159298839782726L-12 7.077385833663047478L18) EQL-OK: 2.8409754155675469803L7 (* 3.9529027598797003857L-11 3.1931221840357166776L19) EQL-OK: 1.2622101493907881026L9 (* 5.2407793550579649295L-11 8.178146405814506225L-21) EQL-OK: 4.2859860846234161862L-31 (* -4.5792905534935737864L-11 -1.1970719995732820388L-21) EQL-OK: 5.481740499497593831L-32 (* 4.113879746633747024L-11 5.1093090279978304893L-21) EQL-OK: 2.1019082929573231173L-31 (* 1.9918804321687295055L-11 1.8243807936344826748L-21) EQL-OK: 3.6339484036649830696L-32 (* -6.1549842617771214656L-11 7.210193834294849238L-22) EQL-OK: -4.4378629574447235495L-32 (* -3.483482946766538465L-12 7.8771698631837073084L-22) EQL-OK: -2.743998688718375137L-33 (* -3.0540130142847980374L19 -0.08015004741507677209L0) EQL-OK: 2.4477928790118809798L18 (* -7.721729897125586787L19 -0.71282981020428696123L0) EQL-OK: 5.5042792570168003116L19 (* 6.855667806362567159L18 0.83087248440613607433L0) EQL-OK: 5.69618574253563119L18 (* -1.0247670372283575993L17 -0.21215039186338500874L0) EQL-OK: 2.1740472851667611836L16 (* -4.2451902701279432204L19 0.363650960045267158L0) EQL-OK: -1.5437675173068535736L19 (* -2.3286355030172533736L19 0.49713327148260372132L0) EQL-OK: -1.1576421857055056984L19 (* -6.1529172975127592432L19 -7.1685660040728041152L9) EQL-OK: 4.4107593764821477366L29 (* 6.7120643409032119372L19 -2.1673488299796731996L9) EQL-OK: -1.45473847960048627434L29 (* 8.1354429987417636456L19 -7.205222753181797397L9) EQL-OK: -5.861767900174770815L29 (* 7.1263614941049137416L19 5.4835530180135407083L8) EQL-OK: 3.907778107845448494L28 (* 5.0833800113097826724L19 -6.2188724451883454807L9) EQL-OK: -3.1612891880755627472L29 (* -7.0947371956905508468L19 -2.434705753418370145L9) EQL-OK: 1.7273597469339097183L29 (* 6.6532780031620346828L19 -5.126482819920582625L-11) EQL-OK: -3.4107915379365690604L9 (* 3.3916052110984390742L19 1.2477416554656457027L-11) EQL-OK: 4.2318471007818771302L8 (* -2.0596546301412947634L18 1.4681903489886446838L-11) EQL-OK: -3.0239650502232254483L7 (* 5.4448198096650564945L18 -8.328351500006325204L-11) EQL-OK: -4.534637322908812735L8 (* -9.010106422125259114L19 -8.313725422339249255L-11) EQL-OK: 7.4907550819604901853L9 (* 9.807792586975021252L19 -8.1013942555768171325L-11) EQL-OK: -7.9456794524008327797L9 (* -6.569928333884882197L17 1.8031274577764523257L19) EQL-OK: -1.1846418174451330701L37 (* 9.966374081256518232L19 1.1925741835931471136L18) EQL-OK: 1.1885640433338393863L38 (* -5.1958776350000747272L19 9.541066943279536452L19) EQL-OK: -4.957421634462466998L39 (* 3.0864687811444473814L19 -7.292720897062086383L17) EQL-OK: -2.2508755378381858676L37 (* -4.9023499593352016396L19 -7.837521201177228469L19) EQL-OK: 3.8422271741879966693L39 (* 1.1092141282192635266L19 -8.705681388875638857L19) EQL-OK: -9.656464792316359058L38 (* 9.719341608862581484L18 3.910223765755272544L-21) EQL-OK: 0.038004800546468552602L0 (* 9.0834836835472717744L19 2.3217130663560934873L-22) EQL-OK: 0.021089242756124079488L0 (* -8.956950042680554282L19 -6.8114530414478270673L-22) EQL-OK: 0.061009844610312705923L0 (* -6.250871904307721917L18 -1.7897852706103755451L-21) EQL-OK: 0.01118771846280218958L0 (* -4.8350255195162635852L19 -5.4114390027140489403L-21) EQL-OK: 0.26164445675428065787L0 (* -3.787718813779143278L19 4.715777953310022763L-22) EQL-OK: -0.017862040875357275534L0 (* -9.6946973380533561685L-21 0.29842171245928506197L0) EQL-OK: -2.8931081813963549629L-21 (* -1.5138229787560283214L-21 -0.63587548364028950173L0) EQL-OK: 9.626029187622732088L-22 (* 6.9088409628577453984L-21 0.6675889882861618064L0) EQL-OK: 4.6122661486241942486L-21 (* -5.9331491274547789645L-21 0.1840021396402183602L0) EQL-OK: -1.0917121342561739605L-21 (* 6.5714942924276749333L-21 0.042451475976117785684L0) EQL-OK: 2.789696320821885891L-22 (* 8.381861494201174241L-21 -0.14355711097860731382L0) EQL-OK: -1.2032758207303532943L-21 (* 2.014342763215141127L-21 -1.2338457666735291661L9) EQL-OK: -2.4853882910224610282L-12 (* -5.670580024618139724L-21 -8.0192486381311308156L8) EQL-OK: 4.5473791139832611237L-12 (* -1.9225557816894129732L-21 7.9269598913745234357L9) EQL-OK: -1.5240022570382171054L-11 (* 4.0368254062037218916L-21 -9.5325393449487114215L8) EQL-OK: -3.848119701332554298L-12 (* 4.2776037356780859957L-21 -5.1221437260809706463L9) EQL-OK: -2.1910501137364030878L-11 (* -6.7334467986153699064L-21 -7.7745493828541701813L9) EQL-OK: 5.2349514652656512034L-11 (* -4.315187380180362795L-21 1.3410692406986483366L-11) EQL-OK: -5.786965063410868682L-32 (* 3.343397258359340776L-21 3.0757040339096610197L-12) EQL-OK: 1.0283300434498325547L-32 (* 8.5537743863632264L-21 7.5263454541513394514L-11) EQL-OK: 6.4378660968641032133L-31 (* -2.842610565794174946L-21 3.153716909493170071L-11) EQL-OK: -8.9647890084490369953L-32 (* 2.8400800161467519014L-22 2.0497242686367281441L-11) EQL-OK: 5.8213809339661880995L-33 (* 9.982896581447590365L-21 1.6568727649785948007L-11) EQL-OK: 1.654038946139843086L-31 (* 4.678227176611232891L-21 8.297236114758786796L19) EQL-OK: 0.38816355482824754693L0 (* -2.7181316933272033506L-21 -7.7081523870452907184L19) EQL-OK: 0.20951773300223540615L0 (* 3.755562697893016061L-21 -9.043255746258523336L19) EQL-OK: -0.33962513948155180184L0 (* -6.788248742851763723L-21 -2.3639021583849588926L19) EQL-OK: 0.16046755854881268057L0 (* -4.100847017987407598L-21 -3.6481227061862975968L19) EQL-OK: 0.14960393120916230025L0 (* -2.001548479939126796L-21 -8.705055796099425971L19) EQL-OK: 0.17423591196468091344L0 (* -3.670443367722997441L-21 3.6588667206894740936L-22) EQL-OK: -1.34296630883370731296L-42 (* -6.6783435670093499397L-22 -8.113066551196750321L-21) EQL-OK: 5.4181845810903550342L-42 (* 4.816859192586505112L-21 -1.1868626619923445382L-22) EQL-OK: -5.716950323755514841L-43 (* 4.6402358755296483015L-21 -4.244356902115351796L-22) EQL-OK: -1.9694817165747535215L-42 (* 9.3247068197076461794L-21 3.5271238356611001996L-21) EQL-OK: 3.288939568434245211L-41 (* 8.7860048755888267426L-21 7.187872989134290154L-21) EQL-OK: 6.315268712764710716L-41 (MULTIPLE-VALUE-LIST (FLOOR -0.9677507664075728311L0 0.09829392666835353511L0)) EQUAL-OK: (-10 0.015188500275962520004L0) (MULTIPLE-VALUE-LIST (FLOOR -0.084596576622269801105L0 -0.78271578747309396924L0)) EQUAL-OK: (0 -0.084596576622269801105L0) (MULTIPLE-VALUE-LIST (FLOOR 0.97785517019559092334L0 -0.24687352093087197807L0)) EQUAL-OK: (-4 -0.009638913527896988987L0) (MULTIPLE-VALUE-LIST (FLOOR 0.36348468689259258175L0 0.5156866254701831051L0)) EQUAL-OK: (0 0.36348468689259258175L0) (MULTIPLE-VALUE-LIST (FLOOR -0.51463186192345608164L0 0.8683136279312965567L0)) EQUAL-OK: (-1 0.35368176600784047506L0) (MULTIPLE-VALUE-LIST (FLOOR 0.36128372948365635348L0 -0.5061584717303788097L0)) EQUAL-OK: (-1 -0.1448747422467224562L0) (MULTIPLE-VALUE-LIST (FLOOR -0.83188875677783952054L0 -6.988497329115560525L9)) EQUAL-OK: (0 -0.83188875677783952054L0) (MULTIPLE-VALUE-LIST (FLOOR -0.09110744229488624391L0 -9.792597852253288497L9)) EQUAL-OK: (0 -0.09110744229488624391L0) (MULTIPLE-VALUE-LIST (FLOOR 0.23616060202132526459L0 -1.5882829404848723914L9)) EQUAL-OK: (-1 -1.5882829402487117894L9) (MULTIPLE-VALUE-LIST (FLOOR -0.09652925723903261584L0 6.2261024177069773893L9)) EQUAL-OK: (-1 6.226102417610448132L9) (MULTIPLE-VALUE-LIST (FLOOR 0.5413601234707634158L0 9.144943549323542538L9)) EQUAL-OK: (0 0.5413601234707634158L0) (MULTIPLE-VALUE-LIST (FLOOR -0.57037258938648310115L0 4.436821091919698621L9)) EQUAL-OK: (-1 4.4368210913493260317L9) (MULTIPLE-VALUE-LIST (FLOOR -0.9973297751770725278L0 3.4051851548139874998L-11)) EQUAL-OK: (-29288562291 1.4506986275662661537L-11) (MULTIPLE-VALUE-LIST (FLOOR 0.6604979952397203417L0 -4.3497555374342239963L-11)) EQUAL-OK: (-15184715315 -1.8114827519649365006L-11) (MULTIPLE-VALUE-LIST (FLOOR 0.38589975187928444138L0 1.0289103184336123803L-12)) EQUAL-OK: (375056742036 3.5046726009323829848L-13) (MULTIPLE-VALUE-LIST (FLOOR 0.9402638162334174371L0 4.2262799834524861567L-11)) EQUAL-OK: (22248024738 1.7766010468098603481L-11) (MULTIPLE-VALUE-LIST (FLOOR -0.8642082843541437474L0 8.911777256338402297L-11)) EQUAL-OK: (-9697373033 6.304376014060421794L-11) (MULTIPLE-VALUE-LIST (FLOOR 0.7435773981922973139L0 5.910629837324535378L-11)) EQUAL-OK: (12580341159 1.1224045374678474888L-11) (MULTIPLE-VALUE-LIST (FLOOR 0.7898063255151059068L0 1.2757118849664610875L18)) EQUAL-OK: (0 0.7898063255151059068L0) (MULTIPLE-VALUE-LIST (FLOOR 0.19544684487626281231L0 -3.6071314846523434156L19)) EQUAL-OK: (-1 -3.6071314846523434156L19) (MULTIPLE-VALUE-LIST (FLOOR -0.032130218136830583316L0 -3.367647816525978896L18)) EQUAL-OK: (0 -0.032130218136830583316L0) (MULTIPLE-VALUE-LIST (FLOOR -0.25693079625787854222L0 2.3815464531684079734L19)) EQUAL-OK: (-1 2.3815464531684079734L19) (MULTIPLE-VALUE-LIST (FLOOR -0.3975875412090936933L0 3.9957351306215043416L19)) EQUAL-OK: (-1 3.9957351306215043416L19) (MULTIPLE-VALUE-LIST (FLOOR 0.16223305219726616216L0 -5.3922124894358790612L19)) EQUAL-OK: (-1 -5.3922124894358790612L19) (MULTIPLE-VALUE-LIST (FLOOR 0.14869268750642991106L0 -4.676414410846522305L-21)) EQUAL-OK: (-31796302560686368198 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR 0.4848921957991629974L0 7.275052251851656838L-21)) EQUAL-OK: (66651369504012501536 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR 0.44996459510190342355L0 -3.96515259272563559L-21)) EQUAL-OK: (-113479767696052002376 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR 0.7246909129638354568L0 -1.2540349367528059089L-21)) EQUAL-OK: (-577887339279675740320 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR 0.83383904440522878455L0 3.5186204165781412753L-21)) EQUAL-OK: (236978970643311773536 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR 0.26779759740636464572L0 -6.954613119627800336L-21)) EQUAL-OK: (-38506469418200611672 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR -7.4845680268023566543L9 -0.2629469688312594538L0)) EQUAL-OK: (28464173061 -0.1240146549242767677L0) (MULTIPLE-VALUE-LIST (FLOOR 6.1612132433805581187L9 -0.09975641287987705455L0)) EQUAL-OK: (-61762578120 -0.083822638930812785824L0) (MULTIPLE-VALUE-LIST (FLOOR -3.6629628120558108524L9 0.35361739315194823028L0)) EQUAL-OK: (-10358548203 0.32784699422401302726L0) (MULTIPLE-VALUE-LIST (FLOOR -6.999024858613990497L9 -0.6086338795192380592L0)) EQUAL-OK: (11499564999 -0.48897756390533489348L0) (MULTIPLE-VALUE-LIST (FLOOR 4.2927999071819381092L9 -0.8483437666321241058L0)) EQUAL-OK: (-5060212707 -0.6341788853647631104L0) (MULTIPLE-VALUE-LIST (FLOOR -4.377925687006929662L9 0.3220507356662819166L0)) EQUAL-OK: (-13593900595 0.18712780555802854961L0) (MULTIPLE-VALUE-LIST (FLOOR -9.5387759396672939425L9 7.7154581598602048657L9)) EQUAL-OK: (-2 5.892140380053115789L9) (MULTIPLE-VALUE-LIST (FLOOR -5.64339842966998351L9 4.025489717604319313L9)) EQUAL-OK: (-2 2.4075810055386551162L9) (MULTIPLE-VALUE-LIST (FLOOR -4.811594948157823536L9 -7.834071766040306942L9)) EQUAL-OK: (0 -4.811594948157823536L9) (MULTIPLE-VALUE-LIST (FLOOR 4.4476035118893197435L9 3.0450117757143498866L9)) EQUAL-OK: (1 1.4025917361749698569L9) (MULTIPLE-VALUE-LIST (FLOOR -7.3465328576805684287L9 -4.603589573313564281L9)) EQUAL-OK: (1 -2.7429432843670041477L9) (MULTIPLE-VALUE-LIST (FLOOR 4.956277095163508632L9 -6.664438280281275845L9)) EQUAL-OK: (-1 -1.708161185117767213L9) (MULTIPLE-VALUE-LIST (FLOOR 4.367757792316331005L9 -7.8163461329531150714L-11)) EQUAL-OK: (-55879789840705743024 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR -4.7778036898247465523L8 3.4933422750724630952L-11)) EQUAL-OK: (-13676883951274541565 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR -6.667353710605079077L9 5.3863219342714070564L-11)) EQUAL-OK: (-123783052553596643928 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR -6.6004002390836614547L9 -9.313678706634845693L-11)) EQUAL-OK: (70867811173061956036 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR -9.439278803200832958L9 -6.7075776392225367144L-11)) EQUAL-OK: (140725598880953434976 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR -9.207319097846486017L9 -5.7812820689283059893L-11)) EQUAL-OK: (159260852317369718528 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR -7.564134292866958547L9 6.4508269927189105468L19)) EQUAL-OK: (-1 6.4508269919624971176L19) (MULTIPLE-VALUE-LIST (FLOOR -5.7520914080101070246L9 -4.4901662701989554116L17)) EQUAL-OK: (0 -5.7520914080101070246L9) (MULTIPLE-VALUE-LIST (FLOOR -9.801170739094381102L9 9.482698257311007893L19)) EQUAL-OK: (-1 9.482698256330890819L19) (MULTIPLE-VALUE-LIST (FLOOR 7.471594576665974082L8 3.1667053210759199935L18)) EQUAL-OK: (0 7.471594576665974081L8) (MULTIPLE-VALUE-LIST (FLOOR -6.4762144691604037974L9 -8.24176243427164629L19)) EQUAL-OK: (0 -6.4762144691604037974L9) (MULTIPLE-VALUE-LIST (FLOOR -5.5263312844382694187L9 9.5950716135522835064L19)) EQUAL-OK: (-1 9.595071612999650378L19) (MULTIPLE-VALUE-LIST (FLOOR 3.1312033848911460338L9 -8.61316266389637687L-21)) EQUAL-OK: (-363537008074414891396807786496 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR 2.6279029713558476835L9 -4.516664720059022692L-21)) EQUAL-OK: (-581823786849847663134534270976 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR 4.502075635961923785L9 -9.685834626464620576L-21)) EQUAL-OK: (-464810293545679143271024033792 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR 1.4031562604294053729L9 3.412866773725220897L-21)) EQUAL-OK: (411137132932332056394984325120 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR -4.3024038761755407723L9 2.485284435684751149L-21)) EQUAL-OK: (-1731151498959165530746191347712 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR 6.136473603422627364L9 5.6959828635137213127L-21)) EQUAL-OK: (1077333578850898685241017237504 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR -8.202208473677937235L-11 0.12393605769441814725L0)) EQUAL-OK: (-1 0.123936057612396062516L0) (MULTIPLE-VALUE-LIST (FLOOR -8.6757073154686102475L-11 -0.37237633673270687662L0)) EQUAL-OK: (0 -8.675707315468610247L-11) (MULTIPLE-VALUE-LIST (FLOOR 5.6028622390057924218L-11 0.6499341232771672055L0)) EQUAL-OK: (0 5.6028622390057924218L-11) (MULTIPLE-VALUE-LIST (FLOOR 4.5783899320025937576L-11 -0.7229560019811405793L0)) EQUAL-OK: (-1 -0.7229560019353566799L0) (MULTIPLE-VALUE-LIST (FLOOR 7.224213822400873615L-11 -0.87051303270552073176L0)) EQUAL-OK: (-1 -0.87051303263327859354L0) (MULTIPLE-VALUE-LIST (FLOOR -5.5008008233955830292L-11 -0.45974678868400245752L0)) EQUAL-OK: (0 -5.5008008233955830295L-11) (MULTIPLE-VALUE-LIST (FLOOR -5.949553569817051437L-11 -4.9088361621296460857L9)) EQUAL-OK: (0 -5.949553569817051437L-11) (MULTIPLE-VALUE-LIST (FLOOR 9.068981360820356321L-11 3.9567179334666110438L9)) EQUAL-OK: (0 9.068981360820356321L-11) (MULTIPLE-VALUE-LIST (FLOOR 3.4621680776088405294L-13 4.3691679646970805987L9)) EQUAL-OK: (0 3.4621680776088405294L-13) (MULTIPLE-VALUE-LIST (FLOOR 4.005939678622022073L-11 -9.2132271371400602936L8)) EQUAL-OK: (-1 -9.213227137140060293L8) (MULTIPLE-VALUE-LIST (FLOOR 6.8015601712459487755L-11 -4.769849366969915586L9)) EQUAL-OK: (-1 -4.769849366969915586L9) (MULTIPLE-VALUE-LIST (FLOOR 8.736177705951390388L-11 8.3701230195943479203L9)) EQUAL-OK: (0 8.736177705951390388L-11) (MULTIPLE-VALUE-LIST (FLOOR -8.8368349664293751446L-11 1.7247862508910726963L-11)) EQUAL-OK: (-6 1.5118825389170610328L-11) (MULTIPLE-VALUE-LIST (FLOOR -2.0922301210797840822L-11 2.9157326021078492393L-11)) EQUAL-OK: (-1 8.235024810280651572L-12) (MULTIPLE-VALUE-LIST (FLOOR -9.929248815922456709L-11 -6.9934608623319373425L-11)) EQUAL-OK: (1 -2.9357879535905193665L-11) (MULTIPLE-VALUE-LIST (FLOOR 8.809298490106908006L-11 2.521478295865126635L-11)) EQUAL-OK: (3 1.244863602511528101L-11) (MULTIPLE-VALUE-LIST (FLOOR 7.3620267190952160604L-11 -5.0806267993123045533L-11)) EQUAL-OK: (-2 -2.7992268795293930463L-11) (MULTIPLE-VALUE-LIST (FLOOR -9.070716461299934103L-11 1.372581158818204212L-11)) EQUAL-OK: (-7 5.3735165042749538097L-12) (MULTIPLE-VALUE-LIST (FLOOR -7.459630170957188741L-11 -3.429772398019229389L19)) EQUAL-OK: (0 -7.459630170957188741L-11) (MULTIPLE-VALUE-LIST (FLOOR 1.9725650506989118904L-11 -1.7770668980460508816L19)) EQUAL-OK: (-1 -1.7770668980460508816L19) (MULTIPLE-VALUE-LIST (FLOOR 6.3974118251214889016L-12 -5.69117448017374684L19)) EQUAL-OK: (-1 -5.69117448017374684L19) (MULTIPLE-VALUE-LIST (FLOOR 9.080192761938897539L-11 5.1550284925054312868L19)) EQUAL-OK: (0 9.080192761938897539L-11) (MULTIPLE-VALUE-LIST (FLOOR 7.694299339180548789L-11 3.1601030797220572842L19)) EQUAL-OK: (0 7.694299339180548789L-11) (MULTIPLE-VALUE-LIST (FLOOR 5.5788554873601060938L-11 5.5699367746931070664L19)) EQUAL-OK: (0 5.5788554873601060938L-11) (MULTIPLE-VALUE-LIST (FLOOR -4.087371164243010522L-11 1.7025318283693090775L-21)) EQUAL-OK: (-24007605005 1.5007203773756006028L-21) (MULTIPLE-VALUE-LIST (FLOOR -7.3575974688385316083L-11 -1.6670029902289832508L-21)) EQUAL-OK: (44136678290 -1.8066891019200848581L-22) (MULTIPLE-VALUE-LIST (FLOOR 1.0850282868697332469L-11 5.7344803128377181472L-21)) EQUAL-OK: (1892112672 1.4425616831217755076L-21) (MULTIPLE-VALUE-LIST (FLOOR -9.848519351300913193L-11 -7.121687974823219785L-21)) EQUAL-OK: (13828911609 -2.300608125189343731L-21) (MULTIPLE-VALUE-LIST (FLOOR 3.0260591554314098406L-12 1.7303586387117179437L-22)) EQUAL-OK: (17488046048 9.689796116124082976L-23) (MULTIPLE-VALUE-LIST (FLOOR 5.867643793784483945L-11 2.9831220978672803306L-21)) EQUAL-OK: (19669472456 9.594326475082730988L-22) (MULTIPLE-VALUE-LIST (FLOOR 9.453252855247919707L19 0.3964594556008910194L0)) EQUAL-OK: (238441856328540902016 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR 1.9865852464762410773L17 0.8745495786051183551L0)) EQUAL-OK: (227155245977568008 0.08198902299422984579L0) (MULTIPLE-VALUE-LIST (FLOOR 5.8003655986843771616L19 -0.57075967601329721915L0)) EQUAL-OK: (-101625357264188433960 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR 6.5463855676706502812L19 0.5124698839969514896L0)) EQUAL-OK: (127741859026189966704 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR 8.053368905864221505L19 0.40679331708739617821L0)) EQUAL-OK: (197972006116659527920 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR 8.572236202953388538L19 0.1793174966141533504L0)) EQUAL-OK: (478047952085719142240 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR -6.6056603867132043536L19 1.8364346532401849241L9)) EQUAL-OK: (-35970026895 8.274070785684816422L8) (MULTIPLE-VALUE-LIST (FLOOR 2.473965171745108034L19 5.5749126908032718576L9)) EQUAL-OK: (4437675186 5.356910410798194379L9) (MULTIPLE-VALUE-LIST (FLOOR -4.405924011882179756L19 -6.4568556406242929674L9)) EQUAL-OK: (6823637165 -4.1798826632701602209L8) (MULTIPLE-VALUE-LIST (FLOOR 2.1093676314099077168L19 5.727620773112868108L8)) EQUAL-OK: (36827990451 1.8408274540307780489L8) (MULTIPLE-VALUE-LIST (FLOOR -1.0962340119185741432L19 -8.173187675545835245L9)) EQUAL-OK: (1341256380 -4.422519927692124746L9) (MULTIPLE-VALUE-LIST (FLOOR -9.664836922872330681L19 -4.5461452948374001435L9)) EQUAL-OK: (21259410546 -4.0088028420210172099L9) (MULTIPLE-VALUE-LIST (FLOOR 9.965462994616849042L19 -6.27691916031617149L-11)) EQUAL-OK: (-1587636026543136775574879469568 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR -1.2700534905234296955L19 -7.6392648594402208417L-11)) EQUAL-OK: (166253365198349054807791108096 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR -7.837735447773461618L18 -8.6041613252133785413L-11)) EQUAL-OK: (91092381366746282195935035392 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR 4.849306367034469812L19 -8.744903371098252931L-11)) EQUAL-OK: (-554529439749024491444258209792 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR -6.3895751736590951245L18 -8.9218106166526971406L-11)) EQUAL-OK: (71617471477514379195326660608 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR -1.1249006547358954392L19 -3.749899421128778124L-11)) EQUAL-OK: (299981553744522252727485464576 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR -4.8298889769606521412L19 3.2897859420995047714L19)) EQUAL-OK: (-2 1.7496829072383574016L19) (MULTIPLE-VALUE-LIST (FLOOR -7.618272569239742257L19 -2.4246730847406800364L19)) EQUAL-OK: (3 -3.4425331501770214745L18) (MULTIPLE-VALUE-LIST (FLOOR -9.9344217376670949096L19 -2.187787768895506888L19)) EQUAL-OK: (4 -1.1832706620850673572L19) (MULTIPLE-VALUE-LIST (FLOOR 3.9222824564168688912L19 -9.476307993509074433L19)) EQUAL-OK: (-1 -5.5540255370922055412L19) (MULTIPLE-VALUE-LIST (FLOOR -2.012988112115775752L19 -1.01146191266402097525L18)) EQUAL-OK: (19 -9.1210478054135899006L17) (MULTIPLE-VALUE-LIST (FLOOR 8.61360756236492457L19 -9.374471951386232653L19)) EQUAL-OK: (-1 -7.6086438902130808345L18) (MULTIPLE-VALUE-LIST (FLOOR -4.0954879593227223964L19 3.4785793369902262412L-21)) EQUAL-OK: (-11773449913223093127289481096658923028480 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR -5.7633820540313762628L19 -6.9799216943629666126L-21)) EQUAL-OK: (8257086979479904139315172946770002968576 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR -4.5945941433359568196L19 -9.26874309885338918L-21)) EQUAL-OK: (4957084357969034092339972319162935541760 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR 9.069653875532044557L19 1.1607862998892810815L-21)) EQUAL-OK: (78133708817868823323292026086376001765376 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR 1.9663881236128118596L19 -7.53224056983834607L-21)) EQUAL-OK: (-2610628411799403924128603371383036051456 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR 3.8155182638858600344L19 -9.78280482738867461L-21)) EQUAL-OK: (-3900229362854759958152852242692868931584 0.0L0) (MULTIPLE-VALUE-LIST (FLOOR 2.0785751397779279812L-21 0.84874462118484074924L0)) EQUAL-OK: (0 2.0785751397779279812L-21) (MULTIPLE-VALUE-LIST (FLOOR 9.468679817093889512L-22 -0.14230041428757812886L0)) EQUAL-OK: (-1 -0.14230041428757812886L0) (MULTIPLE-VALUE-LIST (FLOOR -3.5329587582370771722L-21 -0.75145077780984780047L0)) EQUAL-OK: (0 -3.5329587582370771722L-21) (MULTIPLE-VALUE-LIST (FLOOR 1.0147425004279850959L-21 0.55049889413410685307L0)) EQUAL-OK: (0 1.0147425004279850959L-21) (MULTIPLE-VALUE-LIST (FLOOR -9.214176537319943048L-21 -0.45008902557926736644L0)) EQUAL-OK: (0 -9.214176537319943048L-21) (MULTIPLE-VALUE-LIST (FLOOR -1.146684367801419132L-21 0.3317375182580383851L0)) EQUAL-OK: (-1 0.3317375182580383851L0) (MULTIPLE-VALUE-LIST (FLOOR 9.8958965362796452575L-23 -8742129.925142999928L0)) EQUAL-OK: (-1 -8742129.925142999928L0) (MULTIPLE-VALUE-LIST (FLOOR -8.629925553125559817L-22 1.4904768761159059732L9)) EQUAL-OK: (-1 1.4904768761159059732L9) (MULTIPLE-VALUE-LIST (FLOOR -1.7636696713810751494L-21 1.2803675755746476424L9)) EQUAL-OK: (-1 1.2803675755746476424L9) (MULTIPLE-VALUE-LIST (FLOOR 7.8572218293550540256L-21 7.311951574932556098L9)) EQUAL-OK: (0 7.8572218293550540256L-21) (MULTIPLE-VALUE-LIST (FLOOR 5.8831628670454666175L-21 -2.430599936529262355L9)) EQUAL-OK: (-1 -2.430599936529262355L9) (MULTIPLE-VALUE-LIST (FLOOR 5.891885696934149925L-21 6.0077688200842341403L9)) EQUAL-OK: (0 5.891885696934149925L-21) (MULTIPLE-VALUE-LIST (FLOOR -5.5378511525885539255L-21 -4.317564477957860586L-11)) EQUAL-OK: (0 -5.5378511525885539255L-21) (MULTIPLE-VALUE-LIST (FLOOR -1.9525004120740256159L-21 9.454884961900014292L-11)) EQUAL-OK: (-1 9.454884961704764251L-11) (MULTIPLE-VALUE-LIST (FLOOR 5.461359828153347278L-21 -9.7061135180917529105L-11)) EQUAL-OK: (-1 -9.706113517545616928L-11) (MULTIPLE-VALUE-LIST (FLOOR 9.644530490453124287L-21 8.28693431641614359L-11)) EQUAL-OK: (0 9.644530490453124287L-21) (MULTIPLE-VALUE-LIST (FLOOR 8.997549905605484822L-21 5.2672865249640494307L-11)) EQUAL-OK: (0 8.997549905605484822L-21) (MULTIPLE-VALUE-LIST (FLOOR -1.55338435917637846L-21 5.9708770769690056966L-11)) EQUAL-OK: (-1 5.9708770768136672606L-11) (MULTIPLE-VALUE-LIST (FLOOR 3.9285675924255819076L-21 5.674913585946206864L19)) EQUAL-OK: (0 3.9285675924255819076L-21) (MULTIPLE-VALUE-LIST (FLOOR -3.6185336116295331734L-21 -9.043926006483480333L19)) EQUAL-OK: (0 -3.6185336116295331734L-21) (MULTIPLE-VALUE-LIST (FLOOR -7.32672036508508268L-21 1.205614654464109627L19)) EQUAL-OK: (-1 1.205614654464109627L19) (MULTIPLE-VALUE-LIST (FLOOR -3.3565132746900103151L-21 8.585503247975515849L19)) EQUAL-OK: (-1 8.585503247975515849L19) (MULTIPLE-VALUE-LIST (FLOOR -6.9204354176156616745L-21 -3.6158709669328356396L19)) EQUAL-OK: (0 -6.9204354176156616745L-21) (MULTIPLE-VALUE-LIST (FLOOR -7.5176747956103960436L-21 9.3440027997860057096L19)) EQUAL-OK: (-1 9.3440027997860057096L19) (MULTIPLE-VALUE-LIST (FLOOR -6.302622462978502841L-21 8.1107309029375862425L-21)) EQUAL-OK: (-1 1.8081084399590834014L-21) (MULTIPLE-VALUE-LIST (FLOOR 1.4803054325001667241L-22 6.3345497995208400772L-21)) EQUAL-OK: (0 1.4803054325001667241L-22) (MULTIPLE-VALUE-LIST (FLOOR -5.7089861270321677843L-21 9.540482421100450586L-21)) EQUAL-OK: (-1 3.831496294068282802L-21) (MULTIPLE-VALUE-LIST (FLOOR 3.3765199428161524112L-21 9.669802014415968729L-21)) EQUAL-OK: (0 3.3765199428161524112L-21) (MULTIPLE-VALUE-LIST (FLOOR 7.52101063082155294L-21 8.827949370572986921L-21)) EQUAL-OK: (0 7.52101063082155294L-21) (MULTIPLE-VALUE-LIST (FLOOR 4.196504310402249954L-23 3.785428476220113075L-21)) EQUAL-OK: (0 4.196504310402249954L-23) (/ 0.8476517865511829377L0 0.14598720922015648169L0) EQL-OK: 5.8063428370144327317L0 (/ -0.16515392772872533974L0 0.2885771921352848653L0) EQL-OK: -0.5723041606534907598L0 (/ -0.25791761734650428572L0 -0.17472849542471660309L0) EQL-OK: 1.4761050664322265015L0 (/ -0.9418668871216534004L0 -0.25801526180943099573L0) EQL-OK: 3.6504309106230792821L0 (/ -0.25726582509610465451L0 0.7704327058756196045L0) EQL-OK: -0.33392381078074095957L0 (/ -0.021409432992321506645L0 -0.44293479613874918959L0) EQL-OK: 0.048335405524597819813L0 (/ -0.26771090178828336857L0 -7.7011892538310270067L9) EQL-OK: 3.4762280599078659542L-11 (/ 0.82867609196336006595L0 -3.0042819216966844948L9) EQL-OK: -2.7583166745395210866L-10 (/ 0.40732354689187331287L0 -7.559832309976744222L9) EQL-OK: -5.387997116739304149L-11 (/ -0.53349543673778000914L0 -5.104278761341346705L8) EQL-OK: 1.045192595628502556L-9 (/ 0.17669669311850475256L0 -9.181879875841464834L9) EQL-OK: -1.9244064996255633173L-11 (/ -0.38525727576606363245L0 -4.8936643582468263693L9) EQL-OK: 7.872572525674472248L-11 (/ 0.028580272067667963345L0 -7.9841173999044091L-11) EQL-OK: -3.5796407587907142282L8 (/ 0.72167998280372380157L0 -3.6437273419914776347L-12) EQL-OK: -1.980609181391958688L11 (/ -0.5863461999919387516L0 7.881986348526466578L-11) EQL-OK: -7.4390664239294943926L9 (/ 0.54541403791059564303L0 -2.6107257402815120583L-11) EQL-OK: -2.089128051619026705L10 (/ 0.7985324354238058011L0 9.752737902348257611L-12) EQL-OK: 8.187777047012979847L10 (/ 0.14104671220162837288L0 -1.679932803469743255L-11) EQL-OK: -8.3959734526470136372L9 (/ 0.84226961154302812054L0 -3.7790325979515268584L19) EQL-OK: -2.2287968936801211454L-20 (/ -0.17023320737807742781L0 -7.054479312260488177L19) EQL-OK: 2.4131222141684768152L-21 (/ 0.51147038234753495475L0 7.2890488826322506176L19) EQL-OK: 7.01697012303244035L-21 (/ 0.15424860911694467965L0 -9.2121691156562017736L19) EQL-OK: -1.6744005367291526718L-21 (/ 0.18043991101271504866L0 -1.5135729370916590423L19) EQL-OK: -1.1921454631676461953L-20 (/ -0.8669749687756526617L0 8.7133495928438747096L19) EQL-OK: -9.949961946754488136L-21 (/ -0.6448505560111598971L0 3.636469578348857873L-21) EQL-OK: -1.7732873659951112376L20 (/ -0.81857582399766609004L0 5.2916132942068490006L-21) EQL-OK: -1.546930545536701092L20 (/ 0.77524450276763022L0 -7.652595302708246449L-21) EQL-OK: -1.0130478250865714831L20 (/ 0.627858729575384142L0 9.627326573065363056L-21) EQL-OK: 6.5216311590796329432L19 (/ -0.42943946308533227006L0 -2.2414950519882640498L-21) EQL-OK: 1.915861749078626634L20 (/ -0.34220208112358558038L0 -7.4545803279812700505L-21) EQL-OK: 4.5904942473972275588L19 (/ 5.560943842255079481L9 -0.55841023848214400133L0) EQL-OK: -9.958527725728472542L9 (/ -8.661678305761957921L9 -0.87958882986448744696L0) EQL-OK: 9.847417351919312785L9 (/ 3.6954900583503502368L9 -0.36989453222048823558L0) EQL-OK: -9.9906587863470431315L9 (/ 6.740385471899914443L8 -0.2745720588185960522L0) EQL-OK: -2.454869406924301959L9 (/ -5.1381279403866914758L9 -0.32555782051482221485L0) EQL-OK: 1.578253574821668073L10 (/ -3.2065087686035281697L9 0.50505516522796299416L0) EQL-OK: -6.3488287802308291444L9 (/ -7.7979994067331648055L9 -6.4459990751639263853L9) EQL-OK: 1.2097425574847536075L0 (/ -4.7272619195621447717L9 -3.825695015629283172L8) EQL-OK: 12.356609453314103588L0 (/ -3.5376744034596315073L9 2.7483444719369282795L9) EQL-OK: -1.2872019645217230068L0 (/ -2.2400216393287578975L9 -3.7058330823204350567L9) EQL-OK: 0.6044583200509807153L0 (/ 3.0621742151056386386L9 -8.846101104908494769L9) EQL-OK: -0.34616088814613589822L0 (/ 7.5149875074517868906L9 4.423024956398348232L9) EQL-OK: 1.6990606161017937287L0 (/ 7.6970261502618782055L9 -9.7716080626747355186L-11) EQL-OK: -7.876928854384493259L19 (/ -8.725835744855911806L8 8.409822932470646079L-11) EQL-OK: -1.0375766309139670758L19 (/ 5.820797723708174118L9 -2.882166534035175912L-11) EQL-OK: -2.0195910454760464445L20 (/ 1.207852991950790034L9 5.840354579417081103L-11) EQL-OK: 2.068115857567237665L19 (/ 3.1046967393071541823L9 -5.5642977043818474125L-11) EQL-OK: -5.5796740294147564416L19 (/ 4.392532668212736406L9 -7.535498815249885942L-11) EQL-OK: -5.8291199771983175508L19 (/ 1.3280881496906639524L9 -1.766515912740190632L19) EQL-OK: -7.518121632035316941L-11 (/ 1.4277961930808139626L9 -8.986506745304867108L19) EQL-OK: -1.5888222571321021114L-11 (/ -7.9134656119390343763L9 -3.4095849226963530828L19) EQL-OK: 2.3209469162249057589L-10 (/ -8.7882725472722691335L9 -5.186325400713441962L19) EQL-OK: 1.6945085138821670647L-10 (/ 3.8930727351090315925L9 -7.3980221641298868864L19) EQL-OK: -5.2623155875161027887L-11 (/ 9.998404421166073569L9 -8.1317115085820412065L18) EQL-OK: -1.2295571984586471158L-9 (/ 4.623792381028250544L9 6.996281129080973142L-21) EQL-OK: 6.6089287947690416075L29 (/ 8.472924939037688662L9 -4.3460987737519244214L-22) EQL-OK: -1.9495472560839050376L31 (/ 1.9551595642940545935L9 -7.5324972045717692564L-21) EQL-OK: -2.5956326450508222435L29 (/ -8.5478772651240992225L9 -2.4212066230883777513L-21) EQL-OK: 3.5304204042779411337L30 (/ 6.881700625121950854L9 -8.203099619911879591L-21) EQL-OK: -8.389146717684109215L29 (/ 6.097099876947129031L9 -4.76850418677518328L-21) EQL-OK: -1.2786189627046213921L30 (/ -5.0358061432469478737L-11 -0.6780392915138573621L0) EQL-OK: 7.427012278305451381L-11 (/ -1.49762284327640383L-11 0.15227257119521089694L0) EQL-OK: -9.835145171066142436L-11 (/ -7.1678035946969115934L-11 0.75360681415553320054L0) EQL-OK: -9.511330656861051013L-11 (/ 4.583894304978394541L-12 0.68934670181533335835L0) EQL-OK: 6.6496210004445016106L-12 (/ -3.8885547056166489716L-12 -0.010643810658165133798L0) EQL-OK: 3.6533482513930678043L-10 (/ 9.49880444227161124L-11 -0.122629749019578004226L0) EQL-OK: -7.745921783428843474L-10 (/ 2.1990660545226500317L-11 -1.4161745224867819854L9) EQL-OK: -1.552821364602098501L-20 (/ 9.951737846856727225L-11 -6.0164204240154494783L9) EQL-OK: -1.6540961477912788069L-20 (/ -5.873282338412930208L-11 2.3788798751415933107L9) EQL-OK: -2.4689276662460085614L-20 (/ 2.2209512664584027642L-11 5.1944018613813348683L9) EQL-OK: 4.2756631576205975403L-21 (/ -6.722318330051584872L-11 6.7936247801916195024L9) EQL-OK: -9.895039169151724367L-21 (/ -7.528877773200399613L-12 -9.535757813603057891L9) EQL-OK: 7.89541630604357328L-22 (/ -2.0857643618410047184L-11 2.701544718271986855L-11) EQL-OK: -0.77206360780699598463L0 (/ 2.5510439626733908612L-11 1.6734405694946451074L-11) EQL-OK: 1.5244305708709866576L0 (/ 3.048460642905138835L-11 5.1568899955161432057L-11) EQL-OK: 0.5911432366321058725L0 (/ 9.876491787625061464L-12 8.667781903943973216L-11) EQL-OK: 0.113944858062604306884L0 (/ 1.1166642175553123016L-11 -7.759981600144040302L-11) EQL-OK: -0.14390036923986841014L0 (/ -2.7282824760136843772L-11 -9.160281916489131182L-11) EQL-OK: 0.2978382653379466574L0 (/ -3.1587174777348029438L-11 -4.9090150171793744104L19) EQL-OK: 6.4345239659701453497L-31 (/ -4.512784364891002838L-11 5.9600731551720265308L19) EQL-OK: -7.571692909465218857L-31 (/ -1.431681316436341718L-11 -4.22349605246125618L19) EQL-OK: 3.3898014788057508284L-31 (/ -6.719040537613210677L-11 -4.545488183802435408L19) EQL-OK: 1.47817797911258332435L-30 (/ 2.5092238442261623676L-11 3.3004591427193857704L19) EQL-OK: 7.602650830449936487L-31 (/ -6.198495042920933878L-12 1.8747110273916984954L19) EQL-OK: -3.306373596972410786L-31 (/ 8.3326031863190006605L-11 6.3679312781687389584L-21) EQL-OK: 1.3085259281747860217L10 (/ 2.228308172351851791L-11 -4.6204647093882084617L-22) EQL-OK: -4.822692764700068564L10 (/ 9.7676469315043868665L-11 -6.6370355345926113967L-21) EQL-OK: -1.4716882078745621587L10 (/ -8.9713798012161717115L-11 -3.669192301028840519L-21) EQL-OK: 2.445055768459069116L10 (/ 7.214258511983827207L-11 -1.5195990661514104949L-21) EQL-OK: -4.7474749574931692373L10 (/ 1.4822028144092954099L-12 2.269595713994387529L-21) EQL-OK: 6.530690929974856047L8 (/ -4.6354687290142894644L19 0.032331325634476806982L0) EQL-OK: -1.4337391486574910728L21 (/ -2.389352438897577318L19 0.8660312577952003013L0) EQL-OK: -2.7589678979723536864L19 (/ -2.4109458405628950432L19 0.26688102636777617506L0) EQL-OK: -9.033785104080363178L19 (/ 8.961066349333904704L19 -0.66178143682771294813L0) EQL-OK: -1.35408245844568974384L20 (/ 6.6419769467305502364L19 -0.8456142496793601811L0) EQL-OK: -7.854618047471472417L19 (/ 3.7389082257286159308L19 0.56261989685796304976L0) EQL-OK: 6.645531462021022254L19 (/ 7.814283695666500025L19 -4.6620013293904720047L9) EQL-OK: -1.6761650509199167363L10 (/ 6.6434731737611309404L19 -2.858805223329136325L9) EQL-OK: -2.323863521567472329L10 (/ -1.3409334390407788129L19 6.1497605350647401055L9) EQL-OK: -2.1804644772671013651L9 (/ 7.0858597943822241668L19 -2.58410378455919273L9) EQL-OK: -2.7420956684179617314L10 (/ -6.6455998228898640428L19 -7.7545004942277582046L9) EQL-OK: 8.569990843171226794L9 (/ 2.9602494058183339616L19 -5.7169856186590364077L9) EQL-OK: -5.1779899465842692843L9 (/ -6.698311323164055808L19 -6.553232827426109497L-11) EQL-OK: 1.02213846197113193186L30 (/ -7.554561034956199475L19 6.4764910162760040714L-11) EQL-OK: -1.1664589692120175174L30 (/ 6.7796490729162210612L19 9.9915237995070190003L-11) EQL-OK: 6.785400514434773617L29 (/ -6.9067747658009050975L18 -2.5761632749585983355L-11) EQL-OK: 2.681031452058062687L29 (/ 1.629413698021581386L19 -8.612780517302459862L-11) EQL-OK: -1.8918555915226283107L29 (/ 8.8732593909692189064L19 -4.0536919536865455935L-12) EQL-OK: -2.1889328277398133904L31 (/ 4.8426213700963381164L19 7.883038261101094331L19) EQL-OK: 0.61430900240485778846L0 (/ -5.2968355222513127376L19 1.5071497411718048594L19) EQL-OK: -3.5144719715328600349L0 (/ -6.2610887651422622925L18 1.0358424497888766788L19) EQL-OK: -0.60444411854509194816L0 (/ -2.4670994205369878408L19 6.9747461294856021948L19) EQL-OK: -0.3537188844920639511L0 (/ 6.9460731069354980812L19 3.1486762233902586798L19) EQL-OK: 2.2060296499639734035L0 (/ 8.822828644946363194L19 6.735435431753652773L19) EQL-OK: 1.3099121406987093833L0 (/ 3.2098388728662261428L19 -2.6305167886064038438L-21) EQL-OK: -1.2202312818412901165L40 (/ -7.144492994496515916L19 -2.0335028635662185032L-21) EQL-OK: 3.5133921483478965099L40 (/ -6.3695870249569899508L19 1.9319318539671607067L-21) EQL-OK: -3.2970039869042198792L40 (/ -5.405605759054511269L19 6.6371220252553042967L-21) EQL-OK: -8.144502599899959829L39 (/ -4.5534797093596626272L19 9.223324048915255164L-21) EQL-OK: -4.9369182793650108047L39 (/ 3.920618312396827221L19 -1.6559061178638737343L-21) EQL-OK: -2.3676573629998072004L40 (/ -8.768637785982664131L-21 -0.18184176456694917492L0) EQL-OK: 4.8221253279547290195L-20 (/ 2.6823352573966718016L-21 -0.55524799130252431824L0) EQL-OK: -4.830877912956219511L-21 (/ -4.0350541003620172524L-21 0.27000304046926068644L0) EQL-OK: -1.4944476526446376082L-20 (/ 6.332356861830292899L-21 0.65544003241974460534L0) EQL-OK: 9.6612299350294242524L-21 (/ 3.5603120340723305693L-21 -0.124100556644984066966L0) EQL-OK: -2.86889288035778711L-20 (/ 5.5961094005028721084L-21 0.47201702367299511838L0) EQL-OK: 1.18557363820414998006L-20 (/ 1.7187188076305931646L-21 8.3685668129856246863L9) EQL-OK: 2.0537791548292745125L-31 (/ -2.7220241842791803757L-21 2.2892422122227956846L9) EQL-OK: -1.1890503196846804849L-30 (/ -6.028203796038167925L-21 -5.415224539645905615L9) EQL-OK: 1.1131955382282900156L-30 (/ 6.6310444174308960725L-21 9.461342958972558645L9) EQL-OK: 7.0085657460946591684L-31 (/ -8.8033709586752979635L-21 2.8098765759657792274L9) EQL-OK: -3.1330098389284241575L-30 (/ -3.4027974212452472475L-21 6.219628754500815959L8) EQL-OK: -5.4710619484849846614L-30 (/ 8.388977931970215088L-21 2.8213325814913435694L-11) EQL-OK: 2.9734097947204223302L-10 (/ -9.3496400462478483586L-21 -9.381494249123695733L-11) EQL-OK: 9.966045704415559596L-11 (/ -6.936639418470504025L-21 5.6618206553549859367L-11) EQL-OK: -1.2251605694909792675L-10 (/ -2.3667892015182913211L-21 -7.1545639578577691874L-11) EQL-OK: 3.3080830857887236957L-11 (/ -9.576766108065157562L-21 -6.4350290609494113365L-11) EQL-OK: 1.4882242204905008798L-10 (/ -2.5955914883538434001L-22 5.8091383646322322124L-11) EQL-OK: -4.4681178609147595716L-12 (/ -2.9619491950657497217L-21 -5.373067072601134649L19) EQL-OK: 5.512585558757694777L-41 (/ 2.5726455340193007026L-22 3.0037766865540527038L19) EQL-OK: 8.564703047118500122L-42 (/ -2.8277317971003367574L-21 -4.4068191966128705184L19) EQL-OK: 6.4167184332721487087L-41 (/ 7.503784949731224261L-21 5.9540210967055505192L19) EQL-OK: 1.2602886062804146604L-40 (/ 1.4876876016319254574L-22 8.6818746213386148185L18) EQL-OK: 1.7135557313571827969L-41 (/ 2.699544264870480357L-21 3.6796341400587007856L19) EQL-OK: 7.3364474893892979093L-41 (/ -7.285812539718203862L-21 5.700589904684711396L-21) EQL-OK: -1.2780804551000530294L0 (/ 3.6474102791520560028L-21 -6.343773677116707765L-21) EQL-OK: -0.574959080319812269L0 (/ -4.2510720089860863712L-21 -8.281980897162330288L-21) EQL-OK: 0.51329169455614642465L0 (/ 5.770684998505203844L-21 6.5700291863604419324L-21) EQL-OK: 0.8783347584642853315L0 (/ -4.8018196973750014744L-21 -7.3250029580209059804L-21) EQL-OK: 0.6555382605159211192L0 (/ -3.9261100835261094614L-21 -8.986577968334144672L-21) EQL-OK: 0.436885997913830856L0 RUN-TEST: finished "number" (0 errors out of 3,655 tests) RUN-TEST: started # (DEFUN CHECK-XGCD (A B) (MULTIPLE-VALUE-BIND (G U V) (XGCD A B) (IF (= G (+ (* A U) (* B V))) G (FORMAT T "~& ~d~% ~d~% ==> ~d~% ~d~% ~d~%" A B G U V)))) EQL-OK: CHECK-XGCD (CHECK-XGCD 2346026393680644703525505657 17293822570713318399) EQL-OK: 11 (CHECK-XGCD 77874422 32223899) EQL-OK: 1 (CHECK-XGCD 560014183 312839871) EQL-OK: 1 (CHECK-XGCD 3 2) EQL-OK: 1 (CHECK-XGCD 2 3) EQL-OK: 1 (CHECK-XGCD -2 3) EQL-OK: 1 (CHECK-XGCD 576561 -5) EQL-OK: 1 (CHECK-XGCD 974507656412513757857315037382926980395082974811562770185617915360 -1539496810360685510909469177732386446833404488164283) EQL-OK: 1 (ISQRT 77371252437321868671713407) EQL-OK: 8796093021183 (< 0.0 LEAST-POSITIVE-SHORT-FLOAT 1.0) EQL-OK: T (> MOST-POSITIVE-SHORT-FLOAT 1.0) EQL-OK: T (<= 2.83674s36 10801894066935227181020469351465354205855744/17827) EQL-OK: T (EXPT -5.0s0 2.0s0) EQL-OK: #C(25.0s0 0.0s0) (EXPT -5.0 2.0) EQL-OK: #C(25.0 0.0) (EXPT -5.0d0 2.0d0) EQL-OK: #C(25.0d0 0.0d0) (EXPT -5.0L0 2.0L0) EQL-OK: #C(25.0L0 0.0L0) (EXPT -5 2) EQL-OK: 25 (EXPT 5.0s0 3.0s0) EQL-OK: 125.0s0 (EXPT 5.0 3.0) EQL-OK: 125.0 (EXPT 5.0d0 3.0d0) EQL-OK: 125.0d0 (EXPT 5.0L0 3.0L0) EQL-OK: 125.0L0 (EXPT 5 3) EQL-OK: 125 (= 0.1d0 (SETQ Z #C(0.1d0 0.0d0))) EQL-OK: T (* Z (EXPT Z Z)) EQUALP-OK: #C(0.07943282347242815d0 0.0) Z EQL-OK: #C(0.1d0 0.0d0) (LOG 8.0s0 2.0s0) EQL-OK: 3.0s0 (LOG 8.0 2.0) EQL-OK: 3.0 (LOG 8.0d0 2.0d0) EQL-OK: 3.0d0 (LOG 8.0L0 2.0L0) EQL-OK: 3.0L0 (LOG -8 -2) EQL-OK: #C(1.0928407 -0.42078725) (LOG -8.0s0 -2.0s0) EQL-OK: #C(1.09283s0 -0.42078s0) (LOG -8.0 -2.0) EQL-OK: #C(1.0928407 -0.42078725) (LOG -8.0d0 -2.0d0) EQL-OK: #C(1.0928406470908163d0 -0.4207872484158604d0) (LOG Z) EQL-OK: #C(-2.3025850929940455d0 0.0d0) Z EQL-OK: #C(0.1d0 0.0d0) (LOG 1) EQL-OK: 0 (LOG #C(0 1)) EQL-OK: #C(0 1.5707964) (LOG 0) [SIMPLE-DIVISION-BY-ZERO]: LOG: division by zero EQL-OK: ERROR (LOG 0.0d0) [SIMPLE-DIVISION-BY-ZERO]: LOG: division by zero EQL-OK: ERROR (LOG (COMPLEX #1=0.0 #1#)) [SIMPLE-DIVISION-BY-ZERO]: LOG: division by zero EQL-OK: ERROR (CIS 10) EQL-OK: #C(-0.8390715 -0.5440211) (CIS 123) EQL-OK: #C(-0.8879689 -0.45990348) (CIS (* 7.25d0 PI)) EQL-OK: #C(-0.7071067811865476d0 -0.7071067811865476d0) (CIS #C(0.0d0 1.0d0)) EQL-OK: #C(0.36787944117144233d0 0.0d0) (ZEROP (+ (CIS 123) (CIS -123) (* -2 (COS 123)))) EQL-OK: T (ZEROP (+ (* #C(0 1) (- (CIS 123) (CIS -123))) (* 2 (SIN 123)))) EQL-OK: T (EXP 0) EQL-OK: 1 (EXP #C(0 1)) EQL-OK: #C(0.5403023 0.84147096) (EXP #C(1 1)) EQL-OK: #C(1.468694 2.2873552) (EXP #C(1 1.0d0)) EQL-OK: #C(1.4686939399158851d0 2.2873552871788423d0) (EXP #C(1.0d0 1.0d0)) EQL-OK: #C(1.4686939399158851d0 2.2873552871788423d0) (EXP #C(1.0L0 1)) EQL-OK: #C(1.4686939399158851572L0 2.2873552871788423912L0) (EXP #C(0 1.0d0)) EQL-OK: #C(0.5403023058681398d0 0.8414709848078965d0) (EXP 1) EQL-OK: 2.7182817 (EXP 1.0s0) EQL-OK: 2.7183s0 (EXP 1.0) EQL-OK: 2.7182817 (EXP 1.0d0) EQL-OK: 2.718281828459045d0 (EXP 1.0L0) EQL-OK: 2.7182818284590452354L0 (SIN 0.0d0) EQL-OK: 0.0d0 (SINH 0.0d0) EQL-OK: 0.0d0 (TAN 0.0d0) EQL-OK: 0.0d0 (TANH 0.0d0) EQL-OK: 0.0d0 (TAN 1.57) EQL-OK: 1255.8483 (TAN 1.57d0) EQL-OK: 1255.7655915007895d0 (TAN Z) EQL-OK: #C(0.10033467208545055d0 0.0d0) (= (TAN Z) (TAN (REALPART Z))) EQL-OK: T (TANH Z) EQL-OK: #C(0.09966799462495582d0 0.0d0) (= (TANH Z) (TANH (REALPART Z))) EQL-OK: T (ATAN #C(1 2)) EQL-OK: #C(1.3389726 0.4023595) (TAN #C(1 2)) EQL-OK: #C(0.033812825 1.0147936) (TANH #C(20 2)) EQL-OK: #C(1.0 0.0) (COSH #C(1 2)) EQL-OK: #C(-0.64214814 1.0686074) (COSH #C(1.0d0 2.0d0)) EQL-OK: #C(-0.64214812471552d0 1.0686074213827783d0) (LOG -3/4) EQL-OK: #C(-0.2876821 3.1415927) (LOG (/ MOST-POSITIVE-DOUBLE-FLOAT 2)) EQL-OK: 709.0895657128241d0 (EQL (SQRT 0) 0) EQL-OK: T (EQL (SQRT 1) 1) EQL-OK: T (EQL (SQRT 9) 3) EQL-OK: T (EQL (SQRT -9) #C(0 3)) EQL-OK: T (EQL (SQRT #C(-7 24)) #C(3 4)) EQL-OK: T (EQL (EXP 0) 1) EQL-OK: T (EQL (LOG 1) 0) EQL-OK: T (EQL (EXPT #C(10 11) 1) #C(10 11)) EQL-OK: T (EQL (EXPT 0 1/2) 0) EQL-OK: T (EQL (EXPT 1 1/2) 1) EQL-OK: T (EQL (EXPT 9 1/2) 3) EQL-OK: T (EQL (EXPT -9 1/2) #C(0 3)) EQL-OK: T (EQL (EXPT #C(-7 24) 1/2) #C(3 4)) EQL-OK: T (EQL (EXPT 729 1/6) 3) EQL-OK: T (EQL (EXPT -3 -1) -1/3) EQL-OK: T (EQL (EXPT #C(3 4) -1) #C(3/25 -4/25)) EQL-OK: T (EQL (CONJUGATE #C(4 -1)) #C(4 1)) EQL-OK: T (EQL (CONJUGATE #C(3 0.4)) #C(3 -0.4)) EQL-OK: T (EQL (SIN 0) 0) EQL-OK: T (EQL (REALPART (SIN #C(0 3.0))) 0) EQL-OK: T (EQL (COS 0) 1) EQL-OK: T (EQL (IMAGPART (COS #C(0 3.0))) 0) EQL-OK: T (EQL (TAN 0) 0) EQL-OK: T (EQL (REALPART (TAN #C(0 3.0))) 0) EQL-OK: T (EQL (ASIN 0) 0) EQL-OK: T (EQL (REALPART (ASIN #C(0 3.0))) 0) EQL-OK: T (EQL (ACOS 1) 0) EQL-OK: T (EQL (REALPART (ACOS 2.0)) 0) EQL-OK: T (EQL (ATAN 0) 0) EQL-OK: T (EQL (REALPART (ATAN #C(0 0.5))) 0) EQL-OK: T (EQL (SINH 0) 0) EQL-OK: T (EQL (REALPART (SINH #C(0 3.0))) 0) EQL-OK: T (EQL (COSH 0) 1) EQL-OK: T (EQL (IMAGPART (COSH #C(0 3.0))) 0) EQL-OK: T (EQL (TANH 0) 0) EQL-OK: T (EQL (REALPART (TANH #C(0 3.0))) 0) EQL-OK: T (EQL (ASINH 0) 0) EQL-OK: T (EQL (REALPART (ASINH #C(0 0.6))) 0) EQL-OK: T (EQL (ACOSH 1) 0) EQL-OK: T (EQL (REALPART (ACOSH -0.4)) 0) EQL-OK: T (EQL (ATANH 0) 0) EQL-OK: T (EQL (REALPART (ATANH #C(0 3.0))) 0) EQL-OK: T (SQRT 1) EQL-OK: 1 (SQRT 1.0d0) EQL-OK: 1.0d0 (SQRT -1) EQL-OK: #C(0 1) (SQRT -1.0d0) EQL-OK: #C(0 1.0d0) (ABS (SQRT -1)) EQL-OK: 1 (PHASE (SQRT -2)) EQL-OK: 1.5707964 (SIGNUM (SQRT -2)) EQL-OK: #C(0 1.0) (ASIN 1) EQL-OK: 1.5707964 (ASIN 2) EQL-OK: #C(1.5707964 -1.316958) (ACOS 1) EQL-OK: 0 (ACOS 2) EQL-OK: #C(0 1.316958) (ATAN 1) EQL-OK: 0.7853981 (ATAN 2) EQL-OK: 1.1071488 (ATAN 2 3) EQL-OK: 0.58800256 (SINH 10) EQL-OK: 11013.232 (COSH 10) EQL-OK: 11013.233 (TANH 10) EQL-OK: 1.0 (TANH 3) EQL-OK: 0.9950548 (ASINH 1) EQL-OK: 0.88137364 (ACOSH 1) EQL-OK: 0 (ACOSH 3) EQL-OK: 1.762747 (ATANH 3) EQL-OK: #C(0.3465736 1.5707964) (ATANH 0.9) EQL-OK: 1.4722193 (LOOP :FOR Z :FROM 1 :TO 1000 :FOR Z*Z = (* Z Z) :FOR |2^Z| = (ASH 1 Z) :FOR Z*2^Z = (ASH Z Z) :FOR Z^Z = (EXPT Z Z) :UNLESS (LOGTEST Z Z) :COLLECT (LIST 'LOGTEST Z) :UNLESS (LOGTEST Z*Z Z*Z) :COLLECT (LIST 'LOGTEST Z 'Z*Z Z*Z) :UNLESS (LOGTEST |2^Z| |2^Z|) :COLLECT (LIST 'LOGTEST Z '|2^Z| |2^Z|) :UNLESS (LOGTEST Z*2^Z Z*2^Z) :COLLECT (LIST 'LOGTEST Z 'Z*2^Z Z*2^Z) :UNLESS (LOGTEST Z*Z Z*Z) :COLLECT (LIST 'LOGTEST Z 'Z*Z Z*Z)) EQL-OK: NIL (LOOP :FOR Z :FROM 0 :TO 1000 :FOR Z*Z = (* Z Z) :FOR |2^Z| = (ASH 1 Z) :FOR Z*2^Z = (ASH Z Z) :FOR Z^Z = (EXPT Z Z) :UNLESS (= Z (LOGAND Z Z)) :COLLECT (LIST 'LOGAND Z) :UNLESS (= Z*Z (LOGAND Z*Z Z*Z)) :COLLECT (LIST 'LOGAND Z 'Z*Z Z*Z) :UNLESS (= |2^Z| (LOGAND |2^Z| |2^Z|)) :COLLECT (LIST 'LOGAND Z '|2^Z| |2^Z|) :UNLESS (= Z*2^Z (LOGAND Z*2^Z Z*2^Z)) :COLLECT (LIST 'LOGAND Z 'Z*2^Z Z*2^Z) :UNLESS (= Z*Z (LOGAND Z*Z Z*Z)) :COLLECT (LIST 'LOGAND Z 'Z*Z Z*Z)) EQL-OK: NIL (MOD-EXPT 1432 634 3456) EQL-OK: 2944 (MOD-EXPT 640785284696442065785559134003308932264708355179002798538113 671286301850793527622248679786362012411973295201562077406347 541607700526106309999871171548445806906603126622271198261079) EQL-OK: 184927654951560197998922671105024055618160643054333015564836 (DEFUN CHECK-SQRT (NUM EPS) (LET ((S (SQRT NUM))) (> (* EPS 2) (ABS (/ (- S (/ NUM S)) S))))) EQL-OK: CHECK-SQRT (CHECK-SQRT MOST-POSITIVE-SHORT-FLOAT SHORT-FLOAT-EPSILON) EQL-OK: T (CHECK-SQRT LEAST-POSITIVE-SHORT-FLOAT SHORT-FLOAT-EPSILON) EQL-OK: T (CHECK-SQRT LEAST-NEGATIVE-SHORT-FLOAT SHORT-FLOAT-EPSILON) EQL-OK: T (CHECK-SQRT MOST-NEGATIVE-SHORT-FLOAT SHORT-FLOAT-EPSILON) EQL-OK: T (CHECK-SQRT MOST-POSITIVE-SINGLE-FLOAT SINGLE-FLOAT-EPSILON) EQL-OK: T (CHECK-SQRT LEAST-POSITIVE-SINGLE-FLOAT SINGLE-FLOAT-EPSILON) EQL-OK: T (CHECK-SQRT LEAST-NEGATIVE-SINGLE-FLOAT SINGLE-FLOAT-EPSILON) EQL-OK: T (CHECK-SQRT MOST-NEGATIVE-SINGLE-FLOAT SINGLE-FLOAT-EPSILON) EQL-OK: T (CHECK-SQRT MOST-POSITIVE-DOUBLE-FLOAT DOUBLE-FLOAT-EPSILON) EQL-OK: T (CHECK-SQRT LEAST-POSITIVE-DOUBLE-FLOAT DOUBLE-FLOAT-EPSILON) EQL-OK: T (CHECK-SQRT LEAST-NEGATIVE-DOUBLE-FLOAT DOUBLE-FLOAT-EPSILON) EQL-OK: T (CHECK-SQRT MOST-NEGATIVE-DOUBLE-FLOAT DOUBLE-FLOAT-EPSILON) EQL-OK: T (CHECK-SQRT MOST-POSITIVE-LONG-FLOAT LONG-FLOAT-EPSILON) EQL-OK: T (CHECK-SQRT LEAST-POSITIVE-LONG-FLOAT LONG-FLOAT-EPSILON) EQL-OK: T (CHECK-SQRT LEAST-NEGATIVE-LONG-FLOAT LONG-FLOAT-EPSILON) EQL-OK: T (CHECK-SQRT MOST-NEGATIVE-LONG-FLOAT LONG-FLOAT-EPSILON) EQL-OK: T (DEFUN CHECK-MULT (NUM) (= NUM (* 1 NUM) (/ NUM 1))) EQL-OK: CHECK-MULT (CHECK-MULT MOST-POSITIVE-SHORT-FLOAT) EQL-OK: T (CHECK-MULT LEAST-POSITIVE-SHORT-FLOAT) EQL-OK: T (CHECK-MULT LEAST-NEGATIVE-SHORT-FLOAT) EQL-OK: T (CHECK-MULT MOST-NEGATIVE-SHORT-FLOAT) EQL-OK: T (CHECK-MULT MOST-POSITIVE-SINGLE-FLOAT) EQL-OK: T (CHECK-MULT LEAST-POSITIVE-SINGLE-FLOAT) EQL-OK: T (CHECK-MULT LEAST-NEGATIVE-SINGLE-FLOAT) EQL-OK: T (CHECK-MULT MOST-NEGATIVE-SINGLE-FLOAT) EQL-OK: T (CHECK-MULT MOST-POSITIVE-DOUBLE-FLOAT) EQL-OK: T (CHECK-MULT LEAST-POSITIVE-DOUBLE-FLOAT) EQL-OK: T (CHECK-MULT LEAST-NEGATIVE-DOUBLE-FLOAT) EQL-OK: T (CHECK-MULT MOST-NEGATIVE-DOUBLE-FLOAT) EQL-OK: T (CHECK-MULT MOST-POSITIVE-LONG-FLOAT) EQL-OK: T (CHECK-MULT LEAST-POSITIVE-LONG-FLOAT) EQL-OK: T (CHECK-MULT LEAST-NEGATIVE-LONG-FLOAT) EQL-OK: T (CHECK-MULT MOST-NEGATIVE-LONG-FLOAT) EQL-OK: T (LOOP :FOR X :IN '(1.0s0 1.0 1.0d0 1.0L0) :FOR EPS :IN (LIST SHORT-FLOAT-EPSILON SINGLE-FLOAT-EPSILON DOUBLE-FLOAT-EPSILON LONG-FLOAT-EPSILON) :FOR EPS2 = (* EPS 9/10) :UNLESS (EQUAL (FUNCALL (COMPILE NIL `(LAMBDA NIL (LIST (+ (+ ,X ,EPS2) ,EPS2) (+ ,EPS2 (+ ,EPS2 ,X)))))) (LIST X X)) :COLLECT (LIST X EPS EPS2)) EQL-OK: NIL (EXP #C(1.0s0 2.0s0)) EQL-OK: #C(-1.13121s0 2.47174s0) (EXP #C(1.0 2.0)) EQL-OK: #C(-1.1312044 2.4717267) (EXP #C(1.0d0 2.0d0)) EQL-OK: #C(-1.1312043837568135d0 2.4717266720048188d0) (EXP #C(1.0L0 2.0L0)) EQL-OK: #C(-1.1312043837568136384L0 2.4717266720048189277L0) (SIN #C(1.0s0 2.0s0)) EQL-OK: #C(3.16577s0 1.9596s0) (SIN #C(1.0 2.0)) EQL-OK: #C(3.1657784 1.959601) (SIN #C(1.0d0 2.0d0)) EQL-OK: #C(3.165778513216168d0 1.9596010414216058d0) (SIN #C(1.0L0 2.0L0)) EQL-OK: #C(3.1657785132161681467L0 1.9596010414216058971L0) (ASIN #C(1.0s0 2.0s0)) EQL-OK: #C(0.427067s0 1.52856s0) (ASIN #C(1.0 2.0)) EQL-OK: #C(0.42707857 1.5285708) (ASIN #C(1.0d0 2.0d0)) EQL-OK: #C(0.4270785863924762d0 1.5285709194809982d0) (ASIN #C(1.0L0 2.0L0)) EQL-OK: #C(0.4270785863924761255L0 1.5285709194809981613L0) (COS #C(1.0s0 2.0s0)) EQL-OK: #C(2.0327s0 -3.0519s0) (COS #C(1.0 2.0)) EQL-OK: #C(2.032723 -3.0518978) (COS #C(1.0d0 2.0d0)) EQL-OK: #C(2.0327230070196656d0 -3.0518977991518d0) (COS #C(1.0L0 2.0L0)) EQL-OK: #C(2.0327230070196655295L0 -3.0518977991518000574L0) (ATAN #C(1.0s0 2.0s0)) EQL-OK: #C(1.33897s0 0.40236s0) (ATAN #C(1.0 2.0)) EQL-OK: #C(1.3389726 0.4023595) (ATAN #C(1.0d0 2.0d0)) EQL-OK: #C(1.3389725222944935d0 0.40235947810852507d0) (ATAN #C(1.0L0 2.0L0)) EQL-OK: #C(1.3389725222944935611L0 0.40235947810852509365L0) (COSH #C(1.0s0 2.0s0)) EQL-OK: #C(-0.64215s0 1.0686s0) (COSH #C(1.0 2.0)) EQL-OK: #C(-0.64214814 1.0686074) (COSH #C(1.0d0 2.0d0)) EQL-OK: #C(-0.64214812471552d0 1.0686074213827783d0) (COSH #C(1.0L0 2.0L0)) EQL-OK: #C(-0.64214812471551996483L0 1.0686074213827783395L0) (SINH #C(1.0s0 2.0s0)) EQL-OK: #C(-0.489056s0 1.40312s0) (SINH #C(1.0 2.0)) EQL-OK: #C(-0.48905626 1.4031192) (SINH #C(1.0d0 2.0d0)) EQL-OK: #C(-0.4890562590412937d0 1.4031192506220407d0) (SINH #C(1.0L0 2.0L0)) EQL-OK: #C(-0.4890562590412936736L0 1.403119250622040588L0) (ASINH #C(1.0s0 2.0s0)) EQL-OK: #C(1.46936s0 1.06343s0) (ASINH #C(1.0 2.0)) EQL-OK: #C(1.4693518 1.0634403) (ASINH #C(1.0d0 2.0d0)) EQL-OK: #C(1.4693517443681856d0 1.0634400235777521d0) (ASINH #C(1.0L0 2.0L0)) EQL-OK: #C(1.4693517443681852733L0 1.0634400235777520562L0) (TANH #C(1.0s0 2.0s0)) EQL-OK: #C(1.16673s0 -0.243458s0) (TANH #C(1.0 2.0)) EQL-OK: #C(1.1667362 -0.2434582) (TANH #C(1.0d0 2.0d0)) EQL-OK: #C(1.16673625724092d0 -0.24345820118572525d0) (TANH #C(1.0L0 2.0L0)) EQL-OK: #C(1.1667362572409198818L0 -0.2434582011857252527L0) (ACOS #C(1.0s0 2.0s0)) EQL-OK: #C(1.14374s0 -1.52856s0) (ACOS #C(1.0 2.0)) EQL-OK: #C(1.1437178 -1.5285708) (ACOS #C(1.0d0 2.0d0)) EQL-OK: #C(1.1437177404024204d0 -1.5285709194809982d0) (ACOS #C(1.0L0 2.0L0)) EQL-OK: #C(1.1437177404024204937L0 -1.5285709194809981613L0) (ACOSH #C(1.0s0 2.0s0)) EQL-OK: #C(1.52856s0 1.14372s0) (ACOSH #C(1.0 2.0)) EQL-OK: #C(1.5285709 1.1437178) (ACOSH #C(1.0d0 2.0d0)) EQL-OK: #C(1.5285709194809982d0 1.1437177404024204d0) (ACOSH #C(1.0L0 2.0L0)) EQL-OK: #C(1.528570919480998161L0 1.1437177404024204937L0) (LOG #C(1.0s0 2.0s0)) EQL-OK: #C(0.80472s0 1.10715s0) (LOG #C(1.0 2.0)) EQL-OK: #C(0.804719 1.1071488) (LOG #C(1.0d0 2.0d0)) EQL-OK: #C(0.8047189562170501d0 1.1071487177940904d0) (LOG #C(1.0L0 2.0L0)) EQL-OK: #C(0.8047189562170501873L0 1.107148717794090503L0) (ATANH #C(1.0s0 2.0s0)) EQL-OK: #C(0.173286s0 1.1781s0) (ATANH #C(1.0 2.0)) EQL-OK: #C(0.1732868 1.1780972) (ATANH #C(1.0d0 2.0d0)) EQL-OK: #C(0.17328679513998632d0 1.1780972450961724d0) (ATANH #C(1.0L0 2.0L0)) EQL-OK: #C(0.17328679513998632736L0 1.1780972450961724645L0) (TAN #C(1.0s0 2.0s0)) EQL-OK: #C(0.033813s0 1.0148s0) (TAN #C(1.0 2.0)) EQL-OK: #C(0.033812825 1.0147936) (TAN #C(1.0d0 2.0d0)) EQL-OK: #C(0.03381282607989669d0 1.0147936161466335d0) (TAN #C(1.0L0 2.0L0)) EQL-OK: #C(0.033812826079896690283L0 1.0147936161466335681L0) (DEFUN TEST-FUNCTION (FUNC MAX MIN &KEY (REPEAT 1000) (EXCEPT NIL)) (LOOP :FOR TYPE :IN '(SHORT-FLOAT SINGLE-FLOAT DOUBLE-FLOAT LONG-FLOAT) :FOR BAD = (MAPCAR (LAMBDA (X) (COERCE X TYPE)) EXCEPT) :NCONC (LOOP :FOR X = (+ (RANDOM (COERCE (- MAX MIN) TYPE)) MIN) :FOR X-BAD = (MEMBER X BAD :TEST #'=) :FOR R = (OR X-BAD (FUNCALL FUNC X)) :REPEAT REPEAT :UNLESS (OR X-BAD (TYPEP R TYPE) (TYPEP R `(COMPLEX ,TYPE))) :COLLECT (LIST X BAD R FUNC TYPE)))) EQL-OK: TEST-FUNCTION (LOOP :FOR F :IN '(EXP SIN ASIN COS ATAN COSH SINH ASINH TANH) :NCONC (TEST-FUNCTION F 10 -10)) EQL-OK: NIL (TEST-FUNCTION 'ACOS 1 -1) EQL-OK: NIL (TEST-FUNCTION 'ACOSH 20 1) EQL-OK: NIL (TEST-FUNCTION 'LOG 10 -10 :EXCEPT '(0)) EQL-OK: NIL (TEST-FUNCTION 'ATANH 10 -10 :EXCEPT '(-1 1)) EQL-OK: NIL (TEST-FUNCTION 'TAN 10 -10 :EXCEPT (NCONC (LOOP :FOR X :FROM (/ PI 2) :BY PI :TO 10 :COLLECT X) (LOOP :FOR X :FROM (/ PI -2) :BY PI :DOWNTO -10 :COLLECT X))) EQL-OK: NIL (LET ((BOOLE-N-VECTOR (VECTOR BOOLE-CLR BOOLE-AND BOOLE-ANDC1 BOOLE-2 BOOLE-ANDC2 BOOLE-1 BOOLE-XOR BOOLE-IOR BOOLE-NOR BOOLE-EQV BOOLE-C1 BOOLE-ORC1 BOOLE-C2 BOOLE-ORC2 BOOLE-NAND BOOLE-SET))) (LIST (LOOP :FOR N :FROM 0 :TO 15 :UNLESS (= N (LOGAND (BOOLE (AREF BOOLE-N-VECTOR N) 5 3) 15)) :COLLECT N) (FLET ((BOOLE-N (N INTEGER &REST MORE-INTEGERS) (APPLY #'BOOLE (ELT BOOLE-N-VECTOR N) INTEGER MORE-INTEGERS))) (LOOP :FOR N :FROM 0 :TO 15 :COLLECT (BOOLE-N N 5 3))))) EQUAL-OK: (NIL (0 1 2 3 4 5 6 7 -8 -7 -6 -5 -4 -3 -2 -1)) (LOOP :FOR I :FROM 1 :TO 100 :COLLECT (LIST I (INTEGER-LENGTH (! I)))) EQUAL-OK: ((1 1) (2 2) (3 3) (4 5) (5 7) (6 10) (7 13) (8 16) (9 19) (10 22) (11 26) (12 29) (13 33) (14 37) (15 41) (16 45) (17 49) (18 53) (19 57) (20 62) (21 66) (22 70) (23 75) (24 80) (25 84) (26 89) (27 94) (28 98) (29 103) (30 108) (31 113) (32 118) (33 123) (34 128) (35 133) (36 139) (37 144) (38 149) (39 154) (40 160) (41 165) (42 170) (43 176) (44 181) (45 187) (46 192) (47 198) (48 203) (49 209) (50 215) (51 220) (52 226) (53 232) (54 238) (55 243) (56 249) (57 255) (58 261) (59 267) (60 273) (61 279) (62 285) (63 290) (64 296) (65 303) (66 309) (67 315) (68 321) (69 327) (70 333) (71 339) (72 345) (73 351) (74 358) (75 364) (76 370) (77 376) (78 383) (79 389) (80 395) (81 402) (82 408) (83 414) (84 421) (85 427) (86 434) (87 440) (88 447) (89 453) (90 459) (91 466) (92 473) (93 479) (94 486) (95 492) (96 499) (97 505) (98 512) (99 519) (100 525)) (MULTIPLE-VALUE-LIST (INTEGER-DECODE-FLOAT 1.0d23)) EQUAL-OK: (5960464477539062 24 1) (PRIN1-TO-STRING 1.0d22) EQUAL-OK: "1.0d22" (PRIN1-TO-STRING 1.0d23) EQUAL-OK: "1.0d23" (PRIN1-TO-STRING 1.0d24) EQUAL-OK: "1.0d24" (LOOP :FOR I :FROM -200 :UPTO 200 :FOR S = (FORMAT NIL "1.0d~d" I) :FOR X = (READ-FROM-STRING S) :UNLESS (OR (<= -3 I 6) (STRING= (PRIN1-TO-STRING X) S)) :COLLECT (LIST I S X)) EQL-OK: NIL (DEFUN TEST-FLOAT-IO-CONSISTENCY (&KEY FROM TO BY REPEAT) (LOOP :FOR MAX = FROM :THEN (* BY MAX) :WHILE (< MAX TO) :NCONC (LOOP :REPEAT REPEAT :FOR X = (RANDOM MAX) :FOR Y = (IF (ZEROP (RANDOM 2)) X (- X)) :UNLESS (= Y (READ-FROM-STRING (PRIN1-TO-STRING Y))) :COLLECT (CONS Y (MULTIPLE-VALUE-LIST (INTEGER-DECODE-FLOAT Y)))))) WARNING: LOOP: FOR clauses should occur before the loop's main body WARNING: LOOP: FOR clauses should occur before the loop's main body EQL-OK: TEST-FLOAT-IO-CONSISTENCY (TEST-FLOAT-IO-CONSISTENCY :FROM 1.0s-30 :BY 10 :TO 1.0s30 :REPEAT 100) EQL-OK: NIL (TEST-FLOAT-IO-CONSISTENCY :FROM 1.0E-30 :BY 10 :TO 1.0E30 :REPEAT 100) EQL-OK: NIL (TEST-FLOAT-IO-CONSISTENCY :FROM 1.0d-300 :BY 100 :TO 1.0d300 :REPEAT 10) EQL-OK: NIL (TEST-FLOAT-IO-CONSISTENCY :FROM 1.0L-3000 :BY 1000 :TO 1.0L3000 :REPEAT 10) EQL-OK: NIL (LOOP :REPEAT 6400 :FOR X = -100.0L0 :THEN (+ X 0.03125L0) :FOR (X1 X2) = (MULTIPLE-VALUE-LIST (ROUND X)) :FOR (X3 X4) = (MULTIPLE-VALUE-LIST (ROUND (FLOAT X 1.0s0))) :UNLESS (AND (= X1 X3) (= X2 X4)) :COLLECT (LIST X X1 X2 X3 X4)) WARNING: LOOP: FOR clauses should occur before the loop's main body WARNING: LOOP: FOR clauses should occur before the loop's main body WARNING: LOOP: FOR clauses should occur before the loop's main body EQL-OK: NIL (NUMBERP (LOG INTERNAL-TIME-UNITS-PER-SECOND)) EQL-OK: T (LOOP :FOR X :IN '(2.0s0 2.0 2.0d0 2.0L0 -2.0s0 -2.0 -2.0d0 -2.0L0) :ALWAYS (PLUSP (IMAGPART (ATANH (COMPLEX X (FLOAT 0 X)))))) EQL-OK: T (LOOP :FOR X :IN '(2.0s0 2.0 2.0d0 2.0L0 -2.0s0 -2.0 -2.0d0 -2.0L0) :ALWAYS (PLUSP (IMAGPART (ATANH X)))) EQL-OK: T (LOOP :WITH MIN = (ASH 1 64) :WITH MAX = (- (ASH 1 200) MIN) :REPEAT 100 :FOR B = (+ MIN (RANDOM MAX)) :FOR S = (SXHASH B) :FOR B1 = (LOGXOR B (ASH 1 (FLOOR (INTEGER-LENGTH B) 2))) :FOR S1 = (SXHASH B1) :WHEN (= S S1) :COLLECT (LIST B S B1 S1)) WARNING: LOOP: FOR clauses should occur before the loop's main body WARNING: LOOP: FOR clauses should occur before the loop's main body WARNING: LOOP: FOR clauses should occur before the loop's main body WARNING: LOOP: FOR clauses should occur before the loop's main body EQL-OK: NIL (TANH 1.0s13) EQL-OK: 1.0s0 (TANH 1000.0s0) EQL-OK: 1.0s0 (TANH 100.0s0) EQL-OK: 1.0s0 (TANH 10.0s0) EQL-OK: 1.0s0 (TANH 1.0s0) EQL-OK: 0.7616s0 (TANH 1.0) EQL-OK: 0.7615942 (TANH 1.0d0) EQL-OK: 0.7615941559557649d0 (TANH 1.0L0) EQL-OK: 0.7615941559557648881L0 (TANH 10.0) EQL-OK: 1.0 (TANH 10.0d0) EQL-OK: 0.9999999958776927d0 (TANH 10.0L0) EQL-OK: 0.9999999958776927636L0 (TANH 1.0L100) EQL-OK: 1.0L0 (TANH 1.0d100) EQL-OK: 1.0d0 (TANH 1.0E10) EQL-OK: 1.0 (TANH 1.0s10) EQL-OK: 1.0s0 (TANH 1.0d-10) EQL-OK: 1.0d-10 (TANH 1.0L-10) EQL-OK: 1.0L-10 (TANH 1.0L-17) EQL-OK: 1.0L-17 (TANH 1.0L-47) EQL-OK: 1.0L-47 (= (FLOAT (REALPART (LOG (COERCE #C(1.0d0 1.0d-8) '(COMPLEX LONG-FLOAT)))) 0.0d0) (REALPART (LOG #C(1.0d0 1.0d-8)))) EQL-OK: T (= (FLOAT (REALPART (LOG (COERCE #C(1.000000001d0 1.0d-5) '(COMPLEX LONG-FLOAT)))) 0.0d0) (REALPART (LOG #C(1.000000001d0 1.0d-5)))) EQL-OK: T (COERCE 1 'DOUBLE-FLOAT) EQL-OK: 1.0d0 (COERCE 1 '(DOUBLE-FLOAT 0.0d0)) EQL-OK: 1.0d0 (COERCE 1 '(DOUBLE-FLOAT * *)) EQL-OK: 1.0d0 (COERCE 1 '(DOUBLE-FLOAT * -1.0d0)) [SIMPLE-TYPE-ERROR]: COERCE: 1 cannot be coerced to type #1=(DOUBLE-FLOAT * -1.0d0) EQL-OK: ERROR (+ (LOG MOST-POSITIVE-SHORT-FLOAT) (LOG LEAST-POSITIVE-SHORT-FLOAT)) EQL-OK: 1.38574s0 (+ (LOG MOST-POSITIVE-SINGLE-FLOAT) (LOG LEAST-POSITIVE-SINGLE-FLOAT)) EQL-OK: 1.3862915 (+ (LOG MOST-POSITIVE-DOUBLE-FLOAT) (LOG LEAST-POSITIVE-DOUBLE-FLOAT)) EQL-OK: 1.3862943611198943d0 (+ (LOG MOST-POSITIVE-LONG-FLOAT) (LOG LEAST-POSITIVE-LONG-FLOAT)) EQL-OK: -0.69314718060195446014L0 (MAPCAR #'LOG '(1.0s0 1.0 1.0d0 1.0L0)) EQUAL-OK: (0.0s0 0.0 0.0d0 0.0L0) (< (EXPT 10 -100) LEAST-POSITIVE-SHORT-FLOAT) EQL-OK: T (WITHOUT-FLOATING-POINT-UNDERFLOW (= (+ LEAST-POSITIVE-SHORT-FLOAT (EXPT 10 -100)) LEAST-POSITIVE-SHORT-FLOAT)) EQL-OK: T (DEFUN FLOAT-RATIONAL-CMP (X &OPTIONAL (SCALE 10)) (LET* ((R (RATIONAL X)) (N (NUMERATOR R)) (D (DENOMINATOR R)) (Y (/ (1+ (* SCALE N)) (1+ (* SCALE D)))) (Z (/ (1+ (* SCALE SCALE N)) (1+ (* SCALE D))))) (LIST (= Y X) (OR (< (- X) X Z) (> (- X) X Z)) (OR (< 1 Y X) (> 1 Y X))))) EQL-OK: FLOAT-RATIONAL-CMP (FLOAT-RATIONAL-CMP PI) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP (FLOAT PI 1.0d0)) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP (FLOAT PI 1.0)) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP (FLOAT PI 1.0s0)) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP (FLOAT PI -1.0d0)) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP (FLOAT PI -1.0)) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP (FLOAT PI -1.0s0)) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP (/ PI)) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP (FLOAT (/ PI) 1.0d0)) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP (FLOAT (/ PI) 1.0)) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP (FLOAT (/ PI) 1.0s0)) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP MOST-POSITIVE-SHORT-FLOAT) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP LEAST-POSITIVE-SHORT-FLOAT) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP MOST-POSITIVE-SINGLE-FLOAT) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP LEAST-POSITIVE-SINGLE-FLOAT) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP MOST-POSITIVE-DOUBLE-FLOAT) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP LEAST-POSITIVE-DOUBLE-FLOAT) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP MOST-NEGATIVE-SHORT-FLOAT) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP LEAST-NEGATIVE-SHORT-FLOAT) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP MOST-NEGATIVE-SINGLE-FLOAT) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP LEAST-NEGATIVE-SINGLE-FLOAT) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP MOST-NEGATIVE-DOUBLE-FLOAT) EQUAL-OK: (NIL T T) (FLOAT-RATIONAL-CMP LEAST-NEGATIVE-DOUBLE-FLOAT) EQUAL-OK: (NIL T T) (LOG (ASH 1 10)) EQL-OK: 6.931472 (LOG (ASH 1 100)) EQL-OK: 69.31472 (LOG (ASH 1 1000)) EQL-OK: 693.14716 (LOG (ASH 1 10000)) EQL-OK: 6931.4717 (LOG (ASH 1 100000)) EQL-OK: 69314.72 (LOG (/ (1+ (ASH 1 100000)) (ASH 1 1000))) EQL-OK: 68621.57 (LOG (/ (ASH 1 100000) (ASH 1 1000))) EQL-OK: 68621.57 (LOG (ASH 1 100000)) EQL-OK: 69314.72 (LOG (EXPT 234 108) 10) EQL-OK: 255.8753 (DEFMACRO CHECK-ERROR (FORM) `(BLOCK CHECK-ERROR (HANDLER-BIND ((ARITHMETIC-ERROR (LAMBDA (C) (PRINC-ERROR C) (RETURN-FROM CHECK-ERROR (CONS (ARITHMETIC-ERROR-OPERATION C) (ARITHMETIC-ERROR-OPERANDS C)))))) ,FORM))) EQL-OK: CHECK-ERROR (CHECK-ERROR (EXQUO 13 4)) [SIMPLE-ARITHMETIC-ERROR]: quotient 13 / 4 is not an integer EQUAL-OK: (EXQUO 4 13) (CHECK-ERROR (/ 0)) [SIMPLE-DIVISION-BY-ZERO]: /: division by zero EQUAL-OK: (/) (CHECK-ERROR (ASH 1 10000000)) [SIMPLE-ARITHMETIC-ERROR]: ASH: shift 10000000 is too large EQUAL-OK: (ASH 1 10000000) (CHECK-ERROR (FLOAT (ASH 1 100000) 0.0d0)) [SIMPLE-FLOATING-POINT-OVERFLOW]: FLOAT: floating point overflow EQUAL-OK: (FLOAT) (SYMBOLS-CLEANUP '(CHECK-XGCD CHECK-SQRT CHECK-MULT FLOAT-RATIONAL-CMP TEST-FUNCTION CHECK-ERROR)) EQL-OK: NIL RUN-TEST: finished "number2" (0 errors out of 331 tests) RUN-TEST: started # (PACKAGEP *PACKAGE*) EQL-OK: T (EVERY #'PACKAGEP (LIST-ALL-PACKAGES)) EQL-OK: T (AND (FIND-PACKAGE 'LISP) T) EQL-OK: T (AND (FIND-PACKAGE 'USER) T) EQL-OK: T (AND (FIND-PACKAGE 'KEYWORD) T) EQL-OK: T (AND (FIND-PACKAGE 'SYSTEM) T) EQL-OK: T (AND (FIND-PACKAGE 'SYS) T) EQL-OK: T (AND (FIND-PACKAGE "sys") T) EQL-OK: NIL (AND (FIND-PACKAGE "sys") T) EQL-OK: NIL (AND (FIND-PACKAGE "system") T) EQL-OK: NIL (AND (FIND-PACKAGE "SYSTEM") T) EQL-OK: T (AND (FIND-PACKAGE "SYS") T) EQL-OK: T (EQ (FIND-PACKAGE (FIND-PACKAGE "CL")) (FIND-PACKAGE "CL")) EQL-OK: T (DEFPARAMETER COMMON-LISP-USER::*SAVED-PACKAGE* *PACKAGE*) EQL-OK: COMMON-LISP-USER::*SAVED-PACKAGE* (FIND "SYS" (PACKAGE-NICKNAMES 'SYS) :TEST #'STRING=) EQUAL-OK: "SYS" (PACKAGE-NAME 'SYS) EQUAL-OK: "SYSTEM" (PACKAGE-NAME 'SYSTEM) EQUAL-OK: "SYSTEM" (PACKAGE-NAME "COMMON-LISP-USER") EQUAL-OK: "COMMON-LISP-USER" (PACKAGE-NAME "SYS") EQUAL-OK: "SYSTEM" (LET ((P (MAKE-PACKAGE #\p))) (PROG1 (EQ P (FIND-PACKAGE #\p)) (DELETE-PACKAGE P))) EQL-OK: T (PROGN (MAKE-PACKAGE #\p) (DELETE-PACKAGE #\p)) EQL-OK: T (PACKAGE-NAME (MAKE-PACKAGE 'PACK11-P1 :NICKNAMES '(T1 TST1))) EQUAL-OK: "PACK11-P1" (PACKAGE-NAME (RENAME-PACKAGE (FIND-PACKAGE "PACK11-P1") (FIND-PACKAGE "PACK11-P1"))) EQUAL-OK: "PACK11-P1" (AND (IN-PACKAGE "PACK11-P1") T) EQL-OK: T (EXPORT '(TEST1-Y TEST1-Z) (FIND-PACKAGE '"PACK11-P1")) EQL-OK: T (EXPORT '(TEST1-A TEST1-B TEST1-C) (FIND-PACKAGE 'PACK11-P1)) EQL-OK: T (SETF TEST1-A -2 TEST1-B -1 TEST1-C 0 TEST1-X 1 TEST1-Y 2 TEST1-Z 3) EQL-OK: 3 (PACKAGE-NAME (DEFPACKAGE PACK11-P2 (:NICKNAMES "PACK11-T2" "PACK11-TST2") (:USE PACK11-P1))) EQUAL-OK: "PACK11-P2" (PROGN (IN-PACKAGE "PACK11-P2") T) EQL-OK: COMMON-LISP:T (COMMON-LISP:PACKAGE-NAME (COMMON-LISP:FIND-PACKAGE 'PACK11-P2)) EQUAL-OK: "PACK11-P2" (COMMON-LISP:PACKAGE-NAME COMMON-LISP:*PACKAGE*) EQUAL-OK: "PACK11-P2" (COMMON-LISP:IMPORT '(COMMON-LISP:ERROR) (COMMON-LISP:FIND-PACKAGE 'PACK11-P2)) EQL-OK: COMMON-LISP:T (COMMON-LISP:AND (COMMON-LISP:BOUNDP 'TEST1-X) TEST1-X) EQL-OK: COMMON-LISP:NIL (COMMON-LISP:UNINTERN 'TEST1-X) EQL-OK: COMMON-LISP:T (EVAL (READ-FROM-STRING "(cl:and (cl:boundp 'pack11-p1:test1-x) pack11-p1:test1-x)")) [SIMPLE-UNDEFINED-FUNCTION]: COMMON-LISP:EVAL: undefined function EVAL EQL-OK: ERROR (COMMON-LISP:AND (COMMON-LISP:BOUNDP 'PACK11-P1::TEST1-X) PACK11-P1::TEST1-X) EQL-OK: 1 (COMMON-LISP:AND (COMMON-LISP:BOUNDP 'TEST1-Y) TEST1-Y) EQL-OK: 2 (COMMON-LISP:UNINTERN 'TEST1-Y) EQL-OK: COMMON-LISP:NIL (COMMON-LISP:AND (COMMON-LISP:BOUNDP 'TEST1-Y) TEST1-Y) EQL-OK: 2 (COMMON-LISP:AND (COMMON-LISP:BOUNDP 'TEST1-Y) TEST1-Y) EQL-OK: 2 (COMMON-LISP:IMPORT '(PACK11-P1::TEST1-X TEST1-Y) (COMMON-LISP:FIND-PACKAGE 'PACK11-P2)) EQL-OK: COMMON-LISP:T (COMMON-LISP:AND (COMMON-LISP:BOUNDP 'TEST1-X) TEST1-X) EQL-OK: 1 (EVAL (READ-FROM-STRING "(cl:and (cl:boundp 'pack11-p1:test1-x) pack11-p1:test1-x)")) [SIMPLE-UNDEFINED-FUNCTION]: COMMON-LISP:EVAL: undefined function EVAL EQL-OK: ERROR (COMMON-LISP:AND (COMMON-LISP:BOUNDP 'TEST1-X) TEST1-X) EQL-OK: 1 (COMMON-LISP:AND (COMMON-LISP:BOUNDP 'TEST1-Z) TEST1-Z) EQL-OK: 3 (COMMON-LISP:UNINTERN 'TEST1-Z (COMMON-LISP:FIND-PACKAGE 'PACK11-P2)) EQL-OK: COMMON-LISP:NIL (COMMON-LISP:AND (COMMON-LISP:BOUNDP 'TEST1-Z) TEST1-Z) EQL-OK: 3 TEST1-Z EQL-OK: 3 (COMMON-LISP:UNEXPORT '(TEST1-X TEST1-Y) (COMMON-LISP:FIND-PACKAGE 'PACK11-P1)) EQL-OK: COMMON-LISP:T (COMMON-LISP:AND (COMMON-LISP:BOUNDP 'TEST1-X) TEST1-X) EQL-OK: 1 (COMMON-LISP:AND (COMMON-LISP:BOUNDP 'TEST1-Y) TEST1-Y) EQL-OK: 2 (COMMON-LISP:UNINTERN 'TEST1-X (COMMON-LISP:FIND-PACKAGE 'PACK11-P2)) EQL-OK: COMMON-LISP:T (EVAL (READ-FROM-STRING "pack11-p1:test1-x")) [SIMPLE-UNDEFINED-FUNCTION]: COMMON-LISP:EVAL: undefined function EVAL EQL-OK: ERROR PACK11-P1::TEST1-X EQL-OK: 1 TEST1-Z EQL-OK: 3 (COMMON-LISP:UNINTERN 'TEST1-Z (COMMON-LISP:FIND-PACKAGE 'PACK11-P2)) EQL-OK: COMMON-LISP:NIL TEST1-Z EQL-OK: 3 TEST1-Z EQL-OK: 3 (COMMON-LISP:IMPORT 'TEST1-Z (COMMON-LISP:FIND-PACKAGE 'PACK11-P2)) EQL-OK: COMMON-LISP:T TEST1-Z EQL-OK: 3 TEST1-Z EQL-OK: 3 TEST1-Z EQL-OK: 3 TEST1-C EQL-OK: 0 (COMMON-LISP:UNINTERN 'TEST-C (COMMON-LISP:FIND-PACKAGE 'PACK11-P2)) EQL-OK: COMMON-LISP:T TEST1-C EQL-OK: 0 TEST1-C EQL-OK: 0 (COMMON-LISP:IMPORT '(TEST1-A TEST1-B TEST1-C) (COMMON-LISP:FIND-PACKAGE 'PACK11-P2)) EQL-OK: COMMON-LISP:T TEST1-C EQL-OK: 0 TEST1-C EQL-OK: 0 TEST1-C EQL-OK: 0 (COMMON-LISP:EQ 'TEST1-C 'TEST1-C) EQL-OK: COMMON-LISP:T (COMMON-LISP:PACKAGEP (COMMON-LISP:MAKE-PACKAGE "PACK11")) EQL-OK: COMMON-LISP:T (COMMON-LISP:AND (COMMON-LISP:IN-PACKAGE "PACK11") COMMON-LISP:T) EQL-OK: T (SETF X 1 Y 2 Z 3) EQL-OK: 3 (AND (DEFPACKAGE "PACK11-EDITOR") T) EQL-OK: T (AND (IN-PACKAGE "PACK11-EDITOR") T) EQL-OK: T (UNINTERN 'X) EQL-OK: T (UNINTERN 'Y) EQL-OK: T (UNINTERN 'Z) EQL-OK: T PACK11::X EQL-OK: 1 (EVAL (READ-FROM-STRING "pack11:x")) [SIMPLE-PACKAGE-ERROR]: READ from #: #1=# has no external symbol with name "X" EQL-OK: ERROR X [SIMPLE-UNBOUND-VARIABLE]: EVAL: variable X has no value EQL-OK: ERROR (EQ 'X 'PACK11::X) EQL-OK: NIL (UNINTERN 'X) EQL-OK: T (EXPORT '(PACK11::X PACK11::Y) (FIND-PACKAGE 'PACK11)) EQL-OK: T PACK11:X EQL-OK: 1 PACK11:X EQL-OK: 1 X [SIMPLE-UNBOUND-VARIABLE]: EVAL: variable X has no value EQL-OK: ERROR (UNINTERN 'X) EQL-OK: T (IMPORT 'PACK11:X (FIND-PACKAGE 'PACK11-EDITOR)) EQL-OK: T X EQL-OK: 1 (EQ 'X 'X) EQL-OK: T (EQ 'X 'X) EQL-OK: T (EQ 'X 'X) EQL-OK: T (AND (IN-PACKAGE "PACK11") T) EQL-OK: T (UNEXPORT 'Y) EQL-OK: T (AND (IN-PACKAGE "PACK11-EDITOR") T) EQL-OK: T Y [SIMPLE-UNBOUND-VARIABLE]: EVAL: variable Y has no value EQL-OK: ERROR (EVAL (READ-FROM-STRING "pack11:y")) [SIMPLE-PACKAGE-ERROR]: READ from #: #1=# has no external symbol with name "Y" EQL-OK: ERROR PACK11::Y EQL-OK: 2 (AND (IN-PACKAGE "PACK11") (PACKAGE-NAME *PACKAGE*)) EQUAL-OK: "PACK11" (EXT:APPEASE-CERRORS (LET ((*PACKAGE* "not a package - just a string")) (MULTIPLE-VALUE-LIST (READ-FROM-STRING "READ-FROM-STRING")))) WARNING: The value of *PACKAGE* was not a package and was reset. The old value was "not a package - just a string". The new value is #. Proceed with the new value. EQUAL-OK: (READ-FROM-STRING 16) (LET ((TMP-SYM (MAKE-SYMBOL "FOO")) (OLD-SYM (FIND-SYMBOL "FOO" "PACK11"))) (WHEN OLD-SYM (UNINTERN OLD-SYM "PACK11")) (LIST (IMPORT TMP-SYM "PACK11") (PACKAGE-NAME (SYMBOL-PACKAGE TMP-SYM)) (UNINTERN TMP-SYM "PACK11") (FIND-SYMBOL "FOO" "PACK11"))) EQUAL-OK: (T "PACK11" T NIL) (SETF D 4 E 5 F 6 Y 111 X 222) EQL-OK: 222 (EXPORT '(A B C Y X) (FIND-PACKAGE 'PACK11)) EQL-OK: T (IMPORT '(A B C Y) (FIND-PACKAGE 'PACK11-EDITOR)) [SIMPLE-PACKAGE-ERROR]: Importing Y into #1=# produces a name conflict with PACK11-EDITOR::Y. EQL-OK: ERROR (AND (MAKE-PACKAGE 'PACK11-SHADOW) (IN-PACKAGE "PACK11-SHADOW") T) EQL-OK: T (SETF X 'PACK11-SHADOW) EQL-OK: PACK11-SHADOW (SHADOWING-IMPORT '(PACK11::D PACK11::E PACK11::F PACK11:X) (FIND-PACKAGE 'PACK11-SHADOW)) EQL-OK: T X EQL-OK: 222 (EQ X X) EQL-OK: T (SHADOW '(E #\F) (FIND-PACKAGE 'PACK11-SHADOW)) EQL-OK: T (SETF E 'PACK11-SHADOW-E) EQL-OK: PACK11-SHADOW-E (EQ 'E 'E) EQL-OK: T E EQL-OK: PACK11-SHADOW-E (EVAL (READ-FROM-STRING "pack11:e")) [SIMPLE-PACKAGE-ERROR]: READ from #: #1=# has no external symbol with name "E" EQL-OK: ERROR E EQL-OK: PACK11-SHADOW-E (PROGN (SETQ PG3 (MAKE-PACKAGE "PACK11-G3") PG1 (MAKE-PACKAGE "PACK11-G1" :USE (LIST PG3)) PG2 (MAKE-PACKAGE "PACK11-G2" :USE (LIST PG3)) PH (MAKE-PACKAGE "PACK11-H" :USE (LIST PG1 PG2))) (SHADOW "FOO" PH)) EQL-OK: T (SETQ GSYM (INTERN "FOO" PG3)) EQL-OK: PACK11-G3::FOO (EXPORT GSYM PG3) EQL-OK: T (EXPORT GSYM PG1) EQL-OK: T (EXPORT GSYM PG2) EQL-OK: T (MULTIPLE-VALUE-LIST (SETF (VALUES SYM ACCESS) (FIND-SYMBOL "FOO" PH))) EQUAL-OK: (PACK11-H::FOO :INTERNAL) (PACKAGE-SHADOWING-SYMBOLS PH) EQUAL-OK: (PACK11-H::FOO) (EQ SYM GSYM) EQL-OK: NIL (EQUAL (SYMBOL-PACKAGE SYM) PH) EQL-OK: T (UNINTERN SYM PH) EQL-OK: T (SETF (EXT:PACKAGE-LOCK PH) T) EQL-OK: T (SYMBOL-NAME (EXT:MUFFLE-CERRORS (READ-FROM-STRING "PACK11-H::QUUX"))) EQUAL-OK: "QUUX" (SETF (EXT:PACKAGE-LOCK PH) NIL) EQL-OK: NIL (DELETE-PACKAGE PH) EQL-OK: T (DELETE-PACKAGE PG1) EQL-OK: T (DELETE-PACKAGE PG2) EQL-OK: T (DELETE-PACKAGE PG3) EQL-OK: T (DELETE-PACKAGE "PACK11-P2") EQL-OK: T (DELETE-PACKAGE "PACK11-P1") EQL-OK: T (AND (MAKE-PACKAGE 'PACK11-USE) (IN-PACKAGE "PACK11-USE") T) EQL-OK: T (USE-PACKAGE '(PACK11)) EQL-OK: T PACK11::D EQL-OK: 4 (EVAL (READ-FROM-STRING "pack11:d")) [SIMPLE-PACKAGE-ERROR]: READ from #: #1=# has no external symbol with name "D" EQL-OK: ERROR D [SIMPLE-UNBOUND-VARIABLE]: EVAL: variable D has no value EQL-OK: ERROR (UNUSE-PACKAGE 'PACK11) EQL-OK: T PACK11::D EQL-OK: 4 (EVAL (READ-FROM-STRING "pack11:d")) [SIMPLE-PACKAGE-ERROR]: READ from #: #1=# has no external symbol with name "D" EQL-OK: ERROR D [SIMPLE-UNBOUND-VARIABLE]: EVAL: variable D has no value EQL-OK: ERROR (AND (MAKE-PACKAGE 'PACK11-INHERIT :NICKNAMES '(INH I)) (IN-PACKAGE "PACK11-INHERIT") T) EQL-OK: T (SETF A 'INHERITA B 'INHERITB) EQL-OK: INHERITB (EXPORT '(A B) (FIND-PACKAGE 'PACK11-INHERIT)) EQL-OK: T (AND (MAKE-PACKAGE 'PACK11-INHERIT1 :USE '(PACK11-INHERIT)) (IN-PACKAGE "PACK11-INHERIT1") T) EQL-OK: COMMON-LISP:T A EQL-OK: PACK11-INHERIT::INHERITA B EQL-OK: PACK11-INHERIT::INHERITB (COMMON-LISP:SETF C 'INHERIT1C) EQL-OK: INHERIT1C (COMMON-LISP:AND (COMMON-LISP:MAKE-PACKAGE 'PACK11-INHERIT2 :USE '(PACK11-INHERIT1)) (COMMON-LISP:IN-PACKAGE "PACK11-INHERIT2") COMMON-LISP:T) EQL-OK: COMMON-LISP:T A [SIMPLE-UNBOUND-VARIABLE]: COMMON-LISP:EVAL: variable A has no value EQL-OK: COMMON-LISP:ERROR B [SIMPLE-UNBOUND-VARIABLE]: COMMON-LISP:EVAL: variable B has no value EQL-OK: COMMON-LISP:ERROR C [SIMPLE-UNBOUND-VARIABLE]: COMMON-LISP:EVAL: variable C has no value EQL-OK: COMMON-LISP:ERROR (EVAL (READ-FROM-STRING "(cl:eq 'c 'pack11-inherit1:c)")) [SIMPLE-UNDEFINED-FUNCTION]: COMMON-LISP:EVAL: undefined function EVAL EQL-OK: COMMON-LISP:ERROR (EVAL (READ-FROM-STRING "(cl:eq 'a 'pack11-inherit:a)")) [SIMPLE-UNDEFINED-FUNCTION]: COMMON-LISP:EVAL: undefined function EVAL EQL-OK: COMMON-LISP:ERROR (EVAL (READ-FROM-STRING "(cl:eq 'b 'pack11-inherit:b)")) [SIMPLE-UNDEFINED-FUNCTION]: COMMON-LISP:EVAL: undefined function EVAL EQL-OK: COMMON-LISP:ERROR (COMMON-LISP:EQ 'C 'PACK11-INHERIT1::C) EQL-OK: COMMON-LISP:NIL (COMMON-LISP:EQ 'A 'PACK11-INHERIT:A) EQL-OK: COMMON-LISP:NIL (COMMON-LISP:EQ 'B 'PACK11-INHERIT:B) EQL-OK: COMMON-LISP:NIL (COMMON-LISP:AND (COMMON-LISP:IN-PACKAGE "PACK11") COMMON-LISP:T) EQL-OK: T (DELETE-PACKAGE "PACK11-EDITOR") EQL-OK: T (DELETE-PACKAGE "PACK11-SHADOW") EQL-OK: T (DELETE-PACKAGE "PACK11-USE") EQL-OK: T (DELETE-PACKAGE "PACK11-INHERIT2") EQL-OK: T (DELETE-PACKAGE "PACK11-INHERIT1") EQL-OK: T (DELETE-PACKAGE "PACK11-INHERIT") EQL-OK: T (AND (MEMBER 'X (SETF S (FIND-ALL-SYMBOLS 'X))) T) EQL-OK: T (EVAL (READ-FROM-STRING "(and (member 'pack11-editor:x s) t)")) [SIMPLE-PACKAGE-ERROR]: READ from #: there is no package with name #1="PACK11-EDITOR" EQL-OK: ERROR (AND (MEMBER 'X (SETF S1 (FIND-ALL-SYMBOLS 'X))) T) EQL-OK: T (SET-DIFFERENCE S S1) EQL-OK: NIL (SETF SYM NIL ESYM NIL ASYM NIL) EQL-OK: NIL (DO-SYMBOLS (S (FIND-PACKAGE 'PACK11)) (PUSH (SYMBOL-NAME S) SYM)) EQL-OK: NIL (DO-EXTERNAL-SYMBOLS (S (FIND-PACKAGE 'PACK11)) (PUSH (SYMBOL-NAME S) ESYM)) EQL-OK: NIL (DO-ALL-SYMBOLS (S) (PUSH (SYMBOL-NAME S) ASYM)) EQL-OK: NIL (FIND "ESYM" SYM :TEST #'STRING=) EQUAL-OK: "ESYM" (FIND "ESYM" ESYM :TEST #'STRING=) EQL-OK: NIL (FIND "LAMBDA-LIST-KEYWORDS" ESYM :TEST #'STRING=) EQL-OK: NIL (AND *MODULES* T) EQL-OK: NIL (LET ((*MODULES* *MODULES*)) (PROVIDE 'PROVIDE-TEST) (FIND "PROVIDE-TEST" *MODULES* :TEST #'STRING=)) EQUAL-OK: "PROVIDE-TEST" (UNLESS (MEMBER "z" *MODULES* :TEST #'STRING=) (LET ((*MODULES* *MODULES*)) (PROVIDE "z") (REQUIRE #\z) NIL)) EQL-OK: NIL (LET ((*MODULES* *MODULES*)) (PROVIDE :ABAZONK) (NOT (MEMBER :ABAZONK *MODULES* :TEST #'STRING=))) EQL-OK: NIL (DEFUN TEST-PACKAGE-ITERATOR (PACKAGE) (UNLESS (PACKAGEP PACKAGE) (SETQ PACKAGE (FIND-PACKAGE PACKAGE))) (LET ((ALL-ENTRIES 'NIL) (GENERATED-ENTRIES 'NIL)) (DO-SYMBOLS (X PACKAGE) (MULTIPLE-VALUE-BIND (SYMBOL ACCESSIBILITY) (FIND-SYMBOL (SYMBOL-NAME X) PACKAGE) (PUSH (LIST SYMBOL ACCESSIBILITY) ALL-ENTRIES))) (WITH-PACKAGE-ITERATOR (GENERATOR-FN PACKAGE :INTERNAL :EXTERNAL :INHERITED) (LOOP (MULTIPLE-VALUE-BIND (MORE? SYMBOL ACCESSIBILITY PKG) (GENERATOR-FN) (DECLARE (IGNORE PKG)) (UNLESS MORE? (RETURN)) (LET ((L (MULTIPLE-VALUE-LIST (FIND-SYMBOL (SYMBOL-NAME SYMBOL) PACKAGE)))) (UNLESS (EQUAL L (LIST SYMBOL ACCESSIBILITY)) (ERROR "Symbol ~S not found as ~S in package ~A [~S]" SYMBOL ACCESSIBILITY (PACKAGE-NAME PACKAGE) L)) (PUSH L GENERATED-ENTRIES))))) (UNLESS (AND (SUBSETP ALL-ENTRIES GENERATED-ENTRIES :TEST #'EQUAL) (SUBSETP GENERATED-ENTRIES ALL-ENTRIES :TEST #'EQUAL)) (ERROR "Generated entries and Do-Symbols entries do not correspond")) T)) EQL-OK: TEST-PACKAGE-ITERATOR (COMPILE 'TEST-PACKAGE-ITERATOR) EQL-OK: TEST-PACKAGE-ITERATOR (TEST-PACKAGE-ITERATOR :COMMON-LISP-USER) EQL-OK: T (TEST-PACKAGE-ITERATOR :COMMON-LISP) EQL-OK: T (PROGN (DEFCONSTANT +FAIL-COUNT-LIMIT+ 20) (DEFMACRO TEST-WITH-PACKAGE-ITERATOR (PACKAGE-LIST-EXPR &REST SYMBOL-TYPES) "Build an expression that tests the with-package-iterator form." (LET ((NAME (GENSYM)) (CHT-VAR (GENSYM)) (PKG-LIST-VAR (GENSYM))) `(LET ((,CHT-VAR (MAKE-HASH-TABLE)) (,PKG-LIST-VAR ,PACKAGE-LIST-EXPR) (FAIL-COUNT 0)) (WITH-PACKAGE-ITERATOR (,NAME ,PKG-LIST-VAR ,@(COPY-LIST SYMBOL-TYPES)) (LOOP (BLOCK FAIL (MULTIPLE-VALUE-BIND (MORE SYM ACCESS PKG) (,NAME) (UNLESS MORE (RETURN NIL)) (SETF (GETHASH SYM ,CHT-VAR) T) (UNLESS (MEMBER ACCESS ',(COPY-LIST SYMBOL-TYPES)) (UNLESS (> FAIL-COUNT +FAIL-COUNT-LIMIT+) (FORMAT T "Bad access type: ~S ==> ~A~%" SYM ACCESS)) (WHEN (= FAIL-COUNT +FAIL-COUNT-LIMIT+) (FORMAT T "Further messages suppressed~%")) (INCF FAIL-COUNT) (RETURN-FROM FAIL NIL)) (UNLESS (PACKAGEP PKG) (UNLESS (> FAIL-COUNT +FAIL-COUNT-LIMIT+) (FORMAT T "Not a package: ~S ==> ~S~%" SYM PKG)) (WHEN (= FAIL-COUNT +FAIL-COUNT-LIMIT+) (FORMAT T "Further messages suppressed~%")) (INCF FAIL-COUNT) (RETURN-FROM FAIL NIL)) (MULTIPLE-VALUE-BIND (SYM2 ACCESS2) (FIND-SYMBOL (SYMBOL-NAME SYM) PKG) (UNLESS (OR (EQ SYM SYM2) (MEMBER SYM2 (PACKAGE-SHADOWING-SYMBOLS PKG))) (UNLESS (> FAIL-COUNT +FAIL-COUNT-LIMIT+) (FORMAT T "Not same symbol: ~S ~S~%" SYM SYM2)) (WHEN (= FAIL-COUNT +FAIL-COUNT-LIMIT+) (FORMAT T "Further messages suppressed~%")) (INCF FAIL-COUNT) (RETURN-FROM FAIL NIL)) (UNLESS (EQ ACCESS ACCESS2) (UNLESS (> FAIL-COUNT +FAIL-COUNT-LIMIT+) (FORMAT T "Not same access type: ~S ~S ~S~%" SYM ACCESS ACCESS2)) (WHEN (= FAIL-COUNT +FAIL-COUNT-LIMIT+) (FORMAT T "Further messages suppressed~%")) (INCF FAIL-COUNT) (RETURN-FROM FAIL NIL))))))) (LOOP FOR P IN ,PKG-LIST-VAR DO (BLOCK FAIL (DO-SYMBOLS (SYM P) (MULTIPLE-VALUE-BIND (SYM2 ACCESS) (FIND-SYMBOL (SYMBOL-NAME SYM) P) (UNLESS (EQ SYM SYM2) (UNLESS (> FAIL-COUNT +FAIL-COUNT-LIMIT+) (FORMAT T "Not same symbol (2): ~S ~S~%" SYM SYM2)) (WHEN (= FAIL-COUNT +FAIL-COUNT-LIMIT+) (FORMAT T "Further messages suppressed~%")) (INCF FAIL-COUNT) (RETURN-FROM FAIL NIL)) (UNLESS (OR (NOT (MEMBER ACCESS ',(COPY-LIST SYMBOL-TYPES))) (GETHASH SYM ,CHT-VAR)) (FORMAT T "Symbol not found: ~S~%" SYM) (INCF FAIL-COUNT) (RETURN-FROM FAIL NIL)))))) (OR (ZEROP FAIL-COUNT) FAIL-COUNT)))) (DEFUN WITH-PACKAGE-ITERATOR-INTERNAL (PACKAGES) (TEST-WITH-PACKAGE-ITERATOR PACKAGES :INTERNAL)) (COMPILE 'WITH-PACKAGE-ITERATOR-INTERNAL) (DEFUN WITH-PACKAGE-ITERATOR-EXTERNAL (PACKAGES) (TEST-WITH-PACKAGE-ITERATOR PACKAGES :EXTERNAL)) (COMPILE 'WITH-PACKAGE-ITERATOR-EXTERNAL) (DEFUN WITH-PACKAGE-ITERATOR-INHERITED (PACKAGES) (TEST-WITH-PACKAGE-ITERATOR PACKAGES :INHERITED)) (COMPILE 'WITH-PACKAGE-ITERATOR-INHERITED) (DEFUN WITH-PACKAGE-ITERATOR-ALL (PACKAGES) (TEST-WITH-PACKAGE-ITERATOR PACKAGES :INTERNAL :EXTERNAL :INHERITED)) (COMPILE 'WITH-PACKAGE-ITERATOR-ALL) T) EQL-OK: T (WITH-PACKAGE-ITERATOR-INTERNAL (LIST (FIND-PACKAGE "COMMON-LISP-USER"))) EQL-OK: T (WITH-PACKAGE-ITERATOR-EXTERNAL (LIST (FIND-PACKAGE "COMMON-LISP-USER"))) EQL-OK: T (WITH-PACKAGE-ITERATOR-INHERITED (LIST (FIND-PACKAGE "COMMON-LISP-USER"))) EQL-OK: T (WITH-PACKAGE-ITERATOR-ALL (LIST (FIND-PACKAGE "COMMON-LISP-USER"))) EQL-OK: T (WITH-PACKAGE-ITERATOR-INTERNAL (LIST (FIND-PACKAGE "COMMON-LISP"))) EQL-OK: T (WITH-PACKAGE-ITERATOR-EXTERNAL (LIST (FIND-PACKAGE "COMMON-LISP"))) EQL-OK: T (WITH-PACKAGE-ITERATOR-INHERITED (LIST (FIND-PACKAGE "COMMON-LISP"))) EQL-OK: T (WITH-PACKAGE-ITERATOR-ALL (LIST (FIND-PACKAGE "COMMON-LISP"))) EQL-OK: T (WITH-PACKAGE-ITERATOR-INTERNAL (LIST (FIND-PACKAGE "COMMON-LISP-USER") (FIND-PACKAGE "COMMON-LISP"))) EQL-OK: T (WITH-PACKAGE-ITERATOR-EXTERNAL (LIST (FIND-PACKAGE "COMMON-LISP-USER") (FIND-PACKAGE "COMMON-LISP"))) EQL-OK: T (WITH-PACKAGE-ITERATOR-INHERITED (LIST (FIND-PACKAGE "COMMON-LISP-USER") (FIND-PACKAGE "COMMON-LISP"))) EQL-OK: T (WITH-PACKAGE-ITERATOR-ALL (LIST (FIND-PACKAGE "COMMON-LISP-USER") (FIND-PACKAGE "COMMON-LISP"))) EQL-OK: T (MAP NIL #'PRINT (LIST-ALL-PACKAGES)) # # # # # # # # # # # # # # # # # # # # EQL-OK: NIL (EXT:APPEASE-CERRORS (LET (SYSTEM::*COUTPUT-STREAM*) (SETQ SYSTEM::*COUTPUT-STREAM* 123))) WARNING: SETQ(SYSTEM::*COUTPUT-STREAM*): # is locked Ignore the lock and proceed EQL-OK: 123 (EXT:PACKAGE-CASE-SENSITIVE-P (MAKE-PACKAGE "PACK11-PACKAGE-CASE" :CASE-SENSITIVE T :CASE-INVERTED T)) EQL-OK: T (EXT:PACKAGE-CASE-INVERTED-P (DEFPACKAGE "PACK11-PACKAGE-CASE" (:CASE-SENSITIVE NIL) (:CASE-INVERTED NIL))) WARNING: One should not change the case sensitiveness of #. WARNING: One should not change the case inversion of #. EQL-OK: NIL (SETF (EXT:PACKAGE-CASE-INVERTED-P "PACK11-PACKAGE-CASE") T (EXT:PACKAGE-CASE-SENSITIVE-P "PACK11-PACKAGE-CASE") T) EQL-OK: T (LET ((*BREAK-ON-SIGNALS* 'WARNING)) (EXT:PACKAGE-CASE-SENSITIVE-P (DEFPACKAGE "PACK11-PACKAGE-CASE" (:CASE-INVERTED T) (:CASE-SENSITIVE T)))) EQL-OK: T (DELETE-PACKAGE "PACK11-PACKAGE-CASE") EQL-OK: T (PROGN (SETQ *PACKAGE* COMMON-LISP-USER::*SAVED-PACKAGE*) (DELETE-PACKAGE "PACK11")) EQL-OK: T (LET ((F "pack11-tst.lisp")) (UNWIND-PROTECT (PROGN (WITH-OPEN-FILE (OUT F :DIRECTION :OUTPUT) (PRINC ";; test non-top-level defpackage compilation (defmacro my-defpackage (name use) `(eval-when (:compile-toplevel :load-toplevel :execute) (let ((pkg (defpackage ,name (:use)))) (use-package '(,use) pkg) pkg))) (my-defpackage #:pack11-bar #:cl) (in-package #:pack11-bar) (defun baz (x) x) " OUT)) (LIST (CDR (MULTIPLE-VALUE-LIST (COMPILE-FILE F))) (EQUAL (PACKAGE-USE-LIST '#:PACK11-BAR) (LIST (FIND-PACKAGE '#:CL))))) (DELETE-PACKAGE '#:PACK11-BAR) (POST-COMPILE-FILE-CLEANUP F))) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/pack11-tst.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/pack11-tst.fas 0 errors, 0 warnings EQUAL-OK: ((NIL NIL) T) (SYMBOL-CLEANUP 'COMMON-LISP-USER::*SAVED-PACKAGE*) EQL-OK: NIL RUN-TEST: finished "pack11" (0 errors out of 211 tests) RUN-TEST: started # (SETF MY-STRING "path-tst-test-pathname.abc" MY-SYMBOL 'PATH-TST-TEST-PATHNAME.ABC) EQL-OK: PATH-TST-TEST-PATHNAME.ABC (SETF PATHSTRING (PATHNAME MY-STRING)) EQUAL-OK: #P"path-tst-test-pathname.abc" (SETF PATHSYMBOL (PATHNAME MY-SYMBOL)) EQUAL-OK: #P"path-tst-test-pathname.abc" (SETF PATHPATH (PATHNAME PATHSYMBOL)) EQUAL-OK: #P"path-tst-test-pathname.abc" (PROGN (SETF MY-STREAM (OPEN MY-STRING :DIRECTION :OUTPUT)) NIL) EQL-OK: NIL (MAPCAR #'PATHNAMEP (LIST PATHSTRING PATHSYMBOL PATHPATH)) EQUAL-OK: (T T T) (PARSE-NAMESTRING "") EQUAL-OK: #P"" (PARSE-NAMESTRING "./") EQUAL-OK: #P"./" (NAMESTRING #P"./") EQUAL-OK: "./" (PARSE-NAMESTRING MY-STRING) EQUAL-OK: #P"path-tst-test-pathname.abc" (PARSE-NAMESTRING MY-SYMBOL) EQUAL-OK: #P"path-tst-test-pathname.abc" (PARSE-NAMESTRING PATHSTRING) EQUAL-OK: #P"path-tst-test-pathname.abc" (PARSE-NAMESTRING "path-tst-test-pathname.abc" NIL) EQUAL-OK: #P"path-tst-test-pathname.abc" (PARSE-NAMESTRING "abc.123" NIL NIL :START 0 :END 5) EQUAL-OK: #P"abc.1" (PARSE-NAMESTRING "abc.123" NIL NIL :START 2 :END 5) EQUAL-OK: #P"c.1" (MAKE-PATHNAME :DEVICE NIL :DEFAULTS *DEFAULT-PATHNAME-DEFAULTS*) EQUAL-OK: #P"" (MAPCAR #'PATHNAMEP (LIST PATHSYMBOL PATHPATH PATHSTRING)) EQUAL-OK: (T T T) (PROGN (CLOSE MY-STREAM) T) EQL-OK: T (PATHNAME "*.*") EQUAL-OK: #P"*.*" (PROGN (SETF MY-FILE (OPEN "path-tst-non-existent-file.non" :DIRECTION :INPUT :ELEMENT-TYPE 'STRING-CHAR :IF-DOES-NOT-EXIST :CREATE)) T) EQL-OK: T (NULL (PROBE-FILE "path-tst-non-existent-file.non")) EQL-OK: NIL (PROGN (CLOSE MY-FILE) T) EQL-OK: T (SETF MY-FILE (OPEN "path-tst-non-existent-file.non" :DIRECTION :IO :ELEMENT-TYPE 'STRING-CHAR :IF-EXISTS :ERROR)) [SIMPLE-FILE-ERROR]: OPEN: File #1=#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-non-existent-file.non" already exists EQL-OK: ERROR (PROGN (CLOSE MY-FILE) T) EQL-OK: T (NULL (SETF MY-FILE (OPEN "path-tst-non-existent-file.non" :DIRECTION :IO :ELEMENT-TYPE 'STRING-CHAR :IF-EXISTS :NEW-VERSION))) EQL-OK: NIL (PROGN (CLOSE MY-FILE) T) EQL-OK: T (NULL (SETF MY-FILE (OPEN "path-tst-non-existent-file.non" :DIRECTION :IO :ELEMENT-TYPE 'STRING-CHAR :IF-EXISTS :RENAME))) EQL-OK: NIL (PROGN (CLOSE MY-FILE) T) EQL-OK: T (NULL (SETF MY-FILE (OPEN "path-tst-non-existent-file.non" :DIRECTION :IO :ELEMENT-TYPE 'STRING-CHAR :IF-EXISTS :RENAME-AND-DELETE))) EQL-OK: NIL (PROGN (CLOSE MY-FILE) T) EQL-OK: T (NULL (SETF MY-FILE (OPEN "path-tst-non-existent-file.non" :DIRECTION :IO :ELEMENT-TYPE 'STRING-CHAR :IF-EXISTS :OVERWRITE))) EQL-OK: NIL (PROGN (CLOSE MY-FILE) T) EQL-OK: T (NULL (SETF MY-FILE (OPEN "path-tst-non-existent-file.non" :DIRECTION :IO :ELEMENT-TYPE 'STRING-CHAR :IF-EXISTS :APPEND))) EQL-OK: NIL (PROGN (CLOSE MY-FILE) T) EQL-OK: T (NULL (SETF MY-FILE (OPEN "path-tst-non-existent-file.non" :DIRECTION :IO :ELEMENT-TYPE 'STRING-CHAR :IF-EXISTS :SUPERSEDE))) EQL-OK: NIL (PROGN (CLOSE MY-FILE) T) EQL-OK: T (SETF MY-FILE (OPEN "path-tst-non-existent-file.non" :DIRECTION :IO :ELEMENT-TYPE 'STRING-CHAR :IF-EXISTS NIL)) EQL-OK: NIL (PROGN (CLOSE MY-FILE) T) [METHOD-CALL-TYPE-ERROR]: NO-APPLICABLE-METHOD: When calling #1=# with arguments #2=(NIL), no method is applicable. EQL-OK: ERROR (SETF MY-FILE (OPEN "non-existent-file.new" :DIRECTION :IO :ELEMENT-TYPE 'STRING-CHAR :IF-DOES-NOT-EXIST :ERROR)) [SIMPLE-FILE-ERROR]: OPEN: File #1=#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/non-existent-file.new" does not exist EQL-OK: ERROR (PROGN (CLOSE MY-FILE) T) [METHOD-CALL-TYPE-ERROR]: NO-APPLICABLE-METHOD: When calling #1=# with arguments #2=(NIL), no method is applicable. EQL-OK: ERROR (TRUENAME "~/no/ such / path / non-existent-file.new") [SIMPLE-FILE-ERROR]: TRUENAME: Directory #1=#P"/builddir/no/" does not exist EQL-OK: ERROR (NULL (SETF MY-FILE (OPEN "non-existent-file.new" :DIRECTION :IO :ELEMENT-TYPE 'STRING-CHAR :IF-DOES-NOT-EXIST :CREATE))) EQL-OK: NIL (PROGN (CLOSE MY-FILE) T) EQL-OK: T (NULL (SETF MY-FILE (OPEN "path-tst-non-existent-file.non" :DIRECTION :IO :ELEMENT-TYPE 'STRING-CHAR :IF-DOES-NOT-EXIST NIL))) EQL-OK: NIL (PROGN (CLOSE MY-FILE) T) EQL-OK: T (LET ((*DEFAULT-PATHNAME-DEFAULTS* #P"")) (MULTIPLE-VALUE-BIND (NEW-NAME PATHNAME TRUENAME) (RENAME-FILE "path-tst-non-existent-file.non" "path-tst-file.da") (LIST (NAMESTRING NEW-NAME) (NULL PATHNAME) (NULL TRUENAME)))) EQUAL-OK: ("path-tst-file.da" NIL NIL) (CLOSE (OPEN "path-tst-file.da" :DIRECTION :OUTPUT :IF-EXISTS :RENAME-AND-DELETE)) EQL-OK: T (PATHNAMEP (PROBE-FILE "path-tst-test-pathname.abc")) EQL-OK: T (PROGN (DELETE-FILE "path-tst-test-pathname.abc") T) EQL-OK: T (PROGN (MAPC #'DELETE-FILE (DIRECTORY "non-existent-file.*")) T) EQL-OK: T (PROGN (DELETE-FILE "path-tst-file.da") T) EQL-OK: T (PROGN (SETF (LOGICAL-PATHNAME-TRANSLATIONS "clocc") '(("**;*" "/usr/local/src/clocc/**/*")) (LOGICAL-PATHNAME-TRANSLATIONS "CL-LIBRARY") '((";**;*.*.*" "/tmp/clisp/")) (LOGICAL-PATHNAME-TRANSLATIONS "cl-systems") '((";**;*.*.*" "/usr/share/common-lisp/systems/**/*.*") ("**;*.*.*" "/usr/share/common-lisp/systems/**/*.*") (";*.*.*" "/usr/share/common-lisp/systems/*.*") ("*.*.*" "/usr/share/common-lisp/systems/*.*")) (LOGICAL-PATHNAME-TRANSLATIONS "TEST-SIMPLE") '(("*.*.*" "/usr/local/tmp/*.*.*") ("*.*" "/usr/local/tmp/*.*")) (LOGICAL-PATHNAME-TRANSLATIONS "TEST-SUBDIR") '(("**;*.*" "/usr/local/share/**/*.*") ("**;*.*.*" "/usr/local/share/**/*.*.*") (";**;*.*" "/usr/local/share/r/**/*.*") (";**;*.*.*" "/usr/local/share/r/**/*.*.*"))) NIL) EQL-OK: NIL (TRANSLATE-LOGICAL-PATHNAME "clocc:src;port;") EQUAL-OK: #P"/usr/local/src/clocc/src/port/" (TRANSLATE-PATHNAME "foobar" "foo*" "*baz") EQUAL-OK: #P"barbaz" (TRANSLATE-PATHNAME "foobarbazquux" "foo*baz*" "*baq*zot") EQUAL-OK: #P"barbaqquuxzot" (TRANSLATE-PATHNAME "foobarbazquuxfff" "foo*baz*f?" "*baq*zot*") EQUAL-OK: #P"barbaqquuxfzotf" (TRANSLATE-PATHNAME "uufoobarbazquuxfff" "u?foo*baz*f?" "**baq*zot*") EQUAL-OK: #P"ubarbaqquuxfzotf" (TRANSLATE-PATHNAME "test.txt" "*.txt" "*.text") EQUAL-OK: #P"test.text" (TRANSLATE-PATHNAME "foo/bar" "*/bar" "*/baz") EQUAL-OK: #P"foo/baz" (TRANSLATE-PATHNAME "bar/foo" "bar/*" "baz/*") EQUAL-OK: #P"baz/foo" (MAKE-PATHNAME :DEFAULTS "**/*.FASL" :HOST "CL-LIBRARY") EQUAL-OK: #S(LOGICAL-PATHNAME :HOST "CL-LIBRARY" :DEVICE :UNSPECIFIC :DIRECTORY (:RELATIVE :WILD-INFERIORS) :NAME :WILD :TYPE "FASL" :VERSION NIL) (MAKE-PATHNAME :DEFAULTS "/**/*.FASL" :HOST "CL-LIBRARY") EQUAL-OK: #S(LOGICAL-PATHNAME :HOST "CL-LIBRARY" :DEVICE :UNSPECIFIC :DIRECTORY (:ABSOLUTE :WILD-INFERIORS) :NAME :WILD :TYPE "FASL" :VERSION NIL) (LOGICAL-PATHNAME ":") EQUAL-OK: #S(LOGICAL-PATHNAME :HOST "" :DEVICE :UNSPECIFIC :DIRECTORY (:ABSOLUTE) :NAME NIL :TYPE NIL :VERSION NIL) (MERGE-PATHNAMES (LOGICAL-PATHNAME "cl-systems:") "metering.system") EQUALP-OK: #S(LOGICAL-PATHNAME :HOST "CL-SYSTEMS" :DEVICE :UNSPECIFIC :DIRECTORY (:ABSOLUTE) :NAME "METERING" :TYPE "SYSTEM" :VERSION :NEWEST) (MERGE-PATHNAMES (LOGICAL-PATHNAME "cl-systems:") #P"metering.system") EQUALP-OK: #S(LOGICAL-PATHNAME :HOST "CL-SYSTEMS" :DEVICE :UNSPECIFIC :DIRECTORY (:ABSOLUTE) :NAME "METERING" :TYPE "SYSTEM" :VERSION :NEWEST) (MERGE-PATHNAMES (LOGICAL-PATHNAME "clocc:clocc.lisp")) EQUAL-OK: #S(LOGICAL-PATHNAME :HOST "CLOCC" :DEVICE :UNSPECIFIC :DIRECTORY (:ABSOLUTE) :NAME "CLOCC" :TYPE "LISP" :VERSION :NEWEST) (MERGE-PATHNAMES ".fas" (LOGICAL-PATHNAME "clocc:src;cllib;xml.lisp")) EQUAL-OK: #S(LOGICAL-PATHNAME :HOST "CLOCC" :DEVICE :UNSPECIFIC :DIRECTORY (:ABSOLUTE "SRC" "CLLIB") :NAME "XML" :TYPE "FAS" :VERSION :NEWEST) (LOGICAL-PATHNAME "clocc:;foo;bar;") EQUAL-OK: #S(LOGICAL-PATHNAME :HOST "CLOCC" :DEVICE :UNSPECIFIC :DIRECTORY (:RELATIVE "FOO" "BAR") :NAME NIL :TYPE NIL :VERSION NIL) (LOGICAL-PATHNAME "clocc:baz;quux.lisp.3") EQUAL-OK: #S(LOGICAL-PATHNAME :HOST "CLOCC" :DEVICE :UNSPECIFIC :DIRECTORY (:ABSOLUTE "BAZ") :NAME "QUUX" :TYPE "LISP" :VERSION 3) (MERGE-PATHNAMES (LOGICAL-PATHNAME "clocc:;foo;bar;") (LOGICAL-PATHNAME "clocc:baz;quux.lisp.3")) EQUAL-OK: #S(LOGICAL-PATHNAME :HOST "CLOCC" :DEVICE :UNSPECIFIC :DIRECTORY (:ABSOLUTE "BAZ" "FOO" "BAR") :NAME "QUUX" :TYPE "LISP" :VERSION 3) (COMPILE-FILE-PATHNAME (LOGICAL-PATHNAME "clocc:clocc.lisp")) EQUALP-OK: #S(LOGICAL-PATHNAME :HOST "CLOCC" :DEVICE :UNSPECIFIC :DIRECTORY (:ABSOLUTE) :NAME "CLOCC" :TYPE "FAS" :VERSION :NEWEST) (COMPILE-FILE-PATHNAME (LOGICAL-PATHNAME "clocc:src;cllib;xml.lisp")) EQUALP-OK: #S(LOGICAL-PATHNAME :HOST "CLOCC" :DEVICE :UNSPECIFIC :DIRECTORY (:ABSOLUTE "SRC" "CLLIB") :NAME "XML" :TYPE "FAS" :VERSION :NEWEST) (COMPILE-FILE-PATHNAME (LOGICAL-PATHNAME "clocc:clocc.lisp") :OUTPUT-FILE "/tmp/Bug677/file-TEMP01.fas") EQUAL-OK: #P"/tmp/Bug677/file-TEMP01.fas" (PARSE-NAMESTRING "foo;bar;baz.fas.3" "clocc") EQUAL-OK: #S(LOGICAL-PATHNAME :HOST "CLOCC" :DEVICE :UNSPECIFIC :DIRECTORY (:ABSOLUTE "FOO" "BAR") :NAME "BAZ" :TYPE "FAS" :VERSION 3) (PARSE-NAMESTRING "foo;bar;baz.fas.3" NIL (LOGICAL-PATHNAME "clocc:")) EQUAL-OK: #S(LOGICAL-PATHNAME :HOST "CLOCC" :DEVICE :UNSPECIFIC :DIRECTORY (:ABSOLUTE "FOO" "BAR") :NAME "BAZ" :TYPE "FAS" :VERSION 3) (LET* ((S "abcdefghijk") (D (MAKE-ARRAY 5 :DISPLACED-TO S :DISPLACED-INDEX-OFFSET 3 :ELEMENT-TYPE 'CHARACTER))) (PARSE-NAMESTRING D NIL NIL :START 2 :END 4)) EQUAL-OK: #P"fg" (TRANSLATE-LOGICAL-PATHNAME (MERGE-PATHNAMES (LOGICAL-PATHNAME "TEST-SUBDIR:;FOO;BAR;") (LOGICAL-PATHNAME "TEST-SIMPLE:ZOT.LISP"))) EQUAL-OK: #P"/usr/local/share/r/foo/bar/zot.lisp" (TRANSLATE-LOGICAL-PATHNAME (MERGE-PATHNAMES (LOGICAL-PATHNAME "TEST-SUBDIR:FOO;BAR;") (LOGICAL-PATHNAME "TEST-SIMPLE:ZOT.LISP"))) EQUAL-OK: #P"/usr/local/share/foo/bar/zot.lisp" (MAKE-PATHNAME :DEFAULTS "a.b" :NAME "c" :TYPE NIL) EQUAL-OK: #P"c" (MAKE-PATHNAME :DEFAULTS #S(LOGICAL-PATHNAME :HOST "CL-LIBRARY" :DEVICE :UNSPECIFIC :DIRECTORY (:ABSOLUTE "FOO") :NAME "BAR" :TYPE "BAZ" :VERSION 3)) EQUAL-OK: #S(LOGICAL-PATHNAME :HOST "CL-LIBRARY" :DEVICE :UNSPECIFIC :DIRECTORY (:ABSOLUTE "FOO") :NAME "BAR" :TYPE "BAZ" :VERSION 3) (DEFUN FOO (X HOST) (LET ((DFLT (MAKE-PATHNAME :DIRECTORY '(:RELATIVE :WILD-INFERIORS) :TYPE X :CASE :COMMON))) (IF HOST (MAKE-PATHNAME :DEFAULTS DFLT :HOST HOST :CASE :COMMON) (MAKE-PATHNAME :DEFAULTS DFLT :CASE :COMMON)))) EQL-OK: FOO (DEFUN PATH= (P1 P2) (FLET ((PATH-COMPONENTS (P) (LIST (TYPE-OF P) (PATHNAME-HOST P) (PATHNAME-DEVICE P) (PATHNAME-DIRECTORY P) (PATHNAME-NAME P) (PATHNAME-TYPE P) (PATHNAME-VERSION P)))) (OR (EQUAL P1 P2) (LIST (PATH-COMPONENTS P1) (PATH-COMPONENTS P2))))) EQL-OK: PATH= (STRING= "c" (PATHNAME-TYPE (FOO "c" NIL) :CASE :COMMON)) EQL-OK: T (STRING= "C" (PATHNAME-TYPE (FOO "C" NIL) :CASE :COMMON)) EQL-OK: T (STRING= "C" (PATHNAME-TYPE (FOO "c" "CLOCC") :CASE :COMMON)) EQL-OK: T (STRING= "c" (PATHNAME-TYPE (FOO "C" "CLOCC") :CASE :COMMON)) EQL-OK: T (NAMESTRING (LOGICAL-PATHNAME "foo:bar;baz")) EQUAL-OK: "FOO:BAR;BAZ" (LET* ((FOO (COPY-SEQ "abcdefghijkl")) (BAR (MAKE-ARRAY 5 :DISPLACED-TO FOO :DISPLACED-INDEX-OFFSET 2 :ELEMENT-TYPE 'CHARACTER)) (PATH (MAKE-PATHNAME :DIRECTORY BAR))) (SETF (AREF FOO 3) #\/) (PATH= PATH (MAKE-PATHNAME :DIRECTORY (PATHNAME-DIRECTORY PATH)))) EQL-OK: T (STRING= (NAMESTRING (MAKE-PATHNAME :NAME "FOO" :CASE :COMMON :DEFAULTS #P"/home/kent/")) (NAMESTRING #P"/home/kent/foo")) EQL-OK: T (MAKE-PATHNAME :DIRECTORY '(:ABSOLUTE :WILD) :HOST NIL :DEVICE NIL :NAME NIL :TYPE NIL :VERSION NIL) EQUAL-OK: #P"/*/" (PATHNAME-MATCH-P "foo" "foo.*") EQL-OK: T (LET ((PN1 (MAKE-PATHNAME :DIRECTORY '(:RELATIVE :WILD))) (PN2 (MAKE-PATHNAME :DIRECTORY '(:RELATIVE)))) (PATHNAME-MATCH-P PN1 PN2)) EQL-OK: NIL (TRANSLATE-PATHNAME "foo" "foo.*" "bar") EQUAL-OK: #P"bar" (TRANSLATE-PATHNAME "foo" "foo.*" "bar.*") EQUAL-OK: #P"bar" (PROGN (SETF (LOGICAL-PATHNAME-TRANSLATIONS "FOO") '(("FOO:**;*" "/foo/**/*"))) (TRANSLATE-LOGICAL-PATHNAME "foo:bar;baz;zot.txt")) EQUAL-OK: #P"/foo/bar/baz/zot.txt" (PROGN (SETF (LOGICAL-PATHNAME-TRANSLATIONS "FOO") '(("**;*" "/foo/**/*"))) (TRANSLATE-LOGICAL-PATHNAME "foo:bar;baz;zot.txt")) EQUAL-OK: #P"/foo/bar/baz/zot.txt" (PATHNAME "/foo/bar/../baz///zot//.././zoo") EQUAL-OK: #P"/foo/baz/zoo" (PATHNAME-DIRECTORY "../../../") EQUAL-OK: (:RELATIVE :UP :UP :UP) (LISTP (DIRECTORY (MAKE-PATHNAME :VERSION :WILD :DEFAULTS (LOGICAL-PATHNAME "FOO:")))) EQL-OK: T (PATHNAME-DIRECTORY (MAKE-PATHNAME :VERSION :WILD :DEFAULTS (LOGICAL-PATHNAME "FOO:"))) EQUAL-OK: (:ABSOLUTE) (LET ((F "this-directory-does-not-exist") (*MERGE-PATHNAMES-ANSI* T)) (WHEN (DIRECTORY F) (DELETE-FILE F)) (LIST (LET ((D (STRING-CONCAT F "/"))) (WHEN (DIRECTORY D) (DELETE-DIRECTORY D)) (DIRECTORY D)) (DIRECTORY (STRING-CONCAT F "/*")))) EQUAL-OK: (NIL NIL) (PATHNAME-DEVICE (LOGICAL-PATHNAME "FOO:")) EQL-OK: :UNSPECIFIC (LET* ((OLD "path-tst-foo-bar.old") (NEW (MAKE-PATHNAME :TYPE "new" :DEFAULTS OLD))) (WITH-OPEN-FILE (S OLD :DIRECTION :OUTPUT) (WRITE-LINE "to be renamed" S)) (UNWIND-PROTECT (LIST (LIST (NOT (NOT (PROBE-FILE OLD))) (PROBE-FILE NEW)) (LENGTH (MULTIPLE-VALUE-LIST (RENAME-FILE OLD NEW))) (LIST (PROBE-FILE OLD) (NOT (NOT (PROBE-FILE NEW))))) (DELETE-FILE NEW))) EQUAL-OK: ((T NIL) 3 (NIL T)) (LET ((SRC "src-file") (DST "dst-file")) (OPEN SRC :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (OPEN DST :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (UNWIND-PROTECT (HANDLER-CASE (MULTIPLE-VALUE-LIST (RENAME-FILE SRC DST :IF-EXISTS :ERROR)) (ERROR (E) (PRINC-ERROR E) :GOOD)) (DELETE-FILE SRC) (DELETE-FILE DST))) [SIMPLE-FILE-ERROR]: RENAME-FILE: File #1=#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/dst-file" already exists EQL-OK: :GOOD (LET ((SRC "src-file") (DST "dst-file")) (OPEN SRC :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (OPEN DST :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (UNWIND-PROTECT (EQUAL (TRUENAME DST) (NTH-VALUE 2 (RENAME-FILE SRC DST :IF-EXISTS :OVERWRITE))) (DELETE-FILE SRC) (DELETE-FILE DST))) EQL-OK: T (WILD-PATHNAME-P (MAKE-PATHNAME :VERSION :WILD)) EQL-OK: T (PATHNAME-VERSION (MERGE-PATHNAMES (MAKE-PATHNAME) (MAKE-PATHNAME :VERSION :NEWEST) NIL)) EQL-OK: :NEWEST (PATHNAME-VERSION (MERGE-PATHNAMES (MAKE-PATHNAME) (MAKE-PATHNAME :VERSION NIL) :NEWEST)) EQL-OK: :NEWEST (REMOVE-IF-NOT #'WILD-PATHNAME-P (DIRECTORY (MAKE-PATHNAME :NAME :WILD :TYPE :WILD :VERSION :WILD))) EQL-OK: NIL (LET ((FILE "path-tst-this-is-a-temp-file-to-be-removed-immediately")) (UNWIND-PROTECT (LET ((D (DIRECTORY (MAKE-PATHNAME :DEFAULTS (OPEN FILE :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) :VERSION :WILD)))) (LIST (= (LENGTH D) 1) (NOTANY #'WILD-PATHNAME-P D) (PATH= (CAR D) (TRUENAME FILE)))) (DELETE-FILE FILE))) EQUAL-OK: (T T T) (FIRST (PATHNAME-DIRECTORY (TRANSLATE-PATHNAME "foo/bar/baz" #P"" #P"" :ABSOLUTE T))) EQL-OK: :ABSOLUTE (LET ((FILE "path-tst-this-is-a-temp-file-to-be-removed-immediately.lisp")) (UNWIND-PROTECT (LET* ((P (PATHNAME (OPEN FILE :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE))) (P1 (MAKE-PATHNAME :TYPE NIL :DEFAULTS P))) (WHEN (PROBE-FILE P1) (DELETE-FILE P1)) (LIST (NOT (NULL (PROBE-FILE P))) (NULL (PROBE-FILE P1)) (LET ((*DEFAULT-PATHNAME-DEFAULTS* (MAKE-PATHNAME :TYPE "lisp"))) (NOT (NULL (PROBE-FILE P1)))))) (DELETE-FILE FILE))) EQUAL-OK: (T T T) (LET ((FILE "path-tst-this-is-a-temp-file-to-be-removed-immediately")) (UNWIND-PROTECT (LET* ((P (PATHNAME (OPEN FILE :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE)))) (LIST (NOT (NULL (PROBE-FILE P))) (WITH-OPEN-FILE (S P) (LET ((*DEFAULT-PATHNAME-DEFAULTS* (MAKE-PATHNAME :TYPE "lisp"))) (NOT (NULL (PROBE-FILE S))))))) (DELETE-FILE FILE))) EQUAL-OK: (T T) (LET ((FILE "path-tst-this-is-a-temp-file-to-be-removed-immediately")) (UNWIND-PROTECT (WITH-OPEN-FILE (S FILE :DIRECTION :OUTPUT) (LIST (NOT (NULL (PROBE-FILE FILE))) (NOT (NULL (PROBE-FILE S))) (PATH= (TRUENAME S) (TRUENAME FILE)))) (DELETE-FILE FILE))) EQUAL-OK: (T T T) (LET ((FILE "path-tst-this-is-a-temp-file-to-be-removed-immediately")) (UNWIND-PROTECT (WITH-OPEN-FILE (S FILE :DIRECTION :OUTPUT) (PATH= (TRUENAME (ENOUGH-NAMESTRING S)) (TRUENAME (ENOUGH-NAMESTRING (TRUENAME S))))) (DELETE-FILE FILE))) EQL-OK: T (MULTIPLE-VALUE-LIST (PARSE-NAMESTRING (MAKE-ARRAY 0 :ELEMENT-TYPE 'CHARACTER :DISPLACED-TO "foo" :DISPLACED-INDEX-OFFSET 1))) EQUAL-OK: (#P"" 0) (LET ((HOME (USER-HOMEDIR-PATHNAME))) (OR (NULL HOME) (NOT (NOT (PATHNAMEP HOME))))) EQL-OK: T (LET ((HOME (USER-HOMEDIR-PATHNAME NIL))) (OR (NULL HOME) (NOT (NOT (PATHNAMEP HOME))))) EQL-OK: T (LET ((HOME (USER-HOMEDIR-PATHNAME :UNSPECIFIC))) (OR (NULL HOME) (NOT (NOT (PATHNAMEP HOME))))) EQL-OK: T (LET* ((N "path-tst-abazonk") (F (STRING-CONCAT N ".lisp")) (D (STRING-CONCAT N "/"))) (WITH-OPEN-FILE (S F :DIRECTION :OUTPUT) (PRIN1 `(DELETE-DIRECTORY ,D) S)) (ENSURE-DIRECTORIES-EXIST D) (LIST (PROBE-DIRECTORY D) (STRING= N (PATHNAME-NAME (LOAD N))) (NOT (NULL (DELETE-FILE F))) (PROBE-DIRECTORY D))) ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-abazonk.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-abazonk.lisp EQUAL-OK: (T T T NIL) (LET* ((N "path-tst-abazonk-logical") (*PARSE-NAMESTRING-ANSI* T) (F (STRING-CONCAT N ".lisp")) (D (STRING-CONCAT N "/"))) (WITH-OPEN-FILE (S F :DIRECTION :OUTPUT) (PRIN1 `(DELETE-DIRECTORY ,D) S)) (ENSURE-DIRECTORIES-EXIST D) (SETF (LOGICAL-PATHNAME-TRANSLATIONS "FOO") '(("*" "./*"))) (LIST (PROBE-DIRECTORY D) (STRING= N (PATHNAME-NAME (LOAD (STRING-CONCAT "FOO:" N)))) (NOT (NULL (DELETE-FILE F))) (PROBE-DIRECTORY D))) ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-abazonk-logical.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-abazonk-logical.lisp EQUAL-OK: (T T T NIL) (LET ((F "path-tst-compile-file-ansi-pathname.lisp") (*PRINT-PATHNAMES-ANSI* T)) (WITH-OPEN-FILE (S F :DIRECTION :OUTPUT :IF-EXISTS :SUPERSEDE) (FORMAT S "(defparameter *pathname-var* #.(make-pathname :name \"foo.bar\" :type nil))~%")) (UNWIND-PROTECT (PROGN (LOAD (COMPILE-FILE F)) (PATHNAME-NAME *PATHNAME-VAR*)) (POST-COMPILE-FILE-CLEANUP F))) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-compile-file-ansi-pathname.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-compile-file-ansi-pathname.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-compile-file-ansi-pathname.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-compile-file-ansi-pathname.fas EQUAL-OK: "foo.bar" (LET ((F "path-tst-compile-file-pathname.lisp") CF CFP) (WITH-OPEN-FILE (S F :DIRECTION :OUTPUT :IF-EXISTS :SUPERSEDE) (FORMAT S "(defun cfp-test () #.*compile-file-truename*)~%")) (SETQ CF (COMPILE-FILE F) CFP (TRUENAME (COMPILE-FILE-PATHNAME F))) (LOAD CF) (UNWIND-PROTECT (LIST (PATH= CF CFP) (PATH= (TRUENAME F) (CFP-TEST))) (POST-COMPILE-FILE-CLEANUP F))) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-compile-file-pathname.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-compile-file-pathname.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-compile-file-pathname.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-compile-file-pathname.fas EQUAL-OK: (T T) (LET ((F (LOGICAL-PATHNAME "FOO:path-tst-compile-file-pathname.lisp")) CF CFP) (WITH-OPEN-FILE (S F :DIRECTION :OUTPUT :IF-EXISTS :SUPERSEDE) (TYPE-OF (TRUENAME S)) (FORMAT S "(defun cfp-test () #.*compile-file-truename*)~%")) (SETQ CF (COMPILE-FILE F) CFP (TRUENAME (COMPILE-FILE-PATHNAME F))) (LOAD (OPEN CF :DIRECTION :PROBE :IF-DOES-NOT-EXIST :ERROR)) (UNWIND-PROTECT (LIST (PATH= CF CFP) (PATH= (TRUENAME F) (CFP-TEST))) (POST-COMPILE-FILE-CLEANUP F))) ;; Compiling file #S(LOGICAL-PATHNAME HOST FOO DEVICE UNSPECIFIC DIRECTORY (ABSOLUTE) NAME PATH-TST-COMPILE-FILE-PATHNAME TYPE LISP VERSION NEWEST) ... ;; Wrote file #S(LOGICAL-PATHNAME HOST FOO DEVICE UNSPECIFIC DIRECTORY (ABSOLUTE) NAME PATH-TST-COMPILE-FILE-PATHNAME TYPE fas VERSION NEWEST) 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-compile-file-pathname.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-compile-file-pathname.fas EQUAL-OK: (T T) (LET ((F "path-tst-compile-file-pathname.lisp")) (WITH-OPEN-FILE (S F :DIRECTION :OUTPUT :IF-EXISTS :SUPERSEDE :IF-DOES-NOT-EXIST :CREATE) (FORMAT S "(defun cfp-test () #.*compile-file-pathname*)~%")) (SETQ CF (COMPILE-FILE F)) (LOAD (OPEN CF :DIRECTION :PROBE :IF-DOES-NOT-EXIST :ERROR)) (UNWIND-PROTECT (PATH= (CFP-TEST) (MERGE-PATHNAMES F)) (POST-COMPILE-FILE-CLEANUP F))) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-compile-file-pathname.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-compile-file-pathname.fas 0 errors, 0 warnings ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-compile-file-pathname.fas ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-compile-file-pathname.fas EQL-OK: T (LET* ((L "path-tst-compile-file-pathname.lisp") (F (COMPILE-FILE-PATHNAME L))) (UNWIND-PROTECT (PROGN (WITH-OPEN-FILE (LS L :DIRECTION :OUTPUT :IF-EXISTS :SUPERSEDE) (FORMAT LS "(defun f () t)~%")) (LIST (WITH-OPEN-FILE (FS F :DIRECTION :OUTPUT :IF-EXISTS :SUPERSEDE) (FORMAT FS #1="first line") (TERPRI FS) (COMPILE-FILE L :OUTPUT-FILE FS) (OPEN-STREAM-P FS)) (WITH-OPEN-FILE (FS F :DIRECTION :INPUT) (STRING= #1# (READ-LINE FS))))) (POST-COMPILE-FILE-CLEANUP L))) ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-compile-file-pathname.lisp ... ;; Wrote file # 0 errors, 0 warnings EQUAL-OK: (T T) (COMPILE-FILE-PATHNAME "foo" :OUTPUT-FILE (LOGICAL-PATHNAME "SYS:foo.fas")) EQUAL-OK: #S(LOGICAL-PATHNAME :HOST "SYS" :DEVICE :UNSPECIFIC :DIRECTORY (:ABSOLUTE) :NAME "FOO" :TYPE "FAS" :VERSION :NEWEST) (TRANSLATE-LOGICAL-PATHNAME (LOGICAL-PATHNAME "SYS:FOO.LISP")) EQUAL-OK: #P"/foo.lisp" (LET* ((F "path-tst-foo") R (F1 (CONCATENATE 'STRING F "/"))) (DELETE-FILE F) (PUSH (DIRECTORY F) R) (PUSH (DIRECTORY F1) R) (OPEN F :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (LET ((DIR (DIRECTORY F)) (TN (LIST (TRUENAME F)))) (PUSH (OR (EQUALP DIR TN) (LIST (MAPCAR #'PATH-COMPONENTS DIR) (MAPCAR #'PATH-COMPONENTS TN))) R)) (PUSH (DIRECTORY F1) R) (DELETE-FILE F) (PUSH (DIRECTORY F) R) (PUSH (DIRECTORY F1) R) (NREVERSE R)) EQUAL-OK: (NIL NIL T NIL NIL NIL) (GETENV "NO_SUCH_ENV_VAR") EQL-OK: NIL (SETF (GETENV "NO_SUCH_ENV_VAR") "FOO") EQUAL-OK: "FOO" (GETENV "NO_SUCH_ENV_VAR") EQUAL-OK: "FOO" (SETF (GETENV "NO_SUCH_ENV_VAR") "") EQUAL-OK: "" (GETENV "NO_SUCH_ENV_VAR") EQUAL-OK: "" (SETF (GETENV "NO_SUCH_ENV_VAR") NIL) EQL-OK: NIL (GETENV "NO_SUCH_ENV_VAR") EQL-OK: NIL (UNWIND-PROTECT (PROGN (SETF (LOGICAL-PATHNAME-TRANSLATIONS "FOO") NIL (GETENV "LOGICAL_HOST_FOO") (WRITE-TO-STRING '(("FOO:**;*" "/foo/**/*")))) (AND (LOAD-LOGICAL-PATHNAME-TRANSLATIONS "FOO") (CADAR (LOGICAL-PATHNAME-TRANSLATIONS "FOO")))) (SETF (GETENV "LOGICAL_HOST_FOO") NIL)) EQUAL-OK: "/foo/**/*" (TRANSLATE-LOGICAL-PATHNAME "foo:bar;baz;zot.txt") EQUAL-OK: #P"/foo/bar/baz/zot.txt" (UNWIND-PROTECT (PROGN (SETF (LOGICAL-PATHNAME-TRANSLATIONS "FOO") NIL (GETENV "LOGICAL_HOST_FOO_FROM") "FOO:**;*" (GETENV "LOGICAL_HOST_FOO_TO") "/foo/**/*") (AND (LOAD-LOGICAL-PATHNAME-TRANSLATIONS "FOO") (CADAR (LOGICAL-PATHNAME-TRANSLATIONS "FOO")))) (SETF (GETENV "LOGICAL_HOST_FOO_FROM") NIL (GETENV "LOGICAL_HOST_FOO_TO") NIL)) EQUAL-OK: "/foo/**/*" (TRANSLATE-LOGICAL-PATHNAME "foo:bar;baz;zot.txt") EQUAL-OK: #P"/foo/bar/baz/zot.txt" (LET ((FILE (FIRST *LOAD-LOGICAL-PATHNAME-TRANSLATIONS-DATABASE*))) (UNWIND-PROTECT (LET ((*LOAD-PATHS* NIL) (*LOAD-VERBOSE* T)) (SETF (LOGICAL-PATHNAME-TRANSLATIONS "FOO") NIL) (WITH-OPEN-FILE (F FILE :DIRECTION :OUTPUT) (FORMAT F "~S~%~S~%" "FOO" ''(("FOO:**;*" "/foo/**/*")))) (AND (LOAD-LOGICAL-PATHNAME-TRANSLATIONS "FOO") (CADAR (LOGICAL-PATHNAME-TRANSLATIONS "FOO")))) (DELETE-FILE FILE))) ;; Loading logical hosts from file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/loghosts ... ;; Defined logical host FOO ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/loghosts EQUAL-OK: "/foo/**/*" (TRANSLATE-LOGICAL-PATHNAME "foo:bar;baz;zot.txt") EQUAL-OK: #P"/foo/bar/baz/zot.txt" (LET* ((DIR (MAKE-PATHNAME :DIRECTORY (LIST :RELATIVE (PATHNAME-NAME (FIRST *LOAD-LOGICAL-PATHNAME-TRANSLATIONS-DATABASE*))))) (FILE (MERGE-PATHNAMES "FOO" DIR))) (UNWIND-PROTECT (LET ((*LOAD-PATHS* NIL) (*LOAD-VERBOSE* T)) (SETF (LOGICAL-PATHNAME-TRANSLATIONS "FOO") NIL) (MAKE-DIRECTORY DIR) (WITH-OPEN-FILE (F FILE :DIRECTION :OUTPUT) (FORMAT F "~S~%" '(("FOO:**;*" "/foo/**/*")))) (AND (LOAD-LOGICAL-PATHNAME-TRANSLATIONS "FOO") (CADAR (LOGICAL-PATHNAME-TRANSLATIONS "FOO")))) (DELETE-FILE FILE) (DELETE-DIRECTORY DIR))) ;; Loading logical host from file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/loghosts/FOO ... ;; Defined logical host FOO EQUAL-OK: "/foo/**/*" (TRANSLATE-LOGICAL-PATHNAME "foo:bar;baz;zot.txt") EQUAL-OK: #P"/foo/bar/baz/zot.txt" (DOLIST (DFLT (LIST #P"/home/" (LOGICAL-PATHNAME "CLOCC:SRC;PORT;"))) (DOLIST (DIR '(NIL (:ABSOLUTE "foo"))) (ASSERT (EQUAL DIR (PATHNAME-DIRECTORY (MAKE-PATHNAME :DIRECTORY DIR :DEFAULTS DFLT)))))) EQL-OK: NIL (MAKE-PATHNAME :DIRECTORY '(:ABSOLUTE :WILD-INFERIORS "subdir")) EQUAL-OK: #P"/**/subdir/" (LET* ((LPD (PATHNAME "path-tst-load-path-dir/")) (*MERGE-PATHNAMES-ANSI* T) (FILE (MERGE-PATHNAMES (FIRST *LOAD-LOGICAL-PATHNAME-TRANSLATIONS-DATABASE*) LPD))) (UNWIND-PROTECT (LET ((*LOAD-PATHS* (LIST (MERGE-PATHNAMES "**/" LPD))) (*LOAD-VERBOSE* T)) (MAKE-DIRECTORY LPD) (SETF (LOGICAL-PATHNAME-TRANSLATIONS "FOO") NIL) (WITH-OPEN-FILE (F FILE :DIRECTION :OUTPUT) (FORMAT F "~S~%~S~%" "FOO" ''(("FOO:**;*" "/foo/**/*")))) (AND (LOAD-LOGICAL-PATHNAME-TRANSLATIONS "FOO") (CADAR (LOGICAL-PATHNAME-TRANSLATIONS "FOO")))) (DELETE-FILE FILE) (DELETE-DIRECTORY LPD))) ;; Loading logical hosts from file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-load-path-dir/loghosts ... ;; Defined logical host FOO ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-load-path-dir/loghosts EQUAL-OK: "/foo/**/*" (TRANSLATE-LOGICAL-PATHNAME "foo:bar;baz;zot.txt") EQUAL-OK: #P"/foo/bar/baz/zot.txt" (LET* ((LPD (PATHNAME "path-tst-load-path-dir/")) (*MERGE-PATHNAMES-ANSI* T) (DIR (MAKE-PATHNAME :DIRECTORY (APPEND (PATHNAME-DIRECTORY LPD) (LIST (PATHNAME-NAME (FIRST *LOAD-LOGICAL-PATHNAME-TRANSLATIONS-DATABASE*)))))) (FILE (MERGE-PATHNAMES "FOO" DIR))) (UNWIND-PROTECT (LET ((*LOAD-PATHS* (LIST (MERGE-PATHNAMES "**/" LPD))) (*LOAD-VERBOSE* T)) (SETF (LOGICAL-PATHNAME-TRANSLATIONS "FOO") NIL) (MAKE-DIRECTORY LPD) (MAKE-DIRECTORY DIR) (WITH-OPEN-FILE (F FILE :DIRECTION :OUTPUT) (FORMAT F "~S~%" '(("FOO:**;*" "/foo/**/*")))) (AND (LOAD-LOGICAL-PATHNAME-TRANSLATIONS "FOO") (CADAR (LOGICAL-PATHNAME-TRANSLATIONS "FOO")))) (DELETE-FILE FILE) (DELETE-DIRECTORY DIR) (DELETE-DIRECTORY LPD))) ;; Loading logical host from file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-load-path-dir/loghosts/FOO ... ;; Defined logical host FOO EQUAL-OK: "/foo/**/*" (TRANSLATE-LOGICAL-PATHNAME "foo:bar;baz;zot.txt") EQUAL-OK: #P"/foo/bar/baz/zot.txt" (MAKE-DIRECTORY "path-tst-foo/") EQL-OK: T (DEFPARAMETER *DIR* (DIRECTORY "path-tst-foo/" :FULL T)) EQL-OK: *DIR* (CDR *DIR*) EQL-OK: NIL (LENGTH (CAR *DIR*)) EQL-OK: 4 (EQUAL (CAAR *DIR*) (CADAR *DIR*)) EQL-OK: T (EQUAL (CAAR *DIR*) (CAR (DIRECTORY "path-tst-foo/"))) EQL-OK: T (RENAME-DIRECTORY "path-tst-foo/" "path-tst-bar/") EQL-OK: T (EQUAL (CDDAR (DIRECTORY "path-tst-bar/" :FULL T)) (CDDAR *DIR*)) EQL-OK: T (DIRECTORY "path-tst-foo/") EQL-OK: NIL (DELETE-DIRECTORY "path-tst-bar/") EQL-OK: T (DIRECTORY "path-tst-bar/" :FULL T) EQL-OK: NIL (PATHNAME-VERSION (CAR (DIRECTORY "./"))) EQL-OK: :NEWEST (LET* ((WD (ENSURE-DIRECTORIES-EXIST "bug-724/")) (F1 (OPEN (MERGE-PATHNAMES WD "file") :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE)) (F2 (OPEN (MERGE-PATHNAMES WD "file.txt") :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE)) (PAT (MAKE-PATHNAME :NAME :WILD :TYPE :WILD :VERSION :WILD :DEFAULTS WD)) (*DEFAULT-PATHNAME-DEFAULTS* (PROBE-PATHNAME "."))) (UNWIND-PROTECT (LIST (SORT (MAPCAR #'ENOUGH-NAMESTRING (DIRECTORY PAT)) #'STRING<) (PATHNAME-MATCH-P F1 PAT) (PATHNAME-MATCH-P F2 PAT)) (DELETE-FILE F1) (DELETE-FILE F2) (DELETE-DIRECTORY WD))) EQUAL-OK: (("bug-724/file" "bug-724/file.txt") T T) (LET (LP) (SETF (LOGICAL-PATHNAME-TRANSLATIONS "FOO") '(("*" "./*"))) (SETQ LP (LOGICAL-PATHNAME "FOO:load-test")) (WITH-OPEN-FILE (O LP :DIRECTION :OUTPUT) (WRITE-LINE "(defparameter *load-var* *load-pathname*)" O)) (UNWIND-PROTECT (LIST (EQUALP (TRUENAME LP) (LOAD LP)) (EQUALP (MERGE-PATHNAMES LP) *LOAD-VAR*)) (DELETE-FILE LP) (SETF (LOGICAL-PATHNAME-TRANSLATIONS "FOO") NIL))) ;; Loading file #S(LOGICAL-PATHNAME HOST FOO DEVICE UNSPECIFIC DIRECTORY (ABSOLUTE) NAME LOAD-TEST TYPE NIL VERSION NEWEST) ... ;; Loaded file #S(LOGICAL-PATHNAME HOST FOO DEVICE UNSPECIFIC DIRECTORY (ABSOLUTE) NAME LOAD-TEST TYPE NIL VERSION NEWEST) EQUAL-OK: (T T) (LET ((F "path-tst-my-file") TN) (UNWIND-PROTECT (PROGN (SETQ TN (TRUENAME (OPEN F :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE))) (MULTIPLE-VALUE-BIND (TN1 _ FWD) (PROBE-PATHNAME F) (LIST (EQUAL TN (PROBE-FILE F)) (EQUAL TN TN1) (= (FILE-WRITE-DATE TN) FWD) (EQUAL TN (PROBE-PATHNAME (CONCATENATE 'STRING F "/"))) (EQUAL TN (PROBE-PATHNAME (CONCATENATE 'STRING F "///")))))) (DELETE-FILE TN))) EQUAL-OK: (T T T T T) (LET* ((D "path-tst-my-dir") (D1 (CONCATENATE 'STRING D "/")) TN) (UNWIND-PROTECT (PROGN (MAKE-DIRECTORY D1) (MULTIPLE-VALUE-BIND (TN1 D2 FWD) (PROBE-PATHNAME D) (SETQ TN (TRUENAME D1) D2 (DIRECTORY TN :FULL T)) (LIST (EQUAL TN TN1) (EQUAL TN (PROBE-PATHNAME D1)) (NULL (CDR D2)) (NOT (NULL (CAR D2))) (= (APPLY #'ENCODE-UNIVERSAL-TIME (THIRD (CAR D2))) FWD) (EQUAL TN (PROBE-PATHNAME (CONCATENATE 'STRING D "///")))))) (DELETE-DIRECTORY TN))) EQUAL-OK: (T T T T T T) (LET* ((D "path-tst-my-dir/") (DIRS** (CONCATENATE 'STRING D "**/")) (DIRS* (CONCATENATE 'STRING D "*/")) (FILES** (CONCATENATE 'STRING D "**/*")) (FILES* (CONCATENATE 'STRING D "*/*"))) (UNWIND-PROTECT (FLET ((MKDIR (S) (MAKE-DIRECTORY (CONCATENATE 'STRING D S)) (OPEN (CONCATENATE 'STRING D S "f") :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE)) (CMP (L1 L2) (LIST (LENGTH L1) (EQUALP L1 (MAPCAR #'FIRST L2))))) (MKDIR "") (MKDIR "d1/") (MKDIR "d1/s1/") (MKDIR "d1/s2/") (MKDIR "d2/") (MKDIR "d2/s1/") (MKDIR "d2/s2/") (LIST (CMP (DIRECTORY DIRS*) (DIRECTORY DIRS* :FULL T)) (CMP (PRINT (DIRECTORY DIRS**)) (PRINT (DIRECTORY DIRS** :FULL T))) (CMP (DIRECTORY FILES*) (DIRECTORY FILES* :FULL T)) (CMP (DIRECTORY FILES**) (DIRECTORY FILES** :FULL T)))) (RMRF D))) (#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/s1/" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/s2/" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/s1/" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/s2/" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/") ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/s1/" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/s1/" (54 30 15 24 4 2021) 4096) (#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/s2/" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/s2/" (54 30 15 24 4 2021) 4096) (#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/" (54 30 15 24 4 2021) 4096) (#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/s1/" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/s1/" (54 30 15 24 4 2021) 4096) (#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/s2/" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/s2/" (54 30 15 24 4 2021) 4096) (#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/" (54 30 15 24 4 2021) 4096) (#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/" (54 30 15 24 4 2021) 4096)) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/f 0 2021-04-24 15:30:54 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/s1/f 0 2021-04-24 15:30:54 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/s2/f 0 2021-04-24 15:30:54 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/f 0 2021-04-24 15:30:54 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/s1/f 0 2021-04-24 15:30:54 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/s2/f 0 2021-04-24 15:30:54 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/f 0 2021-04-24 15:30:54 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/ 4096 2021-04-24 15:30:54 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/ 4096 2021-04-24 15:30:54 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/s1/ 4096 2021-04-24 15:30:54 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/s2/ 4096 2021-04-24 15:30:54 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/ 4096 2021-04-24 15:30:54 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/s1/ 4096 2021-04-24 15:30:54 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/s2/ 4096 2021-04-24 15:30:54 removing file #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/s1/f" removing file #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/s2/f" removing file #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/f" removing file #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/s1/f" removing file #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/s2/f" removing file #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/f" removing file #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/f" removing directory #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/s1/" removing directory #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/s2/" removing directory #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/" removing directory #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/s1/" removing directory #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/s2/" removing directory #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/" removing directory #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/" EQUAL-OK: ((2 T) (7 T) (2 T) (7 T)) (CONSP (SHOW (MULTIPLE-VALUE-LIST (PROBE-PATHNAME "/")))) (#P"/" #P"/" 3828269920 4096) EQL-OK: T (EQUALP (SHOW (MULTIPLE-VALUE-LIST (PROBE-PATHNAME "/etc"))) (SHOW (MULTIPLE-VALUE-LIST (PROBE-PATHNAME "/etc/")))) (#P"/etc/" #P"/etc/" 3828272182 4096) (#P"/etc/" #P"/etc/" 3828272182 4096) EQL-OK: T (EQUALP (SHOW (MULTIPLE-VALUE-LIST (PROBE-PATHNAME (DEFAULT-DIRECTORY)))) (SHOW (MULTIPLE-VALUE-LIST (PROBE-PATHNAME "")))) (#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/" 3828281455 4096) (#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/" 3828281455 4096) EQL-OK: T (LET* ((PATH "test-pathname") (S1 (OPEN PATH :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE)) (S2 (OPEN PATH :DIRECTION :INPUT))) (UNWIND-PROTECT (LET ((P-P (SHOW (MULTIPLE-VALUE-LIST (PROBE-PATHNAME PATH)))) (P-C (SHOW (MULTIPLE-VALUE-LIST (PROBE-PATHNAME S1)))) (P-O (SHOW (MULTIPLE-VALUE-LIST (PROBE-PATHNAME S2))))) (LIST (EQUALP P-P P-C) (EQUALP P-P P-O) (EQUALP P-C P-O))) (CLOSE S2) (DELETE-FILE S1))) (#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/test-pathname" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/test-pathname" 3828281455 0) (#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/test-pathname" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/test-pathname" 3828281455 0) (#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/test-pathname" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/test-pathname" 3828281455 0) EQUAL-OK: (T T T) (BLOCK TEST-WEIRD-PATHNAMES (HANDLER-BIND ((PARSE-ERROR (HANDLER-RETURN TEST-WEIRD-PATHNAMES '(T NIL T T)))) (LETF* ((*PATHNAME-ENCODING* CHARSET:ISO-8859-1) (WEIRD (CONCATENATE 'STRING "weird" (STRING (CODE-CHAR 160)))) (DIR (LIST (MAKE-PATHNAME :VERSION :NEWEST :DEFAULTS (ABSOLUTE-PATHNAME WEIRD))))) (OPEN WEIRD :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (UNWIND-PROTECT (CONS (EQUAL (DIRECTORY "weird*") DIR) (LETF ((*PATHNAME-ENCODING* CHARSET:ASCII)) (LIST (APPEASE-CERRORS (DIRECTORY "weird*")) (HANDLER-BIND ((SIMPLE-CHARSET-TYPE-ERROR (LAMBDA (C) (PRINC-ERROR C) (STORE-VALUE CHARSET:ISO-8859-1)))) (EQUAL (DIRECTORY "weird*") DIR)) (EQ *PATHNAME-ENCODING* CHARSET:ISO-8859-1)))) (DELETE-FILE WEIRD))))) WARNING: DIRECTORY: Invalid byte #xA0 in CHARSET:ASCII conversion Discard this directory entry [SIMPLE-CHARSET-TYPE-ERROR]: DIRECTORY: Invalid byte #xA0 in CHARSET:ASCII conversion EQUAL-OK: (T NIL T T) (LETF* ((*PATHNAME-ENCODING* CHARSET:ISO-8859-1) (WEIRD (CONCATENATE 'STRING "weird" (STRING (CODE-CHAR 160)))) (GOOD "path-tst-good-file") (DIR "path-tst-load-weird-dir/") (*LOAD-PATHS* (LIST (CONCATENATE 'STRING DIR "**")))) (RMRF DIR) (MAKE-DIRECTORY DIR) (OPEN (CONCATENATE 'STRING DIR WEIRD) :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (WITH-OPEN-FILE (OS (CONCATENATE 'STRING DIR GOOD ".lisp") :DIRECTION :OUTPUT) (FORMAT OS "(defparameter *load-var* 1234)~%")) (UNWIND-PROTECT (LIST (LETF ((*PATHNAME-ENCODING* CHARSET:ASCII)) (LOAD GOOD) *LOAD-VAR*) (EQ *PATHNAME-ENCODING* CHARSET:ISO-8859-1)) (RMRF DIR))) ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-load-weird-dir/path-tst-good-file.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-load-weird-dir/path-tst-good-file.lisp /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-load-weird-dir/path-tst-good-file.lisp 31 2021-04-24 15:30:55 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-load-weird-dir/weird  0 2021-04-24 15:30:55 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-load-weird-dir/ 4096 2021-04-24 15:30:55 removing file #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-load-weird-dir/path-tst-good-file.lisp" removing file #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-load-weird-dir/weird " removing directory #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-load-weird-dir/" EQUAL-OK: (1234 T) (LET* ((DIR "tmp-dir/") (FILE (STRING-CONCAT DIR "foo.lisp"))) (MAKE-DIRECTORY DIR) (WITH-OPEN-FILE (OUT FILE :DIRECTION :OUTPUT) (WRITE-LINE "(defparameter *load-var* 100)" OUT)) (UNWIND-PROTECT (LIST (LOAD "foo" :IF-DOES-NOT-EXIST NIL) (EQUALP (LOAD FILE) (TRUENAME FILE)) *LOAD-VAR* (LET ((*LOAD-PATHS* (LIST DIR))) (SETQ *LOAD-VAR* 3) (LOAD "foo") *LOAD-VAR*) (LET ((*LOAD-PATHS* (LIST DIR)) (*DEFAULT-PATHNAME-DEFAULTS* (CD))) (SETQ *LOAD-VAR* 3) (LOAD "foo" :IF-DOES-NOT-EXIST NIL) *LOAD-VAR*) (BLOCK NIL (HANDLER-BIND ((FILE-ERROR (LAMBDA (C) (PRINC C) (RETURN 'FILE-ERROR)))) (REQUIRE "foo"))) (LET ((*LOAD-PATHS* (LIST DIR))) (SETQ *LOAD-VAR* 3) (REQUIRE "foo") *LOAD-VAR*) (LET ((*LOAD-PATHS* (LIST DIR)) (*DEFAULT-PATHNAME-DEFAULTS* (CD))) (SETQ *LOAD-VAR* 3) (REQUIRE "foo") *LOAD-VAR*)) (DELETE-FILE FILE) (DELETE-DIRECTORY DIR))) ;; Loading file tmp-dir/foo.lisp ... ;; Loaded file tmp-dir/foo.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/tmp-dir/foo.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/tmp-dir/foo.lisp LOAD: A file with name #1=foo does not exist ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/tmp-dir/foo.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/tmp-dir/foo.lisp ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/tmp-dir/foo.lisp ... ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/tmp-dir/foo.lisp EQUAL-OK: (NIL T 100 100 3 FILE-ERROR 100 100) (LET* ((FILES (DIRECTORY #1=#P"../**/*" :IF-DOES-NOT-EXIST :DISCARD)) (1ST (CAR FILES)) (COPY (MAKE-PATHNAME :DIRECTORY (PATHNAME-DIRECTORY 1ST) :NAME (PATHNAME-NAME 1ST) :TYPE (PATHNAME-TYPE 1ST)))) (FORMAT T "~&~:D file~:P under ~S~%" (LENGTH FILES) (PROBE-PATHNAME (MAKE-PATHNAME :DIRECTORY (BUTLAST (PATHNAME-DIRECTORY #1#) 1)))) (LIST (DELETE-DUPLICATES (MAPCAR #'PATHNAME-VERSION FILES)) (EQUALP (PROBE-PATHNAME COPY) 1ST) (EQUALP (PROBE-FILE COPY) 1ST) (EQUALP (TRUENAME COPY) 1ST))) 1,111 files under #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/" EQUAL-OK: ((:NEWEST) T T T) (LET* ((DIRS (DIRECTORY #1=#P"../**/*/" :IF-DOES-NOT-EXIST :DISCARD)) (1ST (CAR DIRS)) (COPY (MAKE-PATHNAME :DIRECTORY (PATHNAME-DIRECTORY 1ST) :NAME (PATHNAME-NAME 1ST) :TYPE (PATHNAME-TYPE 1ST)))) (FORMAT T "~&~:D director~:@P under ~S~%" (LENGTH DIRS) (PROBE-PATHNAME (MAKE-PATHNAME :DIRECTORY (BUTLAST (PATHNAME-DIRECTORY #1#) 2)))) (LIST (DELETE-DUPLICATES (MAPCAR #'PATHNAME-VERSION DIRS)) (EQUALP (PROBE-PATHNAME COPY) 1ST) (EQUALP (TRUENAME COPY) 1ST))) 57 directories under #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/" EQUAL-OK: ((:NEWEST) T T) (PATHNAMEP (TRUENAME "/dev/fd/0")) EQL-OK: T (PATHNAMEP (TRUENAME "/dev/fd/1")) EQL-OK: T (PATHNAMEP (TRUENAME "/dev/fd/2")) EQL-OK: T (SYMBOLS-CLEANUP '(*DIR* A TEST MY-STRING MY-SYMBOL PATHSTRING PATHSYMBOL PATHPATH MY-PATH PATH= MY-STREAM MY-FILE *PATHNAME-VAR* CFP-TEST *LOAD-VAR*)) EQL-OK: NIL RUN-TEST: finished "path" (0 errors out of 180 tests) RUN-TEST: started # (READTABLEP (SETQ *READTABLE* (COPY-READTABLE NIL))) EQL-OK: T (SETQ $ 23) EQL-OK: 23 (DEFUN SINGLE-DOLLAR-READER (STREAM CHAR) (DECLARE (IGNORE STREAM)) (VALUES (INTERN (STRING CHAR)))) EQL-OK: SINGLE-DOLLAR-READER (SET-MACRO-CHARACTER #\$ #'SINGLE-DOLLAR-READER) EQL-OK: T |$| EQL-OK: 23 (NTH-VALUE 2 (FUNCTION-LAMBDA-EXPRESSION (GET-MACRO-CHARACTER #\$))) EQL-OK: SINGLE-DOLLAR-READER (READTABLEP (SETQ *READTABLE* (COPY-READTABLE NIL))) EQL-OK: T (LET ((*READTABLE* (COPY-READTABLE NIL))) (SET-SYNTAX-FROM-CHAR #\" #\() (MULTIPLE-VALUE-LIST (READ-FROM-STRING "\"1 2 3)"))) EQUAL-OK: ((1 2 3) 7) "1234" EQUAL-OK: "1234" (DEFUN INVERTED-PARAM-READER (STREAM CHAR) (READ-DELIMITED-LIST #\( STREAM T)) EQL-OK: INVERTED-PARAM-READER (LET ((*READTABLE* (COPY-READTABLE NIL))) (SET-MACRO-CHARACTER #\( (GET-MACRO-CHARACTER #\))) (SET-MACRO-CHARACTER #\) #'INVERTED-PARAM-READER) (MULTIPLE-VALUE-LIST (READ-FROM-STRING ")a 1("))) EQUAL-OK: ((A 1) 5) (LET ((*READTABLE* (COPY-READTABLE NIL))) (SET-SYNTAX-FROM-CHAR #\" #\() (SET-MACRO-CHARACTER #\( (GET-MACRO-CHARACTER #\))) (SET-MACRO-CHARACTER #\) #'INVERTED-PARAM-READER) (SET-MACRO-CHARACTER #\" #'INVERTED-PARAM-READER) (LIST (MULTIPLE-VALUE-LIST (READ-FROM-STRING "\"1 2 3(")) (MULTIPLE-VALUE-LIST (READ-FROM-STRING ")a 1(")))) EQUAL-OK: (((1 2 3) 7) ((A 1) 5)) "1234" EQUAL-OK: "1234" '(1 2 3) EQUAL-OK: (1 2 3) (DEFUN MY-DISPATCH-MACRO (STREAM SUBCHAR ARG) (LIST 'MY-DISPATCH-MACRO (STREAMP STREAM) SUBCHAR ARG)) EQL-OK: MY-DISPATCH-MACRO (LET ((*READTABLE* (COPY-READTABLE NIL))) (LIST (MAKE-DISPATCH-MACRO-CHARACTER #\x) (SET-DISPATCH-MACRO-CHARACTER #\x #\. #'MY-DISPATCH-MACRO) (NTH-VALUE 2 (FUNCTION-LAMBDA-EXPRESSION (GET-DISPATCH-MACRO-CHARACTER #\x #\.))) (MULTIPLE-VALUE-LIST (READ-FROM-STRING "\\XS")) (MULTIPLE-VALUE-LIST (READ-FROM-STRING "123x.45")) (MULTIPLE-VALUE-LIST (READ-FROM-STRING "123x.45" T NIL :START 3)) (MULTIPLE-VALUE-LIST (READ-FROM-STRING "123x.45" T NIL :START 5)))) EQUAL-OK: (T T MY-DISPATCH-MACRO (XS 3) (123 3) ((MY-DISPATCH-MACRO T #\. NIL) 5) (45 7)) (GET-DISPATCH-MACRO-CHARACTER #\x #\.) [SIMPLE-ERROR]: GET-DISPATCH-MACRO-CHARACTER: #\x is not a dispatch macro character EQL-OK: ERROR (GET-DISPATCH-MACRO-CHARACTER #\y #\,) [SIMPLE-ERROR]: GET-DISPATCH-MACRO-CHARACTER: #\y is not a dispatch macro character EQL-OK: ERROR (GET-DISPATCH-MACRO-CHARACTER #\y #\.) [SIMPLE-ERROR]: GET-DISPATCH-MACRO-CHARACTER: #\y is not a dispatch macro character EQL-OK: ERROR (DEFUN |#{-reader| (STREAM CHAR ARG) (DECLARE (IGNORE CHAR ARG)) (MAPCON #'(LAMBDA (X) (MAPCAR #'(LAMBDA (Y) (LIST (CAR X) Y)) (CDR X))) (READ-DELIMITED-LIST #\} STREAM))) EQL-OK: |#{-reader| (SET-DISPATCH-MACRO-CHARACTER #\# #\{ #'|#{-reader|) EQL-OK: T (SET-SYNTAX-FROM-CHAR #\} #\)) EQL-OK: T (DEFPARAMETER *READ-ST* (MAKE-STRING-INPUT-STREAM "#{p q z a} #{a b c d e}")) EQL-OK: *READ-ST* (READ *READ-ST*) EQUAL-OK: ((P Q) (P Z) (P A) (Q Z) (Q A) (Z A)) (READ *READ-ST*) EQUAL-OK: ((A B) (A C) (A D) (A E) (B C) (B D) (B E) (C D) (C E) (D E)) (READTABLEP (SETQ *READTABLE* (COPY-READTABLE NIL NIL))) EQL-OK: T (SYMBOLS-CLEANUP '($ SINGLE-DOLLAR-READER INVERTED-PARAM-READER MY-DISPATCH-MACRO |#{-reader| *READ-ST*)) EQL-OK: NIL RUN-TEST: finished "readtable" (0 errors out of 27 tests) RUN-TEST: started # (SETF LI1 '(A (B) ((C) (D))) VEC1 '#(0 1 2 3)) EQUALP-OK: #(0 1 2 3) (SETF PA 'OLD) EQL-OK: OLD (PSETF) EQL-OK: NIL (PSETF PA 'NEW PAO PA) EQL-OK: NIL PA EQL-OK: NEW PAO EQL-OK: OLD (SETF (NTH 1 LI1) 'UU) EQL-OK: UU (EVAL 'LI1) EQUAL-OK: (A UU ((C) (D))) (SETF (ELT LI1 1) 'OO) EQL-OK: OO (SETF (ELT VEC1 1) 'OO) EQL-OK: OO (EVAL 'LI1) EQUAL-OK: (A OO ((C) (D))) (EVAL 'VEC1) EQUALP-OK: #(0 OO 2 3) (SETF (REST LI1) '((WW))) EQUAL-OK: ((WW)) (EVAL 'LI1) EQUAL-OK: (A (WW)) (SETF (FIRST LI1) 'AA) EQL-OK: AA (FIRST LI1) EQL-OK: AA (SETF (SECOND LI1) 'BB) EQL-OK: BB (EVAL 'LI1) EQUAL-OK: (AA BB) (SETF (THIRD LI1) 'BB) [SIMPLE-TYPE-ERROR]: SYSTEM::%RPLACA: NIL is not a pair EQL-OK: ERROR (EVAL 'LI1) EQUAL-OK: (AA BB) (SETF (REST LI1) '(2 3 4 5 6 7 8 9 10)) EQUAL-OK: (2 3 4 5 6 7 8 9 10) (SETF (SECOND LI1) 22) EQL-OK: 22 (EVAL 'LI1) EQUAL-OK: (AA 22 3 4 5 6 7 8 9 10) (SETF (THIRD LI1) '33) EQL-OK: 33 (SETF (FOURTH LI1) '44) EQL-OK: 44 (SETF (FIFTH LI1) '55) EQL-OK: 55 (SETF (SIXTH LI1) '66) EQL-OK: 66 (SETF (SEVENTH LI1) '77) EQL-OK: 77 (SETF (EIGHTH LI1) '88) EQL-OK: 88 (SETF (NINTH LI1) '99) EQL-OK: 99 (SETF (TENTH LI1) '1010) EQL-OK: 1010 (EVAL 'LI1) EQUAL-OK: (AA 22 33 44 55 66 77 88 99 1010) (SETF (FIRST LI1) '(((A)))) EQUAL-OK: (((A))) (SETF (CAAAR LI1) 'UU) EQL-OK: UU (CAAAR LI1) EQL-OK: UU (CAR LI1) EQUAL-OK: ((UU)) (SETF (CAAR LI1) 'OO) EQL-OK: OO (EVAL 'LI1) EQUAL-OK: ((OO) 22 33 44 55 66 77 88 99 1010) (SETF (CAR LI1) 'II) EQL-OK: II (EVAL 'LI1) EQUAL-OK: (II 22 33 44 55 66 77 88 99 1010) (SETF (CDDDR LI1) 'PP) EQL-OK: PP (EVAL 'LI1) EQUAL-OK: (II 22 33 . PP) (SETF (CADDR LI1) '333) EQL-OK: 333 (EVAL 'LI1) EQUAL-OK: (II 22 333 . PP) (SETF (SVREF VEC1 2) 'KK) EQL-OK: KK (EVAL 'VEC1) EQUALP-OK: #(0 OO KK 3) (SETF (GET 'A 'B) 'UU) EQL-OK: UU (GET 'A 'B) EQL-OK: UU (SETF (GETF (CADR (SETQ XX '(AAA (I1 V1 I2 V2)))) 'I2) 'V222) EQL-OK: V222 (EVAL 'XX) EQUAL-OK: (AAA (I1 V1 I2 V222)) (GETF (CADR XX) 'I2) EQL-OK: V222 (GETF (CADR XX) 'I1) EQL-OK: V1 (SETF (DOCUMENTATION 'BEISPIEL 'TYP1) "doc 1") EQUAL-OK: "doc 1" (SETF (DOCUMENTATION 'BEISPIEL 'TYP2) "doc 2") EQUAL-OK: "doc 2" (DOCUMENTATION 'BEISPIEL 'TYP2) EQUAL-OK: "doc 2" (SETF (DOCUMENTATION 'BEISPIEL 'TYP2) "doc 3") EQUAL-OK: "doc 3" (DOCUMENTATION 'BEISPIEL 'TYP2) EQUAL-OK: "doc 3" (SYMBOL-PLIST 'BEISPIEL) EQUAL-OK: (SYSTEM::DOC (TYP2 "doc 3" TYP1 "doc 1")) (SETF (SYMBOL-VALUE 'XX) 'VOELLIGNEU) EQL-OK: VOELLIGNEU (EVAL 'XX) EQL-OK: VOELLIGNEU (PROGN (SETF (SYMBOL-FUNCTION 'FF) (COERCE '(LAMBDA (X) (PRINT X) 'HELLO) 'FUNCTION)) NIL) EQL-OK: NIL (FF 5) 5 EQL-OK: HELLO (DEFUN XX NIL 'A) EQL-OK: XX (PROGN (SETF (SYMBOL-FUNCTION 'XX1) (SYMBOL-FUNCTION 'XX)) NIL) EQL-OK: NIL (XX1) EQL-OK: A (SETQ L '(A 1 C D)) EQUAL-OK: (A 1 C D) (SETF (THE INTEGER (CADR L)) 100) EQL-OK: 100 L EQUAL-OK: (A 100 C D) (PROGN (SETF A (MAKE-HASH-TABLE)) T) EQL-OK: T (SETF (GETHASH 'COLOR A) 'BROWN) EQL-OK: BROWN (GETHASH 'COLOR A) EQL-OK: BROWN (DEFSTRUCT SCHIFF MASSE NIL ZOT) EQL-OK: SCHIFF (SETF S1 (MAKE-SCHIFF :NIL 123)) EQUALP-OK: #S(SCHIFF :MASSE NIL :NIL 123 :ZOT NIL) (SCHIFF-NIL S1) EQL-OK: 123 (DOCUMENTATION S1 'TYPE) EQL-OK: NIL (SETF (SCHIFF-MASSE S1) 500) EQL-OK: 500 (SCHIFF-MASSE S1) EQL-OK: 500 (DEFMACRO SETF-TEST (V) `(SVREF ,V 3)) EQL-OK: SETF-TEST (PROGN (SETF (MACRO-FUNCTION 'SETF-TEST1) (MACRO-FUNCTION 'SETF-TEST)) NIL) EQL-OK: NIL (SETF (SETF-TEST VEC1) 'OHO) EQL-OK: OHO (EVAL 'VEC1) EQUALP-OK: #(0 OO KK OHO) (SETF (SETF-TEST1 VEC1) 'HIHI) EQL-OK: HIHI (EVAL 'VEC1) EQUALP-OK: #(0 OO KK HIHI) (PROGN (SETF A (MAKE-ARRAY '(4 3))) NIL) EQL-OK: NIL (AREF A 2 2) EQL-OK: NIL (SETF (APPLY #'AREF A '(2 2)) 'XXXX) EQL-OK: XXXX (AREF A 2 2) EQL-OK: XXXX (SETF (AREF '#(A B C) 1) 'II) EQL-OK: II (SETF B #*101010) EQUAL-OK: #*101010 (BIT B 2) EQL-OK: 1 (SETF (BIT B 2) 0) EQL-OK: 0 (BIT B 2) EQL-OK: 0 (SETF (SBIT B 2) 1) EQL-OK: 1 (SBIT B 2) EQL-OK: 1 (PROGN (SETF A (MAKE-ARRAY 5 :FILL-POINTER T)) T) EQL-OK: T (FILL-POINTER A) EQL-OK: 5 (SETF (FILL-POINTER A) 3) EQL-OK: 3 (FILL-POINTER A) EQL-OK: 3 (SETF STR "hose") EQUAL-OK: "hose" (SETF (CHAR STR 0) #\d) EQL-OK: #\d STR EQUAL-OK: "dose" (SETF STR "aaaxxxccc") EQUAL-OK: "aaaxxxccc" (SETF (SUBSEQ STR 3 6) "bbb") EQUAL-OK: "bbb" STR EQUAL-OK: "aaabbbccc" (SETQ X (LIST 'A 'B 'C)) EQUAL-OK: (A B C) (SHIFTF (CADR X) 'Z) EQL-OK: B X EQUAL-OK: (A Z C) (SHIFTF (CADR X) (CDDR X) 'Q) EQL-OK: Z X EQUAL-OK: (A (C) . Q) (PROGN (DEFUN AD (X) (VALUES (CAR X) (CDR X))) (DEFSETF AD (X) (A B) `(SETF (VALUES (CAR ,X) (CDR ,X)) (VALUES ,A ,B))) (SETQ X (CONS 1 2) Y 3 Z 4 W 5 V 6 U 7)) EQL-OK: 7 (ROTATEF (AD X) (VALUES Y Z) (VALUES W V U)) EQL-OK: NIL X EQUAL-OK: (3 . 4) (LIST Y Z W V U) EQUAL-OK: (5 6 1 2 NIL) (MULTIPLE-VALUE-LIST (SHIFTF (AD X) (VALUES Y Z W) (VALUES V U) (FLOOR 89 10))) EQUAL-OK: (3 4) X EQUAL-OK: (5 . 6) (LIST Y Z W V U) EQUAL-OK: (2 NIL NIL 8 9) (MULTIPLE-VALUE-LIST (SETF (VALUES (VALUES) Y Z) (VALUES 1 2 3))) EQUAL-OK: (NIL 2 3) Y EQL-OK: 2 Z EQL-OK: 3 (MULTIPLE-VALUE-LIST (SETF (VALUES X (VALUES) Z) (VALUES 'X 'Y 'Z))) EQUAL-OK: (X NIL Z) X EQL-OK: X Z EQL-OK: Z (LET ((I 105)) (ROTATEF (LDB (BYTE 4 4) I) (LDB (BYTE 4 0) I)) I) EQL-OK: 150 (PROGN (DEFSETF MY-SUBSEQ (SEQUENCE START &OPTIONAL END) (NEW-SEQUENCE) `(PROGN (REPLACE ,SEQUENCE ,NEW-SEQUENCE :START1 ,START :END1 ,END) ,NEW-SEQUENCE)) T) EQL-OK: T (SETF S "asdfg" (MY-SUBSEQ S 1 3) "xy") EQUAL-OK: "xy" S EQUAL-OK: "axyfg" (PROGN (DEFSETF MY-SUBSEQ-ENV (SEQUENCE START &OPTIONAL END &ENVIRONMENT ENV) (NEW-SEQUENCE) `(PROGN (REPLACE ,SEQUENCE ,NEW-SEQUENCE :START1 ,START :END1 ,END) ,NEW-SEQUENCE)) T) EQL-OK: T (PROGN (DEFSETF TEST-SETF-01 (A B &OPTIONAL C) (NEWVAL) `(PROGN (PRINT (LIST ',A ',B ',C ',NEWVAL)) ,NEWVAL)) (SETF (TEST-SETF-01) 3)) [SIMPLE-PROGRAM-ERROR]: EVAL/APPLY: Too few arguments (2 instead of at least 4) given to SETF-TEST-SETF-01 EQL-OK: ERROR (PROGN (DEFSETF TEST-SETF-02 (A ((B))) (NEWVAL)) T) [SIMPLE-SOURCE-PROGRAM-ERROR]: DEFSETF TEST-SETF-02: invalid DEFSETF lambda-list: Invalid lambda list element #1=((B)) EQL-OK: ERROR (SETF PL (LIST 'A 10 'B 11 'C 12 'D 13 'A 14 'B 15 'C 16 'D 17)) EQUAL-OK: (A 10 B 11 C 12 D 13 A 14 B 15 C 16 D 17) (GETF PL 'A) EQL-OK: 10 (GETF PL 'Z 1) EQL-OK: 1 (GETF PL 'U) EQL-OK: NIL (SETF (GETF PL 'Z) 125) EQL-OK: 125 (REMF PL 'Z) EQL-OK: T (REMF PL 'Z) EQL-OK: NIL (REMF PL 'C) EQL-OK: T (GETF PL 'C) EQL-OK: 16 (REMF PL 'C) EQL-OK: T (REMF PL 'C) EQL-OK: NIL (GETF PL 'D) EQL-OK: 13 (SETF (GETF PL 'D) 100) EQL-OK: 100 (GETF PL 'D) EQL-OK: 100 (REMF PL 'D) EQL-OK: T (REMF PL 'D) EQL-OK: T (GETF PL 'B) EQL-OK: 11 PL EQUAL-OK: (A 10 B 11 A 14 B 15) (UNINTERN 'FOO) EQL-OK: T (UNINTERN 'BAR) EQL-OK: T (UNWIND-PROTECT (LET ((FORMS '((DEFSTRUCT FOO A B) (DEFSTRUCT (BAR (:INCLUDE FOO) (:CONC-NAME FOO-)) C) (DEFUN QUUX (X) (FOO-A X)) (DEFUN FROBOZZ (X Y) (SETF (FOO-A X) Y)) (LIST (QUUX (MAKE-FOO :A 1)) (QUUX (MAKE-BAR :A 2)) (FROBOZZ (MAKE-FOO) 10) (FROBOZZ (MAKE-BAR) 20))))) (LIST (EVAL `(PROGN ,@FORMS)) (FUNCALL (COMPILE NIL `(LAMBDA NIL ,@FORMS))))) (FMAKUNBOUND 'QUUX) (FMAKUNBOUND 'FROBOZZ) (FMAKUNBOUND 'FOO-A) (FMAKUNBOUND 'FOO-B) (FMAKUNBOUND 'FOO-C)) EQUAL-OK: ((1 2 10 20) (1 2 10 20)) (UNWIND-PROTECT (PROGN (DEFSTRUCT (FOO (:TYPE LIST)) A B C) (FUNCALL (COMPILE NIL (LAMBDA (F) (SETF (FOO-C F) (+ (FOO-A F) (FOO-B F))) F)) (MAKE-FOO :A 10 :B 100))) (FMAKUNBOUND 'FOO-A) (FMAKUNBOUND 'FOO-B) (FMAKUNBOUND 'FOO-C)) EQUAL-OK: (10 100 110) (DEFSTRUCT DOCUMENTED-STRUCT "Doc String" A B) EQL-OK: DOCUMENTED-STRUCT (DOCUMENTATION 'DOCUMENTED-STRUCT 'STRUCTURE) EQUAL-OK: "Doc String" (SETF (DOCUMENTATION 'DOCUMENTED-STRUCT 'STRUCTURE) "New Doc") EQUAL-OK: "New Doc" (DOCUMENTATION 'DOCUMENTED-STRUCT 'STRUCTURE) EQUAL-OK: "New Doc" (DEFSTRUCT (DOCUMENTED-STRUCT (:TYPE VECTOR)) "vector" A B) EQL-OK: DOCUMENTED-STRUCT (DOCUMENTATION 'DOCUMENTED-STRUCT 'STRUCTURE) EQUAL-OK: "vector" (SETF (DOCUMENTATION 'DOCUMENTED-STRUCT 'STRUCTURE) "vector1") EQUAL-OK: "vector1" (DOCUMENTATION 'DOCUMENTED-STRUCT 'STRUCTURE) EQUAL-OK: "vector1" (PROGN (PROCLAIM '(INLINE (SETF FOO21))) (DEFUN (SETF FOO21) (X Y) (+ X Y)) (DEFUN BAR21 (X Y) ((SETF FOO21) X Y)) (COMPILE 'BAR21) (DEFUN (SETF FOO21) (X Y) (ERROR "Not inlined")) (BAR21 1 2)) EQL-OK: 3 (DEFSETF FOO22 NIL NIL '(VALUES)) EQL-OK: FOO22 (GET-SETF-EXPANSION '(NTH X Y . Z)) [SIMPLE-TYPE-ERROR]: ENDP: A proper list must not end with Z EQL-OK: ERROR (GET-SETF-EXPANSION '(LDB X . Y)) [SIMPLE-TYPE-ERROR]: LENGTH: A proper list must not end with Y EQL-OK: ERROR (GET-SETF-EXPANSION '(LDB X Y . Z)) [SIMPLE-TYPE-ERROR]: LENGTH: A proper list must not end with Z EQL-OK: ERROR (MACROEXPAND-1 '(PUSH (FOO) L)) EQUAL-OK: (SETQ L (CONS (FOO) L)) (MACROEXPAND-1 '(POP L)) EQUAL-OK: (PROG1 (CAR L) (SETQ L (CDR L))) (MACROEXPAND-1 '(PUSHNEW (FOO) L)) EQUAL-OK: (SETQ L (ADJOIN (FOO) L)) (MACROEXPAND-1 '(INCF X)) EQUAL-OK: (SETQ X (+ X 1)) (MACROEXPAND-1 '(SETF L (FOO))) EQUAL-OK: (SETQ L (FOO)) (MACROEXPAND-1 '(SETF (VALUES-LIST L) (FOO))) EQUAL-OK: (VALUES-LIST (SETF L (MULTIPLE-VALUE-LIST (FOO)))) (DEFINE-SETF-EXPANDER BOTHVARS (X Y) (LET ((G (GENSYM))) (VALUES 'NIL 'NIL (LIST G) `(PROGN (SETQ ,X ,G ,Y ,G)) X))) EQL-OK: BOTHVARS (LET (A B) (SETF (BOTHVARS A B) 'NIL) (PUSH (MAKE-ARRAY 2) (BOTHVARS A B)) (EQ A B)) EQL-OK: T (LENGTH (MULTIPLE-VALUE-LIST (GET-SETF-EXPANSION '(X) NIL))) EQL-OK: 5 (PROGN (DEFPARAMETER *XY* (MAKE-ARRAY '(10 10) :INITIAL-ELEMENT NIL)) (DEFUN XY-S (&KEY ((X X) 0) ((Y Y) 0)) (AREF *XY* X Y)) (DEFUN XY-K (&KEY (X 0) (Y 0)) (AREF *XY* X Y)) (DEFUN SET-XY-S (NEW-VALUE &KEY ((X X) 0) ((Y Y) 0)) (SETF (AREF *XY* X Y) NEW-VALUE)) (DEFUN SET-XY-K (NEW-VALUE &KEY (X 0) (Y 0)) (SETF (AREF *XY* X Y) NEW-VALUE)) (DEFSETF XY-S (&KEY ((X X) 0) ((Y Y) 0)) (STORE) `(SET-XY-S ,STORE 'X ,X 'Y ,Y)) (DEFSETF XY-K (&KEY (X 0) (Y 0)) (STORE) `(SET-XY-K ,STORE :X ,X :Y ,Y))) EQL-OK: XY-K (XY-K :X 1) EQL-OK: NIL (XY-S 'X 1) EQL-OK: NIL (SETF (XY-K :X 1) 10) EQL-OK: 10 (SETF (XY-S 'X 2) 20) EQL-OK: 20 (XY-K :X 2) EQL-OK: 20 (XY-S 'X 1) EQL-OK: 10 (LET ((A 'X) (B 'Y)) (SETF (XY-S A 1 B 2) 3) (SETF (XY-S B 5 A 9) 14)) EQL-OK: 14 (XY-K :Y 2 :X 1) EQL-OK: 3 (XY-S 'Y 2 'X 1) EQL-OK: 3 (XY-K :X 9 :Y 5) EQL-OK: 14 (XY-S 'X 9 'Y 5) EQL-OK: 14 (LET ((FLAG (ZEROP (RANDOM 2)))) (SETF (XY-K (IF FLAG :X :Y) 4 (IF FLAG :Y :X) 2) 42 (XY-S (IF FLAG 'Y 'X) 4 (IF FLAG 'X 'Y) 2) 24) (LIST (XY-K (IF FLAG :Y :X) 4 (IF FLAG :X :Y) 2) (XY-S (IF FLAG 'X 'Y) 4 (IF FLAG 'Y 'X) 2))) EQUAL-OK: (24 42) (SETF (DOCUMENTATION (LAMBDA NIL 'ABAZONK) 'FUNCTION) "abazonk doc") EQUAL-OK: "abazonk doc" (DOCUMENTATION (LAMBDA NIL 'BAZONK) 'FUNCTION) EQL-OK: NIL (SETF (DOCUMENTATION (COMPILE NIL (LAMBDA NIL 'ABAZONK)) 'FUNCTION) "abazonk doc compiled") EQUAL-OK: "abazonk doc compiled" (DOCUMENTATION (COMPILE NIL (LAMBDA NIL 'BAZONK)) 'FUNCTION) EQL-OK: NIL (DOCUMENTATION (LAMBDA NIL "interpreted anonymous doc" 42) 'FUNCTION) EQUAL-OK: "interpreted anonymous doc" (LET ((F (LAMBDA NIL "interpreted anonymous doc" 42))) (SETF (DOCUMENTATION F 'FUNCTION) "new doc") (DOCUMENTATION F 'FUNCTION)) EQUAL-OK: "new doc" (PROGN (DEFUN FUNC01 NIL "interpreted doc" 42) (LET ((OLD-FUNC #'FUNC01) (NEW-FUNC (LAMBDA NIL "new interpreted doc" 43))) (SETF (FDEFINITION 'FUNC01) NEW-FUNC) (LIST* (DOCUMENTATION OLD-FUNC 'FUNCTION) (DOCUMENTATION NEW-FUNC 'FUNCTION) (DOCUMENTATION 'FUNC01 'FUNCTION) (PROGN (SETF (DOCUMENTATION 'FUNC01 'FUNCTION) "replaced doc") (LIST (DOCUMENTATION OLD-FUNC 'FUNCTION) (DOCUMENTATION NEW-FUNC 'FUNCTION) (DOCUMENTATION 'FUNC01 'FUNCTION)))))) EQUAL-OK: ("interpreted doc" "new interpreted doc" "new interpreted doc" "interpreted doc" "replaced doc" "replaced doc") (PROGN (DEFMACRO FUNC03 NIL "macro doc" 42) (LET ((OLD-FUNC (MACRO-FUNCTION 'FUNC03)) (NEW-FUNC (LAMBDA (FORM ENV) "new macro doc" 43))) (SETF (MACRO-FUNCTION 'FUNC03) NEW-FUNC) (LIST* (DOCUMENTATION OLD-FUNC 'FUNCTION) (DOCUMENTATION NEW-FUNC 'FUNCTION) (DOCUMENTATION 'FUNC03 'FUNCTION) (PROGN (SETF (DOCUMENTATION 'FUNC03 'FUNCTION) "replaced doc") (LIST (DOCUMENTATION OLD-FUNC 'FUNCTION) (DOCUMENTATION NEW-FUNC 'FUNCTION) (DOCUMENTATION 'FUNC03 'FUNCTION)))))) EQUAL-OK: ("macro doc" "new macro doc" "new macro doc" "macro doc" "replaced doc" "replaced doc") (LET ((D (DOCUMENTATION 'WHEN 'FUNCTION))) (AND (OR (NULL D) (STRINGP D)) (PROGN (SETF (DOCUMENTATION 'WHEN 'FUNCTION) "when doc") (STRING= "when doc" (DOCUMENTATION 'WHEN 'FUNCTION))) (PROGN (SETF (DOCUMENTATION 'WHEN 'FUNCTION) D) (STRING= D (DOCUMENTATION 'WHEN 'FUNCTION))))) EQL-OK: T (DEFUN FOO (Z) "some doc" Z) EQL-OK: FOO (DOCUMENTATION 'FOO 'FUNCTION) EQUAL-OK: "some doc" (SETF (DOCUMENTATION 'FOO 'FUNCTION) NIL) EQL-OK: NIL (DOCUMENTATION 'FOO 'FUNCTION) EQL-OK: NIL (COMPILE 'FOO) EQL-OK: FOO (DOCUMENTATION 'FOO 'FUNCTION) EQL-OK: NIL (SETF (DOCUMENTATION 'FOO 'FUNCTION) "other doc") EQUAL-OK: "other doc" (DOCUMENTATION 'FOO 'FUNCTION) EQUAL-OK: "other doc" (SETF (DOCUMENTATION 'FOO 'FUNCTION) NIL) EQL-OK: NIL (DOCUMENTATION 'FOO 'FUNCTION) EQL-OK: NIL (DEFMACRO FOO NIL "docstring" NIL) EQL-OK: FOO (DOCUMENTATION 'FOO 'FUNCTION) EQUAL-OK: "docstring" (COMPILE 'FOO) EQL-OK: FOO (DOCUMENTATION 'FOO 'FUNCTION) EQUAL-OK: "docstring" (SYMBOLS-CLEANUP '(XX SCHIFF SETF-TEST AD MY-SUBSEQ MY-SUBSEQ-ENV TEST-SETF-01 TEST-SETF-02 FOO BAR QUUX FROBOZZ DOCUMENTED-STRUCT FOO21 BAR21 FOO22 BOTHVARS *XY* XY-K XY-S SET-XY-K SET-XY-S FUNC01 FUNC02 FUNC03)) EQL-OK: NIL RUN-TEST: finished "setf" (0 errors out of 210 tests) RUN-TEST: started # (DEFUN MAKE-BYTE-ARRAY (N) (MAKE-ARRAY N :ELEMENT-TYPE '(UNSIGNED-BYTE 8))) EQL-OK: MAKE-BYTE-ARRAY (DEFUN COERCE-BYTE-ARRAY (L) (COERCE L '(VECTOR (UNSIGNED-BYTE 8)))) EQL-OK: COERCE-BYTE-ARRAY (LET* ((OS (OPERATING-SYSTEM-TYPE)) (CPU (AND (EQUAL OS "Linux") (LET ((STREAM (RUN-SHELL-COMMAND "uname -m" :OUTPUT :STREAM))) (UNWIND-PROTECT (READ-LINE STREAM) (CLOSE STREAM)))))) (SETQ *OS* OS) (SETQ +EINVAL+ (COND ((EQUAL OS "GNU/Hurd") 1073741846) ((EQUAL OS "Haiku") (- 5 2147483648)) (T 22))) (SETQ +EPIPE+ (COND ((EQUAL OS "GNU/Hurd") 1073741856) ((EQUAL OS "Haiku") (- 24589 2147483648)) (T 32))) (SETQ +EADDRNOTAVAIL+ (COND ((EQUAL OS "GNU/Hurd") 1073741873) ((OR (EQUAL OS "FreeBSD") (EQUAL OS "DragonFly") (EQUAL OS "GNU/kFreeBSD") (EQUAL OS "NetBSD") (EQUAL OS "OpenBSD") (EQUAL OS "Darwin") (AND (EQUAL OS "Linux") (OR (EQL (SEARCH "alpha" CPU) 0) (EQL (SEARCH "sparc" CPU) 0))) (EQUAL OS "Minix")) 49) ((EQUAL OS "AIX") 68) ((OR (EQUAL OS "HP-UX") (AND (EQUAL OS "Linux") (EQL (SEARCH "parisc" CPU) 0))) 227) ((EQUAL OS "IRIX") 236) ((OR (EQUAL OS "SunOS") (AND (EQUAL OS "Linux") (EQL (SEARCH "mips" CPU) 0))) 126) ((EQUAL OS "Linux") 99) ((EQUAL OS "Haiku") (- 28695 2147483648)) ((EQUAL OS "CYGWIN") 125) ((EQUAL OS "Windows") 101) (T 'UNKNOWN))) (SETQ +ECONNRESET+ (COND ((EQUAL OS "GNU/Hurd") 1073741878) ((OR (EQUAL OS "FreeBSD") (EQUAL OS "DragonFly") (EQUAL OS "GNU/kFreeBSD") (EQUAL OS "NetBSD") (EQUAL OS "OpenBSD") (EQUAL OS "Darwin") (AND (EQUAL OS "Linux") (OR (EQL (SEARCH "alpha" CPU) 0) (EQL (SEARCH "sparc" CPU) 0))) (EQUAL OS "Minix")) 54) ((EQUAL OS "AIX") 73) ((OR (EQUAL OS "HP-UX") (AND (EQUAL OS "Linux") (EQL (SEARCH "parisc" CPU) 0))) 232) ((EQUAL OS "IRIX") 131) ((OR (EQUAL OS "SunOS") (AND (EQUAL OS "Linux") (EQL (SEARCH "mips" CPU) 0))) 131) ((EQUAL OS "Linux") 104) ((EQUAL OS "Haiku") (- 28700 2147483648)) ((EQUAL OS "CYGWIN") 104) ((EQUAL OS "Windows") 108) (T 'UNKNOWN))) (SETQ +ECONNREFUSED+ (COND ((EQUAL OS "GNU/Hurd") 1073741885) ((OR (EQUAL OS "FreeBSD") (EQUAL OS "DragonFly") (EQUAL OS "GNU/kFreeBSD") (EQUAL OS "NetBSD") (EQUAL OS "OpenBSD") (EQUAL OS "Darwin") (AND (EQUAL OS "Linux") (OR (EQL (SEARCH "alpha" CPU) 0) (EQL (SEARCH "sparc" CPU) 0))) (EQUAL OS "Minix")) 61) ((EQUAL OS "AIX") 79) ((OR (EQUAL OS "HP-UX") (AND (EQUAL OS "Linux") (EQL (SEARCH "parisc" CPU) 0))) 239) ((EQUAL OS "IRIX") 146) ((OR (EQUAL OS "SunOS") (AND (EQUAL OS "Linux") (EQL (SEARCH "mips" CPU) 0))) 146) ((EQUAL OS "Linux") 111) ((EQUAL OS "Haiku") (- 28704 2147483648)) ((EQUAL OS "CYGWIN") 111) ((EQUAL OS "Windows") 107) (T 'UNKNOWN))) (SETQ +ETIMEDOUT+ (COND ((EQUAL OS "GNU/Hurd") 1073741884) ((OR (EQUAL OS "FreeBSD") (EQUAL OS "DragonFly") (EQUAL OS "GNU/kFreeBSD") (EQUAL OS "NetBSD") (EQUAL OS "OpenBSD") (EQUAL OS "Darwin") (AND (EQUAL OS "Linux") (OR (EQL (SEARCH "alpha" CPU) 0) (EQL (SEARCH "sparc" CPU) 0))) (EQUAL OS "Minix")) 60) ((EQUAL OS "AIX") 78) ((OR (EQUAL OS "HP-UX") (AND (EQUAL OS "Linux") (EQL (SEARCH "parisc" CPU) 0))) 238) ((EQUAL OS "IRIX") 145) ((OR (EQUAL OS "SunOS") (AND (EQUAL OS "Linux") (EQL (SEARCH "mips" CPU) 0))) 145) ((EQUAL OS "Linux") 110) ((EQUAL OS "Haiku") (- 28704 2147483648)) ((EQUAL OS "CYGWIN") 116) ((EQUAL OS "Windows") 138) (T 'UNKNOWN))) NIL) EQL-OK: NIL (DEFPARAMETER *FILE* "socket-tst-file.test") EQL-OK: *FILE* (WITH-OPEN-FILE (S *FILE* :DIRECTION :OUTPUT) (LOOP :REPEAT 3 :DO (WRITE-LINE "abcdefghijklmnopqrstuvwxyz" S))) EQL-OK: NIL (DEFPARAMETER *S* (OPEN *FILE* :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :BUFFERED NIL)) EQL-OK: *S* (READ-BYTE-SEQUENCE (MAKE-BYTE-ARRAY 4) *S*) EQL-OK: 4 (READ-BYTE-SEQUENCE (MAKE-BYTE-ARRAY 4) *S* :NO-HANG T) EQL-OK: 4 (READ-BYTE-SEQUENCE (MAKE-BYTE-ARRAY 4) *S* :INTERACTIVE T) EQL-OK: 4 (CLOSE *S*) EQL-OK: T (WITH-OPEN-FILE (*S* *FILE* :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :BUFFERED NIL) (INTEGERP (READ-BYTE-SEQUENCE (MAKE-BYTE-ARRAY 10000) *S*))) EQL-OK: T (WITH-OPEN-FILE (*S* *FILE* :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :BUFFERED NIL) (INTEGERP (READ-BYTE-SEQUENCE (MAKE-BYTE-ARRAY 10000) *S* :NO-HANG T))) EQL-OK: T (WITH-OPEN-FILE (*S* *FILE* :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :BUFFERED NIL) (INTEGERP (READ-BYTE-SEQUENCE (MAKE-BYTE-ARRAY 10000) *S* :INTERACTIVE T))) EQL-OK: T (PROGN (SETQ *S* (OPEN *FILE* :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :BUFFERED T)) (READ-BYTE-SEQUENCE (MAKE-BYTE-ARRAY 4) *S*)) EQL-OK: 4 (READ-BYTE-SEQUENCE (MAKE-BYTE-ARRAY 4) *S* :NO-HANG T) EQL-OK: 4 (READ-BYTE-SEQUENCE (MAKE-BYTE-ARRAY 4) *S* :INTERACTIVE T) EQL-OK: 4 (CLOSE *S*) EQL-OK: T (WITH-OPEN-FILE (*S* *FILE* :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :BUFFERED T) (INTEGERP (READ-BYTE-SEQUENCE (MAKE-BYTE-ARRAY 10000) *S*))) EQL-OK: T (WITH-OPEN-FILE (*S* *FILE* :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :BUFFERED T) (INTEGERP (READ-BYTE-SEQUENCE (MAKE-BYTE-ARRAY 10000) *S* :NO-HANG T))) EQL-OK: T (WITH-OPEN-FILE (*S* *FILE* :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :BUFFERED T) (INTEGERP (READ-BYTE-SEQUENCE (MAKE-BYTE-ARRAY 10000) *S* :INTERACTIVE T))) EQL-OK: T (PROGN (SETQ *S* (OPEN *FILE* :DIRECTION :IO :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :BUFFERED NIL)) (LENGTH (WRITE-BYTE-SEQUENCE (COERCE-BYTE-ARRAY '(65 66 67 68)) *S*))) EQL-OK: 4 (LENGTH (WRITE-BYTE-SEQUENCE (COERCE-BYTE-ARRAY '(69 70 71 72 10)) *S*)) EQL-OK: 5 (CLOSE *S*) EQL-OK: T (WITH-OPEN-FILE (*S* *FILE* :DIRECTION :INPUT) (MULTIPLE-VALUE-LIST (READ-LINE *S*))) EQUAL-OK: ("ABCDEFGH" NIL) (PROGN (SETQ *S* (OPEN *FILE* :DIRECTION :IO :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :BUFFERED T)) (LENGTH (WRITE-BYTE-SEQUENCE (COERCE-BYTE-ARRAY '(65 66 67 68)) *S*))) EQL-OK: 4 (LENGTH (WRITE-BYTE-SEQUENCE (COERCE-BYTE-ARRAY '(69 70 71 72 10)) *S*)) EQL-OK: 5 (CLOSE *S*) EQL-OK: T (WITH-OPEN-FILE (*S* *FILE* :DIRECTION :INPUT) (MULTIPLE-VALUE-LIST (READ-LINE *S*))) EQUAL-OK: ("ABCDEFGH" NIL) (DEFPARAMETER *SERVER* (SHOW (SOCKET-SERVER))) # EQL-OK: *SERVER* (MULTIPLE-VALUE-LIST (SOCKET-STATUS *SERVER* 0)) EQUAL-OK: (NIL 0) (DEFPARAMETER *SOCKET-1* (SHOW (SOCKET-CONNECT (SOCKET-SERVER-PORT *SERVER*) "localhost" :TIMEOUT 0))) # EQL-OK: *SOCKET-1* (DEFPARAMETER *STATUS-ARG* (LIST (LIST *SERVER*) (LIST *SOCKET-1* :IO))) EQL-OK: *STATUS-ARG* (EQ (SOCKET-STATUS *STATUS-ARG* 0) *STATUS-ARG*) EQL-OK: T (CDR (ASSOC *SERVER* *STATUS-ARG*)) EQL-OK: T (CDDR (ASSOC *SOCKET-1* *STATUS-ARG*)) EQL-OK: :OUTPUT (DEFPARAMETER *SOCKET-2* (SHOW (SOCKET-ACCEPT *SERVER*))) # EQL-OK: *SOCKET-2* (PROGN (PUSH (LIST *SOCKET-2* :IO) *STATUS-ARG*) (EQ *STATUS-ARG* (SOCKET-STATUS *STATUS-ARG* 0))) EQL-OK: T (CDR (ASSOC *SERVER* *STATUS-ARG*)) EQL-OK: NIL (CDDR (ASSOC *SOCKET-1* *STATUS-ARG*)) EQL-OK: :OUTPUT (CDDR (ASSOC *SOCKET-2* *STATUS-ARG*)) EQL-OK: :OUTPUT (WRITE-LINE "foo" *SOCKET-1*) EQUAL-OK: "foo" (FINISH-OUTPUT *SOCKET-1*) EQL-OK: NIL (EQ (SOCKET-STATUS *STATUS-ARG* 0) *STATUS-ARG*) EQL-OK: T (CDR (ASSOC *SERVER* *STATUS-ARG*)) EQL-OK: NIL (CDDR (ASSOC *SOCKET-1* *STATUS-ARG*)) EQL-OK: :OUTPUT (CDDR (ASSOC *SOCKET-2* *STATUS-ARG*)) EQL-OK: :IO (MULTIPLE-VALUE-LIST (READ-LINE *SOCKET-2*)) EQUAL-OK: ("foo" NIL) (CLOSE *SOCKET-1*) EQL-OK: T (CLOSE *SOCKET-2*) EQL-OK: T (MULTIPLE-VALUE-LIST (SOCKET-STATUS *SERVER* 0)) EQUAL-OK: (NIL 0) (DEFPARAMETER *SOCKET-3* (SHOW (SOCKET-CONNECT (SOCKET-SERVER-PORT *SERVER*) "localhost" :TIMEOUT 0 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)))) # EQL-OK: *SOCKET-3* (DEFPARAMETER *STATUS-ARG* (LIST (LIST *SERVER*) (LIST *SOCKET-3* :IO))) EQL-OK: *STATUS-ARG* (EQ (SOCKET-STATUS *STATUS-ARG* 0) *STATUS-ARG*) EQL-OK: T (CDR (ASSOC *SERVER* *STATUS-ARG*)) EQL-OK: T (CDDR (ASSOC *SOCKET-3* *STATUS-ARG*)) EQL-OK: :OUTPUT (DEFPARAMETER *SOCKET-4* (SHOW (SOCKET-ACCEPT *SERVER* :ELEMENT-TYPE '(UNSIGNED-BYTE 8)))) # EQL-OK: *SOCKET-4* (PROGN (PUSH (LIST *SOCKET-4* :IO) *STATUS-ARG*) (EQ *STATUS-ARG* (SOCKET-STATUS *STATUS-ARG* 0))) EQL-OK: T (CDR (ASSOC *SERVER* *STATUS-ARG*)) EQL-OK: NIL (CDDR (ASSOC *SOCKET-3* *STATUS-ARG*)) EQL-OK: :OUTPUT (CDDR (ASSOC *SOCKET-4* *STATUS-ARG*)) EQL-OK: :OUTPUT (READ-BYTE-NO-HANG *SOCKET-3*) EQL-OK: NIL (WRITE-BYTE 65 *SOCKET-3*) EQL-OK: 65 (FINISH-OUTPUT *SOCKET-3*) EQL-OK: NIL (EQ (SOCKET-STATUS *STATUS-ARG* 0) *STATUS-ARG*) EQL-OK: T (CDR (ASSOC *SERVER* *STATUS-ARG*)) EQL-OK: NIL (CDDR (ASSOC *SOCKET-3* *STATUS-ARG*)) EQL-OK: :OUTPUT (CDDR (ASSOC *SOCKET-4* *STATUS-ARG*)) EQL-OK: :IO (READ-BYTE *SOCKET-4*) EQL-OK: 65 (CLOSE *SOCKET-3*) EQL-OK: T (CLOSE *SOCKET-4*) EQL-OK: T (SOCKET-SERVER-CLOSE *SERVER*) EQL-OK: NIL (PROGN (SETQ *SERVER* (SHOW (SOCKET-SERVER 9096)) *SOCKET-1* (SHOW (SOCKET-CONNECT 9096 "localhost" :TIMEOUT 0 :BUFFERED NIL)) *SOCKET-2* (SHOW (SOCKET-ACCEPT *SERVER* :BUFFERED NIL))) (WRITE-CHAR #\a *SOCKET-1*)) # # # EQL-OK: #\a (LISTP (SHOW (LIST (MULTIPLE-VALUE-LIST (SOCKET-STREAM-LOCAL *SOCKET-1*)) (MULTIPLE-VALUE-LIST (SOCKET-STREAM-PEER *SOCKET-1*)) (MULTIPLE-VALUE-LIST (SOCKET-STREAM-LOCAL *SOCKET-2*)) (MULTIPLE-VALUE-LIST (SOCKET-STREAM-PEER *SOCKET-2*))) :PRETTY T)) (("127.0.0.1 (fedora-riscv-4.gcc143.osuosl.org)" 44286) ("127.0.0.1 (localhost)" 9096) ("127.0.0.1 (fedora-riscv-4.gcc143.osuosl.org)" 9096) ("127.0.0.1 (localhost)" 44286)) EQL-OK: T (SEARCH " (" (SOCKET-STREAM-LOCAL *SOCKET-1* T)) EQL-OK: NIL (SEARCH " (" (SOCKET-STREAM-PEER *SOCKET-1* T)) EQL-OK: NIL (SOCKET-STATUS (CONS *SOCKET-2* :INPUT) 0) EQL-OK: :INPUT (READ-CHAR *SOCKET-2*) EQL-OK: #\a (SOCKET-STATUS (CONS *SOCKET-2* :INPUT) 0) EQL-OK: NIL (CLOSE *SOCKET-1*) EQL-OK: T (SOCKET-STATUS (CONS *SOCKET-2* :INPUT) 0) EQL-OK: :EOF (CLOSE *SOCKET-2*) EQL-OK: T (MULTIPLE-VALUE-LIST (SOCKET-STATUS *SERVER* 0)) EQUAL-OK: (NIL 0) (SOCKET-SERVER-CLOSE *SERVER*) EQL-OK: NIL (CHECK-OS-ERROR (SOCKET-CONNECT 12345 "localhost" :TIMEOUT 30) (:ECONNREFUSED 111)) [OS-ERROR]: OS-ERROR(111): Connection refused EQL-OK: T (CHECK-OS-ERROR (SOCKET-CONNECT 12345 "localhost" :TIMEOUT 0) (:ECONNREFUSED 111)) [OS-ERROR]: OS-ERROR(111): Connection refused EQL-OK: T (CHECK-OS-ERROR (SOCKET-CONNECT 12345 "localhost" :BUFFERED NIL :TIMEOUT 0) (:ECONNREFUSED 111)) [OS-ERROR]: OS-ERROR(111): Connection refused EQL-OK: T (MULTIPLE-VALUE-BIND (RUN ARGS) (CMD-ARGS) (LET ((IS (RUN-PROGRAM RUN :ARGUMENTS (APPEND ARGS '("-q" "-q" "-x" " (let ((se (socket:socket-server))) (write-line (princ-to-string (socket:socket-server-port se))) (with-open-stream (so (socket:socket-accept se)) (write-line (lisp-implementation-version) so)) (socket:socket-server-close se)) ")) :INPUT NIL :OUTPUT :STREAM)) LOCAL REMOTE) (LOOP :UNTIL (DIGIT-CHAR-P (PEEK-CHAR NIL IS)) :DO (READ-LINE IS)) (WITH-OPEN-STREAM (SO (SOCKET-CONNECT (READ IS) "localhost" :TIMEOUT 10)) (OR (STRING= (SETQ LOCAL (LISP-IMPLEMENTATION-VERSION)) (SETQ REMOTE (READ-LINE SO))) (LIST :LOCAL LOCAL :REMOTE REMOTE))))) Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x250e000 - 0x252efff 0x80000000 - 0x800bffff 0x157d299000 - 0x157d2b3fff 0x157d2b4000 - 0x157d2b4fff 0x157d2b5000 - 0x157d2b5fff 0x157d2b6000 - 0x157d2b7fff 0x157d2b8000 - 0x157d2b9fff 0x157d2ba000 - 0x157d2c0fff 0x157d2c4000 - 0x157d2c5fff 0x157d2c6000 - 0x157d304fff 0x157d305000 - 0x157d306fff 0x157d307000 - 0x157d30dfff 0x157d30e000 - 0x157d30efff 0x157d30f000 - 0x157d334fff 0x157d335000 - 0x157d338fff 0x157d339000 - 0x157d339fff 0x157d33a000 - 0x157d33bfff 0x157d33c000 - 0x157d33cfff 0x157d33d000 - 0x157d33dfff 0x157d33e000 - 0x157d33efff 0x157d33f000 - 0x157d342fff 0x157d343000 - 0x157d343fff 0x157d344000 - 0x157d344fff 0x157d345000 - 0x157d346fff 0x157d347000 - 0x157d347fff 0x157d348000 - 0x157d348fff 0x157d349000 - 0x157d4b4fff 0x157d4b5000 - 0x157d4b7fff 0x157d4b8000 - 0x157d4b8fff 0x157d4b9000 - 0x157d4bbfff 0x157d4bc000 - 0x157d4cefff 0x157d4cf000 - 0x157d4cffff 0x157d4d0000 - 0x157d4d0fff 0x157d4d1000 - 0x157d5eefff 0x157d5ef000 - 0x157d5f1fff 0x157d5f2000 - 0x157d5f4fff 0x157d5f5000 - 0x157d5f9fff 0x3fffa77000 - 0x3fffa97fff EQL-OK: T (LET ((INTERFACES '(NIL "localhost" "0.0.0.0" "127.0.0.1"))) (MAPCAR (LAMBDA (I) (LET ((S (SOCKET-SERVER 0 :INTERFACE I))) (UNWIND-PROTECT (SOCKET-SERVER-HOST (SHOW S)) (SOCKET-SERVER-CLOSE S)))) INTERFACES)) # # # # EQUAL-OK: ("0.0.0.0" "127.0.0.1" "0.0.0.0" "127.0.0.1") (MULTIPLE-VALUE-BIND (RUN ARGS) (CMD-ARGS) (LET ((SE (SOCKET-SERVER))) (RUN-PROGRAM RUN :ARGUMENTS (APPEND ARGS (LIST "-q" "-q" "-x" (FORMAT NIL "(close (prog1 (socket:socket-connect ~D) (sleep 0.01s0)))" (SOCKET-SERVER-PORT SE)))) :WAIT NIL :INPUT NIL :OUTPUT NIL) (UNWIND-PROTECT (WITH-OPEN-STREAM (SO (SOCKET-ACCEPT SE)) (LIST (SOCKET-STATUS SO) (WRITE-LINE "foo" SO) (SLEEP 0.02s0) (HANDLER-CASE (SOCKET-STATUS SO) (OS-ERROR (C) (PRINC 'SOCKET-STATUS-2) (PRINC-ERROR C) (CASE (OS-ERROR-CODE C) ((:ECONNRESET 104) :APPEND) (T (OS-ERROR-CODE C))))) (CHECK-OS-ERROR (PROGN (WRITE-LINE "bar" SO) T) (:EPIPE 32 :ECONNRESET 104)) (HANDLER-CASE (READ-CHAR SO) (OS-ERROR (C) (PRINC 'READ-CHAR) (PRINC-ERROR C) (CASE (OS-ERROR-CODE C) ((:ECONNRESET 104) T) (T (OS-ERROR-CODE C)))) (END-OF-FILE (C) (PRINC 'READ-CHAR) (PRINC-ERROR C) T)) (HANDLER-CASE (SOCKET-STATUS SO) (OS-ERROR (C) (PRINC 'SOCKET-STATUS-3) (PRINC-ERROR C) (CASE (OS-ERROR-CODE C) ((:ECONNRESET 104) :APPEND) (T (OS-ERROR-CODE C))))))) (SOCKET-SERVER-CLOSE SE)))) Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x38ead000 - 0x38ecdfff 0x80000000 - 0x800bffff 0x155d726000 - 0x155d740fff 0x155d741000 - 0x155d741fff 0x155d742000 - 0x155d742fff 0x155d743000 - 0x155d744fff 0x155d745000 - 0x155d746fff 0x155d747000 - 0x155d74dfff 0x155d751000 - 0x155d752fff 0x155d753000 - 0x155d791fff 0x155d792000 - 0x155d793fff 0x155d794000 - 0x155d79afff 0x155d79b000 - 0x155d79bfff 0x155d79c000 - 0x155d7c1fff 0x155d7c2000 - 0x155d7c5fff 0x155d7c6000 - 0x155d7c6fff 0x155d7c7000 - 0x155d7c8fff 0x155d7c9000 - 0x155d7c9fff 0x155d7ca000 - 0x155d7cafff 0x155d7cb000 - 0x155d7cbfff 0x155d7cc000 - 0x155d7cffff 0x155d7d0000 - 0x155d7d0fff 0x155d7d1000 - 0x155d7d1fff 0x155d7d2000 - 0x155d7d3fff 0x155d7d4000 - 0x155d7d4fff 0x155d7d5000 - 0x155d7d5fff 0x155d7d6000 - 0x155d941fff 0x155d942000 - 0x155d944fff 0x155d945000 - 0x155d945fff 0x155d946000 - 0x155d948fff 0x155d949000 - 0x155d95bfff 0x155d95c000 - 0x155d95cfff 0x155d95d000 - 0x155d95dfff 0x155d95e000 - 0x155da7bfff 0x155da7c000 - 0x155da7efff 0x155da7f000 - 0x155da81fff 0x155da82000 - 0x155da86fff 0x3fffae9000 - 0x3fffb09fff READ-CHAR [OS-STREAM-ERROR]: OS-STREAM-ERROR(104): Connection reset by peer ERROR!! (:OUTPUT "foo" NIL :OUTPUT T T :APPEND) should be (:OUTPUT "foo" NIL :APPEND T T :APPEND) ! (CHECK-OS-ERROR (SOCKET-CONNECT 0) (:ECONNREFUSED 111)) [OS-ERROR]: OS-ERROR(111): Connection refused EQL-OK: T (CHECK-OS-ERROR (SOCKET-SERVER 1240 :INTERFACE "[/]=") (:EINVAL 22)) [OS-ERROR]: OS-ERROR(22): Invalid argument EQL-OK: T (PROGN (MAKUNBOUND '*OS*) (UNINTERN '*OS*) (MAKUNBOUND '*SERVER*) (UNINTERN '*SERVER*) (DELETE-FILE *FILE*) (MAKUNBOUND '*FILE*) (UNINTERN '*FILE*) (MAKUNBOUND '*S*) (UNINTERN '*S*) (MAKUNBOUND '*SOCKET-1*) (UNINTERN '*SOCKET-1*) (MAKUNBOUND '*SOCKET-2*) (UNINTERN '*SOCKET-2*) (MAKUNBOUND '*SOCKET-3*) (UNINTERN '*SOCKET-3*) (MAKUNBOUND '*SOCKET-4*) (UNINTERN '*SOCKET-4*)) EQL-OK: T RUN-TEST: finished "socket" (1 error out of 92 tests) RUN-TEST: see /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/socket.erg RUN-TEST: started # (LET ((F '+)) (APPLY F '(1 2))) EQL-OK: 3 (LET ((F #'-)) (APPLY F '(1 2))) EQL-OK: -1 (APPLY #'MAX 3 5 '(2 7 3)) EQL-OK: 7 (APPLY 'CONS '((+ 2 3) 4)) EQUAL-OK: ((+ 2 3) . 4) (APPLY #'+ 'NIL) EQL-OK: 0 (APPLY #'(LAMBDA (&KEY A B) (LIST A B)) '(:B 3)) EQUAL-OK: (NIL 3) (FUNCALL '+ 2 3) EQL-OK: 5 (LET ((C (SYMBOL-FUNCTION '+))) (FUNCALL C 1 2 3 4)) EQL-OK: 10 (PROGN 1 2 3) EQL-OK: 3 (PROGN (+ 2 1) 2) EQL-OK: 2 (PROGN 1 2 (VALUES 2 3)) EQL-OK: 2 (PROGN) EQL-OK: NIL (PROG1 1 2 3) EQL-OK: 1 (PROG1 3 (+ 1 2) 2) EQL-OK: 3 (PROG1 (VALUES 2 3) 1 2) EQL-OK: 2 (LET ((X '(A B C))) (PROG1 (CAR X) (RPLACA X 'FOO))) EQL-OK: A (PROG2 1 2 3) EQL-OK: 2 (PROG2 (+ 1 2) 2 3) EQL-OK: 2 (PROG2 1 (VALUES 2 3) 4) EQL-OK: 2 (SETF A 0) EQL-OK: 0 (LET ((A 1) (B 2) C) (DECLARE (INTEGER A B)) (LIST A B C)) EQUAL-OK: (1 2 NIL) (LET ((A 1) (B A)) (DECLARE (INTEGER A B)) (LIST A B)) EQUAL-OK: (1 0) (LET (X239) (DECLARE (SPECIAL X239)) (SYMBOL-VALUE 'X239)) EQL-OK: NIL (LET* ((A 1) (B 2) C) (DECLARE (INTEGER A B)) (LIST A B C)) EQUAL-OK: (1 2 NIL) (LET* ((A 1) (B A)) (DECLARE (INTEGER A B)) (LIST A B)) EQUAL-OK: (1 1) (PROGV '(A B C) '(1 2 3) (+ A B C)) EQL-OK: 6 (PROGV '(A B C) '(1 2) (LIST A B C)) [SIMPLE-UNBOUND-VARIABLE]: PROGV: variable C has no value EQL-OK: ERROR (LET ((V '(A B C)) (VAL '(3 2 1))) (PROGV V VAL (MAPCAR #'EVAL V))) EQUAL-OK: (3 2 1) (DEFUN PLUS (&REST ARGS) (APPLY #'+ ARGS)) EQL-OK: PLUS (FLET ((PLUS (A B) (+ A B)) (MINUS (A B) (- A B))) (LIST (PLUS 1 2) (MINUS 1 2))) EQUAL-OK: (3 -1) (LIST (FLET ((PLUS (A B) (- A B))) (PLUS 3 2)) (+ 3 2)) EQUAL-OK: (1 5) (FLET ((PLUS (A B) (PLUS (PLUS A B A) B))) (PLUS 3 2)) EQL-OK: 10 (LABELS ((QUEUE (L) (IF (CAR L) (QUEUE (CDR L)) 'ENDE))) (QUEUE '(1 2 3))) EQL-OK: ENDE (LABELS ((PLUS (A B) (* A (PLUS A A B)))) (PLUS 1 2 3)) [SIMPLE-PROGRAM-ERROR]: EVAL/APPLY: too many arguments given to PLUS EQL-OK: ERROR (LET ((A T) (B NIL)) (LIST (IF A 1 2) (IF B 1 2) (IF A 1) (IF B 1))) EQUAL-OK: (1 2 1 NIL) (LET ((A T) (B NIL)) (LIST (WHEN A 1 2) (WHEN B 1 2) (WHEN A 1))) EQUAL-OK: (2 NIL 1) (LET ((A T) (B NIL)) (LIST (UNLESS A 1 2) (UNLESS B 1 2) (UNLESS A 1))) EQUAL-OK: (NIL 2 NIL) (LET ((A T) (B 10) (C NIL)) (LIST (COND (A 1) (T 'END)) (COND (B) (T 'END)) (COND (C 1) (T 'END)))) EQUAL-OK: (1 10 END) (CASE (+ 1 2) (1 -1) (2 -2) (3 -3)) EQL-OK: -3 (CASE (+ 1 2) (1 -1) (2 -2)) EQL-OK: NIL (CASE (+ 1 2) ((1 3) -1) (2 -2) (OTHERWISE 100)) EQL-OK: -1 (TYPECASE (+ 1 2) (LIST -2) (NULL -3) (INTEGER -1)) EQL-OK: -1 (BLOCK BLOCKTEST (IF T (RETURN 0)) 1) [SIMPLE-SOURCE-PROGRAM-ERROR]: RETURN-FROM: no block named NIL is currently visible EQL-OK: ERROR (BLOCK BLOCKTEST (IF T (RETURN-FROM BLOCKTEST 0)) 1) EQL-OK: 0 (BLOCK BLOCKTEST (IF NIL (RETURN-FROM BLOCKTEST 0)) 1) EQL-OK: 1 (BLOCK BLOCKTEST (CATCH 'CATCHER (IF T (THROW 'CATCHER 0)) 1)) EQL-OK: 0 (LET ((I 10)) (LOOP (IF (< (DECF I) 1) (RETURN I)))) EQL-OK: 0 (LET ((I 10)) (CATCH 'CATCHER (LOOP (IF (< (DECF I) 1) (RETURN I))))) EQL-OK: 0 (SETF A 0) EQL-OK: 0 (DO ((A 1 (+ A 1)) (B A)) ((> A 9) (LIST B C)) (SETF C (+ A B))) EQUAL-OK: (0 9) (DO* ((A 1 (+ A 1)) (B A)) ((> A 9) B)) EQL-OK: 1 (LET ((A 0)) (DO* ((A 1 (+ A 1)) (B A)) ((> A 9) A) (DECLARE (INTEGER A B))) A) EQL-OK: 0 (LET ((L '(1 2 3)) (R 0)) (DOLIST (X L R) (SETF R (+ R X)))) EQL-OK: 6 (LET ((L '(1 2 3))) (DOLIST (X L) (IF (> 0 X) (INCF X) (RETURN 10)))) EQL-OK: 10 (LET ((L '(1 2 3))) (DOLIST (X L) (INCF X))) EQL-OK: NIL (LET ((S 0)) (DOTIMES (I (+ 1 9) S) (SETF S (+ S I)))) EQL-OK: 45 (MAPCAR #'ABS '(3 -4 2 -5 -6)) EQUAL-OK: (3 4 2 5 6) (MAPCAR #'CONS '(A B C) '(1 2 3)) EQUAL-OK: ((A . 1) (B . 2) (C . 3)) (MAPLIST #'(LAMBDA (X) (CONS 'FOO X)) '(A B C D)) EQUAL-OK: ((FOO A B C D) (FOO B C D) (FOO C D) (FOO D)) (MAPLIST #'(LAMBDA (X) (IF (MEMBER (CAR X) (CDR X)) 0 1)) '(A B A C D B C)) EQUAL-OK: (0 0 1 0 1 1 1) (MAPC #'ABS '(3 -4 2 -5 -6)) EQUAL-OK: (3 -4 2 -5 -6) (MAPL #'(LAMBDA (X Y) (CONS X Y)) '(A B C D) '(1 2 3 4)) EQUAL-OK: (A B C D) (MAPCAN #'(LAMBDA (X) (AND (NUMBERP X) (LIST X))) '(A 1 B C 3 4 D 5)) EQUAL-OK: (1 3 4 5) (MAPCON #'(LAMBDA (X) (AND (ODDP (CAR X)) (LIST (CAR X)))) '(5 4 3 2 1)) EQUAL-OK: (5 3 1) (LET ((A 0)) (TAGBODY (IF NIL (GO TAG0) (GO TAG1)) (THIS WILL NEVER BE REACHED) TAG0 (SETF A 1) TAG1 (SETF A 2)) A) EQL-OK: 2 (LET ((A 0)) (TAGBODY (IF T (GO TAG0) (GO TAG1)) (THIS WILL NEVER BE REACHED) TAG0 (SETF A 1)) A) EQL-OK: 1 (LET ((Z '(1 0))) (PROG* ((Y Z) (X (CAR Y))) (RETURN X))) EQL-OK: 1 (PROG (A (B 1)) (IF A (GO TAG0) (GO TAG1)) (THIS WILL NEVER BE REACHED) TAG0 (SETF A 1) (THIS WILL NEVER BE REACHED) TAG1 (SETF A 2)) EQL-OK: NIL (PROG (A (B 1)) (IF A (RETURN NIL) (GO TAG1)) (THIS WILL NEVER BE REACHED) TAG0 (RETURN (LIST A 1)) TAG1 (SETF A 2) (GO TAG0)) EQUAL-OK: (2 1) (DEFUN ADDER (X Y) (VALUES (+ 1 X) (+ 1 Y))) EQL-OK: ADDER (MULTIPLE-VALUE-BIND (A B) (ADDER 1 2) (+ A B)) EQL-OK: 5 (DEFUN ADDER (X Y) (VALUES-LIST (LIST (+ 1 X) (+ 1 Y)))) EQL-OK: ADDER (MULTIPLE-VALUE-BIND (A B) (ADDER 1 2) (+ A B)) EQL-OK: 5 (MULTIPLE-VALUE-LIST (FLOOR -3 4)) EQUAL-OK: (-1 1) (MULTIPLE-VALUE-CALL #'+ (FLOOR 5 3) (FLOOR 19 4)) EQL-OK: 10 (MULTIPLE-VALUE-BIND (C D) (MULTIPLE-VALUE-PROG1 (FLOOR -3 4) (+ 1 2)) (LIST C D)) EQUAL-OK: (-1 1) (MULTIPLE-VALUE-BIND (X) (FLOOR 5 3) (LIST X)) EQUAL-OK: (1) (MULTIPLE-VALUE-BIND (X Y) (FLOOR 5 3) (LIST X Y)) EQUAL-OK: (1 2) (MULTIPLE-VALUE-BIND (X Y Z) (FLOOR 5 3) (LIST X Y Z)) EQUAL-OK: (1 2 NIL) (MULTIPLE-VALUE-SETQ (A B) (VALUES 10 20)) EQL-OK: 10 B EQL-OK: 20 (FUNCALL (COMPILE NIL (LAMBDA (X) (FLET ((Z (X) (RETURN-FROM Z X))) (Z X)))) 7) EQL-OK: 7 (FLET ((Z NIL (RETURN-FROM Z 6))) (Z)) EQL-OK: 6 (FUNCALL (COMPILE NIL (LAMBDA NIL (LABELS ((Z NIL (RETURN-FROM Z 5))) (Z))))) EQL-OK: 5 (LABELS ((Z NIL (RETURN-FROM Z 4))) (Z)) EQL-OK: 4 (SYMBOLS-CLEANUP '(PLUS ADDER A B)) EQL-OK: NIL RUN-TEST: finished "steele7" (0 errors out of 86 tests) RUN-TEST: started # (PRIN1-TO-STRING (MAKE-BROADCAST-STREAM)) EQUAL-OK: "#" (PROGN (DEFPARAMETER SAVED-CLHS-ROOT #'CLHS-ROOT) (DEFUN CLHS-ROOT NIL NIL) (DEFPARAMETER SAVED-IMPNOTES-ROOT #'IMPNOTES-ROOT) (DEFUN IMPNOTES-ROOT NIL NIL) NIL) WARNING: DEFUN/DEFMACRO: redefining function CLHS-ROOT in top-level, was defined in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/config.fas WARNING: DEFUN/DEFMACRO: redefining function IMPNOTES-ROOT in top-level, was defined in /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/config.fas EQL-OK: NIL (DEFUN CLOSE-1 (S) (LET* ((I (INPUT-STREAM-P S)) (O (OUTPUT-STREAM-P S)) (E (STREAM-ELEMENT-TYPE S)) (F (STREAM-EXTERNAL-FORMAT S)) (C (CLOSE S))) (AND (EQ I (INPUT-STREAM-P S)) (EQ O (OUTPUT-STREAM-P S)) (EQUAL E (STREAM-ELEMENT-TYPE S)) (EQUAL F (STREAM-EXTERNAL-FORMAT S)) C))) EQL-OK: CLOSE-1 (PROGN (SETQ S1 (OPEN "d1.plc" :DIRECTION :OUTPUT)) (SETQ S2 (OPEN "d2.plc" :DIRECTION :OUTPUT)) (SETQ S3 (OPEN "d3.plc" :DIRECTION :OUTPUT)) (SETQ B1 (MAKE-BROADCAST-STREAM S1 S2 S3 *STANDARD-OUTPUT*)) T) EQL-OK: T (PRINT "test broadcast satz 1" B1) "test broadcast satz 1" EQUAL-OK: "test broadcast satz 1" (PRINT "test broadcast satz 2" B1) "test broadcast satz 2" EQUAL-OK: "test broadcast satz 2" (PRINT "test broadcast satz 3" B1) "test broadcast satz 3" EQUAL-OK: "test broadcast satz 3" (CLOSE-1 S1) EQL-OK: T (CLOSE-1 S2) EQL-OK: T (CLOSE-1 S3) EQL-OK: T (PROGN (SETQ S (OPEN "d1.plc")) T) EQL-OK: T (READ S) EQUAL-OK: "test broadcast satz 1" (READ S) EQUAL-OK: "test broadcast satz 2" (READ S) EQUAL-OK: "test broadcast satz 3" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S (OPEN "d2.plc")) T) EQL-OK: T (READ S) EQUAL-OK: "test broadcast satz 1" (READ S) EQUAL-OK: "test broadcast satz 2" (READ S) EQUAL-OK: "test broadcast satz 3" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S (OPEN "d3.plc")) T) EQL-OK: T (READ S) EQUAL-OK: "test broadcast satz 1" (READ S) EQUAL-OK: "test broadcast satz 2" (READ S) EQUAL-OK: "test broadcast satz 3" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S (OPEN "t0.plc" :DIRECTION :OUTPUT)) T) EQL-OK: T (PRINT 'READ1 S) EQL-OK: READ1 (PRINT 'READ2 S) EQL-OK: READ2 (CLOSE-1 S) EQL-OK: T (PROGN (SETQ INPTW (OPEN "t0.plc")) (SETQ S1 (OPEN "d1.plc" :DIRECTION :OUTPUT)) (SETQ S2 (OPEN "d2.plc" :DIRECTION :OUTPUT)) (SETQ SY (MAKE-SYNONYM-STREAM 'S2)) (SETQ S3 (OPEN "d3.plc" :DIRECTION :OUTPUT)) (SETQ TW (MAKE-TWO-WAY-STREAM INPTW S3)) (SETQ S4 (OPEN "d4.plc" :DIRECTION :OUTPUT)) (SETQ EC (MAKE-ECHO-STREAM INPTW S4)) (SETQ S5 (OPEN "d5.plc" :DIRECTION :OUTPUT)) (SETQ S6 (OPEN "d6.plc" :DIRECTION :OUTPUT)) (SETQ B1 (MAKE-BROADCAST-STREAM S5 S6)) (SETQ S7 (OPEN "d7.plc" :DIRECTION :OUTPUT)) (SETQ B2 (MAKE-BROADCAST-STREAM S1 SY TW EC B1 S7)) T) EQL-OK: T (PRINT "w to b2 1.satz" B2) EQUAL-OK: "w to b2 1.satz" (PRINT "w to sy" SY) EQUAL-OK: "w to sy" (PRINT "w to b2 2.satz" B2) EQUAL-OK: "w to b2 2.satz" (PRINT "w to tw" TW) EQUAL-OK: "w to tw" (PRINT "w to b2 3.satz" B2) EQUAL-OK: "w to b2 3.satz" (PRINT "w to ec" EC) EQUAL-OK: "w to ec" (PRINT "w to b2 4.satz" B2) EQUAL-OK: "w to b2 4.satz" (PRINT "w to b1" B1) EQUAL-OK: "w to b1" (PRINT "w to b2 5.satz" B2) EQUAL-OK: "w to b2 5.satz" (PRINT "w to s7" S7) EQUAL-OK: "w to s7" (PRINT "w to b2 6.satz" B2) EQUAL-OK: "w to b2 6.satz" (READ TW) EQL-OK: READ1 (READ EC) EQL-OK: READ2 (PRINT "w to b2 7.satz" B2) EQUAL-OK: "w to b2 7.satz" (PRINT "w to b2 8.satz" B2) EQUAL-OK: "w to b2 8.satz" (CLOSE-1 INPTW) EQL-OK: T (CLOSE-1 S1) EQL-OK: T (CLOSE-1 S2) EQL-OK: T (CLOSE-1 S3) EQL-OK: T (CLOSE-1 S4) EQL-OK: T (CLOSE-1 S5) EQL-OK: T (CLOSE-1 S6) EQL-OK: T (CLOSE-1 S7) EQL-OK: T (PROGN (SETQ S (OPEN "d1.plc")) T) EQL-OK: T (READ S) EQUAL-OK: "w to b2 1.satz" (READ S) EQUAL-OK: "w to b2 2.satz" (READ S) EQUAL-OK: "w to b2 3.satz" (READ S) EQUAL-OK: "w to b2 4.satz" (READ S) EQUAL-OK: "w to b2 5.satz" (READ S) EQUAL-OK: "w to b2 6.satz" (READ S) EQUAL-OK: "w to b2 7.satz" (READ S) EQUAL-OK: "w to b2 8.satz" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S (OPEN "d2.plc")) T) EQL-OK: T (READ S) EQUAL-OK: "w to b2 1.satz" (READ S) EQUAL-OK: "w to sy" (READ S) EQUAL-OK: "w to b2 2.satz" (READ S) EQUAL-OK: "w to b2 3.satz" (READ S) EQUAL-OK: "w to b2 4.satz" (READ S) EQUAL-OK: "w to b2 5.satz" (READ S) EQUAL-OK: "w to b2 6.satz" (READ S) EQUAL-OK: "w to b2 7.satz" (READ S) EQUAL-OK: "w to b2 8.satz" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S (OPEN "d3.plc")) T) EQL-OK: T (READ S) EQUAL-OK: "w to b2 1.satz" (READ S) EQUAL-OK: "w to b2 2.satz" (READ S) EQUAL-OK: "w to tw" (READ S) EQUAL-OK: "w to b2 3.satz" (READ S) EQUAL-OK: "w to b2 4.satz" (READ S) EQUAL-OK: "w to b2 5.satz" (READ S) EQUAL-OK: "w to b2 6.satz" (READ S) EQUAL-OK: "w to b2 7.satz" (READ S) EQUAL-OK: "w to b2 8.satz" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S (OPEN "d4.plc")) T) EQL-OK: T (READ S) EQUAL-OK: "w to b2 1.satz" (READ S) EQUAL-OK: "w to b2 2.satz" (READ S) EQUAL-OK: "w to b2 3.satz" (READ S) EQUAL-OK: "w to ec" (READ S) EQUAL-OK: "w to b2 4.satz" (READ S) EQUAL-OK: "w to b2 5.satz" (READ S) EQUAL-OK: "w to b2 6.satz" (READ S) EQL-OK: READ2 (READ S) EQUAL-OK: "w to b2 7.satz" (READ S) EQUAL-OK: "w to b2 8.satz" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S (OPEN "d5.plc")) T) EQL-OK: T (READ S) EQUAL-OK: "w to b2 1.satz" (READ S) EQUAL-OK: "w to b2 2.satz" (READ S) EQUAL-OK: "w to b2 3.satz" (READ S) EQUAL-OK: "w to b2 4.satz" (READ S) EQUAL-OK: "w to b1" (READ S) EQUAL-OK: "w to b2 5.satz" (READ S) EQUAL-OK: "w to b2 6.satz" (READ S) EQUAL-OK: "w to b2 7.satz" (READ S) EQUAL-OK: "w to b2 8.satz" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S (OPEN "d6.plc")) T) EQL-OK: T (READ S) EQUAL-OK: "w to b2 1.satz" (READ S) EQUAL-OK: "w to b2 2.satz" (READ S) EQUAL-OK: "w to b2 3.satz" (READ S) EQUAL-OK: "w to b2 4.satz" (READ S) EQUAL-OK: "w to b1" (READ S) EQUAL-OK: "w to b2 5.satz" (READ S) EQUAL-OK: "w to b2 6.satz" (READ S) EQUAL-OK: "w to b2 7.satz" (READ S) EQUAL-OK: "w to b2 8.satz" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S (OPEN "d7.plc")) T) EQL-OK: T (READ S) EQUAL-OK: "w to b2 1.satz" (READ S) EQUAL-OK: "w to b2 2.satz" (READ S) EQUAL-OK: "w to b2 3.satz" (READ S) EQUAL-OK: "w to b2 4.satz" (READ S) EQUAL-OK: "w to b2 5.satz" (READ S) EQUAL-OK: "w to s7" (READ S) EQUAL-OK: "w to b2 6.satz" (READ S) EQUAL-OK: "w to b2 7.satz" (READ S) EQUAL-OK: "w to b2 8.satz" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S (OPEN "t1.plc" :DIRECTION :OUTPUT)) T) EQL-OK: T (PRINT "1.satz t1" S) EQUAL-OK: "1.satz t1" (PRINT "2.satz t1" S) EQUAL-OK: "2.satz t1" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S (OPEN "t2.plc" :DIRECTION :OUTPUT)) T) EQL-OK: T (PRINT "1.satz t2" S) EQUAL-OK: "1.satz t2" (PRINT "2.satz t2" S) EQUAL-OK: "2.satz t2" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S (OPEN "t3.plc" :DIRECTION :OUTPUT)) T) EQL-OK: T (PRINT "1.satz t3" S) EQUAL-OK: "1.satz t3" (PRINT "2.satz t3" S) EQUAL-OK: "2.satz t3" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S (OPEN "t4.plc" :DIRECTION :OUTPUT)) T) EQL-OK: T (PRINT "1.satz t4" S) EQUAL-OK: "1.satz t4" (PRINT "2.satz t4" S) EQUAL-OK: "2.satz t4" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S (OPEN "t5.plc" :DIRECTION :OUTPUT)) T) EQL-OK: T (PRINT "1.satz t5" S) EQUAL-OK: "1.satz t5" (PRINT "2.satz t5" S) EQUAL-OK: "2.satz t5" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S (OPEN "t6.plc" :DIRECTION :OUTPUT)) T) EQL-OK: T (PRINT "1.satz t6" S) EQUAL-OK: "1.satz t6" (PRINT "2.satz t6" S) EQUAL-OK: "2.satz t6" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S (OPEN "t7.plc" :DIRECTION :OUTPUT)) T) EQL-OK: T (PRINT "1.satz t7" S) EQUAL-OK: "1.satz t7" (PRINT "2.satz t7" S) EQUAL-OK: "2.satz t7" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S (OPEN "t8.plc" :DIRECTION :OUTPUT)) T) EQL-OK: T (PRINT "1.satz t8" S) EQUAL-OK: "1.satz t8" (PRINT "2.satz t8" S) EQUAL-OK: "2.satz t8" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S (OPEN "t9.plc" :DIRECTION :OUTPUT)) T) EQL-OK: T (PRINT "1.satz t9" S) EQUAL-OK: "1.satz t9" (PRINT "2.satz t9" S) EQUAL-OK: "2.satz t9" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S (OPEN "t10.plc" :DIRECTION :OUTPUT)) T) EQL-OK: T (PRINT "1.satz t10" S) EQUAL-OK: "1.satz t10" (PRINT "2.satz t10" S) EQUAL-OK: "2.satz t10" (CLOSE-1 S) EQL-OK: T (PROGN (SETQ S1 (OPEN "t1.plc")) (SETQ S2 (OPEN "t2.plc")) (SETQ S3 (OPEN "t3.plc")) (SETQ S4 (OPEN "t4.plc")) (SETQ S5 (OPEN "t5.plc")) (SETQ C1 (MAKE-CONCATENATED-STREAM S1 S2 S3)) (SETQ C2 (MAKE-CONCATENATED-STREAM S4 S5)) T) EQL-OK: T (READ C1) EQUAL-OK: "1.satz t1" (READ C2) EQUAL-OK: "1.satz t4" (READ C1) EQUAL-OK: "2.satz t1" (READ C1) EQUAL-OK: "1.satz t2" (READ C2) EQUAL-OK: "2.satz t4" (READ C2) EQUAL-OK: "1.satz t5" (READ C1) EQUAL-OK: "2.satz t2" (READ C1) EQUAL-OK: "1.satz t3" (READ C1) EQUAL-OK: "2.satz t3" (READ C2) EQUAL-OK: "2.satz t5" (CLOSE-1 S1) EQL-OK: T (CLOSE-1 S2) EQL-OK: T (CLOSE-1 S3) EQL-OK: T (CLOSE-1 S4) EQL-OK: T (CLOSE-1 S5) EQL-OK: T (PROGN (SETQ S1 (OPEN "t1.plc")) (SETQ S2 (OPEN "t2.plc")) (SETQ S3 (OPEN "t3.plc")) (SETQ S4 (OPEN "t4.plc")) (SETQ S5 (OPEN "t5.plc")) (SETQ S6 (OPEN "t6.plc")) (SETQ S7 (OPEN "t7.plc")) (SETQ S8 (OPEN "t8.plc")) (SETQ S9 (OPEN "t9.plc")) (SETQ S10 (OPEN "t10.plc")) (SETQ C1 (MAKE-CONCATENATED-STREAM S1 S2)) (SETQ C2 (MAKE-CONCATENATED-STREAM S3)) (SETQ C3 (MAKE-CONCATENATED-STREAM C1 C2 S4)) (SETQ C4 (MAKE-CONCATENATED-STREAM S5 S6 S7 S8 S9 S10)) T) EQL-OK: T (READ C4) EQUAL-OK: "1.satz t5" (READ C3) EQUAL-OK: "1.satz t1" (READ C4) EQUAL-OK: "2.satz t5" (READ C4) EQUAL-OK: "1.satz t6" (READ C3) EQUAL-OK: "2.satz t1" (READ C3) EQUAL-OK: "1.satz t2" (READ C4) EQUAL-OK: "2.satz t6" (READ C4) EQUAL-OK: "1.satz t7" (READ C4) EQUAL-OK: "2.satz t7" (READ C3) EQUAL-OK: "2.satz t2" (READ C3) EQUAL-OK: "1.satz t3" (READ C3) EQUAL-OK: "2.satz t3" (READ C4) EQUAL-OK: "1.satz t8" (READ C4) EQUAL-OK: "2.satz t8" (READ C4) EQUAL-OK: "1.satz t9" (READ C4) EQUAL-OK: "2.satz t9" (READ C3) EQUAL-OK: "1.satz t4" (READ C3) EQUAL-OK: "2.satz t4" (READ C4) EQUAL-OK: "1.satz t10" (READ C4) EQUAL-OK: "2.satz t10" (CLOSE-1 S1) EQL-OK: T (CLOSE-1 S2) EQL-OK: T (CLOSE-1 S3) EQL-OK: T (CLOSE-1 S4) EQL-OK: T (CLOSE-1 S5) EQL-OK: T (CLOSE-1 S6) EQL-OK: T (CLOSE-1 S7) EQL-OK: T (CLOSE-1 S8) EQL-OK: T (CLOSE-1 S9) EQL-OK: T (CLOSE-1 S10) EQL-OK: T (SETQ STR1 "test 123456") EQUAL-OK: "test 123456" (PROGN (SETQ S1 (MAKE-STRING-INPUT-STREAM STR1)) T) EQL-OK: T (READ S1) EQL-OK: TEST (READ-CHAR S1) EQL-OK: #\1 (READ-CHAR S1) EQL-OK: #\2 (UNREAD-CHAR #\2 S1) EQL-OK: NIL (READ-CHAR S1) EQL-OK: #\2 (READ-CHAR S1) EQL-OK: #\3 (READ-CHAR S1) EQL-OK: #\4 (UNREAD-CHAR #\A S1) [SIMPLE-STREAM-ERROR]: UNREAD-CHAR: the last character read from #1=# was not #\A EQL-OK: ERROR (READ-CHAR S1) EQL-OK: #\5 (READ-CHAR S1) EQL-OK: #\6 (CLOSE-1 S1) EQL-OK: T STR1 EQUAL-OK: "test 123456" (MULTIPLE-VALUE-LIST (READ-FROM-STRING "012345 789")) EQUAL-OK: (12345 7) (MULTIPLE-VALUE-LIST (READ-FROM-STRING "012345 789" T NIL :PRESERVE-WHITESPACE T)) EQUAL-OK: (12345 6) (MULTIPLE-VALUE-LIST (READ-FROM-STRING "012345 789" T NIL :END 4)) EQUAL-OK: (123 4) (MULTIPLE-VALUE-LIST (READ-FROM-STRING "012345 789" T NIL :START 2)) EQUAL-OK: (2345 7) (PROGN (SETQ STRGSTREAM (MAKE-STRING-INPUT-STREAM "0123456789" 5 8)) T) EQL-OK: T (READ STRGSTREAM) EQL-OK: 567 (LET* ((S "0123456789") (D (MAKE-ARRAY 5 :DISPLACED-TO S :DISPLACED-INDEX-OFFSET 3 :ELEMENT-TYPE (ARRAY-ELEMENT-TYPE S))) (I (MAKE-STRING-INPUT-STREAM D 2 5))) (READ I)) EQL-OK: 567 (PROGN (SETQ STRGSTREAM (MAKE-STRING-INPUT-STREAM "wenn alles gut geht ist das ein stream 012")) T) EQL-OK: T (READ STRGSTREAM) EQL-OK: WENN (READ STRGSTREAM) EQL-OK: ALLES (READ STRGSTREAM) EQL-OK: GUT (READ STRGSTREAM) EQL-OK: GEHT (READ STRGSTREAM) EQL-OK: IST (READ STRGSTREAM) EQL-OK: DAS (READ STRGSTREAM) EQL-OK: EIN (READ STRGSTREAM) EQL-OK: STREAM (READ STRGSTREAM) EQL-OK: 12 (PROGN (SETQ STRGSTREAM (MAKE-STRING-OUTPUT-STREAM)) T) EQL-OK: T (PRINC "das " STRGSTREAM) EQUAL-OK: "das " (PRINC "ist " STRGSTREAM) EQUAL-OK: "ist " (PRINC "ein " STRGSTREAM) EQUAL-OK: "ein " (PRINC "string " STRGSTREAM) EQUAL-OK: "string " (PRINC "output " STRGSTREAM) EQUAL-OK: "output " (PRINC "stream " STRGSTREAM) EQUAL-OK: "stream " (GET-OUTPUT-STREAM-STRING STRGSTREAM) EQUAL-OK: "das ist ein string output stream " (GET-OUTPUT-STREAM-STRING STRGSTREAM) EQUAL-OK: "" (PRINC "das ist ein neuer string output stream" STRGSTREAM) EQUAL-OK: "das ist ein neuer string output stream" (GET-OUTPUT-STREAM-STRING STRGSTREAM) EQUAL-OK: "das ist ein neuer string output stream" (SETQ *PRINT-LENGTH* 50) EQL-OK: 50 (WRITE-TO-STRING 123456789) EQUAL-OK: "123456789" "(write-to-string '#1=(123456789 . #1#))" EQUAL-OK: "(write-to-string '#1=(123456789 . #1#))" (PRIN1-TO-STRING "abc") EQUAL-OK: "\"abc\"" (PRINC-TO-STRING "abc") EQUAL-OK: "abc" (PROGN (SETQ OS (MAKE-STRING-OUTPUT-STREAM)) T) EQL-OK: T (SETQ S50 "123456789A123456789B123456789C123456789D12345678 E") EQUAL-OK: "123456789A123456789B123456789C123456789D12345678 E" (SETQ S49 "123456789A123456789B123456789C123456789D1234567 *") EQUAL-OK: "123456789A123456789B123456789C123456789D1234567 *" (PRINC S50 OS) EQUAL-OK: "123456789A123456789B123456789C123456789D12345678 E" (PRINC S50 OS) EQUAL-OK: "123456789A123456789B123456789C123456789D12345678 E" (PRINC S50 OS) EQUAL-OK: "123456789A123456789B123456789C123456789D12345678 E" (PRINC S50 OS) EQUAL-OK: "123456789A123456789B123456789C123456789D12345678 E" (PRINC S50 OS) EQUAL-OK: "123456789A123456789B123456789C123456789D12345678 E" (PRINC S50 OS) EQUAL-OK: "123456789A123456789B123456789C123456789D12345678 E" (PRINC S50 OS) EQUAL-OK: "123456789A123456789B123456789C123456789D12345678 E" (PRINC S49 OS) EQUAL-OK: "123456789A123456789B123456789C123456789D1234567 *" (PRINC "A" OS) EQUAL-OK: "A" (PRINC "B" OS) EQUAL-OK: "B" (PRINC "C" OS) EQUAL-OK: "C" (LENGTH (PRINC (GET-OUTPUT-STREAM-STRING OS))) 123456789A123456789B123456789C123456789D12345678 E123456789A123456789B123456789C123456789D12345678 E123456789A123456789B123456789C123456789D12345678 E123456789A123456789B123456789C123456789D12345678 E123456789A123456789B123456789C123456789D12345678 E123456789A123456789B123456789C123456789D12345678 E123456789A123456789B123456789C123456789D12345678 E123456789A123456789B123456789C123456789D1234567 *ABC EQL-OK: 402 (PRINC S50 OS) EQUAL-OK: "123456789A123456789B123456789C123456789D12345678 E" (PRINC S50 OS) EQUAL-OK: "123456789A123456789B123456789C123456789D12345678 E" (PRINC S50 OS) EQUAL-OK: "123456789A123456789B123456789C123456789D12345678 E" (PRINC S50 OS) EQUAL-OK: "123456789A123456789B123456789C123456789D12345678 E" (PRINC S50 OS) EQUAL-OK: "123456789A123456789B123456789C123456789D12345678 E" (PRINC S50 OS) EQUAL-OK: "123456789A123456789B123456789C123456789D12345678 E" (PRINC S49 OS) EQUAL-OK: "123456789A123456789B123456789C123456789D1234567 *" (PRINC S49 OS) EQUAL-OK: "123456789A123456789B123456789C123456789D1234567 *" (PRINC S49 OS) EQUAL-OK: "123456789A123456789B123456789C123456789D1234567 *" (PRINC S49 OS) EQUAL-OK: "123456789A123456789B123456789C123456789D1234567 *" (LENGTH (PRINC (GET-OUTPUT-STREAM-STRING OS))) 123456789A123456789B123456789C123456789D12345678 E123456789A123456789B123456789C123456789D12345678 E123456789A123456789B123456789C123456789D12345678 E123456789A123456789B123456789C123456789D12345678 E123456789A123456789B123456789C123456789D12345678 E123456789A123456789B123456789C123456789D12345678 E123456789A123456789B123456789C123456789D1234567 *123456789A123456789B123456789C123456789D1234567 *123456789A123456789B123456789C123456789D1234567 *123456789A123456789B123456789C123456789D1234567 * EQL-OK: 496 (PROGN (SETQ OS (OPEN "d0.plc" :DIRECTION :OUTPUT)) (SETQ OS1 (OPEN "d1.plc" :DIRECTION :OUTPUT)) (SETQ IS (OPEN "t0.plc" :DIRECTION :OUTPUT)) T) EQL-OK: T (PRINC "'(a b #.(print \"1.zwischenwert\" os1) c d)" IS) EQUAL-OK: "'(a b #.(print \"1.zwischenwert\" os1) c d)" (PRINC "'(a b #.(prin1-to-string \"2.zwischenwert\") c d)" IS) EQUAL-OK: "'(a b #.(prin1-to-string \"2.zwischenwert\") c d)" (PRINC "'(a b #.(format nil \"3.zwischenwert\") c d)" IS) EQUAL-OK: "'(a b #.(format nil \"3.zwischenwert\") c d)" (CLOSE-1 IS) EQL-OK: T (PROGN (SETQ IS (OPEN "t0.plc")) (SETQ ES (MAKE-ECHO-STREAM IS OS)) T) EQL-OK: T (PRINT "ausgabe os1" OS1) EQUAL-OK: "ausgabe os1" (READ ES) EQUAL-OK: '(A B "1.zwischenwert" C D) (PRINT "ausgabe os1" OS1) EQUAL-OK: "ausgabe os1" (READ ES) EQUAL-OK: '(A B "\"2.zwischenwert\"" C D) (PRINT "ausgabe os1" OS1) EQUAL-OK: "ausgabe os1" (READ ES) EQUAL-OK: '(A B "3.zwischenwert" C D) (PRINT "ausgabe os1" OS1) EQUAL-OK: "ausgabe os1" (CLOSE-1 IS) EQL-OK: T (CLOSE-1 OS) EQL-OK: T (PROGN (SETQ IS (OPEN "d0.plc")) T) EQL-OK: T (READ IS) EQUAL-OK: '(A B "1.zwischenwert" C D) (READ IS) EQUAL-OK: '(A B "\"2.zwischenwert\"" C D) (READ IS) EQUAL-OK: '(A B "3.zwischenwert" C D) (CLOSE-1 IS) EQL-OK: T (CLOSE-1 OS1) EQL-OK: T (PROGN (SETQ IS (OPEN "d1.plc")) T) EQL-OK: T (READ IS) EQUAL-OK: "ausgabe os1" (READ IS) EQUAL-OK: "1.zwischenwert" (READ IS) EQUAL-OK: "ausgabe os1" (READ IS) EQUAL-OK: "ausgabe os1" (READ IS) EQUAL-OK: "ausgabe os1" (READ IS) EQUAL-OK: "1.zwischenwert" (CLOSE-1 IS) EQL-OK: T (PROGN (MAPC #'DELETE-FILE (DIRECTORY "*.plc")) T) EQL-OK: T (PROGN (SETQ S1 (MAKE-INSTANCE 'FILL-STREAM :STREAM *STANDARD-OUTPUT*) S2 (MAKE-SYNONYM-STREAM 'S1) S3 (MAKE-BROADCAST-STREAM S1 S2)) (LIST (STREAM-ELEMENT-TYPE S1) (STREAM-ELEMENT-TYPE S2) (STREAM-ELEMENT-TYPE S3))) EQUAL-OK: (CHARACTER CHARACTER CHARACTER) (LET ((*PRINT-RIGHT-MARGIN* 15) (*PRINT-PRETTY* T)) (WITH-OUTPUT-TO-STRING (OUT) (WITH-FILL-STREAM (FILL OUT :TEXT-INDENT 3) (FORMAT FILL "~%~S, ~S, ~S, ~S, ~S, ~S, ~S, ~S, ~S, ~S,~%" 'A 'BB 'CCC 'DDDD 'EEEEE 'FFFFFF 'GGGG 'HHH 'II 'J)))) EQUAL-OK: " A, BB, CCC, DDDD, EEEEE , FFFFFF, GGGG, HHH, II, J, " (PROGN (DEFVAR *MY-INDENT-LEVEL*) (WITH-OUTPUT-TO-STRING (OUT) (LET ((*PRINT-RIGHT-MARGIN* 20) (*PRINT-PRETTY* T) (*MY-INDENT-LEVEL* 2)) (WITH-FILL-STREAM (FILL OUT :TEXT-INDENT '*MY-INDENT-LEVEL*) (FORMAT FILL "~%this is some long sentence which will be broken at spaces") (FORCE-OUTPUT FILL) (LET ((*MY-INDENT-LEVEL* 5)) (FORMAT FILL "~%and properly indented to the level specified by the ~S argument which can be a ~S or an ~S - cool!" :TEXT-INDENT 'SYMBOL 'INTEGER)) (FORMAT FILL "~%Don't forget to call ~S on it, and/or use ~S Pretty formatting of the S-expressions printed with ~~S is preserved: ~S" 'FORCE-OUTPUT 'WITH-FILL-STREAM '(DEFUN QU (X Y Z) (IF X (+ Y Z) (* Y Z)))))))) EQUAL-OK: " this is some long sentence which will be broken at spaces and properly indented to the level specified by the :TEXT-INDENT argument which can be a SYMBOL or an INTEGER - cool! Don't forget to call FORCE-OUTPUT on it, and/or use WITH-FILL-STREAM Pretty formatting of the S-expressions printed with ~S is preserved: (DEFUN QU (X Y Z) (IF X (+ Y Z) (* Y Z))) " (WITH-OUTPUT-TO-STRING (*ERROR-OUTPUT*) (LETF ((*CURRENT-LANGUAGE* 'ENGLISH)) (LOOP :WITH *PRINT-PRETTY* = T :WITH *PRINT-RIGHT-MARGIN* = 60 :FOR *FILL-INDENT-SEXP* :IN (LIST 3 20 NIL T #'1+ #'1- (LAMBDA (X) (* X 2))) :DO (FORMAT *ERROR-OUTPUT* "~3%~S~2%" *FILL-INDENT-SEXP*) (LOOP :FOR I :FROM 1 :TO 12 :BY 5 :DO (WARN "This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: ~S and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year" (MAKE-LIST I)))))) EQUAL-OK: " 3 WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL NIL NIL NIL NIL NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year 20 WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL NIL NIL NIL NIL NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year NIL WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL NIL NIL NIL NIL NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year T WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL NIL NIL NIL NIL NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year # WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL NIL NIL NIL NIL NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year # WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL NIL NIL NIL NIL NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year # WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL NIL NIL NIL NIL NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year WARNING: This form contains an error, a mistake, a bug, a blunder, a bungle, a blooper: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) and can therefore not be correctly interpreted, neither today nor tomorrow nor next week nor next month nor next year " (LET ((C (NTH-VALUE 1 (IGNORE-ERRORS (FORMAT T " ~a ~a,~a~ ~a~%" 1 2 3 4))))) (STRING= (PRINC-TO-STRING C) (WITH-OUTPUT-TO-STRING (S) (WITH-FILL-STREAM (F S) (PRINC C F))))) EQL-OK: T (WITH-OUTPUT-TO-STRING (S) (WITH-FILL-STREAM (F S) (FORMAT F "~5T"))) EQUAL-OK: " " (LET ((F "streams-tst-foo.bar") FWD1 FWD2) (UNWIND-PROTECT (PROGN (WITH-OPEN-FILE (S F :DIRECTION :OUTPUT) (WRITE F :STREAM S)) (WITH-OPEN-FILE (S F) (SETQ FWD1 (FILE-WRITE-DATE S))) (WITH-OPEN-FILE (S F :DIRECTION :PROBE) (LIST (OR (= FWD1 (SETQ FWD2 (FILE-WRITE-DATE S))) (LIST FWD1 FWD2)) (OPEN-STREAM-P S)))) (DELETE-FILE F))) EQUAL-OK: (T NIL) (LET ((F "streams-tst-foo.bar") FWD SIZE DIR DECODED) (UNWIND-PROTECT (PROGN (WITH-OPEN-FILE (S F :DIRECTION :OUTPUT) (WRITE S :STREAM S) (SETQ SIZE (FILE-LENGTH S))) (WITH-OPEN-FILE (S F :DIRECTION :PROBE) (SETQ FWD (FILE-WRITE-DATE S))) (SETQ DIR (FIRST (DIRECTORY F :FULL T)) DECODED (SUBSEQ (MULTIPLE-VALUE-LIST (DECODE-UNIVERSAL-TIME FWD)) 0 6)) (LIST (OR (EQUAL (THIRD DIR) DECODED) (LIST DIR FWD DECODED)) (OR (= (FOURTH DIR) SIZE) (LIST DIR SIZE)))) (DELETE-FILE F))) EQUAL-OK: (T T) (LET ((F "streams-tst-foo.bar") POS) (UNWIND-PROTECT (PROGN (WITH-OPEN-FILE (S F :DIRECTION :OUTPUT :IF-EXISTS :SUPERSEDE :EXTERNAL-FORMAT :UNIX) (WRITE-LINE "foo" S) (PUSH (FILE-POSITION S) POS)) (WITH-OPEN-FILE (S F :DIRECTION :OUTPUT :IF-EXISTS :APPEND :EXTERNAL-FORMAT :UNIX) (PUSH (FILE-POSITION S) POS) (WRITE-LINE "bar" S) (PUSH (FILE-POSITION S) POS)) (LIST (NREVERSE POS) (WITH-OPEN-FILE (S F :DIRECTION :INPUT) (LIST (READ-LINE S) (READ-LINE S))))) (DELETE-FILE F))) EQUAL-OK: ((4 4 8) ("foo" "bar")) (STRINGP (WITH-OUTPUT-TO-STRING (S) (DESCRIBE (MAKE-ARRAY NIL) S))) EQL-OK: T (STRINGP (WITH-OUTPUT-TO-STRING (S) (DESCRIBE (MAKE-ARRAY 1 :ELEMENT-TYPE NIL) S))) EQL-OK: T (STRINGP (WITH-OUTPUT-TO-STRING (S) (DESCRIBE (MAKE-ARRAY NIL :ELEMENT-TYPE NIL) S))) EQL-OK: T (STRINGP (WITH-OUTPUT-TO-STRING (S) (DESCRIBE NIL S))) EQL-OK: T (LET ((S "a b")) (SEARCH S (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (DESCRIBE S)))) EQL-OK: 2 (WITH-INPUT-FROM-STRING (*S* "abcde") (DECLARE (SPECIAL *S*)) (LET ((SS (MAKE-SYNONYM-STREAM '*S*))) (ASSERT (TYPEP SS 'STREAM)) (ASSERT (TYPEP SS 'SYNONYM-STREAM)) (ASSERT (INPUT-STREAM-P SS)) (ASSERT (NOT (OUTPUT-STREAM-P SS))) (ASSERT (OPEN-STREAM-P SS)) (ASSERT (STREAMP SS)) (ASSERT (STREAM-ELEMENT-TYPE SS)) (LIST (READ-CHAR *S*) (READ-CHAR SS) (READ-CHAR *S*) (READ-CHAR SS) (READ-CHAR SS)))) EQUAL-OK: (#\a #\b #\c #\d #\e) (WITH-OUTPUT-TO-STRING (*S*) (DECLARE (SPECIAL *S*)) (LET ((SS (MAKE-SYNONYM-STREAM '*S*))) (ASSERT (TYPEP SS 'STREAM)) (ASSERT (TYPEP SS 'SYNONYM-STREAM)) (ASSERT (OUTPUT-STREAM-P SS)) (ASSERT (NOT (INPUT-STREAM-P SS))) (ASSERT (OPEN-STREAM-P SS)) (ASSERT (STREAMP SS)) (ASSERT (STREAM-ELEMENT-TYPE SS)) (WRITE-CHAR #\a *S*) (WRITE-CHAR #\b SS) (WRITE-CHAR #\x *S*) (WRITE-CHAR #\y SS))) EQUAL-OK: "abxy" (STREAM-EXTERNAL-FORMAT (MAKE-BROADCAST-STREAM)) EQL-OK: :DEFAULT (FILE-LENGTH (MAKE-BROADCAST-STREAM)) EQL-OK: 0 (FILE-POSITION (MAKE-BROADCAST-STREAM)) EQL-OK: 0 (FILE-STRING-LENGTH (MAKE-BROADCAST-STREAM) "foo") EQL-OK: 1 (STREAM-ELEMENT-TYPE (MAKE-BROADCAST-STREAM)) EQL-OK: T (LET ((O (OPEN "streams-tst-foo.bin" :DIRECTION :OUTPUT :ELEMENT-TYPE '(UNSIGNED-BYTE 8))) (I (MAKE-STRING-INPUT-STREAM "foo"))) (UNWIND-PROTECT (STREAM-ELEMENT-TYPE (MAKE-TWO-WAY-STREAM I O)) (CLOSE O) (DELETE-FILE O) (CLOSE I))) EQUAL-OK: (OR CHARACTER (UNSIGNED-BYTE 8)) (STREAM-ELEMENT-TYPE (MAKE-CONCATENATED-STREAM (MAKE-STRING-INPUT-STREAM "foo") (MAKE-STRING-INPUT-STREAM "bar") (MAKE-STRING-INPUT-STREAM "baz") (MAKE-STRING-INPUT-STREAM "zot"))) EQL-OK: CHARACTER (LET ((S (MAKE-STRING-OUTPUT-STREAM :ELEMENT-TYPE NIL))) (LIST (TYPEP #\z (STREAM-ELEMENT-TYPE S)) (TYPEP #\a (ARRAY-ELEMENT-TYPE (GET-OUTPUT-STREAM-STRING S))))) EQUAL-OK: (NIL NIL) (STREAM-ELEMENT-TYPE (MAKE-CONCATENATED-STREAM)) EQL-OK: NIL (STREAM-ELEMENT-TYPE (MAKE-BROADCAST-STREAM)) EQL-OK: T (OPEN (MAKE-STRING 5000 :INITIAL-ELEMENT #\x)) [OS-FILE-ERROR]: OS-FILE-ERROR(36): File name too long EQL-OK: ERROR (LET ((CS (MAKE-CONCATENATED-STREAM (MAKE-STRING-INPUT-STREAM "a")))) (UNREAD-CHAR (READ-CHAR CS) CS) (EQL (PEEK-CHAR NIL CS) (PEEK-CHAR NIL (FIRST (CONCATENATED-STREAM-STREAMS CS)) NIL NIL))) EQL-OK: T (LET ((|2W| (MAKE-TWO-WAY-STREAM (MAKE-STRING-INPUT-STREAM "a") *STANDARD-OUTPUT*))) (UNREAD-CHAR (READ-CHAR |2W|) |2W|) (EQL (PEEK-CHAR NIL |2W|) (PEEK-CHAR NIL (TWO-WAY-STREAM-INPUT-STREAM |2W|) NIL NIL))) EQL-OK: T (LET* ((SO (MAKE-STRING-OUTPUT-STREAM)) (VE (MAKE-ARRAY 1)) (EC (MAKE-ECHO-STREAM (MAKE-STRING-INPUT-STREAM "a") SO))) (UNREAD-CHAR (READ-CHAR EC) EC) (UNREAD-CHAR (READ-CHAR EC) EC) (UNREAD-CHAR (READ-CHAR EC) EC) (READ-SEQUENCE VE EC) (UNREAD-CHAR (AREF VE 0) EC) (LIST (EQL (PEEK-CHAR NIL EC) (PEEK-CHAR NIL (ECHO-STREAM-INPUT-STREAM EC) NIL NIL)) (GET-OUTPUT-STREAM-STRING SO))) EQUAL-OK: (T "a") (LET* ((SO1 (MAKE-STRING-OUTPUT-STREAM)) (SO2 (MAKE-STRING-OUTPUT-STREAM)) (EC1 (MAKE-ECHO-STREAM (MAKE-STRING-INPUT-STREAM "a") SO1)) (EC2 (MAKE-ECHO-STREAM EC1 SO2))) (UNREAD-CHAR (READ-CHAR EC2) EC2) (UNREAD-CHAR (READ-CHAR EC2) EC2) (UNREAD-CHAR (READ-CHAR EC2) EC2) (LIST (EQL (PEEK-CHAR NIL EC2) (PEEK-CHAR NIL EC1 NIL NIL)) (GET-OUTPUT-STREAM-STRING SO1) (GET-OUTPUT-STREAM-STRING SO2))) EQUAL-OK: (T "a" "a") (CLEAR-INPUT *DEBUG-IO*) EQL-OK: NIL (CLEAR-INPUT *QUERY-IO*) EQL-OK: NIL (CLEAR-INPUT *STANDARD-INPUT*) EQL-OK: NIL (CLEAR-INPUT *TERMINAL-IO*) EQL-OK: NIL (FINISH-OUTPUT *DEBUG-IO*) EQL-OK: NIL (FINISH-OUTPUT *QUERY-IO*) EQL-OK: NIL (FINISH-OUTPUT *STANDARD-OUTPUT*) EQL-OK: NIL (FINISH-OUTPUT *TERMINAL-IO*) EQL-OK: NIL (FORCE-OUTPUT *DEBUG-IO*) EQL-OK: NIL (FORCE-OUTPUT *QUERY-IO*) EQL-OK: NIL (FORCE-OUTPUT *STANDARD-OUTPUT*) EQL-OK: NIL (FORCE-OUTPUT *TERMINAL-IO*) EQL-OK: NIL (CLEAR-OUTPUT *DEBUG-IO*) EQL-OK: NIL (CLEAR-OUTPUT *QUERY-IO*) EQL-OK: NIL (CLEAR-OUTPUT *STANDARD-OUTPUT*) EQL-OK: NIL (CLEAR-OUTPUT *TERMINAL-IO*) EQL-OK: NIL (LET ((IF "streams-tst-tmp-input-file") (OF "streams-tst-tmp-output-file")) (OPEN IF :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (UNWIND-PROTECT (WITH-OPEN-FILE (O OF :DIRECTION :OUTPUT) (WITH-OPEN-FILE (I IF :DIRECTION :INPUT) (WITH-OPEN-STREAM (2WAY (MAKE-TWO-WAY-STREAM I O)) (LIST (EQ (STREAM-EXTERNAL-FORMAT I) (STREAM-EXTERNAL-FORMAT O)) (EQ (STREAM-EXTERNAL-FORMAT I) (STREAM-EXTERNAL-FORMAT 2WAY)) (PROGN (SETF (STREAM-EXTERNAL-FORMAT I) :DOS (STREAM-EXTERNAL-FORMAT I) :MAC) (CONS (EQUALP (STREAM-EXTERNAL-FORMAT I) (STREAM-EXTERNAL-FORMAT O)) (STREAM-EXTERNAL-FORMAT 2WAY))) (PROGN (SETF (STREAM-EXTERNAL-FORMAT 2WAY :INPUT) :UNIX (STREAM-EXTERNAL-FORMAT 2WAY :OUTPUT) :UNIX) (ENCODING-LINE-TERMINATOR (STREAM-EXTERNAL-FORMAT 2WAY))) (TYPE-OF (STREAM-EXTERNAL-FORMAT 2WAY)) (EQUALP (STREAM-EXTERNAL-FORMAT I) (STREAM-EXTERNAL-FORMAT O)))))) (DELETE-FILE IF) (DELETE-FILE OF))) EQUAL-OK: (T T (NIL . :DEFAULT) :UNIX ENCODING T) (MAPCAR (LAMBDA (BUF) (LET ((F "streams-tst-tmp-file")) (UNWIND-PROTECT (LET ((LEN (WITH-OPEN-FILE (S F :DIRECTION :OUTPUT) (WRITE-LINE F S) (FILE-LENGTH S)))) (= LEN (WITH-OPEN-FILE (S F :DIRECTION :INPUT :BUFFERED BUF) (FILE-LENGTH S)))) (DELETE-FILE F)))) '(NIL T)) EQUAL-OK: (T T) (MAPCAR (LAMBDA (BUF) (LET ((F "streams-tst-tmp-file")) (UNWIND-PROTECT (PROGN (WITH-OPEN-FILE (S F :DIRECTION :OUTPUT :BUFFERED BUF) (WRITE-LINE "12345" S) (FILE-POSITION S 2) (WRITE-LINE "12345" S)) (WITH-OPEN-FILE (S F :DIRECTION :INPUT) (READ-LINE S))) (DELETE-FILE F)))) '(T NIL)) EQUAL-OK: ("1212345" "1212345") (LET* ((S1 (MAKE-STRING-OUTPUT-STREAM)) (S2 (MAKE-STRING-OUTPUT-STREAM)) (B (MAKE-BROADCAST-STREAM S1 S2))) (WRITE-CHAR #\a S1) (LIST (FRESH-LINE B) (GET-OUTPUT-STREAM-STRING S1) (GET-OUTPUT-STREAM-STRING S2))) EQUAL-OK: (NIL "a " "") (LET* ((S1 (MAKE-STRING-OUTPUT-STREAM)) (S2 (MAKE-STRING-OUTPUT-STREAM)) (B (MAKE-BROADCAST-STREAM S2 S1))) (WRITE-CHAR #\a S1) (LIST (FRESH-LINE B) (GET-OUTPUT-STREAM-STRING S1) (GET-OUTPUT-STREAM-STRING S2))) EQUAL-OK: (T "a " "") (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (WITH-INPUT-FROM-STRING (S "(prin1 1234)") (ASSERT (LOAD S :VERBOSE NIL)))) EQUAL-OK: "1234" (LET* ((LISP "tmp.lisp") (FAS (COMPILE-FILE-PATHNAME LISP))) (UNWIND-PROTECT (PROGN (WITH-OPEN-FILE (S LISP :DIRECTION :OUTPUT) (WRITE-LINE "1" S)) (WITH-OPEN-FILE (S FAS :DIRECTION :OUTPUT) (WRITE-CHAR #\Null S)) (HANDLER-CASE (LOAD FAS) (ERROR (C) (PRINC-ERROR C))) (HANDLER-CASE (EQUALP (COMPILE-FILE LISP) (TRUENAME FAS)) (ERROR (C) (PRINC-ERROR C)))) (POST-COMPILE-FILE-CLEANUP LISP))) [SIMPLE-FILE-ERROR]: LOAD: compiled file #1=tmp.fas lacks a version marker ;; Compiling file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/tmp.lisp ... ;; Wrote file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/tmp.fas 0 errors, 0 warnings EQL-OK: T (IF (OR (AND (TYPEP *STANDARD-INPUT* 'CONCATENATED-STREAM) (NULL (CONCATENATED-STREAM-STREAMS *STANDARD-INPUT*))) (AND (TYPEP *TERMINAL-IO* 'TWO-WAY-STREAM) (TYPEP (TWO-WAY-STREAM-INPUT-STREAM *TERMINAL-IO*) 'CONCATENATED-STREAM) (NULL (CONCATENATED-STREAM-STREAMS (TWO-WAY-STREAM-INPUT-STREAM *TERMINAL-IO*))))) (PROGN (SETQ S NIL) T) (STREAMP (SETQ S (MAKE-STREAM :INPUT)))) EQL-OK: T (OR (NULL S) (NOT (SEARCH "#P" (PRIN1-TO-STRING S))) (PATHNAMEP (TRUENAME S))) EQL-OK: T (OR (NULL S) (HANDLER-CASE (WRITE-LINE "foo" S) (STREAM-ERROR (C) (PRINC-ERROR C) T))) [SIMPLE-STREAM-ERROR]: WRITE-CHAR on #1=# is illegal EQL-OK: T (OR (NULL S) (WITH-OPEN-FILE (COPY S) (STREAMP COPY))) EQL-OK: T (STREAMP (SETQ S (MAKE-STREAM :OUTPUT))) EQL-OK: T (OR (NOT (SEARCH "#P" (PRIN1-TO-STRING S))) (PATHNAMEP (TRUENAME S))) EQL-OK: T (WRITE-LINE "foo" S) foo EQUAL-OK: "foo" (STREAMP (SETQ S (MAKE-STREAM :ERROR))) EQL-OK: T (OR (NOT (SEARCH "#P" (PRIN1-TO-STRING S))) (PATHNAMEP (TRUENAME S))) EQL-OK: T (WRITE-LINE "foo" S) foo EQUAL-OK: "foo" (LET ((*REOPEN-OPEN-FILE* NIL)) (WITH-OPEN-FILE (COPY S :DIRECTION :OUTPUT) (STREAMP COPY))) EQL-OK: T (PROGN (SETF (FDEFINITION 'CLHS-ROOT) SAVED-CLHS-ROOT (FDEFINITION 'IMPNOTES-ROOT) SAVED-IMPNOTES-ROOT) (LIST (STRINGP (CLHS-ROOT)) (STRINGP (IMPNOTES-ROOT)))) EQUAL-OK: (T T) (SYMBOLS-CLEANUP '(S S1 S2 S3 S4 S5 S6 S7 S8 S9 S10 B1 B2 C1 C2 C3 C4 INPTW SY SAVED-CLHS-ROOT SAVED-IMPNOTES-ROOT TW EC STR1 STRGSTREAM OS OS1 IS ES S50 S49 *MY-INDENT-LEVEL*)) EQL-OK: NIL (SETQ *PRINT-LENGTH* NIL) EQL-OK: NIL RUN-TEST: finished "streams" (0 errors out of 388 tests) RUN-TEST: started # (READ-FROM-STRING "123") EQL-OK: 123 (PRIN1-TO-STRING 123) EQUAL-OK: "123" (SETQ *A* (MAKE-ARRAY 10 :ELEMENT-TYPE 'STRING-CHAR :FILL-POINTER 0)) EQUAL-OK: "" (FORMAT *A* "XXX") EQL-OK: NIL *A* EQUAL-OK: "XXX" (DEFUN BIN-STREAM-TEST (&KEY (SIZE (INTEGER-LENGTH MOST-POSITIVE-FIXNUM)) (TYPE 'UNSIGNED-BYTE) (FILE-NAME "streamslong-tst-foo") (NUM-BYTES 10) (BYTES (IF (EQ TYPE 'SIGNED-BYTE) (LOOP :REPEAT NUM-BYTES :COLLECT (- (RANDOM (ASH 1 SIZE)) (ASH 1 (1- SIZE)))) (LOOP :REPEAT NUM-BYTES :COLLECT (RANDOM (ASH 1 SIZE)))))) (WITH-OPEN-FILE (FOO FILE-NAME :DIRECTION :OUTPUT :ELEMENT-TYPE (LIST TYPE SIZE)) (DOLIST (BYTE BYTES) (WRITE-BYTE BYTE FOO))) (UNWIND-PROTECT (WITH-OPEN-FILE (FOO FILE-NAME :DIRECTION :INPUT :ELEMENT-TYPE (LIST TYPE SIZE)) (LIST (STREAM-ELEMENT-TYPE FOO) (FILE-LENGTH FOO) BYTES (LOOP :FOR BYTE :IN BYTES :FOR NB = (READ-BYTE FOO) :COLLECT NB :UNLESS (= NB BYTE) :DO (FLET ((BY-OUT (SZ BY) (FORMAT NIL "~v,'0,' ,4:b" (+ SZ (FLOOR SZ 4)) BY))) (ERROR "~& * [(~s ~s)] ~a != ~a~%" TYPE SIZE (BY-OUT SIZE BYTE) (BY-OUT SIZE NB)))))) (DELETE-FILE FILE-NAME))) EQL-OK: BIN-STREAM-TEST (LOOP FOR SIZE FROM 2 TO 40 DO (BIN-STREAM-TEST :SIZE SIZE)) EQL-OK: NIL (LOOP FOR SIZE FROM 2 TO 40 DO (BIN-STREAM-TEST :SIZE SIZE :TYPE 'SIGNED-BYTE)) EQL-OK: NIL (LET ((NOTICED 'NIL) FILE-WRITTEN) (FLET ((NOTICE (X) (PUSH X NOTICED) X)) (UNWIND-PROTECT (PROGN (WITH-OPEN-FILE (S "streamslong-tst-footest.bin" :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :DIRECTION :OUTPUT :IF-EXISTS :ERROR) (NOTICE (FILE-POSITION S)) (WRITE-BYTE 5 S) (WRITE-BYTE 6 S) (LET ((P (FILE-POSITION S))) (NOTICE P) (NOTICE (WHEN P (FILE-POSITION S (1- P))))) (WRITE-BYTE 7 S) (NOTICE (FILE-POSITION S)) (SETQ FILE-WRITTEN (TRUENAME S))) (WITH-OPEN-FILE (S FILE-WRITTEN :ELEMENT-TYPE '(UNSIGNED-BYTE 8) :DIRECTION :INPUT) (NOTICE (FILE-POSITION S)) (LET ((LENGTH (FILE-LENGTH S))) (NOTICE LENGTH) (WHEN LENGTH (DOTIMES (I LENGTH) (NOTICE (READ-BYTE S)))))) (NREVERSE NOTICED)) (DELETE-FILE FILE-WRITTEN)))) EQUAL-OK: (0 2 1 2 0 2 5 7) (LET ((S (MAKE-STRING-INPUT-STREAM (MAKE-ARRAY 10 :ELEMENT-TYPE (ARRAY-ELEMENT-TYPE "") :DISPLACED-TO "abcdefghijklmnopqrst" :DISPLACED-INDEX-OFFSET 5)))) (PROG1 (LIST (READ-CHAR S) (READ-CHAR S) (FILE-POSITION S) (FILE-POSITION S 4) (READ-CHAR S) (FILE-POSITION S :START) (READ-CHAR S) (FILE-POSITION S :END) (FILE-POSITION S)) (CLOSE S))) EQUAL-OK: (#\f #\g 2 4 #\j 0 #\f 10 10) (LET ((S (MAKE-STRING-OUTPUT-STREAM))) (PROG1 (LIST (WRITE-CHAR #\a S) (WRITE-CHAR #\b S) (FILE-POSITION S) (GET-OUTPUT-STREAM-STRING S) (WRITE-STRING "foo" S) (FILE-POSITION S 1) (WRITE-CHAR #\z S) (GET-OUTPUT-STREAM-STRING S) (FILE-POSITION S :START) (WRITE-CHAR #\u S) (FILE-POSITION S :END) (WRITE-CHAR #\w S) (GET-OUTPUT-STREAM-STRING S)) (CLOSE S))) EQUAL-OK: (#\a #\b 2 "ab" "foo" 1 #\z "fz" 0 #\u 1 #\w "uw") (LET ((V (MAKE-ARRAY 3 :ADJUSTABLE T :FILL-POINTER 0 :ELEMENT-TYPE 'CHARACTER))) (WITH-OUTPUT-TO-STRING (S V) (LIST (WRITE-STRING "foo" S) (CONS (FILE-POSITION S) (COPY-SEQ V)) (FILE-POSITION S 2) (WRITE-STRING "bar" S) (CONS (FILE-POSITION S) (COPY-SEQ V)) (FILE-POSITION S :START) (WRITE-STRING "zot" S) (CONS (FILE-POSITION S) (COPY-SEQ V)) (FILE-POSITION S :END) (WRITE-STRING "plonk" S) (CONS (FILE-POSITION S) (COPY-SEQ V)) V))) EQUAL-OK: ("foo" (3 . "foo") 2 "bar" (5 . "fobar") 0 "zot" (3 . "zot") 3 "plonk" (8 . "zotplonk") "zotplonk") (LET ((F "streamslong-tst-foo") (S "12345") L) (WITH-OPEN-FILE (O F :DIRECTION :OUTPUT) (WRITE-STRING S O)) (WITH-OPEN-FILE (I F :BUFFERED T) (LISTEN I) (PUSH (READ-CHAR I) L)) (WITH-OPEN-FILE (I F :BUFFERED NIL) (LISTEN I) (PUSH (READ-CHAR I) L)) (DELETE-FILE F) L) EQUAL-OK: (#\1 #\1) (LET ((FILE "streamslong-tst-foo") S1 S2) (WITH-OPEN-FILE (OUT FILE :DIRECTION :OUTPUT) (WRITE OUT :STREAM OUT) (TERPRI OUT) (SETQ S1 (WRITE-TO-STRING OUT)) (FORCE-OUTPUT OUT) (APPEASE-CERRORS (WITH-OPEN-FILE (IN FILE :DIRECTION :INPUT) (SETQ S2 (READ-LINE IN))))) (DELETE-FILE FILE) (STRING= S1 S2)) WARNING: OPEN: # already points to file "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/streamslong-tst-foo" , opening the file again for :INPUT may produce unexpected results Open the file anyway EQL-OK: T (PROGN (DEFCLASS GRAY-OUT (FUNDAMENTAL-CHARACTER-OUTPUT-STREAM) ((ACCUMULATOR :TYPE STRING))) (DEFMETHOD INITIALIZE-INSTANCE :AFTER ((S GRAY-OUT) &REST ARGS) (SETF (SLOT-VALUE S 'ACCUMULATOR) (MAKE-ARRAY 0 :ELEMENT-TYPE 'CHARACTER :ADJUSTABLE T :FILL-POINTER 0))) (DEFMETHOD STREAM-WRITE-CHAR ((S GRAY-OUT) CH) (VECTOR-PUSH-EXTEND CH (SLOT-VALUE S 'ACCUMULATOR))) (DEFMACRO WITH-G-O ((V) &BODY FORMS) `(LET ((,V (MAKE-INSTANCE 'GRAY-OUT))) ,@FORMS (CLOSE ,V) (COERCE (SLOT-VALUE ,V 'ACCUMULATOR) 'SIMPLE-STRING))) (LIST (WITH-G-O (V) (WRITE-CHAR #\a V)) (WITH-G-O (V) (WRITE-CHAR-SEQUENCE "abc" V)) (HANDLER-CASE (WITH-G-O (V) (WRITE-SEQUENCE #(#\a #\b #\c) V)) (METHOD-CALL-ERROR (E) (GENERIC-FUNCTION-NAME (METHOD-CALL-ERROR-GENERIC-FUNCTION E)))) (WITH-G-O (V) (STREAM-WRITE-CHAR-SEQUENCE V "abc")) (HANDLER-CASE (WITH-G-O (V) (STREAM-WRITE-SEQUENCE V #(#\a #\b #\c))) (METHOD-CALL-ERROR (E) (GENERIC-FUNCTION-NAME (METHOD-CALL-ERROR-GENERIC-FUNCTION E)))) (WITH-G-O (V) (STREAM-WRITE-SEQUENCE "abc" V)) (SETF (FIND-CLASS 'GRAY-OUT) NIL) (FMAKUNBOUND 'WITH-G-O))) EQUAL-OK: ("a" "abc" STREAM-WRITE-CHAR-SEQUENCE "abc" STREAM-WRITE-SEQUENCE "abc" NIL WITH-G-O) (LET ((FNAME "streamslong-tst-foo") (VEC (MAKE-ARRAY 5 :ELEMENT-TYPE '(UNSIGNED-BYTE 8)))) (FLET ((FOO (L) (UNWIND-PROTECT (LIST (WITH-OPEN-FILE (F FNAME :EXTERNAL-FORMAT :DOS :DIRECTION :IO) (DOLIST (S L) (WRITE-LINE S F)) (FILE-POSITION F 0) (READ-LINE F) (SETF (STREAM-ELEMENT-TYPE F) '(UNSIGNED-BYTE 8)) (READ-BYTE F NIL)) (MAPCAR (LAMBDA (B) (WITH-OPEN-FILE (F FNAME :DIRECTION :INPUT :BUFFERED B) (READ-LINE F) (SETF (STREAM-ELEMENT-TYPE F) '(UNSIGNED-BYTE 8)) (LIST B (READ-BYTE F NIL)))) '(T NIL)) (MAPCAR (LAMBDA (B) (WITH-OPEN-FILE (F FNAME :DIRECTION :INPUT :BUFFERED B) (READ-LINE F) (SETF (STREAM-ELEMENT-TYPE F) '(UNSIGNED-BYTE 8)) (LIST B (SUBSEQ VEC 0 (READ-SEQUENCE VEC F))))) '(T NIL))) (DELETE-FILE FNAME)))) (LIST (FOO '("1")) (FOO '("1" "2"))))) EQUALP-OK: ((NIL ((T NIL) (NIL NIL)) ((T #()) (NIL #()))) (50 ((T 50) (NIL 50)) ((T #(50 13 10)) (NIL #(50 13 10))))) (LET ((FNAME "streamslong-tst-foo")) (FLET ((LINE-TERM (S) (ENCODING-LINE-TERMINATOR (STREAM-EXTERNAL-FORMAT S)))) (UNWIND-PROTECT (LIST (WITH-OPEN-FILE (F FNAME :DIRECTION :OUTPUT :EXTERNAL-FORMAT :DOS) (LET ((B (MAKE-BROADCAST-STREAM F))) (LIST (LIST (LINE-TERM B) (LINE-TERM F)) (PROGN (SETF (STREAM-EXTERNAL-FORMAT B :OUTPUT) :UNIX) (LIST (LINE-TERM B) (LINE-TERM F))) (LIST (STREAM-ELEMENT-TYPE B) (STREAM-ELEMENT-TYPE F)) (SETF (STREAM-ELEMENT-TYPE B) '(UNSIGNED-BYTE 8)) (LIST (STREAM-ELEMENT-TYPE B) (STREAM-ELEMENT-TYPE F))))) (WITH-OPEN-FILE (F FNAME :DIRECTION :INPUT :EXTERNAL-FORMAT :DOS) (LET ((C (MAKE-CONCATENATED-STREAM F))) (LIST (LIST (LINE-TERM C) (LINE-TERM F)) (PROGN (SETF (STREAM-EXTERNAL-FORMAT C :INPUT) :UNIX) (LIST (LINE-TERM C) (LINE-TERM F))) (LIST (STREAM-ELEMENT-TYPE C) (STREAM-ELEMENT-TYPE F)) (SETF (STREAM-ELEMENT-TYPE C) '(UNSIGNED-BYTE 8)) (LIST (STREAM-ELEMENT-TYPE C) (STREAM-ELEMENT-TYPE F)))))) (DELETE-FILE FNAME)))) EQUAL-OK: (((:DOS :DOS) (:UNIX :UNIX) (CHARACTER CHARACTER) (UNSIGNED-BYTE 8) ((UNSIGNED-BYTE 8) (UNSIGNED-BYTE 8))) ((:DOS :DOS) (:UNIX :UNIX) (CHARACTER CHARACTER) (UNSIGNED-BYTE 8) ((UNSIGNED-BYTE 8) (UNSIGNED-BYTE 8)))) (LET ((FNAME "test-eof") (*REOPEN-OPEN-FILE* NIL)) (OPEN FNAME :DIRECTION :PROBE :IF-EXISTS :OVERWRITE :IF-DOES-NOT-EXIST :CREATE) (FLET ((F (BUF NEW) (WITH-OPEN-FILE (IN FNAME :DIRECTION :INPUT) (LIST (READ-LINE IN NIL :EOF) (PROGN (WITH-OPEN-FILE (OUT FNAME :DIRECTION :OUTPUT :IF-EXISTS :APPEND) (WRITE-LINE NEW OUT)) (CLEAR-INPUT IN) (READ-LINE IN NIL :EOF)))))) (UNWIND-PROTECT (LIST (F T "foo") (F NIL "bar")) (DELETE-FILE FNAME)))) EQUAL-OK: ((:EOF "foo") ("foo" "bar")) (LET* ((LIST NIL) (OUT (MAKE-BUFFERED-OUTPUT-STREAM (LAMBDA (C) (PUSH C LIST))))) (LIST (WRITE-CHAR #\a OUT) (CLOSE OUT) LIST)) EQUAL-OK: (#\a T ("a")) (LET* ((LIST NIL) (OUT (MAKE-BUFFERED-OUTPUT-STREAM (LAMBDA (C) (PUSH C LIST) (ERROR (STRING C)))))) (LIST (WRITE-CHAR #\a OUT) (BLOCK B (HANDLER-BIND ((ERROR (HANDLER-RETURN B LIST))) (CLOSE OUT))))) [SIMPLE-ERROR]: a EQUAL-OK: (#\a ("a")) (LET* ((LIST NIL) (OUT (MAKE-BUFFERED-OUTPUT-STREAM (LAMBDA (C) (PUSH C LIST) (ERROR (STRING C)))))) (LIST (WRITE-CHAR #\a OUT) (CLOSE OUT :ABORT T) LIST (PRINC-TO-STRING OUT))) EQUAL-OK: (#\a T ("a") "#") (LET ((FILE-IN "test-extfmt-in") (FILE-OUT "test-extfmt-out")) (OPEN FILE-IN :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (UNWIND-PROTECT (WITH-OPEN-FILE (OUT FILE-OUT :DIRECTION :OUTPUT :EXTERNAL-FORMAT :DOS) (WITH-OPEN-FILE (IN FILE-IN :DIRECTION :INPUT :EXTERNAL-FORMAT :DOS) (WITH-OPEN-STREAM (IO (MAKE-TWO-WAY-STREAM IN OUT)) (LIST (ENCODING-LINE-TERMINATOR (STREAM-EXTERNAL-FORMAT IO)) (ENCODING-LINE-TERMINATOR (SETF (STREAM-EXTERNAL-FORMAT IO) :UNIX)) (ENCODING-LINE-TERMINATOR (STREAM-EXTERNAL-FORMAT IO)) (ENCODING-LINE-TERMINATOR (STREAM-EXTERNAL-FORMAT IN)) (ENCODING-LINE-TERMINATOR (STREAM-EXTERNAL-FORMAT OUT)))))) (DELETE-FILE FILE-IN) (DELETE-FILE FILE-OUT))) EQUAL-OK: (:DOS :UNIX :UNIX :UNIX :UNIX) (LET ((FILE "test-extfmt")) (WITH-OPEN-FILE (OUT FILE :DIRECTION :OUTPUT :EXTERNAL-FORMAT :DOS :IF-EXISTS :SUPERSEDE) (TERPRI OUT) (SETF (STREAM-EXTERNAL-FORMAT OUT) :UNIX) (TERPRI OUT)) (UNWIND-PROTECT (WITH-OPEN-FILE (IN FILE :DIRECTION :INPUT :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) (LET ((V (MAKE-ARRAY (FILE-LENGTH IN)))) (READ-SEQUENCE V IN) (MAP 'VECTOR #'CODE-CHAR V))) (DELETE-FILE FILE))) EQUALP-OK: #(#\Return #\Newline #\Newline) (LET ((FILE "test-pipe")) (UNWIND-PROTECT (DOLIST (B '(NIL T)) (WITH-OPEN-STREAM (OUT (MAKE-PIPE-OUTPUT-STREAM (FORMAT NIL "/bin/cat > ~A" FILE) :EXTERNAL-FORMAT CHARSET:UTF-8 :BUFFERED B)) (LOOP FOR I BELOW 1000 DO (PRINT I OUT))) (SLEEP 1) (WITH-OPEN-FILE (IN FILE :DIRECTION :INPUT :EXTERNAL-FORMAT CHARSET:UTF-8) (LOOP FOR I BELOW 1000 DO (ASSERT (= I (READ IN)))))) (DELETE-FILE FILE))) EQL-OK: NIL (SYMBOLS-CLEANUP '(*A* BIN-STREAM-TEST)) EQL-OK: NIL RUN-TEST: finished "streamslong" (0 errors out of 25 tests) RUN-TEST: started # (CHAR "abcdef-dg1ndh" 0) EQL-OK: #\a (CHAR "abcdef-dg1ndh" 1) EQL-OK: #\b (CHAR "abcdef-dg1ndh" 6) EQL-OK: #\- (CHAR "abcdef-dg1ndh" 20) [SIMPLE-TYPE-ERROR]: CHAR: index 20 should be less than the length of the string EQL-OK: ERROR (CHAR "abcdef-dg1ndh") [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too few arguments given to CHAR: #1=(CHAR "abcdef-dg1ndh") EQL-OK: ERROR (CHAR "abcdef-dg1ndh" -3) [SIMPLE-TYPE-ERROR]: CHAR: index should not be negative: -3 EQL-OK: ERROR (CHAR) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too few arguments given to CHAR: #1=(CHAR) EQL-OK: ERROR (CHAR 2) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too few arguments given to CHAR: #1=(CHAR 2) EQL-OK: ERROR (CHAR "abcde" 2 4) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too many arguments given to CHAR: #1=(CHAR "abcde" 2 4) EQL-OK: ERROR (CHAR 'A 0) [SIMPLE-TYPE-ERROR]: CHAR: argument A is not a string EQL-OK: ERROR (CHAR 'ANNA 0) [SIMPLE-TYPE-ERROR]: CHAR: argument ANNA is not a string EQL-OK: ERROR (SCHAR 'A 0) [SIMPLE-TYPE-ERROR]: SCHAR: argument A is not a SIMPLE-STRING EQL-OK: ERROR (SCHAR 'ANNA 0) [SIMPLE-TYPE-ERROR]: SCHAR: argument ANNA is not a SIMPLE-STRING EQL-OK: ERROR (SCHAR "abcdef-dg1ndh" 0) EQL-OK: #\a (SCHAR "abcdef-dg1ndh" 1) EQL-OK: #\b (SCHAR "abcdef-dg1ndh" 6) EQL-OK: #\- (SCHAR "abcdef-dg1ndh" 20) [SIMPLE-TYPE-ERROR]: SCHAR: index 20 should be less than the length of the string EQL-OK: ERROR (SCHAR "abcdef-dg1ndh") [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too few arguments given to SCHAR: #1=(SCHAR "abcdef-dg1ndh") EQL-OK: ERROR (SCHAR "abcdef-dg1ndh" -3) [SIMPLE-TYPE-ERROR]: SCHAR: index should not be negative: -3 EQL-OK: ERROR (SCHAR2) [SIMPLE-UNDEFINED-FUNCTION]: EVAL: undefined function SCHAR2 EQL-OK: ERROR (SCHAR2 2) [SIMPLE-UNDEFINED-FUNCTION]: EVAL: undefined function SCHAR2 EQL-OK: ERROR (SCHAR "abcde" 2 4) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: too many arguments given to SCHAR: #1=(SCHAR "abcde" 2 4) EQL-OK: ERROR (STRING= "foo" "foo") EQL-OK: T (STRING= "foo" "Foo") EQL-OK: NIL (STRING= "foo" "FOO") EQL-OK: NIL (STRING= "foo" "bar") EQL-OK: NIL (STRING= "together" "frog" :START1 1 :END1 3 :START2 2) EQL-OK: T (STRING= "abcdef" "defghi" :START1 3 :END2 3) EQL-OK: T (STRING= "abcdefghi" "uvdefmgnj" :START1 3 :END1 6 :START2 2 :END2 5) EQL-OK: T (STRING= "abcdefg" "abcdefg" :END2 4) EQL-OK: NIL (STRING= "abcdef" "abcdef" :START1 1 :END1 4 :START2 4 :END2 1) [SIMPLE-ERROR]: STRING=: :START2-index 4 must not be greater than :END2-index 1 EQL-OK: ERROR (STRING-EQUAL "foo" "foo") EQL-OK: T (STRING-EQUAL "foo" "Foo") EQL-OK: T (STRING-EQUAL "foo" "FOO") EQL-OK: T (STRING-EQUAL "foo" "bar") EQL-OK: NIL (STRING-EQUAL "absDEfg-HijM1#r" "udEFG-hIfvd" :START1 3 :END1 10 :START2 1 :END2 8) EQL-OK: T (STRING-EQUAL "ABCdefg" "abcDEFG") EQL-OK: T (STRING-EQUAL "ABCdefg" "abcDEFG" :START1 3) EQL-OK: NIL (STRING-EQUAL "AbCdEf" "aBcDeF" :START1 5 :END1 3) [SIMPLE-ERROR]: STRING-EQUAL: :START1-index 5 must not be greater than :END1-index 3 EQL-OK: ERROR (STRING< "" "abcdefgh") EQL-OK: 0 (STRING< "a" "abcdefgh") EQL-OK: 1 (STRING< "abc" "abcdefgh") EQL-OK: 3 (STRING< "cabc" "abcdefgh") EQL-OK: NIL (STRING< "abcdefgh" "abcdefgh") EQL-OK: NIL (STRING< "xyzabc" "abcdefgh") EQL-OK: NIL (STRING< "abc" "xyzabcdefgh") EQL-OK: 0 (STRING< "abcdefgh" "abcdefgh" :END1 4) EQL-OK: 4 (STRING< "xyzabc" "abcdefgh" :START1 3) EQL-OK: 6 (STRING< "abc" "xyzabcdefgh" :START2 3) EQL-OK: 3 (STRING< "abc" "xyzabcdefgh" :START2 3 :END2 8) EQL-OK: 3 (STRING< "abc" "xyzabcdefgh" :START2 3 :END2 5) EQL-OK: NIL (STRING< "abcdefgh" "") EQL-OK: NIL (STRING< "abcdefgh" "a") EQL-OK: NIL (STRING< "abcdefgh" "abc") EQL-OK: NIL (STRING< "abcdefgh" "cabc") EQL-OK: 0 (STRING< "abcdefgh" "xyzabc") EQL-OK: 0 (STRING< "xyzabcdefgh" "abc") EQL-OK: NIL (STRING< "abcdefgh" "abcdefgh" :END2 4) EQL-OK: NIL (STRING< "xyzabc" "abcdefgh" :START2 3) EQL-OK: NIL (STRING< "abc" "xyzabcdefgh" :START2 3) EQL-OK: 3 (STRING< "abc" "xyzabcdefgh" :START2 3 :END2 8) EQL-OK: 3 (STRING< "abc" "xyzabcdefgh" :START2 3 :END2 5) EQL-OK: NIL (STRING< "abcdef" "bcdefgh") EQL-OK: 0 (STRING< "abcdef" "abcdefgh" :START2 2) EQL-OK: 0 (STRING< "abcdef" "bngdabcdef" :START2 9 :END2 5) [SIMPLE-ERROR]: STRING<: :START2-index 9 must not be greater than :END2-index 5 EQL-OK: ERROR (STRING> "" "abcdefgh") EQL-OK: NIL (STRING> "a" "abcdefgh") EQL-OK: NIL (STRING> "abc" "abcdefgh") EQL-OK: NIL (STRING> "cabc" "abcdefgh") EQL-OK: 0 (STRING> "abcdefgh" "abcdefgh") EQL-OK: NIL (STRING> "xyzabc" "abcdefgh") EQL-OK: 0 (STRING> "abc" "xyzabcdefgh") EQL-OK: NIL (STRING> "abcdefgh" "abcdefgh" :END1 4) EQL-OK: NIL (STRING> "xyzabc" "abcdefgh" :START1 3) EQL-OK: NIL (STRING> "abc" "xyzabcdefgh" :START2 3) EQL-OK: NIL (STRING> "abc" "xyzabcdefgh" :START2 3 :END2 8) EQL-OK: NIL (STRING> "abc" "xyzabcdefgh" :START2 3 :END2 5) EQL-OK: 2 (STRING> "abcdefgh" "") EQL-OK: 0 (STRING> "abcdefgh" "a") EQL-OK: 1 (STRING> "abcdefgh" "abc") EQL-OK: 3 (STRING> "abcdefgh" "cabc") EQL-OK: NIL (STRING> "abcdefgh" "xyzabc") EQL-OK: NIL (STRING> "xyzabcdefgh" "abc") EQL-OK: 0 (STRING> "abcdefgh" "abcdefgh" :END2 4) EQL-OK: 4 (STRING> "xyzabc" "abcdefgh" :START2 3) EQL-OK: 0 (STRING> "abc" "xyzabcdefgh" :START2 3) EQL-OK: NIL (STRING> "abc" "xyzabcdefgh" :START2 3 :END2 8) EQL-OK: NIL (STRING> "abc" "xyzabcdefgh" :START2 3 :END2 5) EQL-OK: 2 (STRING> "abcde" "bc") EQL-OK: NIL (STRING> "bcdef" "abcde") EQL-OK: 0 (STRING> "bcdef" "abcdef") EQL-OK: 0 (STRING> "abcdefghij" "abcdefgh" :START1 1) EQL-OK: 1 (STRING> "ghijkl" "xyzabcd" :START2 6 :END2 4) [SIMPLE-ERROR]: STRING>: :START2-index 6 must not be greater than :END2-index 4 EQL-OK: ERROR (STRING< "" "abcdefgh") EQL-OK: 0 (STRING<= "a" "abcdefgh") EQL-OK: 1 (STRING<= "abc" "abcdefgh") EQL-OK: 3 (STRING<= "aaabce" "aaabcdefgh") EQL-OK: NIL (STRING<= "cabc" "abcdefgh") EQL-OK: NIL (STRING<= "abcdefgh" "abcdefgh") EQL-OK: 8 (STRING<= "xyzabc" "abcdefgh") EQL-OK: NIL (STRING<= "abc" "xyzabcdefgh") EQL-OK: 0 (STRING<= "abcdefgh" "abcdefgh" :END1 4) EQL-OK: 4 (STRING<= "xyzabc" "abcdefgh" :START1 3) EQL-OK: 6 (STRING<= "abc" "xyzabcdefgh" :START2 3) EQL-OK: 3 (STRING<= "abc" "xyzabcdefgh" :START2 3 :END2 8) EQL-OK: 3 (STRING<= "abc" "xyzabcdefgh" :START2 3 :END2 5) EQL-OK: NIL (STRING<= "abcdefgh" "") EQL-OK: NIL (STRING<= "abcdefgh" "a") EQL-OK: NIL (STRING<= "abcdefgh" "abc") EQL-OK: NIL (STRING<= "abcdefgh" "cabc") EQL-OK: 0 (STRING<= "abcdefgh" "xyzabc") EQL-OK: 0 (STRING<= "xyzabcdefgh" "abc") EQL-OK: NIL (STRING<= "abcdefgh" "abcdefgh" :END2 4) EQL-OK: NIL (STRING<= "xyzabc" "abcdefgh" :START2 3) EQL-OK: NIL (STRING<= "abc" "xyzabcdefgh" :START2 3) EQL-OK: 3 (STRING<= "abc" "xyzabcdefgh" :START2 3 :END2 8) EQL-OK: 3 (STRING<= "abc" "xyzabcdefgh" :START2 3 :END2 5) EQL-OK: NIL (STRING<= "abcdef" "bcdefgh") EQL-OK: 0 (STRING<= "abcdef" "abcdefgh" :START2 2) EQL-OK: 0 (STRING<= "abcdef" "bngdabcdef" :START2 9 :END2 5) [SIMPLE-ERROR]: STRING<=: :START2-index 9 must not be greater than :END2-index 5 EQL-OK: ERROR (STRING>= "" "abcdefgh") EQL-OK: NIL (STRING>= "a" "abcdefgh") EQL-OK: NIL (STRING>= "abc" "abcdefgh") EQL-OK: NIL (STRING>= "cabc" "abcdefgh") EQL-OK: 0 (STRING>= "abcdefgh" "abcdefgh") EQL-OK: 8 (STRING>= "xyzabc" "abcdefgh") EQL-OK: 0 (STRING>= "abc" "xyzabcdefgh") EQL-OK: NIL (STRING>= "abcdefgh" "abcdefgh" :END1 4) EQL-OK: NIL (STRING>= "xyzabc" "abcdefgh" :START1 3) EQL-OK: NIL (STRING>= "abc" "xyzabcdefgh" :START2 3) EQL-OK: NIL (STRING>= "abc" "xyzabcdefgh" :START2 3 :END2 8) EQL-OK: NIL (STRING>= "abc" "xyzabcdefgh" :START2 3 :END2 5) EQL-OK: 2 (STRING>= "abcdefgh" "") EQL-OK: 0 (STRING>= "abcdefgh" "a") EQL-OK: 1 (STRING>= "abcdefgh" "abc") EQL-OK: 3 (STRING>= "abcdefgh" "cabc") EQL-OK: NIL (STRING>= "abcdefgh" "xyzabc") EQL-OK: NIL (STRING>= "xyzabcdefgh" "abc") EQL-OK: 0 (STRING>= "abcdefgh" "abcdefgh" :END2 4) EQL-OK: 4 (STRING>= "xyzabc" "abcdefgh" :START2 3) EQL-OK: 0 (STRING>= "xyzabc" "abcdefgh" :START1 3) EQL-OK: NIL (STRING>= "abc" "xyzabcdefgh" :START2 3) EQL-OK: NIL (STRING>= "abc" "xyzabcdefgh" :START2 3 :END2 8) EQL-OK: NIL (STRING>= "abc" "xyzabcdefgh" :START2 3 :END2 5) EQL-OK: 2 (STRING>= "bcdef" "abcdef") EQL-OK: 0 (STRING>= "abcdefghij" "abcdefgh" :START1 1) EQL-OK: 1 (STRING>= "ghijkl" "xyzabcd" :START2 6 :END2 4) [SIMPLE-ERROR]: STRING>=: :START2-index 6 must not be greater than :END2-index 4 EQL-OK: ERROR (STRING/= "" "abcdefgh") EQL-OK: 0 (STRING/= "a" "abcdefgh") EQL-OK: 1 (STRING/= "abc" "abcdefgh") EQL-OK: 3 (STRING/= "cabc" "abcdefgh") EQL-OK: 0 (STRING/= "abcdefgh" "abcdefgh") EQL-OK: NIL (STRING/= "xyzabc" "abcdefgh") EQL-OK: 0 (STRING/= "abc" "xyzabcdefgh") EQL-OK: 0 (STRING/= "abcdefgh" "abcdefgh" :END1 4) EQL-OK: 4 (STRING/= "xyzabc" "abcdefgh" :START1 3) EQL-OK: 6 (STRING/= "abc" "xyzabcdefgh" :START2 3) EQL-OK: 3 (STRING/= "abc" "xyzabcdefgh" :START2 3 :END2 8) EQL-OK: 3 (STRING/= "abc" "xyzabcdefgh" :START2 3 :END2 5) EQL-OK: 2 (STRING/= "abcdefgh" "") EQL-OK: 0 (STRING/= "abcdefgh" "a") EQL-OK: 1 (STRING/= "abcdefgh" "abc") EQL-OK: 3 (STRING/= "abcdefgh" "cabc") EQL-OK: 0 (STRING/= "abcdefgh" "xyzabc") EQL-OK: 0 (STRING/= "xyzabcdefgh" "abc") EQL-OK: 0 (STRING/= "abcdefgh" "abcdefgh" :END2 4) EQL-OK: 4 (STRING/= "xyzabc" "abcdefgh" :START2 3) EQL-OK: 0 (STRING/= "abc" "xyzabcdefgh" :START2 3) EQL-OK: 3 (STRING/= "abc" "xyzabcdefgh" :START2 3 :END2 8) EQL-OK: 3 (STRING/= "abc" "xyzabcdefgh" :START2 3 :END2 5) EQL-OK: 2 (STRING/= "abcdefghi" "uvdefmgnj" :START1 3 :END1 6 :START2 2 :END2 5) EQL-OK: NIL (STRING/= "abcdefg" "abcdefg" :END2 4) EQL-OK: 4 (STRING/= "abcdef" "abcdef" :START1 1 :END1 4 :START2 4 :END2 1) [SIMPLE-ERROR]: STRING/=: :START2-index 4 must not be greater than :END2-index 1 EQL-OK: ERROR (STRING-LESSP "" "abcDEFgh") EQL-OK: 0 (STRING-LESSP "a" "Abcdefgh") EQL-OK: 1 (STRING-LESSP "abc" "aBcDEfgh") EQL-OK: 3 (STRING-LESSP "cABc" "aBCDefgh") EQL-OK: NIL (STRING-LESSP "abCDeFgh" "abCDEfgh") EQL-OK: NIL (STRING-LESSP "xyzAbc" "ABcCDfgh") EQL-OK: NIL (STRING-LESSP "aBC" "xYZAbcdEfgh") EQL-OK: 0 (STRING-LESSP "abcDEfgh" "abcDEfgh" :END1 4) EQL-OK: 4 (STRING-LESSP "XYZabc" "ABcdefgh" :START1 3) EQL-OK: 6 (STRING-LESSP "aBc" "xyZABcdefgh" :START2 3) EQL-OK: 3 (STRING-LESSP "abc" "xyzabCDEcdefgh" :START2 3 :END2 8) EQL-OK: 3 (STRING-LESSP "abc" "xyzABcdefgh" :START2 3 :END2 5) EQL-OK: NIL (STRING-LESSP "abcdefgh" "") EQL-OK: NIL (STRING-LESSP "Abcdefgh" "a") EQL-OK: NIL (STRING-LESSP "ABCdefgh" "abc") EQL-OK: NIL (STRING-LESSP "ABCdefgh" "cabc") EQL-OK: 0 (STRING-LESSP "abcdefgh" "xyzABC") EQL-OK: 0 (STRING-LESSP "xyzABCdefgh" "abc") EQL-OK: NIL (STRING-LESSP "abcdEFgh" "abcdeFGh" :END2 4) EQL-OK: NIL (STRING-LESSP "xyzaBC" "abCDefgh" :START2 3) EQL-OK: NIL (STRING-LESSP "ABC" "xyzabcdefgh" :START2 3) EQL-OK: 3 (STRING-LESSP "ABC" "xyzabcdefgh" :START2 3 :END2 8) EQL-OK: 3 (STRING-LESSP "ABC" "xyzabcdefgh" :START2 3 :END2 5) EQL-OK: NIL (STRING-LESSP "aBCDef" "bcdefgh") EQL-OK: 0 (STRING-LESSP "aBCDef" "abcdefgh" :START2 2) EQL-OK: 0 (STRING-LESSP "aBCDef" "bngdabcdef" :START2 9 :END2 5) [SIMPLE-ERROR]: STRING-LESSP: :START2-index 9 must not be greater than :END2-index 5 EQL-OK: ERROR (STRING-GREATERP "" "abcdefgh") EQL-OK: NIL (STRING-GREATERP "A" "abcdefgh") EQL-OK: NIL (STRING-GREATERP "ABc" "abcdefgh") EQL-OK: NIL (STRING-GREATERP "CAbc" "abcdefgh") EQL-OK: 0 (STRING-GREATERP "abcdefgh" "abcDEFgh") EQL-OK: NIL (STRING-GREATERP "xyzabc" "abCDEfgh") EQL-OK: 0 (STRING-GREATERP "ABC" "xyzabcdefgh") EQL-OK: NIL (STRING-GREATERP "ABCdefgh" "abcdefgh" :END1 4) EQL-OK: NIL (STRING-GREATERP "xyzaBc" "ABCdefgh" :START1 3) EQL-OK: NIL (STRING-GREATERP "abc" "xyzABcdefgh" :START2 3) EQL-OK: NIL (STRING-GREATERP "abc" "xyzABcdefgh" :START2 3 :END2 8) EQL-OK: NIL (STRING-GREATERP "abc" "xyZAbcdefgh" :START2 3 :END2 5) EQL-OK: 2 (STRING-GREATERP "abcdefgh" "") EQL-OK: 0 (STRING-GREATERP "Abcdefgh" "a") EQL-OK: 1 (STRING-GREATERP "ABCdefgh" "abc") EQL-OK: 3 (STRING-GREATERP "ABCdefgh" "cabc") EQL-OK: NIL (STRING-GREATERP "ABCdefgh" "xyzabc") EQL-OK: NIL (STRING-GREATERP "xyzabcdefgh" "Abc") EQL-OK: 0 (STRING-GREATERP "abcdefgh" "aBCDefgh" :END2 4) EQL-OK: 4 (STRING-GREATERP "xyzabc" "abcdEFgh" :START2 3) EQL-OK: 0 (STRING-GREATERP "ABC" "xyzabcdefgh" :START2 3) EQL-OK: NIL (STRING-GREATERP "ABC" "xyzabcdefgh" :START2 3 :END2 8) EQL-OK: NIL (STRING-GREATERP "ABC" "xyzabcdefgh" :START2 3 :END2 5) EQL-OK: 2 (STRING-GREATERP "bCDEf" "abcde") EQL-OK: 0 (STRING-GREATERP "bcDEF" "abcdef") EQL-OK: 0 (STRING-GREATERP "abCDEfghij" "abcdefgh" :START1 1) EQL-OK: 1 (STRING-GREATERP "ghijKl" "xyzabcd" :START2 6 :END2 4) [SIMPLE-ERROR]: STRING-GREATERP: :START2-index 6 must not be greater than :END2-index 4 EQL-OK: ERROR (STRING-NOT-GREATERP "" "abcdefgh") EQL-OK: 0 (STRING-NOT-GREATERP "A" "abcdefgh") EQL-OK: 1 (STRING-NOT-GREATERP "aBC" "abcdefgh") EQL-OK: 3 (STRING-NOT-GREATERP "CABc" "abcdefgh") EQL-OK: NIL (STRING-NOT-GREATERP "abcDEFgh" "abcdefgh") EQL-OK: 8 (STRING-NOT-GREATERP "xyzabc" "ABcdefgh") EQL-OK: NIL (STRING-NOT-GREATERP "abc" "xyzABcdefgh") EQL-OK: 0 (STRING-NOT-GREATERP "ABCDEFgh" "abcdefgh" :END1 4) EQL-OK: 4 (STRING-NOT-GREATERP "xyzabc" "aBCDefgh" :START1 3) EQL-OK: 6 (STRING-NOT-GREATERP "ABC" "xyzabcdefgh" :START2 3) EQL-OK: 3 (STRING-NOT-GREATERP "ABC" "xyzabcdefgh" :START2 3 :END2 8) EQL-OK: 3 (STRING-NOT-GREATERP "ABC" "xyzabcdefgh" :START2 3 :END2 5) EQL-OK: NIL (STRING-NOT-GREATERP "abcdefgh" "") EQL-OK: NIL (STRING-NOT-GREATERP "Abcdefgh" "a") EQL-OK: NIL (STRING-NOT-GREATERP "ABCdefgh" "abc") EQL-OK: NIL (STRING-NOT-GREATERP "ABCdefgh" "cabc") EQL-OK: 0 (STRING-NOT-GREATERP "ABCdefgh" "xyzabc") EQL-OK: 0 (STRING-NOT-GREATERP "xyzABCdefgh" "abc") EQL-OK: NIL (STRING-NOT-GREATERP "abcdeFgh" "abcdefgh" :END2 4) EQL-OK: NIL (STRING-NOT-GREATERP "xyzABC" "abcdefgh" :START2 3) EQL-OK: NIL (STRING-NOT-GREATERP "ABC" "xyzabcdefgh" :START2 3) EQL-OK: 3 (STRING-NOT-GREATERP "ABC" "xyzabcdefgh" :START2 3 :END2 8) EQL-OK: 3 (STRING-NOT-GREATERP "ABC" "xyzabcdefgh" :START2 3 :END2 5) EQL-OK: NIL (STRING-NOT-GREATERP "abcDEF" "bcdefgh") EQL-OK: 0 (STRING-NOT-GREATERP "abcDEF" "abcdefgh" :START2 2) EQL-OK: 0 (STRING-NOT-GREATERP "abcdef" "bngDAbcdef" :START2 9 :END2 5) [SIMPLE-ERROR]: STRING-NOT-GREATERP: :START2-index 9 must not be greater than :END2-index 5 EQL-OK: ERROR (STRING-NOT-LESSP "" "abcdefgh") EQL-OK: NIL (STRING-NOT-LESSP "a" "Abcdefgh") EQL-OK: NIL (STRING-NOT-LESSP "ABC" "abcdefgh") EQL-OK: NIL (STRING-NOT-LESSP "CABc" "abcdefgh") EQL-OK: 0 (STRING-NOT-LESSP "ABCdefgh" "abcdefgh") EQL-OK: 8 (STRING-NOT-LESSP "xyzABC" "abcdefgh") EQL-OK: 0 (STRING-NOT-LESSP "ABC" "xyzabcdefgh") EQL-OK: NIL (STRING-NOT-LESSP "ABCdefgh" "abcdefgh" :END1 4) EQL-OK: NIL (STRING-NOT-LESSP "xyzABC" "abcdefgh" :START1 3) EQL-OK: NIL (STRING-NOT-LESSP "ABC" "xyzabcdefgh" :START2 3) EQL-OK: NIL (STRING-NOT-LESSP "ABC" "xyzabcdefgh" :START2 3 :END2 8) EQL-OK: NIL (STRING-NOT-LESSP "ABC" "xyzabcdefgh" :START2 3 :END2 5) EQL-OK: 2 (STRING-NOT-LESSP "abcdefgh" "") EQL-OK: 0 (STRING-NOT-LESSP "Abcdefgh" "a") EQL-OK: 1 (STRING-NOT-LESSP "ABCdefgh" "abc") EQL-OK: 3 (STRING-NOT-LESSP "abCDEfgh" "cabc") EQL-OK: NIL (STRING-NOT-LESSP "aBCdefgh" "xyzabc") EQL-OK: NIL (STRING-NOT-LESSP "xyzABcdefgh" "abc") EQL-OK: 0 (STRING-NOT-LESSP "abCDEfgh" "abcdefgh" :END2 4) EQL-OK: 4 (STRING-NOT-LESSP "xyzABc" "abcdefgh" :START2 3) EQL-OK: 0 (STRING-NOT-LESSP "ABC" "xyzabcdefgh" :START2 3) EQL-OK: NIL (STRING-NOT-LESSP "ABC" "xyzabcdefgh" :START2 3 :END2 8) EQL-OK: NIL (STRING-NOT-LESSP "ABC" "xyzabcdefgh" :START2 3 :END2 5) EQL-OK: 2 (STRING-NOT-LESSP "bCDef" "abcdef") EQL-OK: 0 (STRING-NOT-LESSP "ABCdefghij" "abcdefgh" :START1 1) EQL-OK: 1 (STRING-NOT-LESSP "ghIjkl" "xyzabcd" :START2 6 :END2 4) [SIMPLE-ERROR]: STRING-NOT-LESSP: :START2-index 6 must not be greater than :END2-index 4 EQL-OK: ERROR (STRING-NOT-EQUAL "" "abcdefgh") EQL-OK: 0 (STRING-NOT-EQUAL "A" "abcdefgh") EQL-OK: 1 (STRING-NOT-EQUAL "ABc" "abcdefgh") EQL-OK: 3 (STRING-NOT-EQUAL "cABc" "abcdefgh") EQL-OK: 0 (STRING-NOT-EQUAL "ABCdefgh" "abcdefgh") EQL-OK: NIL (STRING-NOT-EQUAL "xyzABc" "abcdefgh") EQL-OK: 0 (STRING-NOT-EQUAL "ABC" "xyzabcdefgh") EQL-OK: 0 (STRING-NOT-EQUAL "ABCdefgh" "abcdefgh" :END1 4) EQL-OK: 4 (STRING-NOT-EQUAL "xyzaBC" "abcdefgh" :START1 3) EQL-OK: 6 (STRING-NOT-EQUAL "ABC" "xyzabcdefgh" :START2 3) EQL-OK: 3 (STRING-NOT-EQUAL "ABC" "xyzabcdefgh" :START2 3 :END2 8) EQL-OK: 3 (STRING-NOT-EQUAL "ABC" "xyzabcdefgh" :START2 3 :END2 5) EQL-OK: 2 (STRING-NOT-EQUAL "abcdefgh" "") EQL-OK: 0 (STRING-NOT-EQUAL "Abcdefgh" "a") EQL-OK: 1 (STRING-NOT-EQUAL "aBCdefgh" "abc") EQL-OK: 3 (STRING-NOT-EQUAL "abcdefgh" "cABc") EQL-OK: 0 (STRING-NOT-EQUAL "abcdefgh" "xyzAbc") EQL-OK: 0 (STRING-NOT-EQUAL "xyzabcdefgh" "ABC") EQL-OK: 0 (STRING-NOT-EQUAL "abcdefgh" "abcDEFgh" :END2 4) EQL-OK: 4 (STRING-NOT-EQUAL "xyzabc" "aBCDefgh" :START2 3) EQL-OK: 0 (STRING-NOT-EQUAL "abc" "xyzABCdefgh" :START2 3) EQL-OK: 3 (STRING-NOT-EQUAL "abc" "xyzABCdefgh" :START2 3 :END2 8) EQL-OK: 3 (STRING-NOT-EQUAL "abc" "xyzABCdefgh" :START2 3 :END2 5) EQL-OK: 2 (STRING/= "abcdefghi" "uvdEFmgnj" :START1 3 :END1 6 :START2 2 :END2 5) EQL-OK: 4 (STRING/= "abcdefg" "abcDEfg" :END2 4) EQL-OK: 3 (STRING/= "abcdef" "abCDef" :START1 1 :END1 4 :START2 4 :END2 1) [SIMPLE-ERROR]: STRING/=: :START2-index 4 must not be greater than :END2-index 1 EQL-OK: ERROR (STRING-TRIM '(#\Space #\Tab #\Newline) " garbanzo beans ") EQUAL-OK: "garbanzo beans" (STRING-TRIM " (*)" " ( *three(siily) words* ) ") EQUAL-OK: "three(siily) words" (STRING-TRIM 'A "ababa") [SIMPLE-TYPE-ERROR]: FIND: A is not a SEQUENCE EQL-OK: ERROR (STRING-TRIM '(A) "ababa") EQUAL-OK: "ababa" (STRING-TRIM "a" "ababa") EQUAL-OK: "bab" (STRING-TRIM "c e" " ceabceabce c") EQUAL-OK: "abceab" (STRING-TRIM '(#\a) "abcd") EQUAL-OK: "bcd" (STRING-TRIM '(#\a) "xyzabcd") EQUAL-OK: "xyzabcd" (STRING-TRIM '(#\a) "abcda") EQUAL-OK: "bcd" (STRING-LEFT-TRIM '(#\Space #\Tab #\Newline) " garbanzo beans ") EQUAL-OK: "garbanzo beans " (STRING-LEFT-TRIM " (*)" " ( *three(siily) words* ) ") EQUAL-OK: "three(siily) words* ) " (STRING-LEFT-TRIM 'A "ababa") [SIMPLE-TYPE-ERROR]: FIND: A is not a SEQUENCE EQL-OK: ERROR (STRING-LEFT-TRIM '(A) "ababa") EQUAL-OK: "ababa" (STRING-LEFT-TRIM "a" "ababa") EQUAL-OK: "baba" (STRING-LEFT-TRIM "c e" " ceabceabce c") EQUAL-OK: "abceabce c" (STRING-LEFT-TRIM '(#\a) "abcd") EQUAL-OK: "bcd" (STRING-LEFT-TRIM '(#\a) "xyzabcd") EQUAL-OK: "xyzabcd" (STRING-LEFT-TRIM '(#\a) "abcda") EQUAL-OK: "bcda" (STRING-RIGHT-TRIM '(#\Space #\Tab #\Newline) " garbanzo beans ") EQUAL-OK: " garbanzo beans" (STRING-RIGHT-TRIM " (*)" " ( *three(siily) words* ) ") EQUAL-OK: " ( *three(siily) words" (STRING-RIGHT-TRIM 'A "ababa") [SIMPLE-TYPE-ERROR]: FIND: A is not a SEQUENCE EQL-OK: ERROR (STRING-RIGHT-TRIM '(A) "ababa") EQUAL-OK: "ababa" (STRING-RIGHT-TRIM "a" "ababa") EQUAL-OK: "abab" (STRING-RIGHT-TRIM "c e" " ceabceabce c") EQUAL-OK: " ceabceab" (STRING-RIGHT-TRIM '(#\a) "abcd") EQUAL-OK: "abcd" (STRING-RIGHT-TRIM '(#\a) "xyzabcd") EQUAL-OK: "xyzabcd" (STRING-RIGHT-TRIM '(#\a) "abcda") EQUAL-OK: "abcd" (STRING-UPCASE "abCD efGh-ij") EQUAL-OK: "ABCD EFGH-IJ" (STRING-UPCASE "abCD efGh-ij" :START 5) EQUAL-OK: "abCD EFGH-IJ" (STRING-UPCASE "abCD efGh-ij" :END 5) EQUAL-OK: "ABCD efGh-ij" (STRING-UPCASE "abCD efGh-ij" :START 1 :END 6) EQUAL-OK: "aBCD EfGh-ij" (STRING-UPCASE "abCD efGh-ij" :START 6 :END 1) [SIMPLE-ERROR]: STRING-UPCASE: :START-index 6 must not be greater than :END-index 1 EQL-OK: ERROR (STRING-UPCASE "abCD efGh-ij" :START 3 :END 3) EQUAL-OK: "abCD efGh-ij" (STRING-DOWNCASE "abCD efGh-ij") EQUAL-OK: "abcd efgh-ij" (STRING-DOWNCASE "abCD efGh-ij" :START 3) EQUAL-OK: "abCd efgh-ij" (STRING-DOWNCASE "abCD efGh-ij" :END 3) EQUAL-OK: "abcD efGh-ij" (STRING-DOWNCASE "abCD efGh-ij" :START 3 :END 3) EQUAL-OK: "abCD efGh-ij" (STRING-DOWNCASE "abCD efGh-ij" :START 1 :END 6) EQUAL-OK: "abcd efGh-ij" (STRING-DOWNCASE "abCD efGh-ij" :START 6 :END 1) [SIMPLE-ERROR]: STRING-DOWNCASE: :START-index 6 must not be greater than :END-index 1 EQL-OK: ERROR (STRING-CAPITALIZE "abcd def g hi") EQUAL-OK: "Abcd Def G Hi" (STRING-CAPITALIZE "abCd dEf G hi") EQUAL-OK: "Abcd Def G Hi" (STRING-CAPITALIZE "Abcd Def G Hi") EQUAL-OK: "Abcd Def G Hi" (STRING-CAPITALIZE "abcd def g hi" :START 6) EQUAL-OK: "abcd dEf G Hi" (STRING-CAPITALIZE "abcd def g hi" :END 6) EQUAL-OK: "Abcd Def g hi" (STRING-CAPITALIZE "abcd def g hi" :START 2 :END 10) EQUAL-OK: "abCd Def G hi" (STRING-CAPITALIZE "abcd def g hi" :START 10 :END 2) [SIMPLE-ERROR]: STRING-CAPITALIZE: :START-index 10 must not be greater than :END-index 2 EQL-OK: ERROR (STRING-CAPITALIZE "don't") EQUAL-OK: "Don'T" (STRING-CAPITALIZE "DON'T") EQUAL-OK: "Don'T" (STRING-CAPITALIZE "34a 5BC") EQUAL-OK: "34a 5bc" (STRING 65) [SIMPLE-TYPE-ERROR]: STRING: argument 65 should be a string, a symbol or a character EQL-OK: ERROR (STRING 'A) EQUAL-OK: "A" (STRING #\a) EQUAL-OK: "a" (STRING "abc") EQUAL-OK: "abc" (NSTRING-UPCASE "abCD efGh-ij") EQUAL-OK: "ABCD EFGH-IJ" (NSTRING-UPCASE "abCD efGh-ij" :START 5) EQUAL-OK: "abCD EFGH-IJ" (NSTRING-UPCASE "abCD efGh-ij" :END 5) EQUAL-OK: "ABCD efGh-ij" (NSTRING-UPCASE "abCD efGh-ij" :START6 :END 1) [SIMPLE-PROGRAM-ERROR]: NSTRING-UPCASE: keyword arguments in (:START6 :END 1) should occur pairwise EQL-OK: ERROR (NSTRING-UPCASE "abCD efGh-ij" :START 3 :END 3) EQUAL-OK: "abCD efGh-ij" (NSTRING-DOWNCASE "abCD efGh-ij") EQUAL-OK: "abcd efgh-ij" (NSTRING-DOWNCASE "abCD efGh-ij" :START 3) EQUAL-OK: "abCd efgh-ij" (NSTRING-UPCASE "abCD efGh-ij" :START 1 :END 6) EQUAL-OK: "aBCD EfGh-ij" (NSTRING-DOWNCASE "abCD efGh-ij" :END 3) EQUAL-OK: "abcD efGh-ij" (NSTRING-DOWNCASE "abCd efGh-ij" :START 3 :END 3) EQUAL-OK: "abCd efGh-ij" (NSTRING-DOWNCASE "abCd efGh-ij" :START 1 :END 6) EQUAL-OK: "abcd efGh-ij" (NSTRING-DOWNCASE "abCD efGh-ij" :START 6 :END 1) [SIMPLE-ERROR]: NSTRING-DOWNCASE: :START-index 6 must not be greater than :END-index 1 EQL-OK: ERROR (NSTRING-DOWNCASE "abCD efGh-ij" :START NIL :END NIL) [SIMPLE-TYPE-ERROR]: NSTRING-DOWNCASE: :START-index should be an integer, not NIL EQL-OK: ERROR (NSTRING-UPCASE "abDC efGh-oj") EQUAL-OK: "ABDC EFGH-OJ" (NSTRING-UPCASE "abCD efGh-ij" :START 1 :END 6) EQUAL-OK: "aBCD EfGh-ij" (NSTRING-UPCASE "abCD efGh-fg" :START 1 :END 6) EQUAL-OK: "aBCD EfGh-fg" (NSTRING-UPCASE "abCD efGh-ef" :START 3 :END 3) EQUAL-OK: "abCD efGh-ef" (NSTRING-UPCASE "abCD efGh-ef" :START 3 :END 3) EQUAL-OK: "abCD efGh-ef" (NSTRING-UPCASE "abCD efGh-ef" :START 3 :END 3) EQUAL-OK: "abCD efGh-ef" (NSTRING-UPCASE "abCD efGh-ef" :START 3 :END 1) [SIMPLE-ERROR]: NSTRING-UPCASE: :START-index 3 must not be greater than :END-index 1 EQL-OK: ERROR (NSTRING-UPCASE "abCD efGh-ef" :START NIL :END NIL) [SIMPLE-TYPE-ERROR]: NSTRING-UPCASE: :START-index should be an integer, not NIL EQL-OK: ERROR (NSTRING-DOWNCASE "saBG efGh-ef") EQUAL-OK: "sabg efgh-ef" (NSTRING-DOWNCASE "dfGV efGh-ef" :START 1 :END 6) EQUAL-OK: "dfgv efGh-ef" (NSTRING-DOWNCASE "fgCD efGf-ef" :START 1 :END 3) EQUAL-OK: "fgcD efGf-ef" (NSTRING-DOWNCASE "dfCF edFg-fg" :START NIL :END NIL) [SIMPLE-TYPE-ERROR]: NSTRING-DOWNCASE: :START-index should be an integer, not NIL EQL-OK: ERROR (NSTRING-DOWNCASE "fgHG edgf-fg" :START 5 :END 1) [SIMPLE-ERROR]: NSTRING-DOWNCASE: :START-index 5 must not be greater than :END-index 1 EQL-OK: ERROR (NSTRING-DOWNCASE "scDF edFG-ef" :START 1) EQUAL-OK: "scdf edfg-ef" (NSTRING-DOWNCASE "fgHG edFG-ef" :END 4) EQUAL-OK: "fghg edFG-ef" (NSTRING-CAPITALIZE "fg hgf fgh") EQUAL-OK: "Fg Hgf Fgh" (LET ((X "ABCDEF")) (NSTRING-DOWNCASE X) X) EQUAL-OK: "abcdef" (LET* ((S "abcdefgh") (D (MAKE-ARRAY 5 :DISPLACED-TO S :DISPLACED-INDEX-OFFSET 3 :ELEMENT-TYPE (ARRAY-ELEMENT-TYPE S)))) (STRING-UPCASE D :START 2 :END 4)) EQUAL-OK: "deFGh" (LET* ((S "abcdefgh") (D (MAKE-ARRAY 5 :DISPLACED-TO S :DISPLACED-INDEX-OFFSET 3 :ELEMENT-TYPE (ARRAY-ELEMENT-TYPE S)))) (AND (EQ (NSTRING-UPCASE D :START 2 :END 4) D) D)) EQUAL-OK: "deFGh" (NSTRING-UPCASE (MAKE-ARRAY 0 :ELEMENT-TYPE NIL)) EQUAL-OK: "" (LET* ((S (FORMAT NIL "A~CB" (CODE-CHAR 0))) (D (MAKE-ARRAY 2 :DISPLACED-TO S :DISPLACED-INDEX-OFFSET 1 :ELEMENT-TYPE 'CHARACTER))) (LIST (STRING-WIDTH S :START 0 :END 1) (STRING-WIDTH S :START 1 :END 2) (STRING-WIDTH S :START 2 :END 3) (STRING-WIDTH S :START 0 :END 2) (STRING-WIDTH S :START 0 :END 3) (STRING-WIDTH S :START 1 :END 3) (STRING-WIDTH D :START 0 :END 1) (STRING-WIDTH D :START 1 :END 2) (STRING-WIDTH D :START 0 :END 2) (STRING-WIDTH D))) EQUAL-OK: (1 0 1 1 2 1 0 1 1 1) (SETQ X (MAKE-ARRAY 10 :FILL-POINTER 5 :ELEMENT-TYPE 'CHARACTER :INITIAL-CONTENTS "abcdefghij")) EQUAL-OK: "abcde" (CHAR X 7) EQL-OK: #\h (ELT X 7) [SIMPLE-TYPE-ERROR]: ELT: index 7 for "abcde" is out of range EQL-OK: ERROR (SETF (CHAR X 7) #\H) EQL-OK: #\H (CHAR X 7) EQL-OK: #\H (REVERSE X) EQUAL-OK: "edcba" (NREVERSE X) EQUAL-OK: "edcba" X EQUAL-OK: "edcba" (LET* ((X (MAKE-ARRAY 10 :FILL-POINTER 4 :ELEMENT-TYPE 'CHARACTER :INITIAL-ELEMENT #\Space :ADJUSTABLE T)) (Y (MAKE-ARRAY 10 :FILL-POINTER 4 :ELEMENT-TYPE 'CHARACTER :DISPLACED-TO X))) (ADJUST-ARRAY X '(5)) (CHAR Y 5)) [SIMPLE-ERROR]: An array has been shortened by adjusting it while another array was displaced to it. EQL-OK: ERROR (LENGTH (ADJUST-ARRAY (MAKE-ARRAY 0 :ELEMENT-TYPE 'CHARACTER :ADJUSTABLE T) 1)) EQL-OK: 1 (LET ((S (MAKE-ARRAY 10 :ELEMENT-TYPE 'CHARACTER :INITIAL-ELEMENT #\a))) (LIST (MULTIPLE-VALUE-LIST (SYSTEM::STRING-INFO S)) (PROGN (SETF (AREF S 3) (CODE-CHAR 12345)) (MULTIPLE-VALUE-LIST (SYSTEM::STRING-INFO S))) (PROGN (GC) (MULTIPLE-VALUE-LIST (SYSTEM::STRING-INFO S))) (PROGN (SETF (AREF S 3) (CODE-CHAR 123456)) (MULTIPLE-VALUE-LIST (SYSTEM::STRING-INFO S))) (PROGN (GC) (MULTIPLE-VALUE-LIST (SYSTEM::STRING-INFO S))))) EQUAL-OK: ((8 NIL NIL) (16 NIL T) (16 NIL NIL) (32 NIL T) (32 NIL NIL)) (LENGTH (MAKE-ARRAY '3 :ELEMENT-TYPE 'CHARACTER :INITIAL-CONTENTS '(#\U65E5 #\U672C #\U8A9E))) EQL-OK: 3 (LET ((X (MAKE-ARRAY '(3 3) :ELEMENT-TYPE 'CHARACTER :INITIAL-CONTENTS '((#\U65E5 #\U672C #\U8A9E) (#\T #\LATIN_SMALL_LETTER_U_WITH_DIAERESIS #\r) (#\k #\LATIN_SMALL_LETTER_C_WITH_CEDILLA #\e))))) (GC) (ARRAY-DIMENSIONS X)) EQUAL-OK: (3 3) (SYMBOLP (MAKE-SYMBOL (MAKE-ARRAY 0 :ELEMENT-TYPE NIL))) EQL-OK: T (STRING= "" (MAKE-ARRAY 0 :ELEMENT-TYPE NIL)) EQL-OK: T (STRING-INVERTCASE "AbCdEfGh" :START 1 :END 5) EQUAL-OK: "ABcDefGh" (TRIM-IF #'SYSTEM::WHITESPACEP " asdf ") EQUAL-OK: "asdf" (PROGN (SYMBOL-CLEANUP 'X)) EQL-OK: T RUN-TEST: finished "strings" (0 errors out of 409 tests) RUN-TEST: started # (DEFUN TESTVAR (VAR) (LIST (BOUNDP VAR) (IF (BOUNDP VAR) (SYMBOL-VALUE VAR) NIL) (CONSTANTP VAR) (AND (SPECIAL-VARIABLE-P VAR) (NOT (CONSTANTP VAR))) (AND (FBOUNDP VAR) T) (AND (FBOUNDP VAR) (MACRO-FUNCTION VAR) T) (AND (FBOUNDP VAR) (SPECIAL-OPERATOR-P VAR) T) (AND (OR (GET VAR 'I1) (GET VAR 'I2) (GET VAR 'I3)) T) (GET VAR 'I1) (GET VAR 'I2) (GET VAR 'I3))) EQL-OK: TESTVAR (SYMBOL-CLEANUP 'V1) EQL-OK: T (TESTVAR 'V1) EQUAL-OK: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) (SETQ V1 'VAL) EQL-OK: VAL (TESTVAR 'V1) EQUAL-OK: (T VAL NIL NIL NIL NIL NIL NIL NIL NIL NIL) (MAKUNBOUND 'V1) EQL-OK: V1 (TESTVAR 'V1) EQUAL-OK: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) (SETQ V1 'VAL2) EQL-OK: VAL2 (TESTVAR 'V1) EQUAL-OK: (T VAL2 NIL NIL NIL NIL NIL NIL NIL NIL NIL) (DEFMACRO V1 (X) (LIST 'QUOTE X)) EQL-OK: V1 (TESTVAR 'V1) EQUAL-OK: (T VAL2 NIL NIL T T NIL NIL NIL NIL NIL) (FMAKUNBOUND 'V1) EQL-OK: V1 (TESTVAR 'V1) EQUAL-OK: (T VAL2 NIL NIL NIL NIL NIL NIL NIL NIL NIL) (DEFMACRO V1 (X) (LIST 'QUOTE (LIST X X))) EQL-OK: V1 (V1 33) EQUAL-OK: (33 33) (TESTVAR 'V1) EQUAL-OK: (T VAL2 NIL NIL T T NIL NIL NIL NIL NIL) (MAKUNBOUND 'V1) EQL-OK: V1 (TESTVAR 'V1) EQUAL-OK: (NIL NIL NIL NIL T T NIL NIL NIL NIL NIL) (SETQ V1 'VAL3) EQL-OK: VAL3 (TESTVAR 'V1) EQUAL-OK: (T VAL3 NIL NIL T T NIL NIL NIL NIL NIL) (SETF (GET 'V1 'I1) 11) EQL-OK: 11 (SETF (GET 'V1 'I2) 22) EQL-OK: 22 (SETF (GET 'V1 'I3) 33) EQL-OK: 33 (TESTVAR 'V1) EQUAL-OK: (T VAL3 NIL NIL T T NIL T 11 22 33) (NOT (NULL (REMPROP 'V1 'I2))) EQL-OK: T (NOT (NULL (REMPROP 'V1 'I1))) EQL-OK: T (NOT (NULL (REMPROP 'V1 'I3))) EQL-OK: T (FMAKUNBOUND 'V1) EQL-OK: V1 (MAKUNBOUND 'V1) EQL-OK: V1 (TESTVAR 'V1) EQUAL-OK: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) (SETF (GET 'V1 'I1) 99) EQL-OK: 99 (DEFMACRO V1 (X) (LIST 'QUOTE (LIST X X X))) EQL-OK: V1 (V1 A) EQUAL-OK: (A A A) (SETQ V1 'VAL4) EQL-OK: VAL4 (TESTVAR 'V1) EQUAL-OK: (T VAL4 NIL NIL T T NIL T 99 NIL NIL) (SYMBOL-CLEANUP 'V1) EQL-OK: T (TESTVAR 'V1) EQUAL-OK: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) (SYMBOL-CLEANUP 'V2) EQL-OK: T (DEFVAR V2 'V2A) EQL-OK: V2 (TESTVAR 'V2) EQUAL-OK: (T V2A NIL T NIL NIL NIL NIL NIL NIL NIL) (SETF (GET 'V2 'I3) 33) EQL-OK: 33 (SETF (GET 'V2 'I2) 22) EQL-OK: 22 (SETF (GET 'V2 'I1) 11) EQL-OK: 11 (TESTVAR 'V2) EQUAL-OK: (T V2A NIL T NIL NIL NIL T 11 22 33) (MAKUNBOUND 'V2) EQL-OK: V2 (NOT (NULL (REMPROP 'V2 'I1))) EQL-OK: T (NOT (NULL (REMPROP 'V2 'I2))) EQL-OK: T (NOT (NULL (REMPROP 'V2 'I3))) EQL-OK: T (TESTVAR 'V2) EQUAL-OK: (NIL NIL NIL T NIL NIL NIL NIL NIL NIL NIL) (DEFVAR V2 'V2B) EQL-OK: V2 (SETF (GET 'V2 'I1) 111) EQL-OK: 111 (SETF (GET 'V2 'I2) 222) EQL-OK: 222 (SETF (GET 'V2 'I3) 333) EQL-OK: 333 (TESTVAR 'V2) EQUAL-OK: (T V2B NIL T NIL NIL NIL T 111 222 333) (DEFUN V2 (X) (LIST X X)) EQL-OK: V2 (V2 44) EQUAL-OK: (44 44) (TESTVAR 'V2) EQUAL-OK: (T V2B NIL T T NIL NIL T 111 222 333) (SYMBOL-CLEANUP 'V2) EQL-OK: T (TESTVAR 'V2) EQUAL-OK: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) (SYMBOL-CLEANUP 'V3) EQL-OK: T (DEFUN V3 (X Y) (LIST X Y)) EQL-OK: V3 (TESTVAR 'V3) EQUAL-OK: (NIL NIL NIL NIL T NIL NIL NIL NIL NIL NIL) (DEFCONSTANT V3 99) EQL-OK: V3 V3 EQL-OK: 99 (V3 'A 'B) EQUAL-OK: (A B) (TESTVAR 'V3) EQUAL-OK: (T 99 T NIL T NIL NIL NIL NIL NIL NIL) (MAKUNBOUND 'V3) [SIMPLE-SOURCE-PROGRAM-ERROR]: MAKUNBOUND: V3 is a constant, may not be used as a variable EQL-OK: ERROR (FMAKUNBOUND 'V3) EQL-OK: V3 (DEFCONSTANT V3 999) WARNING: (DEFCONSTANT V3 999) redefines the constant V3. Its old value was 99. EQL-OK: V3 (DEFUN V3 (X) (LIST X X)) EQL-OK: V3 (V3 'C) EQUAL-OK: (C C) V3 EQL-OK: 999 (TESTVAR 'V3) EQUAL-OK: (T 999 T NIL T NIL NIL NIL NIL NIL NIL) (DEFPARAMETER VAR33) [SIMPLE-SOURCE-PROGRAM-ERROR]: The macro DEFPARAMETER may not be called with 1 arguments: #1=(DEFPARAMETER VAR33) EQL-OK: ERROR (DEFPARAMETER VAR3 99) EQL-OK: VAR3 VAR3 EQL-OK: 99 (TESTVAR 'VAR3) EQUAL-OK: (T 99 NIL T NIL NIL NIL NIL NIL NIL NIL) (MAKUNBOUND 'VAR3) EQL-OK: VAR3 (TESTVAR 'VAR3) EQUAL-OK: (NIL NIL NIL T NIL NIL NIL NIL NIL NIL NIL) (SETF (GET 'V3 'I2) 222) EQL-OK: 222 (SETF (GET 'V3 'I1) 111) EQL-OK: 111 (TESTVAR 'V3) EQUAL-OK: (T 999 T NIL T NIL NIL T 111 222 NIL) (SYMBOL-CLEANUP 'V3) EQL-OK: T (TESTVAR 'V3) EQUAL-OK: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) (SYMBOL-CLEANUP 'V4) EQL-OK: T (DEFUN V4 (X) X) EQL-OK: V4 (V4 55) EQL-OK: 55 (TESTVAR 'V4) EQUAL-OK: (NIL NIL NIL NIL T NIL NIL NIL NIL NIL NIL) (FMAKUNBOUND 'V4) EQL-OK: V4 (TESTVAR 'V4) EQUAL-OK: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) (DEFUN V4 (X) (LIST X)) EQL-OK: V4 (V4 88) EQUAL-OK: (88) (TESTVAR 'V4) EQUAL-OK: (NIL NIL NIL NIL T NIL NIL NIL NIL NIL NIL) (SETF (GET 'V4 'I1) 11) EQL-OK: 11 (SETF (GET 'V4 'I2) 22) EQL-OK: 22 (TESTVAR 'V4) EQUAL-OK: (NIL NIL NIL NIL T NIL NIL T 11 22 NIL) (FMAKUNBOUND 'V4) EQL-OK: V4 (NOT (NULL (REMPROP 'V4 'I1))) EQL-OK: T (NOT (NULL (REMPROP 'V4 'I2))) EQL-OK: T (TESTVAR 'V4) EQUAL-OK: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) (DEFUN V4 (X) (LIST X X X)) EQL-OK: V4 (V4 44) EQUAL-OK: (44 44 44) (SETF (GET 'V4 'I2) 222) EQL-OK: 222 (SETF (GET 'V4 'I3) 333) EQL-OK: 333 (TESTVAR 'V4) EQUAL-OK: (NIL NIL NIL NIL T NIL NIL T NIL 222 333) (DEFVAR V4 'V4-VALUE) EQL-OK: V4 (TESTVAR 'V4) EQUAL-OK: (T V4-VALUE NIL T T NIL NIL T NIL 222 333) (SYMBOL-CLEANUP 'V4) EQL-OK: T (TESTVAR 'V4) EQUAL-OK: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) (SYMBOL-CLEANUP 'V5) EQL-OK: T (SETF (GET 'V5 'I1) 1) EQL-OK: 1 (SETF (GET 'V5 'I2) 2) EQL-OK: 2 (TESTVAR 'V5) EQUAL-OK: (NIL NIL NIL NIL NIL NIL NIL T 1 2 NIL) (NOT (NULL (REMPROP 'V5 'I1))) EQL-OK: T (NOT (NULL (REMPROP 'V5 'I2))) EQL-OK: T (TESTVAR 'V5) EQUAL-OK: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) (SETF (GET 'V5 'I1) 11) EQL-OK: 11 (SETF (GET 'V5 'I2) 22) EQL-OK: 22 (TESTVAR 'V5) EQUAL-OK: (NIL NIL NIL NIL NIL NIL NIL T 11 22 NIL) (DEFCONSTANT V5 '123) EQL-OK: V5 (TESTVAR 'V5) EQUAL-OK: (T 123 T NIL NIL NIL NIL T 11 22 NIL) (MAKUNBOUND 'V5) [SIMPLE-SOURCE-PROGRAM-ERROR]: MAKUNBOUND: V5 is a constant, may not be used as a variable EQL-OK: ERROR (NOT (NULL (REMPROP 'V5 'I2))) EQL-OK: T (NOT (NULL (REMPROP 'V5 'I1))) EQL-OK: T (DEFCONSTANT V5 321) WARNING: (DEFCONSTANT V5 321) redefines the constant V5. Its old value was 123 . EQL-OK: V5 (SETF (GET 'V5 'I3) 333) EQL-OK: 333 (SETF (GET 'V5 'I2) 222) EQL-OK: 222 (TESTVAR 'V5) EQUAL-OK: (T 321 T NIL NIL NIL NIL T NIL 222 333) (DEFUN V5 (X) X) EQL-OK: V5 (V5 666) EQL-OK: 666 (TESTVAR 'V5) EQUAL-OK: (T 321 T NIL T NIL NIL T NIL 222 333) (SYMBOL-CLEANUP 'V5) EQL-OK: T (TESTVAR 'V5) EQUAL-OK: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) (SYMBOL-CLEANUP 'V6) EQL-OK: T (SETF (GET 'V6 'I1) 1) EQL-OK: 1 (SETF (GET 'V6 'I3) 3) EQL-OK: 3 (TESTVAR 'V6) EQUAL-OK: (NIL NIL NIL NIL NIL NIL NIL T 1 NIL 3) (DEFMACRO V6 (X) (LIST 'QUOTE X)) EQL-OK: V6 (V6 A) EQL-OK: A (TESTVAR 'V6) EQUAL-OK: (NIL NIL NIL NIL T T NIL T 1 NIL 3) (DEFCONSTANT V6 234) EQL-OK: V6 (TESTVAR 'V6) EQUAL-OK: (T 234 T NIL T T NIL T 1 NIL 3) (SYMBOL-CLEANUP 'V6) EQL-OK: T (TESTVAR 'V6) EQUAL-OK: (NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL) (PROGN (MAPC #'UNINTERN '(V1 V2 V3 V4 V5 V6)) T) EQL-OK: T (EVAL (READ-FROM-STRING ":abazonk-does-not-exist-yet-0")) EQL-OK: :ABAZONK-DOES-NOT-EXIST-YET-0 :ABAZONK-DOES-NOT-EXIST-YET-0A EQL-OK: :ABAZONK-DOES-NOT-EXIST-YET-0A (EVAL (READ-FROM-STRING "keyword::abazonk-does-not-exist-yet-1")) EQL-OK: :ABAZONK-DOES-NOT-EXIST-YET-1 :ABAZONK-DOES-NOT-EXIST-YET-1A EQL-OK: :ABAZONK-DOES-NOT-EXIST-YET-1A (HANDLER-CASE (READ-FROM-STRING "keyword:abazonk-does-not-exist-yet-2") (PACKAGE-ERROR NIL T) (:NO-ERROR NIL NIL)) EQL-OK: T (LET ((L (APROPOS-LIST "ABAZONK-DOES-NOT-EXIST-YET"))) (MAPC #'UNINTERN L) (LENGTH L)) EQL-OK: 4 (SYMBOLS-CLEANUP '(TESTVAR V1 V2 V3 V4 V5 V6 VAR3 VAR33)) EQL-OK: NIL RUN-TEST: finished "symbol10" (0 errors out of 152 tests) RUN-TEST: started # (SYMBOL-NAME 'XYZ) EQUAL-OK: "XYZ" (PROGN (SETQ *GENSYM-COUNTER* 32) (GENSYM) T) EQL-OK: T (PRIN1-TO-STRING (GENSYM "FOO-")) EQUAL-OK: "#:FOO-33" (PRIN1-TO-STRING (GENSYM "garbage-")) EQUAL-OK: "#:|garbage-34|" (LET* ((CL-SYMBOLS-REQUIRED '(&ALLOW-OTHER-KEYS *PRINT-MISER-WIDTH* &AUX *PRINT-PPRINT-DISPATCH* &BODY *PRINT-PRETTY* &ENVIRONMENT *PRINT-RADIX* &KEY *PRINT-READABLY* &OPTIONAL *PRINT-RIGHT-MARGIN* &REST *QUERY-IO* &WHOLE *RANDOM-STATE* * *READ-BASE* ** *READ-DEFAULT-FLOAT-FORMAT* *** *READ-EVAL* *BREAK-ON-SIGNALS* *READ-SUPPRESS* *COMPILE-FILE-PATHNAME* *READTABLE* *COMPILE-FILE-TRUENAME* *STANDARD-INPUT* *COMPILE-PRINT* *STANDARD-OUTPUT* *COMPILE-VERBOSE* *TERMINAL-IO* *DEBUG-IO* *TRACE-OUTPUT* *DEBUGGER-HOOK* + *DEFAULT-PATHNAME-DEFAULTS* ++ *ERROR-OUTPUT* +++ *FEATURES* - *GENSYM-COUNTER* / *LOAD-PATHNAME* // *LOAD-PRINT* /// *LOAD-TRUENAME* /= *LOAD-VERBOSE* 1+ *MACROEXPAND-HOOK* 1- *MODULES* < *PACKAGE* <= *PRINT-ARRAY* = *PRINT-BASE* > *PRINT-CASE* >= *PRINT-CIRCLE* ABORT *PRINT-ESCAPE* ABS *PRINT-GENSYM* ACONS *PRINT-LENGTH* ACOS *PRINT-LEVEL* ACOSH *PRINT-LINES* ADD-METHOD ADJOIN ATOM BOUNDP ADJUST-ARRAY BASE-CHAR BREAK ADJUSTABLE-ARRAY-P BASE-STRING BROADCAST-STREAM ALLOCATE-INSTANCE BIGNUM BROADCAST-STREAM-STREAMS ALPHA-CHAR-P BIT BUILT-IN-CLASS ALPHANUMERICP BIT-AND BUTLAST AND BIT-ANDC1 BYTE APPEND BIT-ANDC2 BYTE-POSITION APPLY BIT-EQV BYTE-SIZE APROPOS BIT-IOR CAAAAR APROPOS-LIST BIT-NAND CAAADR AREF BIT-NOR CAAAR ARITHMETIC-ERROR BIT-NOT CAADAR ARITHMETIC-ERROR-OPERANDS BIT-ORC1 CAADDR ARITHMETIC-ERROR-OPERATION BIT-ORC2 CAADR ARRAY BIT-VECTOR CAAR ARRAY-DIMENSION BIT-VECTOR-P CADAAR ARRAY-DIMENSION-LIMIT BIT-XOR CADADR ARRAY-DIMENSIONS BLOCK CADAR ARRAY-DISPLACEMENT BOOLE CADDAR ARRAY-ELEMENT-TYPE BOOLE-1 CADDDR ARRAY-HAS-FILL-POINTER-P BOOLE-2 CADDR ARRAY-IN-BOUNDS-P BOOLE-AND CADR ARRAY-RANK BOOLE-ANDC1 CALL-ARGUMENTS-LIMIT ARRAY-RANK-LIMIT BOOLE-ANDC2 CALL-METHOD ARRAY-ROW-MAJOR-INDEX BOOLE-C1 CALL-NEXT-METHOD ARRAY-TOTAL-SIZE BOOLE-C2 CAR ARRAY-TOTAL-SIZE-LIMIT BOOLE-CLR CASE ARRAYP BOOLE-EQV CATCH ASH BOOLE-IOR CCASE ASIN BOOLE-NAND CDAAAR ASINH BOOLE-NOR CDAADR ASSERT BOOLE-ORC1 CDAAR ASSOC BOOLE-ORC2 CDADAR ASSOC-IF BOOLE-SET CDADDR ASSOC-IF-NOT BOOLE-XOR CDADR ATAN BOOLEAN CDAR ATANH BOTH-CASE-P CDDAAR CDDADR CLEAR-INPUT COPY-TREE CDDAR CLEAR-OUTPUT COS CDDDAR CLOSE COSH CDDDDR CLRHASH COUNT CDDDR CODE-CHAR COUNT-IF CDDR COERCE COUNT-IF-NOT CDR COMPILATION-SPEED CTYPECASE CEILING COMPILE DEBUG CELL-ERROR COMPILE-FILE DECF CELL-ERROR-NAME COMPILE-FILE-PATHNAME DECLAIM CERROR COMPILED-FUNCTION DECLARATION CHANGE-CLASS COMPILED-FUNCTION-P DECLARE CHAR COMPILER-MACRO DECODE-FLOAT CHAR-CODE COMPILER-MACRO-FUNCTION DECODE-UNIVERSAL-TIME CHAR-CODE-LIMIT COMPLEMENT DEFCLASS CHAR-DOWNCASE COMPLEX DEFCONSTANT CHAR-EQUAL COMPLEXP DEFGENERIC CHAR-GREATERP COMPUTE-APPLICABLE-METHODS DEFINE-COMPILER-MACRO CHAR-INT COMPUTE-RESTARTS DEFINE-CONDITION CHAR-LESSP CONCATENATE DEFINE-METHOD-COMBINATION CHAR-NAME CONCATENATED-STREAM DEFINE-MODIFY-MACRO CHAR-NOT-EQUAL CONCATENATED-STREAM-STREAMS DEFINE-SETF-EXPANDER CHAR-NOT-GREATERP COND DEFINE-SYMBOL-MACRO CHAR-NOT-LESSP CONDITION DEFMACRO CHAR-UPCASE CONJUGATE DEFMETHOD CHAR/= CONS DEFPACKAGE CHAR< CONSP DEFPARAMETER CHAR<= CONSTANTLY DEFSETF CHAR= CONSTANTP DEFSTRUCT CHAR> CONTINUE DEFTYPE CHAR>= CONTROL-ERROR DEFUN CHARACTER COPY-ALIST DEFVAR CHARACTERP COPY-LIST DELETE CHECK-TYPE COPY-PPRINT-DISPATCH DELETE-DUPLICATES CIS COPY-READTABLE DELETE-FILE CLASS COPY-SEQ DELETE-IF CLASS-NAME COPY-STRUCTURE DELETE-IF-NOT CLASS-OF COPY-SYMBOL DELETE-PACKAGE DENOMINATOR EQ DEPOSIT-FIELD EQL DESCRIBE EQUAL DESCRIBE-OBJECT EQUALP DESTRUCTURING-BIND ERROR DIGIT-CHAR ETYPECASE DIGIT-CHAR-P EVAL DIRECTORY EVAL-WHEN DIRECTORY-NAMESTRING EVENP DISASSEMBLE EVERY DIVISION-BY-ZERO EXP DO EXPORT DO* EXPT DO-ALL-SYMBOLS EXTENDED-CHAR DO-EXTERNAL-SYMBOLS FBOUNDP DO-SYMBOLS FCEILING DOCUMENTATION FDEFINITION DOLIST FFLOOR DOTIMES FIFTH DOUBLE-FLOAT FILE-AUTHOR DOUBLE-FLOAT-EPSILON FILE-ERROR DOUBLE-FLOAT-NEGATIVE-EPSILON FILE-ERROR-PATHNAME DPB FILE-LENGTH DRIBBLE FILE-NAMESTRING DYNAMIC-EXTENT FILE-POSITION ECASE FILE-STREAM ECHO-STREAM FILE-STRING-LENGTH ECHO-STREAM-INPUT-STREAM FILE-WRITE-DATE ECHO-STREAM-OUTPUT-STREAM FILL ED FILL-POINTER EIGHTH FIND ELT FIND-ALL-SYMBOLS ENCODE-UNIVERSAL-TIME FIND-CLASS END-OF-FILE FIND-IF ENDP FIND-IF-NOT ENOUGH-NAMESTRING FIND-METHOD ENSURE-DIRECTORIES-EXIST ENSURE-GENERIC-FUNCTION FIND-PACKAGE FIND-RESTART FIND-SYMBOL GET-INTERNAL-RUN-TIME FINISH-OUTPUT GET-MACRO-CHARACTER FIRST GET-OUTPUT-STREAM-STRING FIXNUM GET-PROPERTIES FLET GET-SETF-EXPANSION FLOAT GET-UNIVERSAL-TIME FLOAT-DIGITS GETF FLOAT-PRECISION GETHASH FLOAT-RADIX GO FLOAT-SIGN GRAPHIC-CHAR-P FLOATING-POINT-INEXACT HANDLER-BIND FLOATING-POINT-INVALID-OPERATION HANDLER-CASE FLOATING-POINT-OVERFLOW HASH-TABLE FLOATING-POINT-UNDERFLOW HASH-TABLE-COUNT FLOATP HASH-TABLE-P FLOOR HASH-TABLE-REHASH-SIZE FMAKUNBOUND HASH-TABLE-REHASH-THRESHOLD FORCE-OUTPUT HASH-TABLE-SIZE FORMAT HASH-TABLE-TEST FORMATTER HOST-NAMESTRING FOURTH IDENTITY FRESH-LINE IF FROUND IGNORABLE FTRUNCATE IGNORE FTYPE IGNORE-ERRORS FUNCALL IMAGPART FUNCTION IMPORT FUNCTION-KEYWORDS IN-PACKAGE FUNCTION-LAMBDA-EXPRESSION INCF FUNCTIONP INITIALIZE-INSTANCE GCD INLINE GENERIC-FUNCTION INPUT-STREAM-P GENSYM INSPECT GENTEMP INTEGER GET INTEGER-DECODE-FLOAT GET-DECODED-TIME INTEGER-LENGTH GET-DISPATCH-MACRO-CHARACTER INTEGERP GET-INTERNAL-REAL-TIME INTERACTIVE-STREAM-P INTERN LISP-IMPLEMENTATION-TYPE INTERNAL-TIME-UNITS-PER-SECOND LISP-IMPLEMENTATION-VERSION INTERSECTION LIST INVALID-METHOD-ERROR LIST* INVOKE-DEBUGGER LIST-ALL-PACKAGES INVOKE-RESTART LIST-LENGTH INVOKE-RESTART-INTERACTIVELY LISTEN ISQRT LISTP KEYWORD LOAD KEYWORDP LOAD-LOGICAL-PATHNAME-TRANSLATIONS LABELS LOAD-TIME-VALUE LAMBDA LOCALLY LAMBDA-LIST-KEYWORDS LOG LAMBDA-PARAMETERS-LIMIT LOGAND LAST LOGANDC1 LCM LOGANDC2 LDB LOGBITP LDB-TEST LOGCOUNT LDIFF LOGEQV LEAST-NEGATIVE-DOUBLE-FLOAT LOGICAL-PATHNAME LEAST-NEGATIVE-LONG-FLOAT LOGICAL-PATHNAME-TRANSLATIONS LEAST-NEGATIVE-NORMALIZED-DOUBLE-FLOAT LOGIOR LEAST-NEGATIVE-NORMALIZED-LONG-FLOAT LOGNAND LEAST-NEGATIVE-NORMALIZED-SHORT-FLOAT LOGNOR LEAST-NEGATIVE-NORMALIZED-SINGLE-FLOAT LOGNOT LEAST-NEGATIVE-SHORT-FLOAT LOGORC1 LEAST-NEGATIVE-SINGLE-FLOAT LOGORC2 LEAST-POSITIVE-DOUBLE-FLOAT LOGTEST LEAST-POSITIVE-LONG-FLOAT LOGXOR LEAST-POSITIVE-NORMALIZED-DOUBLE-FLOAT LONG-FLOAT LEAST-POSITIVE-NORMALIZED-LONG-FLOAT LONG-FLOAT-EPSILON LEAST-POSITIVE-NORMALIZED-SHORT-FLOAT LONG-FLOAT-NEGATIVE-EPSILON LEAST-POSITIVE-NORMALIZED-SINGLE-FLOAT LONG-SITE-NAME LEAST-POSITIVE-SHORT-FLOAT LOOP LEAST-POSITIVE-SINGLE-FLOAT LOOP-FINISH LENGTH LOWER-CASE-P LET MACHINE-INSTANCE LET* MACHINE-TYPE MACHINE-VERSION MASK-FIELD MACRO-FUNCTION MAX MACROEXPAND MEMBER MACROEXPAND-1 MEMBER-IF MACROLET MEMBER-IF-NOT MAKE-ARRAY MERGE MAKE-BROADCAST-STREAM MERGE-PATHNAMES MAKE-CONCATENATED-STREAM METHOD MAKE-CONDITION METHOD-COMBINATION MAKE-DISPATCH-MACRO-CHARACTER METHOD-COMBINATION-ERROR MAKE-ECHO-STREAM METHOD-QUALIFIERS MAKE-HASH-TABLE MIN MAKE-INSTANCE MINUSP MAKE-INSTANCES-OBSOLETE MISMATCH MAKE-LIST MOD MAKE-LOAD-FORM MOST-NEGATIVE-DOUBLE-FLOAT MAKE-LOAD-FORM-SAVING-SLOTS MOST-NEGATIVE-FIXNUM MAKE-METHOD MOST-NEGATIVE-LONG-FLOAT MAKE-PACKAGE MOST-NEGATIVE-SHORT-FLOAT MAKE-PATHNAME MOST-NEGATIVE-SINGLE-FLOAT MAKE-RANDOM-STATE MOST-POSITIVE-DOUBLE-FLOAT MAKE-SEQUENCE MOST-POSITIVE-FIXNUM MAKE-STRING MOST-POSITIVE-LONG-FLOAT MAKE-STRING-INPUT-STREAM MOST-POSITIVE-SHORT-FLOAT MAKE-STRING-OUTPUT-STREAM MOST-POSITIVE-SINGLE-FLOAT MAKE-SYMBOL MUFFLE-WARNING MAKE-SYNONYM-STREAM MULTIPLE-VALUE-BIND MAKE-TWO-WAY-STREAM MULTIPLE-VALUE-CALL MAKUNBOUND MULTIPLE-VALUE-LIST MAP MULTIPLE-VALUE-PROG1 MAP-INTO MULTIPLE-VALUE-SETQ MAPC MULTIPLE-VALUES-LIMIT MAPCAN NAME-CHAR MAPCAR NAMESTRING MAPCON NBUTLAST MAPHASH NCONC MAPL NEXT-METHOD-P MAPLIST NIL NINTERSECTION PACKAGE-ERROR NINTH PACKAGE-ERROR-PACKAGE NO-APPLICABLE-METHOD PACKAGE-NAME NO-NEXT-METHOD PACKAGE-NICKNAMES NOT PACKAGE-SHADOWING-SYMBOLS NOTANY PACKAGE-USE-LIST NOTEVERY PACKAGE-USED-BY-LIST NOTINLINE PACKAGEP NRECONC PAIRLIS NREVERSE PARSE-ERROR NSET-DIFFERENCE PARSE-INTEGER NSET-EXCLUSIVE-OR PARSE-NAMESTRING NSTRING-CAPITALIZE PATHNAME NSTRING-DOWNCASE PATHNAME-DEVICE NSTRING-UPCASE PATHNAME-DIRECTORY NSUBLIS PATHNAME-HOST NSUBST PATHNAME-MATCH-P NSUBST-IF PATHNAME-NAME NSUBST-IF-NOT PATHNAME-TYPE NSUBSTITUTE PATHNAME-VERSION NSUBSTITUTE-IF PATHNAMEP NSUBSTITUTE-IF-NOT PEEK-CHAR NTH PHASE NTH-VALUE PI NTHCDR PLUSP NULL POP NUMBER POSITION NUMBERP POSITION-IF NUMERATOR POSITION-IF-NOT NUNION PPRINT ODDP PPRINT-DISPATCH OPEN PPRINT-EXIT-IF-LIST-EXHAUSTED OPEN-STREAM-P PPRINT-FILL OPTIMIZE PPRINT-INDENT OR PPRINT-LINEAR OTHERWISE PPRINT-LOGICAL-BLOCK OUTPUT-STREAM-P PPRINT-NEWLINE PACKAGE PPRINT-POP PPRINT-TAB READ-CHAR PPRINT-TABULAR READ-CHAR-NO-HANG PRIN1 READ-DELIMITED-LIST PRIN1-TO-STRING READ-FROM-STRING PRINC READ-LINE PRINC-TO-STRING READ-PRESERVING-WHITESPACE PRINT READ-SEQUENCE PRINT-NOT-READABLE READER-ERROR PRINT-NOT-READABLE-OBJECT READTABLE PRINT-OBJECT READTABLE-CASE PRINT-UNREADABLE-OBJECT READTABLEP PROBE-FILE REAL PROCLAIM REALP PROG REALPART PROG* REDUCE PROG1 REINITIALIZE-INSTANCE PROG2 REM PROGN REMF PROGRAM-ERROR REMHASH PROGV REMOVE PROVIDE REMOVE-DUPLICATES PSETF REMOVE-IF PSETQ REMOVE-IF-NOT PUSH REMOVE-METHOD PUSHNEW REMPROP QUOTE RENAME-FILE RANDOM RENAME-PACKAGE RANDOM-STATE REPLACE RANDOM-STATE-P REQUIRE RASSOC REST RASSOC-IF RESTART RASSOC-IF-NOT RESTART-BIND RATIO RESTART-CASE RATIONAL RESTART-NAME RATIONALIZE RETURN RATIONALP RETURN-FROM READ REVAPPEND READ-BYTE REVERSE ROOM SIMPLE-BIT-VECTOR ROTATEF SIMPLE-BIT-VECTOR-P ROUND SIMPLE-CONDITION ROW-MAJOR-AREF SIMPLE-CONDITION-FORMAT-ARGUMENTS RPLACA SIMPLE-CONDITION-FORMAT-CONTROL RPLACD SIMPLE-ERROR SAFETY SIMPLE-STRING SATISFIES SIMPLE-STRING-P SBIT SIMPLE-TYPE-ERROR SCALE-FLOAT SIMPLE-VECTOR SCHAR SIMPLE-VECTOR-P SEARCH SIMPLE-WARNING SECOND SIN SEQUENCE SINGLE-FLOAT SERIOUS-CONDITION SINGLE-FLOAT-EPSILON SET SINGLE-FLOAT-NEGATIVE-EPSILON SET-DIFFERENCE SINH SET-DISPATCH-MACRO-CHARACTER SIXTH SET-EXCLUSIVE-OR SLEEP SET-MACRO-CHARACTER SLOT-BOUNDP SET-PPRINT-DISPATCH SLOT-EXISTS-P SET-SYNTAX-FROM-CHAR SLOT-MAKUNBOUND SETF SLOT-MISSING SETQ SLOT-UNBOUND SEVENTH SLOT-VALUE SHADOW SOFTWARE-TYPE SHADOWING-IMPORT SOFTWARE-VERSION SHARED-INITIALIZE SOME SHIFTF SORT SHORT-FLOAT SPACE SHORT-FLOAT-EPSILON SPECIAL SHORT-FLOAT-NEGATIVE-EPSILON SPECIAL-OPERATOR-P SHORT-SITE-NAME SPEED SIGNAL SQRT SIGNED-BYTE STABLE-SORT SIGNUM STANDARD SIMPLE-ARRAY STANDARD-CHAR SIMPLE-BASE-STRING STANDARD-CHAR-P STANDARD-CLASS SUBLIS STANDARD-GENERIC-FUNCTION SUBSEQ STANDARD-METHOD SUBSETP STANDARD-OBJECT SUBST STEP SUBST-IF STORAGE-CONDITION SUBST-IF-NOT STORE-VALUE SUBSTITUTE STREAM SUBSTITUTE-IF STREAM-ELEMENT-TYPE SUBSTITUTE-IF-NOT STREAM-ERROR SUBTYPEP STREAM-ERROR-STREAM SVREF STREAM-EXTERNAL-FORMAT SXHASH STREAMP SYMBOL STRING SYMBOL-FUNCTION STRING-CAPITALIZE SYMBOL-MACROLET STRING-DOWNCASE SYMBOL-NAME STRING-EQUAL SYMBOL-PACKAGE STRING-GREATERP SYMBOL-PLIST STRING-LEFT-TRIM SYMBOL-VALUE STRING-LESSP SYMBOLP STRING-NOT-EQUAL SYNONYM-STREAM STRING-NOT-GREATERP SYNONYM-STREAM-SYMBOL STRING-NOT-LESSP T STRING-RIGHT-TRIM TAGBODY STRING-STREAM TAILP STRING-TRIM TAN STRING-UPCASE TANH STRING/= TENTH STRING< TERPRI STRING<= THE STRING= THIRD STRING> THROW STRING>= TIME STRINGP TRACE STRUCTURE TRANSLATE-LOGICAL-PATHNAME STRUCTURE-CLASS TRANSLATE-PATHNAME STRUCTURE-OBJECT TREE-EQUAL STYLE-WARNING TRUENAME TRUNCATE VALUES-LIST TWO-WAY-STREAM VARIABLE TWO-WAY-STREAM-INPUT-STREAM VECTOR TWO-WAY-STREAM-OUTPUT-STREAM VECTOR-POP TYPE VECTOR-PUSH TYPE-ERROR VECTOR-PUSH-EXTEND TYPE-ERROR-DATUM VECTORP TYPE-ERROR-EXPECTED-TYPE WARN TYPE-OF WARNING TYPECASE WHEN TYPEP WILD-PATHNAME-P UNBOUND-SLOT WITH-ACCESSORS UNBOUND-SLOT-INSTANCE WITH-COMPILATION-UNIT UNBOUND-VARIABLE WITH-CONDITION-RESTARTS UNDEFINED-FUNCTION WITH-HASH-TABLE-ITERATOR UNEXPORT WITH-INPUT-FROM-STRING UNINTERN WITH-OPEN-FILE UNION WITH-OPEN-STREAM UNLESS WITH-OUTPUT-TO-STRING UNREAD-CHAR WITH-PACKAGE-ITERATOR UNSIGNED-BYTE WITH-SIMPLE-RESTART UNTRACE WITH-SLOTS UNUSE-PACKAGE WITH-STANDARD-IO-SYNTAX UNWIND-PROTECT WRITE UPDATE-INSTANCE-FOR-DIFFERENT-CLASS WRITE-BYTE UPDATE-INSTANCE-FOR-REDEFINED-CLASS WRITE-CHAR UPGRADED-ARRAY-ELEMENT-TYPE WRITE-LINE UPGRADED-COMPLEX-PART-TYPE WRITE-SEQUENCE UPPER-CASE-P WRITE-STRING USE-PACKAGE WRITE-TO-STRING USE-VALUE Y-OR-N-P USER-HOMEDIR-PATHNAME YES-OR-NO-P VALUES ZEROP)) (CL-SYMBOLS-ACTUAL (LET ((LST NIL)) (DO-EXTERNAL-SYMBOLS (S (FIND-PACKAGE :COMMON-LISP) LST) (PUSH S LST)) LST)) (KNOWN-MISSING NIL) (KNOWN-EXTRA NIL) (MISSING (SET-DIFFERENCE CL-SYMBOLS-REQUIRED CL-SYMBOLS-ACTUAL)) (EXTRA (SET-DIFFERENCE CL-SYMBOLS-ACTUAL CL-SYMBOLS-REQUIRED))) (FORMAT T "~:[~;~&~d missing symbol~:p: ~s~%~]" MISSING (LENGTH MISSING) MISSING) (FORMAT T "~:[~;~d extra symbol~:p: ~s~%~]" EXTRA (LENGTH EXTRA) EXTRA) (DOLIST (SY CL-SYMBOLS-ACTUAL) (LOOP :FOR IP :IN (SYMBOL-PLIST SY) :BY #'CDDR :WHEN (EQ IP (FIND-SYMBOL (SYMBOL-NAME IP) "COMMON-LISP-USER")) :DO (ERROR "~s has an ilegal property ~s" SY IP))) (LIST (SET-DIFFERENCE MISSING KNOWN-MISSING) (SET-DIFFERENCE KNOWN-MISSING MISSING) (SET-DIFFERENCE EXTRA KNOWN-EXTRA) (SET-DIFFERENCE KNOWN-EXTRA EXTRA))) EQUAL-OK: (NIL NIL NIL NIL) (WITH-COLLECT (C) (DOLIST (P *SYSTEM-PACKAGE-LIST*) (DO-EXTERNAL-SYMBOLS (S P) (UNLESS (OR (NOT (FBOUNDP S)) (SYSTEM::SUBR-INFO S) (SPECIAL-OPERATOR-P S) (DOCUMENTATION S 'SYSTEM::FILE) (NOT (EQ S (SYSTEM::FUNCTION-NAME (OR (MACRO-FUNCTION S) S))))) (C (LIST S (SYMBOL-PLIST S) (FDEFINITION S))))))) EQL-OK: NIL RUN-TEST: finished "symbols" (0 errors out of 6 tests) RUN-TEST: started # (ENCODE-UNIVERSAL-TIME 0 0 0 1 1 1900 0) EQL-OK: 0 (ENCODE-UNIVERSAL-TIME 0 0 1 4 7 1976 5) EQL-OK: 2414296800 (DEFUN CHECK-UNIVERSAL-TIME (TIME &OPTIONAL TZ) "check that DECODE-UNIVERSAL-TIME is the inverse of ENCODE-UNIVERSAL-TIME" (MULTIPLE-VALUE-BIND (SE MI HO DA MO YE WK DS-P ZONE) (DECODE-UNIVERSAL-TIME TIME TZ) (LET ((UT (ENCODE-UNIVERSAL-TIME SE MI HO DA MO YE (OR TZ (IF DS-P (1- ZONE) ZONE))))) (UNLESS (= UT TIME) (LIST TIME (LIST SE MI HO DA MO YE WK DS-P ZONE TZ) UT (- UT TIME)))))) EQL-OK: CHECK-UNIVERSAL-TIME (STRINGP (DOCUMENTATION 'CHECK-UNIVERSAL-TIME 'FUNCTION)) EQL-OK: T (COMPILE 'CHECK-UNIVERSAL-TIME) EQL-OK: CHECK-UNIVERSAL-TIME (STRINGP (DOCUMENTATION #'CHECK-UNIVERSAL-TIME T)) EQL-OK: T (CHECK-UNIVERSAL-TIME 2879996399) EQL-OK: NIL (CHECK-UNIVERSAL-TIME 2879996400) EQL-OK: NIL (CHECK-UNIVERSAL-TIME 3) EQL-OK: NIL (CHECK-UNIVERSAL-TIME 3 7) EQL-OK: NIL (DEFUN TIME-LOOP (START END STEP &OPTIONAL TZ) "return the periods of badness" (TIME (LOOP :WITH STATE = NIL :WITH RET = NIL :FOR TM :FROM START :BELOW END :BY STEP :FOR CHECK = (CHECK-UNIVERSAL-TIME TM TZ) :DO (CASE STATE ((:GOOD) (WHEN CHECK (SETQ STATE :BAD) (SHOW CHECK) (PUSH CHECK RET))) ((:BAD) (UNLESS CHECK (PUSH (SHOW (LIST TM (MULTIPLE-VALUE-LIST (DECODE-UNIVERSAL-TIME TM TZ)))) (CAR RET)) (SETQ STATE :GOOD))) (T (SETQ STATE (IF CHECK :BAD :GOOD)) (SHOW (LIST STATE TM CHECK)))) :FINALLY (RETURN (NREVERSE RET))))) EQL-OK: TIME-LOOP (STRINGP (DOCUMENTATION #'TIME-LOOP T)) EQL-OK: T (COMPILE 'TIME-LOOP) EQL-OK: TIME-LOOP (STRINGP (DOCUMENTATION 'TIME-LOOP 'FUNCTION)) EQL-OK: T (TIME-LOOP 100000 5000000000 5000) (:GOOD 100000 NIL) Real time: 316.2678 sec. Run time: 316.0554 sec. Space: 127793360 Bytes GC: 43, GC time: 3.732012 sec. EQL-OK: NIL (TIME-LOOP 4300066700 4300181201 10) (:GOOD 4300066700 NIL) Real time: 3.660291 sec. Run time: 3.658124 sec. Space: 1465776 Bytes EQL-OK: NIL (TIME-LOOP 100000 5000000000 5000 0) (:GOOD 100000 NIL) Real time: 108.84598 sec. Run time: 108.76988 sec. Space: 127793488 Bytes GC: 43, GC time: 4.176065 sec. EQL-OK: NIL (TIME-LOOP 4300066700 4300081201 10 0) (:GOOD 4300066700 NIL) Real time: 0.147473 sec. Run time: 0.147467 sec. Space: 185776 Bytes EQL-OK: NIL (LET ((TOTAL 10000)) (LOOP :WITH BAD = 0 :REPEAT TOTAL :FOR TIME = (RANDOM 10000000000) :FOR CHECK = (CHECK-UNIVERSAL-TIME TIME) :WHEN CHECK :COLLECT (PROGN (INCF BAD) CHECK) :FINALLY (FORMAT T "~&~:D out of ~:D bad: ~5F%~%" BAD TOTAL (/ BAD TOTAL 0.01d0)))) WARNING: LOOP: FOR clauses should occur before the loop's main body WARNING: LOOP: FOR clauses should occur before the loop's main body 0 out of 10,000 bad: 0.0% EQL-OK: NIL (LET ((TOTAL 10000)) (LOOP :WITH BAD = 0 :REPEAT TOTAL :FOR TIME = (RANDOM 10000000000) :FOR CHECK = (CHECK-UNIVERSAL-TIME TIME 0) :WHEN CHECK :COLLECT (PROGN (INCF BAD) CHECK) :FINALLY (FORMAT T "~&~:D out of ~:D bad: ~5F%~%" BAD TOTAL (/ BAD TOTAL 0.01d0)))) WARNING: LOOP: FOR clauses should occur before the loop's main body WARNING: LOOP: FOR clauses should occur before the loop's main body 0 out of 10,000 bad: 0.0% EQL-OK: NIL (- (ENCODE-UNIVERSAL-TIME 12 34 21 23 12 2208) (ENCODE-UNIVERSAL-TIME 12 34 20 23 12 2208)) EQL-OK: 3600 (PROGN (SYMBOL-CLEANUP 'CHECK-UNIVERSAL-TIME) (SYMBOL-CLEANUP 'TIME-LOOP)) EQL-OK: T RUN-TEST: finished "time" (0 errors out of 22 tests) RUN-TEST: started # 27 EQL-OK: 27 27 EQL-OK: 27 27 EQL-OK: 27 27 EQL-OK: 27 27 EQL-OK: 27 27 EQL-OK: 27 27 EQL-OK: 27 '(A B) EQUAL-OK: (A B) '(A B) EQUAL-OK: (A B) '(A B) EQUAL-OK: (A B) '(A B) EQUAL-OK: (A B) '(A B) EQUAL-OK: (A B) '|foobar| EQL-OK: |foobar| '|foobar| EQL-OK: |foobar| '|fooBARbaz| EQL-OK: |fooBARbaz| '|fooBARbaz| EQL-OK: |fooBARbaz| (PROGN (UNLESS (FIND-PACKAGE '|foo|) (MAKE-PACKAGE '|foo|)) T) EQL-OK: T '|foo:bar| EQL-OK: |foo:bar| (READ-FROM-STRING "|foo|:|bar|") [SIMPLE-PACKAGE-ERROR]: READ from #: #1=# has no external symbol with name "bar" EQL-OK: ERROR (DELETE-PACKAGE '#:|foo|) EQL-OK: T '|1B5000| EQL-OK: |1B5000| '|777777Q| EQL-OK: |777777Q| '|1.7J| EQL-OK: |1.7J| '|-3/4+6.7J| EQL-OK: |-3/4+6.7J| '|12/25/83| EQL-OK: |12/25/83| '|27^19| EQL-OK: |27^19| '|3^4/5| EQL-OK: |3^4/5| '|6//7| EQL-OK: |6//7| '|3.1.2.6| EQL-OK: |3.1.2.6| '|^-43^| EQL-OK: |^-43^| '|3.141_592_653_589_793_238_4| EQL-OK: |3.141_592_653_589_793_238_4| '|-3.7+2.6I-6.17J+19.6K| EQL-OK: |-3.7+2.6I-6.17J+19.6K| '/ EQL-OK: / '/5 EQL-OK: /5 '+ EQL-OK: + '1+ EQL-OK: 1+ '1- EQL-OK: 1- 'FOO+ EQL-OK: FOO+ 'AB.CD EQL-OK: AB.CD '_ EQL-OK: _ '^ EQL-OK: ^ '^/- EQL-OK: ^/- 'BAD-FACE EQL-OK: BAD-FACE '25-SEC-83 EQL-OK: 25-SEC-83 'A/B EQL-OK: A/B 'FAD_CAFE EQL-OK: FAD_CAFE 'F^ EQL-OK: F^ (SETQ *PRINT-BASE* 16) EQL-OK: 10 '|BAD-FACE| EQL-OK: |BAD-FACE| '|25-SEC-83| EQL-OK: |25-SEC-83| '|A/B| EQL-OK: |A/B| '|FAD_CAFE| EQL-OK: |FAD_CAFE| '|F^| EQL-OK: |F^| (SETQ *PRINT-BASE* A) EQL-OK: 10 '|123| EQL-OK: |123| '|123E12| EQL-OK: |123E12| '|123S12| EQL-OK: |123S12| '|123L12| EQL-OK: |123L12| '|123D12| EQL-OK: |123D12| '|123F12| EQL-OK: |123F12| '|123/12| EQL-OK: |123/12| '(A . B) EQUAL-OK: (A . B) '(A.B) EQUAL-OK: (A.B) '(A. B) EQUAL-OK: (A. B) '(A |.| B C) EQUAL-OK: (A |.| B C) '(A |.| B C) EQUAL-OK: (A |.| B C) '(A |...| B C) EQUAL-OK: (A |...| B C) '(A |...| B C) EQUAL-OK: (A |...| B C) '(A B . C) EQUAL-OK: (A B . C) '.AB EQL-OK: .AB (READ-FROM-STRING "(. b)") [SIMPLE-READER-ERROR]: READ from #1=#: token "." not allowed here EQL-OK: ERROR (READ-FROM-STRING "(a .. b)") [SIMPLE-READER-ERROR]: READ from #1=#: a token consisting only of dots cannot be meaningfully read in EQL-OK: ERROR (READ-FROM-STRING "(a . . 'b )") [SIMPLE-READER-ERROR]: READ from #1=#: token "." not allowed here EQL-OK: ERROR (READ-FROM-STRING "(a b c ...)") [SIMPLE-READER-ERROR]: READ from #1=#: a token consisting only of dots cannot be meaningfully read in EQL-OK: ERROR #\Newline EQL-OK: #\Newline #\Newline EQL-OK: #\Newline #\Space EQL-OK: #\Space #\Rubout EQL-OK: #\Rubout #\Page EQL-OK: #\Page #\Tab EQL-OK: #\Tab #\Backspace EQL-OK: #\Backspace #\Return EQL-OK: #\Return (SETQ *READ-BASE* 2) EQL-OK: 2 (SETQ *PRINT-RADIX* T) EQL-OK: T (PRIN1-TO-STRING #10r4/3) EQUAL-OK: "#10r4/3" (SETQ *PRINT-BASE* 2.) EQL-OK: #b10 (PRIN1-TO-STRING #b100/11) EQUAL-OK: "#b100/11" (SETQ *PRINT-BASE* #b1010) EQL-OK: 10. '|123| EQL-OK: |123| 123. EQL-OK: 123. 312. EQL-OK: 312. (SETQ *READ-BASE* 10.) EQL-OK: 10. (SETQ *PRINT-RADIX* NIL) EQL-OK: NIL 0.1 EQL-OK: 0.1 0.1 EQL-OK: 0.1 -0.1 EQL-OK: -0.1 1.0 EQL-OK: 1.0 1.0 EQL-OK: 1.0 -1.0 EQL-OK: -1.0 10.0 EQL-OK: 10.0 10.0 EQL-OK: 10.0 -10.0 EQL-OK: -10.0 10.0 EQL-OK: 10.0 10.0 EQL-OK: 10.0 -10.0 EQL-OK: -10.0 (SETQ *READ-BASE* 16) EQL-OK: 16 '|1A1.| EQL-OK: |1A1.| '|1R1.| EQL-OK: |1R1.| (SETQ *READ-BASE* 10) EQL-OK: 10 (SETQ *PRINT-LEVEL* 10) EQL-OK: 10 (SETQ *PRINT-CIRCLE* T) EQL-OK: T (PRIN1-TO-STRING '(#1=(A B #1#))) EQUALP-OK: "(#1=(a b #1#))" (PRIN1-TO-STRING '(#1=(#1#))) EQUAL-OK: "(#1=(#1#))" (PRIN1-TO-STRING '(#1=(A B #1#) (C D #1#))) EQUALP-OK: "(#1=(a b #1#) (c d #1#))" (SETQ *PRINT-LEVEL* NIL) EQL-OK: NIL (SETQ *PRINT-LENGTH* 11) EQL-OK: 11 (PRIN1-TO-STRING '(1 2 3 4 (5 5) 6 7 8 9 10 11 ...)) EQUAL-OK: "(1 2 3 4 (5 5) 6 7 8 9 10 11 ...)" (PRIN1-TO-STRING '#1=(A B . #1#)) EQUAL-OK: "#1=(A B . #1#)" (SETQ *PRINT-LENGTH* NIL) EQL-OK: NIL ':ABC EQL-OK: :ABC (PROGN (UNLESS (FIND-PACKAGE 'ABC) (MAKE-PACKAGE 'ABC)) T) EQL-OK: T (READ-FROM-STRING "abc:de") [SIMPLE-PACKAGE-ERROR]: READ from #: #1=# has no external symbol with name "DE" EQL-OK: ERROR 'ABC::DE EQL-OK: ABC::DE (READ-FROM-STRING "::111") EQL-OK: :|111| (READ-FROM-STRING ":abc:") [SIMPLE-READER-ERROR]: READ from #1=#: too many colons in token ":abc:" EQL-OK: ERROR (READ-FROM-STRING ":abc:00") [SIMPLE-READER-ERROR]: READ from #1=#: too many colons in token ":abc:00" EQL-OK: ERROR (READ-FROM-STRING "ab:cd:2") [SIMPLE-READER-ERROR]: READ from #1=#: too many colons in token "ab:cd:2" EQL-OK: ERROR (READ-FROM-STRING "ab:") [SIMPLE-PACKAGE-ERROR]: READ from #: there is no package with name #1="AB" EQL-OK: ERROR (READ-FROM-STRING "ab:cd:") [SIMPLE-READER-ERROR]: READ from #1=#: too many colons in token "ab:cd:" EQL-OK: ERROR (READ-FROM-STRING "abc::") EQL-OK: ABC::|| (DELETE-PACKAGE '#:ABC) EQL-OK: T #0A7 EQUALP-OK: #0A7 #(1 2 3 4 5 6 7 8) EQUALP-OK: #(1 2 3 4 5 6 7 8) #2A((1 2 3) (3 2 1)) EQUALP-OK: #2A((1 2 3) (3 2 1)) #3A(((1 2 3) (4 5 6)) ((1 2 3) (4 5 6))) EQUALP-OK: #3A(((1 2 3) (4 5 6)) ((1 2 3) (4 5 6))) (READ-FROM-STRING "#a7") [SIMPLE-READER-ERROR]: READ from #1=#: bad syntax for array: #A7 EQL-OK: ERROR #2A((1 2) (3 4) (5 6)) EQUALP-OK: #2A((1 2) (3 4) (5 6)) #3A(((1 2) (3 4) (5 6)) ((7 8) (9 10) (11 12))) EQUALP-OK: #3A(((1 2) (3 4) (5 6)) ((7 8) (9 10) (11 12))) (MULTIPLE-VALUE-LIST (READ-FROM-STRING "1(123)")) EQUAL-OK: (1 1) (READ-FROM-STRING "#0*111") [SIMPLE-READER-ERROR]: READ from #1=#: BIT-VECTOR is longer than the explicitly given length 0 EQL-OK: ERROR (READ-FROM-STRING "#0(1 1 1 )") [SIMPLE-READER-ERROR]: READ from #1=#: VECTOR is longer than the explicitly given length 0 EQL-OK: ERROR (READ-FROM-STRING "#0r111") [SIMPLE-READER-ERROR]: READ from #1=#: The base 0 given between # and R should lie between 2 and 36 EQL-OK: ERROR (READ-FROM-STRING "#1r111") [SIMPLE-READER-ERROR]: READ from #1=#: The base 1 given between # and R should lie between 2 and 36 EQL-OK: ERROR 7 EQL-OK: 7 1333 EQL-OK: 1333 (READ-FROM-STRING "#37r111") [SIMPLE-READER-ERROR]: READ from #1=#: The base 37 given between # and R should lie between 2 and 36 EQL-OK: ERROR (READ-FROM-STRING "#011010") [SIMPLE-END-OF-FILE]: READ: input stream #1=# ends within read macro beginning with #\# EQL-OK: ERROR -1 EQL-OK: -1 -1 EQL-OK: -1 -1 EQL-OK: -1 0 EQL-OK: 0 0 EQL-OK: 0 0 EQL-OK: 0 0 EQL-OK: 0 '|-12./12| EQL-OK: |-12./12| '|-0./12| EQL-OK: |-0./12| (LIST 1 2 #\a) EQUAL-OK: (1 2 #\a) (READ-FROM-STRING "") [SIMPLE-READER-ERROR]: READ from #1=#: illegal character #\Escape EQL-OK: ERROR (READ-FROM-STRING "abc") [SIMPLE-READER-ERROR]: READ from #1=#: illegal character #\Escape EQL-OK: ERROR (READ-FROM-STRING "a|bc") [SIMPLE-END-OF-FILE]: READ: input stream #1=# ends within a token after multiple escape character EQL-OK: ERROR (READ-FROM-STRING "#2(a b c)") [SIMPLE-READER-ERROR]: READ from #1=#: VECTOR is longer than the explicitly given length 2 EQL-OK: ERROR (READ-FROM-STRING "::") EQL-OK: :|| (READ-FROM-STRING "#2*1010") [SIMPLE-READER-ERROR]: READ from #1=#: BIT-VECTOR is longer than the explicitly given length 2 EQL-OK: ERROR (READ-FROM-STRING "#1#") [SIMPLE-READER-ERROR]: READ from #1=#: undefined label #1# EQL-OK: ERROR (READ-FROM-STRING "... ") [SIMPLE-READER-ERROR]: READ from #1=#: a token consisting only of dots cannot be meaningfully read in EQL-OK: ERROR (PROGN (SETQ *READ-BASE* 40) (READ-FROM-STRING "123")) [SIMPLE-TYPE-ERROR]: The value of *READ-BASE* should be an integer between 2 and 36, not 40. It has been reset to 10. EQL-OK: ERROR *READ-BASE* EQL-OK: 10 (SETQ *READ-BASE* 10) EQL-OK: 10 *READ-BASE* EQL-OK: 10 (PROGN (SETQ *PRINT-BASE* NIL) (PRIN1-TO-STRING *PRINT-BASE*)) [SIMPLE-TYPE-ERROR]: The value of *PRINT-BASE* should be an integer between 2 and 36, not NIL. It has been reset to 10. EQL-OK: ERROR (PROGN (SETQ *PRINT-BASE* 10) T) EQL-OK: T *PRINT-BASE* EQL-OK: 10 (READ-FROM-STRING "#2a((1 2 3)(1 2)") [SIMPLE-END-OF-FILE]: READ: input stream #1=# ends within an object EQL-OK: ERROR (READ-FROM-STRING "#2a((1 2 3)(1 2))") [SIMPLE-ERROR]: MAKE-ARRAY: (1 2) is of incorrect length EQL-OK: ERROR (READ-FROM-STRING "#2a(1 2 3}") [SIMPLE-END-OF-FILE]: READ: input stream #1=# ends within an object EQL-OK: ERROR (SETQ *PRINT-LEVEL* T) EQL-OK: T *PRINT-LEVEL* EQL-OK: T (SETQ *PRINT-LEVEL* NIL) EQL-OK: NIL *PRINT-LEVEL* EQL-OK: NIL (SETQ *PRINT-LENGTH* T) EQL-OK: T *PRINT-LENGTH* EQL-OK: T (SETQ *PRINT-LENGTH* NIL) EQL-OK: NIL *PRINT-LENGTH* EQL-OK: NIL (MAKE-SYNONYM-STREAM 123) [SIMPLE-TYPE-ERROR]: MAKE-SYNONYM-STREAM: argument should be a symbol, not 123 EQL-OK: ERROR (PRIN1-TO-STRING (MAKE-SYNONYM-STREAM '*READ-BASE*)) EQUAL-OK: "#" (READ-FROM-STRING "#(1 2 3 . )") [SIMPLE-READER-ERROR]: READ from #1=#: token "." not allowed here EQL-OK: ERROR (READ-FROM-STRING "(a .)") [SIMPLE-READER-ERROR]: READ-DELIMITED-LIST from #1=#: illegal end of dotted list EQL-OK: ERROR (READ-FROM-STRING "(. a)") [SIMPLE-READER-ERROR]: READ from #1=#: token "." not allowed here EQL-OK: ERROR (MAKE-ECHO-STREAM PI *STANDARD-OUTPUT*) [SIMPLE-TYPE-ERROR]: MAKE-ECHO-STREAM: argument #1=3.1415926535897932385L0 is not a stream EQL-OK: ERROR (MAKE-TWO-WAY-STREAM PI *STANDARD-OUTPUT*) [SIMPLE-TYPE-ERROR]: MAKE-TWO-WAY-STREAM: argument #1=3.1415926535897932385L0 is not a stream EQL-OK: ERROR (MAKE-ECHO-STREAM *STANDARD-INPUT* PI) [SIMPLE-TYPE-ERROR]: MAKE-ECHO-STREAM: argument #1=3.1415926535897932385L0 is not a stream EQL-OK: ERROR (MAKE-TWO-WAY-STREAM *STANDARD-INPUT* PI) [SIMPLE-TYPE-ERROR]: MAKE-TWO-WAY-STREAM: argument #1=3.1415926535897932385L0 is not a stream EQL-OK: ERROR (PROGN (SETQ *READTABLE* T) (READ-FROM-STRING "123")) [SIMPLE-TYPE-ERROR]: The value of *READTABLE* was not a readtable. It has been reset. EQL-OK: ERROR (PROGN (SETQ *READTABLE* (COPY-READTABLE NIL)) T) EQL-OK: T (READ-FROM-STRING "#37R") [SIMPLE-READER-ERROR]: READ from #1=#: The base 37 given between # and R should lie between 2 and 36 EQL-OK: ERROR (READ-FROM-STRING "#10rabc") [SIMPLE-READER-ERROR]: READ from #1=#: token "ABC" after #r is not a rational number in base 10 EQL-OK: ERROR (READ-FROM-STRING "#10ra/b") [SIMPLE-READER-ERROR]: READ from #1=#: token "A/B" after #r is not a rational number in base 10 EQL-OK: ERROR (READ-FROM-STRING "#nocontrol-") [SIMPLE-READER-ERROR]: READ from #1=#: After #\# is #\n an undefined dispatch macro character EQL-OK: ERROR (READ-FROM-STRING "#control-") [SIMPLE-READER-ERROR]: READ from #1=#: bad syntax for complex number: #CONTROL- EQL-OK: ERROR (SETQ *PRINT-RADIX* T) EQL-OK: T (WRITE-TO-STRING 11111.) EQUAL-OK: "11111." (SETQ *PRINT-BASE* 2.) EQL-OK: #b10 (WRITE-TO-STRING #b10101101100111) EQUAL-OK: "#b10101101100111" (SETQ *PRINT-BASE* #b1000) EQL-OK: #o10 (WRITE-TO-STRING #o25547) EQUAL-OK: "#o25547" (SETQ *PRINT-BASE* #o20) EQL-OK: #x10 (WRITE-TO-STRING #x2B67) EQUAL-OK: "#x2B67" (SETQ *PRINT-BASE* #x16) EQL-OK: #22r10 (WRITE-TO-STRING #22r10L1) EQUAL-OK: "#22r10L1" (SETQ *PRINT-BASE* #22rA) EQL-OK: 10. (SETQ *PRINT-RADIX* NIL) EQL-OK: NIL (WRITE-TO-STRING 11111) EQUAL-OK: "11111" (SETQ *PRINT-BASE* 2) EQL-OK: 10 (WRITE-TO-STRING 10101101100111) EQUAL-OK: "10101101100111" (SETQ *PRINT-BASE* 1000) EQL-OK: 10 (WRITE-TO-STRING 25547) EQUAL-OK: "25547" (SETQ *PRINT-BASE* 20) EQL-OK: 10 (WRITE-TO-STRING 2B67) EQUAL-OK: "2B67" (SETQ *PRINT-BASE* 16) EQL-OK: 10 (WRITE-TO-STRING 10L1) EQUAL-OK: "10L1" (SETQ *PRINT-BASE* A) EQL-OK: 10 0.00999998 EQL-OK: 0.00999998 0.009999998 EQL-OK: 0.009999998 0.01 EQL-OK: 0.01 1.23 EQL-OK: 1.23 (PRIN1-TO-STRING 1.23E20) EQUAL-OK: "1.23E20" (PRIN1-TO-STRING 1.23E20) EQUAL-OK: "1.23E20" (PRIN1-TO-STRING 1.23s20) EQUAL-OK: "1.23s20" 1.23d20 EQL-OK: 1.23d20 1.23L20 EQUALP-OK: 1.23d20 (PRIN1-TO-STRING 1.2345679E8) EQUAL-OK: "1.2345679E8" (PRIN1-TO-STRING 1.2345678E7) EQUAL-OK: "1.2345678E7" (PRIN1-TO-STRING 1234567.1) EQUAL-OK: "1234567.1" (PRIN1-TO-STRING 123456.125) EQUAL-OK: "123456.125" (PRIN1-TO-STRING 12345.123) EQUAL-OK: "12345.123" (PRIN1-TO-STRING 1234.1234) EQUAL-OK: "1234.1234" 123.123 EQL-OK: 123.123 12.12 EQL-OK: 12.12 1.1 EQL-OK: 1.1 (SETQ *READ-DEFAULT-FLOAT-FORMAT* 'SHORT-FLOAT) EQL-OK: SHORT-FLOAT 1.23 EQL-OK: 1.23 (PRIN1-TO-STRING 1.23E20) EQUAL-OK: "1.23E20" (PRIN1-TO-STRING 1.23f20) EQUAL-OK: "1.23f20" (PRIN1-TO-STRING 1.23E20) EQUAL-OK: "1.23E20" 1.23d20 EQL-OK: 1.23d20 1.23L20 EQUALP-OK: 1.23d20 (PRIN1-TO-STRING 1.23457E8) EQUAL-OK: "1.23457E8" (PRIN1-TO-STRING 1.23457E7) EQUAL-OK: "1.23457E7" (PRIN1-TO-STRING 1234560.0) EQUAL-OK: "1234560.0" (PRIN1-TO-STRING 123456.0) EQUAL-OK: "123456.0" (PRIN1-TO-STRING 12345.1) EQUAL-OK: "12345.1" (PRIN1-TO-STRING 1234.13) EQUAL-OK: "1234.13" (PRIN1-TO-STRING 123.123) EQUAL-OK: "123.123" 12.12 EQL-OK: 12.12 1.1 EQL-OK: 1.1 (SETQ *READ-DEFAULT-FLOAT-FORMAT* 'DOUBLE-FLOAT) EQL-OK: DOUBLE-FLOAT 1.23 EQL-OK: 1.23 1.23E20 EQL-OK: 1.23E20 (PRIN1-TO-STRING 1.23f20) EQUAL-OK: "1.23f20" (PRIN1-TO-STRING 1.23s20) EQUAL-OK: "1.23s20" 1.23E20 EQL-OK: 1.23E20 1.23L20 EQUALP-OK: 1.23E20 (PRIN1-TO-STRING 1.2345678912345679E8) EQUAL-OK: "1.2345678912345679E8" 1.234567812345678E7 EQL-OK: 1.234567812345678E7 1234567.1234567 EQL-OK: 1234567.1234567 123456.123456 EQL-OK: 123456.123456 12345.12345 EQL-OK: 12345.12345 1234.1234 EQL-OK: 1234.1234 123.123 EQL-OK: 123.123 12.12 EQL-OK: 12.12 1.1 EQL-OK: 1.1 (SETQ *READ-DEFAULT-FLOAT-FORMAT* 'LONG-FLOAT) EQL-OK: LONG-FLOAT 1.23 EQL-OK: 1.23 1.23E20 EQL-OK: 1.23E20 (PRIN1-TO-STRING 1.23f20) EQUAL-OK: "1.23f20" (PRIN1-TO-STRING 1.23s20) EQUAL-OK: "1.23s20" 1.23d20 EQL-OK: 1.23d20 1.23E20 EQL-OK: 1.23E20 (PRIN1-TO-STRING 1.23456789123456789E8) EQUAL-OK: "1.23456789123456789E8" 1.234567812345678E7 EQL-OK: 1.234567812345678E7 1234567.1234567 EQL-OK: 1234567.1234567 123456.123456 EQL-OK: 123456.123456 12345.12345 EQL-OK: 12345.12345 1234.1234 EQL-OK: 1234.1234 123.123 EQL-OK: 123.123 12.12 EQL-OK: 12.12 1.1 EQL-OK: 1.1 (SETQ *READ-DEFAULT-FLOAT-FORMAT* 'SINGLE-FLOAT) EQL-OK: SINGLE-FLOAT (WRITE-TO-STRING 'ABCDE) EQUAL-OK: "ABCDE" (WRITE-TO-STRING 'ABCDE-EFGHIJ) EQUAL-OK: "ABCDE-EFGHIJ" (WRITE-TO-STRING 'ABCDE1EFGHIJ) EQUAL-OK: "ABCDE1EFGHIJ" (WRITE-TO-STRING 'ABCDE-1EFGH) EQUAL-OK: "ABCDE-1EFGH" (SETQ *PRINT-CASE* :DOWNCASE) EQL-OK: :downcase (write-to-string 'abcde) EQUAL-OK: "abcde" (write-to-string 'abcde-efghij) EQUAL-OK: "abcde-efghij" (write-to-string 'abcde1efghij) EQUAL-OK: "abcde1efghij" (write-to-string 'abcde-1efgh) EQUAL-OK: "abcde-1efgh" (setq *print-case* :capitalize) EQL-OK: :Capitalize (Write-To-String 'Abcde) EQUAL-OK: "Abcde" (Write-To-String 'Abcde-Efghij) EQUAL-OK: "Abcde-Efghij" (Write-To-String 'Abcde1efghij) EQUAL-OK: "Abcde1efghij" (Write-To-String 'Abcde-1efgh) EQUAL-OK: "Abcde-1efgh" (Setq *Print-Case* :Upcase) EQL-OK: :UPCASE (LET ((*GENSYM-COUNTER* 1234)) (SYMBOL-NAME (GENSYM "TEST"))) EQUAL-OK: "TEST1234" (LET ((*PRINT-GENSYM* T) (G (GENSYM 7))) (LIST (PRINC-TO-STRING G) (PRIN1-TO-STRING G))) EQUAL-OK: ("G7" "#:G7") (LET ((*PRINT-GENSYM* NIL) (G (GENSYM 20))) (LIST (PRINC-TO-STRING G) (PRIN1-TO-STRING G))) EQUAL-OK: ("G20" "G20") (WRITE-TO-STRING NIL) EQUAL-OK: "NIL" (WRITE-TO-STRING '(A B NIL C)) EQUAL-OK: "(A B NIL C)" (WRITE-TO-STRING '(A B (NIL) C)) EQUAL-OK: "(A B (NIL) C)" (WRITE-TO-STRING '(A B (NIL C) D)) EQUAL-OK: "(A B (NIL C) D)" (WRITE-TO-STRING '#(A B NIL C (A B NIL C) (NIL))) EQUAL-OK: "#(A B NIL C (A B NIL C) (NIL))" (SETQ *PRINT-PRETTY* T) EQL-OK: T (WRITE-TO-STRING NIL) EQUAL-OK: "NIL" (WRITE-TO-STRING '(A B NIL C)) EQUAL-OK: "(A B NIL C)" (WRITE-TO-STRING '(A B (NIL) C)) EQUAL-OK: "(A B (NIL) C)" (WRITE-TO-STRING '(A B (NIL C) D)) EQUAL-OK: "(A B (NIL C) D)" (WRITE-TO-STRING '#(A B NIL C (A B NIL C) (NIL))) EQUAL-OK: "#(A B NIL C (A B NIL C) (NIL))" (SETQ *PRINT-PRETTY* NIL) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#o33")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#x1b")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#b11011")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#.(* 3 3 3)")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "(a . b)")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "(a.b)")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "(a. b)")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "(a . b c)")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "(a |.| b c)")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "(a ... b c)")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "(a |...| b c)")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "(a b . c)")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING ".ab")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "(. b)")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "(a .. b)")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "(a . . 'b )")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "(a b c ...)")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (MULTIPLE-VALUE-LIST (READ-FROM-STRING "#\\control-meta-a"))) EQUAL-OK: (NIL 16) (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#\\control-meta-\\a")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#\\linefeed")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#\\newline")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#\\space")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#\\rubout")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#\\page")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#\\tab")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#\\backspace")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#\\return")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#\\control-space")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#\\c-m-return")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#\\control-meta-tab")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#\\h-s-m-c-rubout")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#\\control-%")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#\\control-\"")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#\\meta->")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "xx:xx")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "xx::xx")) EQL-OK: NIL (SETQ *PRINT-LEVEL* 10) EQL-OK: 10 (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "(#1=(a b #1#))")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "(#1=(#1#))")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "(#1=(a b #1#) (c d #1#))")) EQL-OK: NIL (SETQ *PRINT-LEVEL* NIL) EQL-OK: NIL (SETQ *PRINT-LENGTH* 11) EQL-OK: 11 (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#1=(a b . #1#)")) EQL-OK: NIL (SETQ *PRINT-LENGTH* NIL) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#0a7")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#1a(1 2 3 4 5 6 7 8)")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#2a((1 2 3)(3 2 1))")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#3a(((1 2 3 ) (4 5 6)) ((1 2 3 ) (4 5 6)))")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#a7")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#2a((1 2)(3 4)(5 6))")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#3a(((1 2)(3 4)(5 6)) ((7 8)(9 10)(11 12)))")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#0*111")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#0(1 1 1 )")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#0r111")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#1r111")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#2r111")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#36r111")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#37r111")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#2(a b c)")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#2*1010")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#1#")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#(1 2 3 . )")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "(a .)")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "(. a)")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#37R")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#10rabc")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#10ra/b")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#\\nocontrol-")) EQL-OK: NIL (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#\\control-")) EQL-OK: NIL (READ-FROM-STRING "#\\break") [SIMPLE-READER-ERROR]: READ from #1=#: there is no character with name "bREAK" EQL-OK: ERROR (READ-FROM-STRING "#\\home-up") [SIMPLE-READER-ERROR]: READ from #1=#: there is no character with name "hOME-UP" EQL-OK: ERROR (READ-FROM-STRING "#\\escape") EQL-OK: #\Escape NIL EQL-OK: NIL NIL EQL-OK: NIL (READ-FROM-STRING "#c(pi 0)") [SIMPLE-READER-ERROR]: READ from #1=#: bad syntax for complex number: #C(PI 0) EQL-OK: ERROR (READ-FROM-STRING "#c(0 pi)") [SIMPLE-READER-ERROR]: READ from #1=#: bad syntax for complex number: #C(0 PI) EQL-OK: ERROR (SETQ *READTABLE* (COPY-READTABLE NIL) *PRINT-BASE* 10 *PRINT-CASE* :UPCASE *PRINT-CIRCLE* NIL *PRINT-ESCAPE* T *PRINT-GENSYM* T *PRINT-LENGTH* NIL *PRINT-LEVEL* NIL *PRINT-LINES* NIL *PRINT-RADIX* NIL *READ-BASE* 10) EQL-OK: 10 RUN-TEST: finished "tread" (0 errors out of 395 tests) RUN-TEST: started # (TYPEP 'A 'SYMBOL) EQL-OK: T (TYPEP 'NIL 'SYMBOL) EQL-OK: T (TYPEP '(NIL) 'SYMBOL) EQL-OK: NIL (TYPEP 3 'INTEGER) EQL-OK: T (TYPEP 3 '(INTEGER 0 4)) EQL-OK: T (TYPEP 3 '(INTEGER 0 3)) EQL-OK: T (TYPEP 3 '(INTEGER 0 2)) EQL-OK: NIL (TYPEP 3 '(FLOAT 0.0 2.0)) EQL-OK: NIL (TYPEP 3 '(FLOAT 0.0 2.0)) EQL-OK: NIL (TYPEP 3 '(FLOAT 0.0 4.0)) EQL-OK: NIL (TYPEP 3.2 '(FLOAT 0.0 4.0)) EQL-OK: T (TYPEP 3.2 '(FLOAT 0.0 3.2)) EQL-OK: T (TYPEP 3.2 '(FLOAT 0.0 (3.2))) EQL-OK: NIL (TYPEP 3.2 '(SHORT-FLOAT 0.0s0 3.2s0)) EQL-OK: NIL (TYPEP 3.2 '(SINGLE-FLOAT 0.0 3.2)) EQL-OK: T (TYPEP 3.2 '(DOUBLE-FLOAT 0.0d0 3.2d0)) EQL-OK: NIL (TYPEP 3.2 '(DOUBLE-FLOAT 0.0d0 3.2d0)) EQL-OK: NIL (TYPEP 3.2 '(DOUBLE-FLOAT 0.0d0 3.2d0)) EQL-OK: NIL (TYPEP 3.2s0 '(DOUBLE-FLOAT 0.0d0 3.2d0)) EQL-OK: NIL (TYPEP 3.2 '(DOUBLE-FLOAT 0.0d0 3.2d0)) EQL-OK: NIL (TYPEP 3.2 '(FLOAT 0.0 3.2)) EQL-OK: T (TYPEP 3.2s0 '(FLOAT 0.0s0 3.2s0)) EQL-OK: T (TYPEP 2.0s0 '(SHORT-FLOAT 0.0s0 3.0s0)) EQL-OK: T (TYPEP 2.0s0 '(SINGLE-FLOAT 0.0 3.0)) EQL-OK: NIL (TYPEP 2.0 '(SINGLE-FLOAT 0.0 3.0)) EQL-OK: T (TYPEP 2.0d0 '(DOUBLE-FLOAT 0.0d0 3.0d0)) EQL-OK: T (TYPEP 3.0d0 '(DOUBLE-FLOAT 0.0d0 3.0d0)) EQL-OK: T (TYPEP 3.0d0 '(DOUBLE-FLOAT 0.0d0 (3.0d0))) EQL-OK: NIL (TYPEP 4 '(MOD 4)) EQL-OK: NIL (TYPEP 4 '(MOD 5)) EQL-OK: T (TYPEP 4 '(RATIONAL 2 5)) EQL-OK: T (TYPEP 4 '(RATIONAL 2 7/2)) EQL-OK: NIL (TYPEP 4 '(RATIONAL 2 9/2)) EQL-OK: T (TYPEP 4 '(RATIONAL 2 4)) EQL-OK: T (TYPEP 4/3 '(RATIONAL 2 4)) EQL-OK: NIL (TYPEP 2 '(RATIONAL 2 4)) EQL-OK: T (TYPEP "abcd" 'STRING) EQL-OK: T (TYPEP "abcd" '(STRING 4)) EQL-OK: T (TYPEP "abcd" '(STRING 43)) EQL-OK: NIL (TYPEP '#(2 3) '(COMPLEX INTEGER)) EQL-OK: NIL (TYPEP '#(2 3) 'COMPLEX) EQL-OK: NIL (TYPEP #C(2 3) 'COMPLEX) EQL-OK: T (TYPEP #C(2 3) '(COMPLEX INTEGER)) EQL-OK: T (TYPEP #C(2.2 3) '(COMPLEX FLOAT)) EQL-OK: NIL (TYPEP #C(2 3) '(COMPLEX SYMBOL)) [SIMPLE-ERROR]: UPGRADED-COMPLEX-PART-TYPE: type SYMBOL is not a subtype of REAL EQL-OK: ERROR (TYPEP '#(A B C D) 'VECTOR) EQL-OK: T (TYPEP '#(A B C D) '(VECTOR * 4)) EQL-OK: T (TYPEP #C(0 1) '(COMPLEX (EQL 0))) EQL-OK: NIL (TYPEP 'A '(SYMBOL CONS)) [SIMPLE-ERROR]: TYPEP: invalid type specification (SYMBOL CONS) EQL-OK: ERROR (TYPEP 'A '(OR CONS SYMBOL)) EQL-OK: T (TYPEP 'A '(OR CONS NUMBER)) EQL-OK: NIL (TYPEP 'A '(OR ATOM NUMBER)) EQL-OK: T (TYPEP 'A '(AND ATOM NUMBER)) EQL-OK: NIL (TYPEP '2 '(AND ATOM NUMBER)) EQL-OK: T (NOT (NOT (TYPEP '2 '(MEMBER 1 2 3)))) EQL-OK: T (NOT (NOT (TYPEP '2 '(MEMBER 1 3)))) EQL-OK: NIL (TYPEP '2 '(NOT (MEMBER 1 3))) EQL-OK: T (TYPEP '2 '(NOT (MEMBER 1 2 3))) EQL-OK: NIL (TYPEP 2 '(AND NUMBER (NOT SYMBOL))) EQL-OK: T (TYPEP 2 '(AND STRING (NOT SYMBOL))) EQL-OK: NIL (TYPEP 2 '(OR STRING (NOT SYMBOL))) EQL-OK: T (TYPEP 'CONS 'FUNCTION) EQL-OK: NIL (TYPEP 'CONS '(SATISFIES FUNCTIONP)) EQL-OK: NIL (TYPEP 'CONS '(SATISFIES NOT)) EQL-OK: NIL (TYPEP 'NIL '(SATISFIES NOT)) EQL-OK: T (TYPEP 'NIL NIL) EQL-OK: NIL (TYPEP 'T NIL) EQL-OK: NIL (SUBTYPEP 'CONS T) EQL-OK: T (SUBTYPEP NIL 'CONS) EQL-OK: T (SUBTYPEP 'CONS 'LIST) EQL-OK: T (SUBTYPEP 'CONS '(OR ATOM CONS)) EQL-OK: T (SUBTYPEP 'CONS '(AND ATOM CONS)) EQL-OK: NIL (SUBTYPEP 'CONS '(NOT ATOM)) EQL-OK: T (SUBTYPEP 'LIST '(NOT ATOM)) EQL-OK: NIL (SUBTYPEP '(INTEGER 1 5) '(INTEGER 0 7)) EQL-OK: T (SUBTYPEP '(INTEGER 1 5) '(INTEGER 0 (5))) EQL-OK: NIL (SUBTYPEP '(INTEGER 1 5) '(INTEGER 0 5)) EQL-OK: T (SUBTYPEP '(INTEGER 1 5) '(MOD 5)) EQL-OK: NIL (SUBTYPEP '(INTEGER 1 (5)) '(MOD 5)) EQL-OK: T (SUBTYPEP '(OR (INTEGER 1 (5) FLOAT)) '(OR FLOAT (MOD 5))) [SIMPLE-ERROR]: SUBTYPEP: invalid type specification (INTEGER 1 (5) FLOAT) EQL-OK: ERROR (SUBTYPEP '(OR (INTEGER 1 (5)) FLOAT) '(OR FLOAT (MOD 5))) EQL-OK: T (SUBTYPEP '(AND NUMBER (FLOAT 1.0 (5.0))) '(OR FLOAT (MOD 5))) EQL-OK: T (SUBTYPEP '(AND NUMBER (NOT (FLOAT 1.0 (5.0)))) '(OR FLOAT (MOD 5))) EQL-OK: NIL (SUBTYPEP '(AND FLOAT (NOT (FLOAT 1.0 (5.0)))) '(OR FLOAT (MOD 5))) EQL-OK: T (SUBTYPEP '(AND FLOAT (NOT (FLOAT 1.0 (5.0)))) '(OR (FLOAT * 1.0) (FLOAT * 5.0))) EQL-OK: NIL (SUBTYPEP '(SATISFIES CONSP) 'LIST) EQL-OK: NIL (SUBTYPEP 'SIMPLE-STRING 'ARRAY) EQL-OK: T (DEFTYPE MOD1 (N) `(AND NUMBER (FLOAT 0.0 (,N)))) EQL-OK: MOD1 (TYPEP 4.1 '(MOD1 5.0)) EQL-OK: T (TYPEP 4.1 '(MOD1 4.1)) EQL-OK: NIL (SUBTYPEP '(FLOAT 2.3 6.7) '(MOD1 6.8)) EQL-OK: T (SUBTYPEP '(FLOAT 2.3 6.7) '(MOD1 6.7)) EQL-OK: NIL (DEFUN BELIEBIGER-TEST (A) (MEMBER A '(U I V X))) EQL-OK: BELIEBIGER-TEST (NOT (NULL (TYPEP 'U '(SATISFIES BELIEBIGER-TEST)))) EQL-OK: T (TYPEP 'A '(SATISFIES BELIEBIGER-TEST)) EQL-OK: NIL (SUBTYPEP '(MEMBER U I) '(SATISFIES BELIEBIGER-TEST)) EQL-OK: T (SUBTYPEP '(OR (MEMBER U I)) '(SATISFIES BELIEBIGER-TEST)) EQL-OK: T (SUBTYPEP '(OR (MEMBER U I A)) '(SATISFIES BELIEBIGER-TEST)) EQL-OK: NIL (SUBTYPEP '(SATISFIES BELIEBIGER-TEST) '(MEMBER U I V X Y)) EQL-OK: NIL (DEFTYPE BELIEBIGER-TYP NIL '(SATISFIES BELIEBIGER-TEST)) EQL-OK: BELIEBIGER-TYP (NOT (NULL (TYPEP 'U 'BELIEBIGER-TYP))) EQL-OK: T (TYPEP 'A 'BELIEBIGER-TYP) EQL-OK: NIL (TYPEP #\A 'FFI:FOREIGN-ADDRESS) EQL-OK: NIL (SUBTYPEP '(MEMBER U I) 'BELIEBIGER-TYP) EQL-OK: T (SUBTYPEP 'BELIEBIGER-TYP '(MEMBER U I V X Y)) EQL-OK: NIL (SUBTYPEP NIL 'FIXNUM) EQL-OK: T (SUBTYPEP 'SHORT-FLOAT 'FLOAT) EQL-OK: T (SUBTYPEP 'SINGLE-FLOAT 'FLOAT) EQL-OK: T (SUBTYPEP 'DOUBLE-FLOAT 'FLOAT) EQL-OK: T (SUBTYPEP 'LONG-FLOAT 'FLOAT) EQL-OK: T (SUBTYPEP 'NULL 'SYMBOL) EQL-OK: T (SUBTYPEP 'NULL 'LIST) EQL-OK: T (SUBTYPEP 'CONS 'LIST) EQL-OK: T (SUBTYPEP 'STANDARD-CHAR 'STRING-CHAR) EQL-OK: T (SUBTYPEP 'STRING-CHAR 'CHARACTER) EQL-OK: T (SUBTYPEP 'STRING 'VECTOR) EQL-OK: T (SUBTYPEP 'BIT-VECTOR 'VECTOR) EQL-OK: T (SUBTYPEP 'VECTOR 'ARRAY) EQL-OK: T (SUBTYPEP 'SIMPLE-ARRAY 'ARRAY) EQL-OK: T (SUBTYPEP 'SIMPLE-VECTOR 'SIMPLE-ARRAY) EQL-OK: T (SUBTYPEP 'SIMPLE-VECTOR 'VECTOR) EQL-OK: T (SUBTYPEP 'SIMPLE-STRING 'SIMPLE-ARRAY) EQL-OK: T (SUBTYPEP 'SIMPLE-BIT-VECTOR 'SIMPLE-ARRAY) EQL-OK: T (SUBTYPEP 'SIMPLE-STRING 'STRING) EQL-OK: T (SUBTYPEP 'SIMPLE-STRING 'VECTOR) EQL-OK: T (SUBTYPEP 'SIMPLE-STRING 'SIMPLE-VECTOR) EQL-OK: NIL (SUBTYPEP 'SIMPLE-BIT-VECTOR 'BIT-VECTOR) EQL-OK: T (SUBTYPEP 'BIT-VECTOR 'VECTOR) EQL-OK: T (SUBTYPEP 'SIMPLE-BIT-VECTOR 'SIMPLE-VECTOR) EQL-OK: NIL (SUBTYPEP 'UNSIGNED-BYTE 'INTEGER) EQL-OK: T (SUBTYPEP 'SIGNED-BYTE 'INTEGER) EQL-OK: T (SUBTYPEP 'INTEGER '*) [SIMPLE-ERROR]: SUBTYPEP: invalid type specification * EQL-OK: ERROR (TYPE-OF (COERCE '(1 2 3 4) '(SIMPLE-ARRAY (UNSIGNED-BYTE 8)))) EQUAL-OK: (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (4)) (TYPE-OF (COERCE '(1 2 3 4) '(SIMPLE-ARRAY *))) EQUAL-OK: (SIMPLE-VECTOR 4) (TYPE-OF (COERCE '(1 2 3 4) '(SIMPLE-ARRAY * (4)))) EQUAL-OK: (SIMPLE-VECTOR 4) (MULTIPLE-VALUE-LIST (SUBTYPEP 'ATOM 'CONS)) EQUAL-OK: (NIL T) (MULTIPLE-VALUE-LIST (SUBTYPEP 'ATOM 'LIST)) EQUAL-OK: (NIL T) (MULTIPLE-VALUE-LIST (SUBTYPEP 'CONS 'ATOM)) EQUAL-OK: (NIL T) (MULTIPLE-VALUE-LIST (SUBTYPEP 'LIST 'ATOM)) EQUAL-OK: (NIL T) (MULTIPLE-VALUE-LIST (SUBTYPEP 'STREAM 'ATOM)) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP 'STRING 'ATOM)) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP 'VECTOR 'ATOM)) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP NIL NIL)) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP 'EXTENDED-CHAR 'CHARACTER)) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP 'ATOM '(OR CONS (SATISFIES UNKNOWN)))) EQUAL-OK: (NIL NIL) (MULTIPLE-VALUE-LIST (SUBTYPEP '(VECTOR NIL) 'STRING)) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP 'FFI:FOREIGN-FUNCTION 'FUNCTION)) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP '(AND (NOT BOOLEAN) STANDARD-CHAR) 'STANDARD-CHAR)) EQUAL-OK: (T T) (LET ((X 1)) (CTYPECASE X (T 'A))) EQL-OK: A (LET ((X 1)) (ETYPECASE X (T 'A))) EQL-OK: A (MULTIPLE-VALUE-LIST (SUBTYPEP '(AND CONS (NOT (EQL 0))) 'CONS)) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP '(INTEGER 1 2) '(REAL 1 2))) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP '(INTEGER 1 2) '(REAL (1) 2))) EQUAL-OK: (NIL T) (MULTIPLE-VALUE-LIST (SUBTYPEP '(MOD 10) '(OR (MOD 10) (MOD 10)))) EQUAL-OK: (T T) (DEFUN TYPEOF-TYPEP-SUBTYPE (X Y) (LIST (TYPE-OF X) (TYPEP X Y) (SUBTYPEP (TYPE-OF X) Y))) EQL-OK: TYPEOF-TYPEP-SUBTYPE (TYPEOF-TYPEP-SUBTYPE #\Space 'STANDARD-CHAR) EQUAL-OK: (STANDARD-CHAR T T) (TYPEOF-TYPEP-SUBTYPE #\Return 'STANDARD-CHAR) EQUAL-OK: (BASE-CHAR NIL NIL) (TYPEOF-TYPEP-SUBTYPE (SYMBOL-FUNCTION 'LET) 'COMPILED-FUNCTION) EQUAL-OK: (SPECIAL-OPERATOR NIL NIL) (TYPEOF-TYPEP-SUBTYPE (SYMBOL-FUNCTION 'LET) 'FUNCTION) EQUAL-OK: (SPECIAL-OPERATOR NIL NIL) (TYPEOF-TYPEP-SUBTYPE #'CAR 'COMPILED-FUNCTION) EQUAL-OK: (COMPILED-FUNCTION T T) (TYPEOF-TYPEP-SUBTYPE #'CAR 'FUNCTION) EQUAL-OK: (COMPILED-FUNCTION T T) (TYPEOF-TYPEP-SUBTYPE #'CAR 'GENERIC-FUNCTION) EQUAL-OK: (COMPILED-FUNCTION NIL NIL) (TYPEOF-TYPEP-SUBTYPE #'COMPILE 'COMPILED-FUNCTION) EQUAL-OK: (COMPILED-FUNCTION T T) (TYPEOF-TYPEP-SUBTYPE #'COMPILE 'FUNCTION) EQUAL-OK: (COMPILED-FUNCTION T T) (TYPEOF-TYPEP-SUBTYPE #'COMPILE 'GENERIC-FUNCTION) EQUAL-OK: (COMPILED-FUNCTION NIL NIL) (TYPEOF-TYPEP-SUBTYPE #'PRINT-OBJECT 'COMPILED-FUNCTION) EQUAL-OK: (STANDARD-GENERIC-FUNCTION NIL NIL) (TYPEOF-TYPEP-SUBTYPE #'PRINT-OBJECT 'FUNCTION) EQUAL-OK: (STANDARD-GENERIC-FUNCTION T T) (TYPEOF-TYPEP-SUBTYPE #'PRINT-OBJECT 'GENERIC-FUNCTION) EQUAL-OK: (STANDARD-GENERIC-FUNCTION T T) (TYPEOF-TYPEP-SUBTYPE #'PRINT-OBJECT 'STANDARD-GENERIC-FUNCTION) EQUAL-OK: (STANDARD-GENERIC-FUNCTION T T) (TYPEOF-TYPEP-SUBTYPE (MAKE-ARRAY 0 :ELEMENT-TYPE NIL) 'STRING) EQUAL-OK: ((SIMPLE-ARRAY NIL (0)) T T) (TYPEOF-TYPEP-SUBTYPE (MAKE-ARRAY 0 :ELEMENT-TYPE NIL) '(VECTOR NIL)) EQUAL-OK: ((SIMPLE-ARRAY NIL (0)) T T) (SUBTYPEP '(MEMBER 0 1 2) '(MOD 3)) EQL-OK: T (SUBTYPEP '(MOD 3) '(MEMBER 0 1 2)) EQL-OK: T (SUBTYPEP '(MEMBER 0 1 2 4 8) '(MOD 3)) EQL-OK: NIL (SUBTYPEP '(MOD 3) '(MEMBER 0 1 2 4 8)) EQL-OK: T (SUBTYPEP '(OR (INTEGER 0 999) (INTEGER 1001 2000)) '(AND (INTEGER 0 2000) (NOT (EQL 1000)))) EQL-OK: T (SUBTYPEP '(AND (INTEGER 0 2000) (NOT (EQL 1000))) '(OR (INTEGER 0 999) (INTEGER 1001 2000))) EQL-OK: T (SUBTYPEP '(OR (INTEGER 0 1000) (INTEGER 1001 3000)) '(OR (INTEGER 0 2000) (INTEGER 2001 3000))) EQL-OK: T (SUBTYPEP 'COMPLEX '(COMPLEX * *)) EQL-OK: T (SUBTYPEP '(COMPLEX * *) 'COMPLEX) EQL-OK: T (SUBTYPEP 'COMPLEX '(COMPLEX REAL REAL)) EQL-OK: T (SUBTYPEP '(COMPLEX REAL REAL) 'COMPLEX) EQL-OK: T (SUBTYPEP '(COMPLEX * *) '(COMPLEX REAL REAL)) EQL-OK: T (SUBTYPEP '(COMPLEX REAL REAL) '(COMPLEX * *)) EQL-OK: T (SUBTYPEP '(COMPLEX NIL NIL) 'NIL) EQL-OK: T (MULTIPLE-VALUE-LIST (SUBTYPEP '(NOT INTEGER) '(OR NUMBER (SATISFIES ANYTHING)))) EQUAL-OK: (NIL NIL) (MULTIPLE-VALUE-LIST (SUBTYPEP '(AND SYMBOL NUMBER) 'NIL)) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP '(ARRAY T (2 5)) '(OR (ARRAY T (2 3 4)) (ARRAY T (2 4))))) EQUAL-OK: (NIL T) (MULTIPLE-VALUE-LIST (SUBTYPEP '(ARRAY T (2 5)) '(NOT (OR (ARRAY T (2 3 4)) (ARRAY T (2 5)))))) EQUAL-OK: (NIL T) (MULTIPLE-VALUE-LIST (SUBTYPEP '(ARRAY T (2 5)) '(NOT (OR (ARRAY T (2 3 4)) (ARRAY T (2 4)))))) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP '(AND (RATIONAL 2/3 1) RATIO) '(AND (RATIONAL 4/5 1) RATIO))) EQUAL-OK: (NIL T) (MULTIPLE-VALUE-LIST (SUBTYPEP '(RATIONAL 4/5 1) '(OR (MEMBER 1) (RATIONAL 2/3 (1))))) EQUAL-OK: (T T) (LET ((L '(ARRAY BASE-CHAR BASE-STRING BIT-VECTOR BOOLEAN CHARACTER COMPLEX CONS FLOAT FUNCTION GENERIC-FUNCTION HASH-TABLE INTEGER LIST NULL NUMBER PACKAGE PATHNAME LOGICAL-PATHNAME RANDOM-STATE RATIONAL READTABLE REAL SEQUENCE STANDARD-GENERIC-FUNCTION STREAM STRING SYMBOL VECTOR)) (FAILURES 'NIL)) (DOLIST (A L) (DOLIST (B L) (UNLESS (OR (SUBTYPEP A B) (SUBTYPEP B A)) (LET ((CONTAINS-NULL (AND (MEMBER A '(BOOLEAN LIST NULL SEQUENCE SYMBOL)) (MEMBER B '(BOOLEAN LIST NULL SEQUENCE SYMBOL)))) (CONTAINS-VECTOR (AND (MEMBER A '(ARRAY VECTOR SEQUENCE)) (MEMBER B '(ARRAY VECTOR SEQUENCE))))) (UNLESS (IF CONTAINS-NULL (AND (EQUAL (MULTIPLE-VALUE-LIST (SUBTYPEP `(AND ,A ,B) 'NIL)) '(NIL T)) (EQUAL (MULTIPLE-VALUE-LIST (SUBTYPEP `(AND ,A ,B) 'NULL)) '(T T))) (IF CONTAINS-VECTOR (AND (EQUAL (MULTIPLE-VALUE-LIST (SUBTYPEP `(AND ,A ,B) 'NIL)) '(NIL T)) (EQUAL (MULTIPLE-VALUE-LIST (SUBTYPEP `(AND ,A ,B) 'VECTOR)) '(T T))) (EQUAL (MULTIPLE-VALUE-LIST (SUBTYPEP `(AND ,A ,B) 'NIL)) '(T T)))) (PUSH (LIST A B) FAILURES)))))) FAILURES) EQUAL-OK: ((STREAM STANDARD-GENERIC-FUNCTION) (STREAM GENERIC-FUNCTION) (STREAM FUNCTION) (STANDARD-GENERIC-FUNCTION STREAM) (GENERIC-FUNCTION STREAM) #'STREAM) (UNINTERN 'BAR) EQL-OK: T (UNINTERN 'FOO) EQL-OK: T (PROGN (SETQ *DISJOINT-TYPES-LIST* '(CONS SYMBOL ARRAY NUMBER CHARACTER HASH-TABLE FUNCTION READTABLE PACKAGE PATHNAME STREAM RANDOM-STATE CONDITION RESTART)) (DEFCLASS BAR NIL NIL) (DEFSTRUCT FOO)) EQL-OK: FOO (LOOP FOR TYPE IN *DISJOINT-TYPES-LIST* UNLESS (AND (EQUAL (MULTIPLE-VALUE-LIST (SUBTYPEP TYPE 'BAR)) '(NIL T)) (EQUAL (MULTIPLE-VALUE-LIST (SUBTYPEP 'BAR TYPE)) '(NIL T))) COLLECT TYPE) EQL-OK: NIL (LOOP FOR TYPE IN *DISJOINT-TYPES-LIST* UNLESS (AND (EQUAL (MULTIPLE-VALUE-LIST (SUBTYPEP TYPE 'FOO)) '(NIL T)) (EQUAL (MULTIPLE-VALUE-LIST (SUBTYPEP 'FOO TYPE)) '(NIL T))) COLLECT TYPE) EQL-OK: NIL (MULTIPLE-VALUE-LIST (SUBTYPEP '(FUNCTION (T T) CONS) 'FUNCTION)) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP 'FUNCTION '(FUNCTION (T T) CONS))) EQUAL-OK: (NIL NIL) (MULTIPLE-VALUE-LIST (SUBTYPEP '(FUNCTION (INTEGER INTEGER) CONS) '(FUNCTION (T T) CONS))) EQUAL-OK: (NIL NIL) (MULTIPLE-VALUE-LIST (SUBTYPEP '(FUNCTION (T T) CONS) '(FUNCTION (INTEGER INTEGER) CONS))) EQUAL-OK: (NIL NIL) (MULTIPLE-VALUE-LIST (SUBTYPEP '(EQL #) '(FUNCTION (INTEGER INTEGER) CONS))) EQUAL-OK: (NIL NIL) (MULTIPLE-VALUE-LIST (SUBTYPEP '(AND (EQL #) INTEGER) 'CHARACTER)) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP '(AND (EQL #) (FUNCTION (T T) CONS)) 'CHARACTER)) EQUAL-OK: (NIL NIL) (MULTIPLE-VALUE-LIST (SUBTYPEP '(AND (EQL #) FUNCTION) 'CHARACTER)) EQUAL-OK: (NIL T) (MULTIPLE-VALUE-LIST (SUBTYPEP '(AND (EQL #) INTEGER) '(FUNCTION (INTEGER INTEGER) CONS))) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP '(AND (EQL #) (FUNCTION (T T) CONS)) '(FUNCTION (INTEGER INTEGER) CONS))) EQUAL-OK: (NIL NIL) (MULTIPLE-VALUE-LIST (SUBTYPEP '(AND (EQL #) FUNCTION) '(FUNCTION (INTEGER INTEGER) CONS))) EQUAL-OK: (NIL NIL) (MULTIPLE-VALUE-LIST (SUBTYPEP '(AND (EQL #) INTEGER) 'FUNCTION)) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP '(AND (EQL #) (FUNCTION (T T) CONS)) 'FUNCTION)) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP '(AND (EQL #) FUNCTION) 'FUNCTION)) EQUAL-OK: (T T) (LOOP :WITH CLASS = (FIND-CLASS 'VECTOR) :FOR X :IN '((1 0) #(1 0) #*10) :FOR Y = (COERCE X CLASS) :ALWAYS (AND (EQUALP Y #(1 0)) (VECTORP Y))) EQL-OK: T (COERCE 1.0 'COMPLEX) EQL-OK: #C(1.0 0.0) (WITHOUT-PACKAGE-LOCK ("CL") (DEFTYPE OTHERWISE NIL NIL)) EQL-OK: OTHERWISE (TYPECASE 'FOO (OTHERWISE :WRONG) (T :RIGHT)) EQL-OK: :RIGHT (TYPECASE 'FOO (OTHERWISE :WRONG) (SYMBOL :RIGHT) (T :WRONG2)) EQL-OK: :RIGHT (THE FIXNUM (+ 5 7)) EQL-OK: 12 (MULTIPLE-VALUE-LIST (THE (VALUES) (TRUNCATE 3.2 2))) EQUAL-OK: (1 1.2) (MULTIPLE-VALUE-LIST (THE INTEGER (TRUNCATE 3.2 2))) EQUAL-OK: (1 1.2) (MULTIPLE-VALUE-LIST (THE (VALUES INTEGER) (TRUNCATE 3.2 2))) EQUAL-OK: (1 1.2) (MULTIPLE-VALUE-LIST (THE (VALUES INTEGER FLOAT) (TRUNCATE 3.2 2))) EQUAL-OK: (1 1.2) (MULTIPLE-VALUE-LIST (THE (VALUES INTEGER FLOAT SYMBOL) (TRUNCATE 3.2 2))) EQUAL-OK: (1 1.2) (MULTIPLE-VALUE-LIST (THE (VALUES INTEGER FLOAT SYMBOL T NULL LIST) (TRUNCATE 3.2 2))) EQUAL-OK: (1 1.2) (LET ((I 100)) (DECLARE (FIXNUM I)) (THE FIXNUM (1+ I))) EQL-OK: 101 (LET* ((X (LIST 'A 'B 'C)) (Y 5)) (SETF (THE FIXNUM (CAR X)) Y) X) EQUAL-OK: (5 B C) (THE (VALUES) 'A) EQL-OK: A (MULTIPLE-VALUE-LIST (THE (VALUES &REST SYMBOL) (VALUES 'A 'B))) EQUAL-OK: (A B) (HANDLER-CASE (THE FIXNUM 'A) (TYPE-ERROR (C) (CONS (TYPE-ERROR-EXPECTED-TYPE C) (TYPE-ERROR-DATUM C)))) EQUAL-OK: (FIXNUM A) (TYPE-OF (MAKE-ARRAY '(10 3) :ELEMENT-TYPE NIL)) EQUAL-OK: (SIMPLE-ARRAY NIL (10 3)) (TYPE-OF (MAKE-ARRAY 10 :ELEMENT-TYPE NIL)) EQUAL-OK: (SIMPLE-ARRAY NIL (10)) (SUBTYPEP (TYPE-OF 123) 'UNSIGNED-BYTE) EQL-OK: T (SUBTYPEP (TYPE-OF 12345678901234567890) 'UNSIGNED-BYTE) EQL-OK: T (DEFSTRUCT (FOO (:TYPE LIST)) A B) EQL-OK: FOO (MAKE-FOO :A 123) EQUAL-OK: (123 NIL) (MULTIPLE-VALUE-LIST (SUBTYPEP 'FOO 'LIST)) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP 'LIST 'FOO)) EQUAL-OK: (NIL T) (DEFSTRUCT (FOO (:TYPE LIST) :NAMED) A NIL B) EQL-OK: FOO (LET* ((Y (MAKE-FOO :A 123)) (Z (COPY-FOO Y))) (SETF (FOO-NIL Z) 321) (LIST Y Z)) EQUAL-OK: ((FOO 123 NIL NIL) (FOO 123 321 NIL)) (PROGN (MAPC #'UNINTERN '(FOO70 FOO71 FOO72 FOO73 FOO74)) T) EQL-OK: T (DEFSTRUCT (FOO70 (:TYPE (VECTOR (UNSIGNED-BYTE 8)))) X Y) EQL-OK: FOO70 (TYPE-OF (MAKE-FOO70 :X 12 :Y 5)) EQUAL-OK: (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (2)) (TYPE-OF (MAKE-FOO70 :X -1 :Y 1)) [SIMPLE-TYPE-ERROR]: SYSTEM::STORE: -1 does not fit into #(0 0), bad type EQL-OK: ERROR (TYPEP (MAKE-FOO70 :X 12 :Y 5) 'FOO70) EQL-OK: T (DEFSTRUCT (FOO71 (:TYPE LIST) (:INITIAL-OFFSET 5))) EQL-OK: FOO71 (DEFSTRUCT (FOO72 (:TYPE LIST) (:INITIAL-OFFSET 2) (:INCLUDE FOO71))) EQL-OK: FOO72 (LIST (LENGTH (MAKE-FOO71)) (LENGTH (MAKE-FOO72))) EQUAL-OK: (5 7) (TYPEP (MAKE-LIST 6) 'FOO71) EQL-OK: T (TYPEP (MAKE-LIST 6) 'FOO72) EQL-OK: NIL (MULTIPLE-VALUE-LIST (SUBTYPEP '(CONS T (CONS T (CONS T (CONS T (CONS T (CONS T NULL)))))) 'FOO71)) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP '(CONS T (CONS T (CONS T (CONS T (CONS T (CONS T NULL)))))) 'FOO72)) EQUAL-OK: (NIL T) (DEFSTRUCT (FOO73 (:TYPE LIST) (:INITIAL-OFFSET 5) :NAMED)) EQL-OK: FOO73 (DEFSTRUCT (FOO74 (:TYPE LIST) (:INITIAL-OFFSET 2) :NAMED (:INCLUDE FOO73))) EQL-OK: FOO74 (LIST (LENGTH (MAKE-FOO73)) (LENGTH (MAKE-FOO74))) EQUAL-OK: (6 9) (TYPEP (LIST NIL NIL NIL NIL NIL 'FOO73 NIL) 'FOO73) EQL-OK: T (FOO73-P (LIST NIL NIL NIL NIL NIL 'FOO73 NIL)) EQL-OK: T (TYPEP (LIST NIL NIL NIL NIL NIL 'FOO73 NIL NIL 'FOO74) 'FOO73) EQL-OK: T (FOO74-P (LIST NIL NIL NIL NIL NIL 'FOO73 NIL NIL 'FOO74)) EQL-OK: T (TYPEP (LIST* NIL NIL NIL NIL NIL 'FOO73 NIL 'TAIL) 'FOO74) EQL-OK: NIL (FOO74-P (LIST* NIL NIL NIL NIL NIL 'FOO73 NIL 'TAIL)) EQL-OK: NIL (MULTIPLE-VALUE-LIST (SUBTYPEP '(CONS T (CONS T (CONS T (CONS T (CONS T (CONS (EQL FOO73) NULL)))))) 'FOO73)) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP '(CONS T (CONS T (CONS T (CONS T (CONS T (CONS (EQL FOO73) NULL)))))) 'FOO74)) EQUAL-OK: (NIL T) (MULTIPLE-VALUE-LIST (SUBTYPEP '(AND SIMPLE-ERROR TYPE-ERROR) 'ERROR)) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP '(OR SIMPLE-ERROR TYPE-ERROR) 'CONDITION)) EQUAL-OK: (T T) (PROGN (DEFSTRUCT (FOO129A (:TYPE LIST)) SLOT1 (SLOT2 T) (SLOT3 (FLOOR PI)) (SLOT4 44)) (DEFSTRUCT (FOO129B (:TYPE LIST) (:INCLUDE FOO129A (SLOT4 -44))) SLOT5 (SLOT6 T) (SLOT7 (FLOOR (* PI PI))) (SLOT8 88)) (LET ((A (MAKE-FOO129B))) (LIST (FOO129B-SLOT1 A) (FOO129B-SLOT2 A) (FOO129B-SLOT3 A) (FOO129B-SLOT4 A) (FOO129B-SLOT5 A) (FOO129B-SLOT6 A) (FOO129B-SLOT7 A) (FOO129B-SLOT8 A)))) EQUAL-OK: (NIL T 3 -44 NIL T 9 88) (LET ((*BREAK-ON-SIGNALS* T) A) (DEFSTRUCT (FOO139 (:PREDICATE IS-FOO139)) P) (SETQ A (MAKE-FOO139 :P 10)) (LIST (IS-FOO139 A) (FOO139-P A))) EQUAL-OK: (T 10) (LET ((*BREAK-ON-SIGNALS* T) A) (DEFSTRUCT (FOO140 (:PREDICATE IS-FOO140) (:TYPE VECTOR) :NAMED) P) (SETQ A (MAKE-FOO140 :P 10)) (LIST (IS-FOO140 A) (FOO140-P A))) EQUAL-OK: (T 10) (DEFMACRO CHECK-TYPE-ERROR (&BODY FORMS) `(BLOCK NIL (HANDLER-BIND ((TYPE-ERROR (LAMBDA (C) (RETURN (TYPEP (TYPE-ERROR-DATUM C) (TYPE-ERROR-EXPECTED-TYPE C)))))) ,@FORMS))) EQL-OK: CHECK-TYPE-ERROR (CHECK-TYPE-ERROR (GETF '(A . B) 'C)) EQL-OK: NIL (CHECK-TYPE-ERROR (GET-PROPERTIES '(A 1 B 2 C . D) '(X Y))) EQL-OK: NIL (CHECK-TYPE-ERROR (FBOUNDP #'CAR)) EQL-OK: NIL (TYPEP '#1=(A 1 B 2 #1#) 'SYSTEM::PLIST) EQL-OK: NIL (CHECK-TYPE-ERROR (UNION NIL "A")) EQL-OK: NIL (MULTIPLE-VALUE-LIST (SUBTYPEP CHARSET:UCS-4 CHARSET:UTF-8)) EQUAL-OK: (T T) (MULTIPLE-VALUE-LIST (SUBTYPEP CHARSET:UTF-8 CHARSET:UCS-4)) EQUAL-OK: (T T) (TYPE-OF (BYTE 1 2)) EQL-OK: BYTE (TYPEP (BYTE 1 2) 'BYTE) EQL-OK: T (ETYPECASE (BYTE 1 2) (INTEGER 'INTEGER) (BYTE T) (LIST 'LIST)) EQL-OK: T (MAPCAN (LAMBDA (TYPE) (AND (TYPEP 0 TYPE) (LIST TYPE))) '(ARRAY ATOM BASE-CHAR BASE-STRING BIGNUM BIT BIT-VECTOR BROADCAST-STREAM BUILT-IN-CLASS CELL-ERROR CHARACTER CLASS COMPILED-FUNCTION COMPLEX CONCATENATED-STREAM CONDITION CONS CONTROL-ERROR DIVISION-BY-ZERO DOUBLE-FLOAT ECHO-STREAM END-OF-FILE ERROR EXTENDED-CHAR FILE-ERROR FILE-STREAM FIXNUM FLOAT FLOATING-POINT-INEXACT FLOATING-POINT-INVALID-OPERATION FLOATING-POINT-OVERFLOW FLOATING-POINT-UNDERFLOW FUNCTION GENERIC-FUNCTION HASH-TABLE INTEGER KEYWORD LIST LOGICAL-PATHNAME LONG-FLOAT METHOD METHOD-COMBINATION NIL NULL NUMBER PACKAGE PACKAGE-ERROR PARSE-ERROR PATHNAME PRINT-NOT-READABLE PROGRAM-ERROR RANDOM-STATE RATIO RATIONAL READER-ERROR READTABLE REAL RESTART SEQUENCE SERIOUS-CONDITION SHORT-FLOAT 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 STANDARD-CHAR STANDARD-CLASS STANDARD-GENERIC-FUNCTION STANDARD-METHOD STANDARD-OBJECT STORAGE-CONDITION STREAM STREAM-ERROR STRING STRING-STREAM STRUCTURE-CLASS STRUCTURE-OBJECT STYLE-WARNING SYMBOL SYNONYM-STREAM T TWO-WAY-STREAM TYPE-ERROR UNBOUND-SLOT UNBOUND-VARIABLE UNDEFINED-FUNCTION UNSIGNED-BYTE VECTOR WARNING)) EQUAL-OK: (ATOM BIT FIXNUM INTEGER NUMBER RATIONAL REAL SIGNED-BYTE T UNSIGNED-BYTE) (LET ((SYM (GENSYM))) (PROCLAIM `(DECLARATION ,SYM)) (EVAL `(DEFTYPE ,SYM NIL T))) [SIMPLE-ERROR]: DEFTYPE: #:G2376 names a DECLARATION, cannot name a type EQL-OK: ERROR (LET ((SYM (GENSYM))) (PROCLAIM `(DECLARATION ,SYM)) (EVAL `(DEFSTRUCT ,SYM A B C))) [SIMPLE-ERROR]: DEFSTRUCT: #:G2377 names a DECLARATION, cannot name a type EQL-OK: ERROR (LET ((SYM (GENSYM))) (PROCLAIM `(DECLARATION ,SYM)) (EVAL `(DEFCLASS ,SYM NIL (A B C)))) [SIMPLE-ERROR]: DEFCLASS: #:G2378 names a DECLARATION, cannot name a type EQL-OK: ERROR (LET ((SYM (GENSYM))) (PROCLAIM `(DECLARATION ,SYM)) (EVAL `(DEFINE-CONDITION ,SYM (CONDITION) (A B C)))) [SIMPLE-ERROR]: DEFINE-CONDITION: #:G2379 names a DECLARATION, cannot name a type EQL-OK: ERROR (LET ((SYM (GENSYM))) (EVAL `(DEFTYPE ,SYM NIL T)) (PROCLAIM `(DECLARATION ,SYM))) [SIMPLE-ERROR]: PROCLAIM: #:G2380 defines a type, cannot be declared a DECLARATION EQL-OK: ERROR (LET ((SYM (GENSYM))) (EVAL `(DEFSTRUCT ,SYM A B C)) (PROCLAIM `(DECLARATION ,SYM))) [SIMPLE-ERROR]: PROCLAIM: #1=#:G2381 defines a type, cannot be declared a DECLARATION EQL-OK: ERROR (LET ((SYM (GENSYM))) (EVAL `(DEFCLASS ,SYM NIL (A B C))) (PROCLAIM `(DECLARATION ,SYM))) [SIMPLE-ERROR]: PROCLAIM: #1=#:G2383 defines a type, cannot be declared a DECLARATION EQL-OK: ERROR (LET ((SYM (GENSYM))) (EVAL `(DEFINE-CONDITION ,SYM (CONDITION) (A B C))) (PROCLAIM `(DECLARATION ,SYM))) [SIMPLE-ERROR]: PROCLAIM: #1=#:G2386 defines a type, cannot be declared a DECLARATION EQL-OK: ERROR (LET ((TLDL (SYSTEM::TOP-LEVEL-DECLARATIONS))) (SETF (CDR TLDL) (DELETE-IF-NOT #'SYMBOL-PACKAGE (CDR TLDL))) (EVERY #'SYMBOL-PACKAGE TLDL)) EQL-OK: T (SYMBOLS-CLEANUP '(MOD1 BELIEBIGER-TEST BELIEBIGER-TYP TYPEOF-TYPEP-SUBTYPE *DISJOINT-TYPES-LIST* BAR FOO FOO70 FOO71 FOO72 FOO73 FOO74 FOO129A FOO129B FOO139 FOO140 CHECK-TYPE-ERROR)) EQL-OK: NIL RUN-TEST: finished "type" (0 errors out of 289 tests) RUN-TEST: started # (DIGIT-CHAR-P #\KHMER_DIGIT_ZERO) EQL-OK: 0 (TYPE-OF (READ-FROM-STRING (STRING #\KHMER_DIGIT_ZERO))) EQL-OK: SYMBOL (PROCLAIM '(INLINE SOME-FUNCTION)) EQL-OK: NIL (DECLAIM (INLINE SOME-FUNCTION)) EQL-OK: NIL (LET (A) (DOTIMES (I 3) (PUSH (LAMBDA NIL I) A)) (LOOP FOR X IN A COLLECT (FUNCALL X))) EQUAL-OK: (3 3 3) (LET (A) (DOLIST (I '(0 1 2)) (PUSH (LAMBDA NIL I) A)) (LOOP FOR X IN A COLLECT (FUNCALL X))) EQUAL-OK: (2 2 2) (FBOUNDP '(SETF CAR)) EQL-OK: NIL (LET ((L (LIST 1 2 3))) (NREVERSE L) L) EQUAL-OK: (3 2 1) (LET ((L (LIST 1 2 3))) (NRECONC L 'A) L) EQUAL-OK: (3 2 1 . A) (LET ((S (MAKE-STRING 2))) (SETF (CHAR S 0) #\a) (SETF (CHAR S 1) #\b) (NREVERSE S) S) EQUAL-OK: "ba" (LET ((H (MAKE-HASH-TABLE))) (PUSHNEW 1 (GETHASH 2 H '(1))) (MULTIPLE-VALUE-LIST (GETHASH 2 H))) EQUAL-OK: ((1) T) (READ-FROM-STRING "#3()") [SIMPLE-READER-ERROR]: READ from #1=#: must specify elements of VECTOR of length 3 EQL-OK: ERROR (PROGN (PROCLAIM '(SPECIAL FIRST-SPECIAL-THEN-MACRO)) T) EQL-OK: T (DEFINE-SYMBOL-MACRO FIRST-SPECIAL-THEN-MACRO *PRINT-CASE*) [SIMPLE-PROGRAM-ERROR]: SYSTEM::%PROCLAIM-SYMBOL-MACRO: the symbol FIRST-SPECIAL-THEN-MACRO names a global SPECIAL variable EQL-OK: ERROR (DEFINE-SYMBOL-MACRO FIRST-MACRO-THEN-SPECIAL *PRINT-CASE*) EQL-OK: FIRST-MACRO-THEN-SPECIAL (PROGN (PROCLAIM '(SPECIAL FIRST-MACRO-THEN-SPECIAL)) T) [SIMPLE-PROGRAM-ERROR]: PROCLAIM: attempting to turn FIRST-MACRO-THEN-SPECIAL into a SPECIAL variable, but it is already a global SYMBOL-MACRO. EQL-OK: ERROR (TAGBODY (BLOCK TRY-RETURN (UNWIND-PROTECT (GO EXIT) (RETURN-FROM TRY-RETURN))) EXIT) EQL-OK: NIL (BLOCK TRY-RETURN (TAGBODY (BLOCK TRY-RETURN (UNWIND-PROTECT (GO EXIT) (RETURN-FROM TRY-RETURN))) EXIT) (RETURN-FROM TRY-RETURN T)) EQL-OK: T (BLOCK NIL (PROG ((X (RETURN :OUTER-LET))) (RETURN :NEVER)) (RETURN :CLHS)) EQL-OK: :CLHS (DOLIST (I '(1 2 . 3) I)) [SIMPLE-TYPE-ERROR]: ENDP: A proper list must not end with 3 EQL-OK: ERROR (LOOP FOR I IN '(1 2 . 3) COUNT T) [SIMPLE-TYPE-ERROR]: ENDP: A proper list must not end with 3 EQL-OK: ERROR (BUTLAST '(1 2 . 3) 0) EQUAL-OK: (1 2) (LIST 1 NIL 2) EQUAL-OK: (1 NIL 2) (LET ((X (LIST 1))) (MULTIPLE-VALUE-LIST (SETF (VALUES (CAR X) (CDR X)) (VALUES 2 3 4)))) EQUAL-OK: (2 3) (LET (A (B T) C) (SETF (VALUES (VALUES A B) C) (VALUES 1 2 3 4)) (LIST A B C)) EQUAL-OK: (1 NIL 2) (LOOP REPEAT 3.5 COUNT T) EQL-OK: 4 (LOOP FOR I DOWNFROM (- 3.5 1) TO 0 COUNT T) EQL-OK: 3 (LENGTH '(1 2 . 3)) [SIMPLE-TYPE-ERROR]: LENGTH: A proper list must not end with 3 EQL-OK: ERROR (LIST-LENGTH '(1 2 . 3)) [SIMPLE-TYPE-ERROR]: LIST-LENGTH: A proper list must not end with 3 EQL-OK: ERROR (LET ((L (LIST 1 2 3))) (DELETE 2 L) L) EQUAL-OK: (1 3) (SYMBOLS-CLEANUP '(FIRST-SPECIAL-THEN-MACRO FIRST-MACRO-THEN-SPECIAL)) EQL-OK: NIL RUN-TEST: finished "unportable" (0 errors out of 31 tests) RUN-TEST: started # (MAPCAR #'(LAMBDA (X) (LIST (WEAK-POINTER-P X) (WEAK-LIST-P X) (WEAK-AND-RELATION-P X) (WEAK-OR-RELATION-P X) (WEAK-MAPPING-P X) (WEAK-AND-MAPPING-P X) (WEAK-OR-MAPPING-P X) (WEAK-ALIST-P X) (STRINGP (WITH-OUTPUT-TO-STRING (*STANDARD-OUTPUT*) (DESCRIBE X))))) (LIST '(A B C) #(A B C) (MAKE-WEAK-POINTER (LIST 'X)) (MAKE-WEAK-LIST (LIST 'X 'Y 'Z)) (MAKE-WEAK-AND-RELATION (LIST (LIST 'X))) (MAKE-WEAK-OR-RELATION (LIST (LIST 'X))) (MAKE-WEAK-MAPPING '#:G15 '#:G16) (MAKE-WEAK-AND-MAPPING (LIST '#:G15 '#:G16) '#:G17) (MAKE-WEAK-OR-MAPPING (LIST '#:G15 '#:G16) '#:G17) (MAKE-WEAK-ALIST))) EQUAL-OK: ((NIL NIL NIL NIL NIL NIL NIL NIL T) (NIL NIL NIL NIL NIL NIL NIL NIL T) (T NIL NIL NIL NIL NIL NIL NIL T) (NIL T NIL NIL NIL NIL NIL NIL T) (NIL NIL T NIL NIL NIL NIL NIL T) (NIL NIL NIL T NIL NIL NIL NIL T) (NIL NIL NIL NIL T NIL NIL NIL T) (NIL NIL NIL NIL NIL T NIL NIL T) (NIL NIL NIL NIL NIL NIL T NIL T) (NIL NIL NIL NIL NIL NIL NIL T T)) (LET ((A (LIST 'X))) (LET ((W (MAKE-WEAK-POINTER A))) (GC) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE W)))) EQUAL-OK: ((X) T) (LET ((A (LIST 'X))) (LET ((W (MAKE-WEAK-POINTER A))) (SETQ A (LIST 'Y)) (GC) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE W)))) EQUAL-OK: (NIL NIL) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-LIST (LIST A B C)))) (GC) (WEAK-LIST-LIST W))) EQUAL-OK: ((X) (Y) (Z)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-LIST (LIST A B C)))) (SETQ A NIL) (GC) (WEAK-LIST-LIST W))) EQUAL-OK: ((Y) (Z)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-LIST (LIST A B C)))) (SETQ B NIL) (GC) (WEAK-LIST-LIST W))) EQUAL-OK: ((X) (Z)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-LIST (LIST A B C)))) (SETQ C NIL) (GC) (WEAK-LIST-LIST W))) EQUAL-OK: ((X) (Y)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-LIST (LIST A B C)))) (SETQ A 1 B 2 C 3) (GC) (WEAK-LIST-LIST W))) EQL-OK: NIL (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-LIST (LIST A B C)))) (SETQ A NIL) (GC) (SETF (WEAK-LIST-LIST W) (LIST C B)) (GC) (WEAK-LIST-LIST W))) EQUAL-OK: ((Z) (Y)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-LIST (LIST A B C)))) (SETQ A NIL C NIL) (GC) (SETQ C (LIST 'ZZ)) (SETF (WEAK-LIST-LIST W) (LIST C C B C)) (GC) (WEAK-LIST-LIST W))) EQUAL-OK: ((ZZ) (ZZ) (Y) (ZZ)) (LET ((LI 'NIL)) (LOOP :FOR I :FROM 0 :TO 1000 :FOR STRING = (FORMAT NIL "~r" I) :DO (PUSH STRING LI)) (SETQ LI (NREVERSE LI)) (LET ((W (MAKE-WEAK-LIST LI))) (LIST (PROGN (GC) (LENGTH (WEAK-LIST-LIST W))) (PROGN (SETQ LI NIL) (GC) (LENGTH (WEAK-LIST-LIST W)))))) EQUAL-OK: (1001 0) (LET ((A (LIST 'X))) (LET ((W (MAKE-WEAK-AND-RELATION (LIST A)))) (GC) (WEAK-AND-RELATION-LIST W))) EQUAL-OK: ((X)) (LET ((A (LIST 'X))) (LET ((W (MAKE-WEAK-AND-RELATION (LIST A)))) (SETQ A (LIST 'Y)) (GC) (WEAK-AND-RELATION-LIST W))) EQL-OK: NIL (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-AND-RELATION (LIST A B C)))) (GC) (WEAK-AND-RELATION-LIST W))) EQUAL-OK: ((X) (Y) (Z)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-AND-RELATION (LIST A B C)))) (SETQ A NIL) (GC) (WEAK-AND-RELATION-LIST W))) EQL-OK: NIL (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-AND-RELATION (LIST A B C)))) (SETQ B NIL) (GC) (WEAK-AND-RELATION-LIST W))) EQL-OK: NIL (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-AND-RELATION (LIST A B C)))) (SETQ C NIL) (GC) (WEAK-AND-RELATION-LIST W))) EQL-OK: NIL (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-AND-RELATION (LIST A (MAKE-WEAK-AND-RELATION (LIST A B)))))) (GC) (WEAK-AND-RELATION-LIST W))) EQL-OK: NIL (LET ((A (LIST 'X))) (LET ((W (MAKE-WEAK-OR-RELATION (LIST A)))) (GC) (WEAK-OR-RELATION-LIST W))) EQUAL-OK: ((X)) (LET ((A (LIST 'X))) (LET ((W (MAKE-WEAK-OR-RELATION (LIST A)))) (SETQ A (LIST 'Y)) (GC) (WEAK-OR-RELATION-LIST W))) EQL-OK: NIL (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-OR-RELATION (LIST A B C)))) (GC) (WEAK-OR-RELATION-LIST W))) EQUAL-OK: ((X) (Y) (Z)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-OR-RELATION (LIST A B C)))) (SETQ A NIL B NIL) (GC) (WEAK-OR-RELATION-LIST W))) EQUAL-OK: ((X) (Y) (Z)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-OR-RELATION (LIST A B C)))) (SETQ B NIL C NIL) (GC) (WEAK-OR-RELATION-LIST W))) EQUAL-OK: ((X) (Y) (Z)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-OR-RELATION (LIST A B C)))) (SETQ A NIL C NIL) (GC) (WEAK-OR-RELATION-LIST W))) EQUAL-OK: ((X) (Y) (Z)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-OR-RELATION (LIST A B C)))) (SETQ A NIL B NIL C NIL) (GC) (WEAK-OR-RELATION-LIST W))) EQL-OK: NIL (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-OR-RELATION (LIST A (MAKE-WEAK-OR-RELATION (LIST A B)))))) (GC) (MAPCAR #'TYPE-OF (WEAK-OR-RELATION-LIST W)))) EQUAL-OK: (CONS WEAK-OR-RELATION) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-OR-RELATION (LIST A (MAKE-WEAK-OR-RELATION (LIST A B)))))) (SETQ B NIL) (GC) (WEAK-OR-RELATION-LIST (SECOND (WEAK-OR-RELATION-LIST W))))) EQUAL-OK: ((X) (Y)) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-OR-RELATION (LIST (MAKE-WEAK-OR-RELATION (LIST A B)) B)))) (SETQ A NIL) (GC) (WEAK-OR-RELATION-LIST (FIRST (WEAK-OR-RELATION-LIST W))))) EQUAL-OK: ((X) (Y)) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-MAPPING A B))) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-MAPPING-VALUE W))))) EQUAL-OK: (((X) (Y) T) ((Y))) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-MAPPING A B))) (SETQ B NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-MAPPING-VALUE W))))) EQUAL-OK: (((X) (Y) T) ((Y))) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-MAPPING A B))) (SETQ A NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-MAPPING A B))) (SETQ A NIL B NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-MAPPING A3 A4)) (W2 (MAKE-WEAK-MAPPING A1 A2)) (W3 (MAKE-WEAK-MAPPING A4 A5)) (W4 (MAKE-WEAK-MAPPING A2 A3))) (SETQ A2 NIL A3 NIL A4 NIL A5 NIL) (GC) (LIST (WEAK-MAPPING-VALUE W2) (WEAK-MAPPING-VALUE W4) (WEAK-MAPPING-VALUE W1) (WEAK-MAPPING-VALUE W3)))) EQUAL-OK: ((X2) (X3) (X4) (X5)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-MAPPING A3 A4)) (W2 (MAKE-WEAK-MAPPING A1 A2)) (W3 (MAKE-WEAK-MAPPING A4 A5)) (W4 (MAKE-WEAK-MAPPING A2 A3))) (SETQ A1 NIL A3 NIL A4 NIL A5 NIL) (GC) (LIST (WEAK-MAPPING-VALUE W2) (WEAK-MAPPING-VALUE W4) (WEAK-MAPPING-VALUE W1) (WEAK-MAPPING-VALUE W3)))) EQUAL-OK: (NIL (X3) (X4) (X5)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-MAPPING A3 A4)) (W2 (MAKE-WEAK-MAPPING A1 A2)) (W3 (MAKE-WEAK-MAPPING A4 A5)) (W4 (MAKE-WEAK-MAPPING A2 A3))) (SETQ A1 NIL A2 NIL A4 NIL A5 NIL) (GC) (LIST (WEAK-MAPPING-VALUE W2) (WEAK-MAPPING-VALUE W4) (WEAK-MAPPING-VALUE W1) (WEAK-MAPPING-VALUE W3)))) EQUAL-OK: (NIL NIL (X4) (X5)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-MAPPING A3 A4)) (W2 (MAKE-WEAK-MAPPING A1 A2)) (W3 (MAKE-WEAK-MAPPING A4 A5)) (W4 (MAKE-WEAK-MAPPING A2 A3))) (SETQ A1 NIL A2 NIL A3 NIL A5 NIL) (GC) (LIST (WEAK-MAPPING-VALUE W2) (WEAK-MAPPING-VALUE W4) (WEAK-MAPPING-VALUE W1) (WEAK-MAPPING-VALUE W3)))) EQUAL-OK: (NIL NIL NIL (X5)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-MAPPING A3 A4)) (W2 (MAKE-WEAK-MAPPING A1 A2)) (W3 (MAKE-WEAK-MAPPING A4 A5)) (W4 (MAKE-WEAK-MAPPING A2 A3))) (SETQ A1 NIL A2 NIL A3 NIL A4 NIL) (GC) (LIST (WEAK-MAPPING-VALUE W2) (WEAK-MAPPING-VALUE W4) (WEAK-MAPPING-VALUE W1) (WEAK-MAPPING-VALUE W3)))) EQUAL-OK: (NIL NIL NIL NIL) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-MAPPING A B))) (SETF (WEAK-MAPPING-VALUE W) C) (LIST (MULTIPLE-VALUE-LIST (WEAK-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-MAPPING-VALUE W))))) EQUAL-OK: (((X) (Z) T) ((Z))) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-MAPPING A B))) (SETF (WEAK-MAPPING-VALUE W) C) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-MAPPING-VALUE W))))) EQUAL-OK: (((X) (Z) T) ((Z))) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-MAPPING A B))) (GC) (SETF (WEAK-MAPPING-VALUE W) C) (LIST (MULTIPLE-VALUE-LIST (WEAK-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-MAPPING-VALUE W))))) EQUAL-OK: (((X) (Z) T) ((Z))) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-MAPPING A B))) (SETQ A NIL) (SETF (WEAK-MAPPING-VALUE W) C) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-MAPPING A B))) (SETQ A NIL) (GC) (SETF (WEAK-MAPPING-VALUE W) C) (LIST (MULTIPLE-VALUE-LIST (WEAK-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-AND-MAPPING (LIST A) B))) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-VALUE W))))) EQUAL-OK: ((((X)) (Y) T) ((Y))) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-AND-MAPPING (LIST A) B))) (SETQ B NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-VALUE W))))) EQUAL-OK: ((((X)) (Y) T) ((Y))) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-AND-MAPPING (LIST A) B))) (SETQ A NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-AND-MAPPING (LIST A) B))) (SETQ A NIL B NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z)) (D (LIST 'R))) (LET ((W (MAKE-WEAK-AND-MAPPING (LIST A B C) D))) (SETQ D NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-VALUE W))))) EQUAL-OK: ((((X) (Y) (Z)) (R) T) ((R))) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z)) (D (LIST 'R))) (LET ((W (MAKE-WEAK-AND-MAPPING (LIST A B C) D))) (SETQ A NIL D NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z)) (D (LIST 'R))) (LET ((W (MAKE-WEAK-AND-MAPPING (LIST A B C) D))) (SETQ B NIL D NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z)) (D (LIST 'R))) (LET ((W (MAKE-WEAK-AND-MAPPING (LIST A B C) D))) (SETQ C NIL D NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (D (LIST 'R))) (LET ((W (MAKE-WEAK-AND-MAPPING (LIST A (MAKE-WEAK-AND-MAPPING (LIST A B) D)) D))) (SETQ D NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-AND-MAPPING (LIST A3) A4)) (W2 (MAKE-WEAK-AND-MAPPING (LIST A1) A2)) (W3 (MAKE-WEAK-AND-MAPPING (LIST A4) A5)) (W4 (MAKE-WEAK-AND-MAPPING (LIST A2) A3))) (SETQ A2 NIL A3 NIL A4 NIL A5 NIL) (GC) (LIST (WEAK-AND-MAPPING-VALUE W2) (WEAK-AND-MAPPING-VALUE W4) (WEAK-AND-MAPPING-VALUE W1) (WEAK-AND-MAPPING-VALUE W3)))) EQUAL-OK: ((X2) (X3) (X4) (X5)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-AND-MAPPING (LIST A3) A4)) (W2 (MAKE-WEAK-AND-MAPPING (LIST A1) A2)) (W3 (MAKE-WEAK-AND-MAPPING (LIST A4) A5)) (W4 (MAKE-WEAK-AND-MAPPING (LIST A2) A3))) (SETQ A1 NIL A3 NIL A4 NIL A5 NIL) (GC) (LIST (WEAK-AND-MAPPING-VALUE W2) (WEAK-AND-MAPPING-VALUE W4) (WEAK-AND-MAPPING-VALUE W1) (WEAK-AND-MAPPING-VALUE W3)))) EQUAL-OK: (NIL (X3) (X4) (X5)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-AND-MAPPING (LIST A3) A4)) (W2 (MAKE-WEAK-AND-MAPPING (LIST A1) A2)) (W3 (MAKE-WEAK-AND-MAPPING (LIST A4) A5)) (W4 (MAKE-WEAK-AND-MAPPING (LIST A2) A3))) (SETQ A1 NIL A2 NIL A4 NIL A5 NIL) (GC) (LIST (WEAK-AND-MAPPING-VALUE W2) (WEAK-AND-MAPPING-VALUE W4) (WEAK-AND-MAPPING-VALUE W1) (WEAK-AND-MAPPING-VALUE W3)))) EQUAL-OK: (NIL NIL (X4) (X5)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-AND-MAPPING (LIST A3) A4)) (W2 (MAKE-WEAK-AND-MAPPING (LIST A1) A2)) (W3 (MAKE-WEAK-AND-MAPPING (LIST A4) A5)) (W4 (MAKE-WEAK-AND-MAPPING (LIST A2) A3))) (SETQ A1 NIL A2 NIL A3 NIL A5 NIL) (GC) (LIST (WEAK-AND-MAPPING-VALUE W2) (WEAK-AND-MAPPING-VALUE W4) (WEAK-AND-MAPPING-VALUE W1) (WEAK-AND-MAPPING-VALUE W3)))) EQUAL-OK: (NIL NIL NIL (X5)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-AND-MAPPING (LIST A3) A4)) (W2 (MAKE-WEAK-AND-MAPPING (LIST A1) A2)) (W3 (MAKE-WEAK-AND-MAPPING (LIST A4) A5)) (W4 (MAKE-WEAK-AND-MAPPING (LIST A2) A3))) (SETQ A1 NIL A2 NIL A3 NIL A4 NIL) (GC) (LIST (WEAK-AND-MAPPING-VALUE W2) (WEAK-AND-MAPPING-VALUE W4) (WEAK-AND-MAPPING-VALUE W1) (WEAK-AND-MAPPING-VALUE W3)))) EQUAL-OK: (NIL NIL NIL NIL) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-AND-MAPPING (LIST A) B))) (SETF (WEAK-AND-MAPPING-VALUE W) C) (LIST (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-VALUE W))))) EQUAL-OK: ((((X)) (Z) T) ((Z))) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-AND-MAPPING (LIST A) B))) (SETF (WEAK-AND-MAPPING-VALUE W) C) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-VALUE W))))) EQUAL-OK: ((((X)) (Z) T) ((Z))) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-AND-MAPPING (LIST A) B))) (GC) (SETF (WEAK-AND-MAPPING-VALUE W) C) (LIST (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-VALUE W))))) EQUAL-OK: ((((X)) (Z) T) ((Z))) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-AND-MAPPING (LIST A) B))) (SETQ A NIL) (SETF (WEAK-AND-MAPPING-VALUE W) C) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-AND-MAPPING (LIST A) B))) (SETQ A NIL) (GC) (SETF (WEAK-AND-MAPPING-VALUE W) C) (LIST (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-AND-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-OR-MAPPING (LIST A) B))) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-VALUE W))))) EQUAL-OK: ((((X)) (Y) T) ((Y))) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-OR-MAPPING (LIST A) B))) (SETQ B NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-VALUE W))))) EQUAL-OK: ((((X)) (Y) T) ((Y))) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-OR-MAPPING (LIST A) B))) (SETQ A NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-OR-MAPPING (LIST A) B))) (SETQ A NIL B NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z)) (D (LIST 'R))) (LET ((W (MAKE-WEAK-OR-MAPPING (LIST A B C) D))) (SETQ D NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-VALUE W))))) EQUAL-OK: ((((X) (Y) (Z)) (R) T) ((R))) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z)) (D (LIST 'R))) (LET ((W (MAKE-WEAK-OR-MAPPING (LIST A B C) D))) (SETQ A NIL B NIL D NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-VALUE W))))) EQUAL-OK: ((((X) (Y) (Z)) (R) T) ((R))) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z)) (D (LIST 'R))) (LET ((W (MAKE-WEAK-OR-MAPPING (LIST A B C) D))) (SETQ B NIL C NIL D NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-VALUE W))))) EQUAL-OK: ((((X) (Y) (Z)) (R) T) ((R))) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z)) (D (LIST 'R))) (LET ((W (MAKE-WEAK-OR-MAPPING (LIST A B C) D))) (SETQ A NIL C NIL D NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-VALUE W))))) EQUAL-OK: ((((X) (Y) (Z)) (R) T) ((R))) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z)) (D (LIST 'R))) (LET ((W (MAKE-WEAK-OR-MAPPING (LIST A B C) D))) (SETQ A NIL B NIL C NIL D NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (D (LIST 'R))) (LET ((W (MAKE-WEAK-OR-MAPPING (LIST A (MAKE-WEAK-OR-MAPPING (LIST A B) D)) D))) (SETQ D NIL) (GC) (MAPCAR #'TYPE-OF (WEAK-OR-MAPPING-PAIR W)))) EQUAL-OK: (CONS WEAK-OR-MAPPING) (LET ((A (LIST 'X)) (B (LIST 'Y)) (D (LIST 'R))) (LET ((W (MAKE-WEAK-OR-MAPPING (LIST A (MAKE-WEAK-OR-MAPPING (LIST A B) D)) D))) (SETQ B NIL D NIL) (GC) (WEAK-OR-MAPPING-PAIR (SECOND (WEAK-OR-MAPPING-PAIR W))))) EQUAL-OK: ((X) (Y)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (D (LIST 'R))) (LET ((W (MAKE-WEAK-OR-MAPPING (LIST (MAKE-WEAK-OR-MAPPING (LIST A B) D) B) D))) (SETQ A NIL D NIL) (GC) (WEAK-OR-MAPPING-PAIR (FIRST (WEAK-OR-MAPPING-PAIR W))))) EQUAL-OK: ((X) (Y)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-OR-MAPPING (LIST A3) A4)) (W2 (MAKE-WEAK-OR-MAPPING (LIST A1) A2)) (W3 (MAKE-WEAK-OR-MAPPING (LIST A4) A5)) (W4 (MAKE-WEAK-OR-MAPPING (LIST A2) A3))) (SETQ A2 NIL A3 NIL A4 NIL A5 NIL) (GC) (LIST (WEAK-OR-MAPPING-VALUE W2) (WEAK-OR-MAPPING-VALUE W4) (WEAK-OR-MAPPING-VALUE W1) (WEAK-OR-MAPPING-VALUE W3)))) EQUAL-OK: ((X2) (X3) (X4) (X5)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-OR-MAPPING (LIST A3) A4)) (W2 (MAKE-WEAK-OR-MAPPING (LIST A1) A2)) (W3 (MAKE-WEAK-OR-MAPPING (LIST A4) A5)) (W4 (MAKE-WEAK-OR-MAPPING (LIST A2) A3))) (SETQ A1 NIL A3 NIL A4 NIL A5 NIL) (GC) (LIST (WEAK-OR-MAPPING-VALUE W2) (WEAK-OR-MAPPING-VALUE W4) (WEAK-OR-MAPPING-VALUE W1) (WEAK-OR-MAPPING-VALUE W3)))) EQUAL-OK: (NIL (X3) (X4) (X5)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-OR-MAPPING (LIST A3) A4)) (W2 (MAKE-WEAK-OR-MAPPING (LIST A1) A2)) (W3 (MAKE-WEAK-OR-MAPPING (LIST A4) A5)) (W4 (MAKE-WEAK-OR-MAPPING (LIST A2) A3))) (SETQ A1 NIL A2 NIL A4 NIL A5 NIL) (GC) (LIST (WEAK-OR-MAPPING-VALUE W2) (WEAK-OR-MAPPING-VALUE W4) (WEAK-OR-MAPPING-VALUE W1) (WEAK-OR-MAPPING-VALUE W3)))) EQUAL-OK: (NIL NIL (X4) (X5)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-OR-MAPPING (LIST A3) A4)) (W2 (MAKE-WEAK-OR-MAPPING (LIST A1) A2)) (W3 (MAKE-WEAK-OR-MAPPING (LIST A4) A5)) (W4 (MAKE-WEAK-OR-MAPPING (LIST A2) A3))) (SETQ A1 NIL A2 NIL A3 NIL A5 NIL) (GC) (LIST (WEAK-OR-MAPPING-VALUE W2) (WEAK-OR-MAPPING-VALUE W4) (WEAK-OR-MAPPING-VALUE W1) (WEAK-OR-MAPPING-VALUE W3)))) EQUAL-OK: (NIL NIL NIL (X5)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-OR-MAPPING (LIST A3) A4)) (W2 (MAKE-WEAK-OR-MAPPING (LIST A1) A2)) (W3 (MAKE-WEAK-OR-MAPPING (LIST A4) A5)) (W4 (MAKE-WEAK-OR-MAPPING (LIST A2) A3))) (SETQ A1 NIL A2 NIL A3 NIL A4 NIL) (GC) (LIST (WEAK-OR-MAPPING-VALUE W2) (WEAK-OR-MAPPING-VALUE W4) (WEAK-OR-MAPPING-VALUE W1) (WEAK-OR-MAPPING-VALUE W3)))) EQUAL-OK: (NIL NIL NIL NIL) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-OR-MAPPING (LIST A) B))) (SETF (WEAK-OR-MAPPING-VALUE W) C) (LIST (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-VALUE W))))) EQUAL-OK: ((((X)) (Z) T) ((Z))) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-OR-MAPPING (LIST A) B))) (SETF (WEAK-OR-MAPPING-VALUE W) C) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-VALUE W))))) EQUAL-OK: ((((X)) (Z) T) ((Z))) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-OR-MAPPING (LIST A) B))) (GC) (SETF (WEAK-OR-MAPPING-VALUE W) C) (LIST (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-VALUE W))))) EQUAL-OK: ((((X)) (Z) T) ((Z))) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-OR-MAPPING (LIST A) B))) (SETQ A NIL) (SETF (WEAK-OR-MAPPING-VALUE W) C) (GC) (LIST (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-OR-MAPPING (LIST A) B))) (SETQ A NIL) (GC) (SETF (WEAK-OR-MAPPING-VALUE W) C) (LIST (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (WEAK-OR-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((KA (LIST 'KX)) (VA (LIST 'VX)) (KB (LIST 'KY)) (VB (LIST 'VY)) (KC (LIST 'KZ)) (VC (LIST 'VZ))) (LET ((W (MAKE-WEAK-ALIST :TYPE :KEY :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KC VC))))) (GC) (WEAK-ALIST-TYPE W))) EQL-OK: :KEY (LET ((KA (LIST 'KX)) (VA (LIST 'VX)) (KB (LIST 'KY)) (VB (LIST 'VY)) (KC (LIST 'KZ)) (VC (LIST 'VZ))) (LET ((W (MAKE-WEAK-ALIST :TYPE :VALUE :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KC VC))))) (GC) (WEAK-ALIST-TYPE W))) EQL-OK: :VALUE (LET ((KA (LIST 'KX)) (VA (LIST 'VX)) (KB (LIST 'KY)) (VB (LIST 'VY)) (KC (LIST 'KZ)) (VC (LIST 'VZ))) (LET ((W (MAKE-WEAK-ALIST :TYPE :KEY-AND-VALUE :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KC VC))))) (GC) (WEAK-ALIST-TYPE W))) EQL-OK: :KEY-AND-VALUE (LET ((KA (LIST 'KX)) (VA (LIST 'VX)) (KB (LIST 'KY)) (VB (LIST 'VY)) (KC (LIST 'KZ)) (VC (LIST 'VZ))) (LET ((W (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KC VC)) :TYPE :KEY-OR-VALUE))) (GC) (WEAK-ALIST-TYPE W))) EQL-OK: :KEY-OR-VALUE (LET ((KA (LIST 'KX)) (VA (LIST 'VX)) (KB (LIST 'KY)) (VB (LIST 'VY)) (KC (LIST 'KZ)) (VC (LIST 'VZ))) (LET ((W (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KC VC))))) (GC) (WEAK-ALIST-TYPE W))) EQL-OK: :KEY (LET ((W (MAKE-WEAK-ALIST))) (GC) (WEAK-ALIST-CONTENTS W)) EQL-OK: NIL (LET ((KA (LIST 'KX)) (VA (LIST 'VX)) (KB (LIST 'KY)) (VB (LIST 'VY)) (KC (LIST 'KZ)) (VC (LIST 'VZ))) (LET ((W (MAKE-WEAK-ALIST :TYPE :KEY :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KC VC))))) (GC) (WEAK-ALIST-CONTENTS W))) EQUAL-OK: (((KX) VX) ((KY) VY) ((KZ) VZ)) (LET ((KA (LIST 'KX)) (VA (LIST 'VX)) (KB (LIST 'KY)) (VB (LIST 'VY)) (KC (LIST 'KZ)) (VC (LIST 'VZ))) (LET ((W (MAKE-WEAK-ALIST :TYPE :KEY :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KC VC))))) (SETQ KA NIL) (GC) (WEAK-ALIST-CONTENTS W))) EQUAL-OK: (((KY) VY) ((KZ) VZ)) (LET ((KA (LIST 'KX)) (VA (LIST 'VX)) (KB (LIST 'KY)) (VB (LIST 'VY)) (KC (LIST 'KZ)) (VC (LIST 'VZ))) (LET ((W (MAKE-WEAK-ALIST :TYPE :KEY :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KC VC))))) (SETQ KB NIL) (GC) (WEAK-ALIST-CONTENTS W))) EQUAL-OK: (((KX) VX) ((KZ) VZ)) (LET ((KA (LIST 'KX)) (VA (LIST 'VX)) (KB (LIST 'KY)) (VB (LIST 'VY)) (KC (LIST 'KZ)) (VC (LIST 'VZ))) (LET ((W (MAKE-WEAK-ALIST :TYPE :KEY :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KC VC))))) (SETQ KC NIL) (GC) (WEAK-ALIST-CONTENTS W))) EQUAL-OK: (((KX) VX) ((KY) VY)) (LET ((KA (LIST 'KX)) (VA (LIST 'VX)) (KB (LIST 'KY)) (VB (LIST 'VY)) (KC (LIST 'KZ)) (VC (LIST 'VZ))) (LET ((W (MAKE-WEAK-ALIST :TYPE :KEY :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KC VC))))) (SETQ KA 1 KB 2 KC 3) (GC) (WEAK-ALIST-CONTENTS W))) EQL-OK: NIL (LET ((KA (LIST 'KX)) (VA (LIST 'VX)) (KB (LIST 'KY)) (VB (LIST 'VY)) (KC (LIST 'KZ)) (VC (LIST 'VZ))) (LET ((W (MAKE-WEAK-ALIST :TYPE :KEY :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KC VC))))) (SETQ KA NIL) (GC) (SETF (WEAK-ALIST-CONTENTS W) (LIST (CONS KC VC) (CONS KB VB))) (GC) (WEAK-ALIST-CONTENTS W))) EQUAL-OK: (((KZ) VZ) ((KY) VY)) (LET ((KA (LIST 'KX)) (VA (LIST 'VX)) (KB (LIST 'KY)) (VB (LIST 'VY)) (KC (LIST 'KZ)) (VC (LIST 'VZ))) (LET ((W (MAKE-WEAK-ALIST :TYPE :KEY :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KC VC))))) (SETQ KA NIL KC NIL) (GC) (SETQ KC (LIST 'ZZ)) (SETF (WEAK-ALIST-CONTENTS W) (LIST (CONS KC VC) (CONS KC VC) (CONS KB VB) (CONS KC VC))) (GC) (WEAK-ALIST-CONTENTS W))) EQUAL-OK: (((ZZ) VZ) ((ZZ) VZ) ((KY) VY) ((ZZ) VZ)) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A B))))) (GC) (WEAK-ALIST-CONTENTS W))) EQUAL-OK: (((X) Y)) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A B))))) (SETQ B NIL) (GC) (WEAK-ALIST-CONTENTS W))) EQUAL-OK: (((X) Y)) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A B))))) (SETQ A NIL) (GC) (WEAK-ALIST-CONTENTS W))) EQL-OK: NIL (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A B))))) (SETQ A NIL B NIL) (GC) (WEAK-ALIST-CONTENTS W))) EQL-OK: NIL (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A3 A4)))) (W2 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A1 A2)))) (W3 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A4 A5)))) (W4 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A2 A3))))) (SETQ A2 NIL A3 NIL A4 NIL A5 NIL) (GC) (LIST (WEAK-ALIST-CONTENTS W2) (WEAK-ALIST-CONTENTS W4) (WEAK-ALIST-CONTENTS W1) (WEAK-ALIST-CONTENTS W3)))) EQUAL-OK: ((((X1) X2)) (((X2) X3)) (((X3) X4)) (((X4) X5))) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A3 A4)))) (W2 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A1 A2)))) (W3 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A4 A5)))) (W4 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A2 A3))))) (SETQ A1 NIL A3 NIL A4 NIL A5 NIL) (GC) (LIST (WEAK-ALIST-CONTENTS W2) (WEAK-ALIST-CONTENTS W4) (WEAK-ALIST-CONTENTS W1) (WEAK-ALIST-CONTENTS W3)))) EQUAL-OK: (NIL (((X2) X3)) (((X3) X4)) (((X4) X5))) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A3 A4)))) (W2 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A1 A2)))) (W3 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A4 A5)))) (W4 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A2 A3))))) (SETQ A1 NIL A2 NIL A4 NIL A5 NIL) (GC) (LIST (WEAK-ALIST-CONTENTS W2) (WEAK-ALIST-CONTENTS W4) (WEAK-ALIST-CONTENTS W1) (WEAK-ALIST-CONTENTS W3)))) EQUAL-OK: (NIL NIL (((X3) X4)) (((X4) X5))) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A3 A4)))) (W2 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A1 A2)))) (W3 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A4 A5)))) (W4 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A2 A3))))) (SETQ A1 NIL A2 NIL A3 NIL A5 NIL) (GC) (LIST (WEAK-ALIST-CONTENTS W2) (WEAK-ALIST-CONTENTS W4) (WEAK-ALIST-CONTENTS W1) (WEAK-ALIST-CONTENTS W3)))) EQUAL-OK: (NIL NIL NIL (((X4) X5))) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A3 A4)))) (W2 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A1 A2)))) (W3 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A4 A5)))) (W4 (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A2 A3))))) (SETQ A1 NIL A2 NIL A3 NIL A4 NIL) (GC) (LIST (WEAK-ALIST-CONTENTS W2) (WEAK-ALIST-CONTENTS W4) (WEAK-ALIST-CONTENTS W1) (WEAK-ALIST-CONTENTS W3)))) EQUAL-OK: (NIL NIL NIL NIL) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A B))))) (SETF (WEAK-ALIST-VALUE A W) C) (WEAK-ALIST-CONTENTS W))) EQUAL-OK: (((X) Z)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A B))))) (SETF (WEAK-ALIST-VALUE A W) C) (GC) (WEAK-ALIST-CONTENTS W))) EQUAL-OK: (((X) Z)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A B))))) (GC) (SETF (WEAK-ALIST-VALUE A W) C) (WEAK-ALIST-CONTENTS W))) EQUAL-OK: (((X) Z)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A B))))) (SETQ A (LIST 'X2)) (SETF (WEAK-ALIST-VALUE A W) C) (GC) (WEAK-ALIST-CONTENTS W))) EQUAL-OK: (((X2) Z)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS A B))))) (SETQ A (LIST 'X2)) (GC) (SETF (WEAK-ALIST-VALUE A W) C) (WEAK-ALIST-CONTENTS W))) EQUAL-OK: (((X2) Z)) (LET ((KA (LIST 'KX)) (VA (LIST 'VX)) (KB (LIST 'KY)) (VB (LIST 'VY)) (KC (LIST 'KZ)) (VC (LIST 'VZ))) (LET ((W (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KA VC) (CONS KC VC))))) (LIST (WEAK-ALIST-ASSOC KA W) (WEAK-ALIST-ASSOC KB W) (WEAK-ALIST-ASSOC KC W) (WEAK-ALIST-ASSOC VA W) (WEAK-ALIST-ASSOC VB W) (WEAK-ALIST-ASSOC VC W)))) EQUAL-OK: (((KX) VX) ((KY) VY) ((KZ) VZ) NIL NIL NIL) (LET ((KA (LIST 'KX)) (VA (LIST 'VX)) (KB (LIST 'KY)) (VB (LIST 'VY)) (KC (LIST 'KZ)) (VC (LIST 'VZ))) (LET ((W (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KA VC) (CONS KC VC))))) (LIST (WEAK-ALIST-RASSOC KA W) (WEAK-ALIST-RASSOC KB W) (WEAK-ALIST-RASSOC KC W) (WEAK-ALIST-RASSOC VA W) (WEAK-ALIST-RASSOC VB W) (WEAK-ALIST-RASSOC VC W)))) EQUAL-OK: (NIL NIL NIL ((KX) VX) ((KY) VY) ((KX) VZ)) (LET ((KA (LIST 'KX)) (VA (LIST 'VX)) (KB (LIST 'KY)) (VB (LIST 'VY)) (KC (LIST 'KZ)) (VC (LIST 'VZ))) (LET ((W (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KA VC) (CONS KC VC))))) (LIST (WEAK-ALIST-VALUE KA W) (WEAK-ALIST-VALUE KB W) (WEAK-ALIST-VALUE KC W) (WEAK-ALIST-VALUE VA W) (WEAK-ALIST-VALUE VB W) (WEAK-ALIST-VALUE VC W)))) EQUAL-OK: ((VX) (VY) (VZ) NIL NIL NIL) (LET ((KA (LIST 'KX)) (VA (LIST 'VX)) (KB (LIST 'KY)) (VB (LIST 'VY)) (KC (LIST 'KZ)) (VC (LIST 'VZ))) (LET ((W (MAKE-WEAK-ALIST :TYPE :VALUE :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KA VC) (CONS KC VC))))) (SETQ VA NIL) (GC) (LIST (WEAK-ALIST-ASSOC KA W) (WEAK-ALIST-ASSOC KB W) (WEAK-ALIST-ASSOC KC W) (WEAK-ALIST-ASSOC VB W) (WEAK-ALIST-ASSOC VC W)))) EQUAL-OK: (((KX) VZ) ((KY) VY) ((KZ) VZ) NIL NIL) (LET ((KA (LIST 'KX)) (VA (LIST 'VX)) (KB (LIST 'KY)) (VB (LIST 'VY)) (KC (LIST 'KZ)) (VC (LIST 'VZ))) (LET ((W (MAKE-WEAK-ALIST :TYPE :VALUE :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KA VC) (CONS KC VC))))) (SETQ VA NIL) (GC) (LIST (WEAK-ALIST-RASSOC KA W) (WEAK-ALIST-RASSOC KB W) (WEAK-ALIST-RASSOC KC W) (WEAK-ALIST-RASSOC VB W) (WEAK-ALIST-RASSOC VC W)))) EQUAL-OK: (NIL NIL NIL ((KY) VY) ((KX) VZ)) (LET ((KA (LIST 'KX)) (VA (LIST 'VX)) (KB (LIST 'KY)) (VB (LIST 'VY)) (KC (LIST 'KZ)) (VC (LIST 'VZ))) (LET ((W (MAKE-WEAK-ALIST :TYPE :VALUE :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KA VC) (CONS KC VC))))) (SETQ VA NIL) (GC) (LIST (WEAK-ALIST-VALUE KA W) (WEAK-ALIST-VALUE KB W) (WEAK-ALIST-VALUE KC W) (WEAK-ALIST-VALUE VB W) (WEAK-ALIST-VALUE VC W)))) EQUAL-OK: ((VZ) (VY) (VZ) NIL NIL) (LET ((KA (LIST 'X)) (VA (LIST '|x|)) (KB (LIST 'Y)) (VB (LIST '|y|)) (KC (LIST 'Z)) (VC (LIST '|z|))) (LET ((W (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KA VC) (CONS KC VC))))) (LIST (WEAK-ALIST-ASSOC (CAR KA) W :TEST #'STRING-EQUAL :KEY #'CAR) (WEAK-ALIST-ASSOC (CAR KB) W :TEST #'STRING-EQUAL :KEY #'CAR) (WEAK-ALIST-ASSOC (CAR KC) W :TEST #'STRING-EQUAL :KEY #'CAR) (WEAK-ALIST-ASSOC (CAR VA) W :TEST #'STRING-EQUAL :KEY #'CAR) (WEAK-ALIST-ASSOC (CAR VB) W :TEST #'STRING-EQUAL :KEY #'CAR) (WEAK-ALIST-ASSOC (CAR VC) W :TEST #'STRING-EQUAL :KEY #'CAR)))) EQUAL-OK: (((X) |x|) ((Y) |y|) ((Z) |z|) ((X) |x|) ((Y) |y|) ((Z) |z|)) (LET ((KA (LIST 'X)) (VA (LIST '|x|)) (KB (LIST 'Y)) (VB (LIST '|y|)) (KC (LIST 'Z)) (VC (LIST '|z|))) (LET ((W (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KA VC) (CONS KC VC))))) (LIST (WEAK-ALIST-RASSOC (CAR KA) W :TEST #'STRING-EQUAL :KEY #'CAR) (WEAK-ALIST-RASSOC (CAR KB) W :TEST #'STRING-EQUAL :KEY #'CAR) (WEAK-ALIST-RASSOC (CAR KC) W :TEST #'STRING-EQUAL :KEY #'CAR) (WEAK-ALIST-RASSOC (CAR VA) W :TEST #'STRING-EQUAL :KEY #'CAR) (WEAK-ALIST-RASSOC (CAR VB) W :TEST #'STRING-EQUAL :KEY #'CAR) (WEAK-ALIST-RASSOC (CAR VC) W :TEST #'STRING-EQUAL :KEY #'CAR)))) EQUAL-OK: (((X) |x|) ((Y) |y|) ((X) |z|) ((X) |x|) ((Y) |y|) ((X) |z|)) (LET ((KA (LIST 'X)) (VA (LIST '|x|)) (KB (LIST 'Y)) (VB (LIST '|y|)) (KC (LIST 'Z)) (VC (LIST '|z|))) (LET ((W (MAKE-WEAK-ALIST :INITIAL-CONTENTS (LIST (CONS KA VA) (CONS KB VB) (CONS KA VC) (CONS KC VC))))) (LIST (WEAK-ALIST-VALUE KA W :TEST #'(LAMBDA (U V) (STRING-EQUAL (CAR U) (CAR V)))) (WEAK-ALIST-VALUE KB W :TEST #'(LAMBDA (U V) (STRING-EQUAL (CAR U) (CAR V)))) (WEAK-ALIST-VALUE KC W :TEST #'(LAMBDA (U V) (STRING-EQUAL (CAR U) (CAR V)))) (WEAK-ALIST-VALUE VA W :TEST #'(LAMBDA (U V) (STRING-EQUAL (CAR U) (CAR V)))) (WEAK-ALIST-VALUE VB W :TEST #'(LAMBDA (U V) (STRING-EQUAL (CAR U) (CAR V)))) (WEAK-ALIST-VALUE VC W :TEST #'(LAMBDA (U V) (STRING-EQUAL (CAR U) (CAR V))))))) EQUAL-OK: ((|x|) (|y|) (|z|) (|x|) (|y|) (|z|)) (LET* ((LI 'NIL) (W (LET ((ALI 'NIL)) (LOOP :FOR I :FROM 0 :TO 1000 :FOR STRING = (FORMAT NIL "~r" I) :DO (PUSH STRING LI) (PUSH (CONS STRING I) ALI)) (SETQ LI (NREVERSE LI)) (SETQ ALI (NREVERSE ALI)) (MAKE-WEAK-ALIST :INITIAL-CONTENTS ALI)))) (LIST (PROGN (GC) (LENGTH (WEAK-ALIST-CONTENTS W))) (PROGN (SETQ LI NIL) (GC) (LENGTH (WEAK-ALIST-CONTENTS W))))) EQUAL-OK: (1001 0) RUN-TEST: finished "weak" (0 errors out of 120 tests) RUN-TEST: started # (DEFUN WEAK-HT-FILL-INITIALLY (TAB) (SETF (GETHASH (COPY-SEQ "foo") TAB) 1) (SETF (GETHASH 1 TAB) (COPY-SEQ "bar")) (SETF (GETHASH (COPY-SEQ "zoo") TAB) (COPY-SEQ "zot"))) EQL-OK: WEAK-HT-FILL-INITIALLY (LET ((TAB (MAKE-HASH-TABLE :TEST 'EQUAL :WEAK :KEY))) (WEAK-HT-FILL-INITIALLY TAB) (GC) (LIST (GETHASH "foo" TAB) (GETHASH 1 TAB) (GETHASH "zoo" TAB))) EQUAL-OK: (NIL "bar" NIL) (LET ((TAB (MAKE-HASH-TABLE :TEST 'EQ :WEAK :KEY))) (LET ((A (LIST 'X))) (LET ((B (LIST 'Y))) (SETF (GETHASH A TAB) 'XXX) (SETF (GETHASH B TAB) (CONS 'YYY B))) (GC) (LIST (HASH-TABLE-COUNT TAB) (GETHASH A TAB) (LET ((L NIL)) (MAPHASH #'(LAMBDA (K V) (PUSH K L)) TAB) L)))) EQUAL-OK: (1 XXX ((X))) (PROGN (DEFUN MAKE-FREAK-MAPPING (A B) (LET ((TAB (MAKE-HASH-TABLE :TEST 'EQ :WEAK :KEY))) (SETF (GETHASH A TAB) B) TAB)) (DEFUN FREAK-MAPPING-PAIR (TAB) (LET (A B C) (MAPHASH #'(LAMBDA (K V) (SETQ A K B V C T)) TAB) (VALUES A B C))) (DEFUN FREAK-MAPPING-VALUE (TAB) (BLOCK NIL (MAPHASH #'(LAMBDA (K V) (RETURN-FROM NIL V)) TAB) NIL)) (DEFUN (SETF FREAK-MAPPING-VALUE) (NEW-VALUE TAB) (BLOCK NIL (MAPHASH #'(LAMBDA (K V) (SETF (GETHASH K TAB) NEW-VALUE) (RETURN-FROM NIL)) TAB)) NEW-VALUE) T) EQL-OK: T (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-FREAK-MAPPING A B))) (GC) (LIST (MULTIPLE-VALUE-LIST (FREAK-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (FREAK-MAPPING-VALUE W))))) EQUAL-OK: (((X) (Y) T) ((Y))) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-FREAK-MAPPING A B))) (SETQ B NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (FREAK-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (FREAK-MAPPING-VALUE W))))) EQUAL-OK: (((X) (Y) T) ((Y))) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-FREAK-MAPPING A B))) (SETQ A NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (FREAK-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (FREAK-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((A (LIST 'X)) (B (LIST 'Y))) (LET ((W (MAKE-FREAK-MAPPING A B))) (SETQ A NIL B NIL) (GC) (LIST (MULTIPLE-VALUE-LIST (FREAK-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (FREAK-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-FREAK-MAPPING A3 A4)) (W2 (MAKE-FREAK-MAPPING A1 A2)) (W3 (MAKE-FREAK-MAPPING A4 A5)) (W4 (MAKE-FREAK-MAPPING A2 A3))) (SETQ A2 NIL A3 NIL A4 NIL A5 NIL) (GC) (LIST (FREAK-MAPPING-VALUE W2) (FREAK-MAPPING-VALUE W4) (FREAK-MAPPING-VALUE W1) (FREAK-MAPPING-VALUE W3)))) EQUAL-OK: ((X2) (X3) (X4) (X5)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-FREAK-MAPPING A3 A4)) (W2 (MAKE-FREAK-MAPPING A1 A2)) (W3 (MAKE-FREAK-MAPPING A4 A5)) (W4 (MAKE-FREAK-MAPPING A2 A3))) (SETQ A1 NIL A3 NIL A4 NIL A5 NIL) (GC) (LIST (FREAK-MAPPING-VALUE W2) (FREAK-MAPPING-VALUE W4) (FREAK-MAPPING-VALUE W1) (FREAK-MAPPING-VALUE W3)))) EQUAL-OK: (NIL (X3) (X4) (X5)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-FREAK-MAPPING A3 A4)) (W2 (MAKE-FREAK-MAPPING A1 A2)) (W3 (MAKE-FREAK-MAPPING A4 A5)) (W4 (MAKE-FREAK-MAPPING A2 A3))) (SETQ A1 NIL A2 NIL A4 NIL A5 NIL) (GC) (LIST (FREAK-MAPPING-VALUE W2) (FREAK-MAPPING-VALUE W4) (FREAK-MAPPING-VALUE W1) (FREAK-MAPPING-VALUE W3)))) EQUAL-OK: (NIL NIL (X4) (X5)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-FREAK-MAPPING A3 A4)) (W2 (MAKE-FREAK-MAPPING A1 A2)) (W3 (MAKE-FREAK-MAPPING A4 A5)) (W4 (MAKE-FREAK-MAPPING A2 A3))) (SETQ A1 NIL A2 NIL A3 NIL A5 NIL) (GC) (LIST (FREAK-MAPPING-VALUE W2) (FREAK-MAPPING-VALUE W4) (FREAK-MAPPING-VALUE W1) (FREAK-MAPPING-VALUE W3)))) EQUAL-OK: (NIL NIL NIL (X5)) (LET ((A1 (LIST 'X1)) (A2 (LIST 'X2)) (A3 (LIST 'X3)) (A4 (LIST 'X4)) (A5 (LIST 'X5))) (LET ((W1 (MAKE-FREAK-MAPPING A3 A4)) (W2 (MAKE-FREAK-MAPPING A1 A2)) (W3 (MAKE-FREAK-MAPPING A4 A5)) (W4 (MAKE-FREAK-MAPPING A2 A3))) (SETQ A1 NIL A2 NIL A3 NIL A4 NIL) (GC) (LIST (FREAK-MAPPING-VALUE W2) (FREAK-MAPPING-VALUE W4) (FREAK-MAPPING-VALUE W1) (FREAK-MAPPING-VALUE W3)))) EQUAL-OK: (NIL NIL NIL NIL) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-FREAK-MAPPING A B))) (SETF (FREAK-MAPPING-VALUE W) C) (LIST (MULTIPLE-VALUE-LIST (FREAK-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (FREAK-MAPPING-VALUE W))))) EQUAL-OK: (((X) (Z) T) ((Z))) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-FREAK-MAPPING A B))) (SETF (FREAK-MAPPING-VALUE W) C) (GC) (LIST (MULTIPLE-VALUE-LIST (FREAK-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (FREAK-MAPPING-VALUE W))))) EQUAL-OK: (((X) (Z) T) ((Z))) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-FREAK-MAPPING A B))) (GC) (SETF (FREAK-MAPPING-VALUE W) C) (LIST (MULTIPLE-VALUE-LIST (FREAK-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (FREAK-MAPPING-VALUE W))))) EQUAL-OK: (((X) (Z) T) ((Z))) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-FREAK-MAPPING A B))) (SETQ A NIL) (SETF (FREAK-MAPPING-VALUE W) C) (GC) (LIST (MULTIPLE-VALUE-LIST (FREAK-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (FREAK-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (LET ((A (LIST 'X)) (B (LIST 'Y)) (C (LIST 'Z))) (LET ((W (MAKE-FREAK-MAPPING A B))) (SETQ A NIL) (GC) (SETF (FREAK-MAPPING-VALUE W) C) (LIST (MULTIPLE-VALUE-LIST (FREAK-MAPPING-PAIR W)) (MULTIPLE-VALUE-LIST (FREAK-MAPPING-VALUE W))))) EQUAL-OK: ((NIL NIL NIL) (NIL)) (PROGN (DEFUN TEST-WEAK-MAPPING-CHAIN (N) (LET (WM0) (LET ((SYM (MAKE-ARRAY N))) (DOTIMES (I N) (SETF (AREF SYM I) (MAKE-SYMBOL (PRIN1-TO-STRING I)))) (LET ((WM (MAKE-ARRAY N))) (DOTIMES (I N) (SETF (AREF WM I) (MAKE-FREAK-MAPPING 'A 'B))) (SETQ WM0 (AREF WM 0)) (DO ((I 1 (1+ I))) ((>= I N)) (SETF (GETHASH (AREF SYM (- I 1)) (AREF WM (- I 1))) (AREF WM I)))) (TIME (GC)) (DO ((I 0 (1+ I)) (W WM0 (GETHASH (AREF SYM I) W))) ((>= I N))) (SETQ SYM NIL) (TIME (GC)) (GETHASH 'A WM0)))) (TEST-WEAK-MAPPING-CHAIN 10000)) Real time: 0.152144 sec. Run time: 0.151874 sec. Space: 0 Bytes GC: 1, GC time: 0.151393 sec. Real time: 0.09195 sec. Run time: 0.09192 sec. Space: 0 Bytes GC: 1, GC time: 0.091427 sec. EQL-OK: B (PROGN (DEFUN TEST-WEAK-MAPPING-CHAIN-REVERSE (N) (LET (WM0) (LET ((SYM (MAKE-ARRAY N))) (DOTIMES (I N) (SETF (AREF SYM I) (MAKE-SYMBOL (PRIN1-TO-STRING I)))) (LET ((WM (MAKE-ARRAY N))) (DOTIMES (I N) (SETF (AREF WM (- N 1 I)) (MAKE-FREAK-MAPPING 'A 'B))) (SETQ WM0 (AREF WM 0)) (DO ((I 1 (1+ I))) ((>= I N)) (SETF (GETHASH (AREF SYM (- I 1)) (AREF WM (- I 1))) (AREF WM I)))) (TIME (GC)) (DO ((I 0 (1+ I)) (W WM0 (GETHASH (AREF SYM I) W))) ((>= I N))) (SETQ SYM NIL) (TIME (GC)) (GETHASH 'A WM0)))) (TEST-WEAK-MAPPING-CHAIN-REVERSE 10000)) Real time: 0.159849 sec. Run time: 0.159805 sec. Space: 0 Bytes GC: 1, GC time: 0.159335 sec. Real time: 0.132511 sec. Run time: 0.132486 sec. Space: 0 Bytes GC: 1, GC time: 0.131971 sec. EQL-OK: B (LET ((TAB (MAKE-HASH-TABLE :TEST 'EQ :WEAK :VALUE))) (SETF (GETHASH 'FOO TAB) 1) (SETF (GETHASH 1 TAB) (COPY-SEQ "bar")) (SETF (GETHASH 'ZOO TAB) (COPY-SEQ "zot")) (GC) (LIST (GETHASH 'FOO TAB) (GETHASH 1 TAB) (GETHASH 'ZOO TAB))) EQUAL-OK: (1 NIL NIL) (LET ((TAB (MAKE-HASH-TABLE :TEST 'EQUAL :WEAK :VALUE))) (WEAK-HT-FILL-INITIALLY TAB) (GC) (LIST (GETHASH "foo" TAB) (GETHASH 1 TAB) (GETHASH "zoo" TAB))) EQUAL-OK: (1 NIL NIL) (LET ((TAB (MAKE-HASH-TABLE :TEST 'EQ :WEAK :VALUE))) (LET ((A (LIST 'X))) (LET ((B (LIST 'Y))) (SETF (GETHASH 'XXX TAB) A) (SETF (GETHASH (CONS 'YYY B) TAB) B)) (GC) (LIST (HASH-TABLE-COUNT TAB) (EQ (GETHASH 'XXX TAB) A) (LET ((L NIL)) (MAPHASH #'(LAMBDA (K V) (PUSH V L)) TAB) L)))) EQUAL-OK: (1 T ((X))) (LET ((TAB (MAKE-HASH-TABLE :TEST 'EQUAL :WEAK :KEY-AND-VALUE))) (WEAK-HT-FILL-INITIALLY TAB) (GC) (LIST (GETHASH "foo" TAB) (GETHASH 1 TAB) (GETHASH "zoo" TAB))) EQUAL-OK: (NIL NIL NIL) (LET ((TAB (MAKE-HASH-TABLE :TEST 'EQUAL :WEAK :KEY-OR-VALUE))) (WEAK-HT-FILL-INITIALLY TAB) (GC) (LIST (GETHASH "foo" TAB) (GETHASH 1 TAB) (GETHASH "zoo" TAB))) EQUAL-OK: (1 "bar" NIL) (SYMBOLS-CLEANUP '(WEAK-HT-FILL-INITIALLY MAKE-FREAK-MAPPING FREAK-MAPPING-PAIR FREAK-MAPPING-VALUE TEST-WEAK-MAPPING-CHAIN TEST-WEAK-MAPPING-CHAIN-REVERSE)) EQL-OK: NIL RUN-TEST: finished "weakhash" (0 errors out of 26 tests) RUN-TEST: started # (HASH-TABLE-WEAK-P (PROGN (SETQ TAB (MAKE-HASH-TABLE :WEAK :KEY :TEST 'EQUAL :INITIAL-CONTENTS '((1 . 2) ("foo" . "bar")))) TAB)) EQL-OK: :KEY (GETHASH 1 TAB) EQL-OK: 2 (GETHASH "foo" TAB) EQUAL-OK: "bar" (GETHASH "zot" TAB) EQL-OK: NIL (GETHASH "bar" TAB) EQL-OK: NIL (PROGN (GC) T) EQL-OK: T (GETHASH 1 TAB) EQL-OK: 2 (GETHASH "foo" TAB) EQL-OK: NIL (GETHASH "zot" TAB) EQL-OK: NIL (GETHASH "bar" TAB) EQL-OK: NIL (SETF (HASH-TABLE-WEAK-P TAB) NIL) EQL-OK: NIL (GETHASH 1 TAB) EQL-OK: 2 (GETHASH "foo" TAB) EQL-OK: NIL (SETF (GETHASH "foo" TAB) "bar") EQUAL-OK: "bar" (GETHASH "foo" TAB) EQUAL-OK: "bar" (PROGN (GC) T) EQL-OK: T (GETHASH "foo" TAB) EQUAL-OK: "bar" (SETF (HASH-TABLE-WEAK-P TAB) :KEY) EQL-OK: :KEY (PROGN (GC) T) EQL-OK: T (GETHASH "foo" TAB) EQL-OK: NIL (SETF (HASH-TABLE-WEAK-P TAB) :VALUE) EQL-OK: :VALUE (SETF (GETHASH "foo" TAB) 1) EQL-OK: 1 (SETF (GETHASH 1 TAB) "bar") EQUAL-OK: "bar" (SETF (GETHASH "zoo" TAB) "zot") EQUAL-OK: "zot" (PROGN (GC) T) EQL-OK: T (GETHASH "foo" TAB) EQL-OK: 1 (GETHASH 1 TAB) EQL-OK: NIL (GETHASH "zoo" TAB) EQL-OK: NIL (SETF (HASH-TABLE-WEAK-P TAB) :KEY-AND-VALUE) EQL-OK: :KEY-AND-VALUE (SETF (GETHASH "foo" TAB) 1) EQL-OK: 1 (SETF (GETHASH 1 TAB) "bar") EQUAL-OK: "bar" (SETF (GETHASH "zoo" TAB) "zot") EQUAL-OK: "zot" (PROGN (GC) T) EQL-OK: T (GETHASH "foo" TAB) EQL-OK: NIL (GETHASH 1 TAB) EQL-OK: NIL (GETHASH "zoo" TAB) EQL-OK: NIL (SETF (HASH-TABLE-WEAK-P TAB) :KEY-OR-VALUE) EQL-OK: :KEY-OR-VALUE (SETF (GETHASH "foo" TAB) 1) EQL-OK: 1 (SETF (GETHASH 1 TAB) "bar") EQUAL-OK: "bar" (SETF (GETHASH "zoo" TAB) "zot") EQUAL-OK: "zot" (PROGN (GC) T) EQL-OK: T (GETHASH "foo" TAB) EQL-OK: 1 (GETHASH 1 TAB) EQUAL-OK: "bar" (GETHASH "zoo" TAB) EQL-OK: NIL (LET ((HTV (MAKE-HASH-TABLE :TEST 'EQL :WEAK :VALUE)) (HTK (MAKE-HASH-TABLE :TEST 'EQL :WEAK :KEY)) (LI NIL)) (LOOP :FOR I :FROM 0 :TO 1000 :FOR STRING = (FORMAT NIL "~r" I) :DO (PUSH STRING LI) (SETF (GETHASH I HTV) STRING (GETHASH STRING HTK) I)) (LIST (LENGTH LI) (CONS (HASH-TABLE-COUNT HTV) (HASH-TABLE-COUNT HTK)) (PROGN (GC) (CONS (HASH-TABLE-COUNT HTV) (HASH-TABLE-COUNT HTK))) (PROGN (SETQ LI NIL) (GC) (CONS (HASH-TABLE-COUNT HTV) (HASH-TABLE-COUNT HTK))))) EQUAL-OK: (1001 (1001 . 1001) (1001 . 1001) (0 . 0)) (FLET ((HT_KVTABLE (HT) (IF (INTEGERP (SYSTEM::%RECORD-REF HT 1)) (SYSTEM::%RECORD-REF HT 2) (SYSTEM::%RECORD-REF HT 1))) (WHAL_ITABLE (KVT) (SYSTEM::%RECORD-REF KVT 1))) (LET* ((HT (MAKE-HASH-TABLE :TEST 'STABLEHASH-EQ :WEAK :KEY)) (KVT (HT_KVTABLE HT))) (ASSERT (SIMPLE-VECTOR-P (WHAL_ITABLE KVT))) (GC) (GC) (AND (EQ (HT_KVTABLE HT) KVT) (SIMPLE-VECTOR-P (WHAL_ITABLE KVT))))) EQL-OK: T (PROGN (SYMBOL-CLEANUP 'TAB)) EQL-OK: T RUN-TEST: finished "weakhash2" (0 errors out of 47 tests) RUN-TEST: started # (LET ((X 5)) (LET ((X (1+ X))) (DECLARE (SPECIAL X)) X)) EQL-OK: 6 (LET ((X 5)) (LET* ((X (1+ X))) (DECLARE (SPECIAL X)) X)) EQL-OK: 6 (LET ((X 5)) (MULTIPLE-VALUE-BIND (X) (1+ X) (DECLARE (SPECIAL X)) X)) EQL-OK: 6 (LET ((X 5)) ((LAMBDA (X) (DECLARE (SPECIAL X)) X) (1+ X))) EQL-OK: 6 (BLOCK FOO (HANDLER-BIND ((UNBOUND-VARIABLE (HANDLER-RETURN FOO 'GOOD))) (LET ((X (1+ X))) (DECLARE (SPECIAL X)) X))) [SIMPLE-UNBOUND-VARIABLE]: LET: variable X has no value EQL-OK: GOOD (BLOCK FOO (HANDLER-BIND ((UNBOUND-VARIABLE (HANDLER-RETURN FOO 'GOOD))) (LET* ((X (1+ X))) (DECLARE (SPECIAL X)) X))) [SIMPLE-UNBOUND-VARIABLE]: LET*: variable X has no value EQL-OK: GOOD (BLOCK FOO (HANDLER-BIND ((UNBOUND-VARIABLE (HANDLER-RETURN FOO 'GOOD))) (MULTIPLE-VALUE-BIND (X) (1+ X) (DECLARE (SPECIAL X)) X))) [SIMPLE-UNBOUND-VARIABLE]: MULTIPLE-VALUE-BIND: variable X has no value EQL-OK: GOOD (BLOCK FOO (HANDLER-BIND ((UNBOUND-VARIABLE (HANDLER-RETURN FOO 'GOOD))) ((LAMBDA (X) (DECLARE (SPECIAL X)) X) (1+ X)))) [SIMPLE-UNBOUND-VARIABLE]: :LAMBDA: variable X has no value EQL-OK: GOOD (LET ((X 5)) (LET ((Y (1+ X))) (DECLARE (SPECIAL X)) Y)) EQL-OK: 6 (LET ((X 5)) (LET* ((Y (1+ X))) (DECLARE (SPECIAL X)) Y)) EQL-OK: 6 (LET ((X 5)) (MULTIPLE-VALUE-BIND (Y) (1+ X) (DECLARE (SPECIAL X)) Y)) EQL-OK: 6 (LET ((X 5)) ((LAMBDA (Y) (DECLARE (SPECIAL X)) Y) (1+ X))) EQL-OK: 6 (LET ((X 5)) (LET ((X (1+ X))) X)) EQL-OK: 6 (LET ((X 5)) (LET* ((X (1+ X))) X)) EQL-OK: 6 (LET ((X 5)) (MULTIPLE-VALUE-BIND (X) (1+ X) X)) EQL-OK: 6 (LET ((X 5)) ((LAMBDA (X) X) (1+ X))) EQL-OK: 6 (LET ((X 5)) (PROGV '(X) '(20) (LET ((X (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) Z))) EQL-OK: 6 (LET ((X 5)) (PROGV '(X) '(20) (LET* ((X (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) Z))) EQL-OK: 7 (LET ((X 5)) (PROGV '(X) '(20) (MULTIPLE-VALUE-BIND (X Z) (VALUES (1+ X) (1+ X)) (DECLARE (SPECIAL X)) Z))) EQL-OK: 6 (LET ((X 5)) (PROGV '(X) '(20) ((LAMBDA (&OPTIONAL (X (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) Z)))) EQL-OK: 7 (LET ((X 5)) (PROGV '(X Y) '(20 120) (LET ((X (1+ X)) (Y (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) (LIST Z (LOCALLY (DECLARE (SPECIAL Y)) Y) X Y)))) EQUAL-OK: (6 120 6 6) (LET ((X 5)) (PROGV '(X Y) '(20 120) (LET* ((X (1+ X)) (Y (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) (LIST Z (LOCALLY (DECLARE (SPECIAL Y)) Y) X Y)))) EQUAL-OK: (7 120 6 7) (LET ((X 5)) (PROGV '(X Y) '(20 120) (MULTIPLE-VALUE-BIND (X Y Z) (VALUES (1+ X) (1+ X) (1+ X)) (DECLARE (SPECIAL X)) (LIST Z (LOCALLY (DECLARE (SPECIAL Y)) Y) X Y)))) EQUAL-OK: (6 120 6 6) (LET ((X 5)) (PROGV '(X Y) '(20 120) ((LAMBDA (&OPTIONAL (X (1+ X)) (Y (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) (LIST Z (LOCALLY (DECLARE (SPECIAL Y)) Y) X Y))))) EQUAL-OK: (7 120 6 7) (LET ((X 5)) (PROGV '(X) '(20) (LET ((Y (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) Z))) EQL-OK: 6 (LET ((X 5)) (PROGV '(X) '(20) (LET* ((Y (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) Z))) EQL-OK: 6 (LET ((X 5)) (PROGV '(X) '(20) (MULTIPLE-VALUE-BIND (Y Z) (VALUES (1+ X) (1+ X)) (DECLARE (SPECIAL X)) Z))) EQL-OK: 6 (LET ((X 5)) (PROGV '(X) '(20) ((LAMBDA (&OPTIONAL (Y (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) Z)))) EQL-OK: 6 (PROGN (DEFPARAMETER *GLOBAL-VAR-FOR-BIND.TST* 123) (LET ((*GLOBAL-VAR-FOR-BIND.TST* 5)) (LIST (LET ((*GLOBAL-VAR-FOR-BIND.TST* (1+ *GLOBAL-VAR-FOR-BIND.TST*))) (DECLARE (SPECIAL *GLOBAL-VAR-FOR-BIND.TST*)) *GLOBAL-VAR-FOR-BIND.TST*) *GLOBAL-VAR-FOR-BIND.TST*))) EQUAL-OK: (6 5) (PROGN (DEFPARAMETER *GLOBAL-VAR-FOR-BIND.TST* 123) (LET ((*GLOBAL-VAR-FOR-BIND.TST* 5)) (LIST (LET* ((*GLOBAL-VAR-FOR-BIND.TST* (1+ *GLOBAL-VAR-FOR-BIND.TST*))) (DECLARE (SPECIAL *GLOBAL-VAR-FOR-BIND.TST*)) *GLOBAL-VAR-FOR-BIND.TST*) *GLOBAL-VAR-FOR-BIND.TST*))) EQUAL-OK: (6 5) (PROGN (DEFPARAMETER *GLOBAL-VAR-FOR-BIND.TST* 123) (LET ((*GLOBAL-VAR-FOR-BIND.TST* 5)) (LIST (MULTIPLE-VALUE-BIND (*GLOBAL-VAR-FOR-BIND.TST*) (1+ *GLOBAL-VAR-FOR-BIND.TST*) (DECLARE (SPECIAL *GLOBAL-VAR-FOR-BIND.TST*)) *GLOBAL-VAR-FOR-BIND.TST*) *GLOBAL-VAR-FOR-BIND.TST*))) EQUAL-OK: (6 5) (PROGN (DEFPARAMETER *GLOBAL-VAR-FOR-BIND.TST* 123) (LET ((*GLOBAL-VAR-FOR-BIND.TST* 5)) (LIST ((LAMBDA (*GLOBAL-VAR-FOR-BIND.TST*) (DECLARE (SPECIAL *GLOBAL-VAR-FOR-BIND.TST*)) *GLOBAL-VAR-FOR-BIND.TST*) (1+ *GLOBAL-VAR-FOR-BIND.TST*)) *GLOBAL-VAR-FOR-BIND.TST*))) EQUAL-OK: (6 5) (PROGN (DEFPARAMETER *GLOBAL-VAR-FOR-BIND.TST* 123) (LET ((*GLOBAL-VAR-FOR-BIND.TST* 5)) (LIST (LET ((*GLOBAL-VAR-FOR-BIND.TST* (1+ *GLOBAL-VAR-FOR-BIND.TST*))) *GLOBAL-VAR-FOR-BIND.TST*) *GLOBAL-VAR-FOR-BIND.TST*))) EQUAL-OK: (6 5) (PROGN (DEFPARAMETER *GLOBAL-VAR-FOR-BIND.TST* 123) (LET ((*GLOBAL-VAR-FOR-BIND.TST* 5)) (LIST (LET* ((*GLOBAL-VAR-FOR-BIND.TST* (1+ *GLOBAL-VAR-FOR-BIND.TST*))) *GLOBAL-VAR-FOR-BIND.TST*) *GLOBAL-VAR-FOR-BIND.TST*))) EQUAL-OK: (6 5) (PROGN (DEFPARAMETER *GLOBAL-VAR-FOR-BIND.TST* 123) (LET ((*GLOBAL-VAR-FOR-BIND.TST* 5)) (LIST (MULTIPLE-VALUE-BIND (*GLOBAL-VAR-FOR-BIND.TST*) (1+ *GLOBAL-VAR-FOR-BIND.TST*) *GLOBAL-VAR-FOR-BIND.TST*) *GLOBAL-VAR-FOR-BIND.TST*))) EQUAL-OK: (6 5) (PROGN (DEFPARAMETER *GLOBAL-VAR-FOR-BIND.TST* 123) (LET ((*GLOBAL-VAR-FOR-BIND.TST* 5)) (LIST ((LAMBDA (*GLOBAL-VAR-FOR-BIND.TST*) *GLOBAL-VAR-FOR-BIND.TST*) (1+ *GLOBAL-VAR-FOR-BIND.TST*)) *GLOBAL-VAR-FOR-BIND.TST*))) EQUAL-OK: (6 5) (EVAL-WHEN (EVAL COMPILE LOAD) (DEFMACRO CHK-TYPE (FORM TYPE) (LET ((OBJ (GENSYM))) `(LET ((,OBJ ,FORM)) (ASSERT (TYPEP ,OBJ ',TYPE)) (THE ,TYPE ,OBJ))))) EQL-OK: CHK-TYPE (SYMBOL-MACROLET ((X (LIST 'SYMBOL))) (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@X))) (FOO 'BAR))) EQL-OK: BAR (LET ((X 5)) (PROGV '(X) '(20) (SYMBOL-MACROLET ((X (LIST 'SYMBOL))) (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@X))) (FOO 'BAR))))) EQL-OK: BAR (LET ((X :GOOD)) (DECLARE (SPECIAL X)) (LET ((X :BAD)) (SYMBOL-MACROLET NIL (DECLARE (SPECIAL X)) X))) EQL-OK: :GOOD (LOCALLY (DECLARE (SPECIAL SYMBOL-TYPE)) (SETQ SYMBOL-TYPE (LIST 'SYMBOL))) EQUAL-OK: (SYMBOL) (LOCALLY (DECLARE (SPECIAL SYMBOL-TYPE)) (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@SYMBOL-TYPE))) (FOO 'BAR))) EQL-OK: BAR (DEFPARAMETER *SYMBOL-TYPE* (LIST 'SYMBOL)) EQL-OK: *SYMBOL-TYPE* (LET ((*SYMBOL-TYPE* (LIST 'SYMBOL))) (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@*SYMBOL-TYPE*))) (FOO 'BAR))) EQL-OK: BAR (PROGV '(X) '((SYMBOL)) (LET ((X (LIST 'SYMBOL))) (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@X))) (FOO 'BAR)))) [SIMPLE-SOURCE-PROGRAM-ERROR]: Invalid access to the value of the lexical variable X from within a MACROLET definition EQL-OK: ERROR (PROGV '(X) '((SYMBOL)) (LET ((X (LIST 'SYMBOL))) (DEFUN TESTFN NIL (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@X))) (FOO 'BAR)))) (TESTFN)) [SIMPLE-SOURCE-PROGRAM-ERROR]: Invalid access to the value of the lexical variable X from within a MACROLET definition EQL-OK: ERROR (PROGV '(X) '((SYMBOL)) (LET ((X (LIST 'SYMBOL))) (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@X))) (DEFUN TESTFN NIL (FOO 'BAR)))) (TESTFN)) [SIMPLE-SOURCE-PROGRAM-ERROR]: Invalid access to the value of the lexical variable X from within a MACROLET definition EQL-OK: ERROR (MACROLET ((X NIL '(LIST 'SYMBOL))) (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@(X)))) (FOO 'BAR))) EQL-OK: BAR (DEFUN SYMBOL-TYPE-FN NIL (LIST 'SYMBOL)) EQL-OK: SYMBOL-TYPE-FN (FLET ((SYMBOL-TYPE-FN NIL (LIST 'SYMBOL))) (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@(SYMBOL-TYPE-FN)))) (FOO 'BAR))) [SIMPLE-SOURCE-PROGRAM-ERROR]: Invalid access to the local function definition of SYMBOL-TYPE-FN from within a MACROLET definition EQL-OK: ERROR (PROGN (FLET ((SYMBOL-TYPE-FN NIL (LIST 'SYMBOL))) (DEFUN TESTFN NIL (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@(SYMBOL-TYPE-FN)))) (FOO 'BAR)))) (TESTFN)) [SIMPLE-SOURCE-PROGRAM-ERROR]: Invalid access to the local function definition of SYMBOL-TYPE-FN from within a MACROLET definition EQL-OK: ERROR (PROGN (FLET ((SYMBOL-TYPE-FN NIL (LIST 'SYMBOL))) (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@(SYMBOL-TYPE-FN)))) (DEFUN TESTFN NIL (FOO 'BAR)))) (TESTFN)) [SIMPLE-SOURCE-PROGRAM-ERROR]: Invalid access to the local function definition of SYMBOL-TYPE-FN from within a MACROLET definition EQL-OK: ERROR (BLOCK DONE (LET ((X :GOOD)) (DECLARE (SPECIAL X)) (LET ((X :BAD)) (DO* ((I 0 (RETURN-FROM DONE X))) (NIL NIL) (DECLARE (SPECIAL X)))))) EQL-OK: :GOOD (LET ((X :GOOD)) (DECLARE (SPECIAL X)) (LET ((X :BAD)) (MULTIPLE-VALUE-BIND (A B) (FLOOR 13 4) (DECLARE (SPECIAL X)) (LIST A B X)))) EQUAL-OK: (3 1 :GOOD) (LET ((X 1)) (DECLARE (SPECIAL X)) (LET ((X 2)) (DEFUN BIND-TEST-FUNCTION-1 (&OPTIONAL (Y X)) (DECLARE (SPECIAL X)) (LIST Y X)) (BIND-TEST-FUNCTION-1))) EQUAL-OK: (2 1) (LET ((X 5)) (LET ((X (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) Z)) EQL-OK: 6 (LET ((X 5)) (LET* ((X (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) Z)) EQL-OK: 7 (LET ((X 5)) (MULTIPLE-VALUE-BIND (X Z) (VALUES (1+ X) (1+ X)) (DECLARE (SPECIAL X)) Z)) EQL-OK: 6 (LET ((X 5)) ((LAMBDA (X Z) (DECLARE (SPECIAL X)) Z) (1+ X) (1+ X))) EQL-OK: 6 (LET ((X 5)) ((LAMBDA (&OPTIONAL X Z) (DECLARE (SPECIAL X)) Z) (1+ X) (1+ X))) EQL-OK: 6 (LET ((-X- NIL)) (DECLARE (SPECIAL -X-)) (LET ((-F- #'(LAMBDA NIL -X-))) (DECLARE (SPECIAL -F-)) (EVAL `(MACROLET ((%M (-X-) (DECLARE (SPECIAL -F-)) (FUNCALL -F-))) (%M T))))) EQL-OK: NIL (LET ((-X- NIL)) (DECLARE (SPECIAL -X-)) (LET ((-F- #'(LAMBDA NIL -X-))) (DECLARE (SPECIAL -F-)) (MACROLET ((%M (-X-) '(FUNCALL -F-))) (DECLARE (SPECIAL -F-)) (%M T)))) EQL-OK: NIL (LET ((-X- NIL)) (DECLARE (SPECIAL -X-)) (LET ((-F- #'(LAMBDA NIL -X-))) (DECLARE (SPECIAL -F-)) (EVAL `(MACROLET ((%M (-X-) (DECLARE (SPECIAL -F- -X-)) (FUNCALL -F-))) (%M T))))) EQL-OK: T (LET ((-X- NIL)) (DECLARE (SPECIAL -X-)) (LET ((-F- #'(LAMBDA NIL -X-))) (DECLARE (SPECIAL -F-)) (MACROLET ((%M (-X-) '(FUNCALL -F-))) (DECLARE (SPECIAL -F- -X-)) (%M T)))) EQL-OK: NIL (LET ((-X- NIL)) (DECLARE (SPECIAL -X-)) (LET ((-F- #'(LAMBDA NIL -X-))) (DECLARE (SPECIAL -F-)) (EVAL `(MACROLET ((%M ((-X-)) (DECLARE (SPECIAL -F- -X-)) (FUNCALL -F-))) (%M (T)))))) EQL-OK: T (LET ((-X- NIL)) (DECLARE (SPECIAL -X-)) (LET ((-F- #'(LAMBDA NIL -X-))) (DECLARE (SPECIAL -F-)) (MACROLET ((%M ((-X-)) '(FUNCALL -F-))) (DECLARE (SPECIAL -F- -X-)) (%M (T))))) EQL-OK: NIL (LET ((X :SPECIAL)) (DECLARE (SPECIAL X)) (LET ((X :LEXICAL)) (MACROLET ((F NIL 'X)) (DECLARE (SPECIAL X)) (LIST X (F))))) EQUAL-OK: (:SPECIAL :SPECIAL) (LET ((X :SPECIAL)) (DECLARE (SPECIAL X)) (LET ((X :LEXICAL)) (FLET ((F NIL X)) (DECLARE (SPECIAL X)) (LIST X (F))))) EQUAL-OK: (:SPECIAL :LEXICAL) (LET ((X :SPECIAL)) (DECLARE (SPECIAL X)) (LET ((X :LEXICAL)) (LABELS ((F NIL X)) (DECLARE (SPECIAL X)) (LIST X (F))))) EQUAL-OK: (:SPECIAL :LEXICAL) (LET ((X :SPECIAL)) (DECLARE (SPECIAL X)) (LET ((X :LEXICAL)) (LABELS NIL (DECLARE (SPECIAL X)) X))) EQL-OK: :SPECIAL (LET ((X :SPECIAL)) (DECLARE (SPECIAL X)) (LET ((X :LEXICAL)) (LOCALLY (DECLARE (SPECIAL X)) X))) EQL-OK: :SPECIAL (SYMBOLS-CLEANUP '(*GLOBAL-VAR-FOR-BIND.TST* CHK-TYPE *SYMBOL-TYPE* TESTFN SYMBOL-TYPE-FN BIND-TEST-FUNCTION-1)) EQL-OK: NIL RUN-TEST: finished "bind" (0 errors out of 72 tests) RUN-TEST: started # (LET ((X 5)) (LET ((X (1+ X))) (DECLARE (SPECIAL X)) X)) EQL-OK: 6 (LET ((X 5)) (LET* ((X (1+ X))) (DECLARE (SPECIAL X)) X)) EQL-OK: 6 (LET ((X 5)) (MULTIPLE-VALUE-BIND (X) (1+ X) (DECLARE (SPECIAL X)) X)) EQL-OK: 6 (LET ((X 5)) ((LAMBDA (X) (DECLARE (SPECIAL X)) X) (1+ X))) EQL-OK: 6 (BLOCK FOO (HANDLER-BIND ((UNBOUND-VARIABLE (HANDLER-RETURN FOO 'GOOD))) (LET ((X (1+ X))) (DECLARE (SPECIAL X)) X))) WARNING: X is neither declared nor bound, it will be treated as if it were declared SPECIAL. [SIMPLE-UNBOUND-VARIABLE]: NIL: variable X has no value EQL-OK: GOOD (BLOCK FOO (HANDLER-BIND ((UNBOUND-VARIABLE (HANDLER-RETURN FOO 'GOOD))) (LET* ((X (1+ X))) (DECLARE (SPECIAL X)) X))) WARNING: X is neither declared nor bound, it will be treated as if it were declared SPECIAL. [SIMPLE-UNBOUND-VARIABLE]: NIL: variable X has no value EQL-OK: GOOD (BLOCK FOO (HANDLER-BIND ((UNBOUND-VARIABLE (HANDLER-RETURN FOO 'GOOD))) (MULTIPLE-VALUE-BIND (X) (1+ X) (DECLARE (SPECIAL X)) X))) WARNING: X is neither declared nor bound, it will be treated as if it were declared SPECIAL. [SIMPLE-UNBOUND-VARIABLE]: NIL: variable X has no value EQL-OK: GOOD (BLOCK FOO (HANDLER-BIND ((UNBOUND-VARIABLE (HANDLER-RETURN FOO 'GOOD))) ((LAMBDA (X) (DECLARE (SPECIAL X)) X) (1+ X)))) WARNING: X is neither declared nor bound, it will be treated as if it were declared SPECIAL. [SIMPLE-UNBOUND-VARIABLE]: NIL: variable X has no value EQL-OK: GOOD (LET ((X 5)) (LET ((Y (1+ X))) (DECLARE (SPECIAL X)) Y)) EQL-OK: 6 (LET ((X 5)) (LET* ((Y (1+ X))) (DECLARE (SPECIAL X)) Y)) EQL-OK: 6 (LET ((X 5)) (MULTIPLE-VALUE-BIND (Y) (1+ X) (DECLARE (SPECIAL X)) Y)) EQL-OK: 6 (LET ((X 5)) ((LAMBDA (Y) (DECLARE (SPECIAL X)) Y) (1+ X))) EQL-OK: 6 (LET ((X 5)) (LET ((X (1+ X))) X)) EQL-OK: 6 (LET ((X 5)) (LET* ((X (1+ X))) X)) EQL-OK: 6 (LET ((X 5)) (MULTIPLE-VALUE-BIND (X) (1+ X) X)) EQL-OK: 6 (LET ((X 5)) ((LAMBDA (X) X) (1+ X))) EQL-OK: 6 (LET ((X 5)) (PROGV '(X) '(20) (LET ((X (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) Z))) EQL-OK: 6 (LET ((X 5)) (PROGV '(X) '(20) (LET* ((X (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) Z))) EQL-OK: 7 (LET ((X 5)) (PROGV '(X) '(20) (MULTIPLE-VALUE-BIND (X Z) (VALUES (1+ X) (1+ X)) (DECLARE (SPECIAL X)) Z))) EQL-OK: 6 (LET ((X 5)) (PROGV '(X) '(20) ((LAMBDA (&OPTIONAL (X (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) Z)))) EQL-OK: 7 (LET ((X 5)) (PROGV '(X Y) '(20 120) (LET ((X (1+ X)) (Y (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) (LIST Z (LOCALLY (DECLARE (SPECIAL Y)) Y) X Y)))) EQUAL-OK: (6 120 6 6) (LET ((X 5)) (PROGV '(X Y) '(20 120) (LET* ((X (1+ X)) (Y (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) (LIST Z (LOCALLY (DECLARE (SPECIAL Y)) Y) X Y)))) EQUAL-OK: (7 120 6 7) (LET ((X 5)) (PROGV '(X Y) '(20 120) (MULTIPLE-VALUE-BIND (X Y Z) (VALUES (1+ X) (1+ X) (1+ X)) (DECLARE (SPECIAL X)) (LIST Z (LOCALLY (DECLARE (SPECIAL Y)) Y) X Y)))) EQUAL-OK: (6 120 6 6) (LET ((X 5)) (PROGV '(X Y) '(20 120) ((LAMBDA (&OPTIONAL (X (1+ X)) (Y (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) (LIST Z (LOCALLY (DECLARE (SPECIAL Y)) Y) X Y))))) EQUAL-OK: (7 120 6 7) (LET ((X 5)) (PROGV '(X) '(20) (LET ((Y (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) Z))) WARNING: variable Y is not used. Misspelled or missing IGNORE declaration? EQL-OK: 6 (LET ((X 5)) (PROGV '(X) '(20) (LET* ((Y (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) Z))) WARNING: variable Y is not used. Misspelled or missing IGNORE declaration? EQL-OK: 6 (LET ((X 5)) (PROGV '(X) '(20) (MULTIPLE-VALUE-BIND (Y Z) (VALUES (1+ X) (1+ X)) (DECLARE (SPECIAL X)) Z))) WARNING: variable Y is not used. Misspelled or missing IGNORE declaration? EQL-OK: 6 (LET ((X 5)) (PROGV '(X) '(20) ((LAMBDA (&OPTIONAL (Y (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) Z)))) WARNING: variable Y is not used. Misspelled or missing IGNORE declaration? EQL-OK: 6 (PROGN (DEFPARAMETER *GLOBAL-VAR-FOR-BIND.TST* 123) (LET ((*GLOBAL-VAR-FOR-BIND.TST* 5)) (LIST (LET ((*GLOBAL-VAR-FOR-BIND.TST* (1+ *GLOBAL-VAR-FOR-BIND.TST*))) (DECLARE (SPECIAL *GLOBAL-VAR-FOR-BIND.TST*)) *GLOBAL-VAR-FOR-BIND.TST*) *GLOBAL-VAR-FOR-BIND.TST*))) EQUAL-OK: (6 5) (PROGN (DEFPARAMETER *GLOBAL-VAR-FOR-BIND.TST* 123) (LET ((*GLOBAL-VAR-FOR-BIND.TST* 5)) (LIST (LET* ((*GLOBAL-VAR-FOR-BIND.TST* (1+ *GLOBAL-VAR-FOR-BIND.TST*))) (DECLARE (SPECIAL *GLOBAL-VAR-FOR-BIND.TST*)) *GLOBAL-VAR-FOR-BIND.TST*) *GLOBAL-VAR-FOR-BIND.TST*))) EQUAL-OK: (6 5) (PROGN (DEFPARAMETER *GLOBAL-VAR-FOR-BIND.TST* 123) (LET ((*GLOBAL-VAR-FOR-BIND.TST* 5)) (LIST (MULTIPLE-VALUE-BIND (*GLOBAL-VAR-FOR-BIND.TST*) (1+ *GLOBAL-VAR-FOR-BIND.TST*) (DECLARE (SPECIAL *GLOBAL-VAR-FOR-BIND.TST*)) *GLOBAL-VAR-FOR-BIND.TST*) *GLOBAL-VAR-FOR-BIND.TST*))) EQUAL-OK: (6 5) (PROGN (DEFPARAMETER *GLOBAL-VAR-FOR-BIND.TST* 123) (LET ((*GLOBAL-VAR-FOR-BIND.TST* 5)) (LIST ((LAMBDA (*GLOBAL-VAR-FOR-BIND.TST*) (DECLARE (SPECIAL *GLOBAL-VAR-FOR-BIND.TST*)) *GLOBAL-VAR-FOR-BIND.TST*) (1+ *GLOBAL-VAR-FOR-BIND.TST*)) *GLOBAL-VAR-FOR-BIND.TST*))) EQUAL-OK: (6 5) (PROGN (DEFPARAMETER *GLOBAL-VAR-FOR-BIND.TST* 123) (LET ((*GLOBAL-VAR-FOR-BIND.TST* 5)) (LIST (LET ((*GLOBAL-VAR-FOR-BIND.TST* (1+ *GLOBAL-VAR-FOR-BIND.TST*))) *GLOBAL-VAR-FOR-BIND.TST*) *GLOBAL-VAR-FOR-BIND.TST*))) EQUAL-OK: (6 5) (PROGN (DEFPARAMETER *GLOBAL-VAR-FOR-BIND.TST* 123) (LET ((*GLOBAL-VAR-FOR-BIND.TST* 5)) (LIST (LET* ((*GLOBAL-VAR-FOR-BIND.TST* (1+ *GLOBAL-VAR-FOR-BIND.TST*))) *GLOBAL-VAR-FOR-BIND.TST*) *GLOBAL-VAR-FOR-BIND.TST*))) EQUAL-OK: (6 5) (PROGN (DEFPARAMETER *GLOBAL-VAR-FOR-BIND.TST* 123) (LET ((*GLOBAL-VAR-FOR-BIND.TST* 5)) (LIST (MULTIPLE-VALUE-BIND (*GLOBAL-VAR-FOR-BIND.TST*) (1+ *GLOBAL-VAR-FOR-BIND.TST*) *GLOBAL-VAR-FOR-BIND.TST*) *GLOBAL-VAR-FOR-BIND.TST*))) EQUAL-OK: (6 5) (PROGN (DEFPARAMETER *GLOBAL-VAR-FOR-BIND.TST* 123) (LET ((*GLOBAL-VAR-FOR-BIND.TST* 5)) (LIST ((LAMBDA (*GLOBAL-VAR-FOR-BIND.TST*) *GLOBAL-VAR-FOR-BIND.TST*) (1+ *GLOBAL-VAR-FOR-BIND.TST*)) *GLOBAL-VAR-FOR-BIND.TST*))) EQUAL-OK: (6 5) (EVAL-WHEN (EVAL COMPILE LOAD) (DEFMACRO CHK-TYPE (FORM TYPE) (LET ((OBJ (GENSYM))) `(LET ((,OBJ ,FORM)) (ASSERT (TYPEP ,OBJ ',TYPE)) (THE ,TYPE ,OBJ))))) EQL-OK: CHK-TYPE (SYMBOL-MACROLET ((X (LIST 'SYMBOL))) (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@X))) (FOO 'BAR))) EQL-OK: BAR (LET ((X 5)) (PROGV '(X) '(20) (SYMBOL-MACROLET ((X (LIST 'SYMBOL))) (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@X))) (FOO 'BAR))))) WARNING: variable X is not used. Misspelled or missing IGNORE declaration? EQL-OK: BAR (LET ((X :GOOD)) (DECLARE (SPECIAL X)) (LET ((X :BAD)) (SYMBOL-MACROLET NIL (DECLARE (SPECIAL X)) X))) WARNING: variable X is not used. Misspelled or missing IGNORE declaration? EQL-OK: :GOOD (LOCALLY (DECLARE (SPECIAL SYMBOL-TYPE)) (SETQ SYMBOL-TYPE (LIST 'SYMBOL))) EQUAL-OK: (SYMBOL) (LOCALLY (DECLARE (SPECIAL SYMBOL-TYPE)) (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@SYMBOL-TYPE))) (FOO 'BAR))) EQL-OK: BAR (DEFPARAMETER *SYMBOL-TYPE* (LIST 'SYMBOL)) EQL-OK: *SYMBOL-TYPE* (LET ((*SYMBOL-TYPE* (LIST 'SYMBOL))) (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@*SYMBOL-TYPE*))) (FOO 'BAR))) EQL-OK: BAR (PROGV '(X) '((SYMBOL)) (LET ((X (LIST 'SYMBOL))) (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@X))) (FOO 'BAR)))) [SIMPLE-SOURCE-PROGRAM-ERROR]: Invalid access to the value of the lexical variable X from within a MACROLET definition EQL-OK: ERROR (PROGV '(X) '((SYMBOL)) (LET ((X (LIST 'SYMBOL))) (DEFUN TESTFN NIL (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@X))) (FOO 'BAR)))) (TESTFN)) [SIMPLE-SOURCE-PROGRAM-ERROR]: Invalid access to the value of the lexical variable X from within a MACROLET definition EQL-OK: ERROR (PROGV '(X) '((SYMBOL)) (LET ((X (LIST 'SYMBOL))) (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@X))) (DEFUN TESTFN NIL (FOO 'BAR)))) (TESTFN)) [SIMPLE-SOURCE-PROGRAM-ERROR]: Invalid access to the value of the lexical variable X from within a MACROLET definition EQL-OK: ERROR (MACROLET ((X NIL '(LIST 'SYMBOL))) (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@(X)))) (FOO 'BAR))) EQL-OK: BAR (DEFUN SYMBOL-TYPE-FN NIL (LIST 'SYMBOL)) EQL-OK: SYMBOL-TYPE-FN (FLET ((SYMBOL-TYPE-FN NIL (LIST 'SYMBOL))) (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@(SYMBOL-TYPE-FN)))) (FOO 'BAR))) [SIMPLE-SOURCE-PROGRAM-ERROR]: Invalid access to the local function definition of SYMBOL-TYPE-FN from within a MACROLET definition EQL-OK: ERROR (PROGN (FLET ((SYMBOL-TYPE-FN NIL (LIST 'SYMBOL))) (DEFUN TESTFN NIL (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@(SYMBOL-TYPE-FN)))) (FOO 'BAR)))) (TESTFN)) [SIMPLE-SOURCE-PROGRAM-ERROR]: Invalid access to the local function definition of SYMBOL-TYPE-FN from within a MACROLET definition EQL-OK: ERROR (PROGN (FLET ((SYMBOL-TYPE-FN NIL (LIST 'SYMBOL))) (MACROLET ((FOO (FORM) `(CHK-TYPE ,FORM ,@(SYMBOL-TYPE-FN)))) (DEFUN TESTFN NIL (FOO 'BAR)))) (TESTFN)) [SIMPLE-SOURCE-PROGRAM-ERROR]: Invalid access to the local function definition of SYMBOL-TYPE-FN from within a MACROLET definition EQL-OK: ERROR (BLOCK DONE (LET ((X :GOOD)) (DECLARE (SPECIAL X)) (LET ((X :BAD)) (DO* ((I 0 (RETURN-FROM DONE X))) (NIL NIL) (DECLARE (SPECIAL X)))))) WARNING: variable I is assigned but not read WARNING: variable X is not used. Misspelled or missing IGNORE declaration? EQL-OK: :GOOD (LET ((X :GOOD)) (DECLARE (SPECIAL X)) (LET ((X :BAD)) (MULTIPLE-VALUE-BIND (A B) (FLOOR 13 4) (DECLARE (SPECIAL X)) (LIST A B X)))) WARNING: variable X is not used. Misspelled or missing IGNORE declaration? EQUAL-OK: (3 1 :GOOD) (LET ((X 1)) (DECLARE (SPECIAL X)) (LET ((X 2)) (DEFUN BIND-TEST-FUNCTION-1 (&OPTIONAL (Y X)) (DECLARE (SPECIAL X)) (LIST Y X)) (BIND-TEST-FUNCTION-1))) WARNING: Function BIND-TEST-FUNCTION-1 is not defined EQUAL-OK: (2 1) (LET ((X 5)) (LET ((X (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) Z)) EQL-OK: 6 (LET ((X 5)) (LET* ((X (1+ X)) (Z (1+ X))) (DECLARE (SPECIAL X)) Z)) EQL-OK: 7 (LET ((X 5)) (MULTIPLE-VALUE-BIND (X Z) (VALUES (1+ X) (1+ X)) (DECLARE (SPECIAL X)) Z)) EQL-OK: 6 (LET ((X 5)) ((LAMBDA (X Z) (DECLARE (SPECIAL X)) Z) (1+ X) (1+ X))) EQL-OK: 6 (LET ((X 5)) ((LAMBDA (&OPTIONAL X Z) (DECLARE (SPECIAL X)) Z) (1+ X) (1+ X))) EQL-OK: 6 (LET ((-X- NIL)) (DECLARE (SPECIAL -X-)) (LET ((-F- #'(LAMBDA NIL -X-))) (DECLARE (SPECIAL -F-)) (EVAL `(MACROLET ((%M (-X-) (DECLARE (SPECIAL -F-)) (FUNCALL -F-))) (%M T))))) EQL-OK: NIL (LET ((-X- NIL)) (DECLARE (SPECIAL -X-)) (LET ((-F- #'(LAMBDA NIL -X-))) (DECLARE (SPECIAL -F-)) (MACROLET ((%M (-X-) '(FUNCALL -F-))) (DECLARE (SPECIAL -F-)) (%M T)))) EQL-OK: NIL (LET ((-X- NIL)) (DECLARE (SPECIAL -X-)) (LET ((-F- #'(LAMBDA NIL -X-))) (DECLARE (SPECIAL -F-)) (EVAL `(MACROLET ((%M (-X-) (DECLARE (SPECIAL -F- -X-)) (FUNCALL -F-))) (%M T))))) EQL-OK: T (LET ((-X- NIL)) (DECLARE (SPECIAL -X-)) (LET ((-F- #'(LAMBDA NIL -X-))) (DECLARE (SPECIAL -F-)) (MACROLET ((%M (-X-) '(FUNCALL -F-))) (DECLARE (SPECIAL -F- -X-)) (%M T)))) EQL-OK: NIL (LET ((-X- NIL)) (DECLARE (SPECIAL -X-)) (LET ((-F- #'(LAMBDA NIL -X-))) (DECLARE (SPECIAL -F-)) (EVAL `(MACROLET ((%M ((-X-)) (DECLARE (SPECIAL -F- -X-)) (FUNCALL -F-))) (%M (T)))))) EQL-OK: T (LET ((-X- NIL)) (DECLARE (SPECIAL -X-)) (LET ((-F- #'(LAMBDA NIL -X-))) (DECLARE (SPECIAL -F-)) (MACROLET ((%M ((-X-)) '(FUNCALL -F-))) (DECLARE (SPECIAL -F- -X-)) (%M (T))))) EQL-OK: NIL (LET ((X :SPECIAL)) (DECLARE (SPECIAL X)) (LET ((X :LEXICAL)) (MACROLET ((F NIL 'X)) (DECLARE (SPECIAL X)) (LIST X (F))))) WARNING: variable X is not used. Misspelled or missing IGNORE declaration? EQUAL-OK: (:SPECIAL :SPECIAL) (LET ((X :SPECIAL)) (DECLARE (SPECIAL X)) (LET ((X :LEXICAL)) (FLET ((F NIL X)) (DECLARE (SPECIAL X)) (LIST X (F))))) EQUAL-OK: (:SPECIAL :LEXICAL) (LET ((X :SPECIAL)) (DECLARE (SPECIAL X)) (LET ((X :LEXICAL)) (LABELS ((F NIL X)) (DECLARE (SPECIAL X)) (LIST X (F))))) EQUAL-OK: (:SPECIAL :LEXICAL) (LET ((X :SPECIAL)) (DECLARE (SPECIAL X)) (LET ((X :LEXICAL)) (LABELS NIL (DECLARE (SPECIAL X)) X))) WARNING: variable X is not used. Misspelled or missing IGNORE declaration? EQL-OK: :SPECIAL (LET ((X :SPECIAL)) (DECLARE (SPECIAL X)) (LET ((X :LEXICAL)) (LOCALLY (DECLARE (SPECIAL X)) X))) WARNING: variable X is not used. Misspelled or missing IGNORE declaration? EQL-OK: :SPECIAL (SYMBOLS-CLEANUP '(*GLOBAL-VAR-FOR-BIND.TST* CHK-TYPE *SYMBOL-TYPE* TESTFN SYMBOL-TYPE-FN BIND-TEST-FUNCTION-1)) EQL-OK: NIL RUN-TEST: finished "bind" (0 errors out of 72 tests) RUN-TEST: started # (DEFUN MY-CPL (CLASS) (CLASS-PRECEDENCE-LIST (FIND-CLASS CLASS))) EQL-OK: MY-CPL (DEFUN CHECK-SUPERCLASSES (CLASS EXPECTED) (LET ((EXPECTED (LIST* CLASS 'T 'STANDARD-OBJECT 'CONDITION EXPECTED)) (SUPER (MAPCAR #'CLASS-NAME (MY-CPL CLASS)))) (LIST (SET-DIFFERENCE SUPER EXPECTED) (SET-DIFFERENCE EXPECTED SUPER)))) EQL-OK: CHECK-SUPERCLASSES (MULTIPLE-VALUE-BIND (VALUE CONDITION) (IGNORE-ERRORS (ERROR "Foo")) (LIST VALUE (TYPE-OF CONDITION))) EQUAL-OK: (NIL SIMPLE-ERROR) (MULTIPLE-VALUE-LIST (IGNORE-ERRORS (VALUES 23 42))) EQUAL-OK: (23 42) (CHECK-SUPERCLASSES 'WARNING 'NIL) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'STYLE-WARNING '(WARNING)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'SERIOUS-CONDITION 'NIL) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'ERROR '(SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'CELL-ERROR '(ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'PARSE-ERROR '(ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'STORAGE-CONDITION '(SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'SIMPLE-ERROR '(SIMPLE-CONDITION ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'SIMPLE-CONDITION 'NIL) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'SIMPLE-WARNING '(SIMPLE-CONDITION WARNING)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'FILE-ERROR '(ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'CONTROL-ERROR '(ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'PROGRAM-ERROR '(ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'UNDEFINED-FUNCTION '(CELL-ERROR ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'ARITHMETIC-ERROR '(ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'DIVISION-BY-ZERO '(ARITHMETIC-ERROR ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'FLOATING-POINT-INVALID-OPERATION '(ARITHMETIC-ERROR ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'FLOATING-POINT-INEXACT '(ARITHMETIC-ERROR ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'FLOATING-POINT-OVERFLOW '(ARITHMETIC-ERROR ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'FLOATING-POINT-UNDERFLOW '(ARITHMETIC-ERROR ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'UNBOUND-SLOT '(CELL-ERROR ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'PACKAGE-ERROR '(ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'PRINT-NOT-READABLE '(ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'READER-ERROR '(PARSE-ERROR STREAM-ERROR ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'STREAM-ERROR '(ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'END-OF-FILE '(STREAM-ERROR ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'UNBOUND-VARIABLE '(CELL-ERROR ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'TYPE-ERROR '(ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (CHECK-SUPERCLASSES 'SIMPLE-TYPE-ERROR '(SIMPLE-CONDITION TYPE-ERROR ERROR SERIOUS-CONDITION)) EQUAL-OK: (NIL NIL) (DEFINE-CONDITION TEST NIL NIL) EQL-OK: TEST (CHECK-SUPERCLASSES 'TEST 'NIL) EQUAL-OK: (NIL NIL) (DEFINE-CONDITION TEST2 (TEST) NIL) EQL-OK: TEST2 (CHECK-SUPERCLASSES 'TEST2 '(TEST)) EQUAL-OK: (NIL NIL) (DEFINE-CONDITION TEST3 (TEST2 SIMPLE-CONDITION) NIL) EQL-OK: TEST3 (CHECK-SUPERCLASSES 'TEST3 '(TEST2 TEST SIMPLE-CONDITION)) EQUAL-OK: (NIL NIL) (PROGN (MAKE-CONDITION 'TEST) T) EQL-OK: T (IGNORE-ERRORS (PROGN (MAKE-CONDITION 'INTEGER) T)) EQL-OK: NIL (DEFINE-CONDITION TEST4 (TEST3) NIL (:REPORT (LAMBDA (CONDITION STREAM) (FORMAT STREAM "Yow! -- ~S" (TYPE-OF CONDITION))))) EQL-OK: TEST4 (WITH-OUTPUT-TO-STRING (S) (PRINC (MAKE-CONDITION 'TEST4) S)) EQUAL-OK: "Yow! -- TEST4" (DEFINE-CONDITION TEST5 (TEST4) NIL) EQL-OK: TEST5 (WITH-OUTPUT-TO-STRING (S) (PRINC (MAKE-CONDITION 'TEST5) S)) EQUAL-OK: "Yow! -- TEST5" (WITH-OUTPUT-TO-STRING (S) (PRINC (MAKE-CONDITION 'TEST3 :FORMAT-CONTROL "And How! -- ~S" :FORMAT-ARGUMENTS '(23)) S)) EQUAL-OK: "And How! -- 23" (DEFINE-CONDITION TEST6 (TEST4) ((FOO :INITARG :FOO :INITFORM 23 :ACCESSOR TEST6-FOO)) (:REPORT (LAMBDA (CONDITION STREAM) (FORMAT STREAM "~S -- ~S" (TYPE-OF CONDITION) (TEST6-FOO CONDITION))))) EQL-OK: TEST6 (TEST6-FOO (MAKE-CONDITION 'TEST6)) EQL-OK: 23 (TEST6-FOO (MAKE-CONDITION 'TEST6 :FOO 42)) EQL-OK: 42 (SETF (TEST6-FOO (MAKE-CONDITION 'TEST6 :FOO 42)) 17) EQL-OK: 17 (WITH-OUTPUT-TO-STRING (S) (PRINC (MAKE-CONDITION 'TEST6 :FOO 42) S)) EQUAL-OK: "TEST6 -- 42" (LET ((TYPE '(OR PROGRAM-ERROR TYPE-ERROR))) (TYPEP (MAKE-CONDITION TYPE) TYPE)) EQL-OK: T (LET ((TYPE '(AND SIMPLE-ERROR TYPE-ERROR))) (TYPEP (MAKE-CONDITION TYPE) TYPE)) EQL-OK: T (IGNORE-ERRORS (HANDLER-BIND NIL (ERROR "Foo"))) EQL-OK: NIL (MULTIPLE-VALUE-LIST (BLOCK FOO (HANDLER-BIND ((ERROR (HANDLER-RETURN FOO 23))) (VALUES 42 17)))) EQUAL-OK: (42 17) (MULTIPLE-VALUE-LIST (BLOCK FOO (HANDLER-BIND ((ERROR (HANDLER-RETURN FOO (VALUES 23 17)))) (ERROR "Foo")))) [SIMPLE-ERROR]: Foo EQUAL-OK: (23 17) (IGNORE-ERRORS (BLOCK FOO (HANDLER-BIND ((TYPE-ERROR (HANDLER-RETURN FOO 23))) (ERROR "Foo")))) EQL-OK: NIL (BLOCK FOO (HANDLER-BIND (((OR TYPE-ERROR ERROR) (HANDLER-RETURN FOO 23))) (ERROR "Foo"))) [SIMPLE-ERROR]: Foo EQL-OK: 23 (IGNORE-ERRORS (BLOCK FOO (LET ((FIRST-TIME T)) (HANDLER-BIND ((ERROR #'(LAMBDA (C) (PRINC-ERROR C) (IF FIRST-TIME (PROGN (SETQ FIRST-TIME NIL) (ERROR "Bar")) (RETURN-FROM FOO 23))))) (ERROR "Foo"))))) [SIMPLE-ERROR]: Foo EQL-OK: NIL (BLOCK FOO (LET ((FIRST-TIME T)) (HANDLER-BIND ((ERROR (HANDLER-RETURN FOO 23))) (HANDLER-BIND ((ERROR #'(LAMBDA (C) (PRINC-ERROR C) (IF FIRST-TIME (PROGN (SETQ FIRST-TIME NIL) (ERROR "Bar")) (RETURN-FROM FOO 42))))) (ERROR "Foo"))))) [SIMPLE-ERROR]: Foo [SIMPLE-ERROR]: Bar EQL-OK: 23 (IGNORE-ERRORS (BLOCK FOO (HANDLER-BIND ((ERROR #'(LAMBDA (C) (PRINC-ERROR C) NIL)) (ERROR (HANDLER-RETURN FOO 23))) (ERROR "Foo")))) [SIMPLE-ERROR]: Foo [SIMPLE-ERROR]: Foo EQL-OK: 23 (BLOCK FOO (HANDLER-BIND ((TYPE-ERROR (HANDLER-RETURN FOO 42)) (ERROR (HANDLER-RETURN FOO 23))) (ERROR "Foo"))) [SIMPLE-ERROR]: Foo EQL-OK: 23 (BLOCK FOO (HANDLER-BIND ((ERROR (HANDLER-RETURN FOO 23))) (BLOCK BAR (HANDLER-BIND ((ERROR (HANDLER-RETURN FOO 42))) (RETURN-FROM BAR))) (ERROR "Foo"))) [SIMPLE-ERROR]: Foo EQL-OK: 23 (MULTIPLE-VALUE-LIST (HANDLER-CASE (ERROR "Foo") (ERROR (C) (WHEN (TYPEP C 'ERROR) (VALUES 23 42))))) EQUAL-OK: (23 42) (IGNORE-ERRORS (HANDLER-CASE (ERROR "Foo") (TYPE-ERROR NIL 23))) EQL-OK: NIL (IGNORE-ERRORS (HANDLER-CASE (ERROR "Foo"))) EQL-OK: NIL (MULTIPLE-VALUE-LIST (HANDLER-CASE (VALUES 42 17) (ERROR NIL 23))) EQUAL-OK: (42 17) (MULTIPLE-VALUE-LIST (HANDLER-CASE (VALUES 23 42) (:NO-ERROR (A B) (VALUES B A)))) EQUAL-OK: (42 23) (HANDLER-CASE (ERROR "Foo") (ERROR NIL 23) (:NO-ERROR (&REST ARGS) (DECLARE (IGNORE ARGS)) 42)) EQL-OK: 23 (HANDLER-CASE 23 (:NO-ERROR (V) (1+ V)) (ERROR NIL 42)) EQL-OK: 24 (HANDLER-CASE (ERROR "Foo") (TYPE-ERROR NIL 23) (ERROR NIL 42)) EQL-OK: 42 (IGNORE-ERRORS (PROGN (BLOCK FOO (HANDLER-CASE (RETURN-FROM FOO 23) (ERROR NIL 42))) (ERROR "Foo"))) EQL-OK: NIL (IGNORE-ERRORS (BLOCK FOO (LET ((FIRST-TIME T)) (HANDLER-CASE (ERROR "Foo") (ERROR NIL (IF FIRST-TIME (PROGN (SETF FIRST-TIME NIL) (ERROR "Bar")) (RETURN-FROM FOO 23))))))) EQL-OK: NIL (MACROLET ((%M (&REST ARGS) (CONS 'ERROR ARGS))) (HANDLER-BIND ((ERROR #'(LAMBDA (C2) (INVOKE-RESTART (FIND-RESTART 'FOO C2))))) (HANDLER-BIND ((ERROR #'(LAMBDA (C) (PRINC-ERROR C) (ERROR "blah")))) (RESTART-CASE (RESTART-CASE (%M "boo!") (FOO NIL 'BAD)) (FOO NIL 'GOOD))))) [SIMPLE-ERROR]: boo! EQL-OK: GOOD (SYMBOL-MACROLET ((%S (ERROR "boo!"))) (HANDLER-BIND ((ERROR #'(LAMBDA (C2) (INVOKE-RESTART (FIND-RESTART 'FOO C2))))) (HANDLER-BIND ((ERROR #'(LAMBDA (C) (PRINC-ERROR C) (ERROR "blah")))) (RESTART-CASE (RESTART-CASE %S (FOO NIL 'BAD)) (FOO NIL 'GOOD))))) [SIMPLE-ERROR]: boo! EQL-OK: GOOD (MACROLET ((%M2 (&REST ARGS) (CONS 'ERROR ARGS))) (MACROLET ((%M (&REST ARGS &ENVIRONMENT ENV) (MACROEXPAND (CONS '%M2 ARGS) ENV))) (HANDLER-BIND ((ERROR #'(LAMBDA (C2) (INVOKE-RESTART (FIND-RESTART 'FOO C2))))) (HANDLER-BIND ((ERROR #'(LAMBDA (C) (PRINC-ERROR C) (ERROR "blah")))) (RESTART-CASE (RESTART-CASE (%M "boo!") (FOO NIL 'BAD)) (FOO NIL 'GOOD)))))) [SIMPLE-ERROR]: boo! EQL-OK: GOOD (MACROLET ((%M2 (&REST ARGS) (CONS 'ERROR ARGS))) (MACROLET ((%M (&REST ARGS &ENVIRONMENT ENV) (MACROEXPAND (CONS '%M2 ARGS) ENV))) (HANDLER-BIND ((ERROR #'(LAMBDA (C2) (INVOKE-RESTART (FIND-RESTART 'FOO C2))))) (HANDLER-BIND ((ERROR #'(LAMBDA (C) (PRINC-ERROR C) (ERROR "blah")))) (RESTART-CASE (WITH-RESTARTS ((FOO NIL 'BAD)) (%M "boo!")) (FOO NIL 'GOOD)))))) [SIMPLE-ERROR]: boo! EQL-OK: GOOD (MULTIPLE-VALUE-LIST (WITH-SIMPLE-RESTART (FOO "zzz") (INVOKE-RESTART 'FOO))) EQUAL-OK: (NIL T) (MULTIPLE-VALUE-LIST (FLET ((%F NIL (INVOKE-RESTART 'FOO))) (WITH-SIMPLE-RESTART (FOO "zzz") (%F)))) EQUAL-OK: (NIL T) (MULTIPLE-VALUE-LIST (WITH-SIMPLE-RESTART (NIL "") (INVOKE-RESTART (FIRST (COMPUTE-RESTARTS))))) EQUAL-OK: (NIL T) (RESTART-CASE (INVOKE-RESTART 'FOO) (FOO NIL :TEST (LAMBDA (C) (PRINC-ERROR C) NIL) 'BAD) (FOO NIL 'GOOD)) [NULL]: NIL EQL-OK: GOOD (BLOCK NIL (HANDLER-BIND ((TYPE-ERROR (LAMBDA (C) (RETURN (LIST (TYPE-ERROR-EXPECTED-TYPE C) (TYPE-ERROR-DATUM C)))))) (COERCE '(1 2 3) 'INTEGER))) EQUAL-OK: (INTEGER (1 2 3)) (BLOCK NIL (HANDLER-BIND ((TYPE-ERROR (LAMBDA (C) (RETURN (LIST (TYPE-ERROR-EXPECTED-TYPE C) (TYPE-ERROR-DATUM C)))))) (COERCE '(1 2 3) '(INTEGER 1)))) EQUAL-OK: ((INTEGER 1) (1 2 3)) (LET ((DONE NIL)) (BLOCK TEST (SYSTEM::DRIVER #'(LAMBDA NIL (WHEN DONE (RETURN-FROM TEST NIL)) (SETQ DONE T) (HANDLER-BIND ((ERROR (LAMBDA (C) (THROW 'SYSTEM::DONE-SIGNALING NIL)))) (LET ((*DEBUG-IO* (MAKE-TWO-WAY-STREAM (MAKE-STRING-INPUT-STREAM "") *TERMINAL-IO*))) (ASSERT (= 1 2)))))))) *** - (= 1 2) must evaluate to a non-NIL value. EQL-OK: NIL (BLOCK NIL (HANDLER-BIND ((UNBOUND-VARIABLE (HANDLER-RETURN NIL :GOOD))) (LET ((FOO (GENSYM "UNBOUND-"))) (DECLARE (COMPILE) (OPTIMIZE SAFETY (DEBUG 1))) (PROGN (SYMBOL-VALUE FOO) :BAD)))) [SIMPLE-UNBOUND-VARIABLE]: SYMBOL-VALUE: variable #1=#:UNBOUND-21475 has no value EQL-OK: :GOOD (BLOCK NIL (DECLAIM (OPTIMIZE SAFETY (DEBUG 1))) (UNWIND-PROTECT (HANDLER-BIND ((UNBOUND-VARIABLE (HANDLER-RETURN NIL :GOOD))) (LET ((FOO (GENSYM "UNBOUND-"))) (DECLARE (COMPILE)) (PROGN (SYMBOL-VALUE FOO) :BAD))) (DECLAIM (OPTIMIZE (SAFETY 1))))) [SIMPLE-UNBOUND-VARIABLE]: SYMBOL-VALUE: variable #1=#:UNBOUND-21483 has no value EQL-OK: :GOOD (BLOCK NIL (HANDLER-BIND ((UNBOUND-VARIABLE (HANDLER-RETURN NIL :GOOD))) (LET ((FOO (GENSYM "UNBOUND-"))) (PROGN (SYMBOL-VALUE FOO) :BAD)))) [SIMPLE-UNBOUND-VARIABLE]: SYMBOL-VALUE: variable #1=#:UNBOUND-21490 has no value EQL-OK: :GOOD (BLOCK NIL (HANDLER-BIND ((READER-ERROR (LAMBDA (C) (PRINC-ERROR C) (RETURN (STREAMP (STREAM-ERROR-STREAM C)))))) (READ-FROM-STRING ")"))) [SIMPLE-READER-ERROR]: READ from #1=#: an object cannot start with #\) EQL-OK: T (BLOCK NIL (HANDLER-BIND ((READER-ERROR (LAMBDA (C) (PRINC-ERROR C) (RETURN (STREAMP (STREAM-ERROR-STREAM C)))))) (READ-FROM-STRING ",1"))) [SIMPLE-READER-ERROR]: READ: comma is illegal outside of backquote EQL-OK: T (BLOCK NIL (HANDLER-BIND ((STYLE-WARNING (HANDLER-RETURN NIL T))) (DEFUN TEST~ (B $) (DECLARE (COMPILE)) (COND (B NIL) (T T))))) [SIMPLE-STYLE-WARNING]: in TEST~ : variable $ is not used. Misspelled or missing IGNORE declaration? EQL-OK: T (LET (BAD) (DECLARE (OPTIMIZE SAFETY)) (DOLIST (TP '(ARITHMETIC-ERROR CELL-ERROR CONDITION CONTROL-ERROR DIVISION-BY-ZERO END-OF-FILE ERROR FILE-ERROR FLOATING-POINT-INEXACT FLOATING-POINT-INVALID-OPERATION FLOATING-POINT-UNDERFLOW FLOATING-POINT-OVERFLOW PACKAGE-ERROR PARSE-ERROR PRINT-NOT-READABLE PROGRAM-ERROR READER-ERROR SERIOUS-CONDITION SIMPLE-CONDITION SIMPLE-ERROR SIMPLE-TYPE-ERROR SIMPLE-WARNING STORAGE-CONDITION STREAM-ERROR STYLE-WARNING TYPE-ERROR UNBOUND-SLOT UNBOUND-VARIABLE UNDEFINED-FUNCTION WARNING) BAD) (UNLESS (TYPEP (HANDLER-CASE (MAKE-CONDITION TP) (ERROR NIL NIL)) 'CONDITION) (PUSH TP BAD)))) EQL-OK: NIL (WITH-OUTPUT-TO-STRING (S) (DEFINE-CONDITION MY-SIMPLE (SIMPLE-CONDITION) NIL (:REPORT (LAMBDA (C S) (FORMAT S "good: ~S overrides SIMPLE-CONDITION" (TYPE-OF C))))) (PRINC (MAKE-CONDITION 'MY-SIMPLE :FORMAT-CONTROL "bad: SIMPLE-CONDITION overrides MY-SIMPLE") S)) EQUAL-OK: "good: MY-SIMPLE overrides SIMPLE-CONDITION" (HANDLER-CASE (COMPILE NIL (LAMBDA NIL (DEFINE-CONDITION C (CONDITION) NIL (:REPORT (LAMBDA (C) (PRINC C)))))) (WARNING (W) (PRINC-ERROR W) 'WARNING)) [SIMPLE-WARNING]: in #:|1-1| : Cannot call #'(LAMBDA (C) (PRINC C)) on 2 arguments EQL-OK: WARNING (HANDLER-CASE (COMPILE NIL (LAMBDA NIL (MAPCAR (LAMBDA NIL 1) '(1 2 3)))) (WARNING (W) (PRINC-ERROR W) 'WARNING)) [SIMPLE-WARNING]: Cannot call #'(LAMBDA NIL 1) on 1 argument EQL-OK: WARNING (LET ((CLOSURE (COMPILE NIL (LAMBDA (X Y) (IGNORE-ERRORS (= X Y)))))) (FIND-IF #'SYSTEM::CLOSUREP (SYSTEM::CLOSURE-CONSTS CLOSURE))) EQL-OK: NIL (FIND-IF #'SYSTEM::CLOSUREP (SYSTEM::CLOSURE-CONSTS #'CLOS::ANY-METHOD-COMBINATION-CHECK-OPTIONS)) EQL-OK: NIL (FIND-IF #'SYSTEM::CLOSUREP (SYSTEM::CLOSURE-CONSTS (COMPILE NIL (LAMBDA (ARG) (HANDLER-BIND ((ERROR (CONSTANTLY NIL))) (CAR ARG)))))) EQL-OK: NIL (SYMBOLS-CLEANUP '(MY-CPL CHECK-SUPERCLASSES C MY-SIMPLE TEST TEST2 TEST3 TEST4 TEST5 TEST6 TEST~)) EQL-OK: NIL RUN-TEST: finished "conditions" (0 errors out of 98 tests) RUN-TEST: started # (DEFUN HANDLER-USE-VALUE (VALUE) (LAMBDA (C) (PRINC-ERROR C) (USE-VALUE VALUE))) EQL-OK: HANDLER-USE-VALUE (DEFMACRO CHECK-USE-VALUE (FUN GOOD BAD &KEY (TYPE 'TYPE-ERROR) (TEST 'EQL)) `(HANDLER-BIND ((,TYPE (HANDLER-USE-VALUE ',GOOD))) (,TEST (,FUN ',GOOD) (,FUN ',BAD)))) EQL-OK: CHECK-USE-VALUE (CHECK-USE-VALUE CHAR-CODE #\1 12 :TEST =) [SIMPLE-TYPE-ERROR]: CHAR-CODE: argument 12 is not a character EQL-OK: T (CHECK-USE-VALUE SYMBOL-NAME GOOD "bad" :TEST STRING=) [SIMPLE-TYPE-ERROR]: SYMBOL-NAME: #1="bad" is not a symbol EQL-OK: T (CHECK-USE-VALUE INTERN "BAR" BAR :TEST EQ) [SIMPLE-TYPE-ERROR]: INTERN: argument BAR is not a string EQL-OK: T (CHECK-USE-VALUE FBOUNDP CONS "CONS") [SIMPLE-TYPE-ERROR]: FBOUNDP: #1="CONS" is not a function name; try using a symbol instead EQL-OK: T (CHECK-USE-VALUE FDEFINITION CONS "CONS") [SIMPLE-TYPE-ERROR]: FDEFINITION: #1="CONS" is not a function name; try using a symbol instead EQL-OK: T (CHECK-USE-VALUE STRING "123" 123) [SIMPLE-TYPE-ERROR]: STRING: argument 123 should be a string, a symbol or a character EQL-OK: T (CHECK-USE-VALUE (LAMBDA (A) (AREF A 2)) #(A B C D) 1) [SIMPLE-TYPE-ERROR]: AREF: argument 1 is not an array EQL-OK: T (CHECK-USE-VALUE (LAMBDA (A) (SETF (AREF A 2) 'X)) #(A B C D) 1) [SIMPLE-TYPE-ERROR]: SYSTEM::STORE: argument 1 is not an array EQL-OK: T (CHECK-USE-VALUE (LAMBDA (A) (ROW-MAJOR-AREF A 3)) #2A((A B) (C D)) 1) [SIMPLE-TYPE-ERROR]: ROW-MAJOR-AREF: argument 1 is not an array EQL-OK: T (CHECK-USE-VALUE (LAMBDA (A) (SETF (ROW-MAJOR-AREF A 3) 'X)) #2A((A B) (C D)) 1) [SIMPLE-TYPE-ERROR]: SYSTEM::ROW-MAJOR-STORE: argument 1 is not an array EQL-OK: T (CHECK-USE-VALUE ARRAY-ELEMENT-TYPE #*1001 1) [SIMPLE-TYPE-ERROR]: ARRAY-ELEMENT-TYPE: argument 1 is not an array EQL-OK: T (CHECK-USE-VALUE ARRAY-RANK #(A B C D) 1) [SIMPLE-TYPE-ERROR]: ARRAY-RANK: argument 1 is not an array EQL-OK: T (CHECK-USE-VALUE (LAMBDA (A) (ARRAY-DIMENSION A 1)) #2A((A B) (C D)) 1) [SIMPLE-TYPE-ERROR]: ARRAY-DIMENSION: argument 1 is not an array EQL-OK: T (CHECK-USE-VALUE ARRAY-DIMENSIONS #2A((A B) (C D)) 1 :TEST EQUAL) [SIMPLE-TYPE-ERROR]: ARRAY-DIMENSIONS: argument 1 is not an array EQL-OK: T (CHECK-USE-VALUE (LAMBDA (A) (ARRAY-IN-BOUNDS-P A 1 2)) #2A((A B) (C D)) 1) [SIMPLE-TYPE-ERROR]: ARRAY-IN-BOUNDS-P: argument 1 is not an array EQL-OK: T (CHECK-USE-VALUE (LAMBDA (A) (ARRAY-ROW-MAJOR-INDEX A 2)) #(A B C D) 1) [SIMPLE-TYPE-ERROR]: ARRAY-ROW-MAJOR-INDEX: argument 1 is not an array EQL-OK: T (CHECK-USE-VALUE (LAMBDA (A) (ARRAY-ROW-MAJOR-INDEX A 1 1)) #2A((A B) (C D)) 1) [SIMPLE-TYPE-ERROR]: ARRAY-ROW-MAJOR-INDEX: argument 1 is not an array EQL-OK: T (CHECK-USE-VALUE ADJUSTABLE-ARRAY-P #2A((A B) (C D)) 1) [SIMPLE-TYPE-ERROR]: ADJUSTABLE-ARRAY-P: argument 1 is not an array EQL-OK: T (CHECK-USE-VALUE (LAMBDA (A) (BIT A 2)) #*1011 1) [SIMPLE-TYPE-ERROR]: BIT: argument 1 is not an array EQL-OK: T (CHECK-USE-VALUE (LAMBDA (A) (SBIT A 2)) #*1011 1) [SIMPLE-TYPE-ERROR]: SBIT: argument 1 is not an array EQL-OK: T (CHECK-USE-VALUE ARRAY-HAS-FILL-POINTER-P #2A((A B) (C D)) 1) [SIMPLE-TYPE-ERROR]: ARRAY-HAS-FILL-POINTER-P: argument 1 is not an array EQL-OK: T (LET ((BS (MAKE-BROADCAST-STREAM))) (HANDLER-BIND ((TYPE-ERROR (HANDLER-USE-VALUE BS))) (BROADCAST-STREAM-STREAMS 10))) [SIMPLE-TYPE-ERROR]: BROADCAST-STREAM-STREAMS: argument 10 is not a stream of type BROADCAST-STREAM EQL-OK: NIL (HANDLER-BIND ((ERROR (HANDLER-USE-VALUE #\#))) (EQ (GET-DISPATCH-MACRO-CHARACTER #\a #\() (GET-DISPATCH-MACRO-CHARACTER #\# #\())) [SIMPLE-ERROR]: GET-DISPATCH-MACRO-CHARACTER: #\a is not a dispatch macro character EQL-OK: T (WITH-OUTPUT-TO-STRING (O) (HANDLER-BIND ((TYPE-ERROR (HANDLER-USE-VALUE O))) (PRINC "no error!" 123))) [SIMPLE-TYPE-ERROR]: PRINC: argument 123 is not a stream EQUAL-OK: "no error!" (HANDLER-BIND ((TYPE-ERROR (HANDLER-USE-VALUE 16))) (PARSE-INTEGER "ABC" :RADIX 'LAMBDA)) [SIMPLE-TYPE-ERROR]: PARSE-INTEGER: :RADIX argument LAMBDA is not an integer between 2 and 36 EQL-OK: 2748 (WITH-INPUT-FROM-STRING (S "bazonk") (HANDLER-BIND ((TYPE-ERROR (HANDLER-USE-VALUE S))) (LIST (READ-CHAR 123) (READ-CHAR 1) (READ-CHAR 'READ-CHAR)))) [SIMPLE-TYPE-ERROR]: READ-CHAR: argument 123 is not a stream [SIMPLE-TYPE-ERROR]: READ-CHAR: argument 1 is not a stream [SIMPLE-TYPE-ERROR]: READ-CHAR: argument READ-CHAR is not a stream EQUAL-OK: (#\b #\a #\z) (HANDLER-BIND ((TYPE-ERROR (LAMBDA (C) (PRINC-ERROR C) (USE-VALUE (CASE (TYPE-ERROR-DATUM C) (1 *READTABLE*) (2 :UPCASE) (T (ERROR "huh?"))))))) (SETF (READTABLE-CASE 1) 2)) [SIMPLE-TYPE-ERROR]: SYSTEM::SET-READTABLE-CASE: new value 2 should be :UPCASE, :DOWNCASE, :PRESERVE or :INVERT. [SIMPLE-TYPE-ERROR]: SYSTEM::SET-READTABLE-CASE: argument 1 is not a READTABLE EQL-OK: :UPCASE (HANDLER-BIND ((TYPE-ERROR (LAMBDA (C) (PRINC-ERROR C) (USE-VALUE (CASE (TYPE-ERROR-DATUM C) (1 #\#) (2 *READTABLE*) (T (ERROR "huh?"))))))) (NTH-VALUE 1 (GET-MACRO-CHARACTER 1 2))) [SIMPLE-TYPE-ERROR]: GET-MACRO-CHARACTER: argument 1 is not a character [SIMPLE-TYPE-ERROR]: GET-MACRO-CHARACTER: argument 2 is not a READTABLE EQL-OK: T (HANDLER-BIND ((TYPE-ERROR (HANDLER-USE-VALUE 7))) (LIST (DIGIT-CHAR-P #\3 300) (DIGIT-CHAR-P #\8 'DIGIT-CHAR-P))) [SIMPLE-TYPE-ERROR]: DIGIT-CHAR-P: the radix must be an integer between 2 and 36, not 300 [SIMPLE-TYPE-ERROR]: DIGIT-CHAR-P: the radix must be an integer between 2 and 36, not DIGIT-CHAR-P EQUAL-OK: (3 NIL) (HANDLER-BIND ((TYPE-ERROR (LAMBDA (C) (PRINC-ERROR C) (USE-VALUE (CHAR (TYPE-ERROR-DATUM C) 0))))) (LIST (CHAR= "abc" "a") (CHAR-EQUAL "ABC" "a"))) [SIMPLE-TYPE-ERROR]: CHAR=: argument #1="abc" is not a character [SIMPLE-TYPE-ERROR]: CHAR=: argument #1="a" is not a character [SIMPLE-TYPE-ERROR]: CHAR-EQUAL: argument #1="ABC" is not a character [SIMPLE-TYPE-ERROR]: CHAR-EQUAL: argument #1="a" is not a character EQUAL-OK: (T T) (HANDLER-BIND ((TYPE-ERROR (LAMBDA (C) (PRINC-ERROR C) (USE-VALUE (STRING (TYPE-ERROR-DATUM C)))))) (STRING-CONCAT "foo-" 'BAR "-baz")) [SIMPLE-TYPE-ERROR]: STRING-CONCAT: argument BAR is not a string EQUAL-OK: "foo-BAR-baz" (HANDLER-BIND ((UNDEFINED-FUNCTION (LAMBDA (C) (PRINC-ERROR C) (STORE-VALUE (LAMBDA (NEW-CAR PAIR) (SETF (CAR PAIR) NEW-CAR)))))) (LET ((A '(1 . 2))) (SETF (ZZ A) 12) A)) [SIMPLE-UNDEFINED-FUNCTION]: FUNCTION: undefined function #1=(SETF ZZ) EQUAL-OK: (12 . 2) (FMAKUNBOUND '(SETF ZZ)) EQUAL-OK: (SETF ZZ) (HANDLER-BIND ((UNDEFINED-FUNCTION (LAMBDA (C) (PRINC-ERROR C) (STORE-VALUE #'CAR)))) (ZZ '(1 . 2))) [SIMPLE-UNDEFINED-FUNCTION]: EVAL: undefined function ZZ EQL-OK: 1 (FMAKUNBOUND 'ZZ) EQL-OK: ZZ (DEFUN USE-VALUE-READ (C) (PRINC-ERROR C) (USE-VALUE (READ-FROM-STRING (ETYPECASE C (SOURCE-PROGRAM-ERROR (SOURCE-PROGRAM-ERROR-FORM C)) (TYPE-ERROR (TYPE-ERROR-DATUM C)) (CELL-ERROR (CELL-ERROR-NAME C)))))) EQL-OK: USE-VALUE-READ (LET ((TABLE (COPY-READTABLE NIL))) (AND (EQ :UPCASE (READTABLE-CASE TABLE)) (SETF (READTABLE-CASE TABLE) :INVERT) (LET ((COPY (COPY-READTABLE TABLE))) (AND (NOT (EQ TABLE COPY)) (EQ (READTABLE-CASE COPY) :INVERT))))) EQL-OK: T (HANDLER-BIND ((TYPE-ERROR #'USE-VALUE-READ)) (SETF (READTABLE-CASE (COPY-READTABLE NIL)) ":UPCASE")) [SIMPLE-TYPE-ERROR]: SYSTEM::SET-READTABLE-CASE: new value #1=":UPCASE" should be :UPCASE, :DOWNCASE, :PRESERVE or :INVERT. EQL-OK: :UPCASE (HANDLER-BIND ((ERROR (HANDLER-USE-VALUE '+))) (EVAL '#'"+")) [SIMPLE-SOURCE-PROGRAM-ERROR]: FUNCTION: #1="+" is not a function name; try using a symbol instead EQL-OK: # (HANDLER-BIND ((ERROR #'USE-VALUE-READ)) (FUNCALL "+" 1 2 3)) [SIMPLE-TYPE-ERROR]: FUNCALL: #1="+" is not a function name; try using a symbol instead EQL-OK: 6 (HANDLER-BIND ((TYPE-ERROR #'USE-VALUE-READ)) (PROGV '("foo") '(123) FOO)) [SIMPLE-TYPE-ERROR]: PROGV: #1="foo" is not a symbol EQL-OK: 123 (HANDLER-BIND ((PROGRAM-ERROR (HANDLER-USE-VALUE 'ZZ))) (PROGV '(:CONST-VAR) '(123) ZZ)) [SIMPLE-SOURCE-PROGRAM-ERROR]: PROGV: :CONST-VAR is a constant, may not be used as a variable EQL-OK: 123 (LET ((FORM '(PROGV '("foo" :CONST) '(123 321) (+ FOO ZZ)))) (HANDLER-BIND ((TYPE-ERROR #'USE-VALUE-READ) (PROGRAM-ERROR (HANDLER-USE-VALUE 'ZZ))) (LIST (EVAL FORM) FORM))) [SIMPLE-TYPE-ERROR]: PROGV: #1="foo" is not a symbol [SIMPLE-SOURCE-PROGRAM-ERROR]: PROGV: :CONST is a constant, may not be used as a variable EQUAL-OK: (444 (PROGV '("foo" :CONST) '(123 321) (+ FOO ZZ))) (HANDLER-BIND ((TYPE-ERROR #'USE-VALUE-READ)) (MULTIPLE-VALUE-SETQ (BAZ "foo") (VALUES 123 321)) (LIST FOO BAZ)) [SIMPLE-TYPE-ERROR]: MULTIPLE-VALUE-SETQ: #1="foo" is not a symbol EQUAL-OK: (321 123) (HANDLER-BIND ((PROGRAM-ERROR (HANDLER-USE-VALUE 'ZZ))) (SETQ :CONST-VAR 125) ZZ) [SIMPLE-SOURCE-PROGRAM-ERROR]: SETQ: :CONST-VAR is a constant, may not be used as a variable EQL-OK: 125 (HANDLER-BIND ((PROGRAM-ERROR (HANDLER-USE-VALUE '(ZZ 48)))) (LET (("foo" 32)) ZZ)) [SIMPLE-SOURCE-PROGRAM-ERROR]: LET: illegal variable specification #1=("foo" 32) EQL-OK: 48 (HANDLER-BIND ((PROGRAM-ERROR (HANDLER-USE-VALUE 'ZZ))) (LET ((:CONST-VAR 64)) ZZ)) [SIMPLE-SOURCE-PROGRAM-ERROR]: LET: :CONST-VAR is a constant, may not be used as a variable EQL-OK: 64 (HANDLER-BIND ((TYPE-ERROR #'USE-VALUE-READ) (SOURCE-PROGRAM-ERROR #'USE-VALUE-READ)) (FUNCALL "CAR" '(1 . 1))) [SIMPLE-TYPE-ERROR]: FUNCALL: #1="CAR" is not a function name; try using a symbol instead EQL-OK: 1 (HANDLER-BIND ((TYPE-ERROR #'USE-VALUE-READ) (SOURCE-PROGRAM-ERROR #'USE-VALUE-READ)) (SETQ "FOO" 1) (SYMBOL-VALUE 'FOO)) [SIMPLE-TYPE-ERROR]: SETQ: #1="FOO" is not a symbol EQL-OK: 1 (LET ((COUNT 5)) (FLET ((HANDLER (C) (PRINC-ERROR C) (DECF COUNT) (USE-VALUE (IF (ZEROP COUNT) 'X COUNT)))) (HANDLER-BIND ((PROGRAM-ERROR #'HANDLER) (TYPE-ERROR #'HANDLER)) (SETQ :CONST-VAR 12))) (LIST COUNT X)) [SIMPLE-SOURCE-PROGRAM-ERROR]: SETQ: :CONST-VAR is a constant, may not be used as a variable [SIMPLE-TYPE-ERROR]: SETQ: 4 is not a symbol [SIMPLE-TYPE-ERROR]: SETQ: 3 is not a symbol [SIMPLE-TYPE-ERROR]: SETQ: 2 is not a symbol [SIMPLE-TYPE-ERROR]: SETQ: 1 is not a symbol EQUAL-OK: (0 12) (FLET ((MHT (TEST) (MAKE-HASH-TABLE :TEST TEST))) (CHECK-USE-VALUE MHT EQL BAZONK :TEST EQUALP)) [SIMPLE-TYPE-ERROR]: MAKE-HASH-TABLE: Illegal :TEST argument BAZONK EQL-OK: T (FLET ((MHT (W) (MAKE-HASH-TABLE :WEAK W))) (CHECK-USE-VALUE MHT NIL BAZONK :TEST EQUALP)) [SIMPLE-TYPE-ERROR]: MAKE-HASH-TABLE: argument BAZONK should be :KEY-OR-VALUE, :KEY-AND-VALUE, :VALUE, :KEY or NIL. EQL-OK: T (FLET ((MHT (S) (MAKE-HASH-TABLE :SIZE S))) (CHECK-USE-VALUE MHT 10 BAZONK :TEST EQUALP)) [SIMPLE-TYPE-ERROR]: MAKE-HASH-TABLE: :SIZE argument should be a fixnum >=0, not BAZONK EQL-OK: T (FLET ((MHT (RS) (MAKE-HASH-TABLE :REHASH-SIZE RS))) (CHECK-USE-VALUE MHT 2.0d0 BAZONK :TEST EQUALP)) [SIMPLE-TYPE-ERROR]: MAKE-HASH-TABLE: :REHASH-SIZE argument should be an integer or a float > 1, not BAZONK EQL-OK: T (FLET ((MHT (TR) (MAKE-HASH-TABLE :REHASH-THRESHOLD TR))) (CHECK-USE-VALUE MHT 0.5d0 BAZONK :TEST EQUALP)) [SIMPLE-TYPE-ERROR]: MAKE-HASH-TABLE: :REHASH-THRESHOLD argument should be a real between 0 and 1, not BAZONK EQL-OK: T (HANDLER-BIND ((PROGRAM-ERROR (HANDLER-USE-VALUE '1+)) (TYPE-ERROR (HANDLER-USE-VALUE '1-))) (LIST (EVAL '(1 10)) (FUNCALL 1 100) (APPLY 1 '(1000)))) [SIMPLE-SOURCE-PROGRAM-ERROR]: EVAL: 1 is not a function name; try using a symbol instead [SIMPLE-TYPE-ERROR]: FUNCALL: 1 is not a function name; try using a symbol instead [SIMPLE-TYPE-ERROR]: APPLY: 1 is not a function name; try using a symbol instead EQUAL-OK: (11 99 999) (PROGN (MAKUNBOUND 'BAR) (HANDLER-BIND ((UNBOUND-VARIABLE (LAMBDA (C) (PRINC-ERROR C) (STORE-VALUE 41)))) (1+ BAR))) [SIMPLE-UNBOUND-VARIABLE]: :LAMBDA: variable BAR has no value EQL-OK: 42 BAR EQL-OK: 41 (PROGN (DEFCLASS ZOT NIL (ZOT-FOO)) (SETQ BAR (MAKE-INSTANCE 'ZOT)) (HANDLER-BIND ((UNBOUND-SLOT (LAMBDA (C) (PRINC-ERROR C) (STORE-VALUE 41)))) (1+ (SLOT-VALUE BAR 'ZOT-FOO)))) [SIMPLE-UNBOUND-SLOT]: SLOT-VALUE: The slot ZOT-FOO of #1=# has no value EQL-OK: 42 (SLOT-VALUE BAR 'ZOT-FOO) EQL-OK: 41 (PROGN (DEFINE-CONDITION XYZZY NIL ((F1 :ACCESSOR MY-F1 :INITARG :F1-IS)) (:REPORT (LAMBDA (C S) (FORMAT S "~1Txyzzy: My f1 is ~A" (MY-F1 C))))) (PRINC-TO-STRING (MAKE-CONDITION 'XYZZY :F1-IS "a silly string"))) EQUAL-OK: " xyzzy: My f1 is a silly string" (LET* ((P1 (MAKE-PACKAGE "PACK-1" :USE NIL)) (P2 (MAKE-PACKAGE "PACK-2" :USE NIL)) (P3 (MAKE-PACKAGE "PACK-3" :USE NIL)) (P4 (MAKE-PACKAGE "PACK-4" :USE NIL)) (P5 (MAKE-PACKAGE "PACK-5" :USE NIL)) (BAR-NAME (SYMBOL-NAME (GENSYM "BAR-"))) (FOO1 (INTERN "FOO" P1)) (FOO2 (INTERN "FOO" P2)) (BAR1 (INTERN BAR-NAME P1)) (BAR2 (INTERN BAR-NAME P2)) (BAR3 (INTERN BAR-NAME P3)) (BAR4 (INTERN BAR-NAME P4)) (S12 (INTERN "SYM-1" P2)) (S22 (INTERN "SYM-2" P2)) (S13 (INTERN "SYM-1" P3)) (S23 (INTERN "SYM-2" P3)) (S14 (INTERN "SYM-1" P4)) (S24 (INTERN "SYM-2" P4)) (S15 (INTERN "SYM-1" P5)) (S25 (INTERN "SYM-2" P5))) (EXPORT (LIST S12 S22) P2) (EXPORT (LIST S13 S23) P3) (EXPORT (LIST S14 S24) P4) (HANDLER-BIND ((PACKAGE-ERROR (LAMBDA (C) (PRINC-ERROR C) (INVOKE-RESTART :PACK-3)))) (USE-PACKAGE (LIST P2 P3 P4) P1)) (ASSERT (NULL (SET-EXCLUSIVE-OR (LIST P2 P3 P4) (PACKAGE-USE-LIST P1)))) (ASSERT (EQ (FIND-SYMBOL "SYM-1" P1) S13)) (ASSERT (EQ (FIND-SYMBOL "SYM-2" P1) S23)) (HANDLER-BIND ((PACKAGE-ERROR (LAMBDA (C) (PRINC-ERROR C) (INVOKE-RESTART 'IMPORT)))) (EXPORT S15 P1)) (ASSERT (EQ (FIND-SYMBOL "SYM-1" P1) S15)) (HANDLER-BIND ((PACKAGE-ERROR (LAMBDA (C) (PRINC-ERROR C) (INVOKE-RESTART :PACK-2)))) (EXPORT FOO2 P2)) (ASSERT (EQ (FIND-SYMBOL "FOO" P1) FOO2)) (ASSERT (NULL (SET-EXCLUSIVE-OR (LIST BAR1 BAR2 BAR3 BAR4) (FIND-ALL-SYMBOLS BAR-NAME)))) (HANDLER-BIND ((PACKAGE-ERROR (LAMBDA (C) (PRINC-ERROR C) (INVOKE-RESTART :PACK-1)))) (EXPORT BAR2 P2)) (ASSERT (EQ (FIND-SYMBOL BAR-NAME P1) BAR1)) (EXPORT BAR3 P3) (EXPORT BAR4 P4) (HANDLER-BIND ((PACKAGE-ERROR (LAMBDA (C) (PRINC-ERROR C) (INVOKE-RESTART :PACK-4)))) (UNINTERN BAR1 P1)) (ASSERT (EQ (FIND-SYMBOL BAR-NAME P1) BAR4)) (DELETE-PACKAGE P5) (HANDLER-BIND ((PACKAGE-ERROR (LAMBDA (C) (PRINC-ERROR C) (CONTINUE C)))) (DELETE-PACKAGE P2) (DELETE-PACKAGE P3) (DELETE-PACKAGE P4)) (DELETE-PACKAGE P1)) [SIMPLE-PACKAGE-ERROR]: (USE-PACKAGE (# # #) #1=#): 2 name conflicts remain Which symbol with name "SYM-2" should be accessible in #1#? [SIMPLE-PACKAGE-ERROR]: (USE-PACKAGE (# # #) #1=#): 1 name conflicts remain Which symbol with name "SYM-1" should be accessible in #1#? [SIMPLE-PACKAGE-ERROR]: EXPORT: Symbol PACK-5::SYM-1 should be imported into #1=# before being exported. [SIMPLE-PACKAGE-ERROR]: Importing PACK-5::SYM-1 into #1=# produces a name conflict with PACK-3:SYM-1 and other symbols. [SIMPLE-PACKAGE-ERROR]: Exporting PACK-2::FOO from #1=# produces a name conflict with PACK-1::FOO from #2=#. You may choose which symbol should be accessible in #2#. [SIMPLE-PACKAGE-ERROR]: Exporting PACK-2::BAR-22372 from #1=# produces a name conflict with PACK-1::BAR-22372 from #2=#. You may choose which symbol should be accessible in #2#. [SIMPLE-PACKAGE-ERROR]: Uninterning PACK-1::BAR-22372 from #1=# uncovers a name conflict. You may choose the symbol in favour of which to resolve the conflict. [SIMPLE-PACKAGE-ERROR]: DELETE-PACKAGE: #1=# is used by #. [SIMPLE-PACKAGE-ERROR]: DELETE-PACKAGE: #1=# is used by #. [SIMPLE-PACKAGE-ERROR]: DELETE-PACKAGE: #1=# is used by #. EQL-OK: T (LET ((P1 (MAKE-PACKAGE "PACK" :USE NIL)) P2 P3 P4 (BAR-NAME (SYMBOL-NAME (GENSYM "BAR-")))) (HANDLER-BIND ((PACKAGE-ERROR (LAMBDA (C) (PRINC-ERROR C) (INVOKE-RESTART 'CONTINUE)))) (ASSERT (EQ P1 (MAKE-PACKAGE "PACK")))) (HANDLER-BIND ((PACKAGE-ERROR (LAMBDA (C) (PRINC-ERROR C) (INVOKE-RESTART 'READ "KCAP")))) (SETQ P2 (MAKE-PACKAGE "PACK"))) (ASSERT (STRING= "KCAP" (PACKAGE-NAME P2))) (HANDLER-BIND ((PACKAGE-ERROR (LAMBDA (C) (PRINC-ERROR C) (INVOKE-RESTART 'CONTINUE)))) (SETQ P3 (MAKE-PACKAGE "FOO" :NICKNAMES (LIST "CL" BAR-NAME "KCAP")))) (ASSERT (EQUAL (LIST BAR-NAME) (PACKAGE-NICKNAMES P3))) (HANDLER-BIND ((PACKAGE-ERROR (LAMBDA (C) (PRINC-ERROR C) (INVOKE-RESTART 'READ "ZOT")))) (SETQ P4 (MAKE-PACKAGE "QUUX" :NICKNAMES (LIST "CL" BAR-NAME "KCAP")))) (ASSERT (EQUAL (LIST "ZOT") (PACKAGE-NICKNAMES P4))) (DELETE-PACKAGE P1) (DELETE-PACKAGE P2) (DELETE-PACKAGE P3) (DELETE-PACKAGE P4)) [SIMPLE-PACKAGE-ERROR]: MAKE-PACKAGE: a package with name "PACK" already exists. [SIMPLE-PACKAGE-ERROR]: MAKE-PACKAGE: a package with name "PACK" already exists. [SIMPLE-PACKAGE-ERROR]: MAKE-PACKAGE: a package with name "KCAP" already exists. [SIMPLE-PACKAGE-ERROR]: MAKE-PACKAGE: a package with name "CL" already exists. [SIMPLE-PACKAGE-ERROR]: MAKE-PACKAGE: a package with name "KCAP" already exists. [SIMPLE-PACKAGE-ERROR]: MAKE-PACKAGE: a package with name "BAR-22437" already exists. [SIMPLE-PACKAGE-ERROR]: MAKE-PACKAGE: a package with name "CL" already exists. EQL-OK: T (HANDLER-BIND ((ERROR (HANDLER-USE-VALUE '(9 8 7 6)))) (LIST (BUTLAST 123 2) (BUTLAST '#1=(1 2 3 . #1#) 2) (LAST 123 2) (LAST '#1# 2))) [SIMPLE-TYPE-ERROR]: BUTLAST: 123 is not a list [SIMPLE-ERROR]: BUTLAST: #1=(1 2 3 . #1#) is a circular list [SIMPLE-TYPE-ERROR]: LAST: 123 is not a list [SIMPLE-ERROR]: LAST: #1=(1 2 3 . #1#) is a circular list EQUAL-OK: ((9 8) (9 8) (7 6) (7 6)) (HANDLER-BIND ((ERROR (HANDLER-USE-VALUE 'CHECK-USE-VALUE))) (SETF (DOCUMENTATION '(CHECK-USE-VALUE) 'FUNCTION) "docstring for check-use-value") (DOCUMENTATION 'CHECK-USE-VALUE 'FUNCTION)) [SIMPLE-SOURCE-PROGRAM-ERROR]: (SETF DOCUMENTATION): #1=(CHECK-USE-VALUE) is not a function name; try using a symbol instead EQUAL-OK: "docstring for check-use-value" (HANDLER-BIND ((ERROR (HANDLER-USE-VALUE 'USE-VALUE-READ))) (SETF (DOCUMENTATION '(USE-VALUE-READ) 'FUNCTION) "docstring for use-value-read") (DOCUMENTATION 'USE-VALUE-READ 'FUNCTION)) [SIMPLE-SOURCE-PROGRAM-ERROR]: (SETF DOCUMENTATION): #1=(USE-VALUE-READ) is not a function name; try using a symbol instead EQUAL-OK: "docstring for use-value-read" (MACROLET ((U (V) `(HANDLER-USE-VALUE ,V))) (HANDLER-BIND ((TYPE-ERROR (U "docstring for use-value-read")) (ERROR (U 'USE-VALUE-READ))) (STRING= '(FOO) (DOCUMENTATION '(FOO) 'FUNCTION)))) [SIMPLE-SOURCE-PROGRAM-ERROR]: DOCUMENTATION: #1=(FOO) is not a function name; try using a symbol instead [SIMPLE-TYPE-ERROR]: STRING=: argument #1=(FOO) should be a string, a symbol or a character EQL-OK: T (SYMBOL-MACROLET ((U (HANDLER-USE-VALUE 1))) (HANDLER-BIND ((TYPE-ERROR U)) (+ 'SYMBOL-MACROLET 'HANDLER-BIND 'TYPE-ERROR))) [SIMPLE-TYPE-ERROR]: +: SYMBOL-MACROLET is not a number [SIMPLE-TYPE-ERROR]: +: HANDLER-BIND is not a number [SIMPLE-TYPE-ERROR]: +: TYPE-ERROR is not a number EQL-OK: 3 (SYMBOLS-CLEANUP '(CHECK-USE-VALUE USE-VALUE-READ ZOT FOO BAR BAZ XYZZY)) EQL-OK: NIL RUN-TEST: finished "restarts" (0 errors out of 71 tests) RUN-TEST: started # (INVOKE-RESTART 'NONEXISTENT-RESTART) OK: CONTROL-ERROR (ACOS 'X) OK: TYPE-ERROR (ACOSH 'X) OK: TYPE-ERROR (PROGN (DEFGENERIC FOO01 (X)) (DEFMETHOD FOO01 ((X NUMBER)) T) (LET ((M (FIND-METHOD #'FOO01 NIL (LIST (FIND-CLASS 'NUMBER))))) (REMOVE-METHOD #'FOO01 M) (DEFGENERIC FOO01 (X Y)) (ADD-METHOD #'FOO01 M))) OK: ERROR (ADJUST-ARRAY (MAKE-ARRAY 5 :ADJUSTABLE T) 4 :FILL-POINTER 1) OK: TYPE-ERROR (ADJUST-ARRAY "foo" 10 :FILL-POINTER T) OK: TYPE-ERROR (ADJUSTABLE-ARRAY-P '(X)) OK: TYPE-ERROR (ALPHA-CHAR-P 33) OK: TYPE-ERROR (ALPHANUMERICP 33) OK: TYPE-ERROR (ARRAY-DIMENSIONS '(X)) OK: TYPE-ERROR (ARRAY-DISPLACEMENT '(X)) OK: TYPE-ERROR (ARRAY-ELEMENT-TYPE '(X)) OK: TYPE-ERROR (ARRAY-HAS-FILL-POINTER-P '(X)) OK: TYPE-ERROR (ARRAY-RANK '(X)) OK: TYPE-ERROR (ARRAY-TOTAL-SIZE '(X)) OK: TYPE-ERROR (ASH 3/4 2) OK: TYPE-ERROR (ASH 3 4.0) OK: TYPE-ERROR (ASIN 'X) OK: TYPE-ERROR (ASINH 'X) OK: TYPE-ERROR (ATAN 'X) OK: TYPE-ERROR (ATAN #C(0 0.4) 3.4) OK: TYPE-ERROR (ATAN -4 #C(3 4)) OK: TYPE-ERROR (ATANH 'X) OK: TYPE-ERROR (BOOLE 'X 3 4) OK: TYPE-ERROR (BOOLE BOOLE-AND 3/4 -7) OK: TYPE-ERROR (BOOLE BOOLE-SET 5 #C(-3 4)) OK: TYPE-ERROR (BOTH-CASE-P 33) OK: TYPE-ERROR (BOUNDP 47) OK: TYPE-ERROR (BUTLAST '(A B C) -1) OK: TYPE-ERROR (BUTLAST '#(A B C)) OK: TYPE-ERROR (CAR 'X) OK: TYPE-ERROR (CDR '#(A B C)) OK: TYPE-ERROR (CDADAR '((X Y))) OK: TYPE-ERROR (PROGN (DEFGENERIC FOO04 (X)) (DEFMETHOD FOO04 ((X REAL)) 'OK) (DEFMETHOD FOO04 ((X INTEGER)) (CALL-NEXT-METHOD (SQRT X))) (FOO04 -1)) OK: ERROR (PROGN (DEFGENERIC FOO041 (X)) (DEFMETHOD FOO041 ((X REAL)) 'OK) (DEFMETHOD FOO041 ((X INTEGER)) (CALL-NEXT-METHOD (SQRT X))) (FOO04 2)) OK: ERROR (CCASE 'X) OK: TYPE-ERROR (CHAR-CODE 33) OK: TYPE-ERROR (CHAR-DOWNCASE 33) OK: TYPE-ERROR (CHAR-EQUAL) OK: PROGRAM-ERROR (CHAR-GREATERP) OK: PROGRAM-ERROR (CHAR-LESSP) OK: PROGRAM-ERROR (CHAR-NAME 33) OK: TYPE-ERROR (CHAR-NOT-EQUAL) OK: PROGRAM-ERROR (CHAR-NOT-GREATERP) OK: PROGRAM-ERROR (CHAR-NOT-LESSP) OK: PROGRAM-ERROR (CHAR-UPCASE 33) OK: TYPE-ERROR (CHAR/=) OK: PROGRAM-ERROR (CHAR<) OK: PROGRAM-ERROR (CHAR<=) OK: PROGRAM-ERROR (CHAR=) OK: PROGRAM-ERROR (CHAR>) OK: PROGRAM-ERROR (CHAR>=) OK: PROGRAM-ERROR (CHARACTER "abc") OK: TYPE-ERROR (CHARACTER "") OK: TYPE-ERROR (CLEAR-INPUT '*TERMINAL-IO*) OK: TYPE-ERROR (CLEAR-OUTPUT '*TERMINAL-IO*) OK: TYPE-ERROR (COERCE '(A B C) '(VECTOR * 4)) OK: TYPE-ERROR (COERCE '#(A B C) '(VECTOR * 4)) OK: TYPE-ERROR (COERCE '(A B C) '(VECTOR * 2)) OK: TYPE-ERROR (COERCE '#(A B C) '(VECTOR * 2)) OK: TYPE-ERROR (COERCE "foo" '(STRING 2)) OK: TYPE-ERROR (COERCE '#(#\a #\b #\c) '(STRING 2)) OK: TYPE-ERROR (COERCE '(0 1) '(SIMPLE-BIT-VECTOR 3)) OK: TYPE-ERROR (COERCE NIL 'NIL) OK: TYPE-ERROR (COERCE '#:NONEXISTENT 'FUNCTION) OK: ERROR (COERCE 'AND 'FUNCTION) OK: ERROR (COERCE -1 '(INTEGER 0 100)) OK: TYPE-ERROR (COMPILE-FILE "./12836123.lisp") OK: FILE-ERROR (CONCATENATE 'SYMBOL) OK: ERROR (CONCATENATE '(STRING 3) "ab" "cd") OK: TYPE-ERROR (COPY-PPRINT-DISPATCH 'X) OK: TYPE-ERROR (COPY-SEQ 'X) OK: TYPE-ERROR (COPY-SYMBOL #\x) OK: TYPE-ERROR (COS 'X) OK: TYPE-ERROR (COSH 'X) OK: TYPE-ERROR (COUNT #\x 'X) OK: TYPE-ERROR (LET ((X NIL)) (CTYPECASE X)) OK: TYPE-ERROR (DECODE-FLOAT 2/3) OK: TYPE-ERROR (DEFCLASS FOO05 NIL (A B A)) OK: PROGRAM-ERROR (DEFCLASS FOO06 NIL (A B) (:DEFAULT-INITARGS X A X B)) OK: PROGRAM-ERROR (DEFCLASS FOO07 NIL ((A :ALLOCATION :CLASS :ALLOCATION :CLASS))) OK: PROGRAM-ERROR (DEFCLASS FOO08 NIL ((A :INITFORM 42 :INITFORM 42))) OK: PROGRAM-ERROR (DEFCLASS FOO09 NIL ((A :TYPE REAL :TYPE REAL))) OK: PROGRAM-ERROR (DEFCLASS FOO10 NIL ((A :DOCUMENTATION "bla" :DOCUMENTATION "blabla"))) OK: PROGRAM-ERROR (DEFGENERIC IF (X)) OK: PROGRAM-ERROR (DEFUN IF NIL) OK: PROGRAM-ERROR (PROGN (DEFMACRO FOO11 (X) X) (DEFGENERIC FOO11 (X))) OK: PROGRAM-ERROR (DEFUN ! (A B C) (+ A B C)) OK: PACKAGE-ERROR (DEFTYPE CAR NIL T) OK: PACKAGE-ERROR (PROCLAIM '(DECLARATION CAR)) OK: PACKAGE-ERROR (DEFGENERIC OTHERWISE (X)) OK: PACKAGE-ERROR (DEFMETHOD OTHERWISE ((X INTEGER)) (1+ X)) OK: PACKAGE-ERROR (DEFMACRO OTHERWISE (&BODY BODY) `(PROGN ,@BODY)) OK: PACKAGE-ERROR (DEFUN FOO11 ((X Y 1) Z) (LIST X Y Z)) OK: PROGRAM-ERROR (LAMBDA ((X Y 1) Z) (LIST X Y Z)) OK: PROGRAM-ERROR (PROGN (DEFUN FOO12 (X) X) (DEFGENERIC FOO12 (X))) OK: PROGRAM-ERROR (DEFGENERIC FOO13 (X Y &REST L) (:METHOD (X Y))) OK: ERROR (DEFGENERIC FOO14 (X) (:DOCUMENTATION "bla") (:DOCUMENTATION "blabla")) OK: PROGRAM-ERROR (DEFGENERIC FOO15 (X) (:MY-OPTION T)) OK: PROGRAM-ERROR (PROGN (DEFVAR FOO16-1) (DEFINE-SYMBOL-MACRO FOO16-1 T)) OK: PROGRAM-ERROR (PROGN (DEFINE-SYMBOL-MACRO FOO16-2 T) (DEFVAR FOO16-2)) OK: PROGRAM-ERROR (DEFINE-SYMBOL-MACRO :FOO16-3 T) OK: PROGRAM-ERROR (DEFMETHOD IF (X) NIL) OK: ERROR (PROGN (DEFMACRO FOO17 (X) X) (DEFMETHOD FOO17 (X) NIL)) OK: ERROR (PROGN (DEFUN FOO18 (X) X) (DEFMETHOD FOO18 (X) NIL)) OK: ERROR (PROGN (DEFGENERIC FOO19 (X)) (DEFMETHOD FOO19 (X Y) NIL)) OK: ERROR (PROGN (DEFPACKAGE "FOO20") (DEFPACKAGE "FOO21" (:NICKNAMES "FOO20"))) OK: PACKAGE-ERROR (DEFPACKAGE "FOO22" (:SIZE 20) (:SIZE 20)) OK: PROGRAM-ERROR (DEFPACKAGE "FOO23" (:DOCUMENTATION "bla") (:DOCUMENTATION "blabla")) OK: PROGRAM-ERROR (DEFPACKAGE "FOO24" (:MY-OPTION T)) OK: PROGRAM-ERROR (DEFPACKAGE "FOO25" (:SHADOW "IF") (:INTERN "IF")) OK: PROGRAM-ERROR (DEFPACKAGE "FOO26" (:SHADOW "IF") (:IMPORT-FROM "USER" "IF")) OK: PROGRAM-ERROR (DEFPACKAGE "FOO27" (:SHADOW "IF") (:SHADOWING-IMPORT-FROM "USER" "IF")) OK: PROGRAM-ERROR (DEFPACKAGE "FOO28" (:INTERN "IF") (:IMPORT-FROM "USER" "IF")) OK: PROGRAM-ERROR (DEFPACKAGE "FOO29" (:INTERN "IF") (:SHADOWING-IMPORT-FROM "USER" "IF")) OK: PROGRAM-ERROR (DEFPACKAGE "FOO30" (:IMPORT-FROM "USER" "IF") (:SHADOWING-IMPORT-FROM "USER" "IF")) OK: PROGRAM-ERROR (DEFPACKAGE "FOO31" (:EXPORT "IF") (:INTERN "IF")) OK: PROGRAM-ERROR (DEFSTRUCT FOO32 A FOO20::A) OK: PROGRAM-ERROR (PROGN (DEFSTRUCT FOO33 A) (DEFSTRUCT (FOO34 (:INCLUDE FOO33)) FOO20::A)) OK: PROGRAM-ERROR (DELETE #\x 'X) OK: TYPE-ERROR (DELETE-DUPLICATES 'ABBA) OK: TYPE-ERROR (PROGN (WITH-OPEN-FILE (S "./excepsit-tst-foo35.tmp" :DIRECTION :OUTPUT)) (DELETE-FILE "./excepsit-tst-foo35.tmp/bar")) OK: FILE-ERROR (DESTRUCTURING-BIND (A) '(1 2) A) OK: ERROR (DESTRUCTURING-BIND ((A B C)) '((1)) `(,A ,B ,B)) OK: ERROR (ECASE 'X) OK: TYPE-ERROR (ELT 'X 0) OK: TYPE-ERROR (ELT "abc" 4) OK: TYPE-ERROR (ELT '(A B C) 4) OK: TYPE-ERROR (ELT '#(A B C) 4) OK: TYPE-ERROR (ELT (MAKE-ARRAY 3 :FILL-POINTER 3 :ADJUSTABLE T) 4) OK: TYPE-ERROR (ENDP 'X) OK: TYPE-ERROR (ENSURE-DIRECTORIES-EXIST "/*/") OK: FILE-ERROR (ERROR 42) OK: TYPE-ERROR (LET ((X NIL)) (ETYPECASE X)) OK: TYPE-ERROR (EVERY '(LAMBDA (X) X) NIL) OK: TYPE-ERROR (EVERY #'IDENTITY 'X) OK: TYPE-ERROR (FBOUNDP '(PSETF AREF)) OK: TYPE-ERROR (FDEFINITION '(PSETF AREF)) OK: TYPE-ERROR (FDEFINITION '#:NONEXISTENT) OK: UNDEFINED-FUNCTION (FILE-AUTHOR "*") OK: FILE-ERROR (FILE-LENGTH *TERMINAL-IO*) OK: TYPE-ERROR (WITH-OPEN-FILE (S "./excepsit-tst-foo35.tmp" :DIRECTION :OUTPUT) (FILE-POSITION S 0.0)) OK: ERROR (WITH-OPEN-FILE (S "./excepsit-tst-foo35.tmp" :DIRECTION :OUTPUT) (FILE-POSITION S -1)) OK: ERROR (WITH-OPEN-FILE (S "./excepsit-tst-foo35.tmp" :DIRECTION :INPUT) (FILE-POSITION S (+ (FILE-LENGTH S) 1000))) OK: ERROR (DELETE-FILE "./excepsit-tst-foo35.tmp") no error, value: #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/excepsit-tst-foo35.tmp" OK: NULL (FILE-WRITE-DATE "*") OK: FILE-ERROR (FILL 'X #\x) OK: TYPE-ERROR (FILL (MAKE-LIST 3) 'X :START NIL) OK: TYPE-ERROR (FILL (MAKE-LIST 3) 'X :START -1) OK: TYPE-ERROR (FILL (MAKE-LIST 3) 'X :START 1 :END -1) OK: TYPE-ERROR (FILL-POINTER "abc") OK: TYPE-ERROR (FIND #\x 'X) OK: TYPE-ERROR (FIND-CLASS '#:NONEXISTENT T) OK: ERROR (PROGN (DEFGENERIC FOO36 (X Y)) (FIND-METHOD #'FOO36 NIL (LIST (FIND-CLASS 'NUMBER)))) OK: ERROR (PROGN (DEFGENERIC FOO37 (X)) (FIND-METHOD #'FOO37 NIL (LIST (FIND-CLASS 'NUMBER)))) OK: ERROR (FINISH-OUTPUT '*TERMINAL-IO*) OK: TYPE-ERROR (FLOAT-DIGITS 2/3) OK: TYPE-ERROR (FLOAT-PRECISION 2/3) OK: TYPE-ERROR (FLOAT-RADIX 2/3) OK: TYPE-ERROR (FLOAT-SIGN 2/3) OK: TYPE-ERROR (FLOAT-SIGN -4.5 2/3) OK: TYPE-ERROR (FMAKUNBOUND '(PSETF AREF)) OK: TYPE-ERROR (FORCE-OUTPUT '*TERMINAL-IO*) OK: TYPE-ERROR (FUNCALL 'FOO38) OK: UNDEFINED-FUNCTION (FUNCALL 'AND) OK: UNDEFINED-FUNCTION (GCD 4 3/4) OK: TYPE-ERROR (GENSYM #\x) OK: TYPE-ERROR (GENTEMP 'T) OK: TYPE-ERROR (GENTEMP "X" 24) OK: TYPE-ERROR (GET "a" 'X) OK: TYPE-ERROR (GET-DISPATCH-MACRO-CHARACTER #\0 #\#) OK: ERROR (GRAPHIC-CHAR-P 33) OK: TYPE-ERROR (HASH-TABLE-REHASH-SIZE *READTABLE*) OK: TYPE-ERROR (HASH-TABLE-REHASH-THRESHOLD *PACKAGE*) OK: TYPE-ERROR (HASH-TABLE-SIZE *RANDOM-STATE*) OK: TYPE-ERROR (HASH-TABLE-TEST '#(A B C)) OK: TYPE-ERROR (IMAGPART #\c) OK: TYPE-ERROR (IN-PACKAGE "FOO39") OK: PACKAGE-ERROR (INPUT-STREAM-P (PATHNAME "abc")) OK: TYPE-ERROR (INTEGER-DECODE-FLOAT 2/3) OK: TYPE-ERROR (INTEGER-LENGTH 0.0) OK: TYPE-ERROR (INTERACTIVE-STREAM-P (PATHNAME "abc")) OK: TYPE-ERROR (INVOKE-RESTART 'FOO40) OK: CONTROL-ERROR (INVOKE-RESTART-INTERACTIVELY 'FOO41) OK: CONTROL-ERROR (ISQRT -1) OK: TYPE-ERROR (ISQRT #C(3 4)) OK: TYPE-ERROR (LAST '(A B C) -1) OK: TYPE-ERROR (LCM 4/7 8) OK: TYPE-ERROR (LENGTH 'X) OK: TYPE-ERROR (LIST-LENGTH 'X) OK: TYPE-ERROR (LIST-LENGTH '(X . Y)) OK: TYPE-ERROR (LOAD "./128347234.lsp") OK: FILE-ERROR (LOAD "*.lsp") OK: FILE-ERROR (LOAD-LOGICAL-PATHNAME-TRANSLATIONS "FOO41") OK: ERROR (LOGAND -3 2.3) OK: TYPE-ERROR (LOGBITP -1 5) OK: TYPE-ERROR (LOGBITP 2 3/7) OK: TYPE-ERROR (LOGCOUNT #*01010011) OK: TYPE-ERROR (LOGICAL-PATHNAME '#(#\A #\B)) OK: TYPE-ERROR (LOGICAL-PATHNAME-TRANSLATIONS '#(#\A #\B)) OK: TYPE-ERROR (LOGICAL-PATHNAME-TRANSLATIONS "FOO41") OK: TYPE-ERROR (LOWER-CASE-P 33) OK: TYPE-ERROR (MAKE-BROADCAST-STREAM (MAKE-STRING-INPUT-STREAM "abc")) OK: TYPE-ERROR (MAKE-CONCATENATED-STREAM (MAKE-STRING-OUTPUT-STREAM)) OK: TYPE-ERROR (PROGN (DEFCLASS FOO42 NIL NIL) (MAKE-INSTANCE 'FOO42 :X 1)) OK: ERROR (MAKE-LIST -1) OK: TYPE-ERROR (PROGN (DEFSTRUCT FOO43) (MAKE-LOAD-FORM (MAKE-FOO43))) OK: ERROR (MAKE-RANDOM-STATE 'X) OK: TYPE-ERROR (MAKE-SEQUENCE 'X 5) OK: TYPE-ERROR (MAKE-SEQUENCE 'SEQUENCE 5) OK: TYPE-ERROR (MAKE-SEQUENCE '(STRING 3) 4) OK: TYPE-ERROR (MAKE-SEQUENCE 'NULL 5) OK: TYPE-ERROR (MAKE-SEQUENCE 'CONS 0) OK: TYPE-ERROR (MAKE-SYMBOL 'X) OK: TYPE-ERROR (MAKE-SYNONYM-STREAM *TERMINAL-IO*) OK: TYPE-ERROR (MAKE-TWO-WAY-STREAM (MAKE-STRING-INPUT-STREAM "abc") (MAKE-STRING-INPUT-STREAM "def")) OK: TYPE-ERROR (MAKE-TWO-WAY-STREAM (MAKE-STRING-OUTPUT-STREAM) (MAKE-STRING-OUTPUT-STREAM)) OK: TYPE-ERROR (MAKUNBOUND "xx") OK: TYPE-ERROR (MAP 'X #'IDENTITY "abc") OK: TYPE-ERROR (MAP '(STRING 3) #'IDENTITY "ab") OK: TYPE-ERROR (MAX 3 #C(4 0.0)) OK: TYPE-ERROR (MAP 'LIST #'IDENTITY '(A B . C)) OK: TYPE-ERROR (LENGTH '(A B . C)) OK: TYPE-ERROR (REDUCE #'+ '(1 2 . 3)) OK: TYPE-ERROR (MERGE '(VECTOR * 5) '(3 1) '(2 4) #'<) OK: TYPE-ERROR (MIN 3 #C(4 0.0)) OK: TYPE-ERROR (MINUSP #C(4 -3/4)) OK: TYPE-ERROR (MUFFLE-WARNING) OK: CONTROL-ERROR (NAME-CHAR '#(#\N #\u #\l)) OK: TYPE-ERROR (NBUTLAST '(A B C) -1) OK: TYPE-ERROR (NBUTLAST '#(A B C)) OK: TYPE-ERROR (NO-APPLICABLE-METHOD #'CONS) OK: ERROR (NO-NEXT-METHOD #'PRINT-OBJECT (FIND-METHOD #'PRINT-OBJECT NIL (LIST (FIND-CLASS 'STANDARD-OBJECT) (FIND-CLASS 'T)))) OK: ERROR (NOTANY '(LAMBDA (X) X) NIL) OK: TYPE-ERROR (NOTANY #'IDENTITY 'X) OK: TYPE-ERROR (NOTEVERY '(LAMBDA (X) X) NIL) OK: TYPE-ERROR (NOTEVERY #'IDENTITY 'X) OK: TYPE-ERROR (NTHCDR 2 '(A . B)) OK: TYPE-ERROR (ODDP 3.5) OK: TYPE-ERROR (PROGN (OPEN "/etc/passwd" :DIRECTION :INPUT :IF-EXISTS :ERROR) (/ 0)) OK: DIVISION-BY-ZERO (PROGN (OPEN "/etc/nonexistent" :DIRECTION :INPUT :IF-EXISTS :ERROR) (/ 0)) OK: FILE-ERROR (OPEN "./foo44nonexistent" :DIRECTION :INPUT :IF-DOES-NOT-EXIST :ERROR) OK: FILE-ERROR (OPEN "./*" :DIRECTION :INPUT) OK: FILE-ERROR (OPEN "/etc/mtab" :DIRECTION :INPUT :EXTERNAL-FORMAT 'MTAB-ENTRIES) OK: ERROR (OPEN-STREAM-P (PATHNAME "foo45")) OK: TYPE-ERROR (OUTPUT-STREAM-P (PATHNAME "foo46")) OK: TYPE-ERROR (PACKAGE-NAME 47) OK: TYPE-ERROR (PACKAGE-NICKNAMES (PATHNAME "foo47")) OK: TYPE-ERROR (PACKAGE-SHADOWING-SYMBOLS (VECTOR 'A 'B 'C)) OK: TYPE-ERROR (PACKAGE-USE-LIST (LIST 'A 'B 'C)) OK: TYPE-ERROR (PACKAGE-USED-BY-LIST (LIST 'A 'B 'C)) OK: TYPE-ERROR (PARSE-INTEGER "x-y") OK: ERROR (PARSE-NAMESTRING (COERCE (LIST #\f #\o #\o (CODE-CHAR 0) #\4 #\8) 'STRING)) OK: PARSE-ERROR (PARSE-NAMESTRING "foo48:a" (LOGICAL-PATHNAME "foo49:")) OK: ERROR (PARSE-NAMESTRING "sys:foo.bar." "sys") OK: PARSE-ERROR (PATHNAME-MATCH-P 34 "*") OK: TYPE-ERROR (PATHNAME-MATCH-P "x" 34) OK: TYPE-ERROR (PEEK-CHAR NIL (MAKE-STRING-INPUT-STREAM "") T) OK: END-OF-FILE (PEEK-CHAR #\Space (MAKE-STRING-INPUT-STREAM "") T) OK: END-OF-FILE (PHASE 'X) OK: TYPE-ERROR (PLUSP #C(0 4.2)) OK: TYPE-ERROR (PPRINT-DISPATCH NIL T) OK: TYPE-ERROR (PPRINT-EXIT-IF-LIST-EXHAUSTED) OK: ERROR (PPRINT-INDENT NIL 2) OK: ERROR (LET ((X (MAKE-STRING-OUTPUT-STREAM))) (PPRINT-LOGICAL-BLOCK (X NIL :PREFIX 24))) OK: TYPE-ERROR (LET ((X (MAKE-STRING-OUTPUT-STREAM))) (PPRINT-LOGICAL-BLOCK (X NIL :PREFIX "a" :PER-LINE-PREFIX "b"))) OK: ERROR (PPRINT-NEWLINE :FRESH) OK: TYPE-ERROR (PPRINT-POP) OK: ERROR (PPRINT-TAB :PARAGRAPH 0 1) OK: ERROR (LET ((*PRINT-READABLY* T)) (PRINT-UNREADABLE-OBJECT (NIL *STANDARD-OUTPUT*))) OK: PRINT-NOT-READABLE (LET ((*PRINT-PATHNAMES-ANSI* T) (*PARSE-NAMESTRING-DOT-FILE* :NAME)) (WRITE-TO-STRING (MAKE-PATHNAME :NAME "foo.bar") :READABLY T)) OK: PRINT-NOT-READABLE (LET ((*PRINT-PATHNAMES-ANSI* T) (*PARSE-NAMESTRING-DOT-FILE* :TYPE)) (WRITE-TO-STRING (MAKE-PATHNAME :NAME "foo.bar") :READABLY T)) OK: PRINT-NOT-READABLE (LET ((*PRINT-PATHNAMES-ANSI* T) (*PARSE-NAMESTRING-DOT-FILE* :NAME)) (WRITE-TO-STRING (MAKE-PATHNAME :TYPE "bar") :READABLY T)) OK: PRINT-NOT-READABLE (LET ((*PRINT-PATHNAMES-ANSI* T) (*PARSE-NAMESTRING-DOT-FILE* :TYPE)) (WRITE-TO-STRING (MAKE-PATHNAME :NAME "foo.bar") :READABLY T)) OK: PRINT-NOT-READABLE (PRINT 1 2) OK: TYPE-ERROR (PROBE-FILE "*") OK: FILE-ERROR (PROVIDE 25) OK: TYPE-ERROR (RANDOM -2.3) OK: TYPE-ERROR (RANDOM 1/2) OK: TYPE-ERROR (RATIONAL #C(2.4 -0.3)) OK: TYPE-ERROR (RATIONALIZE #C(2.4 -0.3)) OK: TYPE-ERROR (READ (MAKE-STRING-INPUT-STREAM "((a b)") NIL) OK: END-OF-FILE (READ (MAKE-STRING-INPUT-STREAM " ") T) OK: END-OF-FILE (READ-BYTE (PATHNAME "foo50")) OK: TYPE-ERROR (READ-BYTE (MAKE-STRING-INPUT-STREAM "abc")) OK: ERROR (LET ((FILENAME "./excepsit-tst-foo51.bin")) (WITH-OPEN-FILE (S FILENAME :DIRECTION :OUTPUT :IF-EXISTS :OVERWRITE :IF-DOES-NOT-EXIST :CREATE)) (WITH-OPEN-FILE (S FILENAME :DIRECTION :INPUT :ELEMENT-TYPE '(UNSIGNED-BYTE 8)) (READ-BYTE S T))) OK: END-OF-FILE (DELETE-FILE "./excepsit-tst-foo51.bin") no error, value: #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/excepsit-tst-foo51.bin" OK: NULL (LET ((FILENAME "./excepsit-tst-foo52.txt")) (WITH-OPEN-FILE (S FILENAME :DIRECTION :OUTPUT :IF-EXISTS :OVERWRITE :IF-DOES-NOT-EXIST :CREATE)) (WITH-OPEN-FILE (S FILENAME :DIRECTION :INPUT) (READ-CHAR S T))) OK: END-OF-FILE (DELETE-FILE "./excepsit-tst-foo52.txt") no error, value: #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/excepsit-tst-foo52.txt" OK: NULL (LET ((FILENAME "./excepsit-tst-foo53.txt")) (WITH-OPEN-FILE (S FILENAME :DIRECTION :OUTPUT :IF-EXISTS :OVERWRITE :IF-DOES-NOT-EXIST :CREATE)) (WITH-OPEN-FILE (S FILENAME :DIRECTION :INPUT) (READ-CHAR-NO-HANG S T))) OK: END-OF-FILE (DELETE-FILE "./excepsit-tst-foo53.txt") no error, value: #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/excepsit-tst-foo53.txt" OK: NULL (READ-FROM-STRING "((a b))" NIL NIL :END 6) OK: END-OF-FILE (READ-FROM-STRING " () () " T NIL :START 3 :END 4) OK: END-OF-FILE (READ-LINE (MAKE-STRING-INPUT-STREAM "") T) OK: END-OF-FILE (READ-SEQUENCE (LIST 1 2 3) (MAKE-STRING-INPUT-STREAM "") :START NIL) OK: TYPE-ERROR (READ-SEQUENCE (LIST 1 2 3) (MAKE-STRING-INPUT-STREAM "") :END -1) OK: TYPE-ERROR (READTABLE-CASE NIL) OK: TYPE-ERROR (SETF (READTABLE-CASE *READTABLE*) ':UNKNOWN) OK: TYPE-ERROR (WITH-INPUT-FROM-STRING (S "#1=(#1#)") (READ S NIL NIL T)) OK: ERROR (REALPART #\c) OK: TYPE-ERROR (PROGN (DEFCLASS FOO54 NIL NIL) (REINITIALIZE-INSTANCE (MAKE-INSTANCE 'FOO54) :DUMMY 0)) OK: ERROR (REMOVE #\x 'X) OK: TYPE-ERROR (REMOVE-DUPLICATES 'ABBA) OK: TYPE-ERROR (REMPROP 55 'ABC) OK: TYPE-ERROR (RPLACA NIL 5) OK: TYPE-ERROR (RPLACD NIL 5) OK: TYPE-ERROR (SCALE-FLOAT 2/3 -1) OK: TYPE-ERROR (SCALE-FLOAT 3.4 1.0) OK: TYPE-ERROR (SET-DISPATCH-MACRO-CHARACTER #\0 #\# #'(LAMBDA (S C N) (LOOP))) OK: ERROR (SET-PPRINT-DISPATCH '(VECTOR * 2) NIL #C(3 4)) OK: ERROR (SIN 'X) OK: TYPE-ERROR (SINH 'X) OK: TYPE-ERROR (SLEEP -1) OK: TYPE-ERROR (PROGN (DEFCLASS FOO55 NIL (A)) (SLOT-BOUNDP (MAKE-INSTANCE 'FOO55) ':A)) OK: ERROR (PROGN (DEFCLASS FOO56 NIL (A)) (SLOT-MAKUNBOUND (MAKE-INSTANCE 'FOO56) ':A)) OK: ERROR (SLOT-MISSING (FIND-CLASS 'T) NIL ':A 'SETF) OK: ERROR (SLOT-UNBOUND (FIND-CLASS 'T) NIL ':A) OK: UNBOUND-SLOT (PROGN (DEFCLASS FOO57 NIL (A)) (SLOT-VALUE (MAKE-INSTANCE 'FOO57) ':A)) OK: ERROR (SOME '(LAMBDA (X) X) NIL) OK: TYPE-ERROR (SOME #'IDENTITY 'X) OK: TYPE-ERROR (SPECIAL-OPERATOR-P '(AND X Y)) OK: TYPE-ERROR (SPECIAL-OPERATOR-P '(SETF AREF)) OK: TYPE-ERROR (SQRT 'X) OK: TYPE-ERROR (STANDARD-CHAR-P 33) OK: TYPE-ERROR (STREAM-ELEMENT-TYPE '*TERMINAL-IO) OK: TYPE-ERROR (STRING 33) OK: TYPE-ERROR (SYMBOL-FUNCTION 33) OK: TYPE-ERROR (SYMBOL-FUNCTION ':COMPILE) OK: UNDEFINED-FUNCTION (SYMBOL-MACROLET ((T TRUE))) OK: PROGRAM-ERROR (SYMBOL-MACROLET ((*PRINT-PRETTY* (STREAM-PRINT-PRETTY *STANDARD-OUTPUT*)))) OK: PROGRAM-ERROR (SYMBOL-MACROLET ((FOO58 T)) (DECLARE (SPECIAL FOO58))) OK: PROGRAM-ERROR (SYMBOL-NAME '(SETF FOO59)) OK: TYPE-ERROR (SYMBOL-PACKAGE '(SETF FOO59)) OK: TYPE-ERROR (SYMBOL-PLIST '(SETF FOO59)) OK: TYPE-ERROR (SYMBOL-VALUE '(SETF FOO59)) OK: TYPE-ERROR (SYMBOL-VALUE '#:NONEXISTENT) OK: UNBOUND-VARIABLE (TAN 'X) OK: TYPE-ERROR (TANH 'X) OK: TYPE-ERROR (THROW '#:NONEXISTENT NIL) OK: CONTROL-ERROR (TRANSLATE-LOGICAL-PATHNAME (MAKE-BROADCAST-STREAM)) OK: TYPE-ERROR (TRANSLATE-LOGICAL-PATHNAME (LOGICAL-PATHNAME "foo61:")) OK: FILE-ERROR (TRANSLATE-PATHNAME "x" "y" "z") OK: ERROR (TRUENAME "./foo62nonexistent") OK: FILE-ERROR (TRUENAME "./*/x") OK: FILE-ERROR (MAKE-PATHNAME :DIRECTORY '(:ABSOLUTE :UP)) OK: FILE-ERROR (MAKE-PATHNAME :DIRECTORY '(:ABSOLUTE :BACK)) OK: FILE-ERROR (MAKE-PATHNAME :DIRECTORY '(:ABSOLUTE :WILD-INFERIORS :UP)) OK: FILE-ERROR (MAKE-PATHNAME :DIRECTORY '(:RELATIVE :WILD-INFERIORS :BACK)) OK: FILE-ERROR (TYPEP NIL 'VALUES) OK: ERROR (TYPEP #'CONS '(VALUES T)) OK: ERROR (TYPEP #'CONS '(FUNCTION (T T) LIST)) OK: ERROR (UNEXPORT ':FOO63) OK: PACKAGE-ERROR (UNWIND-PROTECT (PROGN (DEFPACKAGE "FOO64" (:EXPORT "XYZ")) (DEFPACKAGE "FOO65" (:EXPORT "XYZ")) (DEFPACKAGE "FOO66" (:USE "FOO64" "FOO65") (:SHADOW "XYZ")) (UNINTERN (FIND-SYMBOL "XYZ" (FIND-PACKAGE "FOO66")) (FIND-PACKAGE "FOO66"))) (DELETE-PACKAGE "FOO20") (DELETE-PACKAGE "FOO66") (DELETE-PACKAGE "FOO65") (DELETE-PACKAGE "FOO64")) OK: ERROR (UPPER-CASE-P 33) OK: TYPE-ERROR (VALUES-LIST '(A B . C)) OK: TYPE-ERROR (VALUES-LIST (MAKE-LIST MULTIPLE-VALUES-LIMIT)) OK: ERROR (VECTOR-POP "foo67") OK: TYPE-ERROR (VECTOR-POP (MAKE-ARRAY 10 :FILL-POINTER 0)) OK: ERROR (VECTOR-PUSH 'X (MAKE-ARRAY 10)) OK: ERROR (LET ((A (MAKE-ARRAY 5 :FILL-POINTER 0))) (DOTIMES (I 100) (VECTOR-PUSH-EXTEND 'X A))) OK: ERROR (WARN (MAKE-CONDITION 'ERROR)) OK: TYPE-ERROR (WARN (MAKE-CONDITION 'WARNING) "x") OK: TYPE-ERROR (WARN 'ERROR) OK: TYPE-ERROR (WILD-PATHNAME-P #\x) OK: TYPE-ERROR (WRITE-BYTE 1 (PATHNAME "foo67")) OK: TYPE-ERROR (WRITE-BYTE 1 (MAKE-STRING-OUTPUT-STREAM)) OK: ERROR (WRITE-SEQUENCE '(#\1 #\2 #\3) (MAKE-STRING-OUTPUT-STREAM) :START NIL) OK: TYPE-ERROR (WRITE-SEQUENCE '(#\1 #\2 #\3) (MAKE-STRING-OUTPUT-STREAM) :END -1) OK: TYPE-ERROR (ZEROP 'X) OK: TYPE-ERROR (READ-FROM-STRING "-35/000") OK: READER-ERROR (READ-FROM-STRING "31e300") OK: READER-ERROR (WITH-STANDARD-IO-SYNTAX (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "')"))) OK: READER-ERROR (WITH-STANDARD-IO-SYNTAX (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#<"))) OK: READER-ERROR (WITH-STANDARD-IO-SYNTAX (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "# "))) OK: READER-ERROR (WITH-STANDARD-IO-SYNTAX (LET ((*READ-SUPPRESS* T)) (READ-FROM-STRING "#)"))) OK: READER-ERROR (LOOP FOR X IN '(1 2 3) FOR X IN '(4 5 6) COLLECT X) OK: PROGRAM-ERROR (LOOP FOR (X . X) IN '((1 2) (3 4) (5 6)) COLLECT X) OK: PROGRAM-ERROR (LOOP FOR E ACROSS (VECTOR '(X . Y) '(U . V)) FOR E FROM 1 TO 5 COLLECT E) OK: PROGRAM-ERROR (LOOP FOR X = '(NIL NIL NIL) FOR X = 1 COUNT X UNTIL T) OK: PROGRAM-ERROR (LOOP WITH FOO = '(A B) FOR X IN '(C D) COLLECTING X INTO FOO FINALLY (RETURN FOO)) OK: PROGRAM-ERROR (LOOP 42) OK: PROGRAM-ERROR (FDEFINITION (LIST 'SETF (GENSYM))) OK: UNDEFINED-FUNCTION (PROCLAIM '(INTEGER . FOO)) OK: TYPE-ERROR (ASH 1 66610000) OK: ARITHMETIC-ERROR (RATIONAL MOST-POSITIVE-LONG-FLOAT) OK: ARITHMETIC-ERROR (RATIONAL LEAST-POSITIVE-LONG-FLOAT) OK: ARITHMETIC-ERROR (RATIONAL MOST-NEGATIVE-LONG-FLOAT) OK: ARITHMETIC-ERROR (RATIONAL LEAST-NEGATIVE-LONG-FLOAT) OK: ARITHMETIC-ERROR (EXPT 10 10000000) OK: ARITHMETIC-ERROR (APPLY #'CAR '(1 2)) OK: PROGRAM-ERROR (APPLY #'CAR '(1 . 2)) OK: PROGRAM-ERROR (APPLY #'LIST 1 2) OK: PROGRAM-ERROR (APPLY #'WARN 1 2 3) OK: PROGRAM-ERROR (CONVERT-STRING-FROM-BYTES #(1) CHARSET:UCS-4) OK: SIMPLE-CHARSET-TYPE-ERROR (PROGN (SYMBOLS-CLEANUP '(FOO01 FOO02 FOO03 FOO04 FOO041 FOO05 FOO06 FOO07 FOO08 FOO09 FOO10 FOO11 FOO12 FOO13 FOO14 FOO15 FOO16-1 FOO16-2 FOO17 FOO18 FOO19 FOO32 FOO33 FOO34 FOO36 FOO37 FOO42 FOO43 FOO54 FOO55 FOO56 FOO57)) (ERROR "no error")) OK: ERROR RUN-TEST: finished "excepsit" (0 errors out of 395 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) RUN-TEST: started # (DEFMACRO WEAKPTR-TEST (&BODY BODY) `(PROGN (MAKE-LIST 100) ,@BODY (MAKE-ARRAY 200) (LIST (EQ CO (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-LIST (WEAK-POINTER-VALUE WP)) (MULTIPLE-VALUE-BIND (V P) (WEAK-POINTER-VALUE WPP) (LIST (TYPE-OF V) P))))) EQL-OK: WEAKPTR-TEST (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER CO) WPP (MAKE-WEAK-POINTER WP))) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO NIL) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (WEAKPTR-TEST (SETQ CO (CONS 1 2) WP (MAKE-WEAK-POINTER 1))) EQUAL-OK: (NIL (1 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO) (GC)) EQUAL-OK: (T ((1 . 2) T) (NULL NIL)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 2 (WEAK-POINTER-VALUE WPP) CO) (GC)) EQUAL-OK: (NIL (2 T) (CONS T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) CO (WEAK-POINTER-VALUE WPP) WP) (GC)) EQUAL-OK: (T ((1 . 2) T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) 3 CO NIL) (GC)) EQUAL-OK: (NIL (3 T) (WEAK-POINTER T)) (WEAKPTR-TEST (SETF (WEAK-POINTER-VALUE WP) (CONS 1 2)) (GC)) EQUAL-OK: (T (NIL NIL) (WEAK-POINTER T)) (LET ((*PRINT-CIRCLE* T)) (SETF (WEAK-POINTER-VALUE WP) WPP) (PRIN1-TO-STRING WP)) EQUAL-OK: "#1=#>" (SYMBOLS-CLEANUP '(CO WP WPP)) EQL-OK: NIL (PROGN (GC) (SYMBOL-CLEANUP 'WEAKPTR-TEST)) EQL-OK: T RUN-TEST: finished "weakptr" (0 errors out of 13 tests) finished 56 files: 1 error out of 11,915 tests 1 alltest: 0 errors out of 636 tests 2 array: 0 errors out of 290 tests 3 backquot: 0 errors out of 89 tests 4 bin-io: 0 errors out of 15 tests 5 characters: 0 errors out of 221 tests 6 clos: 0 errors out of 496 tests 7 defhash: 0 errors out of 6 tests 8 encoding: 0 errors out of 36 tests 9 eval20: 0 errors out of 50 tests 10 ext-clisp: 0 errors out of 134 tests 11 ffi: 0 errors out of 263 tests 12 floeps: 0 errors out of 20 tests 13 format: 0 errors out of 307 tests 14 genstream: 0 errors out of 14 tests 15 hash: 0 errors out of 48 tests 16 hashlong: 0 errors out of 14 tests 17 hashtable: 0 errors out of 10 tests 18 iofkts: 0 errors out of 228 tests 19 lambda: 0 errors out of 90 tests 20 lists151: 0 errors out of 201 tests 21 lists152: 0 errors out of 255 tests 22 lists153: 0 errors out of 1 test 23 lists154: 0 errors out of 46 tests 24 lists155: 0 errors out of 25 tests 25 lists156: 0 errors out of 20 tests 26 list-set: 0 errors out of 10 tests 27 loop: 0 errors out of 178 tests 28 macro8: 0 errors out of 253 tests 29 map: 0 errors out of 64 tests 30 mop: 0 errors out of 225 tests 31 number: 0 errors out of 3,655 tests 32 number2: 0 errors out of 331 tests 33 pack11: 0 errors out of 211 tests 34 path: 0 errors out of 180 tests 35 readtable: 0 errors out of 27 tests 36 setf: 0 errors out of 210 tests 37 socket: 1 error out of 92 tests 38 steele7: 0 errors out of 86 tests 39 streams: 0 errors out of 388 tests 40 streamslong: 0 errors out of 25 tests 41 strings: 0 errors out of 409 tests 42 symbol10: 0 errors out of 152 tests 43 symbols: 0 errors out of 6 tests 44 time: 0 errors out of 22 tests 45 tread: 0 errors out of 395 tests 46 type: 0 errors out of 289 tests 47 unportable: 0 errors out of 31 tests 48 weak: 0 errors out of 120 tests 49 weakhash: 0 errors out of 26 tests 50 weakhash2: 0 errors out of 47 tests 51 bind-eval: 0 errors out of 72 tests 52 bind-compile: 0 errors out of 72 tests 53 conditions: 0 errors out of 98 tests 54 restarts: 0 errors out of 71 tests 55 excepsit: 0 errors out of 395 tests 56 weakptr: 0 errors out of 260 tests Real time: 1096.2383 sec. Run time: 1075.8956 sec. Space: 1360645496 Bytes GC: 790, GC time: 64.60364 sec. 1 Bye. (echo *.erg | grep '*' >/dev/null) || (echo "Test failed:" ; ls -l *erg; echo "To see which tests failed, type" ; echo " cat "`pwd`"/*.erg" ; exit 1) Test failed: -rw-r--r--. 1 mockbuild mock 1320 Apr 24 15:31 socket.erg To see which tests failed, type cat /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/*.erg make[1]: *** [Makefile:34: compare] Error 1 make[1]: Leaving directory '/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests' make: *** [Makefile:2218: check-tests] Error 2 ===> make check FAILED ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -M lispinit.mem -x "(saveinitmem \"image\" :executable t :norc t)" Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3a59d000 - 0x3a5bdfff 0x80000000 - 0x800bffff 0x157ad7f000 - 0x157ad99fff 0x157ad9a000 - 0x157ad9afff 0x157ad9b000 - 0x157ad9bfff 0x157ad9c000 - 0x157ad9dfff 0x157ad9e000 - 0x157ad9ffff 0x157ada0000 - 0x157ada6fff 0x157ada7000 - 0x157ada7fff 0x157ada8000 - 0x157ada8fff 0x157adaa000 - 0x157adabfff 0x157adac000 - 0x157adeafff 0x157adeb000 - 0x157adecfff 0x157aded000 - 0x157adf3fff 0x157adf4000 - 0x157adf4fff 0x157adf5000 - 0x157ae1afff 0x157ae1b000 - 0x157ae1efff 0x157ae1f000 - 0x157ae1ffff 0x157ae20000 - 0x157ae21fff 0x157ae22000 - 0x157ae22fff 0x157ae23000 - 0x157ae23fff 0x157ae24000 - 0x157ae24fff 0x157ae25000 - 0x157ae28fff 0x157ae29000 - 0x157ae29fff 0x157ae2a000 - 0x157ae2afff 0x157ae2b000 - 0x157ae2cfff 0x157ae2d000 - 0x157ae2dfff 0x157ae2e000 - 0x157ae2efff 0x157ae2f000 - 0x157af9afff 0x157af9b000 - 0x157af9dfff 0x157af9e000 - 0x157af9efff 0x157af9f000 - 0x157afa1fff 0x157afa2000 - 0x157afb4fff 0x157afb5000 - 0x157afb5fff 0x157afb6000 - 0x157afb6fff 0x157afb7000 - 0x157b0d4fff 0x157b0d5000 - 0x157b0d7fff 0x157b0d8000 - 0x157b0dafff 0x157b0db000 - 0x157b0dffff 0x157b0e0000 - 0x157b134fff 0x157b135000 - 0x157b7dffff 0x3fffaed000 - 0x3fffb0dfff i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I \ `+' / I 8 8 8 8 8 8 \ `-+-' / 8 8 8 ooooo 8oooo `-__|__-' 8 8 8 8 8 | 8 o 8 8 o 8 8 ------+------ ooooo 8oooooo ooo8ooo ooooo 8 Welcome to GNU CLISP 2.49.93+ (2018-02-18) Copyright (c) Bruno Haible, Michael Stoll 1992-1993 Copyright (c) Bruno Haible, Marcus Daniels 1994-1997 Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998 Copyright (c) Bruno Haible, Sam Steingold 1999-2000 Copyright (c) Sam Steingold, Bruno Haible 2001-2018 Type :h and hit Enter for context help. ;; Wrote the memory image into image (14,509,568 bytes) Bytes permanently allocated: 173,664 Bytes currently in use: 3,132,544 Bytes available until next GC: 1,561,460 3132544 ; 1561460 ; 173664 ; 1 ; 107552 ; 41149 Bye. ./image -x "(setq zz 10) (saveinitmem \"image\")" Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x12338000 - 0x12358fff 0x80000000 - 0x800bffff 0x1563b5a000 - 0x1563b74fff 0x1563b75000 - 0x1563b75fff 0x1563b76000 - 0x1563b76fff 0x1563b77000 - 0x1563b78fff 0x1563b79000 - 0x1563b7afff 0x1563b7b000 - 0x1563b81fff 0x1563b82000 - 0x1563b82fff 0x1563b83000 - 0x1563b83fff 0x1563b85000 - 0x1563b86fff 0x1563b87000 - 0x1563bc5fff 0x1563bc6000 - 0x1563bc7fff 0x1563bc8000 - 0x1563bcefff 0x1563bcf000 - 0x1563bcffff 0x1563bd0000 - 0x1563bf5fff 0x1563bf6000 - 0x1563bf9fff 0x1563bfa000 - 0x1563bfafff 0x1563bfb000 - 0x1563bfcfff 0x1563bfd000 - 0x1563bfdfff 0x1563bfe000 - 0x1563bfefff 0x1563bff000 - 0x1563bfffff 0x1563c00000 - 0x1563c03fff 0x1563c04000 - 0x1563c04fff 0x1563c05000 - 0x1563c05fff 0x1563c06000 - 0x1563c07fff 0x1563c08000 - 0x1563c08fff 0x1563c09000 - 0x1563c09fff 0x1563c0a000 - 0x1563d75fff 0x1563d76000 - 0x1563d78fff 0x1563d79000 - 0x1563d79fff 0x1563d7a000 - 0x1563d7cfff 0x1563d7d000 - 0x1563d8ffff 0x1563d90000 - 0x1563d90fff 0x1563d91000 - 0x1563d91fff 0x1563d92000 - 0x1563eaffff 0x1563eb0000 - 0x1563eb2fff 0x1563eb3000 - 0x1563eb5fff 0x1563eb6000 - 0x1563ebafff 0x1563ebb000 - 0x1563f0ffff 0x1563f10000 - 0x15645bafff 0x3fffd5a000 - 0x3fffd7afff i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I \ `+' / I 8 8 8 8 8 8 \ `-+-' / 8 8 8 ooooo 8oooo `-__|__-' 8 8 8 8 8 | 8 o 8 8 o 8 8 ------+------ ooooo 8oooooo ooo8ooo ooooo 8 Welcome to GNU CLISP 2.49.93+ (2018-02-18) Copyright (c) Bruno Haible, Michael Stoll 1992-1993 Copyright (c) Bruno Haible, Marcus Daniels 1994-1997 Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998 Copyright (c) Bruno Haible, Sam Steingold 1999-2000 Copyright (c) Sam Steingold, Bruno Haible 2001-2018 Type :h and hit Enter for context help. 10 ;; Wrote the memory image into image.mem (3,308,984 bytes) Bytes permanently allocated: 173,664 Bytes currently in use: 3,132,440 Bytes available until next GC: 1,561,336 3132440 ; 1561336 ; 173664 ; 1 ; 27696 ; 54659 Bye. ./image -norc -M image.mem -x zz Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x175d5000 - 0x175f5fff 0x80000000 - 0x800bffff 0x1587bad000 - 0x1587bc7fff 0x1587bc8000 - 0x1587bc8fff 0x1587bc9000 - 0x1587bc9fff 0x1587bca000 - 0x1587bcbfff 0x1587bcc000 - 0x1587bcdfff 0x1587bce000 - 0x1587bd4fff 0x1587bd5000 - 0x1587bd5fff 0x1587bd6000 - 0x1587bd6fff 0x1587bd8000 - 0x1587bd9fff 0x1587bda000 - 0x1587c18fff 0x1587c19000 - 0x1587c1afff 0x1587c1b000 - 0x1587c21fff 0x1587c22000 - 0x1587c22fff 0x1587c23000 - 0x1587c48fff 0x1587c49000 - 0x1587c4cfff 0x1587c4d000 - 0x1587c4dfff 0x1587c4e000 - 0x1587c4ffff 0x1587c50000 - 0x1587c50fff 0x1587c51000 - 0x1587c51fff 0x1587c52000 - 0x1587c52fff 0x1587c53000 - 0x1587c56fff 0x1587c57000 - 0x1587c57fff 0x1587c58000 - 0x1587c58fff 0x1587c59000 - 0x1587c5afff 0x1587c5b000 - 0x1587c5bfff 0x1587c5c000 - 0x1587c5cfff 0x1587c5d000 - 0x1587dc8fff 0x1587dc9000 - 0x1587dcbfff 0x1587dcc000 - 0x1587dccfff 0x1587dcd000 - 0x1587dcffff 0x1587dd0000 - 0x1587de2fff 0x1587de3000 - 0x1587de3fff 0x1587de4000 - 0x1587de4fff 0x1587de5000 - 0x1587f02fff 0x1587f03000 - 0x1587f05fff 0x1587f06000 - 0x1587f08fff 0x1587f09000 - 0x1587f0dfff 0x1587f0e000 - 0x1587f62fff 0x1587f63000 - 0x158860dfff 0x3fffecb000 - 0x3fffeebfff i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I \ `+' / I 8 8 8 8 8 8 \ `-+-' / 8 8 8 ooooo 8oooo `-__|__-' 8 8 8 8 8 | 8 o 8 8 o 8 8 ------+------ ooooo 8oooooo ooo8ooo ooooo 8 Welcome to GNU CLISP 2.49.93+ (2018-02-18) Copyright (c) Bruno Haible, Michael Stoll 1992-1993 Copyright (c) Bruno Haible, Marcus Daniels 1994-1997 Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998 Copyright (c) Bruno Haible, Sam Steingold 1999-2000 Copyright (c) Sam Steingold, Bruno Haible 2001-2018 Type :h and hit Enter for context help. 10 Bye. ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -M lispinit.mem -x "(saveinitmem \"image\" :executable t :norc t :quiet t :init-function (lambda () (prin1 *args*) (exit)))" -- a 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3bdd2000 - 0x3bdf2fff 0x80000000 - 0x800bffff 0x158c7a1000 - 0x158c7bbfff 0x158c7bc000 - 0x158c7bcfff 0x158c7bd000 - 0x158c7bdfff 0x158c7be000 - 0x158c7bffff 0x158c7c0000 - 0x158c7c1fff 0x158c7c2000 - 0x158c7c8fff 0x158c7c9000 - 0x158c7c9fff 0x158c7ca000 - 0x158c7cafff 0x158c7cc000 - 0x158c7cdfff 0x158c7ce000 - 0x158c80cfff 0x158c80d000 - 0x158c80efff 0x158c80f000 - 0x158c815fff 0x158c816000 - 0x158c816fff 0x158c817000 - 0x158c83cfff 0x158c83d000 - 0x158c840fff 0x158c841000 - 0x158c841fff 0x158c842000 - 0x158c843fff 0x158c844000 - 0x158c844fff 0x158c845000 - 0x158c845fff 0x158c846000 - 0x158c846fff 0x158c847000 - 0x158c84afff 0x158c84b000 - 0x158c84bfff 0x158c84c000 - 0x158c84cfff 0x158c84d000 - 0x158c84efff 0x158c84f000 - 0x158c84ffff 0x158c850000 - 0x158c850fff 0x158c851000 - 0x158c9bcfff 0x158c9bd000 - 0x158c9bffff 0x158c9c0000 - 0x158c9c0fff 0x158c9c1000 - 0x158c9c3fff 0x158c9c4000 - 0x158c9d6fff 0x158c9d7000 - 0x158c9d7fff 0x158c9d8000 - 0x158c9d8fff 0x158c9d9000 - 0x158caf6fff 0x158caf7000 - 0x158caf9fff 0x158cafa000 - 0x158cafcfff 0x158cafd000 - 0x158cb01fff 0x158cb02000 - 0x158cb56fff 0x158cb57000 - 0x158d201fff 0x3fffc17000 - 0x3fffc37fff i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I \ `+' / I 8 8 8 8 8 8 \ `-+-' / 8 8 8 ooooo 8oooo `-__|__-' 8 8 8 8 8 | 8 o 8 8 o 8 8 ------+------ ooooo 8oooooo ooo8ooo ooooo 8 Welcome to GNU CLISP 2.49.93+ (2018-02-18) Copyright (c) Bruno Haible, Michael Stoll 1992-1993 Copyright (c) Bruno Haible, Marcus Daniels 1994-1997 Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998 Copyright (c) Bruno Haible, Sam Steingold 1999-2000 Copyright (c) Sam Steingold, Bruno Haible 2001-2018 Type :h and hit Enter for context help. ;; Wrote the memory image into image (14,510,624 bytes) Bytes permanently allocated: 173,664 Bytes currently in use: 3,133,600 Bytes available until next GC: 1,561,988 3133600 ; 1561988 ; 173664 ; 1 ; 113304 ; 59766 Bye. test "`./image b | tr -d '\r'`" = '("b")' || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x2600e000 - 0x2602efff 0x80000000 - 0x800bffff 0x158974c000 - 0x1589766fff 0x1589767000 - 0x1589767fff 0x1589768000 - 0x1589768fff 0x1589769000 - 0x158976afff 0x158976b000 - 0x158976cfff 0x158976d000 - 0x1589773fff 0x1589774000 - 0x1589774fff 0x1589775000 - 0x1589775fff 0x1589777000 - 0x1589778fff 0x1589779000 - 0x15897b7fff 0x15897b8000 - 0x15897b9fff 0x15897ba000 - 0x15897c0fff 0x15897c1000 - 0x15897c1fff 0x15897c2000 - 0x15897e7fff 0x15897e8000 - 0x15897ebfff 0x15897ec000 - 0x15897ecfff 0x15897ed000 - 0x15897eefff 0x15897ef000 - 0x15897effff 0x15897f0000 - 0x15897f0fff 0x15897f1000 - 0x15897f1fff 0x15897f2000 - 0x15897f5fff 0x15897f6000 - 0x15897f6fff 0x15897f7000 - 0x15897f7fff 0x15897f8000 - 0x15897f9fff 0x15897fa000 - 0x15897fafff 0x15897fb000 - 0x15897fbfff 0x15897fc000 - 0x1589967fff 0x1589968000 - 0x158996afff 0x158996b000 - 0x158996bfff 0x158996c000 - 0x158996efff 0x158996f000 - 0x1589981fff 0x1589982000 - 0x1589982fff 0x1589983000 - 0x1589983fff 0x1589984000 - 0x1589aa1fff 0x1589aa2000 - 0x1589aa4fff 0x1589aa5000 - 0x1589aa7fff 0x1589aa8000 - 0x1589aacfff 0x1589aad000 - 0x1589b01fff 0x1589b02000 - 0x158a1acfff 0x3fffded000 - 0x3fffe0dfff test "`./image b 2 | tr -d '\r'`" = '("b" "2")' || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x15055000 - 0x15075fff 0x80000000 - 0x800bffff 0x157c0fe000 - 0x157c118fff 0x157c119000 - 0x157c119fff 0x157c11a000 - 0x157c11afff 0x157c11b000 - 0x157c11cfff 0x157c11d000 - 0x157c11efff 0x157c11f000 - 0x157c125fff 0x157c126000 - 0x157c126fff 0x157c127000 - 0x157c127fff 0x157c129000 - 0x157c12afff 0x157c12b000 - 0x157c169fff 0x157c16a000 - 0x157c16bfff 0x157c16c000 - 0x157c172fff 0x157c173000 - 0x157c173fff 0x157c174000 - 0x157c199fff 0x157c19a000 - 0x157c19dfff 0x157c19e000 - 0x157c19efff 0x157c19f000 - 0x157c1a0fff 0x157c1a1000 - 0x157c1a1fff 0x157c1a2000 - 0x157c1a2fff 0x157c1a3000 - 0x157c1a3fff 0x157c1a4000 - 0x157c1a7fff 0x157c1a8000 - 0x157c1a8fff 0x157c1a9000 - 0x157c1a9fff 0x157c1aa000 - 0x157c1abfff 0x157c1ac000 - 0x157c1acfff 0x157c1ad000 - 0x157c1adfff 0x157c1ae000 - 0x157c319fff 0x157c31a000 - 0x157c31cfff 0x157c31d000 - 0x157c31dfff 0x157c31e000 - 0x157c320fff 0x157c321000 - 0x157c333fff 0x157c334000 - 0x157c334fff 0x157c335000 - 0x157c335fff 0x157c336000 - 0x157c453fff 0x157c454000 - 0x157c456fff 0x157c457000 - 0x157c459fff 0x157c45a000 - 0x157c45efff 0x157c45f000 - 0x157c4b3fff 0x157c4b4000 - 0x157cb5efff 0x3ffffbd000 - 0x3ffffddfff ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -M lispinit.mem -x "(saveinitmem \"image\" :executable t :norc t :quiet t :init-function (function exit))" Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x149b7000 - 0x149d7fff 0x80000000 - 0x800bffff 0x1563351000 - 0x156336bfff 0x156336c000 - 0x156336cfff 0x156336d000 - 0x156336dfff 0x156336e000 - 0x156336ffff 0x1563370000 - 0x1563371fff 0x1563372000 - 0x1563378fff 0x1563379000 - 0x1563379fff 0x156337a000 - 0x156337afff 0x156337c000 - 0x156337dfff 0x156337e000 - 0x15633bcfff 0x15633bd000 - 0x15633befff 0x15633bf000 - 0x15633c5fff 0x15633c6000 - 0x15633c6fff 0x15633c7000 - 0x15633ecfff 0x15633ed000 - 0x15633f0fff 0x15633f1000 - 0x15633f1fff 0x15633f2000 - 0x15633f3fff 0x15633f4000 - 0x15633f4fff 0x15633f5000 - 0x15633f5fff 0x15633f6000 - 0x15633f6fff 0x15633f7000 - 0x15633fafff 0x15633fb000 - 0x15633fbfff 0x15633fc000 - 0x15633fcfff 0x15633fd000 - 0x15633fefff 0x15633ff000 - 0x15633fffff 0x1563400000 - 0x1563400fff 0x1563401000 - 0x156356cfff 0x156356d000 - 0x156356ffff 0x1563570000 - 0x1563570fff 0x1563571000 - 0x1563573fff 0x1563574000 - 0x1563586fff 0x1563587000 - 0x1563587fff 0x1563588000 - 0x1563588fff 0x1563589000 - 0x15636a6fff 0x15636a7000 - 0x15636a9fff 0x15636aa000 - 0x15636acfff 0x15636ad000 - 0x15636b1fff 0x15636b2000 - 0x1563706fff 0x1563707000 - 0x1563db1fff 0x3fffc57000 - 0x3fffc77fff i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I \ `+' / I 8 8 8 8 8 8 \ `-+-' / 8 8 8 ooooo 8oooo `-__|__-' 8 8 8 8 8 | 8 o 8 8 o 8 8 ------+------ ooooo 8oooooo ooo8ooo ooooo 8 Welcome to GNU CLISP 2.49.93+ (2018-02-18) Copyright (c) Bruno Haible, Michael Stoll 1992-1993 Copyright (c) Bruno Haible, Marcus Daniels 1994-1997 Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998 Copyright (c) Bruno Haible, Sam Steingold 1999-2000 Copyright (c) Sam Steingold, Bruno Haible 2001-2018 Type :h and hit Enter for context help. ;; Wrote the memory image into image (14,510,032 bytes) Bytes permanently allocated: 173,664 Bytes currently in use: 3,133,008 Bytes available until next GC: 1,561,692 3133008 ; 1561692 ; 173664 ; 1 ; 112976 ; 37264 Bye. ./image Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x12b7000 - 0x12d7fff 0x80000000 - 0x800bffff 0x15916cd000 - 0x15916e7fff 0x15916e8000 - 0x15916e8fff 0x15916e9000 - 0x15916e9fff 0x15916ea000 - 0x15916ebfff 0x15916ec000 - 0x15916edfff 0x15916ee000 - 0x15916f4fff 0x15916f5000 - 0x15916f5fff 0x15916f6000 - 0x15916f6fff 0x15916f8000 - 0x15916f9fff 0x15916fa000 - 0x1591738fff 0x1591739000 - 0x159173afff 0x159173b000 - 0x1591741fff 0x1591742000 - 0x1591742fff 0x1591743000 - 0x1591768fff 0x1591769000 - 0x159176cfff 0x159176d000 - 0x159176dfff 0x159176e000 - 0x159176ffff 0x1591770000 - 0x1591770fff 0x1591771000 - 0x1591771fff 0x1591772000 - 0x1591772fff 0x1591773000 - 0x1591776fff 0x1591777000 - 0x1591777fff 0x1591778000 - 0x1591778fff 0x1591779000 - 0x159177afff 0x159177b000 - 0x159177bfff 0x159177c000 - 0x159177cfff 0x159177d000 - 0x15918e8fff 0x15918e9000 - 0x15918ebfff 0x15918ec000 - 0x15918ecfff 0x15918ed000 - 0x15918effff 0x15918f0000 - 0x1591902fff 0x1591903000 - 0x1591903fff 0x1591904000 - 0x1591904fff 0x1591905000 - 0x1591a22fff 0x1591a23000 - 0x1591a25fff 0x1591a26000 - 0x1591a28fff 0x1591a29000 - 0x1591a2dfff 0x1591a2e000 - 0x1591a82fff 0x1591a83000 - 0x159212dfff 0x3fffb71000 - 0x3fffb91fff test -z "`./image`" || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x34de8000 - 0x34e08fff 0x80000000 - 0x800bffff 0x1573809000 - 0x1573823fff 0x1573824000 - 0x1573824fff 0x1573825000 - 0x1573825fff 0x1573826000 - 0x1573827fff 0x1573828000 - 0x1573829fff 0x157382a000 - 0x1573830fff 0x1573831000 - 0x1573831fff 0x1573832000 - 0x1573832fff 0x1573834000 - 0x1573835fff 0x1573836000 - 0x1573874fff 0x1573875000 - 0x1573876fff 0x1573877000 - 0x157387dfff 0x157387e000 - 0x157387efff 0x157387f000 - 0x15738a4fff 0x15738a5000 - 0x15738a8fff 0x15738a9000 - 0x15738a9fff 0x15738aa000 - 0x15738abfff 0x15738ac000 - 0x15738acfff 0x15738ad000 - 0x15738adfff 0x15738ae000 - 0x15738aefff 0x15738af000 - 0x15738b2fff 0x15738b3000 - 0x15738b3fff 0x15738b4000 - 0x15738b4fff 0x15738b5000 - 0x15738b6fff 0x15738b7000 - 0x15738b7fff 0x15738b8000 - 0x15738b8fff 0x15738b9000 - 0x1573a24fff 0x1573a25000 - 0x1573a27fff 0x1573a28000 - 0x1573a28fff 0x1573a29000 - 0x1573a2bfff 0x1573a2c000 - 0x1573a3efff 0x1573a3f000 - 0x1573a3ffff 0x1573a40000 - 0x1573a40fff 0x1573a41000 - 0x1573b5efff 0x1573b5f000 - 0x1573b61fff 0x1573b62000 - 0x1573b64fff 0x1573b65000 - 0x1573b69fff 0x1573b6a000 - 0x1573bbefff 0x1573bbf000 - 0x1574269fff 0x3fffcea000 - 0x3fffd0afff ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -M lispinit.mem -x '(saveinitmem "image" :executable t :norc t :quiet t :init-function (lambda () (setq *error-output* *standard-output*) (error "myerror")))' Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0xcdeb000 - 0xce0bfff 0x80000000 - 0x800bffff 0x1561472000 - 0x156148cfff 0x156148d000 - 0x156148dfff 0x156148e000 - 0x156148efff 0x156148f000 - 0x1561490fff 0x1561491000 - 0x1561492fff 0x1561493000 - 0x1561499fff 0x156149a000 - 0x156149afff 0x156149b000 - 0x156149bfff 0x156149d000 - 0x156149efff 0x156149f000 - 0x15614ddfff 0x15614de000 - 0x15614dffff 0x15614e0000 - 0x15614e6fff 0x15614e7000 - 0x15614e7fff 0x15614e8000 - 0x156150dfff 0x156150e000 - 0x1561511fff 0x1561512000 - 0x1561512fff 0x1561513000 - 0x1561514fff 0x1561515000 - 0x1561515fff 0x1561516000 - 0x1561516fff 0x1561517000 - 0x1561517fff 0x1561518000 - 0x156151bfff 0x156151c000 - 0x156151cfff 0x156151d000 - 0x156151dfff 0x156151e000 - 0x156151ffff 0x1561520000 - 0x1561520fff 0x1561521000 - 0x1561521fff 0x1561522000 - 0x156168dfff 0x156168e000 - 0x1561690fff 0x1561691000 - 0x1561691fff 0x1561692000 - 0x1561694fff 0x1561695000 - 0x15616a7fff 0x15616a8000 - 0x15616a8fff 0x15616a9000 - 0x15616a9fff 0x15616aa000 - 0x15617c7fff 0x15617c8000 - 0x15617cafff 0x15617cb000 - 0x15617cdfff 0x15617ce000 - 0x15617d2fff 0x15617d3000 - 0x1561827fff 0x1561828000 - 0x1561ed2fff 0x3fff7f2000 - 0x3fff812fff i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I \ `+' / I 8 8 8 8 8 8 \ `-+-' / 8 8 8 ooooo 8oooo `-__|__-' 8 8 8 8 8 | 8 o 8 8 o 8 8 ------+------ ooooo 8oooooo ooo8ooo ooooo 8 Welcome to GNU CLISP 2.49.93+ (2018-02-18) Copyright (c) Bruno Haible, Michael Stoll 1992-1993 Copyright (c) Bruno Haible, Marcus Daniels 1994-1997 Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998 Copyright (c) Bruno Haible, Sam Steingold 1999-2000 Copyright (c) Sam Steingold, Bruno Haible 2001-2018 Type :h and hit Enter for context help. ;; Wrote the memory image into image (14,510,824 bytes) Bytes permanently allocated: 173,664 Bytes currently in use: 3,133,800 Bytes available until next GC: 1,562,088 3133800 ; 1562088 ; 173664 ; 1 ; 113272 ; 42880 Bye. output="`./image -on-error exit | tr -d '\r'`"; test "$output" = '*** - myerror' || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3eeec000 - 0x3ef0cfff 0x80000000 - 0x800bffff 0x158399a000 - 0x15839b4fff 0x15839b5000 - 0x15839b5fff 0x15839b6000 - 0x15839b6fff 0x15839b7000 - 0x15839b8fff 0x15839b9000 - 0x15839bafff 0x15839bb000 - 0x15839c1fff 0x15839c2000 - 0x15839c2fff 0x15839c3000 - 0x15839c3fff 0x15839c5000 - 0x15839c6fff 0x15839c7000 - 0x1583a05fff 0x1583a06000 - 0x1583a07fff 0x1583a08000 - 0x1583a0efff 0x1583a0f000 - 0x1583a0ffff 0x1583a10000 - 0x1583a35fff 0x1583a36000 - 0x1583a39fff 0x1583a3a000 - 0x1583a3afff 0x1583a3b000 - 0x1583a3cfff 0x1583a3d000 - 0x1583a3dfff 0x1583a3e000 - 0x1583a3efff 0x1583a3f000 - 0x1583a3ffff 0x1583a40000 - 0x1583a43fff 0x1583a44000 - 0x1583a44fff 0x1583a45000 - 0x1583a45fff 0x1583a46000 - 0x1583a47fff 0x1583a48000 - 0x1583a48fff 0x1583a49000 - 0x1583a49fff 0x1583a4a000 - 0x1583bb5fff 0x1583bb6000 - 0x1583bb8fff 0x1583bb9000 - 0x1583bb9fff 0x1583bba000 - 0x1583bbcfff 0x1583bbd000 - 0x1583bcffff 0x1583bd0000 - 0x1583bd0fff 0x1583bd1000 - 0x1583bd1fff 0x1583bd2000 - 0x1583ceffff 0x1583cf0000 - 0x1583cf2fff 0x1583cf3000 - 0x1583cf5fff 0x1583cf6000 - 0x1583cfafff 0x1583cfb000 - 0x1583d4ffff 0x1583d50000 - 0x15843fafff 0x3fff9c6000 - 0x3fff9e6fff if ./image -on-error exit; then exit 1; fi Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x18718000 - 0x18738fff 0x80000000 - 0x800bffff 0x157cac9000 - 0x157cae3fff 0x157cae4000 - 0x157cae4fff 0x157cae5000 - 0x157cae5fff 0x157cae6000 - 0x157cae7fff 0x157cae8000 - 0x157cae9fff 0x157caea000 - 0x157caf0fff 0x157caf1000 - 0x157caf1fff 0x157caf2000 - 0x157caf2fff 0x157caf4000 - 0x157caf5fff 0x157caf6000 - 0x157cb34fff 0x157cb35000 - 0x157cb36fff 0x157cb37000 - 0x157cb3dfff 0x157cb3e000 - 0x157cb3efff 0x157cb3f000 - 0x157cb64fff 0x157cb65000 - 0x157cb68fff 0x157cb69000 - 0x157cb69fff 0x157cb6a000 - 0x157cb6bfff 0x157cb6c000 - 0x157cb6cfff 0x157cb6d000 - 0x157cb6dfff 0x157cb6e000 - 0x157cb6efff 0x157cb6f000 - 0x157cb72fff 0x157cb73000 - 0x157cb73fff 0x157cb74000 - 0x157cb74fff 0x157cb75000 - 0x157cb76fff 0x157cb77000 - 0x157cb77fff 0x157cb78000 - 0x157cb78fff 0x157cb79000 - 0x157cce4fff 0x157cce5000 - 0x157cce7fff 0x157cce8000 - 0x157cce8fff 0x157cce9000 - 0x157ccebfff 0x157ccec000 - 0x157ccfefff 0x157ccff000 - 0x157ccfffff 0x157cd00000 - 0x157cd00fff 0x157cd01000 - 0x157ce1efff 0x157ce1f000 - 0x157ce21fff 0x157ce22000 - 0x157ce24fff 0x157ce25000 - 0x157ce29fff 0x157ce2a000 - 0x157ce7efff 0x157ce7f000 - 0x157d529fff 0x3fffcda000 - 0x3fffcfafff *** - myerror ./lisp.run -B . -N locale -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -M lispinit.mem -x '(saveinitmem "image" :executable t :norc t :quiet t :init-function (lambda () (exit-on-error (setq *error-output* *standard-output*) (error "myerror"))))' Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x27da000 - 0x27fafff 0x80000000 - 0x800bffff 0x1558606000 - 0x1558620fff 0x1558621000 - 0x1558621fff 0x1558622000 - 0x1558622fff 0x1558623000 - 0x1558624fff 0x1558625000 - 0x1558626fff 0x1558627000 - 0x155862dfff 0x155862e000 - 0x155862efff 0x155862f000 - 0x155862ffff 0x1558631000 - 0x1558632fff 0x1558633000 - 0x1558671fff 0x1558672000 - 0x1558673fff 0x1558674000 - 0x155867afff 0x155867b000 - 0x155867bfff 0x155867c000 - 0x15586a1fff 0x15586a2000 - 0x15586a5fff 0x15586a6000 - 0x15586a6fff 0x15586a7000 - 0x15586a8fff 0x15586a9000 - 0x15586a9fff 0x15586aa000 - 0x15586aafff 0x15586ab000 - 0x15586abfff 0x15586ac000 - 0x15586affff 0x15586b0000 - 0x15586b0fff 0x15586b1000 - 0x15586b1fff 0x15586b2000 - 0x15586b3fff 0x15586b4000 - 0x15586b4fff 0x15586b5000 - 0x15586b5fff 0x15586b6000 - 0x1558821fff 0x1558822000 - 0x1558824fff 0x1558825000 - 0x1558825fff 0x1558826000 - 0x1558828fff 0x1558829000 - 0x155883bfff 0x155883c000 - 0x155883cfff 0x155883d000 - 0x155883dfff 0x155883e000 - 0x155895bfff 0x155895c000 - 0x155895efff 0x155895f000 - 0x1558961fff 0x1558962000 - 0x1558966fff 0x1558967000 - 0x15589bbfff 0x15589bc000 - 0x1559066fff 0x3fff95d000 - 0x3fff97dfff i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I \ `+' / I 8 8 8 8 8 8 \ `-+-' / 8 8 8 ooooo 8oooo `-__|__-' 8 8 8 8 8 | 8 o 8 8 o 8 8 ------+------ ooooo 8oooooo ooo8ooo ooooo 8 Welcome to GNU CLISP 2.49.93+ (2018-02-18) Copyright (c) Bruno Haible, Michael Stoll 1992-1993 Copyright (c) Bruno Haible, Marcus Daniels 1994-1997 Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998 Copyright (c) Bruno Haible, Sam Steingold 1999-2000 Copyright (c) Sam Steingold, Bruno Haible 2001-2018 Type :h and hit Enter for context help. ;; Wrote the memory image into image (14,512,752 bytes) Bytes permanently allocated: 173,664 Bytes currently in use: 3,135,728 Bytes available until next GC: 1,563,052 3135728 ; 1563052 ; 173664 ; 1 ; 114816 ; 38015 Bye. output="`./image | tr -d '\r'`"; test "$output" = '*** - myerror' || exit 1 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x3ee7f000 - 0x3ee9ffff 0x80000000 - 0x800bffff 0x158543c000 - 0x1585456fff 0x1585457000 - 0x1585457fff 0x1585458000 - 0x1585458fff 0x1585459000 - 0x158545afff 0x158545b000 - 0x158545cfff 0x158545d000 - 0x1585463fff 0x1585464000 - 0x1585464fff 0x1585465000 - 0x1585465fff 0x1585467000 - 0x1585468fff 0x1585469000 - 0x15854a7fff 0x15854a8000 - 0x15854a9fff 0x15854aa000 - 0x15854b0fff 0x15854b1000 - 0x15854b1fff 0x15854b2000 - 0x15854d7fff 0x15854d8000 - 0x15854dbfff 0x15854dc000 - 0x15854dcfff 0x15854dd000 - 0x15854defff 0x15854df000 - 0x15854dffff 0x15854e0000 - 0x15854e0fff 0x15854e1000 - 0x15854e1fff 0x15854e2000 - 0x15854e5fff 0x15854e6000 - 0x15854e6fff 0x15854e7000 - 0x15854e7fff 0x15854e8000 - 0x15854e9fff 0x15854ea000 - 0x15854eafff 0x15854eb000 - 0x15854ebfff 0x15854ec000 - 0x1585657fff 0x1585658000 - 0x158565afff 0x158565b000 - 0x158565bfff 0x158565c000 - 0x158565efff 0x158565f000 - 0x1585671fff 0x1585672000 - 0x1585672fff 0x1585673000 - 0x1585673fff 0x1585674000 - 0x1585791fff 0x1585792000 - 0x1585794fff 0x1585795000 - 0x1585797fff 0x1585798000 - 0x158579cfff 0x158579d000 - 0x15857f1fff 0x15857f2000 - 0x1585e9cfff 0x3fffd9b000 - 0x3fffdbbfff if ./image; then exit 1; fi Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x16364000 - 0x16384fff 0x80000000 - 0x800bffff 0x157e2cb000 - 0x157e2e5fff 0x157e2e6000 - 0x157e2e6fff 0x157e2e7000 - 0x157e2e7fff 0x157e2e8000 - 0x157e2e9fff 0x157e2ea000 - 0x157e2ebfff 0x157e2ec000 - 0x157e2f2fff 0x157e2f3000 - 0x157e2f3fff 0x157e2f4000 - 0x157e2f4fff 0x157e2f6000 - 0x157e2f7fff 0x157e2f8000 - 0x157e336fff 0x157e337000 - 0x157e338fff 0x157e339000 - 0x157e33ffff 0x157e340000 - 0x157e340fff 0x157e341000 - 0x157e366fff 0x157e367000 - 0x157e36afff 0x157e36b000 - 0x157e36bfff 0x157e36c000 - 0x157e36dfff 0x157e36e000 - 0x157e36efff 0x157e36f000 - 0x157e36ffff 0x157e370000 - 0x157e370fff 0x157e371000 - 0x157e374fff 0x157e375000 - 0x157e375fff 0x157e376000 - 0x157e376fff 0x157e377000 - 0x157e378fff 0x157e379000 - 0x157e379fff 0x157e37a000 - 0x157e37afff 0x157e37b000 - 0x157e4e6fff 0x157e4e7000 - 0x157e4e9fff 0x157e4ea000 - 0x157e4eafff 0x157e4eb000 - 0x157e4edfff 0x157e4ee000 - 0x157e500fff 0x157e501000 - 0x157e501fff 0x157e502000 - 0x157e502fff 0x157e503000 - 0x157e620fff 0x157e621000 - 0x157e623fff 0x157e624000 - 0x157e626fff 0x157e627000 - 0x157e62bfff 0x157e62c000 - 0x157e680fff 0x157e681000 - 0x157ed2bfff 0x3fff843000 - 0x3fff863fff *** - myerror ls -l lisp.run lispinit.mem image image.mem -rwxr-xr-x. 1 mockbuild mock 14512752 Apr 24 15:39 image -rw-r--r--. 1 mockbuild mock 3308984 Apr 24 15:39 image.mem -rwxr-xr-x. 1 mockbuild mock 11200432 Apr 24 13:53 lisp.run -rw-r--r--. 1 mockbuild mock 3318704 Apr 24 14:07 lispinit.mem rm -f image image.mem ===> make extracheck SUCCEEDED for m in "" i18n syscalls regexp readline; do test -n "$m" && rm -f $m/*.erg; done z=""; for m in "" i18n syscalls regexp readline; do test -n "$m" && z=$z" \""$m/\"; done; ./clisp -E UTF-8 -Emisc 1:1 -Epathname 1:1 -norc -C -i tests/tests -x "(ext:exit (plusp (or (run-some-tests :dirlist '($z) :srcdir \"../modules/\" :outdir \"./\") 0)))" Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x8469000 - 0x8489fff 0x80000000 - 0x800bffff 0x155c7b7000 - 0x155c7d1fff 0x155c7d2000 - 0x155c7d2fff 0x155c7d3000 - 0x155c7d3fff 0x155c7d4000 - 0x155c7d5fff 0x155c7d6000 - 0x155c7d7fff 0x155c7d8000 - 0x155c7defff 0x155c7df000 - 0x155c7dffff 0x155c7e0000 - 0x155c7e0fff 0x155c7e2000 - 0x155c7e3fff 0x155c7e4000 - 0x155c822fff 0x155c823000 - 0x155c824fff 0x155c825000 - 0x155c82bfff 0x155c82c000 - 0x155c82cfff 0x155c82d000 - 0x155c8b6fff 0x155c8b7000 - 0x155c8b7fff 0x155c8b8000 - 0x155c8b8fff 0x155c8b9000 - 0x155c8e8fff 0x155c8e9000 - 0x155c8e9fff 0x155c8ea000 - 0x155c8eafff 0x155c8eb000 - 0x155c8ebfff 0x155c8ec000 - 0x155c8f3fff 0x155c8f4000 - 0x155c919fff 0x155c91a000 - 0x155c91dfff 0x155c91e000 - 0x155c91efff 0x155c91f000 - 0x155c920fff 0x155c921000 - 0x155c921fff 0x155c922000 - 0x155c922fff 0x155c923000 - 0x155c923fff 0x155c924000 - 0x155c927fff 0x155c928000 - 0x155c928fff 0x155c929000 - 0x155c929fff 0x155c92a000 - 0x155c92bfff 0x155c92c000 - 0x155c92dfff 0x155c92e000 - 0x155c92efff 0x155c92f000 - 0x155c92ffff 0x155c930000 - 0x155ca9bfff 0x155ca9c000 - 0x155ca9efff 0x155ca9f000 - 0x155ca9ffff 0x155caa0000 - 0x155caa0fff 0x155caa1000 - 0x155cab3fff 0x155cab4000 - 0x155cab4fff 0x155cab5000 - 0x155cab5fff 0x155cab6000 - 0x155cbd3fff 0x155cbd4000 - 0x155cbd6fff 0x155cbd7000 - 0x155cbd9fff 0x155cbda000 - 0x155cbdefff 0x155cbdf000 - 0x155cc33fff 0x155cc34000 - 0x155d2defff 0x3ffff6e000 - 0x3ffff8efff i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I \ `+' / I 8 8 8 8 8 8 \ `-+-' / 8 8 8 ooooo 8oooo `-__|__-' 8 8 8 8 8 | 8 o 8 8 o 8 8 ------+------ ooooo 8oooooo ooo8ooo ooooo 8 Welcome to GNU CLISP 2.49.93+ (2018-02-18) Copyright (c) Bruno Haible, Michael Stoll 1992-1993 Copyright (c) Bruno Haible, Marcus Daniels 1994-1997 Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998 Copyright (c) Bruno Haible, Sam Steingold 1999-2000 Copyright (c) Sam Steingold, Bruno Haible 2001-2018 Type :h and hit Enter for context help. ;; Loading file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/tests.fas ... 0 errors, 0 warnings ;; Loaded file /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/tests.fas RUN-TEST: started # (NULL (REQUIRE "i18n")) EQL-OK: T (LISTP (SHOW (MULTIPLE-VALUE-LIST (MODULE-INFO "i18n" T)) :PRETTY T)) ("i18n" 9 (TEXTDOMAINDIR TEXTDOMAIN I18N::SET-TEXTDOMAINDIR I18N::SET-TEXTDOMAIN SET-LOCALE NGETTEXT LOCALE-CONV LANGUAGE-INFORMATION GETTEXT) 73 ((OR NULL INTEGER (MEMBER :ALL :COLLATE :CTYPE :MESSAGES :MONETARY :NUMERIC :TIME :PAPER :NAME :ADDRESS :TELEPHONE :MEASUREMENT :IDENTIFICATION)) (OR INTEGER (MEMBER :CODESET :D_T_FMT :D_FMT :T_FMT :T_FMT_AMPM :AM_STR :PM_STR :DAY_1 :DAY_2 :DAY_3 :DAY_4 :DAY_5 :DAY_6 :DAY_7 :ABDAY_1 :ABDAY_2 :ABDAY_3 :ABDAY_4 :ABDAY_5 :ABDAY_6 :ABDAY_7 :MON_1 :MON_2 :MON_3 :MON_4 :MON_5 :MON_6 :MON_7 :MON_8 :MON_9 :MON_10 :MON_11 :MON_12 :ABMON_1 :ABMON_2 :ABMON_3 :ABMON_4 :ABMON_5 :ABMON_6 :ABMON_7 :ABMON_8 :ABMON_9 :ABMON_10 :ABMON_11 :ABMON_12 :ERA :ERA_D_FMT :ERA_D_T_FMT :ERA_T_FMT :ALT_DIGITS :RADIXCHAR :THOUSEP :YESEXPR :NOEXPR :YESSTR :NOSTR :CRNCYSTR)) :YESSTR :YESEXPR :T_FMT_AMPM :T_FMT :TIME :THOUSEP :TELEPHONE :RADIXCHAR :PM_STR :PAPER :NUMERIC :NOSTR :NOEXPR :NAME :MON_9 :MON_8 :MON_7 :MON_6 :MON_5 :MON_4 :MON_3 :MON_2 :MON_12 :MON_11 :MON_10 :MON_1 :MONETARY :MESSAGES :MEASUREMENT :IDENTIFICATION :ERA_T_FMT :ERA_D_T_FMT :ERA_D_FMT :ERA :D_T_FMT :D_FMT :DAY_7 :DAY_6 :DAY_5 :DAY_4 :DAY_3 :DAY_2 :DAY_1 :CTYPE :CRNCYSTR :COLLATE :CODESET :AM_STR :ALT_DIGITS :ALL :ADDRESS :ABMON_9 :ABMON_8 :ABMON_7 :ABMON_6 :ABMON_5 :ABMON_4 :ABMON_3 :ABMON_2 :ABMON_12 :ABMON_11 :ABMON_10 :ABMON_1 :ABDAY_7 :ABDAY_6 :ABDAY_5 :ABDAY_4 :ABDAY_3 :ABDAY_2 :ABDAY_1 I18N::MK-LOCALE-CONV)) EQL-OK: T (GETTEXT "foo") EQUAL-OK: "foo" (NGETTEXT "abazonk" "abazonk" 12) EQUAL-OK: "abazonk" (TYPEP (SHOW (TEXTDOMAIN)) '(OR NULL STRING)) "messages" EQL-OK: T (SETF (TEXTDOMAIN) "zot") EQUAL-OK: "zot" (TYPEP (SHOW (TEXTDOMAINDIR "foo")) '(OR NULL PATHNAME)) #P"/usr/share/locale/" EQL-OK: T (PATHNAMEP (SETF (TEXTDOMAINDIR "foo") (CAR (DIRECTORY "./")))) EQL-OK: T (LISTP (SHOW (SET-LOCALE) :PRETTY T)) (:ALL "LC_CTYPE=C.UTF-8;LC_NUMERIC=C;LC_TIME=C.UTF-8;LC_COLLATE=C.UTF-8;LC_MONETARY=C.UTF-8;LC_MESSAGES=C.UTF-8;LC_PAPER=C;LC_NAME=C;LC_ADDRESS=C;LC_TELEPHONE=C;LC_MEASUREMENT=C;LC_IDENTIFICATION=C" :COLLATE "C.UTF-8" :CTYPE "C.UTF-8" :MESSAGES "C.UTF-8" :MONETARY "C.UTF-8" :NUMERIC "C" :TIME "C.UTF-8" :PAPER "C" :NAME "C" :ADDRESS "C" :TELEPHONE "C" :MEASUREMENT "C" :IDENTIFICATION "C") EQL-OK: T (IF (FBOUNDP 'LOCALE-CONV) (LOCALE-CONV-P (SHOW (LOCALE-CONV) :PRETTY T)) T) # EQL-OK: T (IF (FBOUNDP 'LANGUAGE-INFORMATION) (LISTP (SHOW (LANGUAGE-INFORMATION) :PRETTY T)) T) (:CODESET "UTF-8" :D_T_FMT "%a %b %e %H:%M:%S %Y" :D_FMT "%m/%d/%y" :T_FMT "%H:%M:%S" :T_FMT_AMPM "%I:%M:%S %p" :AM_STR "AM" :PM_STR "PM" :DAY_1 "Sunday" :DAY_2 "Monday" :DAY_3 "Tuesday" :DAY_4 "Wednesday" :DAY_5 "Thursday" :DAY_6 "Friday" :DAY_7 "Saturday" :ABDAY_1 "Sun" :ABDAY_2 "Mon" :ABDAY_3 "Tue" :ABDAY_4 "Wed" :ABDAY_5 "Thu" :ABDAY_6 "Fri" :ABDAY_7 "Sat" :MON_1 "January" :MON_2 "February" :MON_3 "March" :MON_4 "April" :MON_5 "May" :MON_6 "June" :MON_7 "July" :MON_8 "August" :MON_9 "September" :MON_10 "October" :MON_11 "November" :MON_12 "December" :ABMON_1 "Jan" :ABMON_2 "Feb" :ABMON_3 "Mar" :ABMON_4 "Apr" :ABMON_5 "May" :ABMON_6 "Jun" :ABMON_7 "Jul" :ABMON_8 "Aug" :ABMON_9 "Sep" :ABMON_10 "Oct" :ABMON_11 "Nov" :ABMON_12 "Dec" :ERA "" :ERA_D_FMT "" :ERA_D_T_FMT "" :ERA_T_FMT "" :ALT_DIGITS "" :RADIXCHAR "." :THOUSEP "" :YESEXPR "^[yY]" :NOEXPR "^[nN]" :YESSTR "Yes" :NOSTR "No" :CRNCYSTR "-$") EQL-OK: T RUN-TEST: finished #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/i18n/test.tst" (0 errors out of 11 tests) RUN-TEST: started # (NULL (REQUIRE "syscalls")) EQL-OK: T (LISTP (SHOW (MULTIPLE-VALUE-LIST (MODULE-INFO "syscalls" T)) :PRETTY T)) ("syscalls" 105 (STRERROR POSIX::%UNGETC POSIX::%SYSLOG POSIX::%STDIO POSIX::%SET-FILE-SIZE POSIX::%SETUID POSIX::%SETPGID POSIX::%SETHOSTID POSIX::%SETGROUPS POSIX::%SETGID POSIX::%SETEUID POSIX::%SETEGID POSIX::%SETDOMAINNAME POSIX::%FPUTC POSIX::%FGETC YN Y1 Y0 WAIT USER-SHELLS USER-INFO USAGE UNAME UMASK UID TGAMMA SYSCONF SYNC STRING-TIME STREAM-OPTIONS STREAM-LOCK STAT-VFS POSIX::SET-RLIMIT SET-FILE-STAT SETUTXENT SETSID SETREUID SETREGID SETPGRP SETLOGMASK SERVICE RLIMIT RESOLVE-HOST-IPADDR PUTUTXLINE PGID PATHCONF OPENLOG MKSTEMP MKNOD MKDTEMP LOADAVG LGAMMA KILL JN J1 J0 HOSTID GROUP-INFO GROUPS GID GETUTXLINE GETUTXID GETUTXENT GETSID GETPPID GETPGRP GETDATE FREOPEN FOPEN FNMATCH FILE-TREE-WALK FILE-STAT FILE-SIZE FILENO FFLUSH FERROR FEOF FDOPEN FCLOSE EUID ERRNO ERFC ERF POSIX::END-SUBPROCESSES ENDUTXENT EGID DUPLICATE-HANDLE DOMAINNAME CRYPT COPY-FILE CONVERT-MODE CONFSTR CLOSELOG CLEARERR CHROOT POSIX::BEGIN-SUBPROCESSES POSIX::%SET-PRIORITY VERSION-COMPARE VERSION>= VERSION> VERSION<= VERSION< PRIORITY FILE-OWNER BOGOMIPS) 561 (# # # (OR NULL INTEGER (MEMBER :REALTIME :HIGH :ABOVE-NORMAL :NORMAL :BELOW-NORMAL :LOW :IDLE)) (OR NULL INTEGER (MEMBER :PROCESS :PGRP :USER)) (OR NULL INTEGER (MEMBER :KERN :USER :MAIL :NEWS :UUCP :DAEMON :AUTH :CRON :LPR :SYSLOG :AUTHPRIV :FTP :LOCAL0 :LOCAL1 :LOCAL2 :LOCAL3 :LOCAL4 :LOCAL5 :LOCAL6 :LOCAL7)) (OR INTEGER (MEMBER :AIO-LISTIO-MAX :AIO-MAX :AIO-PRIO-DELTA-MAX :ARG-MAX :ATEXIT-MAX :BC-BASE-MAX :BC-DIM-MAX :BC-SCALE-MAX :BC-STRING-MAX :CHILD-MAX :CLK-TCK :COLL-WEIGHTS-MAX :DELAYTIMER-MAX :EXPR-NEST-MAX :HOST-NAME-MAX :IOV-MAX :LINE-MAX :LOGIN-NAME-MAX :NGROUPS-MAX :GETGR-R-SIZE-MAX :GETPW-R-SIZE-MAX :MQ-OPEN-MAX :MQ-PRIO-MAX :OPEN-MAX :ADVISORY-INFO :BARRIERS :ASYNCHRONOUS-IO :CLOCK-SELECTION :CPUTIME :FSYNC :IPV6 :JOB-CONTROL :MAPPED-FILES :MEMLOCK :MEMLOCK-RANGE :MEMORY-PROTECTION :MESSAGE-PASSING :MONOTONIC-CLOCK :PRIORITIZED-IO :PRIORITY-SCHEDULING :RAW-SOCKETS :READER-WRITER-LOCKS :REALTIME-SIGNALS :REGEXP :SAVED-IDS :SEMAPHORES :SHARED-MEMORY-OBJECTS :SHELL :SPAWN :SPIN-LOCKS :SPORADIC-SERVER :SS-REPL-MAX :SYNCHRONIZED-IO :THREAD-ATTR-STACKADDR :THREAD-ATTR-STACKSIZE :THREAD-CPUTIME :THREAD-PRIO-INHERIT :THREAD-PRIO-PROTECT :THREAD-PRIORITY-SCHEDULING :THREAD-PROCESS-SHARED :THREAD-SAFE-FUNCTIONS :THREAD-SPORADIC-SERVER :THREAD-ROBUST-PRIO-INHERIT :THREAD-ROBUST-PRIO-PROTECT :THREADS :TIMEOUTS :TIMERS :TRACE :TRACE-EVENT-FILTER :TRACE-EVENT-NAME-MAX :TRACE-INHERIT :TRACE-LOG :TRACE-NAME-MAX :TRACE-SYS-MAX :TRACE-USER-EVENT-MAX :TYPED-MEMORY-OBJECTS :VERSION :XBS5-ILP32-OFF32 :XBS5-ILP32-OFFBIG :XBS5-LP64-OFF64 :XBS5-LPBIG-OFFBIG :V6-ILP32-OFF32 :V6-ILP32-OFFBIG :V6-LP64-OFF64 :V6-LPBIG-OFFBIG :V7-ILP32-OFF32 :V7-ILP32-OFFBIG :V7-LP64-OFF64 :V7-LPBIG-OFFBIG :2-C-BIND :2-C-DEV :2-CHAR-TERM :2-FORT-DEV :2-FORT-RUN :2-LOCALEDEF :2-PBS :2-PBS-ACCOUNTING :2-PBS-CHECKPOINT :2-PBS-LOCATE :2-PBS-MESSAGE :2-PBS-TRACK :2-SW-DEV :2-UPE :2-VERSION :PAGESIZE :PHYS-PAGES :AVPHYS-PAGES :THREAD-DESTRUCTOR-ITERATIONS :THREAD-KEYS-MAX :THREAD-STACK-MIN :THREAD-THREADS-MAX :RE-DUP-MAX :RTSIG-MAX :SEM-NSEMS-MAX :SEM-VALUE-MAX :SIGQUEUE-MAX :STREAM-MAX :SYMLOOP-MAX :TIMER-MAX :TTY-NAME-MAX :TZNAME-MAX :XOPEN-CRYPT :XOPEN-ENH-I18N :XOPEN-LEGACY :XOPEN-REALTIME :XOPEN-REALTIME-THREADS :XOPEN-SHM :XOPEN-STREAMS :XOPEN-UNIX :XOPEN-VERSION :NPROCESSORS-CONF :NPROCESSORS-ONLN)) (OR INTEGER (MEMBER :FILESIZEBITS :LINK-MAX :MAX-CANON :MAX-INPUT :NAME-MAX :PATH-MAX :PIPE-BUF :2-SYMLINKS :ALLOC-SIZE-MIN :REC-INCR-XFER-SIZE :REC-MAX-XFER-SIZE :REC-MIN-XFER-SIZE :REC-XFER-ALIGN :SYMLINK-MAX :CHOWN-RESTRICTED :NO-TRUNC :VDISABLE :ASYNC-IO :PRIO-IO :SYNC-IO :SOCK-MAXBUF)) (OR INTEGER (MEMBER :PATH :POSIX-V6-ILP32-OFF32-CFLAGS :POSIX-V6-ILP32-OFF32-LDFLAGS :POSIX-V6-ILP32-OFF32-LIBS :POSIX-V6-ILP32-OFFBIG-CFLAGS :POSIX-V6-ILP32-OFFBIG-LDFLAGS :POSIX-V6-ILP32-OFFBIG-LIBS :POSIX-V6-LP64-OFF64-CFLAGS :POSIX-V6-LP64-OFF64-LDFLAGS :POSIX-V6-LP64-OFF64-LIBS :POSIX-V6-LPBIG-OFFBIG-CFLAGS :POSIX-V6-LPBIG-OFFBIG-LDFLAGS :POSIX-V6-LPBIG-OFFBIG-LIBS :POSIX-V6-WIDTH-RESTRICTED-ENVS :V7-ENV :POSIX-V7-ILP32-OFF32-CFLAGS :POSIX-V7-ILP32-OFF32-LDFLAGS :POSIX-V7-ILP32-OFF32-LIBS :POSIX-V7-ILP32-OFFBIG-CFLAGS :POSIX-V7-ILP32-OFFBIG-LDFLAGS :POSIX-V7-ILP32-OFFBIG-LIBS :POSIX-V7-LP64-OFF64-CFLAGS :POSIX-V7-LP64-OFF64-LDFLAGS :POSIX-V7-LP64-OFF64-LIBS :POSIX-V7-LPBIG-OFFBIG-CFLAGS :POSIX-V7-LPBIG-OFFBIG-LDFLAGS :POSIX-V7-LPBIG-OFFBIG-LIBS :POSIX-V7-WIDTH-RESTRICTED-ENVS :XBS5-ILP32-OFF32-CFLAGS :XBS5-ILP32-OFF32-LDFLAGS :XBS5-ILP32-OFF32-LIBS :XBS5-ILP32-OFF32-LINTFLAGS :XBS5-ILP32-OFFBIG-CFLAGS :XBS5-ILP32-OFFBIG-LDFLAGS :XBS5-ILP32-OFFBIG-LIBS :XBS5-ILP32-OFFBIG-LINTFLAGS :XBS5-LP64-OFF64-CFLAGS :XBS5-LP64-OFF64-LDFLAGS :XBS5-LP64-OFF64-LIBS :XBS5-LP64-OFF64-LINTFLAGS :XBS5-LPBIG-OFFBIG-CFLAGS :XBS5-LPBIG-OFFBIG-LDFLAGS :XBS5-LPBIG-OFFBIG-LIBS :XBS5-LPBIG-OFFBIG-LINTFLAGS)) (OR INTEGER (MEMBER :SUID :SGID :SVTX :RWXU :RUSR :WUSR :XUSR :RWXG :RGRP :WGRP :XGRP :RWXO :ROTH :WOTH :XOTH)) (OR INTEGER (MEMBER :FIFO :FSOCK :FCHR :FDIR :FBLK :FREG)) (OR INTEGER (MEMBER :ST_RDONLY :ST_NOSUID :ST_NODEV :ST_NOEXEC :ST_SYNCHRONOUS :ST_MANDLOCK :ST_WRITE :ST_APPEND :ST_IMMUTABLE :ST_NOATIME :ST_NODIRATIME)) (OR INTEGER (MEMBER :SIGABRT :SIGALRM :SIGBUS :SIGCHLD :SIGCONT :SIGFPE :SIGHUP :SIGILL :SIGINT :SIGKILL :SIGPIPE :SIGQUIT :SIGSEGV :SIGSTOP :SIGTERM :SIGTSTP :SIGTTIN :SIGTTOU :SIGUSR1 :SIGUSR2 :SIGPOLL :SIGPROF :SIGSYS :SIGTRAP :SIGURG :SIGVTALRM :SIGXCPU :SIGXFSZ)) (OR INTEGER (MEMBER :SELF :CHILDREN :THREAD :LWP)) (OR INTEGER (MEMBER :CPU :FSIZE :DATA :STACK :CORE :RSS :NOFILE :AS :NPROC :MEMLOCK :LOCKS)) (OR INTEGER (MEMBER :RDONLY :WRONLY :RDWR :APPEND :CREAT :TRUNC :EXCL :NOCTTY :SYNC :NONBLOCK :BINARY :TEXT :DIRECT :LARGEFILE :DIRECTORY :NOFOLLOW)) (OR INTEGER (MEMBER :EMERG :ALERT :CRIT :ERR :WARNING :NOTICE :INFO :DEBUG)) (OR INTEGER (MEMBER :FD :FL)) (OR INTEGER (MEMBER :F :D :DP :SL :SLN :DNR :NS)) (OR INTEGER (MEMBER :CLOEXEC)) (OR INTEGER (MEMBER :EMPTY :RUN-LVL :BOOT-TIME :OLD-TIME :NEW-TIME :USER-PROCESS :INIT-PROCESS :LOGIN-PROCESS :DEAD-PROCESS :ACCOUNTING)) (OR INTEGER (MEMBER :E2BIG :EACCES :EADDRINUSE :EADDRNOTAVAIL :EAFNOSUPPORT :EAGAIN :EALREADY :EBADF :EBADMSG :EBUSY :ECANCELED :ECHILD :ECONNABORTED :ECONNREFUSED :ECONNRESET :EDEADLK :EDESTADDRREQ :EDOM :EDQUOT :EEXIST :EFAULT :EFBIG :EHOSTUNREACH :EIDRM :EILSEQ :EINPROGRESS :EINTR :EINVAL :EIO :EISCONN :EISDIR :ELOOP :EMFILE :EMLINK :EMSGSIZE :EMULTIHOP :ENAMETOOLONG :ENETDOWN :ENETRESET :ENETUNREACH :ENFILE :ENOBUFS :ENODATA :ENODEV :ENOENT :ENOEXEC :ENOLCK :ENOLINK :ENOMEM :ENOMSG :ENOPROTOOPT :ENOSPC :ENOSR :ENOSTR :ENOSYS :ENOTCONN :ENOTDIR :ENOTEMPTY :ENOTSOCK :ENOTSUP :ENOTTY :ENXIO :EOPNOTSUPP :EOVERFLOW :EPERM :EPIPE :EPROTO :EPROTONOSUPPORT :EPROTOTYPE :ERANGE :EROFS :ESPIPE :ESRCH :ESTALE :ETIME :ETIMEDOUT :ETXTBSY :EWOULDBLOCK :EXDEV :EADV :EBADE :EBADFD :EBADR :EBADRQC :EBADSLT :EBFONT :ECHRNG :ECOMM :EDEADLOCK :EDOTDOT :EHOSTDOWN :EISNAM :EL2HLT :EL2NSYNC :EL3HLT :EL3RST :ELIBACC :ELIBBAD :ELIBEXEC :ELIBMAX :ELIBSCN :ELNRNG :EMEDIUMTYPE :ENAVAIL :ENOANO :ENOCSI :ENOMEDIUM :ENONET :ENOPKG :ENOTBLK :ENOTNAM :ENOTUNIQ :EPFNOSUPPORT :EREMCHG :EREMOTE :EREMOTEIO :ERESTART :ESHUTDOWN :ESOCKTNOSUPPORT :ESRMNT :ESTRPIPE :ETOOMANYREFS :EUCLEAN :EUNATCH :EUSERS :EXFULL :ENOKEY :EKEYEXPIRED :EKEYREVOKED :EKEYREJECTED :ERFKILL :EHWPOISON :ENOTRECOVERABLE :EOWNERDEAD)) (OR NULL INTEGER (MEMBER :COPY :SYMLINK :HARDLINK :HARDLINK-OR-COPY :RENAME)) (MEMBER 0 1 2) UTMPX RLIMIT RESOLVE-HOST-IPADDR MAKE-UTMPX MAKE-USER-INFO MAKE-USAGE MAKE-UNAME MAKE-STAT-VFS MAKE-SERVICE MAKE-RLIMIT MAKE-HOSTENT MAKE-GROUP-INFO MAKE-FILE-STAT COPY-FILE :XUSR :XOTH :XOPEN-VERSION :XOPEN-UNIX :XOPEN-STREAMS :XOPEN-SHM :XOPEN-REALTIME-THREADS :XOPEN-REALTIME :XOPEN-LEGACY :XOPEN-ENH-I18N :XOPEN-CRYPT :XGRP :XBS5-LPBIG-OFFBIG-LINTFLAGS :XBS5-LPBIG-OFFBIG-LIBS :XBS5-LPBIG-OFFBIG-LDFLAGS :XBS5-LPBIG-OFFBIG-CFLAGS :XBS5-LPBIG-OFFBIG :XBS5-LP64-OFF64-LINTFLAGS :XBS5-LP64-OFF64-LIBS :XBS5-LP64-OFF64-LDFLAGS :XBS5-LP64-OFF64-CFLAGS :XBS5-LP64-OFF64 :XBS5-ILP32-OFFBIG-LINTFLAGS :XBS5-ILP32-OFFBIG-LIBS :XBS5-ILP32-OFFBIG-LDFLAGS :XBS5-ILP32-OFFBIG-CFLAGS :XBS5-ILP32-OFFBIG :XBS5-ILP32-OFF32-LINTFLAGS :XBS5-ILP32-OFF32-LIBS :XBS5-ILP32-OFF32-LDFLAGS :XBS5-ILP32-OFF32-CFLAGS :XBS5-ILP32-OFF32 :WUSR :WRONLY :WOTH :WGRP :WARNING :VERSION :VDISABLE :V7-LPBIG-OFFBIG :V7-LP64-OFF64 :V7-ILP32-OFFBIG :V7-ILP32-OFF32 :V7-ENV :V6-LPBIG-OFFBIG :V6-LP64-OFF64 :V6-ILP32-OFFBIG :V6-ILP32-OFF32 :UUCP :USER-PROCESS :USER :USAGE :UNTRACED :UID :TZNAME-MAX :TYPED-MEMORY-OBJECTS :TTY-NAME-MAX :TRUNC :TRACE-USER-EVENT-MAX :TRACE-SYS-MAX :TRACE-NAME-MAX :TRACE-LOG :TRACE-INHERIT :TRACE-EVENT-NAME-MAX :TRACE-EVENT-FILTER :TRACE :TIMER-MAX :TIMERS :TIMEOUTS :THREAD-THREADS-MAX :THREAD-STACK-MIN :THREAD-SPORADIC-SERVER :THREAD-SAFE-FUNCTIONS :THREAD-ROBUST-PRIO-PROTECT :THREAD-ROBUST-PRIO-INHERIT :THREAD-PROCESS-SHARED :THREAD-PRIO-PROTECT :THREAD-PRIO-INHERIT :THREAD-PRIORITY-SCHEDULING :THREAD-KEYS-MAX :THREAD-DESTRUCTOR-ITERATIONS :THREAD-CPUTIME :THREAD-ATTR-STACKSIZE :THREAD-ATTR-STACKADDR :THREADS :THREAD :TEXT :SYSLOG :SYNC-IO :SYNCHRONIZED-IO :SYNC :SYMLOOP-MAX :SYMLINK-MAX :SYMLINK :SVTX :SUID :ST_WRITE :ST_SYNCHRONOUS :ST_RDONLY :ST_NOSUID :ST_NOEXEC :ST_NODIRATIME :ST_NODEV :ST_NOATIME :ST_MANDLOCK :ST_IMMUTABLE :ST_APPEND :STREAM-MAX :STOPPED :START :STACK :SS-REPL-MAX :SPORADIC-SERVER :SPIN-LOCKS :SPAWN :SOCK-MAXBUF :SLN :SL :SIGXFSZ :SIGXCPU :SIGVTALRM :SIGUSR2 :SIGUSR1 :SIGURG :SIGTTOU :SIGTTIN :SIGTSTP :SIGTRAP :SIGTERM :SIGSYS :SIGSTOP :SIGSEGV :SIGQUIT :SIGQUEUE-MAX :SIGPROF :SIGPOLL :SIGPIPE :SIGNALED :SIGKILL :SIGINT :SIGILL :SIGHUP :SIGFPE :SIGCONT :SIGCHLD :SIGBUS :SIGALRM :SIGABRT :SHELL :SHARED-MEMORY-OBJECTS :SHARED :SGID :SEM-VALUE-MAX :SEM-NSEMS-MAX :SEMAPHORES :SELF :SAVED-IDS :RWXU :RWXO :RWXG :RUSR :RUN-LVL :RTSIG-MAX :RSS :ROTH :RGRP :RE-DUP-MAX :RENAME :REGEXP :REC-XFER-ALIGN :REC-MIN-XFER-SIZE :REC-MAX-XFER-SIZE :REC-INCR-XFER-SIZE :REALTIME-SIGNALS :REALTIME :READER-WRITER-LOCKS :RDWR :RDONLY :RAW-SOCKETS :PROCESS :PRIO-IO :PRIORITY-SCHEDULING :PRIORITIZED-IO :PRESERVE :POSIX-V7-WIDTH-RESTRICTED-ENVS :POSIX-V7-LPBIG-OFFBIG-LIBS :POSIX-V7-LPBIG-OFFBIG-LDFLAGS :POSIX-V7-LPBIG-OFFBIG-CFLAGS :POSIX-V7-LP64-OFF64-LIBS :POSIX-V7-LP64-OFF64-LDFLAGS :POSIX-V7-LP64-OFF64-CFLAGS :POSIX-V7-ILP32-OFFBIG-LIBS :POSIX-V7-ILP32-OFFBIG-LDFLAGS :POSIX-V7-ILP32-OFFBIG-CFLAGS :POSIX-V7-ILP32-OFF32-LIBS :POSIX-V7-ILP32-OFF32-LDFLAGS :POSIX-V7-ILP32-OFF32-CFLAGS :POSIX-V6-WIDTH-RESTRICTED-ENVS :POSIX-V6-LPBIG-OFFBIG-LIBS :POSIX-V6-LPBIG-OFFBIG-LDFLAGS :POSIX-V6-LPBIG-OFFBIG-CFLAGS :POSIX-V6-LP64-OFF64-LIBS :POSIX-V6-LP64-OFF64-LDFLAGS :POSIX-V6-LP64-OFF64-CFLAGS :POSIX-V6-ILP32-OFFBIG-LIBS :POSIX-V6-ILP32-OFFBIG-LDFLAGS :POSIX-V6-ILP32-OFFBIG-CFLAGS :POSIX-V6-ILP32-OFF32-LIBS :POSIX-V6-ILP32-OFF32-LDFLAGS :POSIX-V6-ILP32-OFF32-CFLAGS :PIPE-BUF :PID :PHYS-PAGES :PHYS :PGRP :PERIOD :PATH-MAX :PATHNAME :PATH :PAGESIZE :OPEN-MAX :OLD-TIME :ODELAY :NS :NPROCESSORS-ONLN :NPROCESSORS-CONF :NPROC :NO-TRUNC :NOWAIT :NOTICE :NORMAL :NONBLOCK :NOHANG :NOFOLLOW :NOFILE :NOESCAPE :NOCTTY :NGROUPS-MAX :NEW-TIME :NEWS :NDELAY :NAME-MAX :MTIME :MQ-PRIO-MAX :MQ-OPEN-MAX :MOUNT :MONOTONIC-CLOCK :MODE :METHOD :MESSAGE-PASSING :MEMORY-PROTECTION :MEMLOCK-RANGE :MEMLOCK :MAX-INPUT :MAX-CANON :MAPPED-FILES :MAIL :LWP :LPR :LOW :LOGIN-PROCESS :LOGIN-NAME-MAX :LOCKS :LOCAL7 :LOCAL6 :LOCAL5 :LOCAL4 :LOCAL3 :LOCAL2 :LOCAL1 :LOCAL0 :LINK-MAX :LINE-MAX :LENGTH :LARGEFILE :KERN :JOB-CONTROL :IPV6 :IOV-MAX :INIT-PROCESS :INFO :IF-EXISTS :IF-DOES-NOT-EXIST :IDLE :HOST-NAME-MAX :HIGH :HARDLINK-OR-COPY :HARDLINK :GID :GETPW-R-SIZE-MAX :GETGR-R-SIZE-MAX :FTP :FSYNC :FSOCK :FSIZE :FREG :FL :FILESIZEBITS :FIFO :FD-LIMIT :FDIR :FD :FCHR :FBLK :FACILITY :F :EXTERNAL-FORMAT :EXPR-NEST-MAX :EXITED :EXFULL :EXDEV :EXCL :EWOULDBLOCK :EUSERS :EUNATCH :EUCLEAN :ETXTBSY :ETOOMANYREFS :ETIMEDOUT :ETIME :ESTRPIPE :ESTALE :ESRMNT :ESRCH :ESPIPE :ESOCKTNOSUPPORT :ESHUTDOWN :ERR :EROFS :ERFKILL :ERESTART :EREMOTEIO :EREMOTE :EREMCHG :ERANGE :EPROTOTYPE :EPROTONOSUPPORT :EPROTO :EPIPE :EPFNOSUPPORT :EPERM :EOWNERDEAD :EOVERFLOW :EOPNOTSUPP :ENXIO :ENOTUNIQ :ENOTTY :ENOTSUP :ENOTSOCK :ENOTRECOVERABLE :ENOTNAM :ENOTEMPTY :ENOTDIR :ENOTCONN :ENOTBLK :ENOSYS :ENOSTR :ENOSR :ENOSPC :ENOPROTOOPT :ENOPKG :ENONET :ENOMSG :ENOMEM :ENOMEDIUM :ENOLINK :ENOLCK :ENOKEY :ENOEXEC :ENOENT :ENODEV :ENODATA :ENOCSI :ENOBUFS :ENOANO :ENFILE :ENETUNREACH :ENETRESET :ENETDOWN :ENAVAIL :ENAMETOOLONG :EMULTIHOP :EMSGSIZE :EMPTY :EMLINK :EMFILE :EMERG :EMEDIUMTYPE :ELOOP :ELNRNG :ELIBSCN :ELIBMAX :ELIBEXEC :ELIBBAD :ELIBACC :ELEMENT-TYPE :EL3RST :EL3HLT :EL2NSYNC :EL2HLT :EKEYREVOKED :EKEYREJECTED :EKEYEXPIRED :EISNAM :EISDIR :EISCONN :EIO :EINVAL :EINTR :EINPROGRESS :EILSEQ :EIDRM :EHWPOISON :EHOSTUNREACH :EHOSTDOWN :EFBIG :EFAULT :EEXIST :EDQUOT :EDOTDOT :EDOM :EDESTADDRREQ :EDEADLOCK :EDEADLK :ECONNRESET :ECONNREFUSED :ECONNABORTED :ECOMM :ECHRNG :ECHILD :ECANCELED :EBUSY :EBFONT :EBADSLT :EBADRQC :EBADR :EBADMSG :EBADFD :EBADF :EBADE :EALREADY :EAGAIN :EAFNOSUPPORT :EADV :EADDRNOTAVAIL :EADDRINUSE :EACCES :E2BIG :DP :DNR :DIRECTORY :DIRECTION :DIRECT :DEPTH :DELAYTIMER-MAX :DEBUG :DEAD-PROCESS :DATA :DAEMON :D :CRON :CRIT :CREAT :CPUTIME :CPU :CORE :COPY :CONTINUED :CONS :COLL-WEIGHTS-MAX :CLOEXEC :CLOCK-SELECTION :CLK-TCK :CHOWN-RESTRICTED :CHILD-MAX :CHILDREN :CHDIR :CASE-SENSITIVE :BUFFERED :BOOT-TIME :BLOCK :BINARY :BELOW-NORMAL :BC-STRING-MAX :BC-SCALE-MAX :BC-DIM-MAX :BC-BASE-MAX :BARRIERS :AVPHYS-PAGES :AUTHPRIV :AUTH :ATIME :ATEXIT-MAX :ASYNC-IO :ASYNCHRONOUS-IO :AS :ARG-MAX :APPEND :ALLOC-SIZE-MIN :ALERT :AIO-PRIO-DELTA-MAX :AIO-MAX :AIO-LISTIO-MAX :ADVISORY-INFO :ACCOUNTING :ABOVE-NORMAL :2-VERSION :2-UPE :2-SYMLINKS :2-SW-DEV :2-PBS-TRACK :2-PBS-MESSAGE :2-PBS-LOCATE :2-PBS-CHECKPOINT :2-PBS-ACCOUNTING :2-PBS :2-LOCALEDEF :2-FORT-RUN :2-FORT-DEV :2-C-DEV :2-C-BIND :2-CHAR-TERM DECODE-UNIVERSAL-TIME)) EQL-OK: T (HOSTENT-P (SHOW (RESOLVE-HOST-IPADDR "localhost"))) # EQL-OK: T (LISTP (SHOW (RESOLVE-HOST-IPADDR) :PRETTY T)) (# #) EQL-OK: T (SERVICE-P (SHOW (SERVICE "smtp"))) # EQL-OK: T (SERVICE-P (SHOW (SERVICE 25))) # EQL-OK: T (> (LENGTH (SHOW (SERVICE) :PRETTY T)) (LENGTH (SERVICE NIL "tcp"))) (# # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #) EQL-OK: T (EQUALP (SERVICE "www" "tcp") (SERVICE "http" "tcp")) EQL-OK: T (CRYPT "foo" "bar") EQUAL-OK: "ba4TuD1iozTxw" (LET* ((FMT "%Y-%m-%d %H:%M:%S") (STRING (SHOW (STRING-TIME FMT)))) (STRING= STRING (STRING-TIME FMT (SHOW (STRING-TIME FMT STRING))))) "2021-04-24 15:40:27" 3828282027 EQL-OK: T (DEFMACRO WITH-C-TIME (&BODY BODY) "Set LC_TIME to \"C\" during body, restoring the previously set value afterwards." (LET ((ORIGINAL-LOCALE-NAME (GENSYM))) `(LET ((,ORIGINAL-LOCALE-NAME (SET-LOCALE :TIME))) (UNWIND-PROTECT (PROGN (SET-LOCALE :TIME "C") ,@BODY) (SET-LOCALE :TIME ,ORIGINAL-LOCALE-NAME))))) EQL-OK: WITH-C-TIME (DEFUN CHECK-TIME-DATE (FMT DATUM) (AND (FBOUNDP 'GETDATE) (WITH-C-TIME (LET ((GD (GETDATE DATUM)) (ST (STRING-TIME FMT DATUM))) (SHOW (LIST FMT DATUM GD (STRING-TIME "%Y-%m-%d %a %H:%M:%S" GD))) (UNLESS (= GD ST) (SHOW (LIST ST (STRING-TIME "%Y-%m-%d %a %H:%M:%S" ST)))))))) EQL-OK: CHECK-TIME-DATE (CHECK-TIME-DATE "%m/%d/%y %I %p" "10/1/87 4 PM") ("%m/%d/%y %I %p" "10/1/87 4 PM" 2769105600 "1987-10-01 Thu 16:00:00") EQL-OK: NIL (CHECK-TIME-DATE "%A %B %d, %Y, %H:%M:%S" "Friday September 18, 1987, 10:30:30") ("%A %B %d, %Y, %H:%M:%S" "Friday September 18, 1987, 10:30:30" 2767962630 "1987-09-18 Fri 10:30:30") EQL-OK: NIL (CHECK-TIME-DATE "%d,%m,%Y %H:%M" "24,9,1986 10:30") ("%d,%m,%Y %H:%M" "24,9,1986 10:30" 2736945000 "1986-09-24 Wed 10:30:00") EQL-OK: NIL (DEFUN CHECK-TIME-DATE (FMT DATUM) (DECLARE (IGNORE FMT)) (AND (FBOUNDP 'GETDATE) (NULL (SHOW (WITH-C-TIME (STRING-TIME "%Y-%m-%d %a %H:%M:%S" (GETDATE DATUM))))))) EQL-OK: CHECK-TIME-DATE (CHECK-TIME-DATE "%m/%d/%y" "11/27/86") "1986-11-27 Thu 15:40:27" EQL-OK: NIL (CHECK-TIME-DATE "%d.%m.%y" "27.11.86") "1986-11-27 Thu 15:40:27" EQL-OK: NIL (CHECK-TIME-DATE "%y-%m-%d" "86-11-27") "1986-11-27 Thu 15:40:27" EQL-OK: NIL (CHECK-TIME-DATE "%A %H:%M:%S" "Friday 12:00:00") "2021-04-30 Fri 12:00:00" EQL-OK: NIL (CHECK-TIME-DATE "%A" "Friday") "2021-04-30 Fri 15:40:27" EQL-OK: NIL (CHECK-TIME-DATE "%a" "Mon") "2021-04-26 Mon 15:40:27" EQL-OK: NIL (CHECK-TIME-DATE "%a" "Sun") "2021-04-25 Sun 15:40:27" EQL-OK: NIL (CHECK-TIME-DATE "%a" "Fri") "2021-04-30 Fri 15:40:27" EQL-OK: NIL (CHECK-TIME-DATE "%B" "September") "2021-09-03 Fri 15:40:27" EQL-OK: NIL (CHECK-TIME-DATE "%B" "January") "2022-01-02 Sun 15:40:27" EQL-OK: NIL (CHECK-TIME-DATE "%B" "December") "2021-12-03 Fri 15:40:27" EQL-OK: NIL (CHECK-TIME-DATE "%b %a" "Sep Mon") "2021-09-06 Mon 15:40:27" EQL-OK: NIL (CHECK-TIME-DATE "%b %a" "Jan Fri") "2022-01-07 Fri 15:40:27" EQL-OK: NIL (CHECK-TIME-DATE "%b %a" "Dec Mon") "2021-12-06 Mon 15:40:27" EQL-OK: NIL (CHECK-TIME-DATE "%b %a %Y" "Jan Wed 1989") "1989-01-04 Wed 15:40:27" EQL-OK: NIL (CHECK-TIME-DATE "%a %H" "Fri 9") "2021-04-30 Fri 09:00:00" EQL-OK: NIL (CHECK-TIME-DATE "%b %H:%S" "Feb 10:30") "2022-02-02 Wed 10:00:30" EQL-OK: NIL (CHECK-TIME-DATE "%H:%M" "10:30") "2021-04-25 Sun 10:30:00" EQL-OK: NIL (CHECK-TIME-DATE "%H:%M" "13:30") "2021-04-25 Sun 13:30:00" EQL-OK: NIL (WHEN (FBOUNDP 'GETUTXENT) (SHOW (LOOP :FOR UTMPX = (GETUTXENT) :WHILE UTMPX :COUNT (SHOW UTMPX :PRETTY T))) (ENDUTXENT)) 0 EQL-OK: NIL (DEFPARAMETER *TMP1* (MKSTEMP "syscalls-tests-")) EQL-OK: *TMP1* (DEFPARAMETER *TMP2* (MKSTEMP "syscalls-tests-")) EQL-OK: *TMP2* (LET ((*STANDARD-OUTPUT* (MAKE-BROADCAST-STREAM *STANDARD-OUTPUT* *TMP1* *TMP2*))) (SHOW (WRITE *TMP1* :STREAM *TMP1*)) (TERPRI *TMP1*) (SHOW (WRITE *TMP2* :STREAM *TMP2*)) (TERPRI *TMP2*) T) # # EQL-OK: T (FIND :RDWR (SHOW (STREAM-OPTIONS *TMP1* :FL))) (:RDWR 32768) EQL-OK: :RDWR (APPEASE-CERRORS (WITH-OPEN-FILE (S *TMP1*) (FIND :RDONLY (SHOW (STREAM-OPTIONS S :FL))))) WARNING: OPEN: # already points to file "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-4Q9Ntb" , opening the file again for :INPUT may produce unexpected results Open the file anyway (:RDONLY 32768) EQL-OK: :RDONLY (STREAM-OPTIONS *TMP1* :FD) EQL-OK: NIL (STREAM-OPTIONS *TMP1* :FD '(:CLOEXEC)) EQL-OK: NIL (STREAM-OPTIONS *TMP1* :FD) EQUAL-OK: (:CLOEXEC) (STREAM-OPTIONS *TMP1* :FD NIL) EQL-OK: NIL (STREAM-OPTIONS *TMP1* :FD) EQL-OK: NIL (HANDLER-CASE (STREAM-LOCK *TMP1* T) (SYSTEM::SIMPLE-FILE-ERROR (ERR) (FORMAT T "~S: ~A" 'STREAM-LOCK ERR) (PUSHNEW :NO-STREAM-LOCK *FEATURES*) T)) EQL-OK: T (STREAM-LOCK *TMP1* NIL) EQL-OK: NIL (TYPEP (SHOW (PRIORITY (PROCESS-ID))) '(OR KEYWORD (INTEGER -20 20))) :NORMAL EQL-OK: T (DEFUN FLOAT= (X Y) (= Y (/ (+ X Y) 2))) EQL-OK: FLOAT= (DEFUN FLOAT~ (X Y) (< (ABS (/ (- X Y) (+ X Y) 1/2)) 1.0536712127723509d-8)) EQL-OK: FLOAT~ (FLOAT= (ERF -6) -1.0d0) EQL-OK: T (FLOAT= (ERF -5) -0.9999999999984626d0) EQL-OK: T (FLOAT= (ERF -4) -0.9999999845827421d0) EQL-OK: T (FLOAT~ (ERF -3) -0.9999779095030014d0) EQL-OK: T (FLOAT= (ERF -2) -0.9953222650189527d0) EQL-OK: T (FLOAT~ (ERF -1) -0.8427007929497149d0) EQL-OK: T (FLOAT= (ERF 0) 0.0d0) EQL-OK: T (FLOAT~ (ERF 1) 0.8427007929497149d0) EQL-OK: T (FLOAT= (ERF 2) 0.9953222650189527d0) EQL-OK: T (FLOAT~ (ERF 3) 0.9999779095030014d0) EQL-OK: T (FLOAT= (ERF 4) 0.9999999845827421d0) EQL-OK: T (FLOAT= (ERF 5) 0.9999999999984626d0) EQL-OK: T (FLOAT= (ERF 6) 1.0d0) EQL-OK: T (FLOAT= (ERFC -6) 2.0d0) EQL-OK: T (FLOAT= (ERFC -5) 1.9999999999984626d0) EQL-OK: T (FLOAT= (ERFC -4) 1.999999984582742d0) EQL-OK: T (FLOAT= (ERFC -3) 1.9999779095030015d0) EQL-OK: T (FLOAT= (ERFC -2) 1.9953222650189528d0) EQL-OK: T (FLOAT= (ERFC -1) 1.842700792949715d0) EQL-OK: T (FLOAT= (ERFC 0) 1.0d0) EQL-OK: T (FLOAT~ (ERFC 1) 0.15729920705028513d0) EQL-OK: T (FLOAT= (ERFC 2) 0.004677734981047265d0) EQL-OK: T (FLOAT= (ERFC 3) 2.209049699858544d-5) EQL-OK: T (FLOAT= (ERFC 4) 1.541725790028002d-8) EQL-OK: T (FLOAT= (ERFC 5) 1.5374597944280351d-12) EQL-OK: T (FLOAT~ (ERFC 6) 2.1519736712498916d-17) EQL-OK: T (FLOAT~ (ERFC 7) 4.183825607779414d-23) EQL-OK: T (FLOAT= (ERFC 8) 1.1224297172982928d-29) EQL-OK: T (FLOAT= (ERFC 9) 4.13703174651381d-37) EQL-OK: T (FLOAT= (ERFC 10) 2.088487583762545d-45) EQL-OK: T (FLOAT= (ERFC 11) 1.4408661379436945d-54) EQL-OK: T (FLOAT= (ERFC 12) 1.3562611692059042d-64) EQL-OK: T (FLOAT= (ERFC 13) 1.7395573154667246d-75) EQL-OK: T (FLOAT= (ERFC 14) 3.037229847750312d-87) EQL-OK: T (FLOAT~ (ERFC 15) 7.212994172451206d-100) EQL-OK: T (FLOAT= (ERFC 16) 2.3284857515715308d-113) EQL-OK: T (FLOAT= (ERFC 17) 1.0212280150942608d-127) EQL-OK: T (FLOAT~ (ERFC 18) 6.082369231816399d-143) EQL-OK: T (FLOAT= (ERFC 19) 4.917722839256475d-159) EQL-OK: T (FLOAT= (ERFC 20) 5.3958656116079005d-176) EQL-OK: T (FLOAT= (ERFC 21) 8.032453871022456d-194) EQL-OK: T (FLOAT= (ERFC 22) 1.6219058609334726d-212) EQL-OK: T (FLOAT= (ERFC 23) 4.441265948088057d-232) EQL-OK: T (FLOAT= (ERFC 24) 1.6489825831519335d-252) EQL-OK: T (FLOAT~ (ERFC 25) 8.300172571196522d-274) EQL-OK: T (FLOAT~ (ERFC 26) 5.663192408856143d-296) EQL-OK: T (FLOAT= (ERFC 30) 0.0d0) EQL-OK: T (LOOP :FOR I :FROM -10 :TO 10 :FOR E = (ERF I) :AND C = (ERFC I) :FOR S = (+ E C) :UNLESS (FLOAT= S 1) :COLLECT (LIST I E C (- 1 S))) EQL-OK: NIL (FLOAT= (J0 0) 1.0d0) EQL-OK: T (FLOAT= (J0 1.0) 0.7651976865579666d0) EQL-OK: T (FLOAT= (J1 0) 0.0d0) EQL-OK: T (FLOAT= (J1 1.0) 0.4400505857449335d0) EQL-OK: T (FLOAT= (JN 0 0) 1.0d0) EQL-OK: T (FLOAT= (JN 1 1.0) 0.4400505857449335d0) EQL-OK: T (FLOAT= (JN 2 1.0) 0.11490348493190047d0) EQL-OK: T (FLOAT= (JN 2 1) 0.11490348493190047d0) EQL-OK: T (FLOAT= (JN 2 0) 0.0d0) EQL-OK: T (FLOAT~ (Y0 1.0) 0.08825696421567696d0) EQL-OK: T (FLOAT~ (Y0 10.0) 0.055671167283599395d0) EQL-OK: T (FLOAT~ (Y1 1.0) -0.7812128213002887d0) EQL-OK: T (FLOAT~ (Y1 10.0) 0.24901542420695383d0) EQL-OK: T (FLOAT~ (YN 2 1.0) -1.6506826068162543d0) EQL-OK: T (FLOAT~ (YN 2 10.0) -0.005868082442208629d0) EQL-OK: T (MULTIPLE-VALUE-LIST (LGAMMA 2)) EQUAL-OK: (0.0d0 1) (MAPCAR (LAMBDA (N) (MULTIPLE-VALUE-BIND (LG S) (LGAMMA N) (LIST N (FLOAT (/ (! (1- N)) (EXP LG)) 0.0) S))) '(3 5 10 15 30 50 100)) EQUAL-OK: ((3 1.0 1) (5 1.0 1) (10 1.0 1) (15 1.0 1) (30 1.0 1) (50 1.0 1) (100 1.0 1)) (LOOP :FOR N :UPFROM 3 :FOR LG = (LGAMMA N) :UNLESS (= 1 (/ (LOG (! (1- N))) LG)) :RETURN N) EQL-OK: 29 (LOOP :FOR N :UPFROM 3 :FOR LG = (HANDLER-CASE (LGAMMA N) (FLOATING-POINT-OVERFLOW NIL 'FLOATING-POINT-OVERFLOW)) :FOR L! = (HANDLER-CASE (LOG (FLOAT (! (1- N)) LG)) (FLOATING-POINT-OVERFLOW NIL 'FLOATING-POINT-OVERFLOW)) :UNLESS (AND (FLOATP LG) (FLOATP L!) (= 1 (FLOAT (/ L! LG) #1=0.0))) :RETURN (LIST N (FLOAT LG #1#) L!)) EQUAL-OK: (172 711.7147 FLOATING-POINT-OVERFLOW) (LOOP :FOR N :UPFROM 3 :FOR TG = (HANDLER-CASE (TGAMMA N) (FLOATING-POINT-OVERFLOW NIL 'FLOATING-POINT-OVERFLOW)) :WHILE (AND (FLOATP TG) (= 1 (/ (! (1- N)) TG))) :FINALLY (SHOW (LIST N TG))) (7 719.9999999999999d0) EQL-OK: NIL (LOOP :FOR N :UPFROM 3 :FOR TG = (HANDLER-CASE (TGAMMA N) (FLOATING-POINT-OVERFLOW NIL 'FLOATING-POINT-OVERFLOW)) :UNLESS (AND (FLOATP TG) (= 1 (FLOAT (/ (! (1- N)) TG) 0.0))) :RETURN (LIST N TG)) EQUAL-OK: (172 FLOATING-POINT-OVERFLOW) (= (SHOW (PROCESS-ID)) (SHOW (GETPPID))) 108086 108085 EQL-OK: NIL (LET ((ID (SHOW (UID)))) (= ID (SETF (UID) ID))) 987 EQL-OK: T (LET ((ID (SHOW (GID)))) (= ID (SETF (GID) ID))) 135 EQL-OK: T (LET ((ID (SHOW (EUID)))) (= ID (SETF (EUID) ID))) 987 EQL-OK: T (LET ((ID (SHOW (EGID)))) (= ID (SETF (EGID) ID))) 135 EQL-OK: T (LET* ((PID (PROCESS-ID)) (GID (SHOW (PGID PID)))) (CHECK-OS-ERROR (= GID (SETF (PGID PID) GID)) (:EPERM 1))) 72072 EQL-OK: T (= (UID) (EUID)) EQL-OK: T (= (GID) (EGID)) EQL-OK: T (MULTIPLE-VALUE-LIST (SETREUID (UID) (EUID))) EQL-OK: NIL (MULTIPLE-VALUE-LIST (SETREGID (GID) (EGID))) EQL-OK: NIL (MULTIPLE-VALUE-LIST (SETREUID -1 -1)) EQL-OK: NIL (MULTIPLE-VALUE-LIST (SETREGID -1 -1)) EQL-OK: NIL (LISTP (SHOW (IF (FBOUNDP 'GROUPS) (GROUPS) '(NO GROUPS)) :PRETTY T)) (135 135) EQL-OK: T (IF (AND (FBOUNDP 'GROUPS) (FBOUNDP 'POSIX::%SETGROUPS)) (LET ((G (GROUPS))) (EQ G (OR (IGNORE-ERRORS (SETF (GROUPS) G)) G))) T) EQL-OK: T (LISTP (SHOW (IF (FBOUNDP 'SYSCONF) (SYSCONF) '(NO SYSCONF)) :PRETTY T)) (:AIO-LISTIO-MAX -1 :AIO-MAX -1 :AIO-PRIO-DELTA-MAX 20 :ARG-MAX -1 :ATEXIT-MAX 2147483647 :BC-BASE-MAX 99 :BC-DIM-MAX 2048 :BC-SCALE-MAX 99 :BC-STRING-MAX 1000 :CHILD-MAX 63046 :CLK-TCK 100 :COLL-WEIGHTS-MAX 255 :DELAYTIMER-MAX 2147483647 :EXPR-NEST-MAX 32 :HOST-NAME-MAX 64 :IOV-MAX 1024 :LINE-MAX 2048 :LOGIN-NAME-MAX 256 :NGROUPS-MAX 65536 :GETGR-R-SIZE-MAX 1024 :GETPW-R-SIZE-MAX 1024 :MQ-OPEN-MAX -1 :MQ-PRIO-MAX 32768 :OPEN-MAX 1024 :ADVISORY-INFO 200809 :BARRIERS 200809 :ASYNCHRONOUS-IO 200809 :CLOCK-SELECTION 200809 :CPUTIME 200809 :FSYNC 200809 :IPV6 200809 :JOB-CONTROL 1 :MAPPED-FILES 200809 :MEMLOCK 200809 :MEMLOCK-RANGE 200809 :MEMORY-PROTECTION 200809 :MESSAGE-PASSING 200809 :MONOTONIC-CLOCK 200809 :PRIORITIZED-IO 200809 :PRIORITY-SCHEDULING 200809 :RAW-SOCKETS 200809 :READER-WRITER-LOCKS 200809 :REALTIME-SIGNALS 200809 :REGEXP 1 :SAVED-IDS 1 :SEMAPHORES 200809 :SHARED-MEMORY-OBJECTS 200809 :SHELL 1 :SPAWN 200809 :SPIN-LOCKS 200809 :SPORADIC-SERVER -1 :SS-REPL-MAX -1 :SYNCHRONIZED-IO 200809 :THREAD-ATTR-STACKADDR 200809 :THREAD-ATTR-STACKSIZE 200809 :THREAD-CPUTIME 200809 :THREAD-PRIO-INHERIT 200809 :THREAD-PRIO-PROTECT 200809 :THREAD-PRIORITY-SCHEDULING 200809 :THREAD-PROCESS-SHARED 200809 :THREAD-SAFE-FUNCTIONS 200809 :THREAD-SPORADIC-SERVER -1 :THREAD-ROBUST-PRIO-INHERIT -1 :THREAD-ROBUST-PRIO-PROTECT -1 :THREADS 200809 :TIMEOUTS 200809 :TIMERS 200809 :TRACE -1 :TRACE-EVENT-FILTER -1 :TRACE-EVENT-NAME-MAX -1 :TRACE-INHERIT -1 :TRACE-LOG -1 :TRACE-NAME-MAX -1 :TRACE-SYS-MAX -1 :TRACE-USER-EVENT-MAX -1 :TYPED-MEMORY-OBJECTS -1 :VERSION 200809 :XBS5-ILP32-OFF32 -1 :XBS5-ILP32-OFFBIG -1 :XBS5-LP64-OFF64 1 :XBS5-LPBIG-OFFBIG -1 :V6-ILP32-OFF32 -1 :V6-ILP32-OFFBIG -1 :V6-LP64-OFF64 1 :V6-LPBIG-OFFBIG -1 :V7-ILP32-OFF32 -1 :V7-ILP32-OFFBIG -1 :V7-LP64-OFF64 1 :V7-LPBIG-OFFBIG -1 :2-C-BIND 200809 :2-C-DEV 200809 :2-CHAR-TERM 200809 :2-FORT-DEV -1 :2-FORT-RUN -1 :2-LOCALEDEF 200809 :2-PBS -1 :2-PBS-ACCOUNTING -1 :2-PBS-CHECKPOINT -1 :2-PBS-LOCATE -1 :2-PBS-MESSAGE -1 :2-PBS-TRACK -1 :2-SW-DEV 200809 :2-UPE -1 :2-VERSION 200809 :PAGESIZE 4096 :PHYS-PAGES 2035227 :AVPHYS-PAGES 1288407 :THREAD-DESTRUCTOR-ITERATIONS 4 :THREAD-KEYS-MAX 1024 :THREAD-STACK-MIN 16384 :THREAD-THREADS-MAX -1 :RE-DUP-MAX 32767 :RTSIG-MAX 32 :SEM-NSEMS-MAX -1 :SEM-VALUE-MAX 2147483647 :SIGQUEUE-MAX 63046 :STREAM-MAX 16 :SYMLOOP-MAX -1 :TIMER-MAX -1 :TTY-NAME-MAX 32 :TZNAME-MAX -1 :XOPEN-CRYPT -1 :XOPEN-ENH-I18N 1 :XOPEN-LEGACY 1 :XOPEN-REALTIME 1 :XOPEN-REALTIME-THREADS 1 :XOPEN-SHM 1 :XOPEN-STREAMS -1 :XOPEN-UNIX 1 :XOPEN-VERSION 700 :NPROCESSORS-CONF 4 :NPROCESSORS-ONLN 4) EQL-OK: T (LISTP (SHOW (IF (FBOUNDP 'CONFSTR) (CONFSTR) '(NO CONFSTR)) :PRETTY T)) (:PATH "/usr/bin" :POSIX-V6-ILP32-OFF32-CFLAGS "" :POSIX-V6-ILP32-OFF32-LDFLAGS "" :POSIX-V6-ILP32-OFF32-LIBS "" :POSIX-V6-ILP32-OFFBIG-CFLAGS "" :POSIX-V6-ILP32-OFFBIG-LDFLAGS "" :POSIX-V6-ILP32-OFFBIG-LIBS "" :POSIX-V6-LP64-OFF64-CFLAGS "" :POSIX-V6-LP64-OFF64-LDFLAGS "" :POSIX-V6-LP64-OFF64-LIBS "" :POSIX-V6-LPBIG-OFFBIG-CFLAGS "" :POSIX-V6-LPBIG-OFFBIG-LDFLAGS "" :POSIX-V6-LPBIG-OFFBIG-LIBS "" :POSIX-V6-WIDTH-RESTRICTED-ENVS "POSIX_V6_LP64_OFF64" :V7-ENV "POSIXLY_CORRECT=1" :POSIX-V7-ILP32-OFF32-CFLAGS "" :POSIX-V7-ILP32-OFF32-LDFLAGS "" :POSIX-V7-ILP32-OFF32-LIBS "" :POSIX-V7-ILP32-OFFBIG-CFLAGS "" :POSIX-V7-ILP32-OFFBIG-LDFLAGS "" :POSIX-V7-ILP32-OFFBIG-LIBS "" :POSIX-V7-LP64-OFF64-CFLAGS "" :POSIX-V7-LP64-OFF64-LDFLAGS "" :POSIX-V7-LP64-OFF64-LIBS "" :POSIX-V7-LPBIG-OFFBIG-CFLAGS "" :POSIX-V7-LPBIG-OFFBIG-LDFLAGS "" :POSIX-V7-LPBIG-OFFBIG-LIBS "" :POSIX-V7-WIDTH-RESTRICTED-ENVS "POSIX_V7_LP64_OFF64" :XBS5-ILP32-OFF32-CFLAGS "" :XBS5-ILP32-OFF32-LDFLAGS "" :XBS5-ILP32-OFF32-LIBS "" :XBS5-ILP32-OFF32-LINTFLAGS "" :XBS5-ILP32-OFFBIG-CFLAGS "" :XBS5-ILP32-OFFBIG-LDFLAGS "" :XBS5-ILP32-OFFBIG-LIBS "" :XBS5-ILP32-OFFBIG-LINTFLAGS "" :XBS5-LP64-OFF64-CFLAGS "" :XBS5-LP64-OFF64-LDFLAGS "" :XBS5-LP64-OFF64-LIBS "" :XBS5-LP64-OFF64-LINTFLAGS "" :XBS5-LPBIG-OFFBIG-CFLAGS "" :XBS5-LPBIG-OFFBIG-LDFLAGS "" :XBS5-LPBIG-OFFBIG-LIBS "" :XBS5-LPBIG-OFFBIG-LINTFLAGS "") EQL-OK: T (LISTP (SHOW (IF (FBOUNDP 'PATHCONF) (PATHCONF "/") '(NO PATHCONF)) :PRETTY T)) (:FILESIZEBITS 64 :LINK-MAX 65000 :MAX-CANON 255 :MAX-INPUT 255 :NAME-MAX 255 :PATH-MAX 4096 :PIPE-BUF 4096 :2-SYMLINKS 1 :ALLOC-SIZE-MIN 4096 :REC-INCR-XFER-SIZE :ERROR :REC-MAX-XFER-SIZE :ERROR :REC-MIN-XFER-SIZE 4096 :REC-XFER-ALIGN 4096 :SYMLINK-MAX :ERROR :CHOWN-RESTRICTED 1 :NO-TRUNC 1 :VDISABLE 0 :ASYNC-IO :ERROR :PRIO-IO :ERROR :SYNC-IO :ERROR :SOCK-MAXBUF :ERROR) EQL-OK: T (LISTP (SHOW (IF (FBOUNDP 'PATHCONF) (PATHCONF *TMP1*) '(NO PATHCONF)) :PRETTY T)) (:FILESIZEBITS 64 :LINK-MAX 65000 :MAX-CANON 255 :MAX-INPUT 255 :NAME-MAX 255 :PATH-MAX 4096 :PIPE-BUF 4096 :2-SYMLINKS 1 :ALLOC-SIZE-MIN 4096 :REC-INCR-XFER-SIZE :ERROR :REC-MAX-XFER-SIZE :ERROR :REC-MIN-XFER-SIZE 4096 :REC-XFER-ALIGN 4096 :SYMLINK-MAX :ERROR :CHOWN-RESTRICTED 1 :NO-TRUNC 1 :VDISABLE 0 :ASYNC-IO 1 :PRIO-IO :ERROR :SYNC-IO :ERROR :SOCK-MAXBUF :ERROR) EQL-OK: T (LISTP (SHOW (IF (FBOUNDP 'USAGE) (USAGE) '(NO USAGE)) :PRETTY T)) (:SELF # :CHILDREN # :THREAD # :LWP #) EQL-OK: T (LISTP (SHOW (IF (FBOUNDP 'RLIMIT) (RLIMIT) '(NO RLIMIT)) :PRETTY T)) (:CPU # :FSIZE # :DATA # :STACK # :CORE # :RSS # :NOFILE # :AS # :NPROC # :MEMLOCK # :LOCKS #) EQL-OK: T (UNAME-P (SHOW (UNAME) :PRETTY T)) # EQL-OK: T (LISTP (SHOW (USER-INFO) :PRETTY T)) (# # # # # # # # # # # # # # # # # # # #) EQL-OK: T (USER-INFO-P (HANDLER-CASE (SHOW (USER-INFO :DEFAULT) :PRETTY T) (:ERROR (C) (PRINC-ERROR C) (USE-VALUE (MAKE-USER-INFO "" "" 0 0 "" "" ""))))) # EQL-OK: T (GROUP-INFO-P (SHOW (HANDLER-BIND ((ERROR (LAMBDA (C) (PRINC-ERROR C) (USE-VALUE 0)))) (GROUP-INFO (USER-INFO-GID (USER-INFO (UID))))) :PRETTY T)) # EQL-OK: T (LISTP (SHOW (GROUP-INFO) :PRETTY T)) (# # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #) EQL-OK: T (= (UID) (USER-INFO-UID (USER-INFO (UID)))) EQL-OK: T (= (GID) (USER-INFO-GID (USER-INFO (UID)))) EQL-OK: T (AND (FBOUNDP 'USER-SHELLS) (NOTEVERY #'STRINGP (SHOW (USER-SHELLS)))) ("/bin/sh" "/bin/bash" "/usr/bin/sh" "/usr/bin/bash") EQL-OK: NIL (FILE-STAT-P (SHOW (FILE-STAT *TMP1*) :PRETTY T)) # :DEV 64772 :INO 954903 :MODE (:FREG :RUSR :WUSR) :NLINK 1 :UID 987 :GID 135 :RDEV NIL :SIZE 550 :BLKSIZE NIL :BLOCKS NIL :ATIME 3828282027 :MTIME 3828282027 :CTIME 3828282027> EQL-OK: T (FILE-STAT-P (SHOW (FILE-STAT (PATHNAME *TMP1*)) :PRETTY T)) # EQL-OK: T (= (FILE-STAT-INO (FILE-STAT *TMP1*)) (FILE-STAT-INO (FILE-STAT *TMP2*))) EQL-OK: NIL (OR (NULL (PROBE-DIRECTORY "/proc/")) (NULL (PROBE-FILE "/proc/kcore")) (PLUSP (FILE-STAT-SIZE (SHOW (FILE-STAT "/proc/kcore"))))) # ERROR!! NIL should be T ! (CONVERT-MODE 438) EQUAL-OK: (:RUSR :WUSR :RGRP :WGRP :ROTH :WOTH) (CONVERT-MODE '(:RWXU :RWXG :RWXO)) EQL-OK: 511 (AND (FBOUNDP 'STAT-VFS) (NOT (STAT-VFS-P (SHOW (STAT-VFS *TMP2*) :PRETTY T)))) # :BSIZE 4096 :FRSIZE 4096 :BLOCKS 10126168 :BFREE 8244387 :BAVAIL 8137260 :FILES 2570400 :FFREE 2300647 :FAVAIL 2300647 :FSID 10214634895767963578 :FLAG (:ST_NOATIME) :NAMEMAX 255 :VOL-NAME NIL :FS-TYPE NIL> EQL-OK: NIL (STRING= (SHOW (OR (GETENV "USER") (USER-INFO-LOGIN-ID (SHOW (USER-INFO :DEFAULT))))) (SHOW (FILE-OWNER *TMP1*))) "mockbuild" "mockbuild" EQL-OK: T (PROGN (CLOSE *TMP1*) (CLOSE *TMP2*) T) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP1* *TMP2* :IF-EXISTS :APPEND))) ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-4Q9Ntb" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-OmnIN9" 550)) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP2* *TMP1* :IF-EXISTS :APPEND))) ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-OmnIN9" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-4Q9Ntb" 1100)) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP1* *TMP2* :IF-EXISTS :APPEND))) ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-4Q9Ntb" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-OmnIN9" 1650)) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP2* *TMP1* :IF-EXISTS :APPEND))) ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-OmnIN9" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-4Q9Ntb" 2750)) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP1* *TMP2* :IF-EXISTS :APPEND))) ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-4Q9Ntb" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-OmnIN9" 4400)) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP2* *TMP1* :IF-EXISTS :APPEND))) ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-OmnIN9" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-4Q9Ntb" 7150)) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP1* *TMP2* :IF-EXISTS :APPEND))) ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-4Q9Ntb" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-OmnIN9" 11550)) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP2* *TMP1* :IF-EXISTS :APPEND))) ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-OmnIN9" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-4Q9Ntb" 18700)) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP1* *TMP2* :IF-EXISTS :APPEND))) ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-4Q9Ntb" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-OmnIN9" 30250)) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP2* *TMP1* :IF-EXISTS :APPEND))) ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-OmnIN9" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-4Q9Ntb" 48950)) EQL-OK: T (INTEGERP (SHOW (WITH-OPEN-FILE (S *TMP1* :DIRECTION :INPUT) (FILE-LENGTH S)))) 79200 EQL-OK: T (INTEGERP (SHOW (WITH-OPEN-FILE (S *TMP2* :DIRECTION :INPUT) (FILE-LENGTH S)))) 48950 EQL-OK: T (LET ((SRC "src-file") (DST "dst-file")) (OPEN SRC :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (OPEN DST :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (UNWIND-PROTECT (HANDLER-CASE (MULTIPLE-VALUE-LIST (COPY-FILE SRC DST :METHOD :RENAME :IF-EXISTS :ERROR)) (ERROR (E) (PRINC-ERROR E) :GOOD)) (DELETE-FILE SRC) (DELETE-FILE DST))) [SIMPLE-FILE-ERROR]: OPEN: File #1=#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dst-file" already exists EQL-OK: :GOOD (LET ((SRC "src-file") (DST "dst-file") INODE) (OPEN SRC :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (OPEN DST :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (SETQ INODE (FILE-STAT-INO (FILE-STAT SRC))) (UNWIND-PROTECT (PROGN (COPY-FILE SRC DST :METHOD :RENAME :IF-EXISTS :OVERWRITE) (= INODE (FILE-STAT-INO (FILE-STAT DST)))) (DELETE-FILE SRC) (DELETE-FILE DST))) EQL-OK: T T EQL-OK: T T EQL-OK: T T EQL-OK: T (LET ((SYSCONF (SYSCONF))) (IF (AND (GETF SYSCONF :PAGESIZE) (GETF SYSCONF :PHYS-PAGES) (GETF SYSCONF :AVPHYS-PAGES)) (LISTP (SHOW (MULTIPLE-VALUE-LIST (PHYSICAL-MEMORY)))) T)) (8336289792 5279412224) EQL-OK: T (LET ((BUF (MAKE-ARRAY 100 :FILL-POINTER T :ADJUSTABLE T :ELEMENT-TYPE 'CHARACTER)) (TIMEOUT (LET* ((UNAME (UNAME))) (COND ((AND (STRING= (UNAME-SYSNAME UNAME) "Linux") (STRING= (UNAME-MACHINE UNAME) "ppc64")) (FORMAT T "~&~S: increase timeout for openpower-linux1~%" 'FLUSH-CLISP) 100) (T 1))))) (DEFUN FLUSH-CLISP (STREAM) (WHEN (SOCKET-STATUS (CONS STREAM :INPUT) TIMEOUT) (SETF (FILL-POINTER BUF) 0) (LOOP :WITH POS-NL = 0 :FOR CH = (READ-CHAR STREAM) :UNTIL (AND (CHAR= CH #\Space) (CHAR= #\[ (CHAR BUF POS-NL)) (LET ((POS1 (POSITION #\] BUF :START POS-NL))) (AND POS1 (CHAR= #\> (CHAR BUF (1+ POS1)))))) :DO (WHEN (CHAR= CH #\Newline) (SETQ POS-NL (1+ (LENGTH BUF)))) (VECTOR-PUSH-EXTEND CH BUF)) (SHOW BUF)))) EQL-OK: FLUSH-CLISP (DEFUN PROC-SEND (PROC FMT &REST ARGS) (APPLY #'FORMAT PROC FMT ARGS) (TERPRI PROC) (FORCE-OUTPUT PROC) (FLUSH-CLISP PROC)) EQL-OK: PROC-SEND (MULTIPLE-VALUE-BIND (RUN ARGS) (CMD-ARGS) (PUSH "abort" ARGS) (PUSH "-on-error" ARGS) (SHOW (CONS RUN ARGS) :PRETTY T) (DEFPARAMETER *PROC1* (RUN-PROGRAM RUN :ARGUMENTS ARGS :INPUT :STREAM :OUTPUT :STREAM)) (DEFPARAMETER *PROC2* (RUN-PROGRAM RUN :ARGUMENTS ARGS :INPUT :STREAM :OUTPUT :STREAM)) (FLUSH-CLISP *PROC1*) (FLUSH-CLISP *PROC2*) T) ("/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/base/lisp.run" "-on-error" "abort" "-q" "-norc" "-B" "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/" "-M" "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/base/lispinit.mem") Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! 0x1bd000 - 0x1eefff Memory dump: 0x1ef000 - 0x1f2fff 0x28cb0000 - 0x28cd0fff 0x80000000 - 0x800bffff 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1557296000 - 0x15572b0fff 0x1ef000 - 0x1f2fff 0x6bb3000 - 0x6bd3fff 0x80000000 - 0x800bffff 0x155e078000 - 0x155e092fff 0x155e093000 - 0x155e093fff 0x155e094000 - 0x155e094fff 0x155e095000 - 0x155e096fff 0x155e097000 - 0x155e098fff 0x155e099000 - 0x155e09ffff 0x155e0a0000 - 0x155e0a0fff 0x155e0a1000 - 0x155e0a1fff 0x155e0a3000 - 0x155e0a4fff 0x155e0a5000 - 0x155e0e3fff 0x155e0e4000 - 0x155e0e5fff 0x155e0e6000 - 0x155e0ecfff 0x155e0ed000 - 0x155e0edfff 0x155e0ee000 - 0x155e177fff 0x155e178000 - 0x155e178fff 0x155e179000 - 0x155e179fff 0x155e17a000 - 0x155e1a9fff 0x155e1aa000 - 0x155e1aafff 0x155e1ab000 - 0x155e1abfff 0x155e1ac000 - 0x155e1acfff 0x155e1ad000 - 0x155e1b4fff 0x155e1b5000 - 0x155e1dafff 0x155e1db000 - 0x155e1defff 0x155e1df000 - 0x155e1dffff 0x155e1e0000 - 0x155e1e1fff 0x155e1e2000 - 0x155e1e2fff 0x155e1e3000 - 0x155e1e3fff 0x155e1e4000 - 0x155e1e4fff 0x155e1e5000 - 0x155e1e8fff 0x155e1e9000 - 0x155e1e9fff 0x155e1ea000 - 0x155e1eafff 0x155e1eb000 - 0x155e1ecfff 0x155e1ed000 - 0x155e1eefff 0x155e1ef000 - 0x155e1effff 0x155e1f0000 - 0x155e1f0fff 0x155e1f1000 - 0x155e35cfff 0x155e35d000 - 0x155e35ffff 0x15572b1000 - 0x15572b1fff 0x155e360000 - 0x155e360fff 0x155e361000 - 0x155e361fff 0x155e362000 - 0x155e374fff 0x155e375000 - 0x155e375fff 0x155e376000 - 0x155e376fff 0x155e377000 - 0x155e494fff 0x155e495000 - 0x155e497fff 0x155e498000 - 0x155e49afff 0x155e49b000 - 0x155e49ffff 0x155e4a0000 - 0x155e4f4fff 0x155e4f5000 - 0x155eb9ffff 0x3ffff73000 - 0x3ffff93fff 0x15572b2000 - 0x15572b2fff 0x15572b3000 - 0x15572b4fff 0x15572b5000 - 0x15572b6fff 0x15572b7000 - 0x15572bdfff 0x15572be000 - 0x15572befff 0x15572bf000 - 0x15572bffff 0x15572c1000 - 0x15572c2fff 0x15572c3000 - 0x1557301fff 0x1557302000 - 0x1557303fff 0x1557304000 - 0x155730afff 0x155730b000 - 0x155730bfff 0x155730c000 - 0x1557395fff 0x1557396000 - 0x1557396fff 0x1557397000 - 0x1557397fff 0x1557398000 - 0x15573c7fff 0x15573c8000 - 0x15573c8fff 0x15573c9000 - 0x15573c9fff 0x15573ca000 - 0x15573cafff 0x15573cb000 - 0x15573d2fff 0x15573d3000 - 0x15573f8fff 0x15573f9000 - 0x15573fcfff 0x15573fd000 - 0x15573fdfff 0x15573fe000 - 0x15573fffff 0x1557400000 - 0x1557400fff 0x1557401000 - 0x1557401fff 0x1557402000 - 0x1557402fff 0x1557403000 - 0x1557406fff 0x1557407000 - 0x1557407fff 0x1557408000 - 0x1557408fff 0x1557409000 - 0x155740afff 0x155740b000 - 0x155740cfff 0x155740d000 - 0x155740dfff 0x155740e000 - 0x155740efff 0x155740f000 - 0x155757afff 0x155757b000 - 0x155757dfff 0x155757e000 - 0x155757efff 0x155757f000 - 0x155757ffff 0x1557580000 - 0x1557592fff 0x1557593000 - 0x1557593fff 0x1557594000 - 0x1557594fff 0x1557595000 - 0x15576b2fff 0x15576b3000 - 0x15576b5fff 0x15576b6000 - 0x15576b8fff 0x15576b9000 - 0x15576bdfff 0x15576be000 - 0x1557712fff 0x1557713000 - 0x1557dbdfff 0x3ffff75000 - 0x3ffff95fff "[1]>" "[1]>" EQL-OK: T (STRINGP (PROC-SEND *PROC1* "(setq s (open ~S :direction :output :if-exists :append))" (TRUENAME *TMP1*))) " # [2]>" EQL-OK: T (STRINGP (PROC-SEND *PROC2* "(setq s (open ~S :direction :output :if-exists :append))" (TRUENAME *TMP1*))) " # [2]>" EQL-OK: T (READ-FROM-STRING (PROC-SEND *PROC1* "(stream-lock s t)")) " T [3]>" EQL-OK: T (PROC-SEND *PROC2* "(stream-lock s t)") EQL-OK: NIL (READ-FROM-STRING (PROC-SEND *PROC1* "(stream-lock s nil)")) " NIL [4]>" EQL-OK: NIL (READ-FROM-STRING (FLUSH-CLISP *PROC2*)) " T [3]>" EQL-OK: T (READ-FROM-STRING (PROC-SEND *PROC1* "(stream-lock s t :block nil)")) " NIL [5]>" EQL-OK: NIL (READ-FROM-STRING (PROC-SEND *PROC2* "(stream-lock s nil)")) " NIL [4]>" EQL-OK: NIL (READ-FROM-STRING (PROC-SEND *PROC1* "(stream-lock s t :block nil)")) " T [6]>" EQL-OK: T (READ-FROM-STRING (PROC-SEND *PROC1* "(stream-lock s nil)")) " NIL [7]>" EQL-OK: NIL (PROGN (PROC-SEND *PROC1* "(close s)(ext:quit)") (CLOSE (TWO-WAY-STREAM-INPUT-STREAM *PROC1*)) (CLOSE (TWO-WAY-STREAM-OUTPUT-STREAM *PROC1*)) (CLOSE *PROC1*) (SYMBOL-CLEANUP '*PROC1*) (PROC-SEND *PROC2* "(close s)(ext:quit)") (CLOSE (TWO-WAY-STREAM-INPUT-STREAM *PROC2*)) (CLOSE (TWO-WAY-STREAM-OUTPUT-STREAM *PROC2*)) (CLOSE *PROC2*) (SYMBOL-CLEANUP '*PROC2*)) " T [8]>" " T [5]>" EQL-OK: T (MULTIPLE-VALUE-LIST (SYNC)) EQL-OK: NIL (LET ((INODE (SHOW (FILE-STAT-INO (FILE-STAT *TMP1*))))) (MULTIPLE-VALUE-BIND (RUN ARGS) (CMD-ARGS) (PUSH "abort" ARGS) (PUSH "-on-error" ARGS) (SHOW (CONS RUN ARGS) :PRETTY T) (WITH-OPEN-STREAM (S (RUN-PROGRAM RUN :ARGUMENTS ARGS :INPUT :STREAM :OUTPUT :STREAM)) (FLUSH-CLISP S) (PROC-SEND S (FORMAT NIL "(setq s (open ~S))" (NAMESTRING *TMP1*))) (UNWIND-PROTECT (WITH-OPEN-FILE (NEW *TMP1* :DIRECTION :OUTPUT :IF-EXISTS :RENAME-AND-DELETE) (= INODE (SHOW (FILE-STAT-INO (FILE-STAT NEW))))) (PROC-SEND S "(close s)(ext:quit)"))))) 954903 ("/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/base/lisp.run" "-on-error" "abort" "-q" "-norc" "-B" "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/" "-M" "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/base/lispinit.mem") Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x287c9000 - 0x287e9fff 0x80000000 - 0x800bffff 0x158145b000 - 0x1581475fff 0x1581476000 - 0x1581476fff 0x1581477000 - 0x1581477fff 0x1581478000 - 0x1581479fff 0x158147a000 - 0x158147bfff 0x158147c000 - 0x1581482fff 0x1581483000 - 0x1581483fff 0x1581484000 - 0x1581484fff 0x1581486000 - 0x1581487fff 0x1581488000 - 0x15814c6fff 0x15814c7000 - 0x15814c8fff 0x15814c9000 - 0x15814cffff 0x15814d0000 - 0x15814d0fff 0x15814d1000 - 0x158155afff 0x158155b000 - 0x158155bfff 0x158155c000 - 0x158155cfff 0x158155d000 - 0x158158cfff 0x158158d000 - 0x158158dfff 0x158158e000 - 0x158158efff 0x158158f000 - 0x158158ffff 0x1581590000 - 0x1581597fff 0x1581598000 - 0x15815bdfff 0x15815be000 - 0x15815c1fff 0x15815c2000 - 0x15815c2fff 0x15815c3000 - 0x15815c4fff 0x15815c5000 - 0x15815c5fff 0x15815c6000 - 0x15815c6fff 0x15815c7000 - 0x15815c7fff 0x15815c8000 - 0x15815cbfff 0x15815cc000 - 0x15815ccfff 0x15815cd000 - 0x15815cdfff 0x15815ce000 - 0x15815cffff 0x15815d0000 - 0x15815d1fff 0x15815d2000 - 0x15815d2fff 0x15815d3000 - 0x15815d3fff 0x15815d4000 - 0x158173ffff 0x1581740000 - 0x1581742fff 0x1581743000 - 0x1581743fff 0x1581744000 - 0x1581744fff 0x1581745000 - 0x1581757fff 0x1581758000 - 0x1581758fff 0x1581759000 - 0x1581759fff 0x158175a000 - 0x1581877fff 0x1581878000 - 0x158187afff 0x158187b000 - 0x158187dfff 0x158187e000 - 0x1581882fff 0x1581883000 - 0x15818d7fff 0x15818d8000 - 0x1581f82fff 0x3fffbda000 - 0x3fffbfafff "[1]>" " # [2]>" 954905 " T [3]>" EQL-OK: NIL (LET ((FILE "foo.bar") (DATES '(3141592653 3279321753))) (UNWIND-PROTECT (PROGN (WITH-OPEN-FILE (S FILE :DIRECTION :OUTPUT) (WRITE S :STREAM S)) (LOOP :FOR D :IN DATES :DO (SET-FILE-STAT FILE :MTIME D) :COLLECT (= D (WITH-OPEN-FILE (S FILE) (FILE-WRITE-DATE S))))) (DELETE-FILE FILE))) EQUAL-OK: (T T) (SET-FILE-STAT "this file does not exist" :UID (1+ (UID))) [OS-FILE-ERROR]: OS-FILE-ERROR(ENOENT): No such file or directory EQL-OK: ERROR (LET ((S (FLOOR (FILE-SIZE *TMP1*) 2))) (LIST (= S (SETF (FILE-SIZE *TMP1*) S)) (= S (FILE-SIZE *TMP1*)))) EQUAL-OK: (T T) (WITH-OPEN-FILE (S *TMP2* :DIRECTION :IO) (LET ((L (FLOOR (FILE-LENGTH S) 2))) (LIST (= L (SETF (FILE-SIZE S) L)) (= L (FILE-LENGTH S))))) EQUAL-OK: (T T) (LISTP (SHOW (COPY-FILE *TMP1* *TMP2* :METHOD :HARDLINK))) (("/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-4Q9Ntb" "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-OmnIN9")) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP2* *TMP1* :METHOD :HARDLINK-OR-COPY))) (("/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-OmnIN9" "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-4Q9Ntb")) EQL-OK: T (LET ((FILE "foo.bar") S) (UNWIND-PROTECT (PROGN (SETQ S (OPEN FILE :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE)) (LIST (FILE-SIZE FILE) (SETF (FILE-SIZE S) 100) (FILE-SIZE FILE) (SETF (FILE-SIZE FILE) 1000) (FILE-SIZE S))) (DELETE-FILE FILE))) EQUAL-OK: (0 100 100 1000 1000) (DEFPARAMETER *FOO* (FOPEN "foo" "w")) EQL-OK: *FOO* (POSIX::%FPUTC 65 *FOO*) EQL-OK: 65 (FEOF *FOO*) EQL-OK: NIL (FERROR *FOO*) EQL-OK: NIL (CLEARERR *FOO*) EQL-OK: NIL (FFLUSH *FOO*) EQL-OK: NIL (FCLOSE *FOO*) EQL-OK: NIL (DEFPARAMETER *FOO* (FOPEN "foo" "r")) EQL-OK: *FOO* (POSIX::%FGETC *FOO*) EQL-OK: 65 (FEOF *FOO*) EQL-OK: NIL (POSIX::%FGETC *FOO*) EQL-OK: -1 (FEOF *FOO*) EQL-OK: T (FERROR *FOO*) EQL-OK: NIL (CLEARERR *FOO*) EQL-OK: NIL (FCLOSE *FOO*) EQL-OK: NIL (FINISH-FILE "foo") "foo": 1 byte: --> "A" EQL-OK: 1 (LOOP :WITH ALL = (ERRNO T) :FOR E :FROM 0 :TO (LOOP :FOR P :IN ALL :FOR E = (CAR P) :MAXIMIZE E) :DO (PRINT (LIST E (ERRNO E) (STRERROR))) :FINALLY (ERRNO NIL)) (0 NIL "Success") (1 :EPERM "Operation not permitted") (2 :ENOENT "No such file or directory") (3 :ESRCH "No such process") (4 :EINTR "Interrupted system call") (5 :EIO "Input/output error") (6 :ENXIO "No such device or address") (7 :E2BIG "Argument list too long") (8 :ENOEXEC "Exec format error") (9 :EBADF "Bad file descriptor") (10 :ECHILD "No child processes") (11 :EAGAIN "Resource temporarily unavailable") (12 :ENOMEM "Cannot allocate memory") (13 :EACCES "Permission denied") (14 :EFAULT "Bad address") (15 :ENOTBLK "Block device required") (16 :EBUSY "Device or resource busy") (17 :EEXIST "File exists") (18 :EXDEV "Invalid cross-device link") (19 :ENODEV "No such device") (20 :ENOTDIR "Not a directory") (21 :EISDIR "Is a directory") (22 :EINVAL "Invalid argument") (23 :ENFILE "Too many open files in system") (24 :EMFILE "Too many open files") (25 :ENOTTY "Inappropriate ioctl for device") (26 :ETXTBSY "Text file busy") (27 :EFBIG "File too large") (28 :ENOSPC "No space left on device") (29 :ESPIPE "Illegal seek") (30 :EROFS "Read-only file system") (31 :EMLINK "Too many links") (32 :EPIPE "Broken pipe") (33 :EDOM "Numerical argument out of domain") (34 :ERANGE "Numerical result out of range") (35 :EDEADLK "Resource deadlock avoided") (36 :ENAMETOOLONG "File name too long") (37 :ENOLCK "No locks available") (38 :ENOSYS "Function not implemented") (39 :ENOTEMPTY "Directory not empty") (40 :ELOOP "Too many levels of symbolic links") (41 41 "Unknown error 41") (42 :ENOMSG "No message of desired type") (43 :EIDRM "Identifier removed") (44 :ECHRNG "Channel number out of range") (45 :EL2NSYNC "Level 2 not synchronized") (46 :EL3HLT "Level 3 halted") (47 :EL3RST "Level 3 reset") (48 :ELNRNG "Link number out of range") (49 :EUNATCH "Protocol driver not attached") (50 :ENOCSI "No CSI structure available") (51 :EL2HLT "Level 2 halted") (52 :EBADE "Invalid exchange") (53 :EBADR "Invalid request descriptor") (54 :EXFULL "Exchange full") (55 :ENOANO "No anode") (56 :EBADRQC "Invalid request code") (57 :EBADSLT "Invalid slot") (58 58 "Unknown error 58") (59 :EBFONT "Bad font file format") (60 :ENOSTR "Device not a stream") (61 :ENODATA "No data available") (62 :ETIME "Timer expired") (63 :ENOSR "Out of streams resources") (64 :ENONET "Machine is not on the network") (65 :ENOPKG "Package not installed") (66 :EREMOTE "Object is remote") (67 :ENOLINK "Link has been severed") (68 :EADV "Advertise error") (69 :ESRMNT "Srmount error") (70 :ECOMM "Communication error on send") (71 :EPROTO "Protocol error") (72 :EMULTIHOP "Multihop attempted") (73 :EDOTDOT "RFS specific error") (74 :EBADMSG "Bad message") (75 :EOVERFLOW "Value too large for defined data type") (76 :ENOTUNIQ "Name not unique on network") (77 :EBADFD "File descriptor in bad state") (78 :EREMCHG "Remote address changed") (79 :ELIBACC "Can not access a needed shared library") (80 :ELIBBAD "Accessing a corrupted shared library") (81 :ELIBSCN ".lib section in a.out corrupted") (82 :ELIBMAX "Attempting to link in too many shared libraries") (83 :ELIBEXEC "Cannot exec a shared library directly") (84 :EILSEQ "Invalid or incomplete multibyte or wide character") (85 :ERESTART "Interrupted system call should be restarted") (86 :ESTRPIPE "Streams pipe error") (87 :EUSERS "Too many users") (88 :ENOTSOCK "Socket operation on non-socket") (89 :EDESTADDRREQ "Destination address required") (90 :EMSGSIZE "Message too long") (91 :EPROTOTYPE "Protocol wrong type for socket") (92 :ENOPROTOOPT "Protocol not available") (93 :EPROTONOSUPPORT "Protocol not supported") (94 :ESOCKTNOSUPPORT "Socket type not supported") (95 :ENOTSUP "Operation not supported") (96 :EPFNOSUPPORT "Protocol family not supported") (97 :EAFNOSUPPORT "Address family not supported by protocol") (98 :EADDRINUSE "Address already in use") (99 :EADDRNOTAVAIL "Cannot assign requested address") (100 :ENETDOWN "Network is down") (101 :ENETUNREACH "Network is unreachable") (102 :ENETRESET "Network dropped connection on reset") (103 :ECONNABORTED "Software caused connection abort") (104 :ECONNRESET "Connection reset by peer") (105 :ENOBUFS "No buffer space available") (106 :EISCONN "Transport endpoint is already connected") (107 :ENOTCONN "Transport endpoint is not connected") (108 :ESHUTDOWN "Cannot send after transport endpoint shutdown") (109 :ETOOMANYREFS "Too many references: cannot splice") (110 :ETIMEDOUT "Connection timed out") (111 :ECONNREFUSED "Connection refused") (112 :EHOSTDOWN "Host is down") (113 :EHOSTUNREACH "No route to host") (114 :EALREADY "Operation already in progress") (115 :EINPROGRESS "Operation now in progress") (116 :ESTALE "Stale file handle") (117 :EUCLEAN "Structure needs cleaning") (118 :ENOTNAM "Not a XENIX named type file") (119 :ENAVAIL "No XENIX semaphores available") (120 :EISNAM "Is a named type file") (121 :EREMOTEIO "Remote I/O error") (122 :EDQUOT "Disk quota exceeded") (123 :ENOMEDIUM "No medium found") (124 :EMEDIUMTYPE "Wrong medium type") (125 :ECANCELED "Operation canceled") (126 :ENOKEY "Required key not available") (127 :EKEYEXPIRED "Key has expired") (128 :EKEYREVOKED "Key has been revoked") (129 :EKEYREJECTED "Key was rejected by service") (130 :EOWNERDEAD "Owner died") (131 :ENOTRECOVERABLE "State not recoverable") (132 :ERFKILL "Operation not possible due to RF-kill") (133 :EHWPOISON "Memory page has hardware error") EQL-OK: NIL (AND (FBOUNDP 'HOSTID) (NOT (INTEGERP (SHOW (HOSTID))))) 18446744072245783674 EQL-OK: NIL (AND (FBOUNDP 'POSIX::%SETHOSTID) (ZEROP (EUID)) (NOT (= (SETF (HOSTID) (HOSTID)) (HOSTID)))) EQL-OK: NIL (AND (FBOUNDP 'DOMAINNAME) (NOT (STRINGP (SHOW (DOMAINNAME))))) "(none)" EQL-OK: NIL (AND (FBOUNDP 'POSIX::%SETDOMAINNAME) (ZEROP (EUID)) (NOT (STRING= (SETF (DOMAINNAME) (DOMAINNAME)) (DOMAINNAME)))) EQL-OK: NIL (DEFUN IPADDR-CLOSURE (ADDRESS) (LET ((HT (MAKE-HASH-TABLE :TEST 'EQUALP))) (LABELS ((HANDLE (S) (UNLESS (GETHASH S HT) (HANDLER-BIND ((ERROR (LAMBDA (C) (SETF (GETHASH S HT) C) (RETURN-FROM HANDLE NIL)))) (LET ((HE (RESOLVE-HOST-IPADDR S))) (SETF (GETHASH S HT) HE) (HANDLE (HOSTENT-NAME HE)) (MAPC #'HANDLE (HOSTENT-ALIASES HE)) (MAPC #'HANDLE (HOSTENT-ADDR-LIST HE))))))) (HANDLE ADDRESS)) HT)) EQL-OK: IPADDR-CLOSURE (HASH-TABLE-P (SHOW (IPADDR-CLOSURE "localhost") :PRETTY T)) #S(HASH-TABLE :TEST EQUALP (#1="127.0.0.1" . #) (#2="localhost6.localdomain6" . #) (#3="localhost6" . #) (#4="localhost.localdomain" . #) ("localhost" . #)) EQL-OK: T (HASH-TABLE-P (SHOW (IPADDR-CLOSURE :DEFAULT) :PRETTY T)) #S(HASH-TABLE :TEST EQUALP (#1="192.168.122.172" . #) (#2="fedora-riscv-4.gcc143.osuosl.org" . #) (:DEFAULT . #)) EQL-OK: T (DEFUN RUN-SLEEP (SEC) (EXT::LAUNCH "sleep" :ARGUMENTS (LIST (PRINC-TO-STRING SEC)) :WAIT NIL :OUTPUT NIL)) EQL-OK: RUN-SLEEP (MULTIPLE-VALUE-BIND (PID KIND STATUS) (WAIT :PID (RUN-SLEEP 1)) (LIST (INTEGERP (SHOW PID)) KIND STATUS)) 108091 EQUAL-OK: (T :EXITED 0) (WITH-SUBPROCESSES (LET ((PID-L (RUN-SLEEP 1))) (SLEEP 2) (MULTIPLE-VALUE-BIND (PID-W KIND STATUS) (WAIT) (SHOW (LIST 'PID-L PID-L 'PID-W PID-W)) (LIST (= PID-L PID-W) KIND STATUS)))) (PID-L 108092 PID-W 108092) EQUAL-OK: (T :EXITED 0) (WITH-SUBPROCESSES (LET ((PID-L-1 (RUN-SLEEP 1)) (PID-L-2 (RUN-SLEEP 1))) (SLEEP 2) (MULTIPLE-VALUE-BIND (PID-W-1 KIND1 STATUS1) (WAIT) (MULTIPLE-VALUE-BIND (PID-W-2 KIND2 STATUS2) (WAIT) (SHOW (LIST 'PID-L-1 PID-L-1 'PID-L-2 PID-L-2 'PID-W-1 PID-W-1 'PID-W-2 PID-W-2)) (LIST (OR (AND (= PID-L-1 PID-W-1) (= PID-L-2 PID-W-2)) (AND (= PID-L-1 PID-W-2) (= PID-L-2 PID-W-1))) KIND1 KIND2 STATUS1 STATUS2))))) (PID-L-1 108093 PID-L-2 108094 PID-W-1 108093 PID-W-2 108094) EQUAL-OK: (T :EXITED :EXITED 0 0) (WAIT :PID (RUN-SLEEP 1) :NOHANG T) EQL-OK: 0 (LET ((PID (RUN-SLEEP 1))) (KILL PID :SIGTERM) (MULTIPLE-VALUE-BIND (PID1 KIND STATUS RUSAGE) (WAIT :PID PID :USAGE T) (ASSERT (= PID PID1) NIL "pid: ~S<>~S" PID PID1) (LIST KIND STATUS (USAGE-P (SHOW RUSAGE))))) # EQUAL-OK: (:SIGNALED :SIGTERM T) (LET ((PID (RUN-SLEEP 1))) (KILL PID :SIGSTOP) (MULTIPLE-VALUE-BIND (PID1 KIND STATUS) (WAIT :PID PID :UNTRACED T) (ASSERT (= PID PID1) NIL "pid: ~S<>~S" PID PID1) (ASSERT (EQ KIND :STOPPED) NIL "kind=~S <> :STOPPED" KIND) (ASSERT (EQ STATUS :SIGSTOP) NIL "status=~S <> :SIGCONT" STATUS)) (KILL PID :SIGCONT) (MULTIPLE-VALUE-BIND (PID1 KIND STATUS) (WAIT :PID PID :CONTINUED T) (ASSERT (= PID PID1) NIL "pid: ~S<>~S" PID PID1) (ASSERT (EQ KIND :CONTINUED) NIL "kind=~S <> :CONTINUED" KIND) (ASSERT (NULL STATUS) NIL "status=~S is non-NIL" STATUS))) EQL-OK: NIL (EVERY #'SYSTEM::DOUBLE-FLOAT-P (SHOW (HANDLER-CASE (MULTIPLE-VALUE-LIST (LOADAVG)) (ERROR (C) (PRINC-ERROR C))))) (1.76d0 1.59d0 1.52d0) EQL-OK: T (EVERY #'SYSTEM::FIXNUMP (SHOW (HANDLER-CASE (MULTIPLE-VALUE-LIST (LOADAVG T)) (ERROR (C) (PRINC-ERROR C))))) (176 159 152) EQL-OK: T (VERSION<= "a" "b") EQL-OK: T (VERSION< "1.10" "1.8") EQL-OK: NIL (VERSION> "foo100" "foo99") EQL-OK: T (VERSION>= "d" "d") EQL-OK: T (VERSION-COMPARE "foo" "bar") EQL-OK: > (VERSION-COMPARE "z" "z") EQL-OK: = (VERSION-COMPARE "foo2" "foo10") EQL-OK: < (LET (RES0 RES1 RES2) (ENSURE-DIRECTORIES-EXIST "dir1/dir2/dir3/" :VERBOSE T) (OPEN "dir1/file1" :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (OPEN "dir1/dir2/file2" :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (OPEN "dir1/dir2/dir3/file3" :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (SETQ RES0 (FILE-TREE-WALK "dir1" (LAMBDA (F S K B L) (PRINT (LIST K F)) (CASE K ((:D :DP :DNR) (PUSH (LIST F S K B L) RES1))) (IF (= L 3) F)))) (FILE-TREE-WALK "dir1" (LAMBDA (F S K B L) (PRINT (LIST K F)) (PUSH (LIST F S K B L) RES2) (CASE K ((:D :DP :DNR) (DELETE-DIRECTORY (PROBE-PATHNAME F))) (T (DELETE-FILE F))) NIL) :DEPTH T) (LIST (PATHNAME-NAME RES0) (SET-EXCLUSIVE-OR (MAPCAR (LAMBDA (L) (PATHNAME-NAME (FIRST L))) (SHOW (NREVERSE RES1) :PRETTY T)) '("dir1" "dir2" "dir3") :TEST #'EQUAL) (SET-EXCLUSIVE-OR (MAPCAR (LAMBDA (L) (LIST (EQUALP (FIRST L) (FILE-STAT-FILE (SECOND L))) (PATHNAME-NAME (FIRST L)) (THIRD L) (FIFTH L))) (SHOW (NREVERSE RES2) :PRETTY T)) '((T "file3" :F 3) (T "dir3" :DP 2) (T "file2" :F 2) (T "dir2" :DP 1) (T "file1" :F 1) (T "dir1" :DP 0)) :TEST #'EQUAL) (PROBE-DIRECTORY "dir1/"))) Creating directory: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1/ Creating directory: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1/dir2/ Creating directory: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1/dir2/dir3/ (:D "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1") (:F "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1/file1") (:D "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1/dir2") (:D "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1/dir2/dir3") (:F "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1/dir2/dir3/file3") (:F "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1/file1") (:F "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1/dir2/dir3/file3") (:DP "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1/dir2/dir3") (:F "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1/dir2/file2") (:DP "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1/dir2") (:DP "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1") ((#1="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1" # :D 116 0) (#2="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1/dir2" # :D 121 1) (#3="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1/dir2/dir3" # :D 126 2)) ((#1="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1/file1" # :F 121 1) (#2="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1/dir2/dir3/file3" # :F 131 3) (#3="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1/dir2/dir3" # :DP 126 2) (#4="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1/dir2/file2" # :F 126 2) (#5="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1/dir2" # :DP 121 1) (#6="/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/dir1" # :DP 116 0)) EQUAL-OK: ("file3" NIL NIL NIL) (LET* ((D1 "syscalls-tests-dir-1") (D2 "syscalls-tests-dir-2") (F1 "syscalls-tests-file-1") (D (MAKE-PATHNAME :DIRECTORY (LIST :RELATIVE D1 D2))) (F (MAKE-PATHNAME :NAME F1 :DEFAULTS D)) (L (LAMBDA (P) (STRING= F1 (PATHNAME-NAME P)))) (W (MAKE-PATHNAME :DIRECTORY (LIST :RELATIVE D1 :WILD-INFERIORS) :NAME :WILD))) (ENSURE-DIRECTORIES-EXIST D :VERBOSE T) (OPEN F :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (UNWIND-PROTECT (LIST (MAPCAR L (DIRECTORY W)) (SET-FILE-STAT D :MODE 0) (HANDLER-CASE (DIRECTORY W) (ERROR (E) (PRINC-ERROR E) (TYPE-OF E))) (DIRECTORY W :IF-DOES-NOT-EXIST :KEEP) (SET-FILE-STAT D :MODE :RWXU) (MAPCAR L (DIRECTORY W)) (FILE-TREE-WALK D1 (LAMBDA (F S K B L) (CASE K ((:D :DP :DNR) (DELETE-DIRECTORY (PROBE-PATHNAME F))) (T (DELETE-FILE F))) NIL) :DEPTH T)) (WHEN (PROBE-DIRECTORY D) (SET-FILE-STAT D :MODE :RWXU)))) Creating directory: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-dir-1/ Creating directory: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-dir-1/syscalls-tests-dir-2/ [OS-FILE-ERROR]: OS-FILE-ERROR(EACCES): Permission denied EQUAL-OK: ((T) NIL OS-FILE-ERROR NIL NIL (T) NIL) (FNMATCH "foo" "bar") EQL-OK: NIL (LETF ((*MISC-ENCODING* CHARSET:UTF-8) (*APROPOS-MATCHER* #'FNMATCH-MATCHER)) (APROPOS-LIST "FNMATCH*R")) EQUAL-OK: (FNMATCH-MATCHER) (FNMATCH "foo*bar" "foobar") EQL-OK: T (FNMATCH "foo*bar" "foo*bar") EQL-OK: T (FNMATCH "foo*bar" "fooAbar") EQL-OK: T (FNMATCH "foo*bar" "foo/bar") EQL-OK: T (FNMATCH "foo*bar" "foo/bar" :PATHNAME T) EQL-OK: NIL (FNMATCH "foo*bar" "fooABAR") EQL-OK: NIL (FNMATCH "foo*bar" "fooABAR" :CASE-SENSITIVE NIL) EQL-OK: T (LET ((DIR "syscalls-tests-dir/") (DEST "qwer/adsf") COPY) (WHEN (NTH-VALUE 1 (ENSURE-DIRECTORIES-EXIST DIR :VERBOSE T)) (MAPC #'DELETE-FILE (DIRECTORY (CONCATENATE 'STRING DIR "**") :IF-DOES-NOT-EXIST :KEEP))) (SETQ COPY (COPY-FILE DEST DIR :METHOD :SYMLINK)) (LIST (STRING= DEST (CAAR COPY)) (STRING= (PATHNAME-NAME DEST) (PATHNAME-NAME (DELETE-FILE (CADAR COPY)))) (DELETE-DIRECTORY DIR) (PROBE-PATHNAME DIR))) Creating directory: /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-dir/ EQUAL-OK: (T T T NIL) (LET ((DIR "syscalls-tests-dir/") (LINK #P"syscalls-tests-symlink/")) (LIST (MAKE-DIRECTORY DIR) (STRING= DIR (CAAR (COPY-FILE DIR LINK :METHOD :SYMLINK))) (DELETE-DIRECTORY DIR) (DELETE-DIRECTORY LINK))) EQUAL-OK: (T T T T) (LET ((DIR "syscalls-tests-dir/") (DEST "foo/bar")) (MAKE-DIRECTORY DIR) (COPY-FILE DEST DIR :METHOD :SYMLINK) (HANDLER-CASE (OR (DELETE-DIRECTORY DIR) (ERROR "deleted non-empty directory")) (OS-ERROR (E) (OR (EQ (OS-ERROR-CODE E) :ENOTEMPTY) (INTEGERP (OS-ERROR-CODE E)) (ERROR "wrong error code: ~s" (OS-ERROR-CODE E))))) (MAPC #'DELETE-FILE (DIRECTORY (CONCATENATE 'STRING DIR "**") :IF-DOES-NOT-EXIST :KEEP)) (DELETE-DIRECTORY DIR)) EQL-OK: T (LET* ((L "my-symlink") (N (MAKE-STRING 64 :INITIAL-ELEMENT #\a)) (F (TRUENAME (OPEN N :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE))) (CP (COPY-FILE N L :METHOD :SYMLINK))) (LIST (LIST (STRING= N (CAAR CP)) (STRING= L (PATHNAME-NAME (CADAR CP))) (NULL (CDR CP))) (LIST (EQUAL F (TRUENAME L)) (EQUAL F (TRUENAME N))) (LIST (EQUAL F (DELETE-FILE N)) (STRING= L (PATHNAME-NAME (DELETE-FILE L)))))) EQUAL-OK: ((T T T) (T T) (T T)) (LET* ((L "my-symlink") (D (MAKE-STRING 64 :INITIAL-ELEMENT #\a)) (P (MAKE-PATHNAME :DIRECTORY (LIST :RELATIVE D) :NAME "my-file")) (DP (MAKE-PATHNAME :NAME NIL :DEFAULTS P))) (ENSURE-DIRECTORIES-EXIST DP) (OPEN P :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (COPY-FILE P (ABSOLUTE-PATHNAME L) :METHOD :SYMLINK) (LIST (EQUAL (TRUENAME L) (DELETE-FILE P)) (DELETE-DIRECTORY DP) (STRING= L (PATHNAME-NAME (DELETE-FILE L))))) EQUAL-OK: (T T T) (DEFPARAMETER *CSV1* "my-tmp-1.csv") EQL-OK: *CSV1* (DEFPARAMETER *CSV2* "my-tmp-2") EQL-OK: *CSV2* (DEFPARAMETER *CSV3* (CONCATENATE 'STRING *CSV2* ".csv")) EQL-OK: *CSV3* (DELETE-FILE *CSV1*) EQL-OK: NIL (DELETE-FILE *CSV2*) EQL-OK: NIL (DELETE-FILE *CSV3*) EQL-OK: NIL (PROGN (OPEN *CSV1* :DIRECTION :PROBE :IF-DOES-NOT-EXIST :CREATE) (COPY-FILE *CSV1* *CSV2*) (LIST (PROBE-FILE *CSV2*) (NULL (DELETE-FILE *CSV3*)))) EQUAL-OK: (NIL NIL) (PROGN (COPY-FILE (MAKE-PATHNAME :NAME *CSV1*) *CSV2*) (LIST (NULL (DELETE-FILE *CSV1*)) (PROBE-FILE *CSV3*) (NULL (DELETE-FILE *CSV2*)))) EQUAL-OK: (NIL NIL NIL) (PROGN (DELETE-FILE *TMP1*) (DELETE-FILE *TMP2*) (SETQ *FEATURES* (DELETE :NO-STREAM-LOCK *FEATURES*)) (SYMBOLS-CLEANUP '(*TMP1* *TMP2* FLUSH-CLISP PROC-SEND CHECK-TIME-DATE))) EQL-OK: NIL RUN-TEST: finished #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/syscalls/test.tst" (1 error out of 263 tests) RUN-TEST: see /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls/test.erg RUN-TEST: started # (NULL (REQUIRE "regexp")) EQL-OK: T (LISTP (SHOW (MULTIPLE-VALUE-LIST (MODULE-INFO "regexp" T)) :PRETTY T)) ("regexp" 3 (REGEXP::REGEXP-FREE REGEXP:REGEXP-EXEC REGEXP:REGEXP-COMPILE) 11 (#() REGEXP::MAKE-MATCH-BOA :START :RETURN-TYPE :NOTEOL :NOTBOL :NOSUB :NEWLINE :IGNORE-CASE :EXTENDED :END)) EQL-OK: T (LET ((RC (REGEXP:REGEXP-COMPILE "a(a)*" :EXTENDED T))) (PROG1 (LIST (MULTIPLE-VALUE-LIST (REGEXP:REGEXP-EXEC RC "a")) (REGEXP:REGEXP-EXEC RC "a" :RETURN-TYPE 'LIST) (REGEXP:REGEXP-EXEC RC "a" :RETURN-TYPE 'VECTOR) (REGEXP:REGEXP-EXEC RC "a" :RETURN-TYPE 'BOOLEAN) (MULTIPLE-VALUE-LIST (REGEXP:REGEXP-EXEC RC "z")) (REGEXP:REGEXP-EXEC RC "z" :RETURN-TYPE 'LIST) (REGEXP:REGEXP-EXEC RC "z" :RETURN-TYPE 'VECTOR) (REGEXP:REGEXP-EXEC RC "z" :RETURN-TYPE 'BOOLEAN)) (GC) (GC))) EQUALP-OK: ((#S(REGEXP:MATCH :START 0 :END 1) NIL) (#S(REGEXP:MATCH :START 0 :END 1) NIL) #(#S(REGEXP:MATCH :START 0 :END 1) NIL) T NIL NIL #() NIL) (LETF ((*APROPOS-MATCHER* #'REGEXP:REGEXP-MATCHER) (*MISC-ENCODING* CHARSET:UTF-8)) (APROPOS-LIST "regexp.*r$")) EQUAL-OK: (REGEXP:REGEXP-MATCHER) (REGEXP:REGEXP-EXEC (FOREIGN-POINTER (FFI:UNSIGNED-FOREIGN-ADDRESS 0)) "a") [SIMPLE-ERROR]: REGEXP:REGEXP-EXEC: NULL pattern # EQL-OK: ERROR (LET* ((S "abcdefghijklmnopqrstuvwxyz") (R "") P M (S3 (CONCATENATE 'STRING S S S))) (LOOP :REPEAT 3 :DO (LOOP :FOR C :ACROSS S :DO (SETQ R (CONCATENATE 'STRING "\\(" R "\\)\\(" (STRING C) "\\)")))) (SETQ P (REGEXP:REGEXP-COMPILE R)) (SETQ M (REGEXP:REGEXP-EXEC P S3)) (LIST (LENGTH M) (STRING= S3 (REGEXP:MATCH-STRING S3 (CAR M))))) EQUAL-OK: (157 T) (DEFUN RE-TEST (PATTERN STRING) (MAPCAR (LAMBDA (MATCH) (AND MATCH (REGEXP:MATCH-STRING STRING MATCH))) (MULTIPLE-VALUE-LIST (REGEXP:REGEXP-EXEC (REGEXP:REGEXP-COMPILE PATTERN :EXTENDED T) STRING)))) EQL-OK: RE-TEST (RE-TEST "a*a*" "aaaaaa") EQUAL-OK: ("aaaaaa") (RE-TEST "a*a*a*" "aaaaaa") EQUAL-OK: ("aaaaaa") (RE-TEST "a*a*a*a*" "aaaaaa") EQUAL-OK: ("aaaaaa") (RE-TEST "a*a*a*a*a*" "aaaaaa") EQUAL-OK: ("aaaaaa") (RE-TEST "a*a*a*a*a*a*" "aaaaaa") EQUAL-OK: ("aaaaaa") (RE-TEST "a*a*a*a*a*a*a*" "aaaaaa") EQUAL-OK: ("aaaaaa") (RE-TEST "" "") EQUAL-OK: ("") (RE-TEST "b{0,6}" "") EQUAL-OK: ("") (RE-TEST "ab{0,0}c" "abc") EQL-OK: NIL (RE-TEST "ab{1,1}c" "abbc") EQL-OK: NIL (RE-TEST "ab{3,7}c" "abbbbbbbbc") EQL-OK: NIL (RE-TEST "ab{3,7}c" "abbbbbbbbbc") EQL-OK: NIL (RE-TEST "ab{3,7}c" "abbbbbbbbbbc") EQL-OK: NIL (RE-TEST "ab{3,7}c" "abbbbbbbbbbbc") EQL-OK: NIL (RE-TEST "b{2,7}" "bb") EQUAL-OK: ("bb") (RE-TEST "b{1,6}" "") EQL-OK: NIL (RE-TEST "b{1,6}" "b") EQUAL-OK: ("b") (RE-TEST "b{2,7}" "b") EQL-OK: NIL (RE-TEST "ab{0,7}c" "ac") EQUAL-OK: ("ac") (RE-TEST "ab{1,7}c" "abc") EQUAL-OK: ("abc") (RE-TEST "ab{2,7}c" "abbc") EQUAL-OK: ("abbc") (RE-TEST "ab{3,7}c" "abbbc") EQUAL-OK: ("abbbc") (RE-TEST "ab{3,7}c" "abbbbc") EQUAL-OK: ("abbbbc") (RE-TEST "ab{3,7}c" "abbbbbc") EQUAL-OK: ("abbbbbc") (RE-TEST "ab{3,7}c" "abbbbbbc") EQUAL-OK: ("abbbbbbc") (RE-TEST "ab{3,7}c" "abbbbbbbc") EQUAL-OK: ("abbbbbbbc") (RE-TEST "ab{3,7}c" "abbbbbbbbc") EQL-OK: NIL (RE-TEST "ab{3,7}c" "abbc") EQL-OK: NIL (RE-TEST "ab{3,7}c" "abc") EQL-OK: NIL (RE-TEST "(a|b)*c|(a|ab)*c" "xc") EQUAL-OK: ("c" NIL NIL) (RE-TEST "(a)*" "b") EQUAL-OK: ("" NIL) (RE-TEST "(..)*(...)*" "a") EQUAL-OK: ("" NIL NIL) (RE-TEST "(..)*(...)*" "abc") EQUAL-OK: ("abc" NIL "abc") (RE-TEST "^" "") EQUAL-OK: ("") (RE-TEST "$" "") EQUAL-OK: ("") (RE-TEST "^$" "") EQUAL-OK: ("") (RE-TEST "^a$" "a") EQUAL-OK: ("a") (RE-TEST "abc" "abc") EQUAL-OK: ("abc") (RE-TEST "abc" "xbc") EQL-OK: NIL (RE-TEST "abc" "axc") EQL-OK: NIL (RE-TEST "abc" "abx") EQL-OK: NIL (RE-TEST "abc" "xabcy") EQUAL-OK: ("abc") (RE-TEST "abc" "ababc") EQUAL-OK: ("abc") (RE-TEST "ab*c" "abc") EQUAL-OK: ("abc") (RE-TEST "ab*bc" "abc") EQUAL-OK: ("abc") (RE-TEST "ab*bc" "abbc") EQUAL-OK: ("abbc") (RE-TEST "ab*bc" "abbbbc") EQUAL-OK: ("abbbbc") (RE-TEST "ab+bc" "abbc") EQUAL-OK: ("abbc") (RE-TEST "ab+bc" "abc") EQL-OK: NIL (RE-TEST "ab+bc" "abq") EQL-OK: NIL (RE-TEST "ab+bc" "abbbbc") EQUAL-OK: ("abbbbc") (RE-TEST "ab?bc" "abbc") EQUAL-OK: ("abbc") (RE-TEST "ab?bc" "abc") EQUAL-OK: ("abc") (RE-TEST "ab?bc" "abbbbc") EQL-OK: NIL (RE-TEST "ab?c" "abc") EQUAL-OK: ("abc") (RE-TEST "^abc$" "abc") EQUAL-OK: ("abc") (RE-TEST "^abc$" "abcc") EQL-OK: NIL (RE-TEST "^abc" "abcc") EQUAL-OK: ("abc") (RE-TEST "^abc$" "aabc") EQL-OK: NIL (RE-TEST "abc$" "aabc") EQUAL-OK: ("abc") (RE-TEST "^" "abc") EQUAL-OK: ("") (RE-TEST "$" "abc") EQUAL-OK: ("") (RE-TEST "a.c" "abc") EQUAL-OK: ("abc") (RE-TEST "a.c" "axc") EQUAL-OK: ("axc") (RE-TEST "a.*c" "axyzc") EQUAL-OK: ("axyzc") (RE-TEST "a.*c" "axyzd") EQL-OK: NIL (RE-TEST "a[bc]d" "abc") EQL-OK: NIL (RE-TEST "a[bc]d" "abd") EQUAL-OK: ("abd") (RE-TEST "a[b-d]e" "abd") EQL-OK: NIL (RE-TEST "a[b-d]e" "ace") EQUAL-OK: ("ace") (RE-TEST "a[b-d]" "aac") EQUAL-OK: ("ac") (RE-TEST "a[-b]" "a-") EQUAL-OK: ("a-") (RE-TEST "a[b-]" "a-") EQUAL-OK: ("a-") (RE-TEST "a[b-a]" "-") [SIMPLE-ERROR]: REGEXP:REGEXP-COMPILE ("a[b-a]"): "Invalid range end" EQL-OK: ERROR (RE-TEST "a[]b" "-") [SIMPLE-ERROR]: REGEXP:REGEXP-COMPILE ("a[]b"): "Unmatched [, [^, [:, [., or [=" EQL-OK: ERROR (RE-TEST "a[" "-") [SIMPLE-ERROR]: REGEXP:REGEXP-COMPILE ("a["): "Invalid regular expression" EQL-OK: ERROR (RE-TEST "a]" "a]") EQUAL-OK: ("a]") (RE-TEST "a[]]b" "a]b") EQUAL-OK: ("a]b") (RE-TEST "a[^bc]d" "aed") EQUAL-OK: ("aed") (RE-TEST "a[^bc]d" "abd") EQL-OK: NIL (RE-TEST "a[^-b]c" "adc") EQUAL-OK: ("adc") (RE-TEST "a[^-b]c" "a-c") EQL-OK: NIL (RE-TEST "a[^]b]c" "a]c") EQL-OK: NIL (RE-TEST "a[^]b]c" "adc") EQUAL-OK: ("adc") (RE-TEST "ab|cd" "abc") EQUAL-OK: ("ab") (RE-TEST "ab|cd" "abcd") EQUAL-OK: ("ab") (RE-TEST "()ef" "def") EQUAL-OK: ("ef" "") (RE-TEST "()*" "-") EQUAL-OK: ("" "") (RE-TEST "*a" "-") [SIMPLE-ERROR]: REGEXP:REGEXP-COMPILE ("*a"): "Invalid preceding regular expression" EQL-OK: ERROR (RE-TEST "^*" "-") [SIMPLE-ERROR]: REGEXP:REGEXP-COMPILE ("^*"): "Invalid preceding regular expression" EQL-OK: ERROR (RE-TEST "$*" "-") [SIMPLE-ERROR]: REGEXP:REGEXP-COMPILE ("$*"): "Invalid preceding regular expression" EQL-OK: ERROR (RE-TEST "(*)b" "-") [SIMPLE-ERROR]: REGEXP:REGEXP-COMPILE ("(*)b"): "Invalid preceding regular expression" EQL-OK: ERROR (RE-TEST "$b" "b") EQL-OK: NIL (RE-TEST "a\\(b" "a(b") EQUAL-OK: ("a(b") (RE-TEST "a\\(*b" "ab") EQUAL-OK: ("ab") (RE-TEST "a\\(*b" "a((b") EQUAL-OK: ("a((b") (RE-TEST "a\\\\b" "a\\b") EQUAL-OK: ("a\\b") (RE-TEST "(abc" "-") [SIMPLE-ERROR]: REGEXP:REGEXP-COMPILE ("(abc"): "Unmatched ( or \\(" EQL-OK: ERROR (RE-TEST "((a))" "abc") EQUAL-OK: ("a" "a" "a") (RE-TEST "(a)b(c)" "abc") EQUAL-OK: ("abc" "a" "c") (RE-TEST "a+b+c" "aabbabc") EQUAL-OK: ("abc") (RE-TEST "a**" "-") EQUAL-OK: ("") (RE-TEST "(a*)*" "-") EQUAL-OK: ("" "") (RE-TEST "(a*)+" "-") EQUAL-OK: ("" "") (RE-TEST "(a*|b)*" "-") EQUAL-OK: ("" "") (RE-TEST "(a+|b)*" "ab") EQUAL-OK: ("ab" "b") (RE-TEST "(a+|b)+" "ab") EQUAL-OK: ("ab" "b") (RE-TEST "(a+|b)?" "ab") EQUAL-OK: ("a" "a") (RE-TEST "[^ab]*" "cde") EQUAL-OK: ("cde") (RE-TEST "(^)*" "-") EQUAL-OK: ("" NIL) (RE-TEST ")(" "-") [SIMPLE-ERROR]: REGEXP:REGEXP-COMPILE (")("): "Unmatched ( or \\(" EQL-OK: ERROR (RE-TEST "" "abc") EQUAL-OK: ("") (RE-TEST "abc" "") EQL-OK: NIL (RE-TEST "a*" "") EQUAL-OK: ("") (RE-TEST "([abc])*d" "abbbcd") EQUAL-OK: ("abbbcd" "c") (RE-TEST "([abc])*bcd" "abcd") EQUAL-OK: ("abcd" "a") (RE-TEST "a|b|c|d|e" "e") EQUAL-OK: ("e") (RE-TEST "(a|b|c|d|e)f" "ef") EQUAL-OK: ("ef" "e") (RE-TEST "((a*|b))*" "-") EQUAL-OK: ("" "" "") (RE-TEST "abcd*efg" "abcdefg") EQUAL-OK: ("abcdefg") (RE-TEST "ab*" "xabyabbbz") EQUAL-OK: ("ab") (RE-TEST "ab*" "xayabbbz") EQUAL-OK: ("a") (RE-TEST "(ab|cd)e" "abcde") EQUAL-OK: ("cde" "cd") (RE-TEST "[abhgefdc]ij" "hij") EQUAL-OK: ("hij") (RE-TEST "^(ab|cd)e" "abcde") EQL-OK: NIL (RE-TEST "(a|b)c*d" "abcd") EQUAL-OK: ("bcd" "b") (RE-TEST "(ab|ab*)bc" "abc") EQUAL-OK: ("abc" "a") (RE-TEST "a([bc]*)c*" "abc") EQUAL-OK: ("abc" "bc") (RE-TEST "a([bc]*)(c*d)" "abcd") EQUAL-OK: ("abcd" "bc" "d") (RE-TEST "a([bc]+)(c*d)" "abcd") EQUAL-OK: ("abcd" "bc" "d") (RE-TEST "a([bc]*)(c+d)" "abcd") EQUAL-OK: ("abcd" "b" "cd") (RE-TEST "a[bcd]*dcdcde" "adcdcde") EQUAL-OK: ("adcdcde") (RE-TEST "a[bcd]+dcdcde" "adcdcde") EQL-OK: NIL (RE-TEST "(ab|a)b*c" "abc") EQUAL-OK: ("abc" "ab") (RE-TEST "((a)(b)c)(d)" "abcd") EQUAL-OK: ("abcd" "abc" "a" "b" "d") (RE-TEST "[a-zA-Z_][a-zA-Z0-9_]*" "alpha") EQUAL-OK: ("alpha") (RE-TEST "^a(bc+|b[eh])g|.h$" "abh") EQUAL-OK: ("bh" NIL) (RE-TEST "(bc+d$|ef*g.|h?i(j|k))" "effgz") EQUAL-OK: ("effgz" "effgz" NIL) (RE-TEST "(bc+d$|ef*g.|h?i(j|k))" "ij") EQUAL-OK: ("ij" "ij" "j") (RE-TEST "(bc+d$|ef*g.|h?i(j|k))" "effg") EQL-OK: NIL (RE-TEST "(bc+d$|ef*g.|h?i(j|k))" "bcdd") EQL-OK: NIL (RE-TEST "(bc+d$|ef*g.|h?i(j|k))" "reffgz") EQUAL-OK: ("effgz" "effgz" NIL) (RE-TEST "((((((((((a))))))))))" "a") EQUAL-OK: ("a" "a" "a" "a" "a" "a" "a" "a" "a" "a" "a") (RE-TEST "(((((((((a)))))))))" "a") EQUAL-OK: ("a" "a" "a" "a" "a" "a" "a" "a" "a" "a") (RE-TEST "multiple words of text" "uh-uh") EQL-OK: NIL (RE-TEST "multiple words" "multiple words, yeah") EQUAL-OK: ("multiple words") (RE-TEST "(.*)c(.*)" "abcde") EQUAL-OK: ("abcde" "ab" "de") (RE-TEST "\\((.*), (.*)\\)" "(a, b)") EQUAL-OK: ("(a, b)" "a" "b") (RE-TEST "[k]" "ab") EQL-OK: NIL (RE-TEST "abcd" "abcd") EQUAL-OK: ("abcd") (RE-TEST "a(bc)d" "abcd") EQUAL-OK: ("abcd" "bc") (RE-TEST "a[-]?c" "ac") EQUAL-OK: ("ac") (RE-TEST "a[-]?c" "ac") EQUAL-OK: ("ac") (RE-TEST "a[-]?c" "ac") EQUAL-OK: ("ac") (DEFPARAMETER *SAVED-LOCALE* (SET-LOCALE :ALL)) EQL-OK: *SAVED-LOCALE* (SET-LOCALE :ALL "C") EQUAL-OK: "C" (RE-TEST "[ -~]*" "abc") EQUAL-OK: ("abc") (RE-TEST "[ -~ -~]*" "abc") EQUAL-OK: ("abc") (RE-TEST "[ -~ -~ -~]*" "abc") EQUAL-OK: ("abc") (RE-TEST "[ -~ -~ -~ -~]*" "abc") EQUAL-OK: ("abc") (RE-TEST "[ -~ -~ -~ -~ -~]*" "abc") EQUAL-OK: ("abc") (RE-TEST "[ -~ -~ -~ -~ -~ -~]*" "abc") EQUAL-OK: ("abc") (RE-TEST "[ -~ -~ -~ -~ -~ -~ -~]*" "abc") EQUAL-OK: ("abc") (STRING= *SAVED-LOCALE* (SET-LOCALE :ALL *SAVED-LOCALE*)) EQL-OK: T (RE-TEST "(na)x+" "naxna") EQUAL-OK: ("nax" "na") (RE-TEST "(na)x+na" "naxna123") EQUAL-OK: ("naxna" "na") (RE-TEST "(na)x+" "naxxos") EQUAL-OK: ("naxx" "na") (RE-TEST "(na)x+" "naxos") EQUAL-OK: ("nax" "na") (RE-TEST "(na)x+" "naos") EQL-OK: NIL (RE-TEST "(na)x*" "naxxos") EQUAL-OK: ("naxx" "na") (RE-TEST "(na)x*" "naxos") EQUAL-OK: ("nax" "na") (RE-TEST "(na)x*" "naos") EQUAL-OK: ("na" "na") (RE-TEST "[0-9]+" "123ab") EQUAL-OK: ("123") (RE-TEST "[a-zA-Z]+" "aAbb123") EQUAL-OK: ("aAbb") (RE-TEST "[0-9a-z]+" "1234&&*") EQUAL-OK: ("1234") (RE-TEST "[0-9a-z]+" "1234a&&*") EQUAL-OK: ("1234a") (RE-TEST "[0-9a-zA-Z]+" "a1234a") EQUAL-OK: ("a1234a") (RE-TEST "[0-9a-zA-Z&]+" "aAbb123&&*") EQUAL-OK: ("aAbb123&&") (RE-TEST "[0-9]+\\.[0-9]*" "0.123cm") EQUAL-OK: ("0.123") (RE-TEST "{[^} ]*}" "{M.D. Harrison and A. Monk (Ed.)} nt foo: 2") [SIMPLE-ERROR]: REGEXP:REGEXP-COMPILE ("{[^} ]*}"): "Invalid preceding regular expression" EQL-OK: ERROR (RE-TEST "{[^} ]*}" "{M.D. Harrison and A. Monk (Ed.)} nt foo: 2") [SIMPLE-ERROR]: REGEXP:REGEXP-COMPILE ("{[^} ]*}"): "Invalid preceding regular expression" EQL-OK: ERROR (RE-TEST "{[^} ]*}" "{M.D. Harrison and {A. Monk} (Ed.)} nt foo: 2") [SIMPLE-ERROR]: REGEXP:REGEXP-COMPILE ("{[^} ]*}"): "Invalid preceding regular expression" EQL-OK: ERROR (RE-TEST "ca?r" "car") EQUAL-OK: ("car") (RE-TEST "ca?r" "cr") EQUAL-OK: ("cr") (RE-TEST "c[ad]+r" "caaar") EQUAL-OK: ("caaar") (RE-TEST "c[ad]+r" "caaar aa1") EQUAL-OK: ("caaar") (RE-TEST "c[ad]+r$" "caaar") EQUAL-OK: ("caaar") (RE-TEST ".*" "") EQUAL-OK: ("") (RE-TEST ".*" "aa") EQUAL-OK: ("aa") (RE-TEST "c[ad]?r" "cr") EQUAL-OK: ("cr") (RE-TEST "c[ad]?r" "car") EQUAL-OK: ("car") (RE-TEST "c[ad]?r" "cdr") EQUAL-OK: ("cdr") (RE-TEST "c[0-9]?r" "cr") EQUAL-OK: ("cr") (RE-TEST "c[0-9]?r" "c9rxx") EQUAL-OK: ("c9r") (RE-TEST "c[0-9]?r" "crxx") EQUAL-OK: ("cr") (RE-TEST "a|b" "a") EQUAL-OK: ("a") (RE-TEST "ab.yz" "ab yz") EQUAL-OK: ("ab yz") (RE-TEST "ab.yz" "ab yz") EQUAL-OK: ("ab yz") (RE-TEST "(abc){1,2}" "abcabc") EQUAL-OK: ("abcabc" "abc") (RE-TEST "(abc){1,2}x*(def)y*def" "abcabcxxxxdefyyyyyyydef$%%%%%") EQUAL-OK: ("abcabcxxxxdefyyyyyyydef" "abc" "def") (RE-TEST "a|bc*" "a") EQUAL-OK: ("a") (RE-TEST "[A-Z]+" "ABCY") EQUAL-OK: ("ABCY") (RE-TEST "[0-9]+\\.[0-9]*(e[+-]?[0-9]+)" "12.3e4 k") EQUAL-OK: ("12.3e4" "e4") (RE-TEST "[0-9]+\\.[0-9]*(e[+-]?[0-9]+)" "12.3e-4 k") EQUAL-OK: ("12.3e-4" "e-4") (RE-TEST "[0-9]+\\.[0-9]*(e[+-]?[0-9]+)?" "12.3 k") EQUAL-OK: ("12.3" NIL) (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Muammar Qaddafi") EQUAL-OK: ("Muammar Qaddafi" NIL "dd") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Mo'ammar Gadhafi") EQUAL-OK: ("Mo'ammar Gadhafi" NIL "dh") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Muammar Kaddafi") EQUAL-OK: ("Muammar Kaddafi" NIL "dd") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Muammar Qadhafi") EQUAL-OK: ("Muammar Qadhafi" NIL "dh") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Moammar El Kadhafi") EQUAL-OK: ("Moammar El Kadhafi" NIL "dh") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Muammar Gadafi") EQUAL-OK: ("Muammar Gadafi" NIL "d") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Mu'ammar al-Qadafi") EQUAL-OK: ("Mu'ammar al-Qadafi" NIL "d") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Moamer El Kazzafi") EQUAL-OK: ("Moamer El Kazzafi" NIL "zz") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Moamar al-Gaddafi") EQUAL-OK: ("Moamar al-Gaddafi" NIL "dd") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Mu'ammar Al Qathafi") EQUAL-OK: ("Mu'ammar Al Qathafi" NIL "th") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Muammar Al Qathafi") EQUAL-OK: ("Muammar Al Qathafi" NIL "th") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Mo'ammar el-Gadhafi") EQUAL-OK: ("Mo'ammar el-Gadhafi" NIL "dh") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Moamar El Kadhafi") EQUAL-OK: ("Moamar El Kadhafi" NIL "dh") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Muammar al-Qadhafi") EQUAL-OK: ("Muammar al-Qadhafi" NIL "dh") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Mu'ammar al-Qadhdhafi") EQUAL-OK: ("Mu'ammar al-Qadhdhafi" NIL "dh") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Mu'ammar Qadafi") EQUAL-OK: ("Mu'ammar Qadafi" NIL "d") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Moamar Gaddafi") EQUAL-OK: ("Moamar Gaddafi" NIL "dd") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Mu'ammar Qadhdhafi") EQUAL-OK: ("Mu'ammar Qadhdhafi" NIL "dh") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Muammar Khaddafi") EQUAL-OK: ("Muammar Khaddafi" NIL "dd") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Muammar al-Khaddafi") EQUAL-OK: ("Muammar al-Khaddafi" NIL "dd") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Mu'amar al-Kadafi") EQUAL-OK: ("Mu'amar al-Kadafi" NIL "d") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Muammar Ghaddafy") EQUAL-OK: ("Muammar Ghaddafy" NIL "dd") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Muammar Ghadafi") EQUAL-OK: ("Muammar Ghadafi" NIL "d") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Muammar Ghaddafi") EQUAL-OK: ("Muammar Ghaddafi" NIL "dd") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Muamar Kaddafi") EQUAL-OK: ("Muamar Kaddafi" NIL "dd") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Muammar Quathafi") EQUAL-OK: ("Muammar Quathafi" NIL "th") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Muammar Gheddafi") EQUAL-OK: ("Muammar Gheddafi" NIL "dd") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Muamar Al-Kaddafi") EQUAL-OK: ("Muamar Al-Kaddafi" NIL "dd") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Moammar Khadafy ") EQUAL-OK: ("Moammar Khadafy" NIL "d") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Moammar Qudhafi") EQUAL-OK: ("Moammar Qudhafi" NIL "dh") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Mu'ammar al-Qaddafi") EQUAL-OK: ("Mu'ammar al-Qaddafi" NIL "dd") (RE-TEST "M[ou]'?am+[ae]r .*([AEae]l[- ])?[GKQ]h?[aeu]+([dtz][dhz]?)+af[iy]" "Mulazim Awwal Mu'ammar Muhammad Abu Minyar al-Qadhafi") EQUAL-OK: ("Mu'ammar Muhammad Abu Minyar al-Qadhafi" NIL "dh") (RE-TEST "((a|b{10,11})|(b))*-\\2" "aaab-a") EQUAL-OK: ("aaab-a" "b" "a" "b") (RE-TEST "(a)*-\\1" "aaa-a") EQUAL-OK: ("aaa-a" "a") (RE-TEST "(a)*-\\1b" "aaa-b") EQL-OK: NIL (RE-TEST "([xyz])(-\\2)" "x-y") [SIMPLE-ERROR]: REGEXP:REGEXP-COMPILE ("([xyz])(-\\2)"): "Invalid back reference" EQL-OK: ERROR (RE-TEST "(([xyz])(-\\2))" "x-y") EQL-OK: NIL (RE-TEST "(([xyz])(-\\2)*)*" "x-y") EQUAL-OK: ("x" "x" "x" NIL) (RE-TEST "(([xyz])(-\\2)*)*" "x-") EQUAL-OK: ("x" "x" "x" NIL) (RE-TEST "(([xyz])(-\\2)*)*" "xy-yz-y") EQUAL-OK: ("xy-yz" "z" "z" "-y") (RE-TEST "((.*)\\1)+" "xxxxxx") [SIMPLE-ERROR]: REGEXP:REGEXP-COMPILE ("((.*)\\1)+"): "Invalid back reference" EQL-OK: ERROR (RE-TEST "(a*)\\1\\1(a*)\\2\\2\\2" "aaaaaa") EQUAL-OK: ("aaaaaa" "aa" "") (RE-TEST "(a*)(a*)\\1\\2" "aaaa") EQUAL-OK: ("aaaa" "aa" "") (RE-TEST "(a*)\\1(a*)\\2\\2" "aaaa") EQUAL-OK: ("aaaa" "aa" "") (RE-TEST "(a*)\\1\\1(a*)" "aaaaaa") EQUAL-OK: ("aaaaaa" "aa" "") (RE-TEST "(a*)\\1\\1(a*)\\2" "aaaaaa") EQUAL-OK: ("aaaaaa" "aa" "") (RE-TEST "(a*)\\1\\1(a*)\\2\\2" "aaaaaa") EQUAL-OK: ("aaaaaa" "aa" "") (RE-TEST "(.*)\\1\\1(.*)\\2\\2\\2" "aaaaaa") EQUAL-OK: ("aaaaaa" "aa" "") (RE-TEST "(.*)\\1\\1(.*)\\2\\2\\2" "aaaaaaa") EQUAL-OK: ("aaaaaaa" "a" "a") (RE-TEST "(.*)\\1\\1(.*)\\2\\2\\2" "aaaaa") EQUAL-OK: ("aaaa" "" "a") (RE-TEST "(.*)\\1\\1" "aaa") EQUAL-OK: ("aaa" "a") (RE-TEST "(.*)*\\1" "xx") EQUAL-OK: ("xx" "x") (RE-TEST "(....).*\\1" "beriberi") EQUAL-OK: ("beriberi" "beri") (RE-TEST "[[:alpha:]_][[:alnum:]_]*" "c_identifier") EQUAL-OK: ("c_identifier") (RE-TEST "[[:xdigit:]]*" "12aBcD89") EQUAL-OK: ("12aBcD89") (RE-TEST ".*" "aa") EQUAL-OK: ("aa") (RE-TEST ".+" "aa") EQUAL-OK: ("aa") (RE-TEST "(a+|b)" "aaa") EQUAL-OK: ("aaa" "aaa") (RE-TEST "(a+|b)" "b") EQUAL-OK: ("b" "b") (RE-TEST "[abc]{1,3}" "bcaa") EQUAL-OK: ("bca") (RE-TEST "a[\\-]?c" "ac") EQUAL-OK: ("ac") (RE-TEST "a[\\-]?c" "a-c") EQUAL-OK: ("a-c") (RE-TEST "a[-]?c" "ac") EQUAL-OK: ("ac") (RE-TEST "a[-]?c" "a-c") EQUAL-OK: ("a-c") (RE-TEST "a[-b]?c" "abc") EQUAL-OK: ("abc") (RE-TEST "a[b-]?c" "acc") EQUAL-OK: ("ac") (RE-TEST "a[^\\-]?c" "ac") EQUAL-OK: ("ac") (RE-TEST "a[^\\-]?c" "a-c") EQL-OK: NIL (RE-TEST "a[^-]?c" "ac") EQUAL-OK: ("ac") (RE-TEST "a[^-]?c" "azc") EQUAL-OK: ("azc") (RE-TEST "a[^-b]?c" "adc") EQUAL-OK: ("adc") (RE-TEST "a[^b-]?c" "acc") EQUAL-OK: ("acc") (RE-TEST "a*" "aaaa") EQUAL-OK: ("aaaa") (RE-TEST "a+" "aaaa") EQUAL-OK: ("aaaa") (RE-TEST "a{2,3}" "aaaa") EQUAL-OK: ("aaa") (RE-TEST "a*?" "aaaa") EQUAL-OK: ("aaaa") (RE-TEST "a+?" "aaaa") EQUAL-OK: ("aaaa") (RE-TEST "a{2,3}?" "aaaa") EQUAL-OK: ("aaa") (RE-TEST "a+?bb*?" "baaaabaaabbbaaaaa") EQUAL-OK: ("b") (RE-TEST "a+?bb+?" "baaaabaaabbbaaaaa") EQUAL-OK: ("b") (RE-TEST "[abc]{10,20}?" "xxxbcbcbabcaabcbabcbcbabcbcaabcabxxx") EQUAL-OK: ("") (RE-TEST "^(x)+$" "xx") EQUAL-OK: ("xx" "x") (RE-TEST "^(x)+\\1$" "xx") EQUAL-OK: ("xx" "x") (RE-TEST "^(x){1,2}$" "xx") EQUAL-OK: ("xx" "x") (RE-TEST "^(x){1,2}\\1$" "xx") EQUAL-OK: ("xx" "x") (RE-TEST "^(x)+[^x]+\\1$" "xxaax") EQUAL-OK: ("xxaax" "x") (RE-TEST "^x*(x)[^x]+\\1$" "xxaax") EQUAL-OK: ("xxaax" "x") (RE-TEST "(x)+\\1" "xxxx") EQUAL-OK: ("xxxx" "x") (RE-TEST "(x){1,2}" "xxxx") EQUAL-OK: ("xx" "x") (RE-TEST "(x){1,2}\\1" "xxxx") EQUAL-OK: ("xxx" "x") (RE-TEST "(x)+[^x]+\\1" "xxaax") EQUAL-OK: ("xxaax" "x") (RE-TEST "x*(x)[^x]+\\1" "xxaax") EQUAL-OK: ("xxaax" "x") (RE-TEST "(x)+?\\1" "xxxx") EQUAL-OK: ("xxxx" "x") (RE-TEST "(x){1,2}?" "xxxx") EQUAL-OK: ("xx" "x") (RE-TEST "(x){1,2}?\\1" "xxxx") EQUAL-OK: ("xxx" "x") (RE-TEST "(x)+?[^x]+\\1" "xxaax") EQUAL-OK: ("xxaax" "x") (RE-TEST "x*?(x)[^x]+\\1" "xxaax") EQUAL-OK: ("xxaax" "x") (RE-TEST "(a*)*" "aaaa") EQUAL-OK: ("aaaa" "aaaa") (RE-TEST "(a*)+" "aaaa") EQUAL-OK: ("aaaa" "aaaa") (RE-TEST "(a+)*" "aaaa") EQUAL-OK: ("aaaa" "aaaa") (REGEXP:REGEXP-SPLIT "|" "a|b" :EXTENDED T) [SIMPLE-ERROR]: REGEXP:REGEXP-SPLIT: "|" matches an empty string #S(REGEXP:MATCH :START 0 :END 0) at "a|b":0 EQL-OK: ERROR (DEFPARAMETER LATITUDE "6° 45' 22.90\" S") EQL-OK: LATITUDE (DEFPARAMETER LONGITUDE "35° 7' 23.60\" E") EQL-OK: LONGITUDE (LETF ((*MISC-ENCODING* CHARSET:UTF-8)) (SHOW *MISC-ENCODING*) (LIST (REGEXP:REGEXP-SPLIT " " LATITUDE) (REGEXP:REGEXP-SPLIT " " LONGITUDE))) # EQUAL-OK: (("6°" "45'" "22.90\"" "" "" "" "S") ("35°" "7'" "23.60\"" "" "E")) (LETF ((*MISC-ENCODING* CHARSET:ISO-8859-1)) (SHOW *MISC-ENCODING*) (LIST (REGEXP:REGEXP-SPLIT " " LATITUDE) (REGEXP:REGEXP-SPLIT " " LONGITUDE))) # EQUAL-OK: (("6°" "45'" "22.90\"" "" "" "" "S") ("35°" "7'" "23.60\"" "" "E")) (REGEXP:REGEXP-SPLIT " *, *" "a, b,c ,d,f" :START 3 :END 6) EQUAL-OK: ("b" "c") (REGEXP:REGEXP-SPLIT " *, *" "a, b,c ,d,f" :START 3 :END 3) EQUAL-OK: ("") (SYMBOLS-CLEANUP '(*SAVED-LOCALE* LATITUDE LONGITUDE)) EQL-OK: NIL RUN-TEST: finished #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/regexp/test.tst" (0 errors out of 320 tests) RUN-TEST: started # (NULL (REQUIRE "readline")) EQL-OK: T (LISTP (SHOW (MULTIPLE-VALUE-LIST (MODULE-INFO "readline" T)) :PRETTY T)) ("readline" 0 NIL 0 NIL) EQL-OK: T (LET ((VER-NUM (AND (BOUNDP 'READLINE:READLINE-VERSION) READLINE:READLINE-VERSION))) (FORMAT T "~&readline version ~S (~D=0~O=x~X)~%" (AND (BOUNDP 'READLINE:LIBRARY-VERSION) READLINE:LIBRARY-VERSION) VER-NUM VER-NUM VER-NUM)) readline version NIL (NIL=0NIL=xNIL) EQL-OK: NIL (INTEGERP (SHOW READLINE:GNU-READLINE-P)) 1 EQL-OK: T (TYPEP (SHOW READLINE:TERMINAL-NAME) '(OR NULL STRING)) NIL EQL-OK: T (INTEGERP (SHOW READLINE:PREFER-ENV-WINSIZE)) 0 EQL-OK: T (IF (BOUNDP 'READLINE:EDITING-MODE) READLINE:EDITING-MODE 1) EQL-OK: 1 (IF (BOUNDP 'READLINE:INSERT-MODE) READLINE:INSERT-MODE 1) EQL-OK: 1 (IF (BOUNDP 'READLINE:READLINE-NAME) READLINE:READLINE-NAME "CLISP") EQUAL-OK: "CLISP" (SETQ READLINE:READLINE-NAME "abazonk") EQUAL-OK: "abazonk" READLINE:READLINE-NAME EQUAL-OK: "abazonk" (READLINE:HISTORY-STIFLED-P) EQL-OK: 0 (READLINE:STIFLE-HISTORY 100) EQL-OK: NIL (READLINE:HISTORY-STIFLED-P) EQL-OK: 1 (ABS (READLINE:UNSTIFLE-HISTORY)) EQL-OK: 100 (READLINE:HISTORY-STIFLED-P) EQL-OK: 0 (READLINE:WHERE-HISTORY) EQL-OK: 0 (READLINE:HISTORY-TOTAL-BYTES) EQL-OK: 0 (DEFPARAMETER *HISTORY-FILE* "readline-history-file") EQL-OK: *HISTORY-FILE* (READLINE:WRITE-HISTORY *HISTORY-FILE*) EQL-OK: 0 (READLINE:APPEND-HISTORY 1000 *HISTORY-FILE*) EQL-OK: 0 (READLINE:READ-HISTORY *HISTORY-FILE*) EQL-OK: 0 (READLINE:READ-HISTORY-RANGE *HISTORY-FILE* 0 -1) EQL-OK: 0 (READLINE:HISTORY-TRUNCATE-FILE *HISTORY-FILE* 10) EQL-OK: 0 (PROBE-FILE (DELETE-FILE *HISTORY-FILE*)) EQL-OK: NIL (WHEN (ZEROP (LOGAND READLINE:READLINE-STATE READLINE:STATE-INITIALIZED)) (NOT (ZEROP (READLINE:INITIALIZE)))) EQL-OK: NIL (READLINE:RESIZE-TERMINAL) EQL-OK: NIL (READLINE:RESET-SCREEN-SIZE) EQL-OK: NIL (MULTIPLE-VALUE-BIND (ROWS COLS) (READLINE:GET-SCREEN-SIZE) (SHOW (LIST ROWS COLS)) (READLINE:SET-SCREEN-SIZE ROWS COLS)) (24 80) EQL-OK: NIL (EQUAL (MERGE-PATHNAMES (READLINE:TILDE-EXPAND "~/foo")) (MERGE-PATHNAMES "foo" (USER-HOMEDIR-PATHNAME))) EQL-OK: T (PROGN (DEFUN STUFF-STRING (STRING) "Stuff a string (with NewLine added) to readline buffer" (ASSERT (< (LENGTH STRING) 255)) (MAP 'NIL (LAMBDA (CHAR) (READLINE:STUFF-CHAR (CHAR-CODE CHAR))) STRING) (READLINE:STUFF-CHAR (CHAR-CODE #\Newline))) (DEFUN READLINE-FROM-STRING (STRING) "Run readline:readline, with fake input." (STUFF-STRING STRING) (READLINE:READLINE "")) (READLINE-FROM-STRING "test")) test EQUAL-OK: "test" (LET ((A 0)) (READLINE:BIND-KEY (CHAR-CODE #\t) (LAMBDA (? ??) (INCF A))) (READLINE-FROM-STRING "test") A) es EQL-OK: 2 (READLINE:UNBIND-KEY (CHAR-CODE #\t)) EQL-OK: 0 (READLINE-FROM-STRING "test") es EQUAL-OK: "es" (PROGN (READLINE:PARSE-AND-BIND "\"t\": self-insert") (READLINE-FROM-STRING "test")) test EQUAL-OK: "test" (PROGN (STUFF-STRING "(1 2") (STUFF-STRING "3 4) 5") (READ READLINE:*READLINE-INPUT-STREAM*)) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/readline/test.erg[4]> (1 2 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/readline/test.erg[5]> 3 4) 5 EQUAL-OK: (1 2 3 4) (READ READLINE:*READLINE-INPUT-STREAM*) EQL-OK: 5 RUN-TEST: finished #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/modules/readline/test.tst" (0 errors out of 37 tests) finished 4 files: 1 error out of 631 tests 1 i18n/test.tst: 0 errors out of 11 tests 2 syscalls/test.tst: 1 error out of 263 tests 3 regexp/test.tst: 0 errors out of 320 tests 4 readline/test.tst: 0 errors out of 37 tests Bye. make: *** [Makefile:2398: base-mod-check] Error 1 ===> make base-mod-check FAILED Step 1 ===> /bin/sh ../src/configure --disable-option-checking --prefix=/usr --libdir=/usr/lib64 --mandir=/usr/share/man --infodir=/usr/share/info --docdir=/usr/share/doc/clisp --with-libreadline-prefix=/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/readline --with-ffcall --with-libsigsegv-prefix=/usr --with-libffcall-prefix=/usr --cache-file=config.cache SUCCEEDED Step 2 ===> make SUCCEEDED Step 3 ===> make check FAILED Step 4 ===> make extracheck SUCCEEDED Step 5 ===> make base-mod-check FAILED error: Bad exit status from /var/tmp/rpm-tmp.zk4K9X (%build) RPM build errors: Bad exit status from /var/tmp/rpm-tmp.zk4K9X (%build) Child return code was: 1 EXCEPTION: [Error()] Traceback (most recent call last): File "/usr/lib/python3.8/site-packages/mockbuild/trace_decorator.py", line 95, in trace result = func(*args, **kw) File "/usr/lib/python3.8/site-packages/mockbuild/util.py", line 746, in do_with_status raise exception.Error("Command failed: \n # %s\n%s" % (command, output), child.returncode) mockbuild.exception.Error: Command failed: # bash --login -c /usr/bin/rpmbuild -bb --target riscv64 --nodeps /builddir/build/SPECS/clisp.spec