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-482498-63862/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-482498-63862/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.IZmKvu + 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/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/cat /builddir/build/SOURCES/clisp-pari.patch + /usr/bin/cat /builddir/build/SOURCES/clisp-register-volatile.patch + /usr/bin/patch -p0 -s --fuzz=0 --no-backup-if-mismatch + 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.dt4GBv + 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... 0x0000000037000000 checking for the shared library address range... 0x0000001568000000 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 0x22ca6000 - 0x22cc6fff 0x80000000 - 0x800bffff 0x156dcd2000 - 0x156dcecfff 0x156dced000 - 0x156dcedfff 0x156dcee000 - 0x156dceefff 0x156dcef000 - 0x156dcf0fff 0x156dcf1000 - 0x156dcf2fff 0x156dcf3000 - 0x156dcf9fff 0x156dcfa000 - 0x156dcfafff 0x156dcfb000 - 0x156dcfbfff 0x156dcfd000 - 0x156dcfefff 0x156dcff000 - 0x156dd3dfff 0x156dd3e000 - 0x156dd3ffff 0x156dd40000 - 0x156dd46fff 0x156dd47000 - 0x156dd47fff 0x156dd48000 - 0x156dd6dfff 0x156dd6e000 - 0x156dd71fff 0x156dd72000 - 0x156dd72fff 0x156dd73000 - 0x156dd74fff 0x156dd75000 - 0x156dd75fff 0x156dd76000 - 0x156dd76fff 0x156dd77000 - 0x156dd77fff 0x156dd78000 - 0x156dd7bfff 0x156dd7c000 - 0x156dd7cfff 0x156dd7d000 - 0x156dd7dfff 0x156dd7e000 - 0x156dd7ffff 0x156dd80000 - 0x156dd80fff 0x156dd81000 - 0x156dd81fff 0x156dd82000 - 0x156deedfff 0x156deee000 - 0x156def0fff 0x156def1000 - 0x156def1fff 0x156def2000 - 0x156def4fff 0x156def5000 - 0x156df07fff 0x156df08000 - 0x156df08fff 0x156df09000 - 0x156df09fff 0x156df0a000 - 0x156e027fff 0x156e028000 - 0x156e02afff 0x156e02b000 - 0x156e02dfff 0x156e02e000 - 0x156e032fff 0x156e033000 - 0x156e087fff 0x156e088000 - 0x156e732fff 0x3fffdc8000 - 0x3fffde8fff 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 0x8c3d000 - 0x8c5dfff 0x80000000 - 0x800bffff 0x1568de0000 - 0x1568dfafff 0x1568dfb000 - 0x1568dfbfff 0x1568dfc000 - 0x1568dfcfff 0x1568dfd000 - 0x1568dfefff 0x1568dff000 - 0x1568e00fff 0x1568e01000 - 0x1568e07fff 0x1568e08000 - 0x1568e08fff 0x1568e09000 - 0x1568e09fff 0x1568e0b000 - 0x1568e0cfff 0x1568e0d000 - 0x1568e4bfff 0x1568e4c000 - 0x1568e4dfff 0x1568e4e000 - 0x1568e54fff 0x1568e55000 - 0x1568e55fff 0x1568e56000 - 0x1568e7bfff 0x1568e7c000 - 0x1568e7ffff 0x1568e80000 - 0x1568e80fff 0x1568e81000 - 0x1568e82fff 0x1568e83000 - 0x1568e83fff 0x1568e84000 - 0x1568e84fff 0x1568e85000 - 0x1568e85fff 0x1568e86000 - 0x1568e89fff 0x1568e8a000 - 0x1568e8afff 0x1568e8b000 - 0x1568e8bfff 0x1568e8c000 - 0x1568e8dfff 0x1568e8e000 - 0x1568e8efff 0x1568e8f000 - 0x1568e8ffff 0x1568e90000 - 0x1568ffbfff 0x1568ffc000 - 0x1568ffefff 0x1568fff000 - 0x1568ffffff 0x1569000000 - 0x1569002fff 0x1569003000 - 0x1569015fff 0x1569016000 - 0x1569016fff 0x1569017000 - 0x1569017fff 0x1569018000 - 0x1569135fff 0x1569136000 - 0x1569138fff 0x1569139000 - 0x156913bfff 0x156913c000 - 0x1569140fff 0x1569141000 - 0x1569195fff 0x1569196000 - 0x1569840fff 0x3fff9d6000 - 0x3fff9f6fff ;; 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 0x36164000 - 0x36184fff 0x80000000 - 0x800bffff 0x15945a4000 - 0x15945befff 0x15945bf000 - 0x15945bffff 0x15945c0000 - 0x15945c0fff 0x15945c1000 - 0x15945c2fff 0x15945c3000 - 0x15945c4fff 0x15945c5000 - 0x15945cbfff 0x15945cc000 - 0x15945ccfff 0x15945cd000 - 0x15945cdfff 0x15945cf000 - 0x15945d0fff 0x15945d1000 - 0x159460ffff 0x1594610000 - 0x1594611fff 0x1594612000 - 0x1594618fff 0x1594619000 - 0x1594619fff 0x159461a000 - 0x159463ffff 0x1594640000 - 0x1594643fff 0x1594644000 - 0x1594644fff 0x1594645000 - 0x1594646fff 0x1594647000 - 0x1594647fff 0x1594648000 - 0x1594648fff 0x1594649000 - 0x1594649fff 0x159464a000 - 0x159464dfff 0x159464e000 - 0x159464efff 0x159464f000 - 0x159464ffff 0x1594650000 - 0x1594651fff 0x1594652000 - 0x1594652fff 0x1594653000 - 0x1594653fff 0x1594654000 - 0x15947bffff 0x15947c0000 - 0x15947c2fff 0x15947c3000 - 0x15947c3fff 0x15947c4000 - 0x15947c6fff 0x15947c7000 - 0x15947d9fff 0x15947da000 - 0x15947dafff 0x15947db000 - 0x15947dbfff 0x15947dc000 - 0x15948f9fff 0x15948fa000 - 0x15948fcfff 0x15948fd000 - 0x15948fffff 0x1594900000 - 0x1594904fff 0x1594905000 - 0x1594959fff 0x159495a000 - 0x1595004fff 0x3fffb7b000 - 0x3fffb9bfff 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 0x3d5ed000 - 0x3d60dfff 0x80000000 - 0x800bffff 0x1588d6e000 - 0x1588d88fff 0x1588d89000 - 0x1588d89fff 0x1588d8a000 - 0x1588d8afff 0x1588d8b000 - 0x1588d8cfff 0x1588d8d000 - 0x1588d8efff 0x1588d8f000 - 0x1588d95fff 0x1588d96000 - 0x1588d96fff 0x1588d97000 - 0x1588d97fff 0x1588d99000 - 0x1588d9afff 0x1588d9b000 - 0x1588dd9fff 0x1588dda000 - 0x1588ddbfff 0x1588ddc000 - 0x1588de2fff 0x1588de3000 - 0x1588de3fff 0x1588de4000 - 0x1588e09fff 0x1588e0a000 - 0x1588e0dfff 0x1588e0e000 - 0x1588e0efff 0x1588e0f000 - 0x1588e10fff 0x1588e11000 - 0x1588e11fff 0x1588e12000 - 0x1588e12fff 0x1588e13000 - 0x1588e13fff 0x1588e14000 - 0x1588e17fff 0x1588e18000 - 0x1588e18fff 0x1588e19000 - 0x1588e19fff 0x1588e1a000 - 0x1588e1bfff 0x1588e1c000 - 0x1588e1cfff 0x1588e1d000 - 0x1588e1dfff 0x1588e1e000 - 0x1588f89fff 0x1588f8a000 - 0x1588f8cfff 0x1588f8d000 - 0x1588f8dfff 0x1588f8e000 - 0x1588f90fff 0x1588f91000 - 0x1588fa3fff 0x1588fa4000 - 0x1588fa4fff 0x1588fa5000 - 0x1588fa5fff 0x1588fa6000 - 0x15890c3fff 0x15890c4000 - 0x15890c6fff 0x15890c7000 - 0x15890c9fff 0x15890ca000 - 0x15890cefff 0x15890cf000 - 0x1589123fff 0x1589124000 - 0x15897cefff 0x3fff926000 - 0x3fff946fff ;; 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 0x37558000 - 0x37578fff 0x80000000 - 0x800bffff 0x15833ba000 - 0x15833d4fff 0x15833d5000 - 0x15833d5fff 0x15833d6000 - 0x15833d6fff 0x15833d7000 - 0x15833d8fff 0x15833d9000 - 0x15833dafff 0x15833db000 - 0x15833e1fff 0x15833e2000 - 0x15833e2fff 0x15833e3000 - 0x15833e3fff 0x15833e5000 - 0x15833e6fff 0x15833e7000 - 0x1583425fff 0x1583426000 - 0x1583427fff 0x1583428000 - 0x158342efff 0x158342f000 - 0x158342ffff 0x1583430000 - 0x1583455fff 0x1583456000 - 0x1583459fff 0x158345a000 - 0x158345afff 0x158345b000 - 0x158345cfff 0x158345d000 - 0x158345dfff 0x158345e000 - 0x158345efff 0x158345f000 - 0x158345ffff 0x1583460000 - 0x1583463fff 0x1583464000 - 0x1583464fff 0x1583465000 - 0x1583465fff 0x1583466000 - 0x1583467fff 0x1583468000 - 0x1583468fff 0x1583469000 - 0x1583469fff 0x158346a000 - 0x15835d5fff 0x15835d6000 - 0x15835d8fff 0x15835d9000 - 0x15835d9fff 0x15835da000 - 0x15835dcfff 0x15835dd000 - 0x15835effff 0x15835f0000 - 0x15835f0fff 0x15835f1000 - 0x15835f1fff 0x15835f2000 - 0x158370ffff 0x1583710000 - 0x1583712fff 0x1583713000 - 0x1583715fff 0x1583716000 - 0x158371afff 0x158371b000 - 0x158376ffff 0x1583770000 - 0x1583e1afff 0x3fffb41000 - 0x3fffb61fff ;; 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 0x1b23b000 - 0x1b25bfff 0x80000000 - 0x800bffff 0x15857fd000 - 0x1585817fff 0x1585818000 - 0x1585818fff 0x1585819000 - 0x1585819fff 0x158581a000 - 0x158581bfff 0x158581c000 - 0x158581dfff 0x158581e000 - 0x1585824fff 0x1585825000 - 0x1585825fff 0x1585826000 - 0x1585826fff 0x1585828000 - 0x1585829fff 0x158582a000 - 0x1585868fff 0x1585869000 - 0x158586afff 0x158586b000 - 0x1585871fff 0x1585872000 - 0x1585872fff 0x1585873000 - 0x1585898fff 0x1585899000 - 0x158589cfff 0x158589d000 - 0x158589dfff 0x158589e000 - 0x158589ffff 0x15858a0000 - 0x15858a0fff 0x15858a1000 - 0x15858a1fff 0x15858a2000 - 0x15858a2fff 0x15858a3000 - 0x15858a6fff 0x15858a7000 - 0x15858a7fff 0x15858a8000 - 0x15858a8fff 0x15858a9000 - 0x15858aafff 0x15858ab000 - 0x15858abfff 0x15858ac000 - 0x15858acfff 0x15858ad000 - 0x1585a18fff 0x1585a19000 - 0x1585a1bfff 0x1585a1c000 - 0x1585a1cfff 0x1585a1d000 - 0x1585a1ffff 0x1585a20000 - 0x1585a32fff 0x1585a33000 - 0x1585a33fff 0x1585a34000 - 0x1585a34fff 0x1585a35000 - 0x1585b52fff 0x1585b53000 - 0x1585b55fff 0x1585b56000 - 0x1585b58fff 0x1585b59000 - 0x1585b5dfff 0x1585b5e000 - 0x1585bb2fff 0x1585bb3000 - 0x158625dfff 0x3ffff95000 - 0x3ffffb5fff ;; 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 0x23ce1000 - 0x23d01fff 0x80000000 - 0x800bffff 0x1557e03000 - 0x1557e1dfff 0x1557e1e000 - 0x1557e1efff 0x1557e1f000 - 0x1557e1ffff 0x1557e20000 - 0x1557e21fff 0x1557e22000 - 0x1557e23fff 0x1557e24000 - 0x1557e2afff 0x1557e2b000 - 0x1557e2bfff 0x1557e2c000 - 0x1557e2cfff 0x1557e2e000 - 0x1557e2ffff 0x1557e30000 - 0x1557e6efff 0x1557e6f000 - 0x1557e70fff 0x1557e71000 - 0x1557e77fff 0x1557e78000 - 0x1557e78fff 0x1557e79000 - 0x1557e9efff 0x1557e9f000 - 0x1557ea2fff 0x1557ea3000 - 0x1557ea3fff 0x1557ea4000 - 0x1557ea5fff 0x1557ea6000 - 0x1557ea6fff 0x1557ea7000 - 0x1557ea7fff 0x1557ea8000 - 0x1557ea8fff 0x1557ea9000 - 0x1557eacfff 0x1557ead000 - 0x1557eadfff 0x1557eae000 - 0x1557eaefff 0x1557eaf000 - 0x1557eb0fff 0x1557eb1000 - 0x1557eb1fff 0x1557eb2000 - 0x1557eb2fff 0x1557eb3000 - 0x155801efff 0x155801f000 - 0x1558021fff 0x1558022000 - 0x1558022fff 0x1558023000 - 0x1558025fff 0x1558026000 - 0x1558038fff 0x1558039000 - 0x1558039fff 0x155803a000 - 0x155803afff 0x155803b000 - 0x1558158fff 0x1558159000 - 0x155815bfff 0x155815c000 - 0x155815efff 0x155815f000 - 0x1558163fff 0x1558164000 - 0x15581b8fff 0x15581b9000 - 0x1558863fff 0x3fff7f8000 - 0x3fff818fff ;; 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 0x3aebc000 - 0x3aedcfff 0x80000000 - 0x800bffff 0x156a3a0000 - 0x156a3bafff 0x156a3bb000 - 0x156a3bbfff 0x156a3bc000 - 0x156a3bcfff 0x156a3bd000 - 0x156a3befff 0x156a3bf000 - 0x156a3c0fff 0x156a3c1000 - 0x156a3c7fff 0x156a3c8000 - 0x156a3c8fff 0x156a3c9000 - 0x156a3c9fff 0x156a3cb000 - 0x156a3ccfff 0x156a3cd000 - 0x156a40bfff 0x156a40c000 - 0x156a40dfff 0x156a40e000 - 0x156a414fff 0x156a415000 - 0x156a415fff 0x156a416000 - 0x156a43bfff 0x156a43c000 - 0x156a43ffff 0x156a440000 - 0x156a440fff 0x156a441000 - 0x156a442fff 0x156a443000 - 0x156a443fff 0x156a444000 - 0x156a444fff 0x156a445000 - 0x156a445fff 0x156a446000 - 0x156a449fff 0x156a44a000 - 0x156a44afff 0x156a44b000 - 0x156a44bfff 0x156a44c000 - 0x156a44dfff 0x156a44e000 - 0x156a44efff 0x156a44f000 - 0x156a44ffff 0x156a450000 - 0x156a5bbfff 0x156a5bc000 - 0x156a5befff 0x156a5bf000 - 0x156a5bffff 0x156a5c0000 - 0x156a5c2fff 0x156a5c3000 - 0x156a5d5fff 0x156a5d6000 - 0x156a5d6fff 0x156a5d7000 - 0x156a5d7fff 0x156a5d8000 - 0x156a6f5fff 0x156a6f6000 - 0x156a6f8fff 0x156a6f9000 - 0x156a6fbfff 0x156a6fc000 - 0x156a700fff 0x156a701000 - 0x156a755fff 0x156a756000 - 0x156ae00fff 0x3fffad1000 - 0x3fffaf1fff ;; 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 0x1b36c000 - 0x1b38cfff 0x80000000 - 0x800bffff 0x1560b65000 - 0x1560b7ffff 0x1560b80000 - 0x1560b80fff 0x1560b81000 - 0x1560b81fff 0x1560b82000 - 0x1560b83fff 0x1560b84000 - 0x1560b85fff 0x1560b86000 - 0x1560b8cfff 0x1560b8d000 - 0x1560b8dfff 0x1560b8e000 - 0x1560b8efff 0x1560b90000 - 0x1560b91fff 0x1560b92000 - 0x1560bd0fff 0x1560bd1000 - 0x1560bd2fff 0x1560bd3000 - 0x1560bd9fff 0x1560bda000 - 0x1560bdafff 0x1560bdb000 - 0x1560c00fff 0x1560c01000 - 0x1560c04fff 0x1560c05000 - 0x1560c05fff 0x1560c06000 - 0x1560c07fff 0x1560c08000 - 0x1560c08fff 0x1560c09000 - 0x1560c09fff 0x1560c0a000 - 0x1560c0afff 0x1560c0b000 - 0x1560c0efff 0x1560c0f000 - 0x1560c0ffff 0x1560c10000 - 0x1560c10fff 0x1560c11000 - 0x1560c12fff 0x1560c13000 - 0x1560c13fff 0x1560c14000 - 0x1560c14fff 0x1560c15000 - 0x1560d80fff 0x1560d81000 - 0x1560d83fff 0x1560d84000 - 0x1560d84fff 0x1560d85000 - 0x1560d87fff 0x1560d88000 - 0x1560d9afff 0x1560d9b000 - 0x1560d9bfff 0x1560d9c000 - 0x1560d9cfff 0x1560d9d000 - 0x1560ebafff 0x1560ebb000 - 0x1560ebdfff 0x1560ebe000 - 0x1560ec0fff 0x1560ec1000 - 0x1560ec5fff 0x1560ec6000 - 0x1560f1afff 0x1560f1b000 - 0x15615c5fff 0x3fff963000 - 0x3fff983fff ;; 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 0x226e000 - 0x228efff 0x80000000 - 0x800bffff 0x155ab9f000 - 0x155abb9fff 0x155abba000 - 0x155abbafff 0x155abbb000 - 0x155abbbfff 0x155abbc000 - 0x155abbdfff 0x155abbe000 - 0x155abbffff 0x155abc0000 - 0x155abc6fff 0x155abc7000 - 0x155abc7fff 0x155abc8000 - 0x155abc8fff 0x155abca000 - 0x155abcbfff 0x155abcc000 - 0x155ac0afff 0x155ac0b000 - 0x155ac0cfff 0x155ac0d000 - 0x155ac13fff 0x155ac14000 - 0x155ac14fff 0x155ac15000 - 0x155ac3afff 0x155ac3b000 - 0x155ac3efff 0x155ac3f000 - 0x155ac3ffff 0x155ac40000 - 0x155ac41fff 0x155ac42000 - 0x155ac42fff 0x155ac43000 - 0x155ac43fff 0x155ac44000 - 0x155ac44fff 0x155ac45000 - 0x155ac48fff 0x155ac49000 - 0x155ac49fff 0x155ac4a000 - 0x155ac4afff 0x155ac4b000 - 0x155ac4cfff 0x155ac4d000 - 0x155ac4dfff 0x155ac4e000 - 0x155ac4efff 0x155ac4f000 - 0x155adbafff 0x155adbb000 - 0x155adbdfff 0x155adbe000 - 0x155adbefff 0x155adbf000 - 0x155adc1fff 0x155adc2000 - 0x155add4fff 0x155add5000 - 0x155add5fff 0x155add6000 - 0x155add6fff 0x155add7000 - 0x155aef4fff 0x155aef5000 - 0x155aef7fff 0x155aef8000 - 0x155aefafff 0x155aefb000 - 0x155aefffff 0x155af00000 - 0x155af54fff 0x155af55000 - 0x155b5fffff 0x3fffd25000 - 0x3fffd45fff ;; 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 0x9992000 - 0x99b2fff 0x80000000 - 0x800bffff 0x158b50b000 - 0x158b525fff 0x158b526000 - 0x158b526fff 0x158b527000 - 0x158b527fff 0x158b528000 - 0x158b529fff 0x158b52a000 - 0x158b52bfff 0x158b52c000 - 0x158b532fff 0x158b533000 - 0x158b533fff 0x158b534000 - 0x158b534fff 0x158b536000 - 0x158b537fff 0x158b538000 - 0x158b576fff 0x158b577000 - 0x158b578fff 0x158b579000 - 0x158b57ffff 0x158b580000 - 0x158b580fff 0x158b581000 - 0x158b5a6fff 0x158b5a7000 - 0x158b5aafff 0x158b5ab000 - 0x158b5abfff 0x158b5ac000 - 0x158b5adfff 0x158b5ae000 - 0x158b5aefff 0x158b5af000 - 0x158b5affff 0x158b5b0000 - 0x158b5b0fff 0x158b5b1000 - 0x158b5b4fff 0x158b5b5000 - 0x158b5b5fff 0x158b5b6000 - 0x158b5b6fff 0x158b5b7000 - 0x158b5b8fff 0x158b5b9000 - 0x158b5b9fff 0x158b5ba000 - 0x158b5bafff 0x158b5bb000 - 0x158b726fff 0x158b727000 - 0x158b729fff 0x158b72a000 - 0x158b72afff 0x158b72b000 - 0x158b72dfff 0x158b72e000 - 0x158b740fff 0x158b741000 - 0x158b741fff 0x158b742000 - 0x158b742fff 0x158b743000 - 0x158b860fff 0x158b861000 - 0x158b863fff 0x158b864000 - 0x158b866fff 0x158b867000 - 0x158b86bfff 0x158b86c000 - 0x158b8c0fff 0x158b8c1000 - 0x158bf6bfff 0x3fffb6f000 - 0x3fffb8ffff ;; 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 0x3f524000 - 0x3f544fff 0x80000000 - 0x800bffff 0x1589f7f000 - 0x1589f99fff 0x1589f9a000 - 0x1589f9afff 0x1589f9b000 - 0x1589f9bfff 0x1589f9c000 - 0x1589f9dfff 0x1589f9e000 - 0x1589f9ffff 0x1589fa0000 - 0x1589fa6fff 0x1589fa7000 - 0x1589fa7fff 0x1589fa8000 - 0x1589fa8fff 0x1589faa000 - 0x1589fabfff 0x1589fac000 - 0x1589feafff 0x1589feb000 - 0x1589fecfff 0x1589fed000 - 0x1589ff3fff 0x1589ff4000 - 0x1589ff4fff 0x1589ff5000 - 0x158a01afff 0x158a01b000 - 0x158a01efff 0x158a01f000 - 0x158a01ffff 0x158a020000 - 0x158a021fff 0x158a022000 - 0x158a022fff 0x158a023000 - 0x158a023fff 0x158a024000 - 0x158a024fff 0x158a025000 - 0x158a028fff 0x158a029000 - 0x158a029fff 0x158a02a000 - 0x158a02afff 0x158a02b000 - 0x158a02cfff 0x158a02d000 - 0x158a02dfff 0x158a02e000 - 0x158a02efff 0x158a02f000 - 0x158a19afff 0x158a19b000 - 0x158a19dfff 0x158a19e000 - 0x158a19efff 0x158a19f000 - 0x158a1a1fff 0x158a1a2000 - 0x158a1b4fff 0x158a1b5000 - 0x158a1b5fff 0x158a1b6000 - 0x158a1b6fff 0x158a1b7000 - 0x158a2d4fff 0x158a2d5000 - 0x158a2d7fff 0x158a2d8000 - 0x158a2dafff 0x158a2db000 - 0x158a2dffff 0x158a2e0000 - 0x158a334fff 0x158a335000 - 0x158a9dffff 0x3ffff03000 - 0x3ffff23fff ;; 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 0x3968a000 - 0x396aafff 0x80000000 - 0x800bffff 0x1575c47000 - 0x1575c61fff 0x1575c62000 - 0x1575c62fff 0x1575c63000 - 0x1575c63fff 0x1575c64000 - 0x1575c65fff 0x1575c66000 - 0x1575c67fff 0x1575c68000 - 0x1575c6efff 0x1575c6f000 - 0x1575c6ffff 0x1575c70000 - 0x1575c70fff 0x1575c72000 - 0x1575c73fff 0x1575c74000 - 0x1575cb2fff 0x1575cb3000 - 0x1575cb4fff 0x1575cb5000 - 0x1575cbbfff 0x1575cbc000 - 0x1575cbcfff 0x1575cbd000 - 0x1575ce2fff 0x1575ce3000 - 0x1575ce6fff 0x1575ce7000 - 0x1575ce7fff 0x1575ce8000 - 0x1575ce9fff 0x1575cea000 - 0x1575ceafff 0x1575ceb000 - 0x1575cebfff 0x1575cec000 - 0x1575cecfff 0x1575ced000 - 0x1575cf0fff 0x1575cf1000 - 0x1575cf1fff 0x1575cf2000 - 0x1575cf2fff 0x1575cf3000 - 0x1575cf4fff 0x1575cf5000 - 0x1575cf5fff 0x1575cf6000 - 0x1575cf6fff 0x1575cf7000 - 0x1575e62fff 0x1575e63000 - 0x1575e65fff 0x1575e66000 - 0x1575e66fff 0x1575e67000 - 0x1575e69fff 0x1575e6a000 - 0x1575e7cfff 0x1575e7d000 - 0x1575e7dfff 0x1575e7e000 - 0x1575e7efff 0x1575e7f000 - 0x1575f9cfff 0x1575f9d000 - 0x1575f9ffff 0x1575fa0000 - 0x1575fa2fff 0x1575fa3000 - 0x1575fa7fff 0x1575fa8000 - 0x1575ffcfff 0x1575ffd000 - 0x15766a7fff 0x3fffca6000 - 0x3fffcc6fff ;; 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 0x2d20e000 - 0x2d22efff 0x80000000 - 0x800bffff 0x1564fce000 - 0x1564fe8fff 0x1564fe9000 - 0x1564fe9fff 0x1564fea000 - 0x1564feafff 0x1564feb000 - 0x1564fecfff 0x1564fed000 - 0x1564feefff 0x1564fef000 - 0x1564ff5fff 0x1564ff6000 - 0x1564ff6fff 0x1564ff7000 - 0x1564ff7fff 0x1564ff9000 - 0x1564ffafff 0x1564ffb000 - 0x1565039fff 0x156503a000 - 0x156503bfff 0x156503c000 - 0x1565042fff 0x1565043000 - 0x1565043fff 0x1565044000 - 0x1565069fff 0x156506a000 - 0x156506dfff 0x156506e000 - 0x156506efff 0x156506f000 - 0x1565070fff 0x1565071000 - 0x1565071fff 0x1565072000 - 0x1565072fff 0x1565073000 - 0x1565073fff 0x1565074000 - 0x1565077fff 0x1565078000 - 0x1565078fff 0x1565079000 - 0x1565079fff 0x156507a000 - 0x156507bfff 0x156507c000 - 0x156507cfff 0x156507d000 - 0x156507dfff 0x156507e000 - 0x15651e9fff 0x15651ea000 - 0x15651ecfff 0x15651ed000 - 0x15651edfff 0x15651ee000 - 0x15651f0fff 0x15651f1000 - 0x1565203fff 0x1565204000 - 0x1565204fff 0x1565205000 - 0x1565205fff 0x1565206000 - 0x1565323fff 0x1565324000 - 0x1565326fff 0x1565327000 - 0x1565329fff 0x156532a000 - 0x156532efff 0x156532f000 - 0x1565383fff 0x1565384000 - 0x1565a2efff 0x3fffb14000 - 0x3fffb34fff ;; 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 0x99d0000 - 0x99f0fff 0x80000000 - 0x800bffff 0x1594f05000 - 0x1594f1ffff 0x1594f20000 - 0x1594f20fff 0x1594f21000 - 0x1594f21fff 0x1594f22000 - 0x1594f23fff 0x1594f24000 - 0x1594f25fff 0x1594f26000 - 0x1594f2cfff 0x1594f2d000 - 0x1594f2dfff 0x1594f2e000 - 0x1594f2efff 0x1594f30000 - 0x1594f31fff 0x1594f32000 - 0x1594f70fff 0x1594f71000 - 0x1594f72fff 0x1594f73000 - 0x1594f79fff 0x1594f7a000 - 0x1594f7afff 0x1594f7b000 - 0x1594fa0fff 0x1594fa1000 - 0x1594fa4fff 0x1594fa5000 - 0x1594fa5fff 0x1594fa6000 - 0x1594fa7fff 0x1594fa8000 - 0x1594fa8fff 0x1594fa9000 - 0x1594fa9fff 0x1594faa000 - 0x1594faafff 0x1594fab000 - 0x1594faefff 0x1594faf000 - 0x1594faffff 0x1594fb0000 - 0x1594fb0fff 0x1594fb1000 - 0x1594fb2fff 0x1594fb3000 - 0x1594fb3fff 0x1594fb4000 - 0x1594fb4fff 0x1594fb5000 - 0x1595120fff 0x1595121000 - 0x1595123fff 0x1595124000 - 0x1595124fff 0x1595125000 - 0x1595127fff 0x1595128000 - 0x159513afff 0x159513b000 - 0x159513bfff 0x159513c000 - 0x159513cfff 0x159513d000 - 0x159525afff 0x159525b000 - 0x159525dfff 0x159525e000 - 0x1595260fff 0x1595261000 - 0x1595265fff 0x1595266000 - 0x15952bafff 0x15952bb000 - 0x1595965fff 0x3fffd8d000 - 0x3fffdadfff ;; 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 0x32811000 - 0x32831fff 0x80000000 - 0x800bffff 0x157c8a4000 - 0x157c8befff 0x157c8bf000 - 0x157c8bffff 0x157c8c0000 - 0x157c8c0fff 0x157c8c1000 - 0x157c8c2fff 0x157c8c3000 - 0x157c8c4fff 0x157c8c5000 - 0x157c8cbfff 0x157c8cc000 - 0x157c8ccfff 0x157c8cd000 - 0x157c8cdfff 0x157c8cf000 - 0x157c8d0fff 0x157c8d1000 - 0x157c90ffff 0x157c910000 - 0x157c911fff 0x157c912000 - 0x157c918fff 0x157c919000 - 0x157c919fff 0x157c91a000 - 0x157c93ffff 0x157c940000 - 0x157c943fff 0x157c944000 - 0x157c944fff 0x157c945000 - 0x157c946fff 0x157c947000 - 0x157c947fff 0x157c948000 - 0x157c948fff 0x157c949000 - 0x157c949fff 0x157c94a000 - 0x157c94dfff 0x157c94e000 - 0x157c94efff 0x157c94f000 - 0x157c94ffff 0x157c950000 - 0x157c951fff 0x157c952000 - 0x157c952fff 0x157c953000 - 0x157c953fff 0x157c954000 - 0x157cabffff 0x157cac0000 - 0x157cac2fff 0x157cac3000 - 0x157cac3fff 0x157cac4000 - 0x157cac6fff 0x157cac7000 - 0x157cad9fff 0x157cada000 - 0x157cadafff 0x157cadb000 - 0x157cadbfff 0x157cadc000 - 0x157cbf9fff 0x157cbfa000 - 0x157cbfcfff 0x157cbfd000 - 0x157cbfffff 0x157cc00000 - 0x157cc04fff 0x157cc05000 - 0x157cc59fff 0x157cc5a000 - 0x157d304fff 0x3fff9ca000 - 0x3fff9eafff ;; 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 0x2fe19000 - 0x2fe39fff 0x80000000 - 0x800bffff 0x1585d6a000 - 0x1585d84fff 0x1585d85000 - 0x1585d85fff 0x1585d86000 - 0x1585d86fff 0x1585d87000 - 0x1585d88fff 0x1585d89000 - 0x1585d8afff 0x1585d8b000 - 0x1585d91fff 0x1585d92000 - 0x1585d92fff 0x1585d93000 - 0x1585d93fff 0x1585d95000 - 0x1585d96fff 0x1585d97000 - 0x1585dd5fff 0x1585dd6000 - 0x1585dd7fff 0x1585dd8000 - 0x1585ddefff 0x1585ddf000 - 0x1585ddffff 0x1585de0000 - 0x1585e05fff 0x1585e06000 - 0x1585e09fff 0x1585e0a000 - 0x1585e0afff 0x1585e0b000 - 0x1585e0cfff 0x1585e0d000 - 0x1585e0dfff 0x1585e0e000 - 0x1585e0efff 0x1585e0f000 - 0x1585e0ffff 0x1585e10000 - 0x1585e13fff 0x1585e14000 - 0x1585e14fff 0x1585e15000 - 0x1585e15fff 0x1585e16000 - 0x1585e17fff 0x1585e18000 - 0x1585e18fff 0x1585e19000 - 0x1585e19fff 0x1585e1a000 - 0x1585f85fff 0x1585f86000 - 0x1585f88fff 0x1585f89000 - 0x1585f89fff 0x1585f8a000 - 0x1585f8cfff 0x1585f8d000 - 0x1585f9ffff 0x1585fa0000 - 0x1585fa0fff 0x1585fa1000 - 0x1585fa1fff 0x1585fa2000 - 0x15860bffff 0x15860c0000 - 0x15860c2fff 0x15860c3000 - 0x15860c5fff 0x15860c6000 - 0x15860cafff 0x15860cb000 - 0x158611ffff 0x1586120000 - 0x15867cafff 0x3fff898000 - 0x3fff8b8fff ;; 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 0x7a68000 - 0x7a88fff 0x80000000 - 0x800bffff 0x15911dd000 - 0x15911f7fff 0x15911f8000 - 0x15911f8fff 0x15911f9000 - 0x15911f9fff 0x15911fa000 - 0x15911fbfff 0x15911fc000 - 0x15911fdfff 0x15911fe000 - 0x1591204fff 0x1591205000 - 0x1591205fff 0x1591206000 - 0x1591206fff 0x1591208000 - 0x1591209fff 0x159120a000 - 0x1591248fff 0x1591249000 - 0x159124afff 0x159124b000 - 0x1591251fff 0x1591252000 - 0x1591252fff 0x1591253000 - 0x1591278fff 0x1591279000 - 0x159127cfff 0x159127d000 - 0x159127dfff 0x159127e000 - 0x159127ffff 0x1591280000 - 0x1591280fff 0x1591281000 - 0x1591281fff 0x1591282000 - 0x1591282fff 0x1591283000 - 0x1591286fff 0x1591287000 - 0x1591287fff 0x1591288000 - 0x1591288fff 0x1591289000 - 0x159128afff 0x159128b000 - 0x159128bfff 0x159128c000 - 0x159128cfff 0x159128d000 - 0x15913f8fff 0x15913f9000 - 0x15913fbfff 0x15913fc000 - 0x15913fcfff 0x15913fd000 - 0x15913fffff 0x1591400000 - 0x1591412fff 0x1591413000 - 0x1591413fff 0x1591414000 - 0x1591414fff 0x1591415000 - 0x1591532fff 0x1591533000 - 0x1591535fff 0x1591536000 - 0x1591538fff 0x1591539000 - 0x159153dfff 0x159153e000 - 0x1591592fff 0x1591593000 - 0x1591c3dfff 0x3fffc7b000 - 0x3fffc9bfff ;; 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 0x26b98000 - 0x26bb8fff 0x80000000 - 0x800bffff 0x1571ec7000 - 0x1571ee1fff 0x1571ee2000 - 0x1571ee2fff 0x1571ee3000 - 0x1571ee3fff 0x1571ee4000 - 0x1571ee5fff 0x1571ee6000 - 0x1571ee7fff 0x1571ee8000 - 0x1571eeefff 0x1571eef000 - 0x1571eeffff 0x1571ef0000 - 0x1571ef0fff 0x1571ef2000 - 0x1571ef3fff 0x1571ef4000 - 0x1571f32fff 0x1571f33000 - 0x1571f34fff 0x1571f35000 - 0x1571f3bfff 0x1571f3c000 - 0x1571f3cfff 0x1571f3d000 - 0x1571f62fff 0x1571f63000 - 0x1571f66fff 0x1571f67000 - 0x1571f67fff 0x1571f68000 - 0x1571f69fff 0x1571f6a000 - 0x1571f6afff 0x1571f6b000 - 0x1571f6bfff 0x1571f6c000 - 0x1571f6cfff 0x1571f6d000 - 0x1571f70fff 0x1571f71000 - 0x1571f71fff 0x1571f72000 - 0x1571f72fff 0x1571f73000 - 0x1571f74fff 0x1571f75000 - 0x1571f75fff 0x1571f76000 - 0x1571f76fff 0x1571f77000 - 0x15720e2fff 0x15720e3000 - 0x15720e5fff 0x15720e6000 - 0x15720e6fff 0x15720e7000 - 0x15720e9fff 0x15720ea000 - 0x15720fcfff 0x15720fd000 - 0x15720fdfff 0x15720fe000 - 0x15720fefff 0x15720ff000 - 0x157221cfff 0x157221d000 - 0x157221ffff 0x1572220000 - 0x1572222fff 0x1572223000 - 0x1572227fff 0x1572228000 - 0x157227cfff 0x157227d000 - 0x1572927fff 0x3fffa8e000 - 0x3fffaaefff ;; 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 0x2115000 - 0x2135fff 0x80000000 - 0x800bffff 0x156b880000 - 0x156b89afff 0x156b89b000 - 0x156b89bfff 0x156b89c000 - 0x156b89cfff 0x156b89d000 - 0x156b89efff 0x156b89f000 - 0x156b8a0fff 0x156b8a1000 - 0x156b8a7fff 0x156b8a8000 - 0x156b8a8fff 0x156b8a9000 - 0x156b8a9fff 0x156b8ab000 - 0x156b8acfff 0x156b8ad000 - 0x156b8ebfff 0x156b8ec000 - 0x156b8edfff 0x156b8ee000 - 0x156b8f4fff 0x156b8f5000 - 0x156b8f5fff 0x156b8f6000 - 0x156b91bfff 0x156b91c000 - 0x156b91ffff 0x156b920000 - 0x156b920fff 0x156b921000 - 0x156b922fff 0x156b923000 - 0x156b923fff 0x156b924000 - 0x156b924fff 0x156b925000 - 0x156b925fff 0x156b926000 - 0x156b929fff 0x156b92a000 - 0x156b92afff 0x156b92b000 - 0x156b92bfff 0x156b92c000 - 0x156b92dfff 0x156b92e000 - 0x156b92efff 0x156b92f000 - 0x156b92ffff 0x156b930000 - 0x156ba9bfff 0x156ba9c000 - 0x156ba9efff 0x156ba9f000 - 0x156ba9ffff 0x156baa0000 - 0x156baa2fff 0x156baa3000 - 0x156bab5fff 0x156bab6000 - 0x156bab6fff 0x156bab7000 - 0x156bab7fff 0x156bab8000 - 0x156bbd5fff 0x156bbd6000 - 0x156bbd8fff 0x156bbd9000 - 0x156bbdbfff 0x156bbdc000 - 0x156bbe0fff 0x156bbe1000 - 0x156bc35fff 0x156bc36000 - 0x156c2e0fff 0x3fffafe000 - 0x3fffb1efff ;; 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 0x257f8000 - 0x25818fff 0x80000000 - 0x800bffff 0x155581a000 - 0x1555834fff 0x1555835000 - 0x1555835fff 0x1555836000 - 0x1555836fff 0x1555837000 - 0x1555838fff 0x1555839000 - 0x155583afff 0x155583b000 - 0x1555841fff 0x1555842000 - 0x1555842fff 0x1555843000 - 0x1555843fff 0x1555845000 - 0x1555846fff 0x1555847000 - 0x1555885fff 0x1555886000 - 0x1555887fff 0x1555888000 - 0x155588efff 0x155588f000 - 0x155588ffff 0x1555890000 - 0x15558b5fff 0x15558b6000 - 0x15558b9fff 0x15558ba000 - 0x15558bafff 0x15558bb000 - 0x15558bcfff 0x15558bd000 - 0x15558bdfff 0x15558be000 - 0x15558befff 0x15558bf000 - 0x15558bffff 0x15558c0000 - 0x15558c3fff 0x15558c4000 - 0x15558c4fff 0x15558c5000 - 0x15558c5fff 0x15558c6000 - 0x15558c7fff 0x15558c8000 - 0x15558c8fff 0x15558c9000 - 0x15558c9fff 0x15558ca000 - 0x1555a35fff 0x1555a36000 - 0x1555a38fff 0x1555a39000 - 0x1555a39fff 0x1555a3a000 - 0x1555a3cfff 0x1555a3d000 - 0x1555a4ffff 0x1555a50000 - 0x1555a50fff 0x1555a51000 - 0x1555a51fff 0x1555a52000 - 0x1555b6ffff 0x1555b70000 - 0x1555b72fff 0x1555b73000 - 0x1555b75fff 0x1555b76000 - 0x1555b7afff 0x1555b7b000 - 0x1555bcffff 0x1555bd0000 - 0x155627afff 0x3ffffbd000 - 0x3ffffddfff ;; 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 0x2db88000 - 0x2dba8fff 0x80000000 - 0x800bffff 0x15840c6000 - 0x15840e0fff 0x15840e1000 - 0x15840e1fff 0x15840e2000 - 0x15840e2fff 0x15840e3000 - 0x15840e4fff 0x15840e5000 - 0x15840e6fff 0x15840e7000 - 0x15840edfff 0x15840ee000 - 0x15840eefff 0x15840ef000 - 0x15840effff 0x15840f1000 - 0x15840f2fff 0x15840f3000 - 0x1584131fff 0x1584132000 - 0x1584133fff 0x1584134000 - 0x158413afff 0x158413b000 - 0x158413bfff 0x158413c000 - 0x1584161fff 0x1584162000 - 0x1584165fff 0x1584166000 - 0x1584166fff 0x1584167000 - 0x1584168fff 0x1584169000 - 0x1584169fff 0x158416a000 - 0x158416afff 0x158416b000 - 0x158416bfff 0x158416c000 - 0x158416ffff 0x1584170000 - 0x1584170fff 0x1584171000 - 0x1584171fff 0x1584172000 - 0x1584173fff 0x1584174000 - 0x1584174fff 0x1584175000 - 0x1584175fff 0x1584176000 - 0x15842e1fff 0x15842e2000 - 0x15842e4fff 0x15842e5000 - 0x15842e5fff 0x15842e6000 - 0x15842e8fff 0x15842e9000 - 0x15842fbfff 0x15842fc000 - 0x15842fcfff 0x15842fd000 - 0x15842fdfff 0x15842fe000 - 0x158441bfff 0x158441c000 - 0x158441efff 0x158441f000 - 0x1584421fff 0x1584422000 - 0x1584426fff 0x1584427000 - 0x158447bfff 0x158447c000 - 0x1584b26fff 0x3fffd36000 - 0x3fffd56fff ;; 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 0x1b7db000 - 0x1b7fbfff 0x80000000 - 0x800bffff 0x1563ff1000 - 0x156400bfff 0x156400c000 - 0x156400cfff 0x156400d000 - 0x156400dfff 0x156400e000 - 0x156400ffff 0x1564010000 - 0x1564011fff 0x1564012000 - 0x1564018fff 0x1564019000 - 0x1564019fff 0x156401a000 - 0x156401afff 0x156401c000 - 0x156401dfff 0x156401e000 - 0x156405cfff 0x156405d000 - 0x156405efff 0x156405f000 - 0x1564065fff 0x1564066000 - 0x1564066fff 0x1564067000 - 0x156408cfff 0x156408d000 - 0x1564090fff 0x1564091000 - 0x1564091fff 0x1564092000 - 0x1564093fff 0x1564094000 - 0x1564094fff 0x1564095000 - 0x1564095fff 0x1564096000 - 0x1564096fff 0x1564097000 - 0x156409afff 0x156409b000 - 0x156409bfff 0x156409c000 - 0x156409cfff 0x156409d000 - 0x156409efff 0x156409f000 - 0x156409ffff 0x15640a0000 - 0x15640a0fff 0x15640a1000 - 0x156420cfff 0x156420d000 - 0x156420ffff 0x1564210000 - 0x1564210fff 0x1564211000 - 0x1564213fff 0x1564214000 - 0x1564226fff 0x1564227000 - 0x1564227fff 0x1564228000 - 0x1564228fff 0x1564229000 - 0x1564346fff 0x1564347000 - 0x1564349fff 0x156434a000 - 0x156434cfff 0x156434d000 - 0x1564351fff 0x1564352000 - 0x15643a6fff 0x15643a7000 - 0x1564a51fff 0x3fff809000 - 0x3fff829fff ;; 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 0x24eeb000 - 0x24f0bfff 0x80000000 - 0x800bffff 0x157376c000 - 0x1573786fff 0x1573787000 - 0x1573787fff 0x1573788000 - 0x1573788fff 0x1573789000 - 0x157378afff 0x157378b000 - 0x157378cfff 0x157378d000 - 0x1573793fff 0x1573794000 - 0x1573794fff 0x1573795000 - 0x1573795fff 0x1573797000 - 0x1573798fff 0x1573799000 - 0x15737d7fff 0x15737d8000 - 0x15737d9fff 0x15737da000 - 0x15737e0fff 0x15737e1000 - 0x15737e1fff 0x15737e2000 - 0x1573807fff 0x1573808000 - 0x157380bfff 0x157380c000 - 0x157380cfff 0x157380d000 - 0x157380efff 0x157380f000 - 0x157380ffff 0x1573810000 - 0x1573810fff 0x1573811000 - 0x1573811fff 0x1573812000 - 0x1573815fff 0x1573816000 - 0x1573816fff 0x1573817000 - 0x1573817fff 0x1573818000 - 0x1573819fff 0x157381a000 - 0x157381afff 0x157381b000 - 0x157381bfff 0x157381c000 - 0x1573987fff 0x1573988000 - 0x157398afff 0x157398b000 - 0x157398bfff 0x157398c000 - 0x157398efff 0x157398f000 - 0x15739a1fff 0x15739a2000 - 0x15739a2fff 0x15739a3000 - 0x15739a3fff 0x15739a4000 - 0x1573ac1fff 0x1573ac2000 - 0x1573ac4fff 0x1573ac5000 - 0x1573ac7fff 0x1573ac8000 - 0x1573accfff 0x1573acd000 - 0x1573b21fff 0x1573b22000 - 0x15741ccfff 0x3ffff55000 - 0x3ffff75fff ;; 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 0x8bf5000 - 0x8c15fff 0x80000000 - 0x800bffff 0x156d676000 - 0x156d690fff 0x156d691000 - 0x156d691fff 0x156d692000 - 0x156d692fff 0x156d693000 - 0x156d694fff 0x156d695000 - 0x156d696fff 0x156d697000 - 0x156d69dfff 0x156d69e000 - 0x156d69efff 0x156d69f000 - 0x156d69ffff 0x156d6a1000 - 0x156d6a2fff 0x156d6a3000 - 0x156d6e1fff 0x156d6e2000 - 0x156d6e3fff 0x156d6e4000 - 0x156d6eafff 0x156d6eb000 - 0x156d6ebfff 0x156d6ec000 - 0x156d711fff 0x156d712000 - 0x156d715fff 0x156d716000 - 0x156d716fff 0x156d717000 - 0x156d718fff 0x156d719000 - 0x156d719fff 0x156d71a000 - 0x156d71afff 0x156d71b000 - 0x156d71bfff 0x156d71c000 - 0x156d71ffff 0x156d720000 - 0x156d720fff 0x156d721000 - 0x156d721fff 0x156d722000 - 0x156d723fff 0x156d724000 - 0x156d724fff 0x156d725000 - 0x156d725fff 0x156d726000 - 0x156d891fff 0x156d892000 - 0x156d894fff 0x156d895000 - 0x156d895fff 0x156d896000 - 0x156d898fff 0x156d899000 - 0x156d8abfff 0x156d8ac000 - 0x156d8acfff 0x156d8ad000 - 0x156d8adfff 0x156d8ae000 - 0x156d9cbfff 0x156d9cc000 - 0x156d9cefff 0x156d9cf000 - 0x156d9d1fff 0x156d9d2000 - 0x156d9d6fff 0x156d9d7000 - 0x156da2bfff 0x156da2c000 - 0x156e0d6fff 0x3fff9b8000 - 0x3fff9d8fff ;; 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 0x37910000 - 0x37930fff 0x80000000 - 0x800bffff 0x1580a80000 - 0x1580a9afff 0x1580a9b000 - 0x1580a9bfff 0x1580a9c000 - 0x1580a9cfff 0x1580a9d000 - 0x1580a9efff 0x1580a9f000 - 0x1580aa0fff 0x1580aa1000 - 0x1580aa7fff 0x1580aa8000 - 0x1580aa8fff 0x1580aa9000 - 0x1580aa9fff 0x1580aab000 - 0x1580aacfff 0x1580aad000 - 0x1580aebfff 0x1580aec000 - 0x1580aedfff 0x1580aee000 - 0x1580af4fff 0x1580af5000 - 0x1580af5fff 0x1580af6000 - 0x1580b1bfff 0x1580b1c000 - 0x1580b1ffff 0x1580b20000 - 0x1580b20fff 0x1580b21000 - 0x1580b22fff 0x1580b23000 - 0x1580b23fff 0x1580b24000 - 0x1580b24fff 0x1580b25000 - 0x1580b25fff 0x1580b26000 - 0x1580b29fff 0x1580b2a000 - 0x1580b2afff 0x1580b2b000 - 0x1580b2bfff 0x1580b2c000 - 0x1580b2dfff 0x1580b2e000 - 0x1580b2efff 0x1580b2f000 - 0x1580b2ffff 0x1580b30000 - 0x1580c9bfff 0x1580c9c000 - 0x1580c9efff 0x1580c9f000 - 0x1580c9ffff 0x1580ca0000 - 0x1580ca2fff 0x1580ca3000 - 0x1580cb5fff 0x1580cb6000 - 0x1580cb6fff 0x1580cb7000 - 0x1580cb7fff 0x1580cb8000 - 0x1580dd5fff 0x1580dd6000 - 0x1580dd8fff 0x1580dd9000 - 0x1580ddbfff 0x1580ddc000 - 0x1580de0fff 0x1580de1000 - 0x1580e35fff 0x1580e36000 - 0x15814e0fff 0x3fffee0000 - 0x3ffff00fff ;; 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 0x781e000 - 0x783efff 0x80000000 - 0x800bffff 0x159423f000 - 0x1594259fff 0x159425a000 - 0x159425afff 0x159425b000 - 0x159425bfff 0x159425c000 - 0x159425dfff 0x159425e000 - 0x159425ffff 0x1594260000 - 0x1594266fff 0x1594267000 - 0x1594267fff 0x1594268000 - 0x1594268fff 0x159426a000 - 0x159426bfff 0x159426c000 - 0x15942aafff 0x15942ab000 - 0x15942acfff 0x15942ad000 - 0x15942b3fff 0x15942b4000 - 0x15942b4fff 0x15942b5000 - 0x15942dafff 0x15942db000 - 0x15942defff 0x15942df000 - 0x15942dffff 0x15942e0000 - 0x15942e1fff 0x15942e2000 - 0x15942e2fff 0x15942e3000 - 0x15942e3fff 0x15942e4000 - 0x15942e4fff 0x15942e5000 - 0x15942e8fff 0x15942e9000 - 0x15942e9fff 0x15942ea000 - 0x15942eafff 0x15942eb000 - 0x15942ecfff 0x15942ed000 - 0x15942edfff 0x15942ee000 - 0x15942eefff 0x15942ef000 - 0x159445afff 0x159445b000 - 0x159445dfff 0x159445e000 - 0x159445efff 0x159445f000 - 0x1594461fff 0x1594462000 - 0x1594474fff 0x1594475000 - 0x1594475fff 0x1594476000 - 0x1594476fff 0x1594477000 - 0x1594594fff 0x1594595000 - 0x1594597fff 0x1594598000 - 0x159459afff 0x159459b000 - 0x159459ffff 0x15945a0000 - 0x15945f4fff 0x15945f5000 - 0x1594c9ffff 0x3fffbd8000 - 0x3fffbf8fff ;; 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 0x3cae2000 - 0x3cb02fff 0x80000000 - 0x800bffff 0x155fd64000 - 0x155fd7efff 0x155fd7f000 - 0x155fd7ffff 0x155fd80000 - 0x155fd80fff 0x155fd81000 - 0x155fd82fff 0x155fd83000 - 0x155fd84fff 0x155fd85000 - 0x155fd8bfff 0x155fd8c000 - 0x155fd8cfff 0x155fd8d000 - 0x155fd8dfff 0x155fd8f000 - 0x155fd90fff 0x155fd91000 - 0x155fdcffff 0x155fdd0000 - 0x155fdd1fff 0x155fdd2000 - 0x155fdd8fff 0x155fdd9000 - 0x155fdd9fff 0x155fdda000 - 0x155fdfffff 0x155fe00000 - 0x155fe03fff 0x155fe04000 - 0x155fe04fff 0x155fe05000 - 0x155fe06fff 0x155fe07000 - 0x155fe07fff 0x155fe08000 - 0x155fe08fff 0x155fe09000 - 0x155fe09fff 0x155fe0a000 - 0x155fe0dfff 0x155fe0e000 - 0x155fe0efff 0x155fe0f000 - 0x155fe0ffff 0x155fe10000 - 0x155fe11fff 0x155fe12000 - 0x155fe12fff 0x155fe13000 - 0x155fe13fff 0x155fe14000 - 0x155ff7ffff 0x155ff80000 - 0x155ff82fff 0x155ff83000 - 0x155ff83fff 0x155ff84000 - 0x155ff86fff 0x155ff87000 - 0x155ff99fff 0x155ff9a000 - 0x155ff9afff 0x155ff9b000 - 0x155ff9bfff 0x155ff9c000 - 0x15600b9fff 0x15600ba000 - 0x15600bcfff 0x15600bd000 - 0x15600bffff 0x15600c0000 - 0x15600c4fff 0x15600c5000 - 0x1560119fff 0x156011a000 - 0x15607c4fff 0x3fffd65000 - 0x3fffd85fff ;; 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 0xe29e000 - 0xe2befff 0x80000000 - 0x800bffff 0x156c938000 - 0x156c952fff 0x156c953000 - 0x156c953fff 0x156c954000 - 0x156c954fff 0x156c955000 - 0x156c956fff 0x156c957000 - 0x156c958fff 0x156c959000 - 0x156c95ffff 0x156c960000 - 0x156c960fff 0x156c961000 - 0x156c961fff 0x156c963000 - 0x156c964fff 0x156c965000 - 0x156c9a3fff 0x156c9a4000 - 0x156c9a5fff 0x156c9a6000 - 0x156c9acfff 0x156c9ad000 - 0x156c9adfff 0x156c9ae000 - 0x156c9d3fff 0x156c9d4000 - 0x156c9d7fff 0x156c9d8000 - 0x156c9d8fff 0x156c9d9000 - 0x156c9dafff 0x156c9db000 - 0x156c9dbfff 0x156c9dc000 - 0x156c9dcfff 0x156c9dd000 - 0x156c9ddfff 0x156c9de000 - 0x156c9e1fff 0x156c9e2000 - 0x156c9e2fff 0x156c9e3000 - 0x156c9e3fff 0x156c9e4000 - 0x156c9e5fff 0x156c9e6000 - 0x156c9e6fff 0x156c9e7000 - 0x156c9e7fff 0x156c9e8000 - 0x156cb53fff 0x156cb54000 - 0x156cb56fff 0x156cb57000 - 0x156cb57fff 0x156cb58000 - 0x156cb5afff 0x156cb5b000 - 0x156cb6dfff 0x156cb6e000 - 0x156cb6efff 0x156cb6f000 - 0x156cb6ffff 0x156cb70000 - 0x156cc8dfff 0x156cc8e000 - 0x156cc90fff 0x156cc91000 - 0x156cc93fff 0x156cc94000 - 0x156cc98fff 0x156cc99000 - 0x156ccedfff 0x156ccee000 - 0x156d398fff 0x3fff914000 - 0x3fff934fff ;; 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 0x204a4000 - 0x204c4fff 0x80000000 - 0x800bffff 0x158353b000 - 0x1583555fff 0x1583556000 - 0x1583556fff 0x1583557000 - 0x1583557fff 0x1583558000 - 0x1583559fff 0x158355a000 - 0x158355bfff 0x158355c000 - 0x1583562fff 0x1583563000 - 0x1583563fff 0x1583564000 - 0x1583564fff 0x1583566000 - 0x1583567fff 0x1583568000 - 0x15835a6fff 0x15835a7000 - 0x15835a8fff 0x15835a9000 - 0x15835affff 0x15835b0000 - 0x15835b0fff 0x15835b1000 - 0x15835d6fff 0x15835d7000 - 0x15835dafff 0x15835db000 - 0x15835dbfff 0x15835dc000 - 0x15835ddfff 0x15835de000 - 0x15835defff 0x15835df000 - 0x15835dffff 0x15835e0000 - 0x15835e0fff 0x15835e1000 - 0x15835e4fff 0x15835e5000 - 0x15835e5fff 0x15835e6000 - 0x15835e6fff 0x15835e7000 - 0x15835e8fff 0x15835e9000 - 0x15835e9fff 0x15835ea000 - 0x15835eafff 0x15835eb000 - 0x1583756fff 0x1583757000 - 0x1583759fff 0x158375a000 - 0x158375afff 0x158375b000 - 0x158375dfff 0x158375e000 - 0x1583770fff 0x1583771000 - 0x1583771fff 0x1583772000 - 0x1583772fff 0x1583773000 - 0x1583890fff 0x1583891000 - 0x1583893fff 0x1583894000 - 0x1583896fff 0x1583897000 - 0x158389bfff 0x158389c000 - 0x15838f0fff 0x15838f1000 - 0x1583f9bfff 0x3fffdb6000 - 0x3fffdd6fff ;; 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 0x2fba2000 - 0x2fbc2fff 0x80000000 - 0x800bffff 0x15762e4000 - 0x15762fefff 0x15762ff000 - 0x15762fffff 0x1576300000 - 0x1576300fff 0x1576301000 - 0x1576302fff 0x1576303000 - 0x1576304fff 0x1576305000 - 0x157630bfff 0x157630c000 - 0x157630cfff 0x157630d000 - 0x157630dfff 0x157630f000 - 0x1576310fff 0x1576311000 - 0x157634ffff 0x1576350000 - 0x1576351fff 0x1576352000 - 0x1576358fff 0x1576359000 - 0x1576359fff 0x157635a000 - 0x157637ffff 0x1576380000 - 0x1576383fff 0x1576384000 - 0x1576384fff 0x1576385000 - 0x1576386fff 0x1576387000 - 0x1576387fff 0x1576388000 - 0x1576388fff 0x1576389000 - 0x1576389fff 0x157638a000 - 0x157638dfff 0x157638e000 - 0x157638efff 0x157638f000 - 0x157638ffff 0x1576390000 - 0x1576391fff 0x1576392000 - 0x1576392fff 0x1576393000 - 0x1576393fff 0x1576394000 - 0x15764fffff 0x1576500000 - 0x1576502fff 0x1576503000 - 0x1576503fff 0x1576504000 - 0x1576506fff 0x1576507000 - 0x1576519fff 0x157651a000 - 0x157651afff 0x157651b000 - 0x157651bfff 0x157651c000 - 0x1576639fff 0x157663a000 - 0x157663cfff 0x157663d000 - 0x157663ffff 0x1576640000 - 0x1576644fff 0x1576645000 - 0x1576699fff 0x157669a000 - 0x1576d44fff 0x3ffff0e000 - 0x3ffff2efff ;; 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 0x1012000 - 0x1032fff 0x80000000 - 0x800bffff 0x158af53000 - 0x158af6dfff 0x158af6e000 - 0x158af6efff 0x158af6f000 - 0x158af6ffff 0x158af70000 - 0x158af71fff 0x158af72000 - 0x158af73fff 0x158af74000 - 0x158af7afff 0x158af7b000 - 0x158af7bfff 0x158af7c000 - 0x158af7cfff 0x158af7e000 - 0x158af7ffff 0x158af80000 - 0x158afbefff 0x158afbf000 - 0x158afc0fff 0x158afc1000 - 0x158afc7fff 0x158afc8000 - 0x158afc8fff 0x158afc9000 - 0x158afeefff 0x158afef000 - 0x158aff2fff 0x158aff3000 - 0x158aff3fff 0x158aff4000 - 0x158aff5fff 0x158aff6000 - 0x158aff6fff 0x158aff7000 - 0x158aff7fff 0x158aff8000 - 0x158aff8fff 0x158aff9000 - 0x158affcfff 0x158affd000 - 0x158affdfff 0x158affe000 - 0x158affefff 0x158afff000 - 0x158b000fff 0x158b001000 - 0x158b001fff 0x158b002000 - 0x158b002fff 0x158b003000 - 0x158b16efff 0x158b16f000 - 0x158b171fff 0x158b172000 - 0x158b172fff 0x158b173000 - 0x158b175fff 0x158b176000 - 0x158b188fff 0x158b189000 - 0x158b189fff 0x158b18a000 - 0x158b18afff 0x158b18b000 - 0x158b2a8fff 0x158b2a9000 - 0x158b2abfff 0x158b2ac000 - 0x158b2aefff 0x158b2af000 - 0x158b2b3fff 0x158b2b4000 - 0x158b308fff 0x158b309000 - 0x158b9b3fff 0x3fffe4a000 - 0x3fffe6afff ;; 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 0x3369f000 - 0x336bffff 0x80000000 - 0x800bffff 0x1569286000 - 0x15692a0fff 0x15692a1000 - 0x15692a1fff 0x15692a2000 - 0x15692a2fff 0x15692a3000 - 0x15692a4fff 0x15692a5000 - 0x15692a6fff 0x15692a7000 - 0x15692adfff 0x15692ae000 - 0x15692aefff 0x15692af000 - 0x15692affff 0x15692b1000 - 0x15692b2fff 0x15692b3000 - 0x15692f1fff 0x15692f2000 - 0x15692f3fff 0x15692f4000 - 0x15692fafff 0x15692fb000 - 0x15692fbfff 0x15692fc000 - 0x1569321fff 0x1569322000 - 0x1569325fff 0x1569326000 - 0x1569326fff 0x1569327000 - 0x1569328fff 0x1569329000 - 0x1569329fff 0x156932a000 - 0x156932afff 0x156932b000 - 0x156932bfff 0x156932c000 - 0x156932ffff 0x1569330000 - 0x1569330fff 0x1569331000 - 0x1569331fff 0x1569332000 - 0x1569333fff 0x1569334000 - 0x1569334fff 0x1569335000 - 0x1569335fff 0x1569336000 - 0x15694a1fff 0x15694a2000 - 0x15694a4fff 0x15694a5000 - 0x15694a5fff 0x15694a6000 - 0x15694a8fff 0x15694a9000 - 0x15694bbfff 0x15694bc000 - 0x15694bcfff 0x15694bd000 - 0x15694bdfff 0x15694be000 - 0x15695dbfff 0x15695dc000 - 0x15695defff 0x15695df000 - 0x15695e1fff 0x15695e2000 - 0x15695e6fff 0x15695e7000 - 0x156963bfff 0x156963c000 - 0x1569ce6fff 0x3fffe67000 - 0x3fffe87fff ;; 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 0x2ff5f000 - 0x2ff7ffff 0x80000000 - 0x800bffff 0x158fd21000 - 0x158fd3bfff 0x158fd3c000 - 0x158fd3cfff 0x158fd3d000 - 0x158fd3dfff 0x158fd3e000 - 0x158fd3ffff 0x158fd40000 - 0x158fd41fff 0x158fd42000 - 0x158fd48fff 0x158fd49000 - 0x158fd49fff 0x158fd4a000 - 0x158fd4afff 0x158fd4c000 - 0x158fd4dfff 0x158fd4e000 - 0x158fd8cfff 0x158fd8d000 - 0x158fd8efff 0x158fd8f000 - 0x158fd95fff 0x158fd96000 - 0x158fd96fff 0x158fd97000 - 0x158fdbcfff 0x158fdbd000 - 0x158fdc0fff 0x158fdc1000 - 0x158fdc1fff 0x158fdc2000 - 0x158fdc3fff 0x158fdc4000 - 0x158fdc4fff 0x158fdc5000 - 0x158fdc5fff 0x158fdc6000 - 0x158fdc6fff 0x158fdc7000 - 0x158fdcafff 0x158fdcb000 - 0x158fdcbfff 0x158fdcc000 - 0x158fdccfff 0x158fdcd000 - 0x158fdcefff 0x158fdcf000 - 0x158fdcffff 0x158fdd0000 - 0x158fdd0fff 0x158fdd1000 - 0x158ff3cfff 0x158ff3d000 - 0x158ff3ffff 0x158ff40000 - 0x158ff40fff 0x158ff41000 - 0x158ff43fff 0x158ff44000 - 0x158ff56fff 0x158ff57000 - 0x158ff57fff 0x158ff58000 - 0x158ff58fff 0x158ff59000 - 0x1590076fff 0x1590077000 - 0x1590079fff 0x159007a000 - 0x159007cfff 0x159007d000 - 0x1590081fff 0x1590082000 - 0x15900d6fff 0x15900d7000 - 0x1590781fff 0x3fffee3000 - 0x3ffff03fff ;; 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 0x3154a000 - 0x3156afff 0x80000000 - 0x800bffff 0x1581aa7000 - 0x1581ac1fff 0x1581ac2000 - 0x1581ac2fff 0x1581ac3000 - 0x1581ac3fff 0x1581ac4000 - 0x1581ac5fff 0x1581ac6000 - 0x1581ac7fff 0x1581ac8000 - 0x1581acefff 0x1581acf000 - 0x1581acffff 0x1581ad0000 - 0x1581ad0fff 0x1581ad2000 - 0x1581ad3fff 0x1581ad4000 - 0x1581b12fff 0x1581b13000 - 0x1581b14fff 0x1581b15000 - 0x1581b1bfff 0x1581b1c000 - 0x1581b1cfff 0x1581b1d000 - 0x1581b42fff 0x1581b43000 - 0x1581b46fff 0x1581b47000 - 0x1581b47fff 0x1581b48000 - 0x1581b49fff 0x1581b4a000 - 0x1581b4afff 0x1581b4b000 - 0x1581b4bfff 0x1581b4c000 - 0x1581b4cfff 0x1581b4d000 - 0x1581b50fff 0x1581b51000 - 0x1581b51fff 0x1581b52000 - 0x1581b52fff 0x1581b53000 - 0x1581b54fff 0x1581b55000 - 0x1581b55fff 0x1581b56000 - 0x1581b56fff 0x1581b57000 - 0x1581cc2fff 0x1581cc3000 - 0x1581cc5fff 0x1581cc6000 - 0x1581cc6fff 0x1581cc7000 - 0x1581cc9fff 0x1581cca000 - 0x1581cdcfff 0x1581cdd000 - 0x1581cddfff 0x1581cde000 - 0x1581cdefff 0x1581cdf000 - 0x1581dfcfff 0x1581dfd000 - 0x1581dfffff 0x1581e00000 - 0x1581e02fff 0x1581e03000 - 0x1581e07fff 0x1581e08000 - 0x1581e5cfff 0x1581e5d000 - 0x1582507fff 0x3fffe5d000 - 0x3fffe7dfff ;; 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 0x36e75000 - 0x36e95fff 0x80000000 - 0x800bffff 0x156d197000 - 0x156d1b1fff 0x156d1b2000 - 0x156d1b2fff 0x156d1b3000 - 0x156d1b3fff 0x156d1b4000 - 0x156d1b5fff 0x156d1b6000 - 0x156d1b7fff 0x156d1b8000 - 0x156d1befff 0x156d1bf000 - 0x156d1bffff 0x156d1c0000 - 0x156d1c0fff 0x156d1c2000 - 0x156d1c3fff 0x156d1c4000 - 0x156d202fff 0x156d203000 - 0x156d204fff 0x156d205000 - 0x156d20bfff 0x156d20c000 - 0x156d20cfff 0x156d20d000 - 0x156d232fff 0x156d233000 - 0x156d236fff 0x156d237000 - 0x156d237fff 0x156d238000 - 0x156d239fff 0x156d23a000 - 0x156d23afff 0x156d23b000 - 0x156d23bfff 0x156d23c000 - 0x156d23cfff 0x156d23d000 - 0x156d240fff 0x156d241000 - 0x156d241fff 0x156d242000 - 0x156d242fff 0x156d243000 - 0x156d244fff 0x156d245000 - 0x156d245fff 0x156d246000 - 0x156d246fff 0x156d247000 - 0x156d3b2fff 0x156d3b3000 - 0x156d3b5fff 0x156d3b6000 - 0x156d3b6fff 0x156d3b7000 - 0x156d3b9fff 0x156d3ba000 - 0x156d3ccfff 0x156d3cd000 - 0x156d3cdfff 0x156d3ce000 - 0x156d3cefff 0x156d3cf000 - 0x156d4ecfff 0x156d4ed000 - 0x156d4effff 0x156d4f0000 - 0x156d4f2fff 0x156d4f3000 - 0x156d4f7fff 0x156d4f8000 - 0x156d54cfff 0x156d54d000 - 0x156dbf7fff 0x3fffbd5000 - 0x3fffbf5fff ;; 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 0x14ec7000 - 0x14ee7fff 0x80000000 - 0x800bffff 0x1557da9000 - 0x1557dc3fff 0x1557dc4000 - 0x1557dc4fff 0x1557dc5000 - 0x1557dc5fff 0x1557dc6000 - 0x1557dc7fff 0x1557dc8000 - 0x1557dc9fff 0x1557dca000 - 0x1557dd0fff 0x1557dd1000 - 0x1557dd1fff 0x1557dd2000 - 0x1557dd2fff 0x1557dd4000 - 0x1557dd5fff 0x1557dd6000 - 0x1557e14fff 0x1557e15000 - 0x1557e16fff 0x1557e17000 - 0x1557e1dfff 0x1557e1e000 - 0x1557e1efff 0x1557e1f000 - 0x1557e44fff 0x1557e45000 - 0x1557e48fff 0x1557e49000 - 0x1557e49fff 0x1557e4a000 - 0x1557e4bfff 0x1557e4c000 - 0x1557e4cfff 0x1557e4d000 - 0x1557e4dfff 0x1557e4e000 - 0x1557e4efff 0x1557e4f000 - 0x1557e52fff 0x1557e53000 - 0x1557e53fff 0x1557e54000 - 0x1557e54fff 0x1557e55000 - 0x1557e56fff 0x1557e57000 - 0x1557e57fff 0x1557e58000 - 0x1557e58fff 0x1557e59000 - 0x1557fc4fff 0x1557fc5000 - 0x1557fc7fff 0x1557fc8000 - 0x1557fc8fff 0x1557fc9000 - 0x1557fcbfff 0x1557fcc000 - 0x1557fdefff 0x1557fdf000 - 0x1557fdffff 0x1557fe0000 - 0x1557fe0fff 0x1557fe1000 - 0x15580fefff 0x15580ff000 - 0x1558101fff 0x1558102000 - 0x1558104fff 0x1558105000 - 0x1558109fff 0x155810a000 - 0x155815efff 0x155815f000 - 0x1558809fff 0x3fff8df000 - 0x3fff8fffff ;; 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 0xfc59000 - 0xfc79fff 0x80000000 - 0x800bffff 0x156747e000 - 0x1567498fff 0x1567499000 - 0x1567499fff 0x156749a000 - 0x156749afff 0x156749b000 - 0x156749cfff 0x156749d000 - 0x156749efff 0x156749f000 - 0x15674a5fff 0x15674a6000 - 0x15674a6fff 0x15674a7000 - 0x15674a7fff 0x15674a9000 - 0x15674aafff 0x15674ab000 - 0x15674e9fff 0x15674ea000 - 0x15674ebfff 0x15674ec000 - 0x15674f2fff 0x15674f3000 - 0x15674f3fff 0x15674f4000 - 0x1567519fff 0x156751a000 - 0x156751dfff 0x156751e000 - 0x156751efff 0x156751f000 - 0x1567520fff 0x1567521000 - 0x1567521fff 0x1567522000 - 0x1567522fff 0x1567523000 - 0x1567523fff 0x1567524000 - 0x1567527fff 0x1567528000 - 0x1567528fff 0x1567529000 - 0x1567529fff 0x156752a000 - 0x156752bfff 0x156752c000 - 0x156752cfff 0x156752d000 - 0x156752dfff 0x156752e000 - 0x1567699fff 0x156769a000 - 0x156769cfff 0x156769d000 - 0x156769dfff 0x156769e000 - 0x15676a0fff 0x15676a1000 - 0x15676b3fff 0x15676b4000 - 0x15676b4fff 0x15676b5000 - 0x15676b5fff 0x15676b6000 - 0x15677d3fff 0x15677d4000 - 0x15677d6fff 0x15677d7000 - 0x15677d9fff 0x15677da000 - 0x15677defff 0x15677df000 - 0x1567833fff 0x1567834000 - 0x1567edefff 0x3fff9eb000 - 0x3fffa0bfff ;; 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 0x182af000 - 0x182cffff 0x80000000 - 0x800bffff 0x1594468000 - 0x1594482fff 0x1594483000 - 0x1594483fff 0x1594484000 - 0x1594484fff 0x1594485000 - 0x1594486fff 0x1594487000 - 0x1594488fff 0x1594489000 - 0x159448ffff 0x1594490000 - 0x1594490fff 0x1594491000 - 0x1594491fff 0x1594493000 - 0x1594494fff 0x1594495000 - 0x15944d3fff 0x15944d4000 - 0x15944d5fff 0x15944d6000 - 0x15944dcfff 0x15944dd000 - 0x15944ddfff 0x15944de000 - 0x1594503fff 0x1594504000 - 0x1594507fff 0x1594508000 - 0x1594508fff 0x1594509000 - 0x159450afff 0x159450b000 - 0x159450bfff 0x159450c000 - 0x159450cfff 0x159450d000 - 0x159450dfff 0x159450e000 - 0x1594511fff 0x1594512000 - 0x1594512fff 0x1594513000 - 0x1594513fff 0x1594514000 - 0x1594515fff 0x1594516000 - 0x1594516fff 0x1594517000 - 0x1594517fff 0x1594518000 - 0x1594683fff 0x1594684000 - 0x1594686fff 0x1594687000 - 0x1594687fff 0x1594688000 - 0x159468afff 0x159468b000 - 0x159469dfff 0x159469e000 - 0x159469efff 0x159469f000 - 0x159469ffff 0x15946a0000 - 0x15947bdfff 0x15947be000 - 0x15947c0fff 0x15947c1000 - 0x15947c3fff 0x15947c4000 - 0x15947c8fff 0x15947c9000 - 0x159481dfff 0x159481e000 - 0x1594ec8fff 0x3fffceb000 - 0x3fffd0bfff ;; 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 0x2921000 - 0x2941fff 0x80000000 - 0x800bffff 0x1564b3f000 - 0x1564b59fff 0x1564b5a000 - 0x1564b5afff 0x1564b5b000 - 0x1564b5bfff 0x1564b5c000 - 0x1564b5dfff 0x1564b5e000 - 0x1564b5ffff 0x1564b60000 - 0x1564b66fff 0x1564b67000 - 0x1564b67fff 0x1564b68000 - 0x1564b68fff 0x1564b6a000 - 0x1564b6bfff 0x1564b6c000 - 0x1564baafff 0x1564bab000 - 0x1564bacfff 0x1564bad000 - 0x1564bb3fff 0x1564bb4000 - 0x1564bb4fff 0x1564bb5000 - 0x1564bdafff 0x1564bdb000 - 0x1564bdefff 0x1564bdf000 - 0x1564bdffff 0x1564be0000 - 0x1564be1fff 0x1564be2000 - 0x1564be2fff 0x1564be3000 - 0x1564be3fff 0x1564be4000 - 0x1564be4fff 0x1564be5000 - 0x1564be8fff 0x1564be9000 - 0x1564be9fff 0x1564bea000 - 0x1564beafff 0x1564beb000 - 0x1564becfff 0x1564bed000 - 0x1564bedfff 0x1564bee000 - 0x1564beefff 0x1564bef000 - 0x1564d5afff 0x1564d5b000 - 0x1564d5dfff 0x1564d5e000 - 0x1564d5efff 0x1564d5f000 - 0x1564d61fff 0x1564d62000 - 0x1564d74fff 0x1564d75000 - 0x1564d75fff 0x1564d76000 - 0x1564d76fff 0x1564d77000 - 0x1564e94fff 0x1564e95000 - 0x1564e97fff 0x1564e98000 - 0x1564e9afff 0x1564e9b000 - 0x1564e9ffff 0x1564ea0000 - 0x1564ef4fff 0x1564ef5000 - 0x156559ffff 0x3fff9da000 - 0x3fff9fafff ;; 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 0x35d7a000 - 0x35d9afff 0x80000000 - 0x800bffff 0x155be20000 - 0x155be3afff 0x155be3b000 - 0x155be3bfff 0x155be3c000 - 0x155be3cfff 0x155be3d000 - 0x155be3efff 0x155be3f000 - 0x155be40fff 0x155be41000 - 0x155be47fff 0x155be48000 - 0x155be48fff 0x155be49000 - 0x155be49fff 0x155be4b000 - 0x155be4cfff 0x155be4d000 - 0x155be8bfff 0x155be8c000 - 0x155be8dfff 0x155be8e000 - 0x155be94fff 0x155be95000 - 0x155be95fff 0x155be96000 - 0x155bebbfff 0x155bebc000 - 0x155bebffff 0x155bec0000 - 0x155bec0fff 0x155bec1000 - 0x155bec2fff 0x155bec3000 - 0x155bec3fff 0x155bec4000 - 0x155bec4fff 0x155bec5000 - 0x155bec5fff 0x155bec6000 - 0x155bec9fff 0x155beca000 - 0x155becafff 0x155becb000 - 0x155becbfff 0x155becc000 - 0x155becdfff 0x155bece000 - 0x155becefff 0x155becf000 - 0x155becffff 0x155bed0000 - 0x155c03bfff 0x155c03c000 - 0x155c03efff 0x155c03f000 - 0x155c03ffff 0x155c040000 - 0x155c042fff 0x155c043000 - 0x155c055fff 0x155c056000 - 0x155c056fff 0x155c057000 - 0x155c057fff 0x155c058000 - 0x155c175fff 0x155c176000 - 0x155c178fff 0x155c179000 - 0x155c17bfff 0x155c17c000 - 0x155c180fff 0x155c181000 - 0x155c1d5fff 0x155c1d6000 - 0x155c880fff 0x3fffc7c000 - 0x3fffc9cfff ;; 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 0xaa9000 - 0xac9fff 0x80000000 - 0x800bffff 0x157d211000 - 0x157d22bfff 0x157d22c000 - 0x157d22cfff 0x157d22d000 - 0x157d22dfff 0x157d22e000 - 0x157d22ffff 0x157d230000 - 0x157d231fff 0x157d232000 - 0x157d238fff 0x157d239000 - 0x157d239fff 0x157d23a000 - 0x157d23afff 0x157d23c000 - 0x157d23dfff 0x157d23e000 - 0x157d27cfff 0x157d27d000 - 0x157d27efff 0x157d27f000 - 0x157d285fff 0x157d286000 - 0x157d286fff 0x157d287000 - 0x157d2acfff 0x157d2ad000 - 0x157d2b0fff 0x157d2b1000 - 0x157d2b1fff 0x157d2b2000 - 0x157d2b3fff 0x157d2b4000 - 0x157d2b4fff 0x157d2b5000 - 0x157d2b5fff 0x157d2b6000 - 0x157d2b6fff 0x157d2b7000 - 0x157d2bafff 0x157d2bb000 - 0x157d2bbfff 0x157d2bc000 - 0x157d2bcfff 0x157d2bd000 - 0x157d2befff 0x157d2bf000 - 0x157d2bffff 0x157d2c0000 - 0x157d2c0fff 0x157d2c1000 - 0x157d42cfff 0x157d42d000 - 0x157d42ffff 0x157d430000 - 0x157d430fff 0x157d431000 - 0x157d433fff 0x157d434000 - 0x157d446fff 0x157d447000 - 0x157d447fff 0x157d448000 - 0x157d448fff 0x157d449000 - 0x157d566fff 0x157d567000 - 0x157d569fff 0x157d56a000 - 0x157d56cfff 0x157d56d000 - 0x157d571fff 0x157d572000 - 0x157d5c6fff 0x157d5c7000 - 0x157dc71fff 0x3ffff33000 - 0x3ffff53fff ;; 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 0xb300000 - 0xb320fff 0x80000000 - 0x800bffff 0x156c9b2000 - 0x156c9ccfff 0x156c9cd000 - 0x156c9cdfff 0x156c9ce000 - 0x156c9cefff 0x156c9cf000 - 0x156c9d0fff 0x156c9d1000 - 0x156c9d2fff 0x156c9d3000 - 0x156c9d9fff 0x156c9da000 - 0x156c9dafff 0x156c9db000 - 0x156c9dbfff 0x156c9dd000 - 0x156c9defff 0x156c9df000 - 0x156ca1dfff 0x156ca1e000 - 0x156ca1ffff 0x156ca20000 - 0x156ca26fff 0x156ca27000 - 0x156ca27fff 0x156ca28000 - 0x156ca4dfff 0x156ca4e000 - 0x156ca51fff 0x156ca52000 - 0x156ca52fff 0x156ca53000 - 0x156ca54fff 0x156ca55000 - 0x156ca55fff 0x156ca56000 - 0x156ca56fff 0x156ca57000 - 0x156ca57fff 0x156ca58000 - 0x156ca5bfff 0x156ca5c000 - 0x156ca5cfff 0x156ca5d000 - 0x156ca5dfff 0x156ca5e000 - 0x156ca5ffff 0x156ca60000 - 0x156ca60fff 0x156ca61000 - 0x156ca61fff 0x156ca62000 - 0x156cbcdfff 0x156cbce000 - 0x156cbd0fff 0x156cbd1000 - 0x156cbd1fff 0x156cbd2000 - 0x156cbd4fff 0x156cbd5000 - 0x156cbe7fff 0x156cbe8000 - 0x156cbe8fff 0x156cbe9000 - 0x156cbe9fff 0x156cbea000 - 0x156cd07fff 0x156cd08000 - 0x156cd0afff 0x156cd0b000 - 0x156cd0dfff 0x156cd0e000 - 0x156cd12fff 0x156cd13000 - 0x156cd67fff 0x156cd68000 - 0x156d412fff 0x3fffa03000 - 0x3fffa23fff ;; 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 0x2418000 - 0x2438fff 0x80000000 - 0x800bffff 0x15571a8000 - 0x15571c2fff 0x15571c3000 - 0x15571c3fff 0x15571c4000 - 0x15571c4fff 0x15571c5000 - 0x15571c6fff 0x15571c7000 - 0x15571c8fff 0x15571c9000 - 0x15571cffff 0x15571d0000 - 0x15571d0fff 0x15571d1000 - 0x15571d1fff 0x15571d3000 - 0x15571d4fff 0x15571d5000 - 0x1557213fff 0x1557214000 - 0x1557215fff 0x1557216000 - 0x155721cfff 0x155721d000 - 0x155721dfff 0x155721e000 - 0x1557243fff 0x1557244000 - 0x1557247fff 0x1557248000 - 0x1557248fff 0x1557249000 - 0x155724afff 0x155724b000 - 0x155724bfff 0x155724c000 - 0x155724cfff 0x155724d000 - 0x155724dfff 0x155724e000 - 0x1557251fff 0x1557252000 - 0x1557252fff 0x1557253000 - 0x1557253fff 0x1557254000 - 0x1557255fff 0x1557256000 - 0x1557256fff 0x1557257000 - 0x1557257fff 0x1557258000 - 0x15573c3fff 0x15573c4000 - 0x15573c6fff 0x15573c7000 - 0x15573c7fff 0x15573c8000 - 0x15573cafff 0x15573cb000 - 0x15573ddfff 0x15573de000 - 0x15573defff 0x15573df000 - 0x15573dffff 0x15573e0000 - 0x15574fdfff 0x15574fe000 - 0x1557500fff 0x1557501000 - 0x1557503fff 0x1557504000 - 0x1557508fff 0x1557509000 - 0x155755dfff 0x155755e000 - 0x1557c08fff 0x3fffa29000 - 0x3fffa49fff ;; 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 0x7e2c000 - 0x7e4cfff 0x80000000 - 0x800bffff 0x157593e000 - 0x1575958fff 0x1575959000 - 0x1575959fff 0x157595a000 - 0x157595afff 0x157595b000 - 0x157595cfff 0x157595d000 - 0x157595efff 0x157595f000 - 0x1575965fff 0x1575966000 - 0x1575966fff 0x1575967000 - 0x1575967fff 0x1575969000 - 0x157596afff 0x157596b000 - 0x15759a9fff 0x15759aa000 - 0x15759abfff 0x15759ac000 - 0x15759b2fff 0x15759b3000 - 0x15759b3fff 0x15759b4000 - 0x15759d9fff 0x15759da000 - 0x15759ddfff 0x15759de000 - 0x15759defff 0x15759df000 - 0x15759e0fff 0x15759e1000 - 0x15759e1fff 0x15759e2000 - 0x15759e2fff 0x15759e3000 - 0x15759e3fff 0x15759e4000 - 0x15759e7fff 0x15759e8000 - 0x15759e8fff 0x15759e9000 - 0x15759e9fff 0x15759ea000 - 0x15759ebfff 0x15759ec000 - 0x15759ecfff 0x15759ed000 - 0x15759edfff 0x15759ee000 - 0x1575b59fff 0x1575b5a000 - 0x1575b5cfff 0x1575b5d000 - 0x1575b5dfff 0x1575b5e000 - 0x1575b60fff 0x1575b61000 - 0x1575b73fff 0x1575b74000 - 0x1575b74fff 0x1575b75000 - 0x1575b75fff 0x1575b76000 - 0x1575c93fff 0x1575c94000 - 0x1575c96fff 0x1575c97000 - 0x1575c99fff 0x1575c9a000 - 0x1575c9efff 0x1575c9f000 - 0x1575cf3fff 0x1575cf4000 - 0x157639efff 0x3ffff50000 - 0x3ffff70fff ;; 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 0x2e29b000 - 0x2e2bbfff 0x80000000 - 0x800bffff 0x15574b8000 - 0x15574d2fff 0x15574d3000 - 0x15574d3fff 0x15574d4000 - 0x15574d4fff 0x15574d5000 - 0x15574d6fff 0x15574d7000 - 0x15574d8fff 0x15574d9000 - 0x15574dffff 0x15574e0000 - 0x15574e0fff 0x15574e1000 - 0x15574e1fff 0x15574e3000 - 0x15574e4fff 0x15574e5000 - 0x1557523fff 0x1557524000 - 0x1557525fff 0x1557526000 - 0x155752cfff 0x155752d000 - 0x155752dfff 0x155752e000 - 0x1557553fff 0x1557554000 - 0x1557557fff 0x1557558000 - 0x1557558fff 0x1557559000 - 0x155755afff 0x155755b000 - 0x155755bfff 0x155755c000 - 0x155755cfff 0x155755d000 - 0x155755dfff 0x155755e000 - 0x1557561fff 0x1557562000 - 0x1557562fff 0x1557563000 - 0x1557563fff 0x1557564000 - 0x1557565fff 0x1557566000 - 0x1557566fff 0x1557567000 - 0x1557567fff 0x1557568000 - 0x15576d3fff 0x15576d4000 - 0x15576d6fff 0x15576d7000 - 0x15576d7fff 0x15576d8000 - 0x15576dafff 0x15576db000 - 0x15576edfff 0x15576ee000 - 0x15576eefff 0x15576ef000 - 0x15576effff 0x15576f0000 - 0x155780dfff 0x155780e000 - 0x1557810fff 0x1557811000 - 0x1557813fff 0x1557814000 - 0x1557818fff 0x1557819000 - 0x155786dfff 0x155786e000 - 0x1557f18fff 0x3fffafe000 - 0x3fffb1efff ;; 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 0x1a692000 - 0x1a6b2fff 0x80000000 - 0x800bffff 0x15884f3000 - 0x158850dfff 0x158850e000 - 0x158850efff 0x158850f000 - 0x158850ffff 0x1588510000 - 0x1588511fff 0x1588512000 - 0x1588513fff 0x1588514000 - 0x158851afff 0x158851b000 - 0x158851bfff 0x158851c000 - 0x158851cfff 0x158851e000 - 0x158851ffff 0x1588520000 - 0x158855efff 0x158855f000 - 0x1588560fff 0x1588561000 - 0x1588567fff 0x1588568000 - 0x1588568fff 0x1588569000 - 0x158858efff 0x158858f000 - 0x1588592fff 0x1588593000 - 0x1588593fff 0x1588594000 - 0x1588595fff 0x1588596000 - 0x1588596fff 0x1588597000 - 0x1588597fff 0x1588598000 - 0x1588598fff 0x1588599000 - 0x158859cfff 0x158859d000 - 0x158859dfff 0x158859e000 - 0x158859efff 0x158859f000 - 0x15885a0fff 0x15885a1000 - 0x15885a1fff 0x15885a2000 - 0x15885a2fff 0x15885a3000 - 0x158870efff 0x158870f000 - 0x1588711fff 0x1588712000 - 0x1588712fff 0x1588713000 - 0x1588715fff 0x1588716000 - 0x1588728fff 0x1588729000 - 0x1588729fff 0x158872a000 - 0x158872afff 0x158872b000 - 0x1588848fff 0x1588849000 - 0x158884bfff 0x158884c000 - 0x158884efff 0x158884f000 - 0x1588853fff 0x1588854000 - 0x15888a8fff 0x15888a9000 - 0x1588f53fff 0x3fffee2000 - 0x3ffff02fff ;; 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 0x33f78000 - 0x33f98fff 0x80000000 - 0x800bffff 0x1591b1f000 - 0x1591b39fff 0x1591b3a000 - 0x1591b3afff 0x1591b3b000 - 0x1591b3bfff 0x1591b3c000 - 0x1591b3dfff 0x1591b3e000 - 0x1591b3ffff 0x1591b40000 - 0x1591b46fff 0x1591b47000 - 0x1591b47fff 0x1591b48000 - 0x1591b48fff 0x1591b4a000 - 0x1591b4bfff 0x1591b4c000 - 0x1591b8afff 0x1591b8b000 - 0x1591b8cfff 0x1591b8d000 - 0x1591b93fff 0x1591b94000 - 0x1591b94fff 0x1591b95000 - 0x1591bbafff 0x1591bbb000 - 0x1591bbefff 0x1591bbf000 - 0x1591bbffff 0x1591bc0000 - 0x1591bc1fff 0x1591bc2000 - 0x1591bc2fff 0x1591bc3000 - 0x1591bc3fff 0x1591bc4000 - 0x1591bc4fff 0x1591bc5000 - 0x1591bc8fff 0x1591bc9000 - 0x1591bc9fff 0x1591bca000 - 0x1591bcafff 0x1591bcb000 - 0x1591bccfff 0x1591bcd000 - 0x1591bcdfff 0x1591bce000 - 0x1591bcefff 0x1591bcf000 - 0x1591d3afff 0x1591d3b000 - 0x1591d3dfff 0x1591d3e000 - 0x1591d3efff 0x1591d3f000 - 0x1591d41fff 0x1591d42000 - 0x1591d54fff 0x1591d55000 - 0x1591d55fff 0x1591d56000 - 0x1591d56fff 0x1591d57000 - 0x1591e74fff 0x1591e75000 - 0x1591e77fff 0x1591e78000 - 0x1591e7afff 0x1591e7b000 - 0x1591e7ffff 0x1591e80000 - 0x1591ed4fff 0x1591ed5000 - 0x159257ffff 0x3ffff29000 - 0x3ffff49fff ;; 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 0x8da4000 - 0x8dc4fff 0x80000000 - 0x800bffff 0x157c5a5000 - 0x157c5bffff 0x157c5c0000 - 0x157c5c0fff 0x157c5c1000 - 0x157c5c1fff 0x157c5c2000 - 0x157c5c3fff 0x157c5c4000 - 0x157c5c5fff 0x157c5c6000 - 0x157c5ccfff 0x157c5cd000 - 0x157c5cdfff 0x157c5ce000 - 0x157c5cefff 0x157c5d0000 - 0x157c5d1fff 0x157c5d2000 - 0x157c610fff 0x157c611000 - 0x157c612fff 0x157c613000 - 0x157c619fff 0x157c61a000 - 0x157c61afff 0x157c61b000 - 0x157c640fff 0x157c641000 - 0x157c644fff 0x157c645000 - 0x157c645fff 0x157c646000 - 0x157c647fff 0x157c648000 - 0x157c648fff 0x157c649000 - 0x157c649fff 0x157c64a000 - 0x157c64afff 0x157c64b000 - 0x157c64efff 0x157c64f000 - 0x157c64ffff 0x157c650000 - 0x157c650fff 0x157c651000 - 0x157c652fff 0x157c653000 - 0x157c653fff 0x157c654000 - 0x157c654fff 0x157c655000 - 0x157c7c0fff 0x157c7c1000 - 0x157c7c3fff 0x157c7c4000 - 0x157c7c4fff 0x157c7c5000 - 0x157c7c7fff 0x157c7c8000 - 0x157c7dafff 0x157c7db000 - 0x157c7dbfff 0x157c7dc000 - 0x157c7dcfff 0x157c7dd000 - 0x157c8fafff 0x157c8fb000 - 0x157c8fdfff 0x157c8fe000 - 0x157c900fff 0x157c901000 - 0x157c905fff 0x157c906000 - 0x157c95afff 0x157c95b000 - 0x157d005fff 0x3fffeb7000 - 0x3fffed7fff ;; 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 0x23939000 - 0x23959fff 0x80000000 - 0x800bffff 0x15608bf000 - 0x15608d9fff 0x15608da000 - 0x15608dafff 0x15608db000 - 0x15608dbfff 0x15608dc000 - 0x15608ddfff 0x15608de000 - 0x15608dffff 0x15608e0000 - 0x15608e6fff 0x15608e7000 - 0x15608e7fff 0x15608e8000 - 0x15608e8fff 0x15608ea000 - 0x15608ebfff 0x15608ec000 - 0x156092afff 0x156092b000 - 0x156092cfff 0x156092d000 - 0x1560933fff 0x1560934000 - 0x1560934fff 0x1560935000 - 0x156095afff 0x156095b000 - 0x156095efff 0x156095f000 - 0x156095ffff 0x1560960000 - 0x1560961fff 0x1560962000 - 0x1560962fff 0x1560963000 - 0x1560963fff 0x1560964000 - 0x1560964fff 0x1560965000 - 0x1560968fff 0x1560969000 - 0x1560969fff 0x156096a000 - 0x156096afff 0x156096b000 - 0x156096cfff 0x156096d000 - 0x156096dfff 0x156096e000 - 0x156096efff 0x156096f000 - 0x1560adafff 0x1560adb000 - 0x1560addfff 0x1560ade000 - 0x1560adefff 0x1560adf000 - 0x1560ae1fff 0x1560ae2000 - 0x1560af4fff 0x1560af5000 - 0x1560af5fff 0x1560af6000 - 0x1560af6fff 0x1560af7000 - 0x1560c14fff 0x1560c15000 - 0x1560c17fff 0x1560c18000 - 0x1560c1afff 0x1560c1b000 - 0x1560c1ffff 0x1560c20000 - 0x1560c74fff 0x1560c75000 - 0x156131ffff 0x3fffc8d000 - 0x3fffcadfff ;; 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 0x12c44000 - 0x12c64fff 0x80000000 - 0x800bffff 0x158560a000 - 0x1585624fff 0x1585625000 - 0x1585625fff 0x1585626000 - 0x1585626fff 0x1585627000 - 0x1585628fff 0x1585629000 - 0x158562afff 0x158562b000 - 0x1585631fff 0x1585632000 - 0x1585632fff 0x1585633000 - 0x1585633fff 0x1585635000 - 0x1585636fff 0x1585637000 - 0x1585675fff 0x1585676000 - 0x1585677fff 0x1585678000 - 0x158567efff 0x158567f000 - 0x158567ffff 0x1585680000 - 0x15856a5fff 0x15856a6000 - 0x15856a9fff 0x15856aa000 - 0x15856aafff 0x15856ab000 - 0x15856acfff 0x15856ad000 - 0x15856adfff 0x15856ae000 - 0x15856aefff 0x15856af000 - 0x15856affff 0x15856b0000 - 0x15856b3fff 0x15856b4000 - 0x15856b4fff 0x15856b5000 - 0x15856b5fff 0x15856b6000 - 0x15856b7fff 0x15856b8000 - 0x15856b8fff 0x15856b9000 - 0x15856b9fff 0x15856ba000 - 0x1585825fff 0x1585826000 - 0x1585828fff 0x1585829000 - 0x1585829fff 0x158582a000 - 0x158582cfff 0x158582d000 - 0x158583ffff 0x1585840000 - 0x1585840fff 0x1585841000 - 0x1585841fff 0x1585842000 - 0x158595ffff 0x1585960000 - 0x1585962fff 0x1585963000 - 0x1585965fff 0x1585966000 - 0x158596afff 0x158596b000 - 0x15859bffff 0x15859c0000 - 0x158606afff 0x3fffc88000 - 0x3fffca8fff ;; 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 0x126dd000 - 0x126fdfff 0x80000000 - 0x800bffff 0x1582bdd000 - 0x1582bf7fff 0x1582bf8000 - 0x1582bf8fff 0x1582bf9000 - 0x1582bf9fff 0x1582bfa000 - 0x1582bfbfff 0x1582bfc000 - 0x1582bfdfff 0x1582bfe000 - 0x1582c04fff 0x1582c05000 - 0x1582c05fff 0x1582c06000 - 0x1582c06fff 0x1582c08000 - 0x1582c09fff 0x1582c0a000 - 0x1582c48fff 0x1582c49000 - 0x1582c4afff 0x1582c4b000 - 0x1582c51fff 0x1582c52000 - 0x1582c52fff 0x1582c53000 - 0x1582c78fff 0x1582c79000 - 0x1582c7cfff 0x1582c7d000 - 0x1582c7dfff 0x1582c7e000 - 0x1582c7ffff 0x1582c80000 - 0x1582c80fff 0x1582c81000 - 0x1582c81fff 0x1582c82000 - 0x1582c82fff 0x1582c83000 - 0x1582c86fff 0x1582c87000 - 0x1582c87fff 0x1582c88000 - 0x1582c88fff 0x1582c89000 - 0x1582c8afff 0x1582c8b000 - 0x1582c8bfff 0x1582c8c000 - 0x1582c8cfff 0x1582c8d000 - 0x1582df8fff 0x1582df9000 - 0x1582dfbfff 0x1582dfc000 - 0x1582dfcfff 0x1582dfd000 - 0x1582dfffff 0x1582e00000 - 0x1582e12fff 0x1582e13000 - 0x1582e13fff 0x1582e14000 - 0x1582e14fff 0x1582e15000 - 0x1582f32fff 0x1582f33000 - 0x1582f35fff 0x1582f36000 - 0x1582f38fff 0x1582f39000 - 0x1582f3dfff 0x1582f3e000 - 0x1582f92fff 0x1582f93000 - 0x158363dfff 0x3fffeab000 - 0x3fffecbfff ;; 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 0x1d55d000 - 0x1d57dfff 0x80000000 - 0x800bffff 0x1567431000 - 0x156744bfff 0x156744c000 - 0x156744cfff 0x156744d000 - 0x156744dfff 0x156744e000 - 0x156744ffff 0x1567450000 - 0x1567451fff 0x1567452000 - 0x1567458fff 0x1567459000 - 0x1567459fff 0x156745a000 - 0x156745afff 0x156745c000 - 0x156745dfff 0x156745e000 - 0x156749cfff 0x156749d000 - 0x156749efff 0x156749f000 - 0x15674a5fff 0x15674a6000 - 0x15674a6fff 0x15674a7000 - 0x15674ccfff 0x15674cd000 - 0x15674d0fff 0x15674d1000 - 0x15674d1fff 0x15674d2000 - 0x15674d3fff 0x15674d4000 - 0x15674d4fff 0x15674d5000 - 0x15674d5fff 0x15674d6000 - 0x15674d6fff 0x15674d7000 - 0x15674dafff 0x15674db000 - 0x15674dbfff 0x15674dc000 - 0x15674dcfff 0x15674dd000 - 0x15674defff 0x15674df000 - 0x15674dffff 0x15674e0000 - 0x15674e0fff 0x15674e1000 - 0x156764cfff 0x156764d000 - 0x156764ffff 0x1567650000 - 0x1567650fff 0x1567651000 - 0x1567653fff 0x1567654000 - 0x1567666fff 0x1567667000 - 0x1567667fff 0x1567668000 - 0x1567668fff 0x1567669000 - 0x1567786fff 0x1567787000 - 0x1567789fff 0x156778a000 - 0x156778cfff 0x156778d000 - 0x1567791fff 0x1567792000 - 0x15677e6fff 0x15677e7000 - 0x1567e91fff 0x3fffbc0000 - 0x3fffbe0fff ;; 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 0x31dd4000 - 0x31df4fff 0x80000000 - 0x800bffff 0x1557c73000 - 0x1557c8dfff 0x1557c8e000 - 0x1557c8efff 0x1557c8f000 - 0x1557c8ffff 0x1557c90000 - 0x1557c91fff 0x1557c92000 - 0x1557c93fff 0x1557c94000 - 0x1557c9afff 0x1557c9b000 - 0x1557c9bfff 0x1557c9c000 - 0x1557c9cfff 0x1557c9e000 - 0x1557c9ffff 0x1557ca0000 - 0x1557cdefff 0x1557cdf000 - 0x1557ce0fff 0x1557ce1000 - 0x1557ce7fff 0x1557ce8000 - 0x1557ce8fff 0x1557ce9000 - 0x1557d0efff 0x1557d0f000 - 0x1557d12fff 0x1557d13000 - 0x1557d13fff 0x1557d14000 - 0x1557d15fff 0x1557d16000 - 0x1557d16fff 0x1557d17000 - 0x1557d17fff 0x1557d18000 - 0x1557d18fff 0x1557d19000 - 0x1557d1cfff 0x1557d1d000 - 0x1557d1dfff 0x1557d1e000 - 0x1557d1efff 0x1557d1f000 - 0x1557d20fff 0x1557d21000 - 0x1557d21fff 0x1557d22000 - 0x1557d22fff 0x1557d23000 - 0x1557e8efff 0x1557e8f000 - 0x1557e91fff 0x1557e92000 - 0x1557e92fff 0x1557e93000 - 0x1557e95fff 0x1557e96000 - 0x1557ea8fff 0x1557ea9000 - 0x1557ea9fff 0x1557eaa000 - 0x1557eaafff 0x1557eab000 - 0x1557fc8fff 0x1557fc9000 - 0x1557fcbfff 0x1557fcc000 - 0x1557fcefff 0x1557fcf000 - 0x1557fd3fff 0x1557fd4000 - 0x1558028fff 0x1558029000 - 0x15586d3fff 0x3fffa7a000 - 0x3fffa9afff ;; 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 0x3750d000 - 0x3752dfff 0x80000000 - 0x800bffff 0x156a351000 - 0x156a36bfff 0x156a36c000 - 0x156a36cfff 0x156a36d000 - 0x156a36dfff 0x156a36e000 - 0x156a36ffff 0x156a370000 - 0x156a371fff 0x156a372000 - 0x156a378fff 0x156a379000 - 0x156a379fff 0x156a37a000 - 0x156a37afff 0x156a37c000 - 0x156a37dfff 0x156a37e000 - 0x156a3bcfff 0x156a3bd000 - 0x156a3befff 0x156a3bf000 - 0x156a3c5fff 0x156a3c6000 - 0x156a3c6fff 0x156a3c7000 - 0x156a3ecfff 0x156a3ed000 - 0x156a3f0fff 0x156a3f1000 - 0x156a3f1fff 0x156a3f2000 - 0x156a3f3fff 0x156a3f4000 - 0x156a3f4fff 0x156a3f5000 - 0x156a3f5fff 0x156a3f6000 - 0x156a3f6fff 0x156a3f7000 - 0x156a3fafff 0x156a3fb000 - 0x156a3fbfff 0x156a3fc000 - 0x156a3fcfff 0x156a3fd000 - 0x156a3fefff 0x156a3ff000 - 0x156a3fffff 0x156a400000 - 0x156a400fff 0x156a401000 - 0x156a56cfff 0x156a56d000 - 0x156a56ffff 0x156a570000 - 0x156a570fff 0x156a571000 - 0x156a573fff 0x156a574000 - 0x156a586fff 0x156a587000 - 0x156a587fff 0x156a588000 - 0x156a588fff 0x156a589000 - 0x156a6a6fff 0x156a6a7000 - 0x156a6a9fff 0x156a6aa000 - 0x156a6acfff 0x156a6ad000 - 0x156a6b1fff 0x156a6b2000 - 0x156a706fff 0x156a707000 - 0x156adb1fff 0x3fffea4000 - 0x3fffec4fff ;; 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 0x33e3f000 - 0x33e5ffff 0x80000000 - 0x800bffff 0x158670a000 - 0x1586724fff 0x1586725000 - 0x1586725fff 0x1586726000 - 0x1586726fff 0x1586727000 - 0x1586728fff 0x1586729000 - 0x158672afff 0x158672b000 - 0x1586731fff 0x1586732000 - 0x1586732fff 0x1586733000 - 0x1586733fff 0x1586735000 - 0x1586736fff 0x1586737000 - 0x1586775fff 0x1586776000 - 0x1586777fff 0x1586778000 - 0x158677efff 0x158677f000 - 0x158677ffff 0x1586780000 - 0x15867a5fff 0x15867a6000 - 0x15867a9fff 0x15867aa000 - 0x15867aafff 0x15867ab000 - 0x15867acfff 0x15867ad000 - 0x15867adfff 0x15867ae000 - 0x15867aefff 0x15867af000 - 0x15867affff 0x15867b0000 - 0x15867b3fff 0x15867b4000 - 0x15867b4fff 0x15867b5000 - 0x15867b5fff 0x15867b6000 - 0x15867b7fff 0x15867b8000 - 0x15867b8fff 0x15867b9000 - 0x15867b9fff 0x15867ba000 - 0x1586925fff 0x1586926000 - 0x1586928fff 0x1586929000 - 0x1586929fff 0x158692a000 - 0x158692cfff 0x158692d000 - 0x158693ffff 0x1586940000 - 0x1586940fff 0x1586941000 - 0x1586941fff 0x1586942000 - 0x1586a5ffff 0x1586a60000 - 0x1586a62fff 0x1586a63000 - 0x1586a65fff 0x1586a66000 - 0x1586a6afff 0x1586a6b000 - 0x1586abffff 0x1586ac0000 - 0x158716afff 0x3fffe91000 - 0x3fffeb1fff ;; 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 0x16c14000 - 0x16c34fff 0x80000000 - 0x800bffff 0x159206a000 - 0x1592084fff 0x1592085000 - 0x1592085fff 0x1592086000 - 0x1592086fff 0x1592087000 - 0x1592088fff 0x1592089000 - 0x159208afff 0x159208b000 - 0x1592091fff 0x1592092000 - 0x1592092fff 0x1592093000 - 0x1592093fff 0x1592095000 - 0x1592096fff 0x1592097000 - 0x15920d5fff 0x15920d6000 - 0x15920d7fff 0x15920d8000 - 0x15920defff 0x15920df000 - 0x15920dffff 0x15920e0000 - 0x1592105fff 0x1592106000 - 0x1592109fff 0x159210a000 - 0x159210afff 0x159210b000 - 0x159210cfff 0x159210d000 - 0x159210dfff 0x159210e000 - 0x159210efff 0x159210f000 - 0x159210ffff 0x1592110000 - 0x1592113fff 0x1592114000 - 0x1592114fff 0x1592115000 - 0x1592115fff 0x1592116000 - 0x1592117fff 0x1592118000 - 0x1592118fff 0x1592119000 - 0x1592119fff 0x159211a000 - 0x1592285fff 0x1592286000 - 0x1592288fff 0x1592289000 - 0x1592289fff 0x159228a000 - 0x159228cfff 0x159228d000 - 0x159229ffff 0x15922a0000 - 0x15922a0fff 0x15922a1000 - 0x15922a1fff 0x15922a2000 - 0x15923bffff 0x15923c0000 - 0x15923c2fff 0x15923c3000 - 0x15923c5fff 0x15923c6000 - 0x15923cafff 0x15923cb000 - 0x159241ffff 0x1592420000 - 0x1592acafff 0x3fff879000 - 0x3fff899fff ;; 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 0x34aee000 - 0x34b0efff 0x80000000 - 0x800bffff 0x158b753000 - 0x158b76dfff 0x158b76e000 - 0x158b76efff 0x158b76f000 - 0x158b76ffff 0x158b770000 - 0x158b771fff 0x158b772000 - 0x158b773fff 0x158b774000 - 0x158b77afff 0x158b77b000 - 0x158b77bfff 0x158b77c000 - 0x158b77cfff 0x158b77e000 - 0x158b77ffff 0x158b780000 - 0x158b7befff 0x158b7bf000 - 0x158b7c0fff 0x158b7c1000 - 0x158b7c7fff 0x158b7c8000 - 0x158b7c8fff 0x158b7c9000 - 0x158b7eefff 0x158b7ef000 - 0x158b7f2fff 0x158b7f3000 - 0x158b7f3fff 0x158b7f4000 - 0x158b7f5fff 0x158b7f6000 - 0x158b7f6fff 0x158b7f7000 - 0x158b7f7fff 0x158b7f8000 - 0x158b7f8fff 0x158b7f9000 - 0x158b7fcfff 0x158b7fd000 - 0x158b7fdfff 0x158b7fe000 - 0x158b7fefff 0x158b7ff000 - 0x158b800fff 0x158b801000 - 0x158b801fff 0x158b802000 - 0x158b802fff 0x158b803000 - 0x158b96efff 0x158b96f000 - 0x158b971fff 0x158b972000 - 0x158b972fff 0x158b973000 - 0x158b975fff 0x158b976000 - 0x158b988fff 0x158b989000 - 0x158b989fff 0x158b98a000 - 0x158b98afff 0x158b98b000 - 0x158baa8fff 0x158baa9000 - 0x158baabfff 0x158baac000 - 0x158baaefff 0x158baaf000 - 0x158bab3fff 0x158bab4000 - 0x158bb08fff 0x158bb09000 - 0x158c1b3fff 0x3fffdb2000 - 0x3fffdd2fff ;; 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 0x28ee4000 - 0x28f04fff 0x80000000 - 0x800bffff 0x157dec8000 - 0x157dee2fff 0x157dee3000 - 0x157dee3fff 0x157dee4000 - 0x157dee4fff 0x157dee5000 - 0x157dee6fff 0x157dee7000 - 0x157dee8fff 0x157dee9000 - 0x157deeffff 0x157def0000 - 0x157def0fff 0x157def1000 - 0x157def1fff 0x157def3000 - 0x157def4fff 0x157def5000 - 0x157df33fff 0x157df34000 - 0x157df35fff 0x157df36000 - 0x157df3cfff 0x157df3d000 - 0x157df3dfff 0x157df3e000 - 0x157df63fff 0x157df64000 - 0x157df67fff 0x157df68000 - 0x157df68fff 0x157df69000 - 0x157df6afff 0x157df6b000 - 0x157df6bfff 0x157df6c000 - 0x157df6cfff 0x157df6d000 - 0x157df6dfff 0x157df6e000 - 0x157df71fff 0x157df72000 - 0x157df72fff 0x157df73000 - 0x157df73fff 0x157df74000 - 0x157df75fff 0x157df76000 - 0x157df76fff 0x157df77000 - 0x157df77fff 0x157df78000 - 0x157e0e3fff 0x157e0e4000 - 0x157e0e6fff 0x157e0e7000 - 0x157e0e7fff 0x157e0e8000 - 0x157e0eafff 0x157e0eb000 - 0x157e0fdfff 0x157e0fe000 - 0x157e0fefff 0x157e0ff000 - 0x157e0fffff 0x157e100000 - 0x157e21dfff 0x157e21e000 - 0x157e220fff 0x157e221000 - 0x157e223fff 0x157e224000 - 0x157e228fff 0x157e229000 - 0x157e27dfff 0x157e27e000 - 0x157e928fff 0x3fffa6d000 - 0x3fffa8dfff ;; 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 0x24b0a000 - 0x24b2afff 0x80000000 - 0x800bffff 0x1556480000 - 0x155649afff 0x155649b000 - 0x155649bfff 0x155649c000 - 0x155649cfff 0x155649d000 - 0x155649efff 0x155649f000 - 0x15564a0fff 0x15564a1000 - 0x15564a7fff 0x15564a8000 - 0x15564a8fff 0x15564a9000 - 0x15564a9fff 0x15564ab000 - 0x15564acfff 0x15564ad000 - 0x15564ebfff 0x15564ec000 - 0x15564edfff 0x15564ee000 - 0x15564f4fff 0x15564f5000 - 0x15564f5fff 0x15564f6000 - 0x155651bfff 0x155651c000 - 0x155651ffff 0x1556520000 - 0x1556520fff 0x1556521000 - 0x1556522fff 0x1556523000 - 0x1556523fff 0x1556524000 - 0x1556524fff 0x1556525000 - 0x1556525fff 0x1556526000 - 0x1556529fff 0x155652a000 - 0x155652afff 0x155652b000 - 0x155652bfff 0x155652c000 - 0x155652dfff 0x155652e000 - 0x155652efff 0x155652f000 - 0x155652ffff 0x1556530000 - 0x155669bfff 0x155669c000 - 0x155669efff 0x155669f000 - 0x155669ffff 0x15566a0000 - 0x15566a2fff 0x15566a3000 - 0x15566b5fff 0x15566b6000 - 0x15566b6fff 0x15566b7000 - 0x15566b7fff 0x15566b8000 - 0x15567d5fff 0x15567d6000 - 0x15567d8fff 0x15567d9000 - 0x15567dbfff 0x15567dc000 - 0x15567e0fff 0x15567e1000 - 0x1556835fff 0x1556836000 - 0x1556ee0fff 0x3fff919000 - 0x3fff939fff ;; 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 0xabd1000 - 0xabf1fff 0x80000000 - 0x800bffff 0x1564e86000 - 0x1564ea0fff 0x1564ea1000 - 0x1564ea1fff 0x1564ea2000 - 0x1564ea2fff 0x1564ea3000 - 0x1564ea4fff 0x1564ea5000 - 0x1564ea6fff 0x1564ea7000 - 0x1564eadfff 0x1564eae000 - 0x1564eaefff 0x1564eaf000 - 0x1564eaffff 0x1564eb1000 - 0x1564eb2fff 0x1564eb3000 - 0x1564ef1fff 0x1564ef2000 - 0x1564ef3fff 0x1564ef4000 - 0x1564efafff 0x1564efb000 - 0x1564efbfff 0x1564efc000 - 0x1564f21fff 0x1564f22000 - 0x1564f25fff 0x1564f26000 - 0x1564f26fff 0x1564f27000 - 0x1564f28fff 0x1564f29000 - 0x1564f29fff 0x1564f2a000 - 0x1564f2afff 0x1564f2b000 - 0x1564f2bfff 0x1564f2c000 - 0x1564f2ffff 0x1564f30000 - 0x1564f30fff 0x1564f31000 - 0x1564f31fff 0x1564f32000 - 0x1564f33fff 0x1564f34000 - 0x1564f34fff 0x1564f35000 - 0x1564f35fff 0x1564f36000 - 0x15650a1fff 0x15650a2000 - 0x15650a4fff 0x15650a5000 - 0x15650a5fff 0x15650a6000 - 0x15650a8fff 0x15650a9000 - 0x15650bbfff 0x15650bc000 - 0x15650bcfff 0x15650bd000 - 0x15650bdfff 0x15650be000 - 0x15651dbfff 0x15651dc000 - 0x15651defff 0x15651df000 - 0x15651e1fff 0x15651e2000 - 0x15651e6fff 0x15651e7000 - 0x156523bfff 0x156523c000 - 0x15658e6fff 0x3fffd7c000 - 0x3fffd9cfff ;; 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 0x2656000 - 0x2676fff 0x80000000 - 0x800bffff 0x1586a28000 - 0x1586a42fff 0x1586a43000 - 0x1586a43fff 0x1586a44000 - 0x1586a44fff 0x1586a45000 - 0x1586a46fff 0x1586a47000 - 0x1586a48fff 0x1586a49000 - 0x1586a4ffff 0x1586a50000 - 0x1586a50fff 0x1586a51000 - 0x1586a51fff 0x1586a53000 - 0x1586a54fff 0x1586a55000 - 0x1586a93fff 0x1586a94000 - 0x1586a95fff 0x1586a96000 - 0x1586a9cfff 0x1586a9d000 - 0x1586a9dfff 0x1586a9e000 - 0x1586ac3fff 0x1586ac4000 - 0x1586ac7fff 0x1586ac8000 - 0x1586ac8fff 0x1586ac9000 - 0x1586acafff 0x1586acb000 - 0x1586acbfff 0x1586acc000 - 0x1586accfff 0x1586acd000 - 0x1586acdfff 0x1586ace000 - 0x1586ad1fff 0x1586ad2000 - 0x1586ad2fff 0x1586ad3000 - 0x1586ad3fff 0x1586ad4000 - 0x1586ad5fff 0x1586ad6000 - 0x1586ad6fff 0x1586ad7000 - 0x1586ad7fff 0x1586ad8000 - 0x1586c43fff 0x1586c44000 - 0x1586c46fff 0x1586c47000 - 0x1586c47fff 0x1586c48000 - 0x1586c4afff 0x1586c4b000 - 0x1586c5dfff 0x1586c5e000 - 0x1586c5efff 0x1586c5f000 - 0x1586c5ffff 0x1586c60000 - 0x1586d7dfff 0x1586d7e000 - 0x1586d80fff 0x1586d81000 - 0x1586d83fff 0x1586d84000 - 0x1586d88fff 0x1586d89000 - 0x1586dddfff 0x1586dde000 - 0x1587488fff 0x3fff853000 - 0x3fff873fff ;; 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 0x27bea000 - 0x27c0afff 0x80000000 - 0x800bffff 0x156cb70000 - 0x156cb8afff 0x156cb8b000 - 0x156cb8bfff 0x156cb8c000 - 0x156cb8cfff 0x156cb8d000 - 0x156cb8efff 0x156cb8f000 - 0x156cb90fff 0x156cb91000 - 0x156cb97fff 0x156cb98000 - 0x156cb98fff 0x156cb99000 - 0x156cb99fff 0x156cb9b000 - 0x156cb9cfff 0x156cb9d000 - 0x156cbdbfff 0x156cbdc000 - 0x156cbddfff 0x156cbde000 - 0x156cbe4fff 0x156cbe5000 - 0x156cbe5fff 0x156cbe6000 - 0x156cc0bfff 0x156cc0c000 - 0x156cc0ffff 0x156cc10000 - 0x156cc10fff 0x156cc11000 - 0x156cc12fff 0x156cc13000 - 0x156cc13fff 0x156cc14000 - 0x156cc14fff 0x156cc15000 - 0x156cc15fff 0x156cc16000 - 0x156cc19fff 0x156cc1a000 - 0x156cc1afff 0x156cc1b000 - 0x156cc1bfff 0x156cc1c000 - 0x156cc1dfff 0x156cc1e000 - 0x156cc1efff 0x156cc1f000 - 0x156cc1ffff 0x156cc20000 - 0x156cd8bfff 0x156cd8c000 - 0x156cd8efff 0x156cd8f000 - 0x156cd8ffff 0x156cd90000 - 0x156cd92fff 0x156cd93000 - 0x156cda5fff 0x156cda6000 - 0x156cda6fff 0x156cda7000 - 0x156cda7fff 0x156cda8000 - 0x156cec5fff 0x156cec6000 - 0x156cec8fff 0x156cec9000 - 0x156cecbfff 0x156cecc000 - 0x156ced0fff 0x156ced1000 - 0x156cf25fff 0x156cf26000 - 0x156d5d0fff 0x3ffff36000 - 0x3ffff56fff ;; 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 0xdc29000 - 0xdc49fff 0x80000000 - 0x800bffff 0x1584c42000 - 0x1584c5cfff 0x1584c5d000 - 0x1584c5dfff 0x1584c5e000 - 0x1584c5efff 0x1584c5f000 - 0x1584c60fff 0x1584c61000 - 0x1584c62fff 0x1584c63000 - 0x1584c69fff 0x1584c6a000 - 0x1584c6afff 0x1584c6b000 - 0x1584c6bfff 0x1584c6d000 - 0x1584c6efff 0x1584c6f000 - 0x1584cadfff 0x1584cae000 - 0x1584caffff 0x1584cb0000 - 0x1584cb6fff 0x1584cb7000 - 0x1584cb7fff 0x1584cb8000 - 0x1584cddfff 0x1584cde000 - 0x1584ce1fff 0x1584ce2000 - 0x1584ce2fff 0x1584ce3000 - 0x1584ce4fff 0x1584ce5000 - 0x1584ce5fff 0x1584ce6000 - 0x1584ce6fff 0x1584ce7000 - 0x1584ce7fff 0x1584ce8000 - 0x1584cebfff 0x1584cec000 - 0x1584cecfff 0x1584ced000 - 0x1584cedfff 0x1584cee000 - 0x1584ceffff 0x1584cf0000 - 0x1584cf0fff 0x1584cf1000 - 0x1584cf1fff 0x1584cf2000 - 0x1584e5dfff 0x1584e5e000 - 0x1584e60fff 0x1584e61000 - 0x1584e61fff 0x1584e62000 - 0x1584e64fff 0x1584e65000 - 0x1584e77fff 0x1584e78000 - 0x1584e78fff 0x1584e79000 - 0x1584e79fff 0x1584e7a000 - 0x1584f97fff 0x1584f98000 - 0x1584f9afff 0x1584f9b000 - 0x1584f9dfff 0x1584f9e000 - 0x1584fa2fff 0x1584fa3000 - 0x1584ff7fff 0x1584ff8000 - 0x15856a2fff 0x3fffa0a000 - 0x3fffa2afff ;; 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 0x2bf57000 - 0x2bf77fff 0x80000000 - 0x800bffff 0x157a423000 - 0x157a43dfff 0x157a43e000 - 0x157a43efff 0x157a43f000 - 0x157a43ffff 0x157a440000 - 0x157a441fff 0x157a442000 - 0x157a443fff 0x157a444000 - 0x157a44afff 0x157a44b000 - 0x157a44bfff 0x157a44c000 - 0x157a44cfff 0x157a44e000 - 0x157a44ffff 0x157a450000 - 0x157a48efff 0x157a48f000 - 0x157a490fff 0x157a491000 - 0x157a497fff 0x157a498000 - 0x157a498fff 0x157a499000 - 0x157a4befff 0x157a4bf000 - 0x157a4c2fff 0x157a4c3000 - 0x157a4c3fff 0x157a4c4000 - 0x157a4c5fff 0x157a4c6000 - 0x157a4c6fff 0x157a4c7000 - 0x157a4c7fff 0x157a4c8000 - 0x157a4c8fff 0x157a4c9000 - 0x157a4ccfff 0x157a4cd000 - 0x157a4cdfff 0x157a4ce000 - 0x157a4cefff 0x157a4cf000 - 0x157a4d0fff 0x157a4d1000 - 0x157a4d1fff 0x157a4d2000 - 0x157a4d2fff 0x157a4d3000 - 0x157a63efff 0x157a63f000 - 0x157a641fff 0x157a642000 - 0x157a642fff 0x157a643000 - 0x157a645fff 0x157a646000 - 0x157a658fff 0x157a659000 - 0x157a659fff 0x157a65a000 - 0x157a65afff 0x157a65b000 - 0x157a778fff 0x157a779000 - 0x157a77bfff 0x157a77c000 - 0x157a77efff 0x157a77f000 - 0x157a783fff 0x157a784000 - 0x157a7d8fff 0x157a7d9000 - 0x157ae83fff 0x3fffaae000 - 0x3fffacefff ;; 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 0x2d08a000 - 0x2d0aafff 0x80000000 - 0x800bffff 0x1583e23000 - 0x1583e3dfff 0x1583e3e000 - 0x1583e3efff 0x1583e3f000 - 0x1583e3ffff 0x1583e40000 - 0x1583e41fff 0x1583e42000 - 0x1583e43fff 0x1583e44000 - 0x1583e4afff 0x1583e4b000 - 0x1583e4bfff 0x1583e4c000 - 0x1583e4cfff 0x1583e4e000 - 0x1583e4ffff 0x1583e50000 - 0x1583e8efff 0x1583e8f000 - 0x1583e90fff 0x1583e91000 - 0x1583e97fff 0x1583e98000 - 0x1583e98fff 0x1583e99000 - 0x1583ebefff 0x1583ebf000 - 0x1583ec2fff 0x1583ec3000 - 0x1583ec3fff 0x1583ec4000 - 0x1583ec5fff 0x1583ec6000 - 0x1583ec6fff 0x1583ec7000 - 0x1583ec7fff 0x1583ec8000 - 0x1583ec8fff 0x1583ec9000 - 0x1583eccfff 0x1583ecd000 - 0x1583ecdfff 0x1583ece000 - 0x1583ecefff 0x1583ecf000 - 0x1583ed0fff 0x1583ed1000 - 0x1583ed1fff 0x1583ed2000 - 0x1583ed2fff 0x1583ed3000 - 0x158403efff 0x158403f000 - 0x1584041fff 0x1584042000 - 0x1584042fff 0x1584043000 - 0x1584045fff 0x1584046000 - 0x1584058fff 0x1584059000 - 0x1584059fff 0x158405a000 - 0x158405afff 0x158405b000 - 0x1584178fff 0x1584179000 - 0x158417bfff 0x158417c000 - 0x158417efff 0x158417f000 - 0x1584183fff 0x1584184000 - 0x15841d8fff 0x15841d9000 - 0x1584883fff 0x3fffebb000 - 0x3fffedbfff ;; 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 0x3dec000 - 0x3e0cfff 0x80000000 - 0x800bffff 0x1570622000 - 0x157063cfff 0x157063d000 - 0x157063dfff 0x157063e000 - 0x157063efff 0x157063f000 - 0x1570640fff 0x1570641000 - 0x1570642fff 0x1570643000 - 0x1570649fff 0x157064a000 - 0x157064afff 0x157064b000 - 0x157064bfff 0x157064d000 - 0x157064efff 0x157064f000 - 0x157068dfff 0x157068e000 - 0x157068ffff 0x1570690000 - 0x1570696fff 0x1570697000 - 0x1570697fff 0x1570698000 - 0x15706bdfff 0x15706be000 - 0x15706c1fff 0x15706c2000 - 0x15706c2fff 0x15706c3000 - 0x15706c4fff 0x15706c5000 - 0x15706c5fff 0x15706c6000 - 0x15706c6fff 0x15706c7000 - 0x15706c7fff 0x15706c8000 - 0x15706cbfff 0x15706cc000 - 0x15706ccfff 0x15706cd000 - 0x15706cdfff 0x15706ce000 - 0x15706cffff 0x15706d0000 - 0x15706d0fff 0x15706d1000 - 0x15706d1fff 0x15706d2000 - 0x157083dfff 0x157083e000 - 0x1570840fff 0x1570841000 - 0x1570841fff 0x1570842000 - 0x1570844fff 0x1570845000 - 0x1570857fff 0x1570858000 - 0x1570858fff 0x1570859000 - 0x1570859fff 0x157085a000 - 0x1570977fff 0x1570978000 - 0x157097afff 0x157097b000 - 0x157097dfff 0x157097e000 - 0x1570982fff 0x1570983000 - 0x15709d7fff 0x15709d8000 - 0x1571082fff 0x3fffb55000 - 0x3fffb75fff ;; 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 0x38135000 - 0x38155fff 0x80000000 - 0x800bffff 0x15641a9000 - 0x15641c3fff 0x15641c4000 - 0x15641c4fff 0x15641c5000 - 0x15641c5fff 0x15641c6000 - 0x15641c7fff 0x15641c8000 - 0x15641c9fff 0x15641ca000 - 0x15641d0fff 0x15641d1000 - 0x15641d1fff 0x15641d2000 - 0x15641d2fff 0x15641d4000 - 0x15641d5fff 0x15641d6000 - 0x1564214fff 0x1564215000 - 0x1564216fff 0x1564217000 - 0x156421dfff 0x156421e000 - 0x156421efff 0x156421f000 - 0x1564244fff 0x1564245000 - 0x1564248fff 0x1564249000 - 0x1564249fff 0x156424a000 - 0x156424bfff 0x156424c000 - 0x156424cfff 0x156424d000 - 0x156424dfff 0x156424e000 - 0x156424efff 0x156424f000 - 0x1564252fff 0x1564253000 - 0x1564253fff 0x1564254000 - 0x1564254fff 0x1564255000 - 0x1564256fff 0x1564257000 - 0x1564257fff 0x1564258000 - 0x1564258fff 0x1564259000 - 0x15643c4fff 0x15643c5000 - 0x15643c7fff 0x15643c8000 - 0x15643c8fff 0x15643c9000 - 0x15643cbfff 0x15643cc000 - 0x15643defff 0x15643df000 - 0x15643dffff 0x15643e0000 - 0x15643e0fff 0x15643e1000 - 0x15644fefff 0x15644ff000 - 0x1564501fff 0x1564502000 - 0x1564504fff 0x1564505000 - 0x1564509fff 0x156450a000 - 0x156455efff 0x156455f000 - 0x1564c09fff 0x3fffa42000 - 0x3fffa62fff ;; 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 0x32b81000 - 0x32ba1fff 0x80000000 - 0x800bffff 0x15604b2000 - 0x15604ccfff 0x15604cd000 - 0x15604cdfff 0x15604ce000 - 0x15604cefff 0x15604cf000 - 0x15604d0fff 0x15604d1000 - 0x15604d2fff 0x15604d3000 - 0x15604d9fff 0x15604da000 - 0x15604dafff 0x15604db000 - 0x15604dbfff 0x15604dd000 - 0x15604defff 0x15604df000 - 0x156051dfff 0x156051e000 - 0x156051ffff 0x1560520000 - 0x1560526fff 0x1560527000 - 0x1560527fff 0x1560528000 - 0x156054dfff 0x156054e000 - 0x1560551fff 0x1560552000 - 0x1560552fff 0x1560553000 - 0x1560554fff 0x1560555000 - 0x1560555fff 0x1560556000 - 0x1560556fff 0x1560557000 - 0x1560557fff 0x1560558000 - 0x156055bfff 0x156055c000 - 0x156055cfff 0x156055d000 - 0x156055dfff 0x156055e000 - 0x156055ffff 0x1560560000 - 0x1560560fff 0x1560561000 - 0x1560561fff 0x1560562000 - 0x15606cdfff 0x15606ce000 - 0x15606d0fff 0x15606d1000 - 0x15606d1fff 0x15606d2000 - 0x15606d4fff 0x15606d5000 - 0x15606e7fff 0x15606e8000 - 0x15606e8fff 0x15606e9000 - 0x15606e9fff 0x15606ea000 - 0x1560807fff 0x1560808000 - 0x156080afff 0x156080b000 - 0x156080dfff 0x156080e000 - 0x1560812fff 0x1560813000 - 0x1560867fff 0x1560868000 - 0x1560f12fff 0x3fffda2000 - 0x3fffdc2fff ;; 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 0xbb6c000 - 0xbb8cfff 0x80000000 - 0x800bffff 0x156dfd4000 - 0x156dfeefff 0x156dfef000 - 0x156dfeffff 0x156dff0000 - 0x156dff0fff 0x156dff1000 - 0x156dff2fff 0x156dff3000 - 0x156dff4fff 0x156dff5000 - 0x156dffbfff 0x156dffc000 - 0x156dffcfff 0x156dffd000 - 0x156dffdfff 0x156dfff000 - 0x156e000fff 0x156e001000 - 0x156e03ffff 0x156e040000 - 0x156e041fff 0x156e042000 - 0x156e048fff 0x156e049000 - 0x156e049fff 0x156e04a000 - 0x156e06ffff 0x156e070000 - 0x156e073fff 0x156e074000 - 0x156e074fff 0x156e075000 - 0x156e076fff 0x156e077000 - 0x156e077fff 0x156e078000 - 0x156e078fff 0x156e079000 - 0x156e079fff 0x156e07a000 - 0x156e07dfff 0x156e07e000 - 0x156e07efff 0x156e07f000 - 0x156e07ffff 0x156e080000 - 0x156e081fff 0x156e082000 - 0x156e082fff 0x156e083000 - 0x156e083fff 0x156e084000 - 0x156e1effff 0x156e1f0000 - 0x156e1f2fff 0x156e1f3000 - 0x156e1f3fff 0x156e1f4000 - 0x156e1f6fff 0x156e1f7000 - 0x156e209fff 0x156e20a000 - 0x156e20afff 0x156e20b000 - 0x156e20bfff 0x156e20c000 - 0x156e329fff 0x156e32a000 - 0x156e32cfff 0x156e32d000 - 0x156e32ffff 0x156e330000 - 0x156e334fff 0x156e335000 - 0x156e389fff 0x156e38a000 - 0x156ea34fff 0x3fffe88000 - 0x3fffea8fff ;; 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 0x2eaeb000 - 0x2eb0bfff 0x80000000 - 0x800bffff 0x1576c57000 - 0x1576c71fff 0x1576c72000 - 0x1576c72fff 0x1576c73000 - 0x1576c73fff 0x1576c74000 - 0x1576c75fff 0x1576c76000 - 0x1576c77fff 0x1576c78000 - 0x1576c7efff 0x1576c7f000 - 0x1576c7ffff 0x1576c80000 - 0x1576c80fff 0x1576c82000 - 0x1576c83fff 0x1576c84000 - 0x1576cc2fff 0x1576cc3000 - 0x1576cc4fff 0x1576cc5000 - 0x1576ccbfff 0x1576ccc000 - 0x1576cccfff 0x1576ccd000 - 0x1576cf2fff 0x1576cf3000 - 0x1576cf6fff 0x1576cf7000 - 0x1576cf7fff 0x1576cf8000 - 0x1576cf9fff 0x1576cfa000 - 0x1576cfafff 0x1576cfb000 - 0x1576cfbfff 0x1576cfc000 - 0x1576cfcfff 0x1576cfd000 - 0x1576d00fff 0x1576d01000 - 0x1576d01fff 0x1576d02000 - 0x1576d02fff 0x1576d03000 - 0x1576d04fff 0x1576d05000 - 0x1576d05fff 0x1576d06000 - 0x1576d06fff 0x1576d07000 - 0x1576e72fff 0x1576e73000 - 0x1576e75fff 0x1576e76000 - 0x1576e76fff 0x1576e77000 - 0x1576e79fff 0x1576e7a000 - 0x1576e8cfff 0x1576e8d000 - 0x1576e8dfff 0x1576e8e000 - 0x1576e8efff 0x1576e8f000 - 0x1576facfff 0x1576fad000 - 0x1576faffff 0x1576fb0000 - 0x1576fb2fff 0x1576fb3000 - 0x1576fb7fff 0x1576fb8000 - 0x157700cfff 0x157700d000 - 0x15776b7fff 0x3fffb90000 - 0x3fffbb0fff ;; 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 0x23662000 - 0x23682fff 0x80000000 - 0x800bffff 0x1588328000 - 0x1588342fff 0x1588343000 - 0x1588343fff 0x1588344000 - 0x1588344fff 0x1588345000 - 0x1588346fff 0x1588347000 - 0x1588348fff 0x1588349000 - 0x158834ffff 0x1588350000 - 0x1588350fff 0x1588351000 - 0x1588351fff 0x1588353000 - 0x1588354fff 0x1588355000 - 0x1588393fff 0x1588394000 - 0x1588395fff 0x1588396000 - 0x158839cfff 0x158839d000 - 0x158839dfff 0x158839e000 - 0x15883c3fff 0x15883c4000 - 0x15883c7fff 0x15883c8000 - 0x15883c8fff 0x15883c9000 - 0x15883cafff 0x15883cb000 - 0x15883cbfff 0x15883cc000 - 0x15883ccfff 0x15883cd000 - 0x15883cdfff 0x15883ce000 - 0x15883d1fff 0x15883d2000 - 0x15883d2fff 0x15883d3000 - 0x15883d3fff 0x15883d4000 - 0x15883d5fff 0x15883d6000 - 0x15883d6fff 0x15883d7000 - 0x15883d7fff 0x15883d8000 - 0x1588543fff 0x1588544000 - 0x1588546fff 0x1588547000 - 0x1588547fff 0x1588548000 - 0x158854afff 0x158854b000 - 0x158855dfff 0x158855e000 - 0x158855efff 0x158855f000 - 0x158855ffff 0x1588560000 - 0x158867dfff 0x158867e000 - 0x1588680fff 0x1588681000 - 0x1588683fff 0x1588684000 - 0x1588688fff 0x1588689000 - 0x15886ddfff 0x15886de000 - 0x1588d88fff 0x3fff9e3000 - 0x3fffa03fff ;; 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 0x32e61000 - 0x32e81fff 0x80000000 - 0x800bffff 0x15880a2000 - 0x15880bcfff 0x15880bd000 - 0x15880bdfff 0x15880be000 - 0x15880befff 0x15880bf000 - 0x15880c0fff 0x15880c1000 - 0x15880c2fff 0x15880c3000 - 0x15880c9fff 0x15880ca000 - 0x15880cafff 0x15880cb000 - 0x15880cbfff 0x15880cd000 - 0x15880cefff 0x15880cf000 - 0x158810dfff 0x158810e000 - 0x158810ffff 0x1588110000 - 0x1588116fff 0x1588117000 - 0x1588117fff 0x1588118000 - 0x158813dfff 0x158813e000 - 0x1588141fff 0x1588142000 - 0x1588142fff 0x1588143000 - 0x1588144fff 0x1588145000 - 0x1588145fff 0x1588146000 - 0x1588146fff 0x1588147000 - 0x1588147fff 0x1588148000 - 0x158814bfff 0x158814c000 - 0x158814cfff 0x158814d000 - 0x158814dfff 0x158814e000 - 0x158814ffff 0x1588150000 - 0x1588150fff 0x1588151000 - 0x1588151fff 0x1588152000 - 0x15882bdfff 0x15882be000 - 0x15882c0fff 0x15882c1000 - 0x15882c1fff 0x15882c2000 - 0x15882c4fff 0x15882c5000 - 0x15882d7fff 0x15882d8000 - 0x15882d8fff 0x15882d9000 - 0x15882d9fff 0x15882da000 - 0x15883f7fff 0x15883f8000 - 0x15883fafff 0x15883fb000 - 0x15883fdfff 0x15883fe000 - 0x1588402fff 0x1588403000 - 0x1588457fff 0x1588458000 - 0x1588b02fff 0x3fffd53000 - 0x3fffd73fff ;; 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 0x756d000 - 0x758dfff 0x80000000 - 0x800bffff 0x15680e5000 - 0x15680fffff 0x1568100000 - 0x1568100fff 0x1568101000 - 0x1568101fff 0x1568102000 - 0x1568103fff 0x1568104000 - 0x1568105fff 0x1568106000 - 0x156810cfff 0x156810d000 - 0x156810dfff 0x156810e000 - 0x156810efff 0x1568110000 - 0x1568111fff 0x1568112000 - 0x1568150fff 0x1568151000 - 0x1568152fff 0x1568153000 - 0x1568159fff 0x156815a000 - 0x156815afff 0x156815b000 - 0x1568180fff 0x1568181000 - 0x1568184fff 0x1568185000 - 0x1568185fff 0x1568186000 - 0x1568187fff 0x1568188000 - 0x1568188fff 0x1568189000 - 0x1568189fff 0x156818a000 - 0x156818afff 0x156818b000 - 0x156818efff 0x156818f000 - 0x156818ffff 0x1568190000 - 0x1568190fff 0x1568191000 - 0x1568192fff 0x1568193000 - 0x1568193fff 0x1568194000 - 0x1568194fff 0x1568195000 - 0x1568300fff 0x1568301000 - 0x1568303fff 0x1568304000 - 0x1568304fff 0x1568305000 - 0x1568307fff 0x1568308000 - 0x156831afff 0x156831b000 - 0x156831bfff 0x156831c000 - 0x156831cfff 0x156831d000 - 0x156843afff 0x156843b000 - 0x156843dfff 0x156843e000 - 0x1568440fff 0x1568441000 - 0x1568445fff 0x1568446000 - 0x156849afff 0x156849b000 - 0x1568b45fff 0x3fff7e8000 - 0x3fff808fff ;; 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 0x1867c000 - 0x1869cfff 0x80000000 - 0x800bffff 0x1574b67000 - 0x1574b81fff 0x1574b82000 - 0x1574b82fff 0x1574b83000 - 0x1574b83fff 0x1574b84000 - 0x1574b85fff 0x1574b86000 - 0x1574b87fff 0x1574b88000 - 0x1574b8efff 0x1574b8f000 - 0x1574b8ffff 0x1574b90000 - 0x1574b90fff 0x1574b92000 - 0x1574b93fff 0x1574b94000 - 0x1574bd2fff 0x1574bd3000 - 0x1574bd4fff 0x1574bd5000 - 0x1574bdbfff 0x1574bdc000 - 0x1574bdcfff 0x1574bdd000 - 0x1574c02fff 0x1574c03000 - 0x1574c06fff 0x1574c07000 - 0x1574c07fff 0x1574c08000 - 0x1574c09fff 0x1574c0a000 - 0x1574c0afff 0x1574c0b000 - 0x1574c0bfff 0x1574c0c000 - 0x1574c0cfff 0x1574c0d000 - 0x1574c10fff 0x1574c11000 - 0x1574c11fff 0x1574c12000 - 0x1574c12fff 0x1574c13000 - 0x1574c14fff 0x1574c15000 - 0x1574c15fff 0x1574c16000 - 0x1574c16fff 0x1574c17000 - 0x1574d82fff 0x1574d83000 - 0x1574d85fff 0x1574d86000 - 0x1574d86fff 0x1574d87000 - 0x1574d89fff 0x1574d8a000 - 0x1574d9cfff 0x1574d9d000 - 0x1574d9dfff 0x1574d9e000 - 0x1574d9efff 0x1574d9f000 - 0x1574ebcfff 0x1574ebd000 - 0x1574ebffff 0x1574ec0000 - 0x1574ec2fff 0x1574ec3000 - 0x1574ec7fff 0x1574ec8000 - 0x1574f1cfff 0x1574f1d000 - 0x15755c7fff 0x3fff848000 - 0x3fff868fff ;; 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 0x1365e000 - 0x1367efff 0x80000000 - 0x800bffff 0x156b9d1000 - 0x156b9ebfff 0x156b9ec000 - 0x156b9ecfff 0x156b9ed000 - 0x156b9edfff 0x156b9ee000 - 0x156b9effff 0x156b9f0000 - 0x156b9f1fff 0x156b9f2000 - 0x156b9f8fff 0x156b9f9000 - 0x156b9f9fff 0x156b9fa000 - 0x156b9fafff 0x156b9fc000 - 0x156b9fdfff 0x156b9fe000 - 0x156ba3cfff 0x156ba3d000 - 0x156ba3efff 0x156ba3f000 - 0x156ba45fff 0x156ba46000 - 0x156ba46fff 0x156ba47000 - 0x156ba6cfff 0x156ba6d000 - 0x156ba70fff 0x156ba71000 - 0x156ba71fff 0x156ba72000 - 0x156ba73fff 0x156ba74000 - 0x156ba74fff 0x156ba75000 - 0x156ba75fff 0x156ba76000 - 0x156ba76fff 0x156ba77000 - 0x156ba7afff 0x156ba7b000 - 0x156ba7bfff 0x156ba7c000 - 0x156ba7cfff 0x156ba7d000 - 0x156ba7efff 0x156ba7f000 - 0x156ba7ffff 0x156ba80000 - 0x156ba80fff 0x156ba81000 - 0x156bbecfff 0x156bbed000 - 0x156bbeffff 0x156bbf0000 - 0x156bbf0fff 0x156bbf1000 - 0x156bbf3fff 0x156bbf4000 - 0x156bc06fff 0x156bc07000 - 0x156bc07fff 0x156bc08000 - 0x156bc08fff 0x156bc09000 - 0x156bd26fff 0x156bd27000 - 0x156bd29fff 0x156bd2a000 - 0x156bd2cfff 0x156bd2d000 - 0x156bd31fff 0x156bd32000 - 0x156bd86fff 0x156bd87000 - 0x156c431fff 0x3fffa76000 - 0x3fffa96fff ;; 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 0x14068000 - 0x14088fff 0x80000000 - 0x800bffff 0x158b7cd000 - 0x158b7e7fff 0x158b7e8000 - 0x158b7e8fff 0x158b7e9000 - 0x158b7e9fff 0x158b7ea000 - 0x158b7ebfff 0x158b7ec000 - 0x158b7edfff 0x158b7ee000 - 0x158b7f4fff 0x158b7f5000 - 0x158b7f5fff 0x158b7f6000 - 0x158b7f6fff 0x158b7f8000 - 0x158b7f9fff 0x158b7fa000 - 0x158b838fff 0x158b839000 - 0x158b83afff 0x158b83b000 - 0x158b841fff 0x158b842000 - 0x158b842fff 0x158b843000 - 0x158b868fff 0x158b869000 - 0x158b86cfff 0x158b86d000 - 0x158b86dfff 0x158b86e000 - 0x158b86ffff 0x158b870000 - 0x158b870fff 0x158b871000 - 0x158b871fff 0x158b872000 - 0x158b872fff 0x158b873000 - 0x158b876fff 0x158b877000 - 0x158b877fff 0x158b878000 - 0x158b878fff 0x158b879000 - 0x158b87afff 0x158b87b000 - 0x158b87bfff 0x158b87c000 - 0x158b87cfff 0x158b87d000 - 0x158b9e8fff 0x158b9e9000 - 0x158b9ebfff 0x158b9ec000 - 0x158b9ecfff 0x158b9ed000 - 0x158b9effff 0x158b9f0000 - 0x158ba02fff 0x158ba03000 - 0x158ba03fff 0x158ba04000 - 0x158ba04fff 0x158ba05000 - 0x158bb22fff 0x158bb23000 - 0x158bb25fff 0x158bb26000 - 0x158bb28fff 0x158bb29000 - 0x158bb2dfff 0x158bb2e000 - 0x158bb82fff 0x158bb83000 - 0x158c22dfff 0x3fffa90000 - 0x3fffab0fff ;; 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 0x21619000 - 0x21639fff 0x80000000 - 0x800bffff 0x157a393000 - 0x157a3adfff 0x157a3ae000 - 0x157a3aefff 0x157a3af000 - 0x157a3affff 0x157a3b0000 - 0x157a3b1fff 0x157a3b2000 - 0x157a3b3fff 0x157a3b4000 - 0x157a3bafff 0x157a3bb000 - 0x157a3bbfff 0x157a3bc000 - 0x157a3bcfff 0x157a3be000 - 0x157a3bffff 0x157a3c0000 - 0x157a3fefff 0x157a3ff000 - 0x157a400fff 0x157a401000 - 0x157a407fff 0x157a408000 - 0x157a408fff 0x157a409000 - 0x157a42efff 0x157a42f000 - 0x157a432fff 0x157a433000 - 0x157a433fff 0x157a434000 - 0x157a435fff 0x157a436000 - 0x157a436fff 0x157a437000 - 0x157a437fff 0x157a438000 - 0x157a438fff 0x157a439000 - 0x157a43cfff 0x157a43d000 - 0x157a43dfff 0x157a43e000 - 0x157a43efff 0x157a43f000 - 0x157a440fff 0x157a441000 - 0x157a441fff 0x157a442000 - 0x157a442fff 0x157a443000 - 0x157a5aefff 0x157a5af000 - 0x157a5b1fff 0x157a5b2000 - 0x157a5b2fff 0x157a5b3000 - 0x157a5b5fff 0x157a5b6000 - 0x157a5c8fff 0x157a5c9000 - 0x157a5c9fff 0x157a5ca000 - 0x157a5cafff 0x157a5cb000 - 0x157a6e8fff 0x157a6e9000 - 0x157a6ebfff 0x157a6ec000 - 0x157a6eefff 0x157a6ef000 - 0x157a6f3fff 0x157a6f4000 - 0x157a748fff 0x157a749000 - 0x157adf3fff 0x3fffce7000 - 0x3fffd07fff ;; 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 0x2a397000 - 0x2a3b7fff 0x80000000 - 0x800bffff 0x158be24000 - 0x158be3efff 0x158be3f000 - 0x158be3ffff 0x158be40000 - 0x158be40fff 0x158be41000 - 0x158be42fff 0x158be43000 - 0x158be44fff 0x158be45000 - 0x158be4bfff 0x158be4c000 - 0x158be4cfff 0x158be4d000 - 0x158be4dfff 0x158be4f000 - 0x158be50fff 0x158be51000 - 0x158be8ffff 0x158be90000 - 0x158be91fff 0x158be92000 - 0x158be98fff 0x158be99000 - 0x158be99fff 0x158be9a000 - 0x158bebffff 0x158bec0000 - 0x158bec3fff 0x158bec4000 - 0x158bec4fff 0x158bec5000 - 0x158bec6fff 0x158bec7000 - 0x158bec7fff 0x158bec8000 - 0x158bec8fff 0x158bec9000 - 0x158bec9fff 0x158beca000 - 0x158becdfff 0x158bece000 - 0x158becefff 0x158becf000 - 0x158becffff 0x158bed0000 - 0x158bed1fff 0x158bed2000 - 0x158bed2fff 0x158bed3000 - 0x158bed3fff 0x158bed4000 - 0x158c03ffff 0x158c040000 - 0x158c042fff 0x158c043000 - 0x158c043fff 0x158c044000 - 0x158c046fff 0x158c047000 - 0x158c059fff 0x158c05a000 - 0x158c05afff 0x158c05b000 - 0x158c05bfff 0x158c05c000 - 0x158c179fff 0x158c17a000 - 0x158c17cfff 0x158c17d000 - 0x158c17ffff 0x158c180000 - 0x158c184fff 0x158c185000 - 0x158c1d9fff 0x158c1da000 - 0x158c884fff 0x3fffb4b000 - 0x3fffb6bfff ;; 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 0x202d2000 - 0x202f2fff 0x80000000 - 0x800bffff 0x158727d000 - 0x1587297fff 0x1587298000 - 0x1587298fff 0x1587299000 - 0x1587299fff 0x158729a000 - 0x158729bfff 0x158729c000 - 0x158729dfff 0x158729e000 - 0x15872a4fff 0x15872a5000 - 0x15872a5fff 0x15872a6000 - 0x15872a6fff 0x15872a8000 - 0x15872a9fff 0x15872aa000 - 0x15872e8fff 0x15872e9000 - 0x15872eafff 0x15872eb000 - 0x15872f1fff 0x15872f2000 - 0x15872f2fff 0x15872f3000 - 0x1587318fff 0x1587319000 - 0x158731cfff 0x158731d000 - 0x158731dfff 0x158731e000 - 0x158731ffff 0x1587320000 - 0x1587320fff 0x1587321000 - 0x1587321fff 0x1587322000 - 0x1587322fff 0x1587323000 - 0x1587326fff 0x1587327000 - 0x1587327fff 0x1587328000 - 0x1587328fff 0x1587329000 - 0x158732afff 0x158732b000 - 0x158732bfff 0x158732c000 - 0x158732cfff 0x158732d000 - 0x1587498fff 0x1587499000 - 0x158749bfff 0x158749c000 - 0x158749cfff 0x158749d000 - 0x158749ffff 0x15874a0000 - 0x15874b2fff 0x15874b3000 - 0x15874b3fff 0x15874b4000 - 0x15874b4fff 0x15874b5000 - 0x15875d2fff 0x15875d3000 - 0x15875d5fff 0x15875d6000 - 0x15875d8fff 0x15875d9000 - 0x15875ddfff 0x15875de000 - 0x1587632fff 0x1587633000 - 0x1587cddfff 0x3ffffa7000 - 0x3ffffc7fff ;; 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 0xa9e0000 - 0xaa00fff 0x80000000 - 0x800bffff 0x156c766000 - 0x156c780fff 0x156c781000 - 0x156c781fff 0x156c782000 - 0x156c782fff 0x156c783000 - 0x156c784fff 0x156c785000 - 0x156c786fff 0x156c787000 - 0x156c78dfff 0x156c78e000 - 0x156c78efff 0x156c78f000 - 0x156c78ffff 0x156c791000 - 0x156c792fff 0x156c793000 - 0x156c7d1fff 0x156c7d2000 - 0x156c7d3fff 0x156c7d4000 - 0x156c7dafff 0x156c7db000 - 0x156c7dbfff 0x156c7dc000 - 0x156c801fff 0x156c802000 - 0x156c805fff 0x156c806000 - 0x156c806fff 0x156c807000 - 0x156c808fff 0x156c809000 - 0x156c809fff 0x156c80a000 - 0x156c80afff 0x156c80b000 - 0x156c80bfff 0x156c80c000 - 0x156c80ffff 0x156c810000 - 0x156c810fff 0x156c811000 - 0x156c811fff 0x156c812000 - 0x156c813fff 0x156c814000 - 0x156c814fff 0x156c815000 - 0x156c815fff 0x156c816000 - 0x156c981fff 0x156c982000 - 0x156c984fff 0x156c985000 - 0x156c985fff 0x156c986000 - 0x156c988fff 0x156c989000 - 0x156c99bfff 0x156c99c000 - 0x156c99cfff 0x156c99d000 - 0x156c99dfff 0x156c99e000 - 0x156cabbfff 0x156cabc000 - 0x156cabefff 0x156cabf000 - 0x156cac1fff 0x156cac2000 - 0x156cac6fff 0x156cac7000 - 0x156cb1bfff 0x156cb1c000 - 0x156d1c6fff 0x3fffa46000 - 0x3fffa66fff ;; 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 0x2e754000 - 0x2e774fff 0x80000000 - 0x800bffff 0x155ae81000 - 0x155ae9bfff 0x155ae9c000 - 0x155ae9cfff 0x155ae9d000 - 0x155ae9dfff 0x155ae9e000 - 0x155ae9ffff 0x155aea0000 - 0x155aea1fff 0x155aea2000 - 0x155aea8fff 0x155aea9000 - 0x155aea9fff 0x155aeaa000 - 0x155aeaafff 0x155aeac000 - 0x155aeadfff 0x155aeae000 - 0x155aeecfff 0x155aeed000 - 0x155aeeefff 0x155aeef000 - 0x155aef5fff 0x155aef6000 - 0x155aef6fff 0x155aef7000 - 0x155af1cfff 0x155af1d000 - 0x155af20fff 0x155af21000 - 0x155af21fff 0x155af22000 - 0x155af23fff 0x155af24000 - 0x155af24fff 0x155af25000 - 0x155af25fff 0x155af26000 - 0x155af26fff 0x155af27000 - 0x155af2afff 0x155af2b000 - 0x155af2bfff 0x155af2c000 - 0x155af2cfff 0x155af2d000 - 0x155af2efff 0x155af2f000 - 0x155af2ffff 0x155af30000 - 0x155af30fff 0x155af31000 - 0x155b09cfff 0x155b09d000 - 0x155b09ffff 0x155b0a0000 - 0x155b0a0fff 0x155b0a1000 - 0x155b0a3fff 0x155b0a4000 - 0x155b0b6fff 0x155b0b7000 - 0x155b0b7fff 0x155b0b8000 - 0x155b0b8fff 0x155b0b9000 - 0x155b1d6fff 0x155b1d7000 - 0x155b1d9fff 0x155b1da000 - 0x155b1dcfff 0x155b1dd000 - 0x155b1e1fff 0x155b1e2000 - 0x155b236fff 0x155b237000 - 0x155b8e1fff 0x3fffa7c000 - 0x3fffa9cfff ;; 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 0xcd6d000 - 0xcd8dfff 0x80000000 - 0x800bffff 0x155609c000 - 0x15560b6fff 0x15560b7000 - 0x15560b7fff 0x15560b8000 - 0x15560b8fff 0x15560b9000 - 0x15560bafff 0x15560bb000 - 0x15560bcfff 0x15560bd000 - 0x15560c3fff 0x15560c4000 - 0x15560c4fff 0x15560c5000 - 0x15560c5fff 0x15560c7000 - 0x15560c8fff 0x15560c9000 - 0x1556107fff 0x1556108000 - 0x1556109fff 0x155610a000 - 0x1556110fff 0x1556111000 - 0x1556111fff 0x1556112000 - 0x1556137fff 0x1556138000 - 0x155613bfff 0x155613c000 - 0x155613cfff 0x155613d000 - 0x155613efff 0x155613f000 - 0x155613ffff 0x1556140000 - 0x1556140fff 0x1556141000 - 0x1556141fff 0x1556142000 - 0x1556145fff 0x1556146000 - 0x1556146fff 0x1556147000 - 0x1556147fff 0x1556148000 - 0x1556149fff 0x155614a000 - 0x155614afff 0x155614b000 - 0x155614bfff 0x155614c000 - 0x15562b7fff 0x15562b8000 - 0x15562bafff 0x15562bb000 - 0x15562bbfff 0x15562bc000 - 0x15562befff 0x15562bf000 - 0x15562d1fff 0x15562d2000 - 0x15562d2fff 0x15562d3000 - 0x15562d3fff 0x15562d4000 - 0x15563f1fff 0x15563f2000 - 0x15563f4fff 0x15563f5000 - 0x15563f7fff 0x15563f8000 - 0x15563fcfff 0x15563fd000 - 0x1556451fff 0x1556452000 - 0x1556afcfff 0x3fffb71000 - 0x3fffb91fff ;; 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 0x21a1d000 - 0x21a3dfff 0x80000000 - 0x800bffff 0x1558644000 - 0x155865efff 0x155865f000 - 0x155865ffff 0x1558660000 - 0x1558660fff 0x1558661000 - 0x1558662fff 0x1558663000 - 0x1558664fff 0x1558665000 - 0x155866bfff 0x155866c000 - 0x155866cfff 0x155866d000 - 0x155866dfff 0x155866f000 - 0x1558670fff 0x1558671000 - 0x15586affff 0x15586b0000 - 0x15586b1fff 0x15586b2000 - 0x15586b8fff 0x15586b9000 - 0x15586b9fff 0x15586ba000 - 0x15586dffff 0x15586e0000 - 0x15586e3fff 0x15586e4000 - 0x15586e4fff 0x15586e5000 - 0x15586e6fff 0x15586e7000 - 0x15586e7fff 0x15586e8000 - 0x15586e8fff 0x15586e9000 - 0x15586e9fff 0x15586ea000 - 0x15586edfff 0x15586ee000 - 0x15586eefff 0x15586ef000 - 0x15586effff 0x15586f0000 - 0x15586f1fff 0x15586f2000 - 0x15586f2fff 0x15586f3000 - 0x15586f3fff 0x15586f4000 - 0x155885ffff 0x1558860000 - 0x1558862fff 0x1558863000 - 0x1558863fff 0x1558864000 - 0x1558866fff 0x1558867000 - 0x1558879fff 0x155887a000 - 0x155887afff 0x155887b000 - 0x155887bfff 0x155887c000 - 0x1558999fff 0x155899a000 - 0x155899cfff 0x155899d000 - 0x155899ffff 0x15589a0000 - 0x15589a4fff 0x15589a5000 - 0x15589f9fff 0x15589fa000 - 0x15590a4fff 0x3fff7e9000 - 0x3fff809fff ;; 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 0x31a92000 - 0x31ab2fff 0x80000000 - 0x800bffff 0x1567f2a000 - 0x1567f44fff 0x1567f45000 - 0x1567f45fff 0x1567f46000 - 0x1567f46fff 0x1567f47000 - 0x1567f48fff 0x1567f49000 - 0x1567f4afff 0x1567f4b000 - 0x1567f51fff 0x1567f52000 - 0x1567f52fff 0x1567f53000 - 0x1567f53fff 0x1567f55000 - 0x1567f56fff 0x1567f57000 - 0x1567f95fff 0x1567f96000 - 0x1567f97fff 0x1567f98000 - 0x1567f9efff 0x1567f9f000 - 0x1567f9ffff 0x1567fa0000 - 0x1567fc5fff 0x1567fc6000 - 0x1567fc9fff 0x1567fca000 - 0x1567fcafff 0x1567fcb000 - 0x1567fccfff 0x1567fcd000 - 0x1567fcdfff 0x1567fce000 - 0x1567fcefff 0x1567fcf000 - 0x1567fcffff 0x1567fd0000 - 0x1567fd3fff 0x1567fd4000 - 0x1567fd4fff 0x1567fd5000 - 0x1567fd5fff 0x1567fd6000 - 0x1567fd7fff 0x1567fd8000 - 0x1567fd8fff 0x1567fd9000 - 0x1567fd9fff 0x1567fda000 - 0x1568145fff 0x1568146000 - 0x1568148fff 0x1568149000 - 0x1568149fff 0x156814a000 - 0x156814cfff 0x156814d000 - 0x156815ffff 0x1568160000 - 0x1568160fff 0x1568161000 - 0x1568161fff 0x1568162000 - 0x156827ffff 0x1568280000 - 0x1568282fff 0x1568283000 - 0x1568285fff 0x1568286000 - 0x156828afff 0x156828b000 - 0x15682dffff 0x15682e0000 - 0x156898afff 0x3ffff38000 - 0x3ffff58fff ;; 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 0x2d6c9000 - 0x2d6e9fff 0x80000000 - 0x800bffff 0x158807b000 - 0x1588095fff 0x1588096000 - 0x1588096fff 0x1588097000 - 0x1588097fff 0x1588098000 - 0x1588099fff 0x158809a000 - 0x158809bfff 0x158809c000 - 0x15880a2fff 0x15880a3000 - 0x15880a3fff 0x15880a4000 - 0x15880a4fff 0x15880a6000 - 0x15880a7fff 0x15880a8000 - 0x15880e6fff 0x15880e7000 - 0x15880e8fff 0x15880e9000 - 0x15880effff 0x15880f0000 - 0x15880f0fff 0x15880f1000 - 0x1588116fff 0x1588117000 - 0x158811afff 0x158811b000 - 0x158811bfff 0x158811c000 - 0x158811dfff 0x158811e000 - 0x158811efff 0x158811f000 - 0x158811ffff 0x1588120000 - 0x1588120fff 0x1588121000 - 0x1588124fff 0x1588125000 - 0x1588125fff 0x1588126000 - 0x1588126fff 0x1588127000 - 0x1588128fff 0x1588129000 - 0x1588129fff 0x158812a000 - 0x158812afff 0x158812b000 - 0x1588296fff 0x1588297000 - 0x1588299fff 0x158829a000 - 0x158829afff 0x158829b000 - 0x158829dfff 0x158829e000 - 0x15882b0fff 0x15882b1000 - 0x15882b1fff 0x15882b2000 - 0x15882b2fff 0x15882b3000 - 0x15883d0fff 0x15883d1000 - 0x15883d3fff 0x15883d4000 - 0x15883d6fff 0x15883d7000 - 0x15883dbfff 0x15883dc000 - 0x1588430fff 0x1588431000 - 0x1588adbfff 0x3fff9c6000 - 0x3fff9e6fff ;; 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 0x25bf1000 - 0x25c11fff 0x80000000 - 0x800bffff 0x157b2c6000 - 0x157b2e0fff 0x157b2e1000 - 0x157b2e1fff 0x157b2e2000 - 0x157b2e2fff 0x157b2e3000 - 0x157b2e4fff 0x157b2e5000 - 0x157b2e6fff 0x157b2e7000 - 0x157b2edfff 0x157b2ee000 - 0x157b2eefff 0x157b2ef000 - 0x157b2effff 0x157b2f1000 - 0x157b2f2fff 0x157b2f3000 - 0x157b331fff 0x157b332000 - 0x157b333fff 0x157b334000 - 0x157b33afff 0x157b33b000 - 0x157b33bfff 0x157b33c000 - 0x157b361fff 0x157b362000 - 0x157b365fff 0x157b366000 - 0x157b366fff 0x157b367000 - 0x157b368fff 0x157b369000 - 0x157b369fff 0x157b36a000 - 0x157b36afff 0x157b36b000 - 0x157b36bfff 0x157b36c000 - 0x157b36ffff 0x157b370000 - 0x157b370fff 0x157b371000 - 0x157b371fff 0x157b372000 - 0x157b373fff 0x157b374000 - 0x157b374fff 0x157b375000 - 0x157b375fff 0x157b376000 - 0x157b4e1fff 0x157b4e2000 - 0x157b4e4fff 0x157b4e5000 - 0x157b4e5fff 0x157b4e6000 - 0x157b4e8fff 0x157b4e9000 - 0x157b4fbfff 0x157b4fc000 - 0x157b4fcfff 0x157b4fd000 - 0x157b4fdfff 0x157b4fe000 - 0x157b61bfff 0x157b61c000 - 0x157b61efff 0x157b61f000 - 0x157b621fff 0x157b622000 - 0x157b626fff 0x157b627000 - 0x157b67bfff 0x157b67c000 - 0x157bd26fff 0x3fffdc0000 - 0x3fffde0fff ;; 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 0x7097000 - 0x70b7fff 0x80000000 - 0x800bffff 0x1558575000 - 0x155858ffff 0x1558590000 - 0x1558590fff 0x1558591000 - 0x1558591fff 0x1558592000 - 0x1558593fff 0x1558594000 - 0x1558595fff 0x1558596000 - 0x155859cfff 0x155859d000 - 0x155859dfff 0x155859e000 - 0x155859efff 0x15585a0000 - 0x15585a1fff 0x15585a2000 - 0x15585e0fff 0x15585e1000 - 0x15585e2fff 0x15585e3000 - 0x15585e9fff 0x15585ea000 - 0x15585eafff 0x15585eb000 - 0x1558610fff 0x1558611000 - 0x1558614fff 0x1558615000 - 0x1558615fff 0x1558616000 - 0x1558617fff 0x1558618000 - 0x1558618fff 0x1558619000 - 0x1558619fff 0x155861a000 - 0x155861afff 0x155861b000 - 0x155861efff 0x155861f000 - 0x155861ffff 0x1558620000 - 0x1558620fff 0x1558621000 - 0x1558622fff 0x1558623000 - 0x1558623fff 0x1558624000 - 0x1558624fff 0x1558625000 - 0x1558790fff 0x1558791000 - 0x1558793fff 0x1558794000 - 0x1558794fff 0x1558795000 - 0x1558797fff 0x1558798000 - 0x15587aafff 0x15587ab000 - 0x15587abfff 0x15587ac000 - 0x15587acfff 0x15587ad000 - 0x15588cafff 0x15588cb000 - 0x15588cdfff 0x15588ce000 - 0x15588d0fff 0x15588d1000 - 0x15588d5fff 0x15588d6000 - 0x155892afff 0x155892b000 - 0x1558fd5fff 0x3fff829000 - 0x3fff849fff ;; 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 0x12457000 - 0x12477fff 0x80000000 - 0x800bffff 0x156d04f000 - 0x156d069fff 0x156d06a000 - 0x156d06afff 0x156d06b000 - 0x156d06bfff 0x156d06c000 - 0x156d06dfff 0x156d06e000 - 0x156d06ffff 0x156d070000 - 0x156d076fff 0x156d077000 - 0x156d077fff 0x156d078000 - 0x156d078fff 0x156d07a000 - 0x156d07bfff 0x156d07c000 - 0x156d0bafff 0x156d0bb000 - 0x156d0bcfff 0x156d0bd000 - 0x156d0c3fff 0x156d0c4000 - 0x156d0c4fff 0x156d0c5000 - 0x156d0eafff 0x156d0eb000 - 0x156d0eefff 0x156d0ef000 - 0x156d0effff 0x156d0f0000 - 0x156d0f1fff 0x156d0f2000 - 0x156d0f2fff 0x156d0f3000 - 0x156d0f3fff 0x156d0f4000 - 0x156d0f4fff 0x156d0f5000 - 0x156d0f8fff 0x156d0f9000 - 0x156d0f9fff 0x156d0fa000 - 0x156d0fafff 0x156d0fb000 - 0x156d0fcfff 0x156d0fd000 - 0x156d0fdfff 0x156d0fe000 - 0x156d0fefff 0x156d0ff000 - 0x156d26afff 0x156d26b000 - 0x156d26dfff 0x156d26e000 - 0x156d26efff 0x156d26f000 - 0x156d271fff 0x156d272000 - 0x156d284fff 0x156d285000 - 0x156d285fff 0x156d286000 - 0x156d286fff 0x156d287000 - 0x156d3a4fff 0x156d3a5000 - 0x156d3a7fff 0x156d3a8000 - 0x156d3aafff 0x156d3ab000 - 0x156d3affff 0x156d3b0000 - 0x156d404fff 0x156d405000 - 0x156daaffff 0x3fffa64000 - 0x3fffa84fff ;; 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 0x1ad16000 - 0x1ad36fff 0x80000000 - 0x800bffff 0x156b77b000 - 0x156b795fff 0x156b796000 - 0x156b796fff 0x156b797000 - 0x156b797fff 0x156b798000 - 0x156b799fff 0x156b79a000 - 0x156b79bfff 0x156b79c000 - 0x156b7a2fff 0x156b7a3000 - 0x156b7a3fff 0x156b7a4000 - 0x156b7a4fff 0x156b7a6000 - 0x156b7a7fff 0x156b7a8000 - 0x156b7e6fff 0x156b7e7000 - 0x156b7e8fff 0x156b7e9000 - 0x156b7effff 0x156b7f0000 - 0x156b7f0fff 0x156b7f1000 - 0x156b816fff 0x156b817000 - 0x156b81afff 0x156b81b000 - 0x156b81bfff 0x156b81c000 - 0x156b81dfff 0x156b81e000 - 0x156b81efff 0x156b81f000 - 0x156b81ffff 0x156b820000 - 0x156b820fff 0x156b821000 - 0x156b824fff 0x156b825000 - 0x156b825fff 0x156b826000 - 0x156b826fff 0x156b827000 - 0x156b828fff 0x156b829000 - 0x156b829fff 0x156b82a000 - 0x156b82afff 0x156b82b000 - 0x156b996fff 0x156b997000 - 0x156b999fff 0x156b99a000 - 0x156b99afff 0x156b99b000 - 0x156b99dfff 0x156b99e000 - 0x156b9b0fff 0x156b9b1000 - 0x156b9b1fff 0x156b9b2000 - 0x156b9b2fff 0x156b9b3000 - 0x156bad0fff 0x156bad1000 - 0x156bad3fff 0x156bad4000 - 0x156bad6fff 0x156bad7000 - 0x156badbfff 0x156badc000 - 0x156bb30fff 0x156bb31000 - 0x156c1dbfff 0x3fffcfa000 - 0x3fffd1afff ;; 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 0x38987000 - 0x389a7fff 0x80000000 - 0x800bffff 0x1570e92000 - 0x1570eacfff 0x1570ead000 - 0x1570eadfff 0x1570eae000 - 0x1570eaefff 0x1570eaf000 - 0x1570eb0fff 0x1570eb1000 - 0x1570eb2fff 0x1570eb3000 - 0x1570eb9fff 0x1570eba000 - 0x1570ebafff 0x1570ebb000 - 0x1570ebbfff 0x1570ebd000 - 0x1570ebefff 0x1570ebf000 - 0x1570efdfff 0x1570efe000 - 0x1570efffff 0x1570f00000 - 0x1570f06fff 0x1570f07000 - 0x1570f07fff 0x1570f08000 - 0x1570f2dfff 0x1570f2e000 - 0x1570f31fff 0x1570f32000 - 0x1570f32fff 0x1570f33000 - 0x1570f34fff 0x1570f35000 - 0x1570f35fff 0x1570f36000 - 0x1570f36fff 0x1570f37000 - 0x1570f37fff 0x1570f38000 - 0x1570f3bfff 0x1570f3c000 - 0x1570f3cfff 0x1570f3d000 - 0x1570f3dfff 0x1570f3e000 - 0x1570f3ffff 0x1570f40000 - 0x1570f40fff 0x1570f41000 - 0x1570f41fff 0x1570f42000 - 0x15710adfff 0x15710ae000 - 0x15710b0fff 0x15710b1000 - 0x15710b1fff 0x15710b2000 - 0x15710b4fff 0x15710b5000 - 0x15710c7fff 0x15710c8000 - 0x15710c8fff 0x15710c9000 - 0x15710c9fff 0x15710ca000 - 0x15711e7fff 0x15711e8000 - 0x15711eafff 0x15711eb000 - 0x15711edfff 0x15711ee000 - 0x15711f2fff 0x15711f3000 - 0x1571247fff 0x1571248000 - 0x15718f2fff 0x3fff926000 - 0x3fff946fff ;; 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 0x2c0a2000 - 0x2c0c2fff 0x80000000 - 0x800bffff 0x1594043000 - 0x159405dfff 0x159405e000 - 0x159405efff 0x159405f000 - 0x159405ffff 0x1594060000 - 0x1594061fff 0x1594062000 - 0x1594063fff 0x1594064000 - 0x159406afff 0x159406b000 - 0x159406bfff 0x159406c000 - 0x159406cfff 0x159406e000 - 0x159406ffff 0x1594070000 - 0x15940aefff 0x15940af000 - 0x15940b0fff 0x15940b1000 - 0x15940b7fff 0x15940b8000 - 0x15940b8fff 0x15940b9000 - 0x15940defff 0x15940df000 - 0x15940e2fff 0x15940e3000 - 0x15940e3fff 0x15940e4000 - 0x15940e5fff 0x15940e6000 - 0x15940e6fff 0x15940e7000 - 0x15940e7fff 0x15940e8000 - 0x15940e8fff 0x15940e9000 - 0x15940ecfff 0x15940ed000 - 0x15940edfff 0x15940ee000 - 0x15940eefff 0x15940ef000 - 0x15940f0fff 0x15940f1000 - 0x15940f1fff 0x15940f2000 - 0x15940f2fff 0x15940f3000 - 0x159425efff 0x159425f000 - 0x1594261fff 0x1594262000 - 0x1594262fff 0x1594263000 - 0x1594265fff 0x1594266000 - 0x1594278fff 0x1594279000 - 0x1594279fff 0x159427a000 - 0x159427afff 0x159427b000 - 0x1594398fff 0x1594399000 - 0x159439bfff 0x159439c000 - 0x159439efff 0x159439f000 - 0x15943a3fff 0x15943a4000 - 0x15943f8fff 0x15943f9000 - 0x1594aa3fff 0x3fff99b000 - 0x3fff9bbfff ;; 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 0x3c72c000 - 0x3c74cfff 0x80000000 - 0x800bffff 0x1583771000 - 0x158378bfff 0x158378c000 - 0x158378cfff 0x158378d000 - 0x158378dfff 0x158378e000 - 0x158378ffff 0x1583790000 - 0x1583791fff 0x1583792000 - 0x1583798fff 0x1583799000 - 0x1583799fff 0x158379a000 - 0x158379afff 0x158379c000 - 0x158379dfff 0x158379e000 - 0x15837dcfff 0x15837dd000 - 0x15837defff 0x15837df000 - 0x15837e5fff 0x15837e6000 - 0x15837e6fff 0x15837e7000 - 0x158380cfff 0x158380d000 - 0x1583810fff 0x1583811000 - 0x1583811fff 0x1583812000 - 0x1583813fff 0x1583814000 - 0x1583814fff 0x1583815000 - 0x1583815fff 0x1583816000 - 0x1583816fff 0x1583817000 - 0x158381afff 0x158381b000 - 0x158381bfff 0x158381c000 - 0x158381cfff 0x158381d000 - 0x158381efff 0x158381f000 - 0x158381ffff 0x1583820000 - 0x1583820fff 0x1583821000 - 0x158398cfff 0x158398d000 - 0x158398ffff 0x1583990000 - 0x1583990fff 0x1583991000 - 0x1583993fff 0x1583994000 - 0x15839a6fff 0x15839a7000 - 0x15839a7fff 0x15839a8000 - 0x15839a8fff 0x15839a9000 - 0x1583ac6fff 0x1583ac7000 - 0x1583ac9fff 0x1583aca000 - 0x1583accfff 0x1583acd000 - 0x1583ad1fff 0x1583ad2000 - 0x1583b26fff 0x1583b27000 - 0x15841d1fff 0x3fff8e1000 - 0x3fff901fff ;; 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 0xce68000 - 0xce88fff 0x80000000 - 0x800bffff 0x1559de0000 - 0x1559dfafff 0x1559dfb000 - 0x1559dfbfff 0x1559dfc000 - 0x1559dfcfff 0x1559dfd000 - 0x1559dfefff 0x1559dff000 - 0x1559e00fff 0x1559e01000 - 0x1559e07fff 0x1559e08000 - 0x1559e08fff 0x1559e09000 - 0x1559e09fff 0x1559e0b000 - 0x1559e0cfff 0x1559e0d000 - 0x1559e4bfff 0x1559e4c000 - 0x1559e4dfff 0x1559e4e000 - 0x1559e54fff 0x1559e55000 - 0x1559e55fff 0x1559e56000 - 0x1559e7bfff 0x1559e7c000 - 0x1559e7ffff 0x1559e80000 - 0x1559e80fff 0x1559e81000 - 0x1559e82fff 0x1559e83000 - 0x1559e83fff 0x1559e84000 - 0x1559e84fff 0x1559e85000 - 0x1559e85fff 0x1559e86000 - 0x1559e89fff 0x1559e8a000 - 0x1559e8afff 0x1559e8b000 - 0x1559e8bfff 0x1559e8c000 - 0x1559e8dfff 0x1559e8e000 - 0x1559e8efff 0x1559e8f000 - 0x1559e8ffff 0x1559e90000 - 0x1559ffbfff 0x1559ffc000 - 0x1559ffefff 0x1559fff000 - 0x1559ffffff 0x155a000000 - 0x155a002fff 0x155a003000 - 0x155a015fff 0x155a016000 - 0x155a016fff 0x155a017000 - 0x155a017fff 0x155a018000 - 0x155a135fff 0x155a136000 - 0x155a138fff 0x155a139000 - 0x155a13bfff 0x155a13c000 - 0x155a140fff 0x155a141000 - 0x155a195fff 0x155a196000 - 0x155a840fff 0x3fffe7c000 - 0x3fffe9cfff ;; 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 0x1ea01000 - 0x1ea21fff 0x80000000 - 0x800bffff 0x1575034000 - 0x157504efff 0x157504f000 - 0x157504ffff 0x1575050000 - 0x1575050fff 0x1575051000 - 0x1575052fff 0x1575053000 - 0x1575054fff 0x1575055000 - 0x157505bfff 0x157505c000 - 0x157505cfff 0x157505d000 - 0x157505dfff 0x157505f000 - 0x1575060fff 0x1575061000 - 0x157509ffff 0x15750a0000 - 0x15750a1fff 0x15750a2000 - 0x15750a8fff 0x15750a9000 - 0x15750a9fff 0x15750aa000 - 0x15750cffff 0x15750d0000 - 0x15750d3fff 0x15750d4000 - 0x15750d4fff 0x15750d5000 - 0x15750d6fff 0x15750d7000 - 0x15750d7fff 0x15750d8000 - 0x15750d8fff 0x15750d9000 - 0x15750d9fff 0x15750da000 - 0x15750ddfff 0x15750de000 - 0x15750defff 0x15750df000 - 0x15750dffff 0x15750e0000 - 0x15750e1fff 0x15750e2000 - 0x15750e2fff 0x15750e3000 - 0x15750e3fff 0x15750e4000 - 0x157524ffff 0x1575250000 - 0x1575252fff 0x1575253000 - 0x1575253fff 0x1575254000 - 0x1575256fff 0x1575257000 - 0x1575269fff 0x157526a000 - 0x157526afff 0x157526b000 - 0x157526bfff 0x157526c000 - 0x1575389fff 0x157538a000 - 0x157538cfff 0x157538d000 - 0x157538ffff 0x1575390000 - 0x1575394fff 0x1575395000 - 0x15753e9fff 0x15753ea000 - 0x1575a94fff 0x3fffe6f000 - 0x3fffe8ffff ;; 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 0x25d7b000 - 0x25d9bfff 0x80000000 - 0x800bffff 0x1567edc000 - 0x1567ef6fff 0x1567ef7000 - 0x1567ef7fff 0x1567ef8000 - 0x1567ef8fff 0x1567ef9000 - 0x1567efafff 0x1567efb000 - 0x1567efcfff 0x1567efd000 - 0x1567f03fff 0x1567f04000 - 0x1567f04fff 0x1567f05000 - 0x1567f05fff 0x1567f07000 - 0x1567f08fff 0x1567f09000 - 0x1567f47fff 0x1567f48000 - 0x1567f49fff 0x1567f4a000 - 0x1567f50fff 0x1567f51000 - 0x1567f51fff 0x1567f52000 - 0x1567f77fff 0x1567f78000 - 0x1567f7bfff 0x1567f7c000 - 0x1567f7cfff 0x1567f7d000 - 0x1567f7efff 0x1567f7f000 - 0x1567f7ffff 0x1567f80000 - 0x1567f80fff 0x1567f81000 - 0x1567f81fff 0x1567f82000 - 0x1567f85fff 0x1567f86000 - 0x1567f86fff 0x1567f87000 - 0x1567f87fff 0x1567f88000 - 0x1567f89fff 0x1567f8a000 - 0x1567f8afff 0x1567f8b000 - 0x1567f8bfff 0x1567f8c000 - 0x15680f7fff 0x15680f8000 - 0x15680fafff 0x15680fb000 - 0x15680fbfff 0x15680fc000 - 0x15680fefff 0x15680ff000 - 0x1568111fff 0x1568112000 - 0x1568112fff 0x1568113000 - 0x1568113fff 0x1568114000 - 0x1568231fff 0x1568232000 - 0x1568234fff 0x1568235000 - 0x1568237fff 0x1568238000 - 0x156823cfff 0x156823d000 - 0x1568291fff 0x1568292000 - 0x156893cfff 0x3fffdec000 - 0x3fffe0cfff ;; 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 0xe5bb000 - 0xe5dbfff 0x80000000 - 0x800bffff 0x157c7bb000 - 0x157c7d5fff 0x157c7d6000 - 0x157c7d6fff 0x157c7d7000 - 0x157c7d7fff 0x157c7d8000 - 0x157c7d9fff 0x157c7da000 - 0x157c7dbfff 0x157c7dc000 - 0x157c7e2fff 0x157c7e3000 - 0x157c7e3fff 0x157c7e4000 - 0x157c7e4fff 0x157c7e6000 - 0x157c7e7fff 0x157c7e8000 - 0x157c826fff 0x157c827000 - 0x157c828fff 0x157c829000 - 0x157c82ffff 0x157c830000 - 0x157c830fff 0x157c831000 - 0x157c856fff 0x157c857000 - 0x157c85afff 0x157c85b000 - 0x157c85bfff 0x157c85c000 - 0x157c85dfff 0x157c85e000 - 0x157c85efff 0x157c85f000 - 0x157c85ffff 0x157c860000 - 0x157c860fff 0x157c861000 - 0x157c864fff 0x157c865000 - 0x157c865fff 0x157c866000 - 0x157c866fff 0x157c867000 - 0x157c868fff 0x157c869000 - 0x157c869fff 0x157c86a000 - 0x157c86afff 0x157c86b000 - 0x157c9d6fff 0x157c9d7000 - 0x157c9d9fff 0x157c9da000 - 0x157c9dafff 0x157c9db000 - 0x157c9ddfff 0x157c9de000 - 0x157c9f0fff 0x157c9f1000 - 0x157c9f1fff 0x157c9f2000 - 0x157c9f2fff 0x157c9f3000 - 0x157cb10fff 0x157cb11000 - 0x157cb13fff 0x157cb14000 - 0x157cb16fff 0x157cb17000 - 0x157cb1bfff 0x157cb1c000 - 0x157cb70fff 0x157cb71000 - 0x157d21bfff 0x3fffbfe000 - 0x3fffc1efff 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 3820138569) 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 0x3dcd2000 - 0x3dcf2fff 0x80000000 - 0x800bffff 0x1572c22000 - 0x1572c3cfff 0x1572c3d000 - 0x1572c3dfff 0x1572c3e000 - 0x1572c3efff 0x1572c3f000 - 0x1572c40fff 0x1572c41000 - 0x1572c42fff 0x1572c43000 - 0x1572c49fff 0x1572c4a000 - 0x1572c4afff 0x1572c4b000 - 0x1572c4bfff 0x1572c4d000 - 0x1572c4efff 0x1572c4f000 - 0x1572c8dfff 0x1572c8e000 - 0x1572c8ffff 0x1572c90000 - 0x1572c96fff 0x1572c97000 - 0x1572c97fff 0x1572c98000 - 0x1572cbdfff 0x1572cbe000 - 0x1572cc1fff 0x1572cc2000 - 0x1572cc2fff 0x1572cc3000 - 0x1572cc4fff 0x1572cc5000 - 0x1572cc5fff 0x1572cc6000 - 0x1572cc6fff 0x1572cc7000 - 0x1572cc7fff 0x1572cc8000 - 0x1572ccbfff 0x1572ccc000 - 0x1572cccfff 0x1572ccd000 - 0x1572ccdfff 0x1572cce000 - 0x1572ccffff 0x1572cd0000 - 0x1572cd0fff 0x1572cd1000 - 0x1572cd1fff 0x1572cd2000 - 0x1572e3dfff 0x1572e3e000 - 0x1572e40fff 0x1572e41000 - 0x1572e41fff 0x1572e42000 - 0x1572e44fff 0x1572e45000 - 0x1572e57fff 0x1572e58000 - 0x1572e58fff 0x1572e59000 - 0x1572e59fff 0x1572e5a000 - 0x1572f77fff 0x1572f78000 - 0x1572f7afff 0x1572f7b000 - 0x1572f7dfff 0x1572f7e000 - 0x1572f82fff 0x1572f83000 - 0x1572fd7fff 0x1572fd8000 - 0x1573682fff 0x3ffff6a000 - 0x3ffff8bfff ;; 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 0xb86a000 - 0xb88afff 0x80000000 - 0x800bffff 0x1581d74000 - 0x1581d8efff 0x1581d8f000 - 0x1581d8ffff 0x1581d90000 - 0x1581d90fff 0x1581d91000 - 0x1581d92fff 0x1581d93000 - 0x1581d94fff 0x1581d95000 - 0x1581d9bfff 0x1581d9c000 - 0x1581d9cfff 0x1581d9d000 - 0x1581d9dfff 0x1581d9f000 - 0x1581da0fff 0x1581da1000 - 0x1581ddffff 0x1581de0000 - 0x1581de1fff 0x1581de2000 - 0x1581de8fff 0x1581de9000 - 0x1581de9fff 0x1581dea000 - 0x1581e0ffff 0x1581e10000 - 0x1581e13fff 0x1581e14000 - 0x1581e14fff 0x1581e15000 - 0x1581e16fff 0x1581e17000 - 0x1581e17fff 0x1581e18000 - 0x1581e18fff 0x1581e19000 - 0x1581e19fff 0x1581e1a000 - 0x1581e1dfff 0x1581e1e000 - 0x1581e1efff 0x1581e1f000 - 0x1581e1ffff 0x1581e20000 - 0x1581e21fff 0x1581e22000 - 0x1581e22fff 0x1581e23000 - 0x1581e23fff 0x1581e24000 - 0x1581f8ffff 0x1581f90000 - 0x1581f92fff 0x1581f93000 - 0x1581f93fff 0x1581f94000 - 0x1581f96fff 0x1581f97000 - 0x1581fa9fff 0x1581faa000 - 0x1581faafff 0x1581fab000 - 0x1581fabfff 0x1581fac000 - 0x15820c9fff 0x15820ca000 - 0x15820ccfff 0x15820cd000 - 0x15820cffff 0x15820d0000 - 0x15820d4fff 0x15820d5000 - 0x1582129fff 0x158212a000 - 0x15827d4fff 0x3fffb26000 - 0x3fffb47fff ;; 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 3820138569) 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 0x29c70000 - 0x29c90fff 0x80000000 - 0x800bffff 0x1570d23000 - 0x1570d3dfff 0x1570d3e000 - 0x1570d3efff 0x1570d3f000 - 0x1570d3ffff 0x1570d40000 - 0x1570d41fff 0x1570d42000 - 0x1570d43fff 0x1570d44000 - 0x1570d4afff 0x1570d4b000 - 0x1570d4bfff 0x1570d4c000 - 0x1570d4cfff 0x1570d4e000 - 0x1570d4ffff 0x1570d50000 - 0x1570d8efff 0x1570d8f000 - 0x1570d90fff 0x1570d91000 - 0x1570d97fff 0x1570d98000 - 0x1570d98fff 0x1570d99000 - 0x1570dbefff 0x1570dbf000 - 0x1570dc2fff 0x1570dc3000 - 0x1570dc3fff 0x1570dc4000 - 0x1570dc5fff 0x1570dc6000 - 0x1570dc6fff 0x1570dc7000 - 0x1570dc7fff 0x1570dc8000 - 0x1570dc8fff 0x1570dc9000 - 0x1570dccfff 0x1570dcd000 - 0x1570dcdfff 0x1570dce000 - 0x1570dcefff 0x1570dcf000 - 0x1570dd0fff 0x1570dd1000 - 0x1570dd1fff 0x1570dd2000 - 0x1570dd2fff 0x1570dd3000 - 0x1570f3efff 0x1570f3f000 - 0x1570f41fff 0x1570f42000 - 0x1570f42fff 0x1570f43000 - 0x1570f45fff 0x1570f46000 - 0x1570f58fff 0x1570f59000 - 0x1570f59fff 0x1570f5a000 - 0x1570f5afff 0x1570f5b000 - 0x1571078fff 0x1571079000 - 0x157107bfff 0x157107c000 - 0x157107efff 0x157107f000 - 0x1571083fff 0x1571084000 - 0x15710d8fff 0x15710d9000 - 0x1571783fff 0x3fffab9000 - 0x3fffadafff ;; 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 0x160a1000 - 0x160c1fff 0x80000000 - 0x800bffff 0x157a2f9000 - 0x157a313fff 0x157a314000 - 0x157a314fff 0x157a315000 - 0x157a315fff 0x157a316000 - 0x157a317fff 0x157a318000 - 0x157a319fff 0x157a31a000 - 0x157a320fff 0x157a321000 - 0x157a321fff 0x157a322000 - 0x157a322fff 0x157a324000 - 0x157a325fff 0x157a326000 - 0x157a364fff 0x157a365000 - 0x157a366fff 0x157a367000 - 0x157a36dfff 0x157a36e000 - 0x157a36efff 0x157a36f000 - 0x157a394fff 0x157a395000 - 0x157a398fff 0x157a399000 - 0x157a399fff 0x157a39a000 - 0x157a39bfff 0x157a39c000 - 0x157a39cfff 0x157a39d000 - 0x157a39dfff 0x157a39e000 - 0x157a39efff 0x157a39f000 - 0x157a3a2fff 0x157a3a3000 - 0x157a3a3fff 0x157a3a4000 - 0x157a3a4fff 0x157a3a5000 - 0x157a3a6fff 0x157a3a7000 - 0x157a3a7fff 0x157a3a8000 - 0x157a3a8fff 0x157a3a9000 - 0x157a514fff 0x157a515000 - 0x157a517fff 0x157a518000 - 0x157a518fff 0x157a519000 - 0x157a51bfff 0x157a51c000 - 0x157a52efff 0x157a52f000 - 0x157a52ffff 0x157a530000 - 0x157a530fff 0x157a531000 - 0x157a64efff 0x157a64f000 - 0x157a651fff 0x157a652000 - 0x157a654fff 0x157a655000 - 0x157a659fff 0x157a65a000 - 0x157a6aefff 0x157a6af000 - 0x157ad59fff 0x3fffb5a000 - 0x3fffb7bfff ;; 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 3820138569) 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 0x3a770000 - 0x3a790fff 0x80000000 - 0x800bffff 0x155b10c000 - 0x155b126fff 0x155b127000 - 0x155b127fff 0x155b128000 - 0x155b128fff 0x155b129000 - 0x155b12afff 0x155b12b000 - 0x155b12cfff 0x155b12d000 - 0x155b133fff 0x155b134000 - 0x155b134fff 0x155b135000 - 0x155b135fff 0x155b137000 - 0x155b138fff 0x155b139000 - 0x155b177fff 0x155b178000 - 0x155b179fff 0x155b17a000 - 0x155b180fff 0x155b181000 - 0x155b181fff 0x155b182000 - 0x155b1a7fff 0x155b1a8000 - 0x155b1abfff 0x155b1ac000 - 0x155b1acfff 0x155b1ad000 - 0x155b1aefff 0x155b1af000 - 0x155b1affff 0x155b1b0000 - 0x155b1b0fff 0x155b1b1000 - 0x155b1b1fff 0x155b1b2000 - 0x155b1b5fff 0x155b1b6000 - 0x155b1b6fff 0x155b1b7000 - 0x155b1b7fff 0x155b1b8000 - 0x155b1b9fff 0x155b1ba000 - 0x155b1bafff 0x155b1bb000 - 0x155b1bbfff 0x155b1bc000 - 0x155b327fff 0x155b328000 - 0x155b32afff 0x155b32b000 - 0x155b32bfff 0x155b32c000 - 0x155b32efff 0x155b32f000 - 0x155b341fff 0x155b342000 - 0x155b342fff 0x155b343000 - 0x155b343fff 0x155b344000 - 0x155b461fff 0x155b462000 - 0x155b464fff 0x155b465000 - 0x155b467fff 0x155b468000 - 0x155b46cfff 0x155b46d000 - 0x155b4c1fff 0x155b4c2000 - 0x155bb6cfff 0x3fff816000 - 0x3fff837fff ;; 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 0x3ec8a000 - 0x3ecaafff 0x80000000 - 0x800bffff 0x156a8c5000 - 0x156a8dffff 0x156a8e0000 - 0x156a8e0fff 0x156a8e1000 - 0x156a8e1fff 0x156a8e2000 - 0x156a8e3fff 0x156a8e4000 - 0x156a8e5fff 0x156a8e6000 - 0x156a8ecfff 0x156a8ed000 - 0x156a8edfff 0x156a8ee000 - 0x156a8eefff 0x156a8f0000 - 0x156a8f1fff 0x156a8f2000 - 0x156a930fff 0x156a931000 - 0x156a932fff 0x156a933000 - 0x156a939fff 0x156a93a000 - 0x156a93afff 0x156a93b000 - 0x156a960fff 0x156a961000 - 0x156a964fff 0x156a965000 - 0x156a965fff 0x156a966000 - 0x156a967fff 0x156a968000 - 0x156a968fff 0x156a969000 - 0x156a969fff 0x156a96a000 - 0x156a96afff 0x156a96b000 - 0x156a96efff 0x156a96f000 - 0x156a96ffff 0x156a970000 - 0x156a970fff 0x156a971000 - 0x156a972fff 0x156a973000 - 0x156a973fff 0x156a974000 - 0x156a974fff 0x156a975000 - 0x156aae0fff 0x156aae1000 - 0x156aae3fff 0x156aae4000 - 0x156aae4fff 0x156aae5000 - 0x156aae7fff 0x156aae8000 - 0x156aafafff 0x156aafb000 - 0x156aafbfff 0x156aafc000 - 0x156aafcfff 0x156aafd000 - 0x156ac1afff 0x156ac1b000 - 0x156ac1dfff 0x156ac1e000 - 0x156ac20fff 0x156ac21000 - 0x156ac25fff 0x156ac26000 - 0x156ac7afff 0x156ac7b000 - 0x156b325fff 0x3fffbb9000 - 0x3fffbdafff ;; 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 3820138569) 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 0x3ea4f000 - 0x3ea6ffff 0x80000000 - 0x800bffff 0x1575525000 - 0x157553ffff 0x1575540000 - 0x1575540fff 0x1575541000 - 0x1575541fff 0x1575542000 - 0x1575543fff 0x1575544000 - 0x1575545fff 0x1575546000 - 0x157554cfff 0x157554d000 - 0x157554dfff 0x157554e000 - 0x157554efff 0x1575550000 - 0x1575551fff 0x1575552000 - 0x1575590fff 0x1575591000 - 0x1575592fff 0x1575593000 - 0x1575599fff 0x157559a000 - 0x157559afff 0x157559b000 - 0x15755c0fff 0x15755c1000 - 0x15755c4fff 0x15755c5000 - 0x15755c5fff 0x15755c6000 - 0x15755c7fff 0x15755c8000 - 0x15755c8fff 0x15755c9000 - 0x15755c9fff 0x15755ca000 - 0x15755cafff 0x15755cb000 - 0x15755cefff 0x15755cf000 - 0x15755cffff 0x15755d0000 - 0x15755d0fff 0x15755d1000 - 0x15755d2fff 0x15755d3000 - 0x15755d3fff 0x15755d4000 - 0x15755d4fff 0x15755d5000 - 0x1575740fff 0x1575741000 - 0x1575743fff 0x1575744000 - 0x1575744fff 0x1575745000 - 0x1575747fff 0x1575748000 - 0x157575afff 0x157575b000 - 0x157575bfff 0x157575c000 - 0x157575cfff 0x157575d000 - 0x157587afff 0x157587b000 - 0x157587dfff 0x157587e000 - 0x1575880fff 0x1575881000 - 0x1575885fff 0x1575886000 - 0x15758dafff 0x15758db000 - 0x1575f85fff 0x3fffe05000 - 0x3fffe26fff ;; 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 0x2c720000 - 0x2c740fff 0x80000000 - 0x800bffff 0x15691cd000 - 0x15691e7fff 0x15691e8000 - 0x15691e8fff 0x15691e9000 - 0x15691e9fff 0x15691ea000 - 0x15691ebfff 0x15691ec000 - 0x15691edfff 0x15691ee000 - 0x15691f4fff 0x15691f5000 - 0x15691f5fff 0x15691f6000 - 0x15691f6fff 0x15691f8000 - 0x15691f9fff 0x15691fa000 - 0x1569238fff 0x1569239000 - 0x156923afff 0x156923b000 - 0x1569241fff 0x1569242000 - 0x1569242fff 0x1569243000 - 0x1569268fff 0x1569269000 - 0x156926cfff 0x156926d000 - 0x156926dfff 0x156926e000 - 0x156926ffff 0x1569270000 - 0x1569270fff 0x1569271000 - 0x1569271fff 0x1569272000 - 0x1569272fff 0x1569273000 - 0x1569276fff 0x1569277000 - 0x1569277fff 0x1569278000 - 0x1569278fff 0x1569279000 - 0x156927afff 0x156927b000 - 0x156927bfff 0x156927c000 - 0x156927cfff 0x156927d000 - 0x15693e8fff 0x15693e9000 - 0x15693ebfff 0x15693ec000 - 0x15693ecfff 0x15693ed000 - 0x15693effff 0x15693f0000 - 0x1569402fff 0x1569403000 - 0x1569403fff 0x1569404000 - 0x1569404fff 0x1569405000 - 0x1569522fff 0x1569523000 - 0x1569525fff 0x1569526000 - 0x1569528fff 0x1569529000 - 0x156952dfff 0x156952e000 - 0x1569582fff 0x1569583000 - 0x1569c2dfff 0x3fffe82000 - 0x3fffea2fff ;; 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 ; 60904 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 0x16497000 - 0x164b7fff 0x80000000 - 0x800bffff 0x157c04f000 - 0x157c069fff 0x157c06a000 - 0x157c06afff 0x157c06b000 - 0x157c06bfff 0x157c06c000 - 0x157c06dfff 0x157c06e000 - 0x157c06ffff 0x157c070000 - 0x157c076fff 0x157c077000 - 0x157c077fff 0x157c078000 - 0x157c078fff 0x157c07a000 - 0x157c07bfff 0x157c07c000 - 0x157c0bafff 0x157c0bb000 - 0x157c0bcfff 0x157c0bd000 - 0x157c0c3fff 0x157c0c4000 - 0x157c0c4fff 0x157c0c5000 - 0x157c14efff 0x157c14f000 - 0x157c14ffff 0x157c150000 - 0x157c150fff 0x157c151000 - 0x157c180fff 0x157c181000 - 0x157c181fff 0x157c182000 - 0x157c182fff 0x157c183000 - 0x157c183fff 0x157c184000 - 0x157c18bfff 0x157c18c000 - 0x157c1b1fff 0x157c1b2000 - 0x157c1b5fff 0x157c1b6000 - 0x157c1b6fff 0x157c1b7000 - 0x157c1b8fff 0x157c1b9000 - 0x157c1b9fff 0x157c1ba000 - 0x157c1bafff 0x157c1bb000 - 0x157c1bbfff 0x157c1bc000 - 0x157c1bffff 0x157c1c0000 - 0x157c1c0fff 0x157c1c1000 - 0x157c1c1fff 0x157c1c2000 - 0x157c1c3fff 0x157c1c4000 - 0x157c1c5fff 0x157c1c6000 - 0x157c1c6fff 0x157c1c7000 - 0x157c1c7fff 0x157c1c8000 - 0x157c333fff 0x157c334000 - 0x157c336fff 0x157c337000 - 0x157c337fff 0x157c338000 - 0x157c338fff 0x157c339000 - 0x157c34bfff 0x157c34c000 - 0x157c34cfff 0x157c34d000 - 0x157c34dfff 0x157c34e000 - 0x157c46bfff 0x157c46c000 - 0x157c46efff 0x157c46f000 - 0x157c471fff 0x157c472000 - 0x157c476fff 0x157c477000 - 0x157c4cbfff 0x157c4cc000 - 0x157cb76fff 0x3fffa17000 - 0x3fffa37fff ;; 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 ; 103721 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 0x3f326000 - 0x3f346fff 0x80000000 - 0x800bffff 0x156de7a000 - 0x156de94fff 0x156de95000 - 0x156de95fff 0x156de96000 - 0x156de96fff 0x156de97000 - 0x156de98fff 0x156de99000 - 0x156de9afff 0x156de9b000 - 0x156dea1fff 0x156dea2000 - 0x156dea2fff 0x156dea3000 - 0x156dea3fff 0x156dea5000 - 0x156dea6fff 0x156dea7000 - 0x156dee5fff 0x156dee6000 - 0x156dee7fff 0x156dee8000 - 0x156deeefff 0x156deef000 - 0x156deeffff 0x156def0000 - 0x156df79fff 0x156df7a000 - 0x156df7afff 0x156df7b000 - 0x156df7bfff 0x156df7c000 - 0x156dfabfff 0x156dfac000 - 0x156dfacfff 0x156dfad000 - 0x156dfadfff 0x156dfae000 - 0x156dfaefff 0x156dfaf000 - 0x156dfb6fff 0x156dfb7000 - 0x156dfdcfff 0x156dfdd000 - 0x156dfe0fff 0x156dfe1000 - 0x156dfe1fff 0x156dfe2000 - 0x156dfe3fff 0x156dfe4000 - 0x156dfe4fff 0x156dfe5000 - 0x156dfe5fff 0x156dfe6000 - 0x156dfe6fff 0x156dfe7000 - 0x156dfeafff 0x156dfeb000 - 0x156dfebfff 0x156dfec000 - 0x156dfecfff 0x156dfed000 - 0x156dfeefff 0x156dfef000 - 0x156dff0fff 0x156dff1000 - 0x156dff1fff 0x156dff2000 - 0x156dff2fff 0x156dff3000 - 0x156e15efff 0x156e15f000 - 0x156e161fff 0x156e162000 - 0x156e162fff 0x156e163000 - 0x156e163fff 0x156e164000 - 0x156e176fff 0x156e177000 - 0x156e177fff 0x156e178000 - 0x156e178fff 0x156e179000 - 0x156e296fff 0x156e297000 - 0x156e299fff 0x156e29a000 - 0x156e29cfff 0x156e29d000 - 0x156e2a1fff 0x156e2a2000 - 0x156e2f6fff 0x156e2f7000 - 0x156e9a1fff 0x3fffb9f000 - 0x3fffbc0fff ;; 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 3820138569) 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 0x36830000 - 0x36850fff 0x80000000 - 0x800bffff 0x1576d4e000 - 0x1576d68fff 0x1576d69000 - 0x1576d69fff 0x1576d6a000 - 0x1576d6afff 0x1576d6b000 - 0x1576d6cfff 0x1576d6d000 - 0x1576d6efff 0x1576d6f000 - 0x1576d75fff 0x1576d76000 - 0x1576d76fff 0x1576d77000 - 0x1576d77fff 0x1576d79000 - 0x1576d7afff 0x1576d7b000 - 0x1576db9fff 0x1576dba000 - 0x1576dbbfff 0x1576dbc000 - 0x1576dc2fff 0x1576dc3000 - 0x1576dc3fff 0x1576dc4000 - 0x1576e4dfff 0x1576e4e000 - 0x1576e4efff 0x1576e4f000 - 0x1576e4ffff 0x1576e50000 - 0x1576e7ffff 0x1576e80000 - 0x1576e80fff 0x1576e81000 - 0x1576e81fff 0x1576e82000 - 0x1576e82fff 0x1576e83000 - 0x1576e8afff 0x1576e8b000 - 0x1576eb0fff 0x1576eb1000 - 0x1576eb4fff 0x1576eb5000 - 0x1576eb5fff 0x1576eb6000 - 0x1576eb7fff 0x1576eb8000 - 0x1576eb8fff 0x1576eb9000 - 0x1576eb9fff 0x1576eba000 - 0x1576ebafff 0x1576ebb000 - 0x1576ebefff 0x1576ebf000 - 0x1576ebffff 0x1576ec0000 - 0x1576ec0fff 0x1576ec1000 - 0x1576ec2fff 0x1576ec3000 - 0x1576ec4fff 0x1576ec5000 - 0x1576ec5fff 0x1576ec6000 - 0x1576ec6fff 0x1576ec7000 - 0x1577032fff 0x1577033000 - 0x1577035fff 0x1577036000 - 0x1577036fff 0x1577037000 - 0x1577037fff 0x1577038000 - 0x157704afff 0x157704b000 - 0x157704bfff 0x157704c000 - 0x157704cfff 0x157704d000 - 0x157716afff 0x157716b000 - 0x157716dfff 0x157716e000 - 0x1577170fff 0x1577171000 - 0x1577175fff 0x1577176000 - 0x15771cafff 0x15771cb000 - 0x1577875fff 0x3fff98a000 - 0x3fff9abfff ;; 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 0x128cd000 - 0x128edfff 0x80000000 - 0x800bffff 0x156d873000 - 0x156d88dfff 0x156d88e000 - 0x156d88efff 0x156d88f000 - 0x156d88ffff 0x156d890000 - 0x156d891fff 0x156d892000 - 0x156d893fff 0x156d894000 - 0x156d89afff 0x156d89b000 - 0x156d89bfff 0x156d89c000 - 0x156d89cfff 0x156d89e000 - 0x156d89ffff 0x156d8a0000 - 0x156d8defff 0x156d8df000 - 0x156d8e0fff 0x156d8e1000 - 0x156d8e7fff 0x156d8e8000 - 0x156d8e8fff 0x156d8e9000 - 0x156d972fff 0x156d973000 - 0x156d973fff 0x156d974000 - 0x156d974fff 0x156d975000 - 0x156d9a4fff 0x156d9a5000 - 0x156d9a5fff 0x156d9a6000 - 0x156d9a6fff 0x156d9a7000 - 0x156d9a7fff 0x156d9a8000 - 0x156d9affff 0x156d9b0000 - 0x156d9d5fff 0x156d9d6000 - 0x156d9d9fff 0x156d9da000 - 0x156d9dafff 0x156d9db000 - 0x156d9dcfff 0x156d9dd000 - 0x156d9ddfff 0x156d9de000 - 0x156d9defff 0x156d9df000 - 0x156d9dffff 0x156d9e0000 - 0x156d9e3fff 0x156d9e4000 - 0x156d9e4fff 0x156d9e5000 - 0x156d9e5fff 0x156d9e6000 - 0x156d9e7fff 0x156d9e8000 - 0x156d9e9fff 0x156d9ea000 - 0x156d9eafff 0x156d9eb000 - 0x156d9ebfff 0x156d9ec000 - 0x156db57fff 0x156db58000 - 0x156db5afff 0x156db5b000 - 0x156db5bfff 0x156db5c000 - 0x156db5cfff 0x156db5d000 - 0x156db6ffff 0x156db70000 - 0x156db70fff 0x156db71000 - 0x156db71fff 0x156db72000 - 0x156dc8ffff 0x156dc90000 - 0x156dc92fff 0x156dc93000 - 0x156dc95fff 0x156dc96000 - 0x156dc9afff 0x156dc9b000 - 0x156dceffff 0x156dcf0000 - 0x156e39afff 0x3fffb38000 - 0x3fffb59fff ;; 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 0xa748000 - 0xa768fff 0x80000000 - 0x800bffff 0x1588177000 - 0x1588191fff 0x1588192000 - 0x1588192fff 0x1588193000 - 0x1588193fff 0x1588194000 - 0x1588195fff 0x1588196000 - 0x1588197fff 0x1588198000 - 0x158819efff 0x158819f000 - 0x158819ffff 0x15881a0000 - 0x15881a0fff 0x15881a2000 - 0x15881a3fff 0x15881a4000 - 0x15881e2fff 0x15881e3000 - 0x15881e4fff 0x15881e5000 - 0x15881ebfff 0x15881ec000 - 0x15881ecfff 0x15881ed000 - 0x1588276fff 0x1588277000 - 0x1588277fff 0x1588278000 - 0x1588278fff 0x1588279000 - 0x15882a8fff 0x15882a9000 - 0x15882a9fff 0x15882aa000 - 0x15882aafff 0x15882ab000 - 0x15882abfff 0x15882ac000 - 0x15882b3fff 0x15882b4000 - 0x15882d9fff 0x15882da000 - 0x15882ddfff 0x15882de000 - 0x15882defff 0x15882df000 - 0x15882e0fff 0x15882e1000 - 0x15882e1fff 0x15882e2000 - 0x15882e2fff 0x15882e3000 - 0x15882e3fff 0x15882e4000 - 0x15882e7fff 0x15882e8000 - 0x15882e8fff 0x15882e9000 - 0x15882e9fff 0x15882ea000 - 0x15882ebfff 0x15882ec000 - 0x15882edfff 0x15882ee000 - 0x15882eefff 0x15882ef000 - 0x15882effff 0x15882f0000 - 0x158845bfff 0x158845c000 - 0x158845efff 0x158845f000 - 0x158845ffff 0x1588460000 - 0x1588460fff 0x1588461000 - 0x1588473fff 0x1588474000 - 0x1588474fff 0x1588475000 - 0x1588475fff 0x1588476000 - 0x1588593fff 0x1588594000 - 0x1588596fff 0x1588597000 - 0x1588599fff 0x158859a000 - 0x158859efff 0x158859f000 - 0x15885f3fff 0x15885f4000 - 0x1588c9efff 0x3fff9eb000 - 0x3fffa0cfff ;; 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 0x3891d000 - 0x3893dfff 0x80000000 - 0x800bffff 0x1577d62000 - 0x1577d7cfff 0x1577d7d000 - 0x1577d7dfff 0x1577d7e000 - 0x1577d7efff 0x1577d7f000 - 0x1577d80fff 0x1577d81000 - 0x1577d82fff 0x1577d83000 - 0x1577d89fff 0x1577d8a000 - 0x1577d8afff 0x1577d8b000 - 0x1577d8bfff 0x1577d8d000 - 0x1577d8efff 0x1577d8f000 - 0x1577dcdfff 0x1577dce000 - 0x1577dcffff 0x1577dd0000 - 0x1577dd6fff 0x1577dd7000 - 0x1577dd7fff 0x1577dd8000 - 0x1577e61fff 0x1577e62000 - 0x1577e62fff 0x1577e63000 - 0x1577e63fff 0x1577e64000 - 0x1577e93fff 0x1577e94000 - 0x1577e94fff 0x1577e95000 - 0x1577e95fff 0x1577e96000 - 0x1577e96fff 0x1577e97000 - 0x1577e9efff 0x1577e9f000 - 0x1577ec4fff 0x1577ec5000 - 0x1577ec8fff 0x1577ec9000 - 0x1577ec9fff 0x1577eca000 - 0x1577ecbfff 0x1577ecc000 - 0x1577eccfff 0x1577ecd000 - 0x1577ecdfff 0x1577ece000 - 0x1577ecefff 0x1577ecf000 - 0x1577ed2fff 0x1577ed3000 - 0x1577ed3fff 0x1577ed4000 - 0x1577ed4fff 0x1577ed5000 - 0x1577ed6fff 0x1577ed7000 - 0x1577ed8fff 0x1577ed9000 - 0x1577ed9fff 0x1577eda000 - 0x1577edafff 0x1577edb000 - 0x1578046fff 0x1578047000 - 0x1578049fff 0x157804a000 - 0x157804afff 0x157804b000 - 0x157804bfff 0x157804c000 - 0x157805efff 0x157805f000 - 0x157805ffff 0x1578060000 - 0x1578060fff 0x1578061000 - 0x157817efff 0x157817f000 - 0x1578181fff 0x1578182000 - 0x1578184fff 0x1578185000 - 0x1578189fff 0x157818a000 - 0x15781defff 0x15781df000 - 0x1578889fff 0x3fffa3b000 - 0x3fffa5cfff ;; 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 3820138569) 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 0x108c000 - 0x10acfff 0x80000000 - 0x800bffff 0x156a5cd000 - 0x156a5e7fff 0x156a5e8000 - 0x156a5e8fff 0x156a5e9000 - 0x156a5e9fff 0x156a5ea000 - 0x156a5ebfff 0x156a5ec000 - 0x156a5edfff 0x156a5ee000 - 0x156a5f4fff 0x156a5f5000 - 0x156a5f5fff 0x156a5f6000 - 0x156a5f6fff 0x156a5f8000 - 0x156a5f9fff 0x156a5fa000 - 0x156a638fff 0x156a639000 - 0x156a63afff 0x156a63b000 - 0x156a641fff 0x156a642000 - 0x156a642fff 0x156a643000 - 0x156a6ccfff 0x156a6cd000 - 0x156a6cdfff 0x156a6ce000 - 0x156a6cefff 0x156a6cf000 - 0x156a6fefff 0x156a6ff000 - 0x156a6fffff 0x156a700000 - 0x156a700fff 0x156a701000 - 0x156a701fff 0x156a702000 - 0x156a709fff 0x156a70a000 - 0x156a72ffff 0x156a730000 - 0x156a733fff 0x156a734000 - 0x156a734fff 0x156a735000 - 0x156a736fff 0x156a737000 - 0x156a737fff 0x156a738000 - 0x156a738fff 0x156a739000 - 0x156a739fff 0x156a73a000 - 0x156a73dfff 0x156a73e000 - 0x156a73efff 0x156a73f000 - 0x156a73ffff 0x156a740000 - 0x156a741fff 0x156a742000 - 0x156a743fff 0x156a744000 - 0x156a744fff 0x156a745000 - 0x156a745fff 0x156a746000 - 0x156a8b1fff 0x156a8b2000 - 0x156a8b4fff 0x156a8b5000 - 0x156a8b5fff 0x156a8b6000 - 0x156a8b6fff 0x156a8b7000 - 0x156a8c9fff 0x156a8ca000 - 0x156a8cafff 0x156a8cb000 - 0x156a8cbfff 0x156a8cc000 - 0x156a9e9fff 0x156a9ea000 - 0x156a9ecfff 0x156a9ed000 - 0x156a9effff 0x156a9f0000 - 0x156a9f4fff 0x156a9f5000 - 0x156aa49fff 0x156aa4a000 - 0x156b0f4fff 0x3fff916000 - 0x3fff937fff ;; 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 0x12f98000 - 0x12fb8fff 0x80000000 - 0x800bffff 0x155b124000 - 0x155b13efff 0x155b13f000 - 0x155b13ffff 0x155b140000 - 0x155b140fff 0x155b141000 - 0x155b142fff 0x155b143000 - 0x155b144fff 0x155b145000 - 0x155b14bfff 0x155b14c000 - 0x155b14cfff 0x155b14d000 - 0x155b14dfff 0x155b14f000 - 0x155b150fff 0x155b151000 - 0x155b18ffff 0x155b190000 - 0x155b191fff 0x155b192000 - 0x155b198fff 0x155b199000 - 0x155b199fff 0x155b19a000 - 0x155b223fff 0x155b224000 - 0x155b224fff 0x155b225000 - 0x155b225fff 0x155b226000 - 0x155b255fff 0x155b256000 - 0x155b256fff 0x155b257000 - 0x155b257fff 0x155b258000 - 0x155b258fff 0x155b259000 - 0x155b260fff 0x155b261000 - 0x155b286fff 0x155b287000 - 0x155b28afff 0x155b28b000 - 0x155b28bfff 0x155b28c000 - 0x155b28dfff 0x155b28e000 - 0x155b28efff 0x155b28f000 - 0x155b28ffff 0x155b290000 - 0x155b290fff 0x155b291000 - 0x155b294fff 0x155b295000 - 0x155b295fff 0x155b296000 - 0x155b296fff 0x155b297000 - 0x155b298fff 0x155b299000 - 0x155b29afff 0x155b29b000 - 0x155b29bfff 0x155b29c000 - 0x155b29cfff 0x155b29d000 - 0x155b408fff 0x155b409000 - 0x155b40bfff 0x155b40c000 - 0x155b40cfff 0x155b40d000 - 0x155b40dfff 0x155b40e000 - 0x155b420fff 0x155b421000 - 0x155b421fff 0x155b422000 - 0x155b422fff 0x155b423000 - 0x155b540fff 0x155b541000 - 0x155b543fff 0x155b544000 - 0x155b546fff 0x155b547000 - 0x155b54bfff 0x155b54c000 - 0x155b5a0fff 0x155b5a1000 - 0x155bc4bfff 0x3fffed5000 - 0x3fffef6fff ;; 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 0x36cdb000 - 0x36cfbfff 0x80000000 - 0x800bffff 0x157b7dd000 - 0x157b7f7fff 0x157b7f8000 - 0x157b7f8fff 0x157b7f9000 - 0x157b7f9fff 0x157b7fa000 - 0x157b7fbfff 0x157b7fc000 - 0x157b7fdfff 0x157b7fe000 - 0x157b804fff 0x157b805000 - 0x157b805fff 0x157b806000 - 0x157b806fff 0x157b808000 - 0x157b809fff 0x157b80a000 - 0x157b848fff 0x157b849000 - 0x157b84afff 0x157b84b000 - 0x157b851fff 0x157b852000 - 0x157b852fff 0x157b853000 - 0x157b8dcfff 0x157b8dd000 - 0x157b8ddfff 0x157b8de000 - 0x157b8defff 0x157b8df000 - 0x157b90efff 0x157b90f000 - 0x157b90ffff 0x157b910000 - 0x157b910fff 0x157b911000 - 0x157b911fff 0x157b912000 - 0x157b919fff 0x157b91a000 - 0x157b93ffff 0x157b940000 - 0x157b943fff 0x157b944000 - 0x157b944fff 0x157b945000 - 0x157b946fff 0x157b947000 - 0x157b947fff 0x157b948000 - 0x157b948fff 0x157b949000 - 0x157b949fff 0x157b94a000 - 0x157b94dfff 0x157b94e000 - 0x157b94efff 0x157b94f000 - 0x157b94ffff 0x157b950000 - 0x157b951fff 0x157b952000 - 0x157b953fff 0x157b954000 - 0x157b954fff 0x157b955000 - 0x157b955fff 0x157b956000 - 0x157bac1fff 0x157bac2000 - 0x157bac4fff 0x157bac5000 - 0x157bac5fff 0x157bac6000 - 0x157bac6fff 0x157bac7000 - 0x157bad9fff 0x157bada000 - 0x157badafff 0x157badb000 - 0x157badbfff 0x157badc000 - 0x157bbf9fff 0x157bbfa000 - 0x157bbfcfff 0x157bbfd000 - 0x157bbfffff 0x157bc00000 - 0x157bc04fff 0x157bc05000 - 0x157bc59fff 0x157bc5a000 - 0x157c304fff 0x3fff835000 - 0x3fff856fff ;; 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 0x3581e000 - 0x3583efff 0x80000000 - 0x800bffff 0x158980e000 - 0x1589828fff 0x1589829000 - 0x1589829fff 0x158982a000 - 0x158982afff 0x158982b000 - 0x158982cfff 0x158982d000 - 0x158982efff 0x158982f000 - 0x1589835fff 0x1589836000 - 0x1589836fff 0x1589837000 - 0x1589837fff 0x1589839000 - 0x158983afff 0x158983b000 - 0x1589879fff 0x158987a000 - 0x158987bfff 0x158987c000 - 0x1589882fff 0x1589883000 - 0x1589883fff 0x1589884000 - 0x158990dfff 0x158990e000 - 0x158990efff 0x158990f000 - 0x158990ffff 0x1589910000 - 0x158993ffff 0x1589940000 - 0x1589940fff 0x1589941000 - 0x1589941fff 0x1589942000 - 0x1589942fff 0x1589943000 - 0x158994afff 0x158994b000 - 0x1589970fff 0x1589971000 - 0x1589974fff 0x1589975000 - 0x1589975fff 0x1589976000 - 0x1589977fff 0x1589978000 - 0x1589978fff 0x1589979000 - 0x1589979fff 0x158997a000 - 0x158997afff 0x158997b000 - 0x158997efff 0x158997f000 - 0x158997ffff 0x1589980000 - 0x1589980fff 0x1589981000 - 0x1589982fff 0x1589983000 - 0x1589984fff 0x1589985000 - 0x1589985fff 0x1589986000 - 0x1589986fff 0x1589987000 - 0x1589af2fff 0x1589af3000 - 0x1589af5fff 0x1589af6000 - 0x1589af6fff 0x1589af7000 - 0x1589af7fff 0x1589af8000 - 0x1589b0afff 0x1589b0b000 - 0x1589b0bfff 0x1589b0c000 - 0x1589b0cfff 0x1589b0d000 - 0x1589c2afff 0x1589c2b000 - 0x1589c2dfff 0x1589c2e000 - 0x1589c30fff 0x1589c31000 - 0x1589c35fff 0x1589c36000 - 0x1589c8afff 0x1589c8b000 - 0x158a335fff 0x3fff97e000 - 0x3fff99ffff ;; 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 3820138569) 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 0x6457000 - 0x6477fff 0x80000000 - 0x800bffff 0x1586918000 - 0x1586932fff 0x1586933000 - 0x1586933fff 0x1586934000 - 0x1586934fff 0x1586935000 - 0x1586936fff 0x1586937000 - 0x1586938fff 0x1586939000 - 0x158693ffff 0x1586940000 - 0x1586940fff 0x1586941000 - 0x1586941fff 0x1586943000 - 0x1586944fff 0x1586945000 - 0x1586983fff 0x1586984000 - 0x1586985fff 0x1586986000 - 0x158698cfff 0x158698d000 - 0x158698dfff 0x158698e000 - 0x1586a17fff 0x1586a18000 - 0x1586a18fff 0x1586a19000 - 0x1586a19fff 0x1586a1a000 - 0x1586a49fff 0x1586a4a000 - 0x1586a4afff 0x1586a4b000 - 0x1586a4bfff 0x1586a4c000 - 0x1586a4cfff 0x1586a4d000 - 0x1586a54fff 0x1586a55000 - 0x1586a7afff 0x1586a7b000 - 0x1586a7efff 0x1586a7f000 - 0x1586a7ffff 0x1586a80000 - 0x1586a81fff 0x1586a82000 - 0x1586a82fff 0x1586a83000 - 0x1586a83fff 0x1586a84000 - 0x1586a84fff 0x1586a85000 - 0x1586a88fff 0x1586a89000 - 0x1586a89fff 0x1586a8a000 - 0x1586a8afff 0x1586a8b000 - 0x1586a8cfff 0x1586a8d000 - 0x1586a8efff 0x1586a8f000 - 0x1586a8ffff 0x1586a90000 - 0x1586a90fff 0x1586a91000 - 0x1586bfcfff 0x1586bfd000 - 0x1586bfffff 0x1586c00000 - 0x1586c00fff 0x1586c01000 - 0x1586c01fff 0x1586c02000 - 0x1586c14fff 0x1586c15000 - 0x1586c15fff 0x1586c16000 - 0x1586c16fff 0x1586c17000 - 0x1586d34fff 0x1586d35000 - 0x1586d37fff 0x1586d38000 - 0x1586d3afff 0x1586d3b000 - 0x1586d3ffff 0x1586d40000 - 0x1586d94fff 0x1586d95000 - 0x158743ffff 0x3fffdd9000 - 0x3fffdfafff ;; 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 3820138569) 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 0x1abc4000 - 0x1abe4fff 0x80000000 - 0x800bffff 0x15803c2000 - 0x15803dcfff 0x15803dd000 - 0x15803ddfff 0x15803de000 - 0x15803defff 0x15803df000 - 0x15803e0fff 0x15803e1000 - 0x15803e2fff 0x15803e3000 - 0x15803e9fff 0x15803ea000 - 0x15803eafff 0x15803eb000 - 0x15803ebfff 0x15803ed000 - 0x15803eefff 0x15803ef000 - 0x158042dfff 0x158042e000 - 0x158042ffff 0x1580430000 - 0x1580436fff 0x1580437000 - 0x1580437fff 0x1580438000 - 0x15804c1fff 0x15804c2000 - 0x15804c2fff 0x15804c3000 - 0x15804c3fff 0x15804c4000 - 0x15804f3fff 0x15804f4000 - 0x15804f4fff 0x15804f5000 - 0x15804f5fff 0x15804f6000 - 0x15804f6fff 0x15804f7000 - 0x15804fefff 0x15804ff000 - 0x1580524fff 0x1580525000 - 0x1580528fff 0x1580529000 - 0x1580529fff 0x158052a000 - 0x158052bfff 0x158052c000 - 0x158052cfff 0x158052d000 - 0x158052dfff 0x158052e000 - 0x158052efff 0x158052f000 - 0x1580532fff 0x1580533000 - 0x1580533fff 0x1580534000 - 0x1580534fff 0x1580535000 - 0x1580536fff 0x1580537000 - 0x1580538fff 0x1580539000 - 0x1580539fff 0x158053a000 - 0x158053afff 0x158053b000 - 0x15806a6fff 0x15806a7000 - 0x15806a9fff 0x15806aa000 - 0x15806aafff 0x15806ab000 - 0x15806abfff 0x15806ac000 - 0x15806befff 0x15806bf000 - 0x15806bffff 0x15806c0000 - 0x15806c0fff 0x15806c1000 - 0x15807defff 0x15807df000 - 0x15807e1fff 0x15807e2000 - 0x15807e4fff 0x15807e5000 - 0x15807e9fff 0x15807ea000 - 0x158083efff 0x158083f000 - 0x1580ee9fff 0x3fff96e000 - 0x3fff98ffff ;; 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 3820138569) 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 0x30945000 - 0x30965fff 0x80000000 - 0x800bffff 0x1585167000 - 0x1585181fff 0x1585182000 - 0x1585182fff 0x1585183000 - 0x1585183fff 0x1585184000 - 0x1585185fff 0x1585186000 - 0x1585187fff 0x1585188000 - 0x158518efff 0x158518f000 - 0x158518ffff 0x1585190000 - 0x1585190fff 0x1585192000 - 0x1585193fff 0x1585194000 - 0x15851d2fff 0x15851d3000 - 0x15851d4fff 0x15851d5000 - 0x15851dbfff 0x15851dc000 - 0x15851dcfff 0x15851dd000 - 0x1585266fff 0x1585267000 - 0x1585267fff 0x1585268000 - 0x1585268fff 0x1585269000 - 0x1585298fff 0x1585299000 - 0x1585299fff 0x158529a000 - 0x158529afff 0x158529b000 - 0x158529bfff 0x158529c000 - 0x15852a3fff 0x15852a4000 - 0x15852c9fff 0x15852ca000 - 0x15852cdfff 0x15852ce000 - 0x15852cefff 0x15852cf000 - 0x15852d0fff 0x15852d1000 - 0x15852d1fff 0x15852d2000 - 0x15852d2fff 0x15852d3000 - 0x15852d3fff 0x15852d4000 - 0x15852d7fff 0x15852d8000 - 0x15852d8fff 0x15852d9000 - 0x15852d9fff 0x15852da000 - 0x15852dbfff 0x15852dc000 - 0x15852ddfff 0x15852de000 - 0x15852defff 0x15852df000 - 0x15852dffff 0x15852e0000 - 0x158544bfff 0x158544c000 - 0x158544efff 0x158544f000 - 0x158544ffff 0x1585450000 - 0x1585450fff 0x1585451000 - 0x1585463fff 0x1585464000 - 0x1585464fff 0x1585465000 - 0x1585465fff 0x1585466000 - 0x1585583fff 0x1585584000 - 0x1585586fff 0x1585587000 - 0x1585589fff 0x158558a000 - 0x158558efff 0x158558f000 - 0x15855e3fff 0x15855e4000 - 0x1585c8efff 0x3fffe63000 - 0x3fffe84fff ;; 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 0x10622000 - 0x10642fff 0x80000000 - 0x800bffff 0x1559fed000 - 0x155a007fff 0x155a008000 - 0x155a008fff 0x155a009000 - 0x155a009fff 0x155a00a000 - 0x155a00bfff 0x155a00c000 - 0x155a00dfff 0x155a00e000 - 0x155a014fff 0x155a015000 - 0x155a015fff 0x155a016000 - 0x155a016fff 0x155a018000 - 0x155a019fff 0x155a01a000 - 0x155a058fff 0x155a059000 - 0x155a05afff 0x155a05b000 - 0x155a061fff 0x155a062000 - 0x155a062fff 0x155a063000 - 0x155a0ecfff 0x155a0ed000 - 0x155a0edfff 0x155a0ee000 - 0x155a0eefff 0x155a0ef000 - 0x155a11efff 0x155a11f000 - 0x155a11ffff 0x155a120000 - 0x155a120fff 0x155a121000 - 0x155a121fff 0x155a122000 - 0x155a129fff 0x155a12a000 - 0x155a14ffff 0x155a150000 - 0x155a153fff 0x155a154000 - 0x155a154fff 0x155a155000 - 0x155a156fff 0x155a157000 - 0x155a157fff 0x155a158000 - 0x155a158fff 0x155a159000 - 0x155a159fff 0x155a15a000 - 0x155a15dfff 0x155a15e000 - 0x155a15efff 0x155a15f000 - 0x155a15ffff 0x155a160000 - 0x155a161fff 0x155a162000 - 0x155a163fff 0x155a164000 - 0x155a164fff 0x155a165000 - 0x155a165fff 0x155a166000 - 0x155a2d1fff 0x155a2d2000 - 0x155a2d4fff 0x155a2d5000 - 0x155a2d5fff 0x155a2d6000 - 0x155a2d6fff 0x155a2d7000 - 0x155a2e9fff 0x155a2ea000 - 0x155a2eafff 0x155a2eb000 - 0x155a2ebfff 0x155a2ec000 - 0x155a409fff 0x155a40a000 - 0x155a40cfff 0x155a40d000 - 0x155a40ffff 0x155a410000 - 0x155a414fff 0x155a415000 - 0x155a469fff 0x155a46a000 - 0x155ab14fff 0x3fffcde000 - 0x3fffcfffff ;; 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 3820138569) 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 0x2c54f000 - 0x2c56ffff 0x80000000 - 0x800bffff 0x157a7e4000 - 0x157a7fefff 0x157a7ff000 - 0x157a7fffff 0x157a800000 - 0x157a800fff 0x157a801000 - 0x157a802fff 0x157a803000 - 0x157a804fff 0x157a805000 - 0x157a80bfff 0x157a80c000 - 0x157a80cfff 0x157a80d000 - 0x157a80dfff 0x157a80f000 - 0x157a810fff 0x157a811000 - 0x157a84ffff 0x157a850000 - 0x157a851fff 0x157a852000 - 0x157a858fff 0x157a859000 - 0x157a859fff 0x157a85a000 - 0x157a8e3fff 0x157a8e4000 - 0x157a8e4fff 0x157a8e5000 - 0x157a8e5fff 0x157a8e6000 - 0x157a915fff 0x157a916000 - 0x157a916fff 0x157a917000 - 0x157a917fff 0x157a918000 - 0x157a918fff 0x157a919000 - 0x157a920fff 0x157a921000 - 0x157a946fff 0x157a947000 - 0x157a94afff 0x157a94b000 - 0x157a94bfff 0x157a94c000 - 0x157a94dfff 0x157a94e000 - 0x157a94efff 0x157a94f000 - 0x157a94ffff 0x157a950000 - 0x157a950fff 0x157a951000 - 0x157a954fff 0x157a955000 - 0x157a955fff 0x157a956000 - 0x157a956fff 0x157a957000 - 0x157a958fff 0x157a959000 - 0x157a95afff 0x157a95b000 - 0x157a95bfff 0x157a95c000 - 0x157a95cfff 0x157a95d000 - 0x157aac8fff 0x157aac9000 - 0x157aacbfff 0x157aacc000 - 0x157aaccfff 0x157aacd000 - 0x157aacdfff 0x157aace000 - 0x157aae0fff 0x157aae1000 - 0x157aae1fff 0x157aae2000 - 0x157aae2fff 0x157aae3000 - 0x157ac00fff 0x157ac01000 - 0x157ac03fff 0x157ac04000 - 0x157ac06fff 0x157ac07000 - 0x157ac0bfff 0x157ac0c000 - 0x157ac60fff 0x157ac61000 - 0x157b30bfff 0x3fff90e000 - 0x3fff92ffff ;; 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 3820138569) 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 0x2d92d000 - 0x2d94dfff 0x80000000 - 0x800bffff 0x15943ae000 - 0x15943c8fff 0x15943c9000 - 0x15943c9fff 0x15943ca000 - 0x15943cafff 0x15943cb000 - 0x15943ccfff 0x15943cd000 - 0x15943cefff 0x15943cf000 - 0x15943d5fff 0x15943d6000 - 0x15943d6fff 0x15943d7000 - 0x15943d7fff 0x15943d9000 - 0x15943dafff 0x15943db000 - 0x1594419fff 0x159441a000 - 0x159441bfff 0x159441c000 - 0x1594422fff 0x1594423000 - 0x1594423fff 0x1594424000 - 0x15944adfff 0x15944ae000 - 0x15944aefff 0x15944af000 - 0x15944affff 0x15944b0000 - 0x15944dffff 0x15944e0000 - 0x15944e0fff 0x15944e1000 - 0x15944e1fff 0x15944e2000 - 0x15944e2fff 0x15944e3000 - 0x15944eafff 0x15944eb000 - 0x1594510fff 0x1594511000 - 0x1594514fff 0x1594515000 - 0x1594515fff 0x1594516000 - 0x1594517fff 0x1594518000 - 0x1594518fff 0x1594519000 - 0x1594519fff 0x159451a000 - 0x159451afff 0x159451b000 - 0x159451efff 0x159451f000 - 0x159451ffff 0x1594520000 - 0x1594520fff 0x1594521000 - 0x1594522fff 0x1594523000 - 0x1594524fff 0x1594525000 - 0x1594525fff 0x1594526000 - 0x1594526fff 0x1594527000 - 0x1594692fff 0x1594693000 - 0x1594695fff 0x1594696000 - 0x1594696fff 0x1594697000 - 0x1594697fff 0x1594698000 - 0x15946aafff 0x15946ab000 - 0x15946abfff 0x15946ac000 - 0x15946acfff 0x15946ad000 - 0x15947cafff 0x15947cb000 - 0x15947cdfff 0x15947ce000 - 0x15947d0fff 0x15947d1000 - 0x15947d5fff 0x15947d6000 - 0x159482afff 0x159482b000 - 0x1594ed5fff 0x3fffe98000 - 0x3fffeb9fff ;; 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 3820138569) 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 0x2bd2f000 - 0x2bd4ffff 0x80000000 - 0x800bffff 0x1586a17000 - 0x1586a31fff 0x1586a32000 - 0x1586a32fff 0x1586a33000 - 0x1586a33fff 0x1586a34000 - 0x1586a35fff 0x1586a36000 - 0x1586a37fff 0x1586a38000 - 0x1586a3efff 0x1586a3f000 - 0x1586a3ffff 0x1586a40000 - 0x1586a40fff 0x1586a42000 - 0x1586a43fff 0x1586a44000 - 0x1586a82fff 0x1586a83000 - 0x1586a84fff 0x1586a85000 - 0x1586a8bfff 0x1586a8c000 - 0x1586a8cfff 0x1586a8d000 - 0x1586b16fff 0x1586b17000 - 0x1586b17fff 0x1586b18000 - 0x1586b18fff 0x1586b19000 - 0x1586b48fff 0x1586b49000 - 0x1586b49fff 0x1586b4a000 - 0x1586b4afff 0x1586b4b000 - 0x1586b4bfff 0x1586b4c000 - 0x1586b53fff 0x1586b54000 - 0x1586b79fff 0x1586b7a000 - 0x1586b7dfff 0x1586b7e000 - 0x1586b7efff 0x1586b7f000 - 0x1586b80fff 0x1586b81000 - 0x1586b81fff 0x1586b82000 - 0x1586b82fff 0x1586b83000 - 0x1586b83fff 0x1586b84000 - 0x1586b87fff 0x1586b88000 - 0x1586b88fff 0x1586b89000 - 0x1586b89fff 0x1586b8a000 - 0x1586b8bfff 0x1586b8c000 - 0x1586b8dfff 0x1586b8e000 - 0x1586b8efff 0x1586b8f000 - 0x1586b8ffff 0x1586b90000 - 0x1586cfbfff 0x1586cfc000 - 0x1586cfefff 0x1586cff000 - 0x1586cfffff 0x1586d00000 - 0x1586d00fff 0x1586d01000 - 0x1586d13fff 0x1586d14000 - 0x1586d14fff 0x1586d15000 - 0x1586d15fff 0x1586d16000 - 0x1586e33fff 0x1586e34000 - 0x1586e36fff 0x1586e37000 - 0x1586e39fff 0x1586e3a000 - 0x1586e3efff 0x1586e3f000 - 0x1586e93fff 0x1586e94000 - 0x158753efff 0x3fffe7c000 - 0x3fffe9dfff ;; 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 0x258fd000 - 0x2591dfff 0x80000000 - 0x800bffff 0x15767c2000 - 0x15767dcfff 0x15767dd000 - 0x15767ddfff 0x15767de000 - 0x15767defff 0x15767df000 - 0x15767e0fff 0x15767e1000 - 0x15767e2fff 0x15767e3000 - 0x15767e9fff 0x15767ea000 - 0x15767eafff 0x15767eb000 - 0x15767ebfff 0x15767ed000 - 0x15767eefff 0x15767ef000 - 0x157682dfff 0x157682e000 - 0x157682ffff 0x1576830000 - 0x1576836fff 0x1576837000 - 0x1576837fff 0x1576838000 - 0x15768c1fff 0x15768c2000 - 0x15768c2fff 0x15768c3000 - 0x15768c3fff 0x15768c4000 - 0x15768f3fff 0x15768f4000 - 0x15768f4fff 0x15768f5000 - 0x15768f5fff 0x15768f6000 - 0x15768f6fff 0x15768f7000 - 0x15768fefff 0x15768ff000 - 0x1576924fff 0x1576925000 - 0x1576928fff 0x1576929000 - 0x1576929fff 0x157692a000 - 0x157692bfff 0x157692c000 - 0x157692cfff 0x157692d000 - 0x157692dfff 0x157692e000 - 0x157692efff 0x157692f000 - 0x1576932fff 0x1576933000 - 0x1576933fff 0x1576934000 - 0x1576934fff 0x1576935000 - 0x1576936fff 0x1576937000 - 0x1576938fff 0x1576939000 - 0x1576939fff 0x157693a000 - 0x157693afff 0x157693b000 - 0x1576aa6fff 0x1576aa7000 - 0x1576aa9fff 0x1576aaa000 - 0x1576aaafff 0x1576aab000 - 0x1576aabfff 0x1576aac000 - 0x1576abefff 0x1576abf000 - 0x1576abffff 0x1576ac0000 - 0x1576ac0fff 0x1576ac1000 - 0x1576bdefff 0x1576bdf000 - 0x1576be1fff 0x1576be2000 - 0x1576be4fff 0x1576be5000 - 0x1576be9fff 0x1576bea000 - 0x1576c3efff 0x1576c3f000 - 0x15772e9fff 0x3fffbd7000 - 0x3fffbf8fff ;; 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,506 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 3820138569) 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 0x348c6000 - 0x348e6fff 0x80000000 - 0x800bffff 0x15698bd000 - 0x15698d7fff 0x15698d8000 - 0x15698d8fff 0x15698d9000 - 0x15698d9fff 0x15698da000 - 0x15698dbfff 0x15698dc000 - 0x15698ddfff 0x15698de000 - 0x15698e4fff 0x15698e5000 - 0x15698e5fff 0x15698e6000 - 0x15698e6fff 0x15698e8000 - 0x15698e9fff 0x15698ea000 - 0x1569928fff 0x1569929000 - 0x156992afff 0x156992b000 - 0x1569931fff 0x1569932000 - 0x1569932fff 0x1569933000 - 0x15699bcfff 0x15699bd000 - 0x15699bdfff 0x15699be000 - 0x15699befff 0x15699bf000 - 0x15699eefff 0x15699ef000 - 0x15699effff 0x15699f0000 - 0x15699f0fff 0x15699f1000 - 0x15699f1fff 0x15699f2000 - 0x15699f9fff 0x15699fa000 - 0x1569a1ffff 0x1569a20000 - 0x1569a23fff 0x1569a24000 - 0x1569a24fff 0x1569a25000 - 0x1569a26fff 0x1569a27000 - 0x1569a27fff 0x1569a28000 - 0x1569a28fff 0x1569a29000 - 0x1569a29fff 0x1569a2a000 - 0x1569a2dfff 0x1569a2e000 - 0x1569a2efff 0x1569a2f000 - 0x1569a2ffff 0x1569a30000 - 0x1569a31fff 0x1569a32000 - 0x1569a33fff 0x1569a34000 - 0x1569a34fff 0x1569a35000 - 0x1569a35fff 0x1569a36000 - 0x1569ba1fff 0x1569ba2000 - 0x1569ba4fff 0x1569ba5000 - 0x1569ba5fff 0x1569ba6000 - 0x1569ba6fff 0x1569ba7000 - 0x1569bb9fff 0x1569bba000 - 0x1569bbafff 0x1569bbb000 - 0x1569bbbfff 0x1569bbc000 - 0x1569cd9fff 0x1569cda000 - 0x1569cdcfff 0x1569cdd000 - 0x1569cdffff 0x1569ce0000 - 0x1569ce4fff 0x1569ce5000 - 0x1569d39fff 0x1569d3a000 - 0x156a3e4fff 0x3fffd72000 - 0x3fffd93fff ;; 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 0x2defb000 - 0x2df1bfff 0x80000000 - 0x800bffff 0x156c3ef000 - 0x156c409fff 0x156c40a000 - 0x156c40afff 0x156c40b000 - 0x156c40bfff 0x156c40c000 - 0x156c40dfff 0x156c40e000 - 0x156c40ffff 0x156c410000 - 0x156c416fff 0x156c417000 - 0x156c417fff 0x156c418000 - 0x156c418fff 0x156c41a000 - 0x156c41bfff 0x156c41c000 - 0x156c45afff 0x156c45b000 - 0x156c45cfff 0x156c45d000 - 0x156c463fff 0x156c464000 - 0x156c464fff 0x156c465000 - 0x156c4eefff 0x156c4ef000 - 0x156c4effff 0x156c4f0000 - 0x156c4f0fff 0x156c4f1000 - 0x156c520fff 0x156c521000 - 0x156c521fff 0x156c522000 - 0x156c522fff 0x156c523000 - 0x156c523fff 0x156c524000 - 0x156c52bfff 0x156c52c000 - 0x156c551fff 0x156c552000 - 0x156c555fff 0x156c556000 - 0x156c556fff 0x156c557000 - 0x156c558fff 0x156c559000 - 0x156c559fff 0x156c55a000 - 0x156c55afff 0x156c55b000 - 0x156c55bfff 0x156c55c000 - 0x156c55ffff 0x156c560000 - 0x156c560fff 0x156c561000 - 0x156c561fff 0x156c562000 - 0x156c563fff 0x156c564000 - 0x156c565fff 0x156c566000 - 0x156c566fff 0x156c567000 - 0x156c567fff 0x156c568000 - 0x156c6d3fff 0x156c6d4000 - 0x156c6d6fff 0x156c6d7000 - 0x156c6d7fff 0x156c6d8000 - 0x156c6d8fff 0x156c6d9000 - 0x156c6ebfff 0x156c6ec000 - 0x156c6ecfff 0x156c6ed000 - 0x156c6edfff 0x156c6ee000 - 0x156c80bfff 0x156c80c000 - 0x156c80efff 0x156c80f000 - 0x156c811fff 0x156c812000 - 0x156c816fff 0x156c817000 - 0x156c86bfff 0x156c86c000 - 0x156cf16fff 0x3fff975000 - 0x3fff996fff ;; 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 3820138569) 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 0x395b0000 - 0x395d0fff 0x80000000 - 0x800bffff 0x156b20b000 - 0x156b225fff 0x156b226000 - 0x156b226fff 0x156b227000 - 0x156b227fff 0x156b228000 - 0x156b229fff 0x156b22a000 - 0x156b22bfff 0x156b22c000 - 0x156b232fff 0x156b233000 - 0x156b233fff 0x156b234000 - 0x156b234fff 0x156b236000 - 0x156b237fff 0x156b238000 - 0x156b276fff 0x156b277000 - 0x156b278fff 0x156b279000 - 0x156b27ffff 0x156b280000 - 0x156b280fff 0x156b281000 - 0x156b30afff 0x156b30b000 - 0x156b30bfff 0x156b30c000 - 0x156b30cfff 0x156b30d000 - 0x156b33cfff 0x156b33d000 - 0x156b33dfff 0x156b33e000 - 0x156b33efff 0x156b33f000 - 0x156b33ffff 0x156b340000 - 0x156b347fff 0x156b348000 - 0x156b36dfff 0x156b36e000 - 0x156b371fff 0x156b372000 - 0x156b372fff 0x156b373000 - 0x156b374fff 0x156b375000 - 0x156b375fff 0x156b376000 - 0x156b376fff 0x156b377000 - 0x156b377fff 0x156b378000 - 0x156b37bfff 0x156b37c000 - 0x156b37cfff 0x156b37d000 - 0x156b37dfff 0x156b37e000 - 0x156b37ffff 0x156b380000 - 0x156b381fff 0x156b382000 - 0x156b382fff 0x156b383000 - 0x156b383fff 0x156b384000 - 0x156b4effff 0x156b4f0000 - 0x156b4f2fff 0x156b4f3000 - 0x156b4f3fff 0x156b4f4000 - 0x156b4f4fff 0x156b4f5000 - 0x156b507fff 0x156b508000 - 0x156b508fff 0x156b509000 - 0x156b509fff 0x156b50a000 - 0x156b627fff 0x156b628000 - 0x156b62afff 0x156b62b000 - 0x156b62dfff 0x156b62e000 - 0x156b632fff 0x156b633000 - 0x156b687fff 0x156b688000 - 0x156bd32fff 0x3fffafd000 - 0x3fffb1efff ;; 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 0x2b35f000 - 0x2b37ffff 0x80000000 - 0x800bffff 0x155ed16000 - 0x155ed30fff 0x155ed31000 - 0x155ed31fff 0x155ed32000 - 0x155ed32fff 0x155ed33000 - 0x155ed34fff 0x155ed35000 - 0x155ed36fff 0x155ed37000 - 0x155ed3dfff 0x155ed3e000 - 0x155ed3efff 0x155ed3f000 - 0x155ed3ffff 0x155ed41000 - 0x155ed42fff 0x155ed43000 - 0x155ed81fff 0x155ed82000 - 0x155ed83fff 0x155ed84000 - 0x155ed8afff 0x155ed8b000 - 0x155ed8bfff 0x155ed8c000 - 0x155ee15fff 0x155ee16000 - 0x155ee16fff 0x155ee17000 - 0x155ee17fff 0x155ee18000 - 0x155ee47fff 0x155ee48000 - 0x155ee48fff 0x155ee49000 - 0x155ee49fff 0x155ee4a000 - 0x155ee4afff 0x155ee4b000 - 0x155ee52fff 0x155ee53000 - 0x155ee78fff 0x155ee79000 - 0x155ee7cfff 0x155ee7d000 - 0x155ee7dfff 0x155ee7e000 - 0x155ee7ffff 0x155ee80000 - 0x155ee80fff 0x155ee81000 - 0x155ee81fff 0x155ee82000 - 0x155ee82fff 0x155ee83000 - 0x155ee86fff 0x155ee87000 - 0x155ee87fff 0x155ee88000 - 0x155ee88fff 0x155ee89000 - 0x155ee8afff 0x155ee8b000 - 0x155ee8cfff 0x155ee8d000 - 0x155ee8dfff 0x155ee8e000 - 0x155ee8efff 0x155ee8f000 - 0x155effafff 0x155effb000 - 0x155effdfff 0x155effe000 - 0x155effefff 0x155efff000 - 0x155effffff 0x155f000000 - 0x155f012fff 0x155f013000 - 0x155f013fff 0x155f014000 - 0x155f014fff 0x155f015000 - 0x155f132fff 0x155f133000 - 0x155f135fff 0x155f136000 - 0x155f138fff 0x155f139000 - 0x155f13dfff 0x155f13e000 - 0x155f192fff 0x155f193000 - 0x155f83dfff 0x3ffff78000 - 0x3ffff99fff ;; 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 3820138569) 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 0x3b554000 - 0x3b574fff 0x80000000 - 0x800bffff 0x157ea3c000 - 0x157ea56fff 0x157ea57000 - 0x157ea57fff 0x157ea58000 - 0x157ea58fff 0x157ea59000 - 0x157ea5afff 0x157ea5b000 - 0x157ea5cfff 0x157ea5d000 - 0x157ea63fff 0x157ea64000 - 0x157ea64fff 0x157ea65000 - 0x157ea65fff 0x157ea67000 - 0x157ea68fff 0x157ea69000 - 0x157eaa7fff 0x157eaa8000 - 0x157eaa9fff 0x157eaaa000 - 0x157eab0fff 0x157eab1000 - 0x157eab1fff 0x157eab2000 - 0x157eb3bfff 0x157eb3c000 - 0x157eb3cfff 0x157eb3d000 - 0x157eb3dfff 0x157eb3e000 - 0x157eb6dfff 0x157eb6e000 - 0x157eb6efff 0x157eb6f000 - 0x157eb6ffff 0x157eb70000 - 0x157eb70fff 0x157eb71000 - 0x157eb78fff 0x157eb79000 - 0x157eb9efff 0x157eb9f000 - 0x157eba2fff 0x157eba3000 - 0x157eba3fff 0x157eba4000 - 0x157eba5fff 0x157eba6000 - 0x157eba6fff 0x157eba7000 - 0x157eba7fff 0x157eba8000 - 0x157eba8fff 0x157eba9000 - 0x157ebacfff 0x157ebad000 - 0x157ebadfff 0x157ebae000 - 0x157ebaefff 0x157ebaf000 - 0x157ebb0fff 0x157ebb1000 - 0x157ebb2fff 0x157ebb3000 - 0x157ebb3fff 0x157ebb4000 - 0x157ebb4fff 0x157ebb5000 - 0x157ed20fff 0x157ed21000 - 0x157ed23fff 0x157ed24000 - 0x157ed24fff 0x157ed25000 - 0x157ed25fff 0x157ed26000 - 0x157ed38fff 0x157ed39000 - 0x157ed39fff 0x157ed3a000 - 0x157ed3afff 0x157ed3b000 - 0x157ee58fff 0x157ee59000 - 0x157ee5bfff 0x157ee5c000 - 0x157ee5efff 0x157ee5f000 - 0x157ee63fff 0x157ee64000 - 0x157eeb8fff 0x157eeb9000 - 0x157f563fff 0x3fffc14000 - 0x3fffc35fff ;; 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 0xd56000 - 0xd76fff 0x80000000 - 0x800bffff 0x1589cc0000 - 0x1589cdafff 0x1589cdb000 - 0x1589cdbfff 0x1589cdc000 - 0x1589cdcfff 0x1589cdd000 - 0x1589cdefff 0x1589cdf000 - 0x1589ce0fff 0x1589ce1000 - 0x1589ce7fff 0x1589ce8000 - 0x1589ce8fff 0x1589ce9000 - 0x1589ce9fff 0x1589ceb000 - 0x1589cecfff 0x1589ced000 - 0x1589d2bfff 0x1589d2c000 - 0x1589d2dfff 0x1589d2e000 - 0x1589d34fff 0x1589d35000 - 0x1589d35fff 0x1589d36000 - 0x1589dbffff 0x1589dc0000 - 0x1589dc0fff 0x1589dc1000 - 0x1589dc1fff 0x1589dc2000 - 0x1589df1fff 0x1589df2000 - 0x1589df2fff 0x1589df3000 - 0x1589df3fff 0x1589df4000 - 0x1589df4fff 0x1589df5000 - 0x1589dfcfff 0x1589dfd000 - 0x1589e22fff 0x1589e23000 - 0x1589e26fff 0x1589e27000 - 0x1589e27fff 0x1589e28000 - 0x1589e29fff 0x1589e2a000 - 0x1589e2afff 0x1589e2b000 - 0x1589e2bfff 0x1589e2c000 - 0x1589e2cfff 0x1589e2d000 - 0x1589e30fff 0x1589e31000 - 0x1589e31fff 0x1589e32000 - 0x1589e32fff 0x1589e33000 - 0x1589e34fff 0x1589e35000 - 0x1589e36fff 0x1589e37000 - 0x1589e37fff 0x1589e38000 - 0x1589e38fff 0x1589e39000 - 0x1589fa4fff 0x1589fa5000 - 0x1589fa7fff 0x1589fa8000 - 0x1589fa8fff 0x1589fa9000 - 0x1589fa9fff 0x1589faa000 - 0x1589fbcfff 0x1589fbd000 - 0x1589fbdfff 0x1589fbe000 - 0x1589fbefff 0x1589fbf000 - 0x158a0dcfff 0x158a0dd000 - 0x158a0dffff 0x158a0e0000 - 0x158a0e2fff 0x158a0e3000 - 0x158a0e7fff 0x158a0e8000 - 0x158a13cfff 0x158a13d000 - 0x158a7e7fff 0x3fff8b9000 - 0x3fff8dafff ;; 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 3820138569) 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 0x138af000 - 0x138cffff 0x80000000 - 0x800bffff 0x1577005000 - 0x157701ffff 0x1577020000 - 0x1577020fff 0x1577021000 - 0x1577021fff 0x1577022000 - 0x1577023fff 0x1577024000 - 0x1577025fff 0x1577026000 - 0x157702cfff 0x157702d000 - 0x157702dfff 0x157702e000 - 0x157702efff 0x1577030000 - 0x1577031fff 0x1577032000 - 0x1577070fff 0x1577071000 - 0x1577072fff 0x1577073000 - 0x1577079fff 0x157707a000 - 0x157707afff 0x157707b000 - 0x1577104fff 0x1577105000 - 0x1577105fff 0x1577106000 - 0x1577106fff 0x1577107000 - 0x1577136fff 0x1577137000 - 0x1577137fff 0x1577138000 - 0x1577138fff 0x1577139000 - 0x1577139fff 0x157713a000 - 0x1577141fff 0x1577142000 - 0x1577167fff 0x1577168000 - 0x157716bfff 0x157716c000 - 0x157716cfff 0x157716d000 - 0x157716efff 0x157716f000 - 0x157716ffff 0x1577170000 - 0x1577170fff 0x1577171000 - 0x1577171fff 0x1577172000 - 0x1577175fff 0x1577176000 - 0x1577176fff 0x1577177000 - 0x1577177fff 0x1577178000 - 0x1577179fff 0x157717a000 - 0x157717bfff 0x157717c000 - 0x157717cfff 0x157717d000 - 0x157717dfff 0x157717e000 - 0x15772e9fff 0x15772ea000 - 0x15772ecfff 0x15772ed000 - 0x15772edfff 0x15772ee000 - 0x15772eefff 0x15772ef000 - 0x1577301fff 0x1577302000 - 0x1577302fff 0x1577303000 - 0x1577303fff 0x1577304000 - 0x1577421fff 0x1577422000 - 0x1577424fff 0x1577425000 - 0x1577427fff 0x1577428000 - 0x157742cfff 0x157742d000 - 0x1577481fff 0x1577482000 - 0x1577b2cfff 0x3ffff1e000 - 0x3ffff3ffff ;; 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 0x1bfd9000 - 0x1bff9fff 0x80000000 - 0x800bffff 0x155af47000 - 0x155af61fff 0x155af62000 - 0x155af62fff 0x155af63000 - 0x155af63fff 0x155af64000 - 0x155af65fff 0x155af66000 - 0x155af67fff 0x155af68000 - 0x155af6efff 0x155af6f000 - 0x155af6ffff 0x155af70000 - 0x155af70fff 0x155af72000 - 0x155af73fff 0x155af74000 - 0x155afb2fff 0x155afb3000 - 0x155afb4fff 0x155afb5000 - 0x155afbbfff 0x155afbc000 - 0x155afbcfff 0x155afbd000 - 0x155b046fff 0x155b047000 - 0x155b047fff 0x155b048000 - 0x155b048fff 0x155b049000 - 0x155b078fff 0x155b079000 - 0x155b079fff 0x155b07a000 - 0x155b07afff 0x155b07b000 - 0x155b07bfff 0x155b07c000 - 0x155b083fff 0x155b084000 - 0x155b0a9fff 0x155b0aa000 - 0x155b0adfff 0x155b0ae000 - 0x155b0aefff 0x155b0af000 - 0x155b0b0fff 0x155b0b1000 - 0x155b0b1fff 0x155b0b2000 - 0x155b0b2fff 0x155b0b3000 - 0x155b0b3fff 0x155b0b4000 - 0x155b0b7fff 0x155b0b8000 - 0x155b0b8fff 0x155b0b9000 - 0x155b0b9fff 0x155b0ba000 - 0x155b0bbfff 0x155b0bc000 - 0x155b0bdfff 0x155b0be000 - 0x155b0befff 0x155b0bf000 - 0x155b0bffff 0x155b0c0000 - 0x155b22bfff 0x155b22c000 - 0x155b22efff 0x155b22f000 - 0x155b22ffff 0x155b230000 - 0x155b230fff 0x155b231000 - 0x155b243fff 0x155b244000 - 0x155b244fff 0x155b245000 - 0x155b245fff 0x155b246000 - 0x155b363fff 0x155b364000 - 0x155b366fff 0x155b367000 - 0x155b369fff 0x155b36a000 - 0x155b36efff 0x155b36f000 - 0x155b3c3fff 0x155b3c4000 - 0x155ba6efff 0x3fffd94000 - 0x3fffdb4fff ;; 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 ; 44315 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 0x14874000 - 0x148b5fff 0x80000000 - 0x800bffff 0x155ef8d000 - 0x155efa7fff 0x155efa8000 - 0x155efa8fff 0x155efa9000 - 0x155efa9fff 0x155efaa000 - 0x155efabfff 0x155efac000 - 0x155efadfff 0x155efae000 - 0x155efb4fff 0x155efb5000 - 0x155efb5fff 0x155efb6000 - 0x155efb6fff 0x155efb8000 - 0x155efb9fff 0x155efba000 - 0x155efccfff 0x155efcd000 - 0x155efcdfff 0x155efce000 - 0x155efcefff 0x155efcf000 - 0x155f010fff 0x155f011000 - 0x155f013fff 0x155f014000 - 0x155f014fff 0x155f015000 - 0x155f04ffff 0x155f050000 - 0x155f050fff 0x155f051000 - 0x155f051fff 0x155f052000 - 0x155f052fff 0x155f053000 - 0x155f6befff 0x155f6bf000 - 0x155f6c0fff 0x155f6c1000 - 0x155f6eefff 0x155f6ef000 - 0x155f6effff 0x155f6f0000 - 0x155f6fafff 0x155f6fb000 - 0x155f6fbfff 0x155f6fc000 - 0x155f6fcfff 0x155f6fd000 - 0x155f6fdfff 0x155f6fe000 - 0x155faf9fff 0x155fafa000 - 0x155fafafff 0x155fafb000 - 0x155fb00fff 0x155fb01000 - 0x155fb05fff 0x155fb06000 - 0x155fb09fff 0x155fb0a000 - 0x155fbb0fff 0x155fbb1000 - 0x155fbb4fff 0x155fbb5000 - 0x155fbb6fff 0x155fbb7000 - 0x155fbd6fff 0x155fbd7000 - 0x155fbd7fff 0x155fbd8000 - 0x155fbd8fff 0x155fbd9000 - 0x155fc22fff 0x155fc23000 - 0x155fc24fff 0x155fc25000 - 0x155fc25fff 0x155fc26000 - 0x155fc26fff 0x155fc27000 - 0x155fd31fff 0x155fd32000 - 0x155fd32fff 0x155fd33000 - 0x155fd33fff 0x155fd34000 - 0x155fd34fff 0x155fd35000 - 0x155fd35fff 0x155fd36000 - 0x155fd4bfff 0x155fd4c000 - 0x155fd4cfff 0x155fd4d000 - 0x155fd4dfff 0x155fd4e000 - 0x155fd58fff 0x155fd59000 - 0x155fd59fff 0x155fd5a000 - 0x155fd5afff 0x155fd5b000 - 0x155fd5cfff 0x155fd5d000 - 0x155fd65fff 0x155fd66000 - 0x155fd66fff 0x155fd67000 - 0x155fd67fff 0x155fd68000 - 0x155fda8fff 0x155fda9000 - 0x155fda9fff 0x155fdaa000 - 0x155fdaafff 0x155fdab000 - 0x155fdabfff 0x155fdac000 - 0x155fdacfff 0x155fdad000 - 0x155fdb9fff 0x155fdba000 - 0x155fdbafff 0x155fdbb000 - 0x155fdbbfff 0x155fdbc000 - 0x155fdc9fff 0x155fdca000 - 0x155fdcafff 0x155fdcb000 - 0x155fdcbfff 0x155fdcc000 - 0x155fdccfff 0x155fdcd000 - 0x155fdcefff 0x155fdcf000 - 0x155fdcffff 0x155fdd0000 - 0x155fdd0fff 0x155fdd1000 - 0x155fee2fff 0x155fee3000 - 0x155fee3fff 0x155fee4000 - 0x155fee8fff 0x155fee9000 - 0x155feeafff 0x155feeb000 - 0x155ff74fff 0x155ff75000 - 0x155ff75fff 0x155ff76000 - 0x155ff76fff 0x155ff77000 - 0x15600c1fff 0x15600c2000 - 0x15600c7fff 0x15600c8000 - 0x15600cbfff 0x15600cc000 - 0x156010afff 0x156010b000 - 0x156010cfff 0x156010d000 - 0x1560113fff 0x1560114000 - 0x1560114fff 0x1560115000 - 0x1560144fff 0x1560145000 - 0x1560145fff 0x1560146000 - 0x1560146fff 0x1560147000 - 0x1560147fff 0x1560148000 - 0x156014ffff 0x1560150000 - 0x1560175fff 0x1560176000 - 0x1560179fff 0x156017a000 - 0x156017afff 0x156017b000 - 0x156017cfff 0x156017d000 - 0x156017dfff 0x156017e000 - 0x156017efff 0x156017f000 - 0x156017ffff 0x1560180000 - 0x1560181fff 0x1560182000 - 0x1560185fff 0x1560186000 - 0x1560186fff 0x1560187000 - 0x1560187fff 0x1560188000 - 0x1560189fff 0x156018a000 - 0x156018afff 0x156018b000 - 0x156018bfff 0x156018c000 - 0x15602f7fff 0x15602f8000 - 0x15602fafff 0x15602fb000 - 0x15602fbfff 0x15602fc000 - 0x15602fcfff 0x15602fd000 - 0x156030ffff 0x1560310000 - 0x1560310fff 0x1560311000 - 0x1560311fff 0x1560312000 - 0x156042ffff 0x1560430000 - 0x1560432fff 0x1560433000 - 0x1560435fff 0x1560436000 - 0x1560438fff 0x1560439000 - 0x15604a8fff 0x15604a9000 - 0x15604b0fff 0x15604b1000 - 0x15604b5fff 0x15604b6000 - 0x15604b7fff 0x15604b8000 - 0x15606a7fff 0x15606a8000 - 0x15606a8fff 0x15606a9000 - 0x15606d0fff 0x15606d1000 - 0x15606d4fff 0x15606d5000 - 0x15606d9fff 0x15606da000 - 0x1560716fff 0x1560717000 - 0x1560717fff 0x1560718000 - 0x1560718fff 0x1560719000 - 0x156071afff 0x156071b000 - 0x156075cfff 0x156075d000 - 0x156075dfff 0x156075e000 - 0x156075efff 0x156075f000 - 0x1560760fff 0x1560761000 - 0x1560762fff 0x1560763000 - 0x1560778fff 0x1560779000 - 0x1560779fff 0x156077a000 - 0x156077afff 0x156077b000 - 0x156077efff 0x156077f000 - 0x15607e2fff 0x15607e3000 - 0x15607e3fff 0x15607e4000 - 0x15607e4fff 0x15607e5000 - 0x15607e5fff 0x15607e6000 - 0x1560984fff 0x1560985000 - 0x156098efff 0x156098f000 - 0x1560992fff 0x1560993000 - 0x1560998fff 0x1560999000 - 0x156099afff 0x156099b000 - 0x156099bfff 0x156099c000 - 0x156099cfff 0x156099d000 - 0x156099dfff 0x156099e000 - 0x15609a8fff 0x15609a9000 - 0x15609a9fff 0x15609aa000 - 0x15609aafff 0x15609ab000 - 0x15609abfff 0x15609ac000 - 0x15609affff 0x15609b0000 - 0x15609b0fff 0x15609b1000 - 0x15609b1fff 0x15609b2000 - 0x15609d3fff 0x15609d4000 - 0x15609d6fff 0x15609d7000 - 0x15609d7fff 0x15609d8000 - 0x1560aacfff 0x1560aad000 - 0x1560aaffff 0x1560ab0000 - 0x1560ab1fff 0x1560ab2000 - 0x1560c40fff 0x1560c41000 - 0x1560c46fff 0x1560c47000 - 0x1560c49fff 0x1560c4a000 - 0x1560c4dfff 0x1560c4e000 - 0x1560c60fff 0x1560c61000 - 0x1560c61fff 0x1560c62000 - 0x1560c62fff 0x1560c63000 - 0x1560ca4fff 0x1560ca5000 - 0x1560ca7fff 0x1560ca8000 - 0x1560ca8fff 0x1560ca9000 - 0x1560ce4fff 0x1560ce5000 - 0x1560ce5fff 0x1560ce6000 - 0x1560ce7fff 0x1560ce8000 - 0x1560ce8fff 0x1560ce9000 - 0x1560cf0fff 0x1560cf1000 - 0x1560cf1fff 0x1560cf2000 - 0x1560cf2fff 0x1560cf3000 - 0x1560cf4fff 0x1560cf5000 - 0x1560cf5fff 0x1560cf6000 - 0x1560cf6fff 0x1560cf7000 - 0x1560d02fff 0x1560d03000 - 0x1560d03fff 0x1560d04000 - 0x1560d04fff 0x1560d05000 - 0x1560d06fff 0x1560d07000 - 0x1560d0efff 0x1560d0f000 - 0x1560d0ffff 0x1560d10000 - 0x1560d10fff 0x1560d11000 - 0x1560d18fff 0x1560d19000 - 0x1560d19fff 0x1560d1a000 - 0x1560d1afff 0x1560d1b000 - 0x1560d1cfff 0x1560d1d000 - 0x1560d1dfff 0x1560d1e000 - 0x1560d1efff 0x1560d1f000 - 0x1560d20fff 0x1560d21000 - 0x1560d21fff 0x1560d22000 - 0x1560d22fff 0x1560d23000 - 0x1560d4efff 0x1560d4f000 - 0x1560d4ffff 0x1560d50000 - 0x1560d50fff 0x1560d51000 - 0x1560d56fff 0x1560d57000 - 0x1560d57fff 0x1560d58000 - 0x1560d58fff 0x1560d59000 - 0x1560d5afff 0x1560d5b000 - 0x1560e85fff 0x1560e86000 - 0x1560e8dfff 0x1560e8e000 - 0x1560e8ffff 0x1560e90000 - 0x1560e90fff 0x1560e91000 - 0x1560f35fff 0x1560f36000 - 0x1560f36fff 0x1560f37000 - 0x1560f37fff 0x1560f38000 - 0x1560f38fff 0x1560f39000 - 0x1560fccfff 0x1560fcd000 - 0x1560fcdfff 0x1560fce000 - 0x1560fd3fff 0x1560fd4000 - 0x1560fd4fff 0x1560fd5000 - 0x156106afff 0x156106b000 - 0x156106dfff 0x156106e000 - 0x156106ffff 0x1561070000 - 0x1561070fff 0x1561071000 - 0x1561091fff 0x1561092000 - 0x1561092fff 0x1561093000 - 0x1561093fff 0x1561094000 - 0x1561095fff 0x1561096000 - 0x156113afff 0x156113b000 - 0x156113bfff 0x156113c000 - 0x1561146fff 0x1561147000 - 0x1561149fff 0x156114a000 - 0x1561159fff 0x156115a000 - 0x156115afff 0x156115b000 - 0x156115bfff 0x156115c000 - 0x156115cfff 0x156115d000 - 0x156115ffff 0x1561160000 - 0x1561160fff 0x1561161000 - 0x1561161fff 0x1561162000 - 0x156116cfff 0x156116d000 - 0x156116dfff 0x156116e000 - 0x156116efff 0x156116f000 - 0x1561171fff 0x1561172000 - 0x1561172fff 0x1561173000 - 0x1561173fff 0x1561174000 - 0x1561183fff 0x1561184000 - 0x1561184fff 0x1561185000 - 0x1561185fff 0x1561186000 - 0x1561187fff 0x1561188000 - 0x1561192fff 0x1561193000 - 0x1561193fff 0x1561194000 - 0x1561194fff 0x1561195000 - 0x1561195fff 0x1561196000 - 0x15611acfff 0x15611ad000 - 0x15611adfff 0x15611ae000 - 0x15611aefff 0x15611af000 - 0x1561204fff 0x1561205000 - 0x1561205fff 0x1561206000 - 0x1561209fff 0x156120a000 - 0x156120afff 0x156120b000 - 0x156120cfff 0x156120d000 - 0x156120dfff 0x156120e000 - 0x156120efff 0x156120f000 - 0x1561219fff 0x156121a000 - 0x156121afff 0x156121b000 - 0x156121bfff 0x156121c000 - 0x156121dfff 0x156121e000 - 0x1561223fff 0x1561224000 - 0x1561224fff 0x1561225000 - 0x1561225fff 0x1561226000 - 0x156125afff 0x156125b000 - 0x156125bfff 0x156125c000 - 0x156125cfff 0x156125d000 - 0x156127efff 0x156127f000 - 0x156127ffff 0x1561280000 - 0x1561280fff 0x1561281000 - 0x1561282fff 0x1561283000 - 0x156129cfff 0x156129d000 - 0x156129dfff 0x156129e000 - 0x156129efff 0x156129f000 - 0x15612a5fff 0x15612a6000 - 0x15612a6fff 0x15612a7000 - 0x15612a7fff 0x15612a8000 - 0x15612a9fff 0x15612aa000 - 0x15612cafff 0x15612cb000 - 0x15612cbfff 0x15612cc000 - 0x15612ccfff 0x15612cd000 - 0x15612cdfff 0x15612ce000 - 0x15612e2fff 0x15612e3000 - 0x15612e3fff 0x15612e4000 - 0x15612e5fff 0x15612e6000 - 0x15612e6fff 0x15612e7000 - 0x15612f4fff 0x15612f5000 - 0x15612f5fff 0x15612f6000 - 0x15612f6fff 0x15612f7000 - 0x15612fefff 0x15612ff000 - 0x15612fffff 0x1561300000 - 0x1561300fff 0x1561301000 - 0x1561301fff 0x1561302000 - 0x15613c8fff 0x15613c9000 - 0x15613c9fff 0x15613ca000 - 0x15613cafff 0x15613cb000 - 0x15613e7fff 0x15613e8000 - 0x15613e8fff 0x15613e9000 - 0x15613e9fff 0x15613ea000 - 0x15613ebfff 0x15613ec000 - 0x15614a6fff 0x15614a7000 - 0x15614a7fff 0x15614a8000 - 0x15614a8fff 0x15614a9000 - 0x15614adfff 0x15614ae000 - 0x15614d7fff 0x15614d8000 - 0x15614d8fff 0x15614d9000 - 0x15614dbfff 0x15614dc000 - 0x15614dcfff 0x15614dd000 - 0x156152bfff 0x156152c000 - 0x156152cfff 0x156152d000 - 0x156152dfff 0x156152e000 - 0x156152efff 0x156152f000 - 0x1561533fff 0x1561534000 - 0x1561534fff 0x1561535000 - 0x1561535fff 0x1561536000 - 0x1561537fff 0x1561538000 - 0x1561557fff 0x1561558000 - 0x1561558fff 0x1561559000 - 0x1561559fff 0x156155a000 - 0x1561574fff 0x1561575000 - 0x1561575fff 0x1561576000 - 0x1561576fff 0x1561577000 - 0x156157ffff 0x1561580000 - 0x15615d4fff 0x15615d5000 - 0x1561c7ffff 0x3fffaf2000 - 0x3fffb12fff ;; 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 ; 1842681 ===> 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 0xa8dc000 - 0xa8fcfff 0x80000000 - 0x800bffff 0x158fc90000 - 0x158fcaafff 0x158fcab000 - 0x158fcabfff 0x158fcac000 - 0x158fcacfff 0x158fcad000 - 0x158fcaefff 0x158fcaf000 - 0x158fcb0fff 0x158fcb1000 - 0x158fcb7fff 0x158fcb8000 - 0x158fcb8fff 0x158fcb9000 - 0x158fcb9fff 0x158fcbb000 - 0x158fcbcfff 0x158fcbd000 - 0x158fcfbfff 0x158fcfc000 - 0x158fcfdfff 0x158fcfe000 - 0x158fd04fff 0x158fd05000 - 0x158fd05fff 0x158fd06000 - 0x158fd2bfff 0x158fd2c000 - 0x158fd2ffff 0x158fd30000 - 0x158fd30fff 0x158fd31000 - 0x158fd32fff 0x158fd33000 - 0x158fd33fff 0x158fd34000 - 0x158fd34fff 0x158fd35000 - 0x158fd35fff 0x158fd36000 - 0x158fd39fff 0x158fd3a000 - 0x158fd3afff 0x158fd3b000 - 0x158fd3bfff 0x158fd3c000 - 0x158fd3dfff 0x158fd3e000 - 0x158fd3efff 0x158fd3f000 - 0x158fd3ffff 0x158fd40000 - 0x158feabfff 0x158feac000 - 0x158feaefff 0x158feaf000 - 0x158feaffff 0x158feb0000 - 0x158feb2fff 0x158feb3000 - 0x158fec5fff 0x158fec6000 - 0x158fec6fff 0x158fec7000 - 0x158fec7fff 0x158fec8000 - 0x158ffe5fff 0x158ffe6000 - 0x158ffe8fff 0x158ffe9000 - 0x158ffebfff 0x158ffec000 - 0x158fff0fff 0x158fff1000 - 0x1590045fff 0x1590046000 - 0x15906f0fff 0x3fff9dc000 - 0x3fff9fcfff ;; 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 0x1a941000 - 0x1a961fff 0x80000000 - 0x800bffff 0x15605be000 - 0x15605d8fff 0x15605d9000 - 0x15605d9fff 0x15605da000 - 0x15605dafff 0x15605db000 - 0x15605dcfff 0x15605dd000 - 0x15605defff 0x15605df000 - 0x15605e5fff 0x15605e6000 - 0x15605e6fff 0x15605e7000 - 0x15605e7fff 0x15605e9000 - 0x15605eafff 0x15605eb000 - 0x1560629fff 0x156062a000 - 0x156062bfff 0x156062c000 - 0x1560632fff 0x1560633000 - 0x1560633fff 0x1560634000 - 0x1560659fff 0x156065a000 - 0x156065dfff 0x156065e000 - 0x156065efff 0x156065f000 - 0x1560660fff 0x1560661000 - 0x1560661fff 0x1560662000 - 0x1560662fff 0x1560663000 - 0x1560663fff 0x1560664000 - 0x1560667fff 0x1560668000 - 0x1560668fff 0x1560669000 - 0x1560669fff 0x156066a000 - 0x156066bfff 0x156066c000 - 0x156066cfff 0x156066d000 - 0x156066dfff 0x156066e000 - 0x15607d9fff 0x15607da000 - 0x15607dcfff 0x15607dd000 - 0x15607ddfff 0x15607de000 - 0x15607e0fff 0x15607e1000 - 0x15607f3fff 0x15607f4000 - 0x15607f4fff 0x15607f5000 - 0x15607f5fff 0x15607f6000 - 0x1560913fff 0x1560914000 - 0x1560916fff 0x1560917000 - 0x1560919fff 0x156091a000 - 0x156091efff 0x156091f000 - 0x1560973fff 0x1560974000 - 0x156101efff 0x3fff8de000 - 0x3fff8fefff ;; 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 0x36ef6000 - 0x36f16fff 0x80000000 - 0x800bffff 0x155cf9c000 - 0x155cfb6fff 0x155cfb7000 - 0x155cfb7fff 0x155cfb8000 - 0x155cfb8fff 0x155cfb9000 - 0x155cfbafff 0x155cfbb000 - 0x155cfbcfff 0x155cfbd000 - 0x155cfc3fff 0x155cfc4000 - 0x155cfc4fff 0x155cfc5000 - 0x155cfc5fff 0x155cfc7000 - 0x155cfc8fff 0x155cfc9000 - 0x155d007fff 0x155d008000 - 0x155d009fff 0x155d00a000 - 0x155d010fff 0x155d011000 - 0x155d011fff 0x155d012000 - 0x155d037fff 0x155d038000 - 0x155d03bfff 0x155d03c000 - 0x155d03cfff 0x155d03d000 - 0x155d03efff 0x155d03f000 - 0x155d03ffff 0x155d040000 - 0x155d040fff 0x155d041000 - 0x155d041fff 0x155d042000 - 0x155d045fff 0x155d046000 - 0x155d046fff 0x155d047000 - 0x155d047fff 0x155d048000 - 0x155d049fff 0x155d04a000 - 0x155d04afff 0x155d04b000 - 0x155d04bfff 0x155d04c000 - 0x155d1b7fff 0x155d1b8000 - 0x155d1bafff 0x155d1bb000 - 0x155d1bbfff 0x155d1bc000 - 0x155d1befff 0x155d1bf000 - 0x155d1d1fff 0x155d1d2000 - 0x155d1d2fff 0x155d1d3000 - 0x155d1d3fff 0x155d1d4000 - 0x155d2f1fff 0x155d2f2000 - 0x155d2f4fff 0x155d2f5000 - 0x155d2f7fff 0x155d2f8000 - 0x155d2fcfff 0x155d2fd000 - 0x155d351fff 0x155d352000 - 0x155d9fcfff 0x3fffbc8000 - 0x3fffbe8fff ;; 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 0x17e11000 - 0x17e31fff 0x80000000 - 0x800bffff 0x156b95a000 - 0x156b974fff 0x156b975000 - 0x156b975fff 0x156b976000 - 0x156b976fff 0x156b977000 - 0x156b978fff 0x156b979000 - 0x156b97afff 0x156b97b000 - 0x156b981fff 0x156b982000 - 0x156b982fff 0x156b983000 - 0x156b983fff 0x156b985000 - 0x156b986fff 0x156b987000 - 0x156b9c5fff 0x156b9c6000 - 0x156b9c7fff 0x156b9c8000 - 0x156b9cefff 0x156b9cf000 - 0x156b9cffff 0x156b9d0000 - 0x156b9f5fff 0x156b9f6000 - 0x156b9f9fff 0x156b9fa000 - 0x156b9fafff 0x156b9fb000 - 0x156b9fcfff 0x156b9fd000 - 0x156b9fdfff 0x156b9fe000 - 0x156b9fefff 0x156b9ff000 - 0x156b9fffff 0x156ba00000 - 0x156ba03fff 0x156ba04000 - 0x156ba04fff 0x156ba05000 - 0x156ba05fff 0x156ba06000 - 0x156ba07fff 0x156ba08000 - 0x156ba08fff 0x156ba09000 - 0x156ba09fff 0x156ba0a000 - 0x156bb75fff 0x156bb76000 - 0x156bb78fff 0x156bb79000 - 0x156bb79fff 0x156bb7a000 - 0x156bb7cfff 0x156bb7d000 - 0x156bb8ffff 0x156bb90000 - 0x156bb90fff 0x156bb91000 - 0x156bb91fff 0x156bb92000 - 0x156bcaffff 0x156bcb0000 - 0x156bcb2fff 0x156bcb3000 - 0x156bcb5fff 0x156bcb6000 - 0x156bcbafff 0x156bcbb000 - 0x156bd0ffff 0x156bd10000 - 0x156c3bafff 0x3fffbb3000 - 0x3fffbd3fff ;; 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 0x122f7000 - 0x12317fff 0x80000000 - 0x800bffff 0x158ed0f000 - 0x158ed29fff 0x158ed2a000 - 0x158ed2afff 0x158ed2b000 - 0x158ed2bfff 0x158ed2c000 - 0x158ed2dfff 0x158ed2e000 - 0x158ed2ffff 0x158ed30000 - 0x158ed36fff 0x158ed37000 - 0x158ed37fff 0x158ed38000 - 0x158ed38fff 0x158ed3a000 - 0x158ed3bfff 0x158ed3c000 - 0x158ed7afff 0x158ed7b000 - 0x158ed7cfff 0x158ed7d000 - 0x158ed83fff 0x158ed84000 - 0x158ed84fff 0x158ed85000 - 0x158edaafff 0x158edab000 - 0x158edaefff 0x158edaf000 - 0x158edaffff 0x158edb0000 - 0x158edb1fff 0x158edb2000 - 0x158edb2fff 0x158edb3000 - 0x158edb3fff 0x158edb4000 - 0x158edb4fff 0x158edb5000 - 0x158edb8fff 0x158edb9000 - 0x158edb9fff 0x158edba000 - 0x158edbafff 0x158edbb000 - 0x158edbcfff 0x158edbd000 - 0x158edbdfff 0x158edbe000 - 0x158edbefff 0x158edbf000 - 0x158ef2afff 0x158ef2b000 - 0x158ef2dfff 0x158ef2e000 - 0x158ef2efff 0x158ef2f000 - 0x158ef31fff 0x158ef32000 - 0x158ef44fff 0x158ef45000 - 0x158ef45fff 0x158ef46000 - 0x158ef46fff 0x158ef47000 - 0x158f064fff 0x158f065000 - 0x158f067fff 0x158f068000 - 0x158f06afff 0x158f06b000 - 0x158f06ffff 0x158f070000 - 0x158f0c4fff 0x158f0c5000 - 0x158f76ffff 0x3fff8da000 - 0x3fff8fafff ;; 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 0x6c88000 - 0x6ca8fff 0x80000000 - 0x800bffff 0x156968f000 - 0x15696a9fff 0x15696aa000 - 0x15696aafff 0x15696ab000 - 0x15696abfff 0x15696ac000 - 0x15696adfff 0x15696ae000 - 0x15696affff 0x15696b0000 - 0x15696b6fff 0x15696b7000 - 0x15696b7fff 0x15696b8000 - 0x15696b8fff 0x15696ba000 - 0x15696bbfff 0x15696bc000 - 0x15696fafff 0x15696fb000 - 0x15696fcfff 0x15696fd000 - 0x1569703fff 0x1569704000 - 0x1569704fff 0x1569705000 - 0x156972afff 0x156972b000 - 0x156972efff 0x156972f000 - 0x156972ffff 0x1569730000 - 0x1569731fff 0x1569732000 - 0x1569732fff 0x1569733000 - 0x1569733fff 0x1569734000 - 0x1569734fff 0x1569735000 - 0x1569738fff 0x1569739000 - 0x1569739fff 0x156973a000 - 0x156973afff 0x156973b000 - 0x156973cfff 0x156973d000 - 0x156973dfff 0x156973e000 - 0x156973efff 0x156973f000 - 0x15698aafff 0x15698ab000 - 0x15698adfff 0x15698ae000 - 0x15698aefff 0x15698af000 - 0x15698b1fff 0x15698b2000 - 0x15698c4fff 0x15698c5000 - 0x15698c5fff 0x15698c6000 - 0x15698c6fff 0x15698c7000 - 0x15699e4fff 0x15699e5000 - 0x15699e7fff 0x15699e8000 - 0x15699eafff 0x15699eb000 - 0x15699effff 0x15699f0000 - 0x1569a44fff 0x1569a45000 - 0x156a0effff 0x3fff9a3000 - 0x3fff9c3fff ;; 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 0x98c7000 - 0x98e7fff 0x80000000 - 0x800bffff 0x15674ed000 - 0x1567507fff 0x1567508000 - 0x1567508fff 0x1567509000 - 0x1567509fff 0x156750a000 - 0x156750bfff 0x156750c000 - 0x156750dfff 0x156750e000 - 0x1567514fff 0x1567515000 - 0x1567515fff 0x1567516000 - 0x1567516fff 0x1567518000 - 0x1567519fff 0x156751a000 - 0x1567558fff 0x1567559000 - 0x156755afff 0x156755b000 - 0x1567561fff 0x1567562000 - 0x1567562fff 0x1567563000 - 0x1567588fff 0x1567589000 - 0x156758cfff 0x156758d000 - 0x156758dfff 0x156758e000 - 0x156758ffff 0x1567590000 - 0x1567590fff 0x1567591000 - 0x1567591fff 0x1567592000 - 0x1567592fff 0x1567593000 - 0x1567596fff 0x1567597000 - 0x1567597fff 0x1567598000 - 0x1567598fff 0x1567599000 - 0x156759afff 0x156759b000 - 0x156759bfff 0x156759c000 - 0x156759cfff 0x156759d000 - 0x1567708fff 0x1567709000 - 0x156770bfff 0x156770c000 - 0x156770cfff 0x156770d000 - 0x156770ffff 0x1567710000 - 0x1567722fff 0x1567723000 - 0x1567723fff 0x1567724000 - 0x1567724fff 0x1567725000 - 0x1567842fff 0x1567843000 - 0x1567845fff 0x1567846000 - 0x1567848fff 0x1567849000 - 0x156784dfff 0x156784e000 - 0x15678a2fff 0x15678a3000 - 0x1567f4dfff 0x3fffbdd000 - 0x3fffbfdfff ;; 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 0x76eb000 - 0x770bfff 0x80000000 - 0x800bffff 0x1565391000 - 0x15653abfff 0x15653ac000 - 0x15653acfff 0x15653ad000 - 0x15653adfff 0x15653ae000 - 0x15653affff 0x15653b0000 - 0x15653b1fff 0x15653b2000 - 0x15653b8fff 0x15653b9000 - 0x15653b9fff 0x15653ba000 - 0x15653bafff 0x15653bc000 - 0x15653bdfff 0x15653be000 - 0x15653fcfff 0x15653fd000 - 0x15653fefff 0x15653ff000 - 0x1565405fff 0x1565406000 - 0x1565406fff 0x1565407000 - 0x156542cfff 0x156542d000 - 0x1565430fff 0x1565431000 - 0x1565431fff 0x1565432000 - 0x1565433fff 0x1565434000 - 0x1565434fff 0x1565435000 - 0x1565435fff 0x1565436000 - 0x1565436fff 0x1565437000 - 0x156543afff 0x156543b000 - 0x156543bfff 0x156543c000 - 0x156543cfff 0x156543d000 - 0x156543efff 0x156543f000 - 0x156543ffff 0x1565440000 - 0x1565440fff 0x1565441000 - 0x15655acfff 0x15655ad000 - 0x15655affff 0x15655b0000 - 0x15655b0fff 0x15655b1000 - 0x15655b3fff 0x15655b4000 - 0x15655c6fff 0x15655c7000 - 0x15655c7fff 0x15655c8000 - 0x15655c8fff 0x15655c9000 - 0x15656e6fff 0x15656e7000 - 0x15656e9fff 0x15656ea000 - 0x15656ecfff 0x15656ed000 - 0x15656f1fff 0x15656f2000 - 0x1565746fff 0x1565747000 - 0x1565df1fff 0x3fffe6b000 - 0x3fffe8bfff ;; 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 0x22526000 - 0x22546fff 0x80000000 - 0x800bffff 0x1578ece000 - 0x1578ee8fff 0x1578ee9000 - 0x1578ee9fff 0x1578eea000 - 0x1578eeafff 0x1578eeb000 - 0x1578eecfff 0x1578eed000 - 0x1578eeefff 0x1578eef000 - 0x1578ef5fff 0x1578ef6000 - 0x1578ef6fff 0x1578ef7000 - 0x1578ef7fff 0x1578ef9000 - 0x1578efafff 0x1578efb000 - 0x1578f39fff 0x1578f3a000 - 0x1578f3bfff 0x1578f3c000 - 0x1578f42fff 0x1578f43000 - 0x1578f43fff 0x1578f44000 - 0x1578f69fff 0x1578f6a000 - 0x1578f6dfff 0x1578f6e000 - 0x1578f6efff 0x1578f6f000 - 0x1578f70fff 0x1578f71000 - 0x1578f71fff 0x1578f72000 - 0x1578f72fff 0x1578f73000 - 0x1578f73fff 0x1578f74000 - 0x1578f77fff 0x1578f78000 - 0x1578f78fff 0x1578f79000 - 0x1578f79fff 0x1578f7a000 - 0x1578f7bfff 0x1578f7c000 - 0x1578f7cfff 0x1578f7d000 - 0x1578f7dfff 0x1578f7e000 - 0x15790e9fff 0x15790ea000 - 0x15790ecfff 0x15790ed000 - 0x15790edfff 0x15790ee000 - 0x15790f0fff 0x15790f1000 - 0x1579103fff 0x1579104000 - 0x1579104fff 0x1579105000 - 0x1579105fff 0x1579106000 - 0x1579223fff 0x1579224000 - 0x1579226fff 0x1579227000 - 0x1579229fff 0x157922a000 - 0x157922efff 0x157922f000 - 0x1579283fff 0x1579284000 - 0x157992efff 0x3fffbca000 - 0x3fffbeafff ;; 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 0x3c2a7000 - 0x3c2c7fff 0x80000000 - 0x800bffff 0x1565af3000 - 0x1565b0dfff 0x1565b0e000 - 0x1565b0efff 0x1565b0f000 - 0x1565b0ffff 0x1565b10000 - 0x1565b11fff 0x1565b12000 - 0x1565b13fff 0x1565b14000 - 0x1565b1afff 0x1565b1b000 - 0x1565b1bfff 0x1565b1c000 - 0x1565b1cfff 0x1565b1e000 - 0x1565b1ffff 0x1565b20000 - 0x1565b5efff 0x1565b5f000 - 0x1565b60fff 0x1565b61000 - 0x1565b67fff 0x1565b68000 - 0x1565b68fff 0x1565b69000 - 0x1565b8efff 0x1565b8f000 - 0x1565b92fff 0x1565b93000 - 0x1565b93fff 0x1565b94000 - 0x1565b95fff 0x1565b96000 - 0x1565b96fff 0x1565b97000 - 0x1565b97fff 0x1565b98000 - 0x1565b98fff 0x1565b99000 - 0x1565b9cfff 0x1565b9d000 - 0x1565b9dfff 0x1565b9e000 - 0x1565b9efff 0x1565b9f000 - 0x1565ba0fff 0x1565ba1000 - 0x1565ba1fff 0x1565ba2000 - 0x1565ba2fff 0x1565ba3000 - 0x1565d0efff 0x1565d0f000 - 0x1565d11fff 0x1565d12000 - 0x1565d12fff 0x1565d13000 - 0x1565d15fff 0x1565d16000 - 0x1565d28fff 0x1565d29000 - 0x1565d29fff 0x1565d2a000 - 0x1565d2afff 0x1565d2b000 - 0x1565e48fff 0x1565e49000 - 0x1565e4bfff 0x1565e4c000 - 0x1565e4efff 0x1565e4f000 - 0x1565e53fff 0x1565e54000 - 0x1565ea8fff 0x1565ea9000 - 0x1566553fff 0x3fff88d000 - 0x3fff8adfff ;; 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 0x29e16000 - 0x29e36fff 0x80000000 - 0x800bffff 0x155cea4000 - 0x155cebefff 0x155cebf000 - 0x155cebffff 0x155cec0000 - 0x155cec0fff 0x155cec1000 - 0x155cec2fff 0x155cec3000 - 0x155cec4fff 0x155cec5000 - 0x155cecbfff 0x155cecc000 - 0x155ceccfff 0x155cecd000 - 0x155cecdfff 0x155cecf000 - 0x155ced0fff 0x155ced1000 - 0x155cf0ffff 0x155cf10000 - 0x155cf11fff 0x155cf12000 - 0x155cf18fff 0x155cf19000 - 0x155cf19fff 0x155cf1a000 - 0x155cf3ffff 0x155cf40000 - 0x155cf43fff 0x155cf44000 - 0x155cf44fff 0x155cf45000 - 0x155cf46fff 0x155cf47000 - 0x155cf47fff 0x155cf48000 - 0x155cf48fff 0x155cf49000 - 0x155cf49fff 0x155cf4a000 - 0x155cf4dfff 0x155cf4e000 - 0x155cf4efff 0x155cf4f000 - 0x155cf4ffff 0x155cf50000 - 0x155cf51fff 0x155cf52000 - 0x155cf52fff 0x155cf53000 - 0x155cf53fff 0x155cf54000 - 0x155d0bffff 0x155d0c0000 - 0x155d0c2fff 0x155d0c3000 - 0x155d0c3fff 0x155d0c4000 - 0x155d0c6fff 0x155d0c7000 - 0x155d0d9fff 0x155d0da000 - 0x155d0dafff 0x155d0db000 - 0x155d0dbfff 0x155d0dc000 - 0x155d1f9fff 0x155d1fa000 - 0x155d1fcfff 0x155d1fd000 - 0x155d1fffff 0x155d200000 - 0x155d204fff 0x155d205000 - 0x155d259fff 0x155d25a000 - 0x155d904fff 0x3fff8a9000 - 0x3fff8c9fff ;; 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 0x39f85000 - 0x39fa5fff 0x80000000 - 0x800bffff 0x1567c18000 - 0x1567c32fff 0x1567c33000 - 0x1567c33fff 0x1567c34000 - 0x1567c34fff 0x1567c35000 - 0x1567c36fff 0x1567c37000 - 0x1567c38fff 0x1567c39000 - 0x1567c3ffff 0x1567c40000 - 0x1567c40fff 0x1567c41000 - 0x1567c41fff 0x1567c43000 - 0x1567c44fff 0x1567c45000 - 0x1567c83fff 0x1567c84000 - 0x1567c85fff 0x1567c86000 - 0x1567c8cfff 0x1567c8d000 - 0x1567c8dfff 0x1567c8e000 - 0x1567cb3fff 0x1567cb4000 - 0x1567cb7fff 0x1567cb8000 - 0x1567cb8fff 0x1567cb9000 - 0x1567cbafff 0x1567cbb000 - 0x1567cbbfff 0x1567cbc000 - 0x1567cbcfff 0x1567cbd000 - 0x1567cbdfff 0x1567cbe000 - 0x1567cc1fff 0x1567cc2000 - 0x1567cc2fff 0x1567cc3000 - 0x1567cc3fff 0x1567cc4000 - 0x1567cc5fff 0x1567cc6000 - 0x1567cc6fff 0x1567cc7000 - 0x1567cc7fff 0x1567cc8000 - 0x1567e33fff 0x1567e34000 - 0x1567e36fff 0x1567e37000 - 0x1567e37fff 0x1567e38000 - 0x1567e3afff 0x1567e3b000 - 0x1567e4dfff 0x1567e4e000 - 0x1567e4efff 0x1567e4f000 - 0x1567e4ffff 0x1567e50000 - 0x1567f6dfff 0x1567f6e000 - 0x1567f70fff 0x1567f71000 - 0x1567f73fff 0x1567f74000 - 0x1567f78fff 0x1567f79000 - 0x1567fcdfff 0x1567fce000 - 0x1568678fff 0x3fff81f000 - 0x3fff83ffff ;; 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 0xb23000 - 0xb43fff 0x80000000 - 0x800bffff 0x1588217000 - 0x1588231fff 0x1588232000 - 0x1588232fff 0x1588233000 - 0x1588233fff 0x1588234000 - 0x1588235fff 0x1588236000 - 0x1588237fff 0x1588238000 - 0x158823efff 0x158823f000 - 0x158823ffff 0x1588240000 - 0x1588240fff 0x1588242000 - 0x1588243fff 0x1588244000 - 0x1588282fff 0x1588283000 - 0x1588284fff 0x1588285000 - 0x158828bfff 0x158828c000 - 0x158828cfff 0x158828d000 - 0x15882b2fff 0x15882b3000 - 0x15882b6fff 0x15882b7000 - 0x15882b7fff 0x15882b8000 - 0x15882b9fff 0x15882ba000 - 0x15882bafff 0x15882bb000 - 0x15882bbfff 0x15882bc000 - 0x15882bcfff 0x15882bd000 - 0x15882c0fff 0x15882c1000 - 0x15882c1fff 0x15882c2000 - 0x15882c2fff 0x15882c3000 - 0x15882c4fff 0x15882c5000 - 0x15882c5fff 0x15882c6000 - 0x15882c6fff 0x15882c7000 - 0x1588432fff 0x1588433000 - 0x1588435fff 0x1588436000 - 0x1588436fff 0x1588437000 - 0x1588439fff 0x158843a000 - 0x158844cfff 0x158844d000 - 0x158844dfff 0x158844e000 - 0x158844efff 0x158844f000 - 0x158856cfff 0x158856d000 - 0x158856ffff 0x1588570000 - 0x1588572fff 0x1588573000 - 0x1588577fff 0x1588578000 - 0x15885ccfff 0x15885cd000 - 0x1588c77fff 0x3fffaaf000 - 0x3fffacffff ;; 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 0x15235000 - 0x15255fff 0x80000000 - 0x800bffff 0x15652bb000 - 0x15652d5fff 0x15652d6000 - 0x15652d6fff 0x15652d7000 - 0x15652d7fff 0x15652d8000 - 0x15652d9fff 0x15652da000 - 0x15652dbfff 0x15652dc000 - 0x15652e2fff 0x15652e3000 - 0x15652e3fff 0x15652e4000 - 0x15652e4fff 0x15652e6000 - 0x15652e7fff 0x15652e8000 - 0x1565326fff 0x1565327000 - 0x1565328fff 0x1565329000 - 0x156532ffff 0x1565330000 - 0x1565330fff 0x1565331000 - 0x1565356fff 0x1565357000 - 0x156535afff 0x156535b000 - 0x156535bfff 0x156535c000 - 0x156535dfff 0x156535e000 - 0x156535efff 0x156535f000 - 0x156535ffff 0x1565360000 - 0x1565360fff 0x1565361000 - 0x1565364fff 0x1565365000 - 0x1565365fff 0x1565366000 - 0x1565366fff 0x1565367000 - 0x1565368fff 0x1565369000 - 0x1565369fff 0x156536a000 - 0x156536afff 0x156536b000 - 0x15654d6fff 0x15654d7000 - 0x15654d9fff 0x15654da000 - 0x15654dafff 0x15654db000 - 0x15654ddfff 0x15654de000 - 0x15654f0fff 0x15654f1000 - 0x15654f1fff 0x15654f2000 - 0x15654f2fff 0x15654f3000 - 0x1565610fff 0x1565611000 - 0x1565613fff 0x1565614000 - 0x1565616fff 0x1565617000 - 0x156561bfff 0x156561c000 - 0x1565670fff 0x1565671000 - 0x1565d1bfff 0x3fff9b0000 - 0x3fff9d0fff ;; 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 0x289ac000 - 0x289ccfff 0x80000000 - 0x800bffff 0x15653c6000 - 0x15653e0fff 0x15653e1000 - 0x15653e1fff 0x15653e2000 - 0x15653e2fff 0x15653e3000 - 0x15653e4fff 0x15653e5000 - 0x15653e6fff 0x15653e7000 - 0x15653edfff 0x15653ee000 - 0x15653eefff 0x15653ef000 - 0x15653effff 0x15653f1000 - 0x15653f2fff 0x15653f3000 - 0x1565431fff 0x1565432000 - 0x1565433fff 0x1565434000 - 0x156543afff 0x156543b000 - 0x156543bfff 0x156543c000 - 0x1565461fff 0x1565462000 - 0x1565465fff 0x1565466000 - 0x1565466fff 0x1565467000 - 0x1565468fff 0x1565469000 - 0x1565469fff 0x156546a000 - 0x156546afff 0x156546b000 - 0x156546bfff 0x156546c000 - 0x156546ffff 0x1565470000 - 0x1565470fff 0x1565471000 - 0x1565471fff 0x1565472000 - 0x1565473fff 0x1565474000 - 0x1565474fff 0x1565475000 - 0x1565475fff 0x1565476000 - 0x15655e1fff 0x15655e2000 - 0x15655e4fff 0x15655e5000 - 0x15655e5fff 0x15655e6000 - 0x15655e8fff 0x15655e9000 - 0x15655fbfff 0x15655fc000 - 0x15655fcfff 0x15655fd000 - 0x15655fdfff 0x15655fe000 - 0x156571bfff 0x156571c000 - 0x156571efff 0x156571f000 - 0x1565721fff 0x1565722000 - 0x1565726fff 0x1565727000 - 0x156577bfff 0x156577c000 - 0x1565e26fff 0x3fffe0d000 - 0x3fffe2dfff ;; 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 0x19fe5000 - 0x1a005fff 0x80000000 - 0x800bffff 0x1581c9b000 - 0x1581cb5fff 0x1581cb6000 - 0x1581cb6fff 0x1581cb7000 - 0x1581cb7fff 0x1581cb8000 - 0x1581cb9fff 0x1581cba000 - 0x1581cbbfff 0x1581cbc000 - 0x1581cc2fff 0x1581cc3000 - 0x1581cc3fff 0x1581cc4000 - 0x1581cc4fff 0x1581cc6000 - 0x1581cc7fff 0x1581cc8000 - 0x1581d06fff 0x1581d07000 - 0x1581d08fff 0x1581d09000 - 0x1581d0ffff 0x1581d10000 - 0x1581d10fff 0x1581d11000 - 0x1581d36fff 0x1581d37000 - 0x1581d3afff 0x1581d3b000 - 0x1581d3bfff 0x1581d3c000 - 0x1581d3dfff 0x1581d3e000 - 0x1581d3efff 0x1581d3f000 - 0x1581d3ffff 0x1581d40000 - 0x1581d40fff 0x1581d41000 - 0x1581d44fff 0x1581d45000 - 0x1581d45fff 0x1581d46000 - 0x1581d46fff 0x1581d47000 - 0x1581d48fff 0x1581d49000 - 0x1581d49fff 0x1581d4a000 - 0x1581d4afff 0x1581d4b000 - 0x1581eb6fff 0x1581eb7000 - 0x1581eb9fff 0x1581eba000 - 0x1581ebafff 0x1581ebb000 - 0x1581ebdfff 0x1581ebe000 - 0x1581ed0fff 0x1581ed1000 - 0x1581ed1fff 0x1581ed2000 - 0x1581ed2fff 0x1581ed3000 - 0x1581ff0fff 0x1581ff1000 - 0x1581ff3fff 0x1581ff4000 - 0x1581ff6fff 0x1581ff7000 - 0x1581ffbfff 0x1581ffc000 - 0x1582050fff 0x1582051000 - 0x15826fbfff 0x3ffff85000 - 0x3ffffa5fff ;; 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 0x93af000 - 0x93cffff 0x80000000 - 0x800bffff 0x1589e08000 - 0x1589e22fff 0x1589e23000 - 0x1589e23fff 0x1589e24000 - 0x1589e24fff 0x1589e25000 - 0x1589e26fff 0x1589e27000 - 0x1589e28fff 0x1589e29000 - 0x1589e2ffff 0x1589e30000 - 0x1589e30fff 0x1589e31000 - 0x1589e31fff 0x1589e33000 - 0x1589e34fff 0x1589e35000 - 0x1589e73fff 0x1589e74000 - 0x1589e75fff 0x1589e76000 - 0x1589e7cfff 0x1589e7d000 - 0x1589e7dfff 0x1589e7e000 - 0x1589ea3fff 0x1589ea4000 - 0x1589ea7fff 0x1589ea8000 - 0x1589ea8fff 0x1589ea9000 - 0x1589eaafff 0x1589eab000 - 0x1589eabfff 0x1589eac000 - 0x1589eacfff 0x1589ead000 - 0x1589eadfff 0x1589eae000 - 0x1589eb1fff 0x1589eb2000 - 0x1589eb2fff 0x1589eb3000 - 0x1589eb3fff 0x1589eb4000 - 0x1589eb5fff 0x1589eb6000 - 0x1589eb6fff 0x1589eb7000 - 0x1589eb7fff 0x1589eb8000 - 0x158a023fff 0x158a024000 - 0x158a026fff 0x158a027000 - 0x158a027fff 0x158a028000 - 0x158a02afff 0x158a02b000 - 0x158a03dfff 0x158a03e000 - 0x158a03efff 0x158a03f000 - 0x158a03ffff 0x158a040000 - 0x158a15dfff 0x158a15e000 - 0x158a160fff 0x158a161000 - 0x158a163fff 0x158a164000 - 0x158a168fff 0x158a169000 - 0x158a1bdfff 0x158a1be000 - 0x158a868fff 0x3ffffde000 - 0x3fffffefff ;; 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 0x3c96000 - 0x3cb6fff 0x80000000 - 0x800bffff 0x1584f5d000 - 0x1584f77fff 0x1584f78000 - 0x1584f78fff 0x1584f79000 - 0x1584f79fff 0x1584f7a000 - 0x1584f7bfff 0x1584f7c000 - 0x1584f7dfff 0x1584f7e000 - 0x1584f84fff 0x1584f85000 - 0x1584f85fff 0x1584f86000 - 0x1584f86fff 0x1584f88000 - 0x1584f89fff 0x1584f8a000 - 0x1584fc8fff 0x1584fc9000 - 0x1584fcafff 0x1584fcb000 - 0x1584fd1fff 0x1584fd2000 - 0x1584fd2fff 0x1584fd3000 - 0x1584ff8fff 0x1584ff9000 - 0x1584ffcfff 0x1584ffd000 - 0x1584ffdfff 0x1584ffe000 - 0x1584ffffff 0x1585000000 - 0x1585000fff 0x1585001000 - 0x1585001fff 0x1585002000 - 0x1585002fff 0x1585003000 - 0x1585006fff 0x1585007000 - 0x1585007fff 0x1585008000 - 0x1585008fff 0x1585009000 - 0x158500afff 0x158500b000 - 0x158500bfff 0x158500c000 - 0x158500cfff 0x158500d000 - 0x1585178fff 0x1585179000 - 0x158517bfff 0x158517c000 - 0x158517cfff 0x158517d000 - 0x158517ffff 0x1585180000 - 0x1585192fff 0x1585193000 - 0x1585193fff 0x1585194000 - 0x1585194fff 0x1585195000 - 0x15852b2fff 0x15852b3000 - 0x15852b5fff 0x15852b6000 - 0x15852b8fff 0x15852b9000 - 0x15852bdfff 0x15852be000 - 0x1585312fff 0x1585313000 - 0x15859bdfff 0x3fffbfc000 - 0x3fffc1cfff ;; 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 0x31d15000 - 0x31d35fff 0x80000000 - 0x800bffff 0x1582461000 - 0x158247bfff 0x158247c000 - 0x158247cfff 0x158247d000 - 0x158247dfff 0x158247e000 - 0x158247ffff 0x1582480000 - 0x1582481fff 0x1582482000 - 0x1582488fff 0x1582489000 - 0x1582489fff 0x158248a000 - 0x158248afff 0x158248c000 - 0x158248dfff 0x158248e000 - 0x15824ccfff 0x15824cd000 - 0x15824cefff 0x15824cf000 - 0x15824d5fff 0x15824d6000 - 0x15824d6fff 0x15824d7000 - 0x15824fcfff 0x15824fd000 - 0x1582500fff 0x1582501000 - 0x1582501fff 0x1582502000 - 0x1582503fff 0x1582504000 - 0x1582504fff 0x1582505000 - 0x1582505fff 0x1582506000 - 0x1582506fff 0x1582507000 - 0x158250afff 0x158250b000 - 0x158250bfff 0x158250c000 - 0x158250cfff 0x158250d000 - 0x158250efff 0x158250f000 - 0x158250ffff 0x1582510000 - 0x1582510fff 0x1582511000 - 0x158267cfff 0x158267d000 - 0x158267ffff 0x1582680000 - 0x1582680fff 0x1582681000 - 0x1582683fff 0x1582684000 - 0x1582696fff 0x1582697000 - 0x1582697fff 0x1582698000 - 0x1582698fff 0x1582699000 - 0x15827b6fff 0x15827b7000 - 0x15827b9fff 0x15827ba000 - 0x15827bcfff 0x15827bd000 - 0x15827c1fff 0x15827c2000 - 0x1582816fff 0x1582817000 - 0x1582ec1fff 0x3fffb25000 - 0x3fffb45fff ;; 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 0x9848000 - 0x9868fff 0x80000000 - 0x800bffff 0x155c37a000 - 0x155c394fff 0x155c395000 - 0x155c395fff 0x155c396000 - 0x155c396fff 0x155c397000 - 0x155c398fff 0x155c399000 - 0x155c39afff 0x155c39b000 - 0x155c3a1fff 0x155c3a2000 - 0x155c3a2fff 0x155c3a3000 - 0x155c3a3fff 0x155c3a5000 - 0x155c3a6fff 0x155c3a7000 - 0x155c3e5fff 0x155c3e6000 - 0x155c3e7fff 0x155c3e8000 - 0x155c3eefff 0x155c3ef000 - 0x155c3effff 0x155c3f0000 - 0x155c415fff 0x155c416000 - 0x155c419fff 0x155c41a000 - 0x155c41afff 0x155c41b000 - 0x155c41cfff 0x155c41d000 - 0x155c41dfff 0x155c41e000 - 0x155c41efff 0x155c41f000 - 0x155c41ffff 0x155c420000 - 0x155c423fff 0x155c424000 - 0x155c424fff 0x155c425000 - 0x155c425fff 0x155c426000 - 0x155c427fff 0x155c428000 - 0x155c428fff 0x155c429000 - 0x155c429fff 0x155c42a000 - 0x155c595fff 0x155c596000 - 0x155c598fff 0x155c599000 - 0x155c599fff 0x155c59a000 - 0x155c59cfff 0x155c59d000 - 0x155c5affff 0x155c5b0000 - 0x155c5b0fff 0x155c5b1000 - 0x155c5b1fff 0x155c5b2000 - 0x155c6cffff 0x155c6d0000 - 0x155c6d2fff 0x155c6d3000 - 0x155c6d5fff 0x155c6d6000 - 0x155c6dafff 0x155c6db000 - 0x155c72ffff 0x155c730000 - 0x155cddafff 0x3fff839000 - 0x3fff859fff ;; 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 0xa8cd000 - 0xa8edfff 0x80000000 - 0x800bffff 0x1569da4000 - 0x1569dbefff 0x1569dbf000 - 0x1569dbffff 0x1569dc0000 - 0x1569dc0fff 0x1569dc1000 - 0x1569dc2fff 0x1569dc3000 - 0x1569dc4fff 0x1569dc5000 - 0x1569dcbfff 0x1569dcc000 - 0x1569dccfff 0x1569dcd000 - 0x1569dcdfff 0x1569dcf000 - 0x1569dd0fff 0x1569dd1000 - 0x1569e0ffff 0x1569e10000 - 0x1569e11fff 0x1569e12000 - 0x1569e18fff 0x1569e19000 - 0x1569e19fff 0x1569e1a000 - 0x1569e3ffff 0x1569e40000 - 0x1569e43fff 0x1569e44000 - 0x1569e44fff 0x1569e45000 - 0x1569e46fff 0x1569e47000 - 0x1569e47fff 0x1569e48000 - 0x1569e48fff 0x1569e49000 - 0x1569e49fff 0x1569e4a000 - 0x1569e4dfff 0x1569e4e000 - 0x1569e4efff 0x1569e4f000 - 0x1569e4ffff 0x1569e50000 - 0x1569e51fff 0x1569e52000 - 0x1569e52fff 0x1569e53000 - 0x1569e53fff 0x1569e54000 - 0x1569fbffff 0x1569fc0000 - 0x1569fc2fff 0x1569fc3000 - 0x1569fc3fff 0x1569fc4000 - 0x1569fc6fff 0x1569fc7000 - 0x1569fd9fff 0x1569fda000 - 0x1569fdafff 0x1569fdb000 - 0x1569fdbfff 0x1569fdc000 - 0x156a0f9fff 0x156a0fa000 - 0x156a0fcfff 0x156a0fd000 - 0x156a0fffff 0x156a100000 - 0x156a104fff 0x156a105000 - 0x156a159fff 0x156a15a000 - 0x156a804fff 0x3fffb8f000 - 0x3fffbaffff ;; 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 0xcffe000 - 0xd01efff 0x80000000 - 0x800bffff 0x1590dfb000 - 0x1590e15fff 0x1590e16000 - 0x1590e16fff 0x1590e17000 - 0x1590e17fff 0x1590e18000 - 0x1590e19fff 0x1590e1a000 - 0x1590e1bfff 0x1590e1c000 - 0x1590e22fff 0x1590e23000 - 0x1590e23fff 0x1590e24000 - 0x1590e24fff 0x1590e26000 - 0x1590e27fff 0x1590e28000 - 0x1590e66fff 0x1590e67000 - 0x1590e68fff 0x1590e69000 - 0x1590e6ffff 0x1590e70000 - 0x1590e70fff 0x1590e71000 - 0x1590e96fff 0x1590e97000 - 0x1590e9afff 0x1590e9b000 - 0x1590e9bfff 0x1590e9c000 - 0x1590e9dfff 0x1590e9e000 - 0x1590e9efff 0x1590e9f000 - 0x1590e9ffff 0x1590ea0000 - 0x1590ea0fff 0x1590ea1000 - 0x1590ea4fff 0x1590ea5000 - 0x1590ea5fff 0x1590ea6000 - 0x1590ea6fff 0x1590ea7000 - 0x1590ea8fff 0x1590ea9000 - 0x1590ea9fff 0x1590eaa000 - 0x1590eaafff 0x1590eab000 - 0x1591016fff 0x1591017000 - 0x1591019fff 0x159101a000 - 0x159101afff 0x159101b000 - 0x159101dfff 0x159101e000 - 0x1591030fff 0x1591031000 - 0x1591031fff 0x1591032000 - 0x1591032fff 0x1591033000 - 0x1591150fff 0x1591151000 - 0x1591153fff 0x1591154000 - 0x1591156fff 0x1591157000 - 0x159115bfff 0x159115c000 - 0x15911b0fff 0x15911b1000 - 0x159185bfff 0x3fff9b2000 - 0x3fff9d2fff ;; 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 0x239e000 - 0x23befff 0x80000000 - 0x800bffff 0x156c978000 - 0x156c992fff 0x156c993000 - 0x156c993fff 0x156c994000 - 0x156c994fff 0x156c995000 - 0x156c996fff 0x156c997000 - 0x156c998fff 0x156c999000 - 0x156c99ffff 0x156c9a0000 - 0x156c9a0fff 0x156c9a1000 - 0x156c9a1fff 0x156c9a3000 - 0x156c9a4fff 0x156c9a5000 - 0x156c9e3fff 0x156c9e4000 - 0x156c9e5fff 0x156c9e6000 - 0x156c9ecfff 0x156c9ed000 - 0x156c9edfff 0x156c9ee000 - 0x156ca13fff 0x156ca14000 - 0x156ca17fff 0x156ca18000 - 0x156ca18fff 0x156ca19000 - 0x156ca1afff 0x156ca1b000 - 0x156ca1bfff 0x156ca1c000 - 0x156ca1cfff 0x156ca1d000 - 0x156ca1dfff 0x156ca1e000 - 0x156ca21fff 0x156ca22000 - 0x156ca22fff 0x156ca23000 - 0x156ca23fff 0x156ca24000 - 0x156ca25fff 0x156ca26000 - 0x156ca26fff 0x156ca27000 - 0x156ca27fff 0x156ca28000 - 0x156cb93fff 0x156cb94000 - 0x156cb96fff 0x156cb97000 - 0x156cb97fff 0x156cb98000 - 0x156cb9afff 0x156cb9b000 - 0x156cbadfff 0x156cbae000 - 0x156cbaefff 0x156cbaf000 - 0x156cbaffff 0x156cbb0000 - 0x156cccdfff 0x156ccce000 - 0x156ccd0fff 0x156ccd1000 - 0x156ccd3fff 0x156ccd4000 - 0x156ccd8fff 0x156ccd9000 - 0x156cd2dfff 0x156cd2e000 - 0x156d3d8fff 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/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 0x14177000 - 0x14197fff 0x80000000 - 0x800bffff 0x155d0cf000 - 0x155d0e9fff 0x155d0ea000 - 0x155d0eafff 0x155d0eb000 - 0x155d0ebfff 0x155d0ec000 - 0x155d0edfff 0x155d0ee000 - 0x155d0effff 0x155d0f0000 - 0x155d0f6fff 0x155d0f7000 - 0x155d0f7fff 0x155d0f8000 - 0x155d0f8fff 0x155d0fa000 - 0x155d0fbfff 0x155d0fc000 - 0x155d13afff 0x155d13b000 - 0x155d13cfff 0x155d13d000 - 0x155d143fff 0x155d144000 - 0x155d144fff 0x155d145000 - 0x155d16afff 0x155d16b000 - 0x155d16efff 0x155d16f000 - 0x155d16ffff 0x155d170000 - 0x155d171fff 0x155d172000 - 0x155d172fff 0x155d173000 - 0x155d173fff 0x155d174000 - 0x155d174fff 0x155d175000 - 0x155d178fff 0x155d179000 - 0x155d179fff 0x155d17a000 - 0x155d17afff 0x155d17b000 - 0x155d17cfff 0x155d17d000 - 0x155d17dfff 0x155d17e000 - 0x155d17efff 0x155d17f000 - 0x155d2eafff 0x155d2eb000 - 0x155d2edfff 0x155d2ee000 - 0x155d2eefff 0x155d2ef000 - 0x155d2f1fff 0x155d2f2000 - 0x155d304fff 0x155d305000 - 0x155d305fff 0x155d306000 - 0x155d306fff 0x155d307000 - 0x155d424fff 0x155d425000 - 0x155d427fff 0x155d428000 - 0x155d42afff 0x155d42b000 - 0x155d42ffff 0x155d430000 - 0x155d484fff 0x155d485000 - 0x155db2ffff 0x3fffd97000 - 0x3fffdb7fff ;; 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 0x2b30b000 - 0x2b32bfff 0x80000000 - 0x800bffff 0x1559ed2000 - 0x1559eecfff 0x1559eed000 - 0x1559eedfff 0x1559eee000 - 0x1559eeefff 0x1559eef000 - 0x1559ef0fff 0x1559ef1000 - 0x1559ef2fff 0x1559ef3000 - 0x1559ef9fff 0x1559efa000 - 0x1559efafff 0x1559efb000 - 0x1559efbfff 0x1559efd000 - 0x1559efefff 0x1559eff000 - 0x1559f3dfff 0x1559f3e000 - 0x1559f3ffff 0x1559f40000 - 0x1559f46fff 0x1559f47000 - 0x1559f47fff 0x1559f48000 - 0x1559f6dfff 0x1559f6e000 - 0x1559f71fff 0x1559f72000 - 0x1559f72fff 0x1559f73000 - 0x1559f74fff 0x1559f75000 - 0x1559f75fff 0x1559f76000 - 0x1559f76fff 0x1559f77000 - 0x1559f77fff 0x1559f78000 - 0x1559f7bfff 0x1559f7c000 - 0x1559f7cfff 0x1559f7d000 - 0x1559f7dfff 0x1559f7e000 - 0x1559f7ffff 0x1559f80000 - 0x1559f80fff 0x1559f81000 - 0x1559f81fff 0x1559f82000 - 0x155a0edfff 0x155a0ee000 - 0x155a0f0fff 0x155a0f1000 - 0x155a0f1fff 0x155a0f2000 - 0x155a0f4fff 0x155a0f5000 - 0x155a107fff 0x155a108000 - 0x155a108fff 0x155a109000 - 0x155a109fff 0x155a10a000 - 0x155a227fff 0x155a228000 - 0x155a22afff 0x155a22b000 - 0x155a22dfff 0x155a22e000 - 0x155a232fff 0x155a233000 - 0x155a287fff 0x155a288000 - 0x155a932fff 0x3ffffa9000 - 0x3ffffc9fff ;; 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 0x39e95000 - 0x39eb5fff 0x80000000 - 0x800bffff 0x15698fc000 - 0x1569916fff 0x1569917000 - 0x1569917fff 0x1569918000 - 0x1569918fff 0x1569919000 - 0x156991afff 0x156991b000 - 0x156991cfff 0x156991d000 - 0x1569923fff 0x1569924000 - 0x1569924fff 0x1569925000 - 0x1569925fff 0x1569927000 - 0x1569928fff 0x1569929000 - 0x1569967fff 0x1569968000 - 0x1569969fff 0x156996a000 - 0x1569970fff 0x1569971000 - 0x1569971fff 0x1569972000 - 0x1569997fff 0x1569998000 - 0x156999bfff 0x156999c000 - 0x156999cfff 0x156999d000 - 0x156999efff 0x156999f000 - 0x156999ffff 0x15699a0000 - 0x15699a0fff 0x15699a1000 - 0x15699a1fff 0x15699a2000 - 0x15699a5fff 0x15699a6000 - 0x15699a6fff 0x15699a7000 - 0x15699a7fff 0x15699a8000 - 0x15699a9fff 0x15699aa000 - 0x15699aafff 0x15699ab000 - 0x15699abfff 0x15699ac000 - 0x1569b17fff 0x1569b18000 - 0x1569b1afff 0x1569b1b000 - 0x1569b1bfff 0x1569b1c000 - 0x1569b1efff 0x1569b1f000 - 0x1569b31fff 0x1569b32000 - 0x1569b32fff 0x1569b33000 - 0x1569b33fff 0x1569b34000 - 0x1569c51fff 0x1569c52000 - 0x1569c54fff 0x1569c55000 - 0x1569c57fff 0x1569c58000 - 0x1569c5cfff 0x1569c5d000 - 0x1569cb1fff 0x1569cb2000 - 0x156a35cfff 0x3fffd63000 - 0x3fffd83fff ;; 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 0x1fd7f000 - 0x1fd9ffff 0x80000000 - 0x800bffff 0x1593d86000 - 0x1593da0fff 0x1593da1000 - 0x1593da1fff 0x1593da2000 - 0x1593da2fff 0x1593da3000 - 0x1593da4fff 0x1593da5000 - 0x1593da6fff 0x1593da7000 - 0x1593dadfff 0x1593dae000 - 0x1593daefff 0x1593daf000 - 0x1593daffff 0x1593db1000 - 0x1593db2fff 0x1593db3000 - 0x1593df1fff 0x1593df2000 - 0x1593df3fff 0x1593df4000 - 0x1593dfafff 0x1593dfb000 - 0x1593dfbfff 0x1593dfc000 - 0x1593e21fff 0x1593e22000 - 0x1593e25fff 0x1593e26000 - 0x1593e26fff 0x1593e27000 - 0x1593e28fff 0x1593e29000 - 0x1593e29fff 0x1593e2a000 - 0x1593e2afff 0x1593e2b000 - 0x1593e2bfff 0x1593e2c000 - 0x1593e2ffff 0x1593e30000 - 0x1593e30fff 0x1593e31000 - 0x1593e31fff 0x1593e32000 - 0x1593e33fff 0x1593e34000 - 0x1593e34fff 0x1593e35000 - 0x1593e35fff 0x1593e36000 - 0x1593fa1fff 0x1593fa2000 - 0x1593fa4fff 0x1593fa5000 - 0x1593fa5fff 0x1593fa6000 - 0x1593fa8fff 0x1593fa9000 - 0x1593fbbfff 0x1593fbc000 - 0x1593fbcfff 0x1593fbd000 - 0x1593fbdfff 0x1593fbe000 - 0x15940dbfff 0x15940dc000 - 0x15940defff 0x15940df000 - 0x15940e1fff 0x15940e2000 - 0x15940e6fff 0x15940e7000 - 0x159413bfff 0x159413c000 - 0x15947e6fff 0x3fffa8a000 - 0x3fffaaafff ;; 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 0x18480000 - 0x184a0fff 0x80000000 - 0x800bffff 0x15726e7000 - 0x1572701fff 0x1572702000 - 0x1572702fff 0x1572703000 - 0x1572703fff 0x1572704000 - 0x1572705fff 0x1572706000 - 0x1572707fff 0x1572708000 - 0x157270efff 0x157270f000 - 0x157270ffff 0x1572710000 - 0x1572710fff 0x1572712000 - 0x1572713fff 0x1572714000 - 0x1572752fff 0x1572753000 - 0x1572754fff 0x1572755000 - 0x157275bfff 0x157275c000 - 0x157275cfff 0x157275d000 - 0x1572782fff 0x1572783000 - 0x1572786fff 0x1572787000 - 0x1572787fff 0x1572788000 - 0x1572789fff 0x157278a000 - 0x157278afff 0x157278b000 - 0x157278bfff 0x157278c000 - 0x157278cfff 0x157278d000 - 0x1572790fff 0x1572791000 - 0x1572791fff 0x1572792000 - 0x1572792fff 0x1572793000 - 0x1572794fff 0x1572795000 - 0x1572795fff 0x1572796000 - 0x1572796fff 0x1572797000 - 0x1572902fff 0x1572903000 - 0x1572905fff 0x1572906000 - 0x1572906fff 0x1572907000 - 0x1572909fff 0x157290a000 - 0x157291cfff 0x157291d000 - 0x157291dfff 0x157291e000 - 0x157291efff 0x157291f000 - 0x1572a3cfff 0x1572a3d000 - 0x1572a3ffff 0x1572a40000 - 0x1572a42fff 0x1572a43000 - 0x1572a47fff 0x1572a48000 - 0x1572a9cfff 0x1572a9d000 - 0x1573147fff 0x3fff97d000 - 0x3fff99dfff ;; 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 0x1ebd5000 - 0x1ebf5fff 0x80000000 - 0x800bffff 0x157b31f000 - 0x157b339fff 0x157b33a000 - 0x157b33afff 0x157b33b000 - 0x157b33bfff 0x157b33c000 - 0x157b33dfff 0x157b33e000 - 0x157b33ffff 0x157b340000 - 0x157b346fff 0x157b347000 - 0x157b347fff 0x157b348000 - 0x157b348fff 0x157b34a000 - 0x157b34bfff 0x157b34c000 - 0x157b38afff 0x157b38b000 - 0x157b38cfff 0x157b38d000 - 0x157b393fff 0x157b394000 - 0x157b394fff 0x157b395000 - 0x157b3bafff 0x157b3bb000 - 0x157b3befff 0x157b3bf000 - 0x157b3bffff 0x157b3c0000 - 0x157b3c1fff 0x157b3c2000 - 0x157b3c2fff 0x157b3c3000 - 0x157b3c3fff 0x157b3c4000 - 0x157b3c4fff 0x157b3c5000 - 0x157b3c8fff 0x157b3c9000 - 0x157b3c9fff 0x157b3ca000 - 0x157b3cafff 0x157b3cb000 - 0x157b3ccfff 0x157b3cd000 - 0x157b3cdfff 0x157b3ce000 - 0x157b3cefff 0x157b3cf000 - 0x157b53afff 0x157b53b000 - 0x157b53dfff 0x157b53e000 - 0x157b53efff 0x157b53f000 - 0x157b541fff 0x157b542000 - 0x157b554fff 0x157b555000 - 0x157b555fff 0x157b556000 - 0x157b556fff 0x157b557000 - 0x157b674fff 0x157b675000 - 0x157b677fff 0x157b678000 - 0x157b67afff 0x157b67b000 - 0x157b67ffff 0x157b680000 - 0x157b6d4fff 0x157b6d5000 - 0x157bd7ffff 0x3fffd8b000 - 0x3fffdabfff ;; 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 0x28be6000 - 0x28c06fff 0x80000000 - 0x800bffff 0x157eedf000 - 0x157eef9fff 0x157eefa000 - 0x157eefafff 0x157eefb000 - 0x157eefbfff 0x157eefc000 - 0x157eefdfff 0x157eefe000 - 0x157eefffff 0x157ef00000 - 0x157ef06fff 0x157ef07000 - 0x157ef07fff 0x157ef08000 - 0x157ef08fff 0x157ef0a000 - 0x157ef0bfff 0x157ef0c000 - 0x157ef4afff 0x157ef4b000 - 0x157ef4cfff 0x157ef4d000 - 0x157ef53fff 0x157ef54000 - 0x157ef54fff 0x157ef55000 - 0x157ef7afff 0x157ef7b000 - 0x157ef7efff 0x157ef7f000 - 0x157ef7ffff 0x157ef80000 - 0x157ef81fff 0x157ef82000 - 0x157ef82fff 0x157ef83000 - 0x157ef83fff 0x157ef84000 - 0x157ef84fff 0x157ef85000 - 0x157ef88fff 0x157ef89000 - 0x157ef89fff 0x157ef8a000 - 0x157ef8afff 0x157ef8b000 - 0x157ef8cfff 0x157ef8d000 - 0x157ef8dfff 0x157ef8e000 - 0x157ef8efff 0x157ef8f000 - 0x157f0fafff 0x157f0fb000 - 0x157f0fdfff 0x157f0fe000 - 0x157f0fefff 0x157f0ff000 - 0x157f101fff 0x157f102000 - 0x157f114fff 0x157f115000 - 0x157f115fff 0x157f116000 - 0x157f116fff 0x157f117000 - 0x157f234fff 0x157f235000 - 0x157f237fff 0x157f238000 - 0x157f23afff 0x157f23b000 - 0x157f23ffff 0x157f240000 - 0x157f294fff 0x157f295000 - 0x157f93ffff 0x3fffa76000 - 0x3fffa96fff ;; 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 0xc3e2000 - 0xc402fff 0x80000000 - 0x800bffff 0x156519a000 - 0x15651b4fff 0x15651b5000 - 0x15651b5fff 0x15651b6000 - 0x15651b6fff 0x15651b7000 - 0x15651b8fff 0x15651b9000 - 0x15651bafff 0x15651bb000 - 0x15651c1fff 0x15651c2000 - 0x15651c2fff 0x15651c3000 - 0x15651c3fff 0x15651c5000 - 0x15651c6fff 0x15651c7000 - 0x1565205fff 0x1565206000 - 0x1565207fff 0x1565208000 - 0x156520efff 0x156520f000 - 0x156520ffff 0x1565210000 - 0x1565235fff 0x1565236000 - 0x1565239fff 0x156523a000 - 0x156523afff 0x156523b000 - 0x156523cfff 0x156523d000 - 0x156523dfff 0x156523e000 - 0x156523efff 0x156523f000 - 0x156523ffff 0x1565240000 - 0x1565243fff 0x1565244000 - 0x1565244fff 0x1565245000 - 0x1565245fff 0x1565246000 - 0x1565247fff 0x1565248000 - 0x1565248fff 0x1565249000 - 0x1565249fff 0x156524a000 - 0x15653b5fff 0x15653b6000 - 0x15653b8fff 0x15653b9000 - 0x15653b9fff 0x15653ba000 - 0x15653bcfff 0x15653bd000 - 0x15653cffff 0x15653d0000 - 0x15653d0fff 0x15653d1000 - 0x15653d1fff 0x15653d2000 - 0x15654effff 0x15654f0000 - 0x15654f2fff 0x15654f3000 - 0x15654f5fff 0x15654f6000 - 0x15654fafff 0x15654fb000 - 0x156554ffff 0x1565550000 - 0x1565bfafff 0x3fffc99000 - 0x3fffcb9fff ;; 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 0x15fcf000 - 0x15feffff 0x80000000 - 0x800bffff 0x1563213000 - 0x156322dfff 0x156322e000 - 0x156322efff 0x156322f000 - 0x156322ffff 0x1563230000 - 0x1563231fff 0x1563232000 - 0x1563233fff 0x1563234000 - 0x156323afff 0x156323b000 - 0x156323bfff 0x156323c000 - 0x156323cfff 0x156323e000 - 0x156323ffff 0x1563240000 - 0x156327efff 0x156327f000 - 0x1563280fff 0x1563281000 - 0x1563287fff 0x1563288000 - 0x1563288fff 0x1563289000 - 0x15632aefff 0x15632af000 - 0x15632b2fff 0x15632b3000 - 0x15632b3fff 0x15632b4000 - 0x15632b5fff 0x15632b6000 - 0x15632b6fff 0x15632b7000 - 0x15632b7fff 0x15632b8000 - 0x15632b8fff 0x15632b9000 - 0x15632bcfff 0x15632bd000 - 0x15632bdfff 0x15632be000 - 0x15632befff 0x15632bf000 - 0x15632c0fff 0x15632c1000 - 0x15632c1fff 0x15632c2000 - 0x15632c2fff 0x15632c3000 - 0x156342efff 0x156342f000 - 0x1563431fff 0x1563432000 - 0x1563432fff 0x1563433000 - 0x1563435fff 0x1563436000 - 0x1563448fff 0x1563449000 - 0x1563449fff 0x156344a000 - 0x156344afff 0x156344b000 - 0x1563568fff 0x1563569000 - 0x156356bfff 0x156356c000 - 0x156356efff 0x156356f000 - 0x1563573fff 0x1563574000 - 0x15635c8fff 0x15635c9000 - 0x1563c73fff 0x3fffa30000 - 0x3fffa50fff ;; 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 0x18204000 - 0x18224fff 0x80000000 - 0x800bffff 0x1579ecb000 - 0x1579ee5fff 0x1579ee6000 - 0x1579ee6fff 0x1579ee7000 - 0x1579ee7fff 0x1579ee8000 - 0x1579ee9fff 0x1579eea000 - 0x1579eebfff 0x1579eec000 - 0x1579ef2fff 0x1579ef3000 - 0x1579ef3fff 0x1579ef4000 - 0x1579ef4fff 0x1579ef6000 - 0x1579ef7fff 0x1579ef8000 - 0x1579f36fff 0x1579f37000 - 0x1579f38fff 0x1579f39000 - 0x1579f3ffff 0x1579f40000 - 0x1579f40fff 0x1579f41000 - 0x1579f66fff 0x1579f67000 - 0x1579f6afff 0x1579f6b000 - 0x1579f6bfff 0x1579f6c000 - 0x1579f6dfff 0x1579f6e000 - 0x1579f6efff 0x1579f6f000 - 0x1579f6ffff 0x1579f70000 - 0x1579f70fff 0x1579f71000 - 0x1579f74fff 0x1579f75000 - 0x1579f75fff 0x1579f76000 - 0x1579f76fff 0x1579f77000 - 0x1579f78fff 0x1579f79000 - 0x1579f79fff 0x1579f7a000 - 0x1579f7afff 0x1579f7b000 - 0x157a0e6fff 0x157a0e7000 - 0x157a0e9fff 0x157a0ea000 - 0x157a0eafff 0x157a0eb000 - 0x157a0edfff 0x157a0ee000 - 0x157a100fff 0x157a101000 - 0x157a101fff 0x157a102000 - 0x157a102fff 0x157a103000 - 0x157a220fff 0x157a221000 - 0x157a223fff 0x157a224000 - 0x157a226fff 0x157a227000 - 0x157a22bfff 0x157a22c000 - 0x157a280fff 0x157a281000 - 0x157a92bfff 0x3fffd58000 - 0x3fffd78fff ;; 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 0x3b39c000 - 0x3b3bcfff 0x80000000 - 0x800bffff 0x156a9fe000 - 0x156aa18fff 0x156aa19000 - 0x156aa19fff 0x156aa1a000 - 0x156aa1afff 0x156aa1b000 - 0x156aa1cfff 0x156aa1d000 - 0x156aa1efff 0x156aa1f000 - 0x156aa25fff 0x156aa26000 - 0x156aa26fff 0x156aa27000 - 0x156aa27fff 0x156aa29000 - 0x156aa2afff 0x156aa2b000 - 0x156aa69fff 0x156aa6a000 - 0x156aa6bfff 0x156aa6c000 - 0x156aa72fff 0x156aa73000 - 0x156aa73fff 0x156aa74000 - 0x156aa99fff 0x156aa9a000 - 0x156aa9dfff 0x156aa9e000 - 0x156aa9efff 0x156aa9f000 - 0x156aaa0fff 0x156aaa1000 - 0x156aaa1fff 0x156aaa2000 - 0x156aaa2fff 0x156aaa3000 - 0x156aaa3fff 0x156aaa4000 - 0x156aaa7fff 0x156aaa8000 - 0x156aaa8fff 0x156aaa9000 - 0x156aaa9fff 0x156aaaa000 - 0x156aaabfff 0x156aaac000 - 0x156aaacfff 0x156aaad000 - 0x156aaadfff 0x156aaae000 - 0x156ac19fff 0x156ac1a000 - 0x156ac1cfff 0x156ac1d000 - 0x156ac1dfff 0x156ac1e000 - 0x156ac20fff 0x156ac21000 - 0x156ac33fff 0x156ac34000 - 0x156ac34fff 0x156ac35000 - 0x156ac35fff 0x156ac36000 - 0x156ad53fff 0x156ad54000 - 0x156ad56fff 0x156ad57000 - 0x156ad59fff 0x156ad5a000 - 0x156ad5efff 0x156ad5f000 - 0x156adb3fff 0x156adb4000 - 0x156b45efff 0x3ffff18000 - 0x3ffff38fff ;; 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 0x13dac000 - 0x13dccfff 0x80000000 - 0x800bffff 0x155f3c7000 - 0x155f3e1fff 0x155f3e2000 - 0x155f3e2fff 0x155f3e3000 - 0x155f3e3fff 0x155f3e4000 - 0x155f3e5fff 0x155f3e6000 - 0x155f3e7fff 0x155f3e8000 - 0x155f3eefff 0x155f3ef000 - 0x155f3effff 0x155f3f0000 - 0x155f3f0fff 0x155f3f2000 - 0x155f3f3fff 0x155f3f4000 - 0x155f432fff 0x155f433000 - 0x155f434fff 0x155f435000 - 0x155f43bfff 0x155f43c000 - 0x155f43cfff 0x155f43d000 - 0x155f462fff 0x155f463000 - 0x155f466fff 0x155f467000 - 0x155f467fff 0x155f468000 - 0x155f469fff 0x155f46a000 - 0x155f46afff 0x155f46b000 - 0x155f46bfff 0x155f46c000 - 0x155f46cfff 0x155f46d000 - 0x155f470fff 0x155f471000 - 0x155f471fff 0x155f472000 - 0x155f472fff 0x155f473000 - 0x155f474fff 0x155f475000 - 0x155f475fff 0x155f476000 - 0x155f476fff 0x155f477000 - 0x155f5e2fff 0x155f5e3000 - 0x155f5e5fff 0x155f5e6000 - 0x155f5e6fff 0x155f5e7000 - 0x155f5e9fff 0x155f5ea000 - 0x155f5fcfff 0x155f5fd000 - 0x155f5fdfff 0x155f5fe000 - 0x155f5fefff 0x155f5ff000 - 0x155f71cfff 0x155f71d000 - 0x155f71ffff 0x155f720000 - 0x155f722fff 0x155f723000 - 0x155f727fff 0x155f728000 - 0x155f77cfff 0x155f77d000 - 0x155fe27fff 0x3fff8b6000 - 0x3fff8d6fff ;; 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 0x1b9d0000 - 0x1b9f0fff 0x80000000 - 0x800bffff 0x15913a4000 - 0x15913befff 0x15913bf000 - 0x15913bffff 0x15913c0000 - 0x15913c0fff 0x15913c1000 - 0x15913c2fff 0x15913c3000 - 0x15913c4fff 0x15913c5000 - 0x15913cbfff 0x15913cc000 - 0x15913ccfff 0x15913cd000 - 0x15913cdfff 0x15913cf000 - 0x15913d0fff 0x15913d1000 - 0x159140ffff 0x1591410000 - 0x1591411fff 0x1591412000 - 0x1591418fff 0x1591419000 - 0x1591419fff 0x159141a000 - 0x159143ffff 0x1591440000 - 0x1591443fff 0x1591444000 - 0x1591444fff 0x1591445000 - 0x1591446fff 0x1591447000 - 0x1591447fff 0x1591448000 - 0x1591448fff 0x1591449000 - 0x1591449fff 0x159144a000 - 0x159144dfff 0x159144e000 - 0x159144efff 0x159144f000 - 0x159144ffff 0x1591450000 - 0x1591451fff 0x1591452000 - 0x1591452fff 0x1591453000 - 0x1591453fff 0x1591454000 - 0x15915bffff 0x15915c0000 - 0x15915c2fff 0x15915c3000 - 0x15915c3fff 0x15915c4000 - 0x15915c6fff 0x15915c7000 - 0x15915d9fff 0x15915da000 - 0x15915dafff 0x15915db000 - 0x15915dbfff 0x15915dc000 - 0x15916f9fff 0x15916fa000 - 0x15916fcfff 0x15916fd000 - 0x15916fffff 0x1591700000 - 0x1591704fff 0x1591705000 - 0x1591759fff 0x159175a000 - 0x1591e04fff 0x3fffbda000 - 0x3fffbfafff ;; 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 0x113b0000 - 0x113d0fff 0x80000000 - 0x800bffff 0x155a6f7000 - 0x155a711fff 0x155a712000 - 0x155a712fff 0x155a713000 - 0x155a713fff 0x155a714000 - 0x155a715fff 0x155a716000 - 0x155a717fff 0x155a718000 - 0x155a71efff 0x155a71f000 - 0x155a71ffff 0x155a720000 - 0x155a720fff 0x155a722000 - 0x155a723fff 0x155a724000 - 0x155a762fff 0x155a763000 - 0x155a764fff 0x155a765000 - 0x155a76bfff 0x155a76c000 - 0x155a76cfff 0x155a76d000 - 0x155a792fff 0x155a793000 - 0x155a796fff 0x155a797000 - 0x155a797fff 0x155a798000 - 0x155a799fff 0x155a79a000 - 0x155a79afff 0x155a79b000 - 0x155a79bfff 0x155a79c000 - 0x155a79cfff 0x155a79d000 - 0x155a7a0fff 0x155a7a1000 - 0x155a7a1fff 0x155a7a2000 - 0x155a7a2fff 0x155a7a3000 - 0x155a7a4fff 0x155a7a5000 - 0x155a7a5fff 0x155a7a6000 - 0x155a7a6fff 0x155a7a7000 - 0x155a912fff 0x155a913000 - 0x155a915fff 0x155a916000 - 0x155a916fff 0x155a917000 - 0x155a919fff 0x155a91a000 - 0x155a92cfff 0x155a92d000 - 0x155a92dfff 0x155a92e000 - 0x155a92efff 0x155a92f000 - 0x155aa4cfff 0x155aa4d000 - 0x155aa4ffff 0x155aa50000 - 0x155aa52fff 0x155aa53000 - 0x155aa57fff 0x155aa58000 - 0x155aaacfff 0x155aaad000 - 0x155b157fff 0x3fff963000 - 0x3fff983fff ;; 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 0x2876000 - 0x2896fff 0x80000000 - 0x800bffff 0x158c520000 - 0x158c53afff 0x158c53b000 - 0x158c53bfff 0x158c53c000 - 0x158c53cfff 0x158c53d000 - 0x158c53efff 0x158c53f000 - 0x158c540fff 0x158c541000 - 0x158c547fff 0x158c548000 - 0x158c548fff 0x158c549000 - 0x158c549fff 0x158c54b000 - 0x158c54cfff 0x158c54d000 - 0x158c58bfff 0x158c58c000 - 0x158c58dfff 0x158c58e000 - 0x158c594fff 0x158c595000 - 0x158c595fff 0x158c596000 - 0x158c5bbfff 0x158c5bc000 - 0x158c5bffff 0x158c5c0000 - 0x158c5c0fff 0x158c5c1000 - 0x158c5c2fff 0x158c5c3000 - 0x158c5c3fff 0x158c5c4000 - 0x158c5c4fff 0x158c5c5000 - 0x158c5c5fff 0x158c5c6000 - 0x158c5c9fff 0x158c5ca000 - 0x158c5cafff 0x158c5cb000 - 0x158c5cbfff 0x158c5cc000 - 0x158c5cdfff 0x158c5ce000 - 0x158c5cefff 0x158c5cf000 - 0x158c5cffff 0x158c5d0000 - 0x158c73bfff 0x158c73c000 - 0x158c73efff 0x158c73f000 - 0x158c73ffff 0x158c740000 - 0x158c742fff 0x158c743000 - 0x158c755fff 0x158c756000 - 0x158c756fff 0x158c757000 - 0x158c757fff 0x158c758000 - 0x158c875fff 0x158c876000 - 0x158c878fff 0x158c879000 - 0x158c87bfff 0x158c87c000 - 0x158c880fff 0x158c881000 - 0x158c8d5fff 0x158c8d6000 - 0x158cf80fff 0x3fffbc1000 - 0x3fffbe1fff ;; 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 0x728000 - 0x748fff 0x80000000 - 0x800bffff 0x157e7da000 - 0x157e7f4fff 0x157e7f5000 - 0x157e7f5fff 0x157e7f6000 - 0x157e7f6fff 0x157e7f7000 - 0x157e7f8fff 0x157e7f9000 - 0x157e7fafff 0x157e7fb000 - 0x157e801fff 0x157e802000 - 0x157e802fff 0x157e803000 - 0x157e803fff 0x157e805000 - 0x157e806fff 0x157e807000 - 0x157e845fff 0x157e846000 - 0x157e847fff 0x157e848000 - 0x157e84efff 0x157e84f000 - 0x157e84ffff 0x157e850000 - 0x157e875fff 0x157e876000 - 0x157e879fff 0x157e87a000 - 0x157e87afff 0x157e87b000 - 0x157e87cfff 0x157e87d000 - 0x157e87dfff 0x157e87e000 - 0x157e87efff 0x157e87f000 - 0x157e87ffff 0x157e880000 - 0x157e883fff 0x157e884000 - 0x157e884fff 0x157e885000 - 0x157e885fff 0x157e886000 - 0x157e887fff 0x157e888000 - 0x157e888fff 0x157e889000 - 0x157e889fff 0x157e88a000 - 0x157e9f5fff 0x157e9f6000 - 0x157e9f8fff 0x157e9f9000 - 0x157e9f9fff 0x157e9fa000 - 0x157e9fcfff 0x157e9fd000 - 0x157ea0ffff 0x157ea10000 - 0x157ea10fff 0x157ea11000 - 0x157ea11fff 0x157ea12000 - 0x157eb2ffff 0x157eb30000 - 0x157eb32fff 0x157eb33000 - 0x157eb35fff 0x157eb36000 - 0x157eb3afff 0x157eb3b000 - 0x157eb8ffff 0x157eb90000 - 0x157f23afff 0x3fffca7000 - 0x3fffcc7fff ;; 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 0x6406000 - 0x6426fff 0x80000000 - 0x800bffff 0x15795bd000 - 0x15795d7fff 0x15795d8000 - 0x15795d8fff 0x15795d9000 - 0x15795d9fff 0x15795da000 - 0x15795dbfff 0x15795dc000 - 0x15795ddfff 0x15795de000 - 0x15795e4fff 0x15795e5000 - 0x15795e5fff 0x15795e6000 - 0x15795e6fff 0x15795e8000 - 0x15795e9fff 0x15795ea000 - 0x1579628fff 0x1579629000 - 0x157962afff 0x157962b000 - 0x1579631fff 0x1579632000 - 0x1579632fff 0x1579633000 - 0x1579658fff 0x1579659000 - 0x157965cfff 0x157965d000 - 0x157965dfff 0x157965e000 - 0x157965ffff 0x1579660000 - 0x1579660fff 0x1579661000 - 0x1579661fff 0x1579662000 - 0x1579662fff 0x1579663000 - 0x1579666fff 0x1579667000 - 0x1579667fff 0x1579668000 - 0x1579668fff 0x1579669000 - 0x157966afff 0x157966b000 - 0x157966bfff 0x157966c000 - 0x157966cfff 0x157966d000 - 0x15797d8fff 0x15797d9000 - 0x15797dbfff 0x15797dc000 - 0x15797dcfff 0x15797dd000 - 0x15797dffff 0x15797e0000 - 0x15797f2fff 0x15797f3000 - 0x15797f3fff 0x15797f4000 - 0x15797f4fff 0x15797f5000 - 0x1579912fff 0x1579913000 - 0x1579915fff 0x1579916000 - 0x1579918fff 0x1579919000 - 0x157991dfff 0x157991e000 - 0x1579972fff 0x1579973000 - 0x157a01dfff 0x3fffed4000 - 0x3fffef4fff ;; 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 0x2be06000 - 0x2be26fff 0x80000000 - 0x800bffff 0x1555abe000 - 0x1555ad8fff 0x1555ad9000 - 0x1555ad9fff 0x1555ada000 - 0x1555adafff 0x1555adb000 - 0x1555adcfff 0x1555add000 - 0x1555adefff 0x1555adf000 - 0x1555ae5fff 0x1555ae6000 - 0x1555ae6fff 0x1555ae7000 - 0x1555ae7fff 0x1555ae9000 - 0x1555aeafff 0x1555aeb000 - 0x1555b29fff 0x1555b2a000 - 0x1555b2bfff 0x1555b2c000 - 0x1555b32fff 0x1555b33000 - 0x1555b33fff 0x1555b34000 - 0x1555b59fff 0x1555b5a000 - 0x1555b5dfff 0x1555b5e000 - 0x1555b5efff 0x1555b5f000 - 0x1555b60fff 0x1555b61000 - 0x1555b61fff 0x1555b62000 - 0x1555b62fff 0x1555b63000 - 0x1555b63fff 0x1555b64000 - 0x1555b67fff 0x1555b68000 - 0x1555b68fff 0x1555b69000 - 0x1555b69fff 0x1555b6a000 - 0x1555b6bfff 0x1555b6c000 - 0x1555b6cfff 0x1555b6d000 - 0x1555b6dfff 0x1555b6e000 - 0x1555cd9fff 0x1555cda000 - 0x1555cdcfff 0x1555cdd000 - 0x1555cddfff 0x1555cde000 - 0x1555ce0fff 0x1555ce1000 - 0x1555cf3fff 0x1555cf4000 - 0x1555cf4fff 0x1555cf5000 - 0x1555cf5fff 0x1555cf6000 - 0x1555e13fff 0x1555e14000 - 0x1555e16fff 0x1555e17000 - 0x1555e19fff 0x1555e1a000 - 0x1555e1efff 0x1555e1f000 - 0x1555e73fff 0x1555e74000 - 0x155651efff 0x3fff8b4000 - 0x3fff8d4fff ;; 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 0x18200000 - 0x18220fff 0x80000000 - 0x800bffff 0x1557b9e000 - 0x1557bb8fff 0x1557bb9000 - 0x1557bb9fff 0x1557bba000 - 0x1557bbafff 0x1557bbb000 - 0x1557bbcfff 0x1557bbd000 - 0x1557bbefff 0x1557bbf000 - 0x1557bc5fff 0x1557bc6000 - 0x1557bc6fff 0x1557bc7000 - 0x1557bc7fff 0x1557bc9000 - 0x1557bcafff 0x1557bcb000 - 0x1557c09fff 0x1557c0a000 - 0x1557c0bfff 0x1557c0c000 - 0x1557c12fff 0x1557c13000 - 0x1557c13fff 0x1557c14000 - 0x1557c39fff 0x1557c3a000 - 0x1557c3dfff 0x1557c3e000 - 0x1557c3efff 0x1557c3f000 - 0x1557c40fff 0x1557c41000 - 0x1557c41fff 0x1557c42000 - 0x1557c42fff 0x1557c43000 - 0x1557c43fff 0x1557c44000 - 0x1557c47fff 0x1557c48000 - 0x1557c48fff 0x1557c49000 - 0x1557c49fff 0x1557c4a000 - 0x1557c4bfff 0x1557c4c000 - 0x1557c4cfff 0x1557c4d000 - 0x1557c4dfff 0x1557c4e000 - 0x1557db9fff 0x1557dba000 - 0x1557dbcfff 0x1557dbd000 - 0x1557dbdfff 0x1557dbe000 - 0x1557dc0fff 0x1557dc1000 - 0x1557dd3fff 0x1557dd4000 - 0x1557dd4fff 0x1557dd5000 - 0x1557dd5fff 0x1557dd6000 - 0x1557ef3fff 0x1557ef4000 - 0x1557ef6fff 0x1557ef7000 - 0x1557ef9fff 0x1557efa000 - 0x1557efefff 0x1557eff000 - 0x1557f53fff 0x1557f54000 - 0x15585fefff 0x3fffc35000 - 0x3fffc55fff ;; 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 0x3dd7b000 - 0x3dd9bfff 0x80000000 - 0x800bffff 0x1566585000 - 0x156659ffff 0x15665a0000 - 0x15665a0fff 0x15665a1000 - 0x15665a1fff 0x15665a2000 - 0x15665a3fff 0x15665a4000 - 0x15665a5fff 0x15665a6000 - 0x15665acfff 0x15665ad000 - 0x15665adfff 0x15665ae000 - 0x15665aefff 0x15665b0000 - 0x15665b1fff 0x15665b2000 - 0x15665f0fff 0x15665f1000 - 0x15665f2fff 0x15665f3000 - 0x15665f9fff 0x15665fa000 - 0x15665fafff 0x15665fb000 - 0x1566620fff 0x1566621000 - 0x1566624fff 0x1566625000 - 0x1566625fff 0x1566626000 - 0x1566627fff 0x1566628000 - 0x1566628fff 0x1566629000 - 0x1566629fff 0x156662a000 - 0x156662afff 0x156662b000 - 0x156662efff 0x156662f000 - 0x156662ffff 0x1566630000 - 0x1566630fff 0x1566631000 - 0x1566632fff 0x1566633000 - 0x1566633fff 0x1566634000 - 0x1566634fff 0x1566635000 - 0x15667a0fff 0x15667a1000 - 0x15667a3fff 0x15667a4000 - 0x15667a4fff 0x15667a5000 - 0x15667a7fff 0x15667a8000 - 0x15667bafff 0x15667bb000 - 0x15667bbfff 0x15667bc000 - 0x15667bcfff 0x15667bd000 - 0x15668dafff 0x15668db000 - 0x15668ddfff 0x15668de000 - 0x15668e0fff 0x15668e1000 - 0x15668e5fff 0x15668e6000 - 0x156693afff 0x156693b000 - 0x1566fe5fff 0x3fffd79000 - 0x3fffd99fff ;; 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 0x19792000 - 0x197b2fff 0x80000000 - 0x800bffff 0x155c129000 - 0x155c143fff 0x155c144000 - 0x155c144fff 0x155c145000 - 0x155c145fff 0x155c146000 - 0x155c147fff 0x155c148000 - 0x155c149fff 0x155c14a000 - 0x155c150fff 0x155c151000 - 0x155c151fff 0x155c152000 - 0x155c152fff 0x155c154000 - 0x155c155fff 0x155c156000 - 0x155c194fff 0x155c195000 - 0x155c196fff 0x155c197000 - 0x155c19dfff 0x155c19e000 - 0x155c19efff 0x155c19f000 - 0x155c1c4fff 0x155c1c5000 - 0x155c1c8fff 0x155c1c9000 - 0x155c1c9fff 0x155c1ca000 - 0x155c1cbfff 0x155c1cc000 - 0x155c1ccfff 0x155c1cd000 - 0x155c1cdfff 0x155c1ce000 - 0x155c1cefff 0x155c1cf000 - 0x155c1d2fff 0x155c1d3000 - 0x155c1d3fff 0x155c1d4000 - 0x155c1d4fff 0x155c1d5000 - 0x155c1d6fff 0x155c1d7000 - 0x155c1d7fff 0x155c1d8000 - 0x155c1d8fff 0x155c1d9000 - 0x155c344fff 0x155c345000 - 0x155c347fff 0x155c348000 - 0x155c348fff 0x155c349000 - 0x155c34bfff 0x155c34c000 - 0x155c35efff 0x155c35f000 - 0x155c35ffff 0x155c360000 - 0x155c360fff 0x155c361000 - 0x155c47efff 0x155c47f000 - 0x155c481fff 0x155c482000 - 0x155c484fff 0x155c485000 - 0x155c489fff 0x155c48a000 - 0x155c4defff 0x155c4df000 - 0x155cb89fff 0x3fff84e000 - 0x3fff86efff ;; 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 0x37ffd000 - 0x3801dfff 0x80000000 - 0x800bffff 0x15606fd000 - 0x1560717fff 0x1560718000 - 0x1560718fff 0x1560719000 - 0x1560719fff 0x156071a000 - 0x156071bfff 0x156071c000 - 0x156071dfff 0x156071e000 - 0x1560724fff 0x1560725000 - 0x1560725fff 0x1560726000 - 0x1560726fff 0x1560728000 - 0x1560729fff 0x156072a000 - 0x1560768fff 0x1560769000 - 0x156076afff 0x156076b000 - 0x1560771fff 0x1560772000 - 0x1560772fff 0x1560773000 - 0x1560798fff 0x1560799000 - 0x156079cfff 0x156079d000 - 0x156079dfff 0x156079e000 - 0x156079ffff 0x15607a0000 - 0x15607a0fff 0x15607a1000 - 0x15607a1fff 0x15607a2000 - 0x15607a2fff 0x15607a3000 - 0x15607a6fff 0x15607a7000 - 0x15607a7fff 0x15607a8000 - 0x15607a8fff 0x15607a9000 - 0x15607aafff 0x15607ab000 - 0x15607abfff 0x15607ac000 - 0x15607acfff 0x15607ad000 - 0x1560918fff 0x1560919000 - 0x156091bfff 0x156091c000 - 0x156091cfff 0x156091d000 - 0x156091ffff 0x1560920000 - 0x1560932fff 0x1560933000 - 0x1560933fff 0x1560934000 - 0x1560934fff 0x1560935000 - 0x1560a52fff 0x1560a53000 - 0x1560a55fff 0x1560a56000 - 0x1560a58fff 0x1560a59000 - 0x1560a5dfff 0x1560a5e000 - 0x1560ab2fff 0x1560ab3000 - 0x156115dfff 0x3fffb31000 - 0x3fffb51fff ;; 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 0x10a62000 - 0x10a82fff 0x80000000 - 0x800bffff 0x15715cf000 - 0x15715e9fff 0x15715ea000 - 0x15715eafff 0x15715eb000 - 0x15715ebfff 0x15715ec000 - 0x15715edfff 0x15715ee000 - 0x15715effff 0x15715f0000 - 0x15715f6fff 0x15715f7000 - 0x15715f7fff 0x15715f8000 - 0x15715f8fff 0x15715fa000 - 0x15715fbfff 0x15715fc000 - 0x157163afff 0x157163b000 - 0x157163cfff 0x157163d000 - 0x1571643fff 0x1571644000 - 0x1571644fff 0x1571645000 - 0x157166afff 0x157166b000 - 0x157166efff 0x157166f000 - 0x157166ffff 0x1571670000 - 0x1571671fff 0x1571672000 - 0x1571672fff 0x1571673000 - 0x1571673fff 0x1571674000 - 0x1571674fff 0x1571675000 - 0x1571678fff 0x1571679000 - 0x1571679fff 0x157167a000 - 0x157167afff 0x157167b000 - 0x157167cfff 0x157167d000 - 0x157167dfff 0x157167e000 - 0x157167efff 0x157167f000 - 0x15717eafff 0x15717eb000 - 0x15717edfff 0x15717ee000 - 0x15717eefff 0x15717ef000 - 0x15717f1fff 0x15717f2000 - 0x1571804fff 0x1571805000 - 0x1571805fff 0x1571806000 - 0x1571806fff 0x1571807000 - 0x1571924fff 0x1571925000 - 0x1571927fff 0x1571928000 - 0x157192afff 0x157192b000 - 0x157192ffff 0x1571930000 - 0x1571984fff 0x1571985000 - 0x157202ffff 0x3fffec5000 - 0x3fffee5fff ;; 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 0x22432000 - 0x22452fff 0x80000000 - 0x800bffff 0x158dc58000 - 0x158dc72fff 0x158dc73000 - 0x158dc73fff 0x158dc74000 - 0x158dc74fff 0x158dc75000 - 0x158dc76fff 0x158dc77000 - 0x158dc78fff 0x158dc79000 - 0x158dc7ffff 0x158dc80000 - 0x158dc80fff 0x158dc81000 - 0x158dc81fff 0x158dc83000 - 0x158dc84fff 0x158dc85000 - 0x158dcc3fff 0x158dcc4000 - 0x158dcc5fff 0x158dcc6000 - 0x158dcccfff 0x158dccd000 - 0x158dccdfff 0x158dcce000 - 0x158dcf3fff 0x158dcf4000 - 0x158dcf7fff 0x158dcf8000 - 0x158dcf8fff 0x158dcf9000 - 0x158dcfafff 0x158dcfb000 - 0x158dcfbfff 0x158dcfc000 - 0x158dcfcfff 0x158dcfd000 - 0x158dcfdfff 0x158dcfe000 - 0x158dd01fff 0x158dd02000 - 0x158dd02fff 0x158dd03000 - 0x158dd03fff 0x158dd04000 - 0x158dd05fff 0x158dd06000 - 0x158dd06fff 0x158dd07000 - 0x158dd07fff 0x158dd08000 - 0x158de73fff 0x158de74000 - 0x158de76fff 0x158de77000 - 0x158de77fff 0x158de78000 - 0x158de7afff 0x158de7b000 - 0x158de8dfff 0x158de8e000 - 0x158de8efff 0x158de8f000 - 0x158de8ffff 0x158de90000 - 0x158dfadfff 0x158dfae000 - 0x158dfb0fff 0x158dfb1000 - 0x158dfb3fff 0x158dfb4000 - 0x158dfb8fff 0x158dfb9000 - 0x158e00dfff 0x158e00e000 - 0x158e6b8fff 0x3fffa1d000 - 0x3fffa3dfff ;; 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 0x74b2000 - 0x74d2fff 0x80000000 - 0x800bffff 0x158b73d000 - 0x158b757fff 0x158b758000 - 0x158b758fff 0x158b759000 - 0x158b759fff 0x158b75a000 - 0x158b75bfff 0x158b75c000 - 0x158b75dfff 0x158b75e000 - 0x158b764fff 0x158b765000 - 0x158b765fff 0x158b766000 - 0x158b766fff 0x158b768000 - 0x158b769fff 0x158b76a000 - 0x158b7a8fff 0x158b7a9000 - 0x158b7aafff 0x158b7ab000 - 0x158b7b1fff 0x158b7b2000 - 0x158b7b2fff 0x158b7b3000 - 0x158b7d8fff 0x158b7d9000 - 0x158b7dcfff 0x158b7dd000 - 0x158b7ddfff 0x158b7de000 - 0x158b7dffff 0x158b7e0000 - 0x158b7e0fff 0x158b7e1000 - 0x158b7e1fff 0x158b7e2000 - 0x158b7e2fff 0x158b7e3000 - 0x158b7e6fff 0x158b7e7000 - 0x158b7e7fff 0x158b7e8000 - 0x158b7e8fff 0x158b7e9000 - 0x158b7eafff 0x158b7eb000 - 0x158b7ebfff 0x158b7ec000 - 0x158b7ecfff 0x158b7ed000 - 0x158b958fff 0x158b959000 - 0x158b95bfff 0x158b95c000 - 0x158b95cfff 0x158b95d000 - 0x158b95ffff 0x158b960000 - 0x158b972fff 0x158b973000 - 0x158b973fff 0x158b974000 - 0x158b974fff 0x158b975000 - 0x158ba92fff 0x158ba93000 - 0x158ba95fff 0x158ba96000 - 0x158ba98fff 0x158ba99000 - 0x158ba9dfff 0x158ba9e000 - 0x158baf2fff 0x158baf3000 - 0x158c19dfff 0x3fffebe000 - 0x3fffedefff ;; 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 0x34d0000 - 0x34f0fff 0x80000000 - 0x800bffff 0x15653af000 - 0x15653c9fff 0x15653ca000 - 0x15653cafff 0x15653cb000 - 0x15653cbfff 0x15653cc000 - 0x15653cdfff 0x15653ce000 - 0x15653cffff 0x15653d0000 - 0x15653d6fff 0x15653d7000 - 0x15653d7fff 0x15653d8000 - 0x15653d8fff 0x15653da000 - 0x15653dbfff 0x15653dc000 - 0x156541afff 0x156541b000 - 0x156541cfff 0x156541d000 - 0x1565423fff 0x1565424000 - 0x1565424fff 0x1565425000 - 0x156544afff 0x156544b000 - 0x156544efff 0x156544f000 - 0x156544ffff 0x1565450000 - 0x1565451fff 0x1565452000 - 0x1565452fff 0x1565453000 - 0x1565453fff 0x1565454000 - 0x1565454fff 0x1565455000 - 0x1565458fff 0x1565459000 - 0x1565459fff 0x156545a000 - 0x156545afff 0x156545b000 - 0x156545cfff 0x156545d000 - 0x156545dfff 0x156545e000 - 0x156545efff 0x156545f000 - 0x15655cafff 0x15655cb000 - 0x15655cdfff 0x15655ce000 - 0x15655cefff 0x15655cf000 - 0x15655d1fff 0x15655d2000 - 0x15655e4fff 0x15655e5000 - 0x15655e5fff 0x15655e6000 - 0x15655e6fff 0x15655e7000 - 0x1565704fff 0x1565705000 - 0x1565707fff 0x1565708000 - 0x156570afff 0x156570b000 - 0x156570ffff 0x1565710000 - 0x1565764fff 0x1565765000 - 0x1565e0ffff 0x3fffa2d000 - 0x3fffa4dfff ;; 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 0x93aa000 - 0x93cafff 0x80000000 - 0x800bffff 0x1565cb6000 - 0x1565cd0fff 0x1565cd1000 - 0x1565cd1fff 0x1565cd2000 - 0x1565cd2fff 0x1565cd3000 - 0x1565cd4fff 0x1565cd5000 - 0x1565cd6fff 0x1565cd7000 - 0x1565cddfff 0x1565cde000 - 0x1565cdefff 0x1565cdf000 - 0x1565cdffff 0x1565ce1000 - 0x1565ce2fff 0x1565ce3000 - 0x1565d21fff 0x1565d22000 - 0x1565d23fff 0x1565d24000 - 0x1565d2afff 0x1565d2b000 - 0x1565d2bfff 0x1565d2c000 - 0x1565d51fff 0x1565d52000 - 0x1565d55fff 0x1565d56000 - 0x1565d56fff 0x1565d57000 - 0x1565d58fff 0x1565d59000 - 0x1565d59fff 0x1565d5a000 - 0x1565d5afff 0x1565d5b000 - 0x1565d5bfff 0x1565d5c000 - 0x1565d5ffff 0x1565d60000 - 0x1565d60fff 0x1565d61000 - 0x1565d61fff 0x1565d62000 - 0x1565d63fff 0x1565d64000 - 0x1565d64fff 0x1565d65000 - 0x1565d65fff 0x1565d66000 - 0x1565ed1fff 0x1565ed2000 - 0x1565ed4fff 0x1565ed5000 - 0x1565ed5fff 0x1565ed6000 - 0x1565ed8fff 0x1565ed9000 - 0x1565eebfff 0x1565eec000 - 0x1565eecfff 0x1565eed000 - 0x1565eedfff 0x1565eee000 - 0x156600bfff 0x156600c000 - 0x156600efff 0x156600f000 - 0x1566011fff 0x1566012000 - 0x1566016fff 0x1566017000 - 0x156606bfff 0x156606c000 - 0x1566716fff 0x3fffe61000 - 0x3fffe81fff ;; 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 0x1f910000 - 0x1f930fff 0x80000000 - 0x800bffff 0x156570f000 - 0x1565729fff 0x156572a000 - 0x156572afff 0x156572b000 - 0x156572bfff 0x156572c000 - 0x156572dfff 0x156572e000 - 0x156572ffff 0x1565730000 - 0x1565736fff 0x1565737000 - 0x1565737fff 0x1565738000 - 0x1565738fff 0x156573a000 - 0x156573bfff 0x156573c000 - 0x156577afff 0x156577b000 - 0x156577cfff 0x156577d000 - 0x1565783fff 0x1565784000 - 0x1565784fff 0x1565785000 - 0x15657aafff 0x15657ab000 - 0x15657aefff 0x15657af000 - 0x15657affff 0x15657b0000 - 0x15657b1fff 0x15657b2000 - 0x15657b2fff 0x15657b3000 - 0x15657b3fff 0x15657b4000 - 0x15657b4fff 0x15657b5000 - 0x15657b8fff 0x15657b9000 - 0x15657b9fff 0x15657ba000 - 0x15657bafff 0x15657bb000 - 0x15657bcfff 0x15657bd000 - 0x15657bdfff 0x15657be000 - 0x15657befff 0x15657bf000 - 0x156592afff 0x156592b000 - 0x156592dfff 0x156592e000 - 0x156592efff 0x156592f000 - 0x1565931fff 0x1565932000 - 0x1565944fff 0x1565945000 - 0x1565945fff 0x1565946000 - 0x1565946fff 0x1565947000 - 0x1565a64fff 0x1565a65000 - 0x1565a67fff 0x1565a68000 - 0x1565a6afff 0x1565a6b000 - 0x1565a6ffff 0x1565a70000 - 0x1565ac4fff 0x1565ac5000 - 0x156616ffff 0x3fffd8c000 - 0x3fffdacfff ;; 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 0x14ae4000 - 0x14b04fff 0x80000000 - 0x800bffff 0x15935b1000 - 0x15935cbfff 0x15935cc000 - 0x15935ccfff 0x15935cd000 - 0x15935cdfff 0x15935ce000 - 0x15935cffff 0x15935d0000 - 0x15935d1fff 0x15935d2000 - 0x15935d8fff 0x15935d9000 - 0x15935d9fff 0x15935da000 - 0x15935dafff 0x15935dc000 - 0x15935ddfff 0x15935de000 - 0x159361cfff 0x159361d000 - 0x159361efff 0x159361f000 - 0x1593625fff 0x1593626000 - 0x1593626fff 0x1593627000 - 0x159364cfff 0x159364d000 - 0x1593650fff 0x1593651000 - 0x1593651fff 0x1593652000 - 0x1593653fff 0x1593654000 - 0x1593654fff 0x1593655000 - 0x1593655fff 0x1593656000 - 0x1593656fff 0x1593657000 - 0x159365afff 0x159365b000 - 0x159365bfff 0x159365c000 - 0x159365cfff 0x159365d000 - 0x159365efff 0x159365f000 - 0x159365ffff 0x1593660000 - 0x1593660fff 0x1593661000 - 0x15937ccfff 0x15937cd000 - 0x15937cffff 0x15937d0000 - 0x15937d0fff 0x15937d1000 - 0x15937d3fff 0x15937d4000 - 0x15937e6fff 0x15937e7000 - 0x15937e7fff 0x15937e8000 - 0x15937e8fff 0x15937e9000 - 0x1593906fff 0x1593907000 - 0x1593909fff 0x159390a000 - 0x159390cfff 0x159390d000 - 0x1593911fff 0x1593912000 - 0x1593966fff 0x1593967000 - 0x1594011fff 0x3ffffdd000 - 0x3fffffdfff ;; 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 0x17224000 - 0x17244fff 0x80000000 - 0x800bffff 0x155d7a0000 - 0x155d7bafff 0x155d7bb000 - 0x155d7bbfff 0x155d7bc000 - 0x155d7bcfff 0x155d7bd000 - 0x155d7befff 0x155d7bf000 - 0x155d7c0fff 0x155d7c1000 - 0x155d7c7fff 0x155d7c8000 - 0x155d7c8fff 0x155d7c9000 - 0x155d7c9fff 0x155d7cb000 - 0x155d7ccfff 0x155d7cd000 - 0x155d80bfff 0x155d80c000 - 0x155d80dfff 0x155d80e000 - 0x155d814fff 0x155d815000 - 0x155d815fff 0x155d816000 - 0x155d83bfff 0x155d83c000 - 0x155d83ffff 0x155d840000 - 0x155d840fff 0x155d841000 - 0x155d842fff 0x155d843000 - 0x155d843fff 0x155d844000 - 0x155d844fff 0x155d845000 - 0x155d845fff 0x155d846000 - 0x155d849fff 0x155d84a000 - 0x155d84afff 0x155d84b000 - 0x155d84bfff 0x155d84c000 - 0x155d84dfff 0x155d84e000 - 0x155d84efff 0x155d84f000 - 0x155d84ffff 0x155d850000 - 0x155d9bbfff 0x155d9bc000 - 0x155d9befff 0x155d9bf000 - 0x155d9bffff 0x155d9c0000 - 0x155d9c2fff 0x155d9c3000 - 0x155d9d5fff 0x155d9d6000 - 0x155d9d6fff 0x155d9d7000 - 0x155d9d7fff 0x155d9d8000 - 0x155daf5fff 0x155daf6000 - 0x155daf8fff 0x155daf9000 - 0x155dafbfff 0x155dafc000 - 0x155db00fff 0x155db01000 - 0x155db55fff 0x155db56000 - 0x155e200fff 0x3fffafb000 - 0x3fffb1bfff ;; 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 0xabf4000 - 0xac14fff 0x80000000 - 0x800bffff 0x1582fdd000 - 0x1582ff7fff 0x1582ff8000 - 0x1582ff8fff 0x1582ff9000 - 0x1582ff9fff 0x1582ffa000 - 0x1582ffbfff 0x1582ffc000 - 0x1582ffdfff 0x1582ffe000 - 0x1583004fff 0x1583005000 - 0x1583005fff 0x1583006000 - 0x1583006fff 0x1583008000 - 0x1583009fff 0x158300a000 - 0x1583048fff 0x1583049000 - 0x158304afff 0x158304b000 - 0x1583051fff 0x1583052000 - 0x1583052fff 0x1583053000 - 0x1583078fff 0x1583079000 - 0x158307cfff 0x158307d000 - 0x158307dfff 0x158307e000 - 0x158307ffff 0x1583080000 - 0x1583080fff 0x1583081000 - 0x1583081fff 0x1583082000 - 0x1583082fff 0x1583083000 - 0x1583086fff 0x1583087000 - 0x1583087fff 0x1583088000 - 0x1583088fff 0x1583089000 - 0x158308afff 0x158308b000 - 0x158308bfff 0x158308c000 - 0x158308cfff 0x158308d000 - 0x15831f8fff 0x15831f9000 - 0x15831fbfff 0x15831fc000 - 0x15831fcfff 0x15831fd000 - 0x15831fffff 0x1583200000 - 0x1583212fff 0x1583213000 - 0x1583213fff 0x1583214000 - 0x1583214fff 0x1583215000 - 0x1583332fff 0x1583333000 - 0x1583335fff 0x1583336000 - 0x1583338fff 0x1583339000 - 0x158333dfff 0x158333e000 - 0x1583392fff 0x1583393000 - 0x1583a3dfff 0x3ffffdd000 - 0x3fffffdfff ;; 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 0x3e52e000 - 0x3e54efff 0x80000000 - 0x800bffff 0x1591fe0000 - 0x1591ffafff 0x1591ffb000 - 0x1591ffbfff 0x1591ffc000 - 0x1591ffcfff 0x1591ffd000 - 0x1591ffefff 0x1591fff000 - 0x1592000fff 0x1592001000 - 0x1592007fff 0x1592008000 - 0x1592008fff 0x1592009000 - 0x1592009fff 0x159200b000 - 0x159200cfff 0x159200d000 - 0x159204bfff 0x159204c000 - 0x159204dfff 0x159204e000 - 0x1592054fff 0x1592055000 - 0x1592055fff 0x1592056000 - 0x159207bfff 0x159207c000 - 0x159207ffff 0x1592080000 - 0x1592080fff 0x1592081000 - 0x1592082fff 0x1592083000 - 0x1592083fff 0x1592084000 - 0x1592084fff 0x1592085000 - 0x1592085fff 0x1592086000 - 0x1592089fff 0x159208a000 - 0x159208afff 0x159208b000 - 0x159208bfff 0x159208c000 - 0x159208dfff 0x159208e000 - 0x159208efff 0x159208f000 - 0x159208ffff 0x1592090000 - 0x15921fbfff 0x15921fc000 - 0x15921fefff 0x15921ff000 - 0x15921fffff 0x1592200000 - 0x1592202fff 0x1592203000 - 0x1592215fff 0x1592216000 - 0x1592216fff 0x1592217000 - 0x1592217fff 0x1592218000 - 0x1592335fff 0x1592336000 - 0x1592338fff 0x1592339000 - 0x159233bfff 0x159233c000 - 0x1592340fff 0x1592341000 - 0x1592395fff 0x1592396000 - 0x1592a40fff 0x3ffff39000 - 0x3ffff59fff ;; 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 0x1b187000 - 0x1b1a7fff 0x80000000 - 0x800bffff 0x157c0c3000 - 0x157c0ddfff 0x157c0de000 - 0x157c0defff 0x157c0df000 - 0x157c0dffff 0x157c0e0000 - 0x157c0e1fff 0x157c0e2000 - 0x157c0e3fff 0x157c0e4000 - 0x157c0eafff 0x157c0eb000 - 0x157c0ebfff 0x157c0ec000 - 0x157c0ecfff 0x157c0ee000 - 0x157c0effff 0x157c0f0000 - 0x157c12efff 0x157c12f000 - 0x157c130fff 0x157c131000 - 0x157c137fff 0x157c138000 - 0x157c138fff 0x157c139000 - 0x157c15efff 0x157c15f000 - 0x157c162fff 0x157c163000 - 0x157c163fff 0x157c164000 - 0x157c165fff 0x157c166000 - 0x157c166fff 0x157c167000 - 0x157c167fff 0x157c168000 - 0x157c168fff 0x157c169000 - 0x157c16cfff 0x157c16d000 - 0x157c16dfff 0x157c16e000 - 0x157c16efff 0x157c16f000 - 0x157c170fff 0x157c171000 - 0x157c171fff 0x157c172000 - 0x157c172fff 0x157c173000 - 0x157c2defff 0x157c2df000 - 0x157c2e1fff 0x157c2e2000 - 0x157c2e2fff 0x157c2e3000 - 0x157c2e5fff 0x157c2e6000 - 0x157c2f8fff 0x157c2f9000 - 0x157c2f9fff 0x157c2fa000 - 0x157c2fafff 0x157c2fb000 - 0x157c418fff 0x157c419000 - 0x157c41bfff 0x157c41c000 - 0x157c41efff 0x157c41f000 - 0x157c423fff 0x157c424000 - 0x157c478fff 0x157c479000 - 0x157cb23fff 0x3fffb26000 - 0x3fffb46fff ;; 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 0x145ff000 - 0x1461ffff 0x80000000 - 0x800bffff 0x158153c000 - 0x1581556fff 0x1581557000 - 0x1581557fff 0x1581558000 - 0x1581558fff 0x1581559000 - 0x158155afff 0x158155b000 - 0x158155cfff 0x158155d000 - 0x1581563fff 0x1581564000 - 0x1581564fff 0x1581565000 - 0x1581565fff 0x1581567000 - 0x1581568fff 0x1581569000 - 0x15815a7fff 0x15815a8000 - 0x15815a9fff 0x15815aa000 - 0x15815b0fff 0x15815b1000 - 0x15815b1fff 0x15815b2000 - 0x15815d7fff 0x15815d8000 - 0x15815dbfff 0x15815dc000 - 0x15815dcfff 0x15815dd000 - 0x15815defff 0x15815df000 - 0x15815dffff 0x15815e0000 - 0x15815e0fff 0x15815e1000 - 0x15815e1fff 0x15815e2000 - 0x15815e5fff 0x15815e6000 - 0x15815e6fff 0x15815e7000 - 0x15815e7fff 0x15815e8000 - 0x15815e9fff 0x15815ea000 - 0x15815eafff 0x15815eb000 - 0x15815ebfff 0x15815ec000 - 0x1581757fff 0x1581758000 - 0x158175afff 0x158175b000 - 0x158175bfff 0x158175c000 - 0x158175efff 0x158175f000 - 0x1581771fff 0x1581772000 - 0x1581772fff 0x1581773000 - 0x1581773fff 0x1581774000 - 0x1581891fff 0x1581892000 - 0x1581894fff 0x1581895000 - 0x1581897fff 0x1581898000 - 0x158189cfff 0x158189d000 - 0x15818f1fff 0x15818f2000 - 0x1581f9cfff 0x3fffe9a000 - 0x3fffebafff ;; 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 0x2d071000 - 0x2d091fff 0x80000000 - 0x800bffff 0x1584b8a000 - 0x1584ba4fff 0x1584ba5000 - 0x1584ba5fff 0x1584ba6000 - 0x1584ba6fff 0x1584ba7000 - 0x1584ba8fff 0x1584ba9000 - 0x1584baafff 0x1584bab000 - 0x1584bb1fff 0x1584bb2000 - 0x1584bb2fff 0x1584bb3000 - 0x1584bb3fff 0x1584bb5000 - 0x1584bb6fff 0x1584bb7000 - 0x1584bf5fff 0x1584bf6000 - 0x1584bf7fff 0x1584bf8000 - 0x1584bfefff 0x1584bff000 - 0x1584bfffff 0x1584c00000 - 0x1584c25fff 0x1584c26000 - 0x1584c29fff 0x1584c2a000 - 0x1584c2afff 0x1584c2b000 - 0x1584c2cfff 0x1584c2d000 - 0x1584c2dfff 0x1584c2e000 - 0x1584c2efff 0x1584c2f000 - 0x1584c2ffff 0x1584c30000 - 0x1584c33fff 0x1584c34000 - 0x1584c34fff 0x1584c35000 - 0x1584c35fff 0x1584c36000 - 0x1584c37fff 0x1584c38000 - 0x1584c38fff 0x1584c39000 - 0x1584c39fff 0x1584c3a000 - 0x1584da5fff 0x1584da6000 - 0x1584da8fff 0x1584da9000 - 0x1584da9fff 0x1584daa000 - 0x1584dacfff 0x1584dad000 - 0x1584dbffff 0x1584dc0000 - 0x1584dc0fff 0x1584dc1000 - 0x1584dc1fff 0x1584dc2000 - 0x1584edffff 0x1584ee0000 - 0x1584ee2fff 0x1584ee3000 - 0x1584ee5fff 0x1584ee6000 - 0x1584eeafff 0x1584eeb000 - 0x1584f3ffff 0x1584f40000 - 0x15855eafff 0x3fffb99000 - 0x3fffbb9fff ;; 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 0xa7b6000 - 0xa7d6fff 0x80000000 - 0x800bffff 0x158a2e7000 - 0x158a301fff 0x158a302000 - 0x158a302fff 0x158a303000 - 0x158a303fff 0x158a304000 - 0x158a305fff 0x158a306000 - 0x158a307fff 0x158a308000 - 0x158a30efff 0x158a30f000 - 0x158a30ffff 0x158a310000 - 0x158a310fff 0x158a312000 - 0x158a313fff 0x158a314000 - 0x158a352fff 0x158a353000 - 0x158a354fff 0x158a355000 - 0x158a35bfff 0x158a35c000 - 0x158a35cfff 0x158a35d000 - 0x158a382fff 0x158a383000 - 0x158a386fff 0x158a387000 - 0x158a387fff 0x158a388000 - 0x158a389fff 0x158a38a000 - 0x158a38afff 0x158a38b000 - 0x158a38bfff 0x158a38c000 - 0x158a38cfff 0x158a38d000 - 0x158a390fff 0x158a391000 - 0x158a391fff 0x158a392000 - 0x158a392fff 0x158a393000 - 0x158a394fff 0x158a395000 - 0x158a395fff 0x158a396000 - 0x158a396fff 0x158a397000 - 0x158a502fff 0x158a503000 - 0x158a505fff 0x158a506000 - 0x158a506fff 0x158a507000 - 0x158a509fff 0x158a50a000 - 0x158a51cfff 0x158a51d000 - 0x158a51dfff 0x158a51e000 - 0x158a51efff 0x158a51f000 - 0x158a63cfff 0x158a63d000 - 0x158a63ffff 0x158a640000 - 0x158a642fff 0x158a643000 - 0x158a647fff 0x158a648000 - 0x158a69cfff 0x158a69d000 - 0x158ad47fff 0x3fff938000 - 0x3fff958fff ;; 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 0x2b6e8000 - 0x2b708fff 0x80000000 - 0x800bffff 0x1569b8a000 - 0x1569ba4fff 0x1569ba5000 - 0x1569ba5fff 0x1569ba6000 - 0x1569ba6fff 0x1569ba7000 - 0x1569ba8fff 0x1569ba9000 - 0x1569baafff 0x1569bab000 - 0x1569bb1fff 0x1569bb2000 - 0x1569bb2fff 0x1569bb3000 - 0x1569bb3fff 0x1569bb5000 - 0x1569bb6fff 0x1569bb7000 - 0x1569bf5fff 0x1569bf6000 - 0x1569bf7fff 0x1569bf8000 - 0x1569bfefff 0x1569bff000 - 0x1569bfffff 0x1569c00000 - 0x1569c25fff 0x1569c26000 - 0x1569c29fff 0x1569c2a000 - 0x1569c2afff 0x1569c2b000 - 0x1569c2cfff 0x1569c2d000 - 0x1569c2dfff 0x1569c2e000 - 0x1569c2efff 0x1569c2f000 - 0x1569c2ffff 0x1569c30000 - 0x1569c33fff 0x1569c34000 - 0x1569c34fff 0x1569c35000 - 0x1569c35fff 0x1569c36000 - 0x1569c37fff 0x1569c38000 - 0x1569c38fff 0x1569c39000 - 0x1569c39fff 0x1569c3a000 - 0x1569da5fff 0x1569da6000 - 0x1569da8fff 0x1569da9000 - 0x1569da9fff 0x1569daa000 - 0x1569dacfff 0x1569dad000 - 0x1569dbffff 0x1569dc0000 - 0x1569dc0fff 0x1569dc1000 - 0x1569dc1fff 0x1569dc2000 - 0x1569edffff 0x1569ee0000 - 0x1569ee2fff 0x1569ee3000 - 0x1569ee5fff 0x1569ee6000 - 0x1569eeafff 0x1569eeb000 - 0x1569f3ffff 0x1569f40000 - 0x156a5eafff 0x3fff7e1000 - 0x3fff801fff ;; 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 0x3a490000 - 0x3a4b0fff 0x80000000 - 0x800bffff 0x1570adb000 - 0x1570af5fff 0x1570af6000 - 0x1570af6fff 0x1570af7000 - 0x1570af7fff 0x1570af8000 - 0x1570af9fff 0x1570afa000 - 0x1570afbfff 0x1570afc000 - 0x1570b02fff 0x1570b03000 - 0x1570b03fff 0x1570b04000 - 0x1570b04fff 0x1570b06000 - 0x1570b07fff 0x1570b08000 - 0x1570b46fff 0x1570b47000 - 0x1570b48fff 0x1570b49000 - 0x1570b4ffff 0x1570b50000 - 0x1570b50fff 0x1570b51000 - 0x1570b76fff 0x1570b77000 - 0x1570b7afff 0x1570b7b000 - 0x1570b7bfff 0x1570b7c000 - 0x1570b7dfff 0x1570b7e000 - 0x1570b7efff 0x1570b7f000 - 0x1570b7ffff 0x1570b80000 - 0x1570b80fff 0x1570b81000 - 0x1570b84fff 0x1570b85000 - 0x1570b85fff 0x1570b86000 - 0x1570b86fff 0x1570b87000 - 0x1570b88fff 0x1570b89000 - 0x1570b89fff 0x1570b8a000 - 0x1570b8afff 0x1570b8b000 - 0x1570cf6fff 0x1570cf7000 - 0x1570cf9fff 0x1570cfa000 - 0x1570cfafff 0x1570cfb000 - 0x1570cfdfff 0x1570cfe000 - 0x1570d10fff 0x1570d11000 - 0x1570d11fff 0x1570d12000 - 0x1570d12fff 0x1570d13000 - 0x1570e30fff 0x1570e31000 - 0x1570e33fff 0x1570e34000 - 0x1570e36fff 0x1570e37000 - 0x1570e3bfff 0x1570e3c000 - 0x1570e90fff 0x1570e91000 - 0x157153bfff 0x3ffff4d000 - 0x3ffff6dfff ;; 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 0x9537000 - 0x9557fff 0x80000000 - 0x800bffff 0x156ffbb000 - 0x156ffd5fff 0x156ffd6000 - 0x156ffd6fff 0x156ffd7000 - 0x156ffd7fff 0x156ffd8000 - 0x156ffd9fff 0x156ffda000 - 0x156ffdbfff 0x156ffdc000 - 0x156ffe2fff 0x156ffe3000 - 0x156ffe3fff 0x156ffe4000 - 0x156ffe4fff 0x156ffe6000 - 0x156ffe7fff 0x156ffe8000 - 0x1570026fff 0x1570027000 - 0x1570028fff 0x1570029000 - 0x157002ffff 0x1570030000 - 0x1570030fff 0x1570031000 - 0x1570056fff 0x1570057000 - 0x157005afff 0x157005b000 - 0x157005bfff 0x157005c000 - 0x157005dfff 0x157005e000 - 0x157005efff 0x157005f000 - 0x157005ffff 0x1570060000 - 0x1570060fff 0x1570061000 - 0x1570064fff 0x1570065000 - 0x1570065fff 0x1570066000 - 0x1570066fff 0x1570067000 - 0x1570068fff 0x1570069000 - 0x1570069fff 0x157006a000 - 0x157006afff 0x157006b000 - 0x15701d6fff 0x15701d7000 - 0x15701d9fff 0x15701da000 - 0x15701dafff 0x15701db000 - 0x15701ddfff 0x15701de000 - 0x15701f0fff 0x15701f1000 - 0x15701f1fff 0x15701f2000 - 0x15701f2fff 0x15701f3000 - 0x1570310fff 0x1570311000 - 0x1570313fff 0x1570314000 - 0x1570316fff 0x1570317000 - 0x157031bfff 0x157031c000 - 0x1570370fff 0x1570371000 - 0x1570a1bfff 0x3fff8e2000 - 0x3fff902fff ;; 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 0x7679000 - 0x7699fff 0x80000000 - 0x800bffff 0x156f4ed000 - 0x156f507fff 0x156f508000 - 0x156f508fff 0x156f509000 - 0x156f509fff 0x156f50a000 - 0x156f50bfff 0x156f50c000 - 0x156f50dfff 0x156f50e000 - 0x156f514fff 0x156f515000 - 0x156f515fff 0x156f516000 - 0x156f516fff 0x156f518000 - 0x156f519fff 0x156f51a000 - 0x156f558fff 0x156f559000 - 0x156f55afff 0x156f55b000 - 0x156f561fff 0x156f562000 - 0x156f562fff 0x156f563000 - 0x156f588fff 0x156f589000 - 0x156f58cfff 0x156f58d000 - 0x156f58dfff 0x156f58e000 - 0x156f58ffff 0x156f590000 - 0x156f590fff 0x156f591000 - 0x156f591fff 0x156f592000 - 0x156f592fff 0x156f593000 - 0x156f596fff 0x156f597000 - 0x156f597fff 0x156f598000 - 0x156f598fff 0x156f599000 - 0x156f59afff 0x156f59b000 - 0x156f59bfff 0x156f59c000 - 0x156f59cfff 0x156f59d000 - 0x156f708fff 0x156f709000 - 0x156f70bfff 0x156f70c000 - 0x156f70cfff 0x156f70d000 - 0x156f70ffff 0x156f710000 - 0x156f722fff 0x156f723000 - 0x156f723fff 0x156f724000 - 0x156f724fff 0x156f725000 - 0x156f842fff 0x156f843000 - 0x156f845fff 0x156f846000 - 0x156f848fff 0x156f849000 - 0x156f84dfff 0x156f84e000 - 0x156f8a2fff 0x156f8a3000 - 0x156ff4dfff 0x3fffc24000 - 0x3fffc44fff ;; 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 0x39445000 - 0x39465fff 0x80000000 - 0x800bffff 0x157e4e1000 - 0x157e4fbfff 0x157e4fc000 - 0x157e4fcfff 0x157e4fd000 - 0x157e4fdfff 0x157e4fe000 - 0x157e4fffff 0x157e500000 - 0x157e501fff 0x157e502000 - 0x157e508fff 0x157e509000 - 0x157e509fff 0x157e50a000 - 0x157e50afff 0x157e50c000 - 0x157e50dfff 0x157e50e000 - 0x157e54cfff 0x157e54d000 - 0x157e54efff 0x157e54f000 - 0x157e555fff 0x157e556000 - 0x157e556fff 0x157e557000 - 0x157e57cfff 0x157e57d000 - 0x157e580fff 0x157e581000 - 0x157e581fff 0x157e582000 - 0x157e583fff 0x157e584000 - 0x157e584fff 0x157e585000 - 0x157e585fff 0x157e586000 - 0x157e586fff 0x157e587000 - 0x157e58afff 0x157e58b000 - 0x157e58bfff 0x157e58c000 - 0x157e58cfff 0x157e58d000 - 0x157e58efff 0x157e58f000 - 0x157e58ffff 0x157e590000 - 0x157e590fff 0x157e591000 - 0x157e6fcfff 0x157e6fd000 - 0x157e6fffff 0x157e700000 - 0x157e700fff 0x157e701000 - 0x157e703fff 0x157e704000 - 0x157e716fff 0x157e717000 - 0x157e717fff 0x157e718000 - 0x157e718fff 0x157e719000 - 0x157e836fff 0x157e837000 - 0x157e839fff 0x157e83a000 - 0x157e83cfff 0x157e83d000 - 0x157e841fff 0x157e842000 - 0x157e896fff 0x157e897000 - 0x157ef41fff 0x3fffad0000 - 0x3fffaf0fff ;; 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 0x11411000 - 0x11431fff 0x80000000 - 0x800bffff 0x15862c4000 - 0x15862defff 0x15862df000 - 0x15862dffff 0x15862e0000 - 0x15862e0fff 0x15862e1000 - 0x15862e2fff 0x15862e3000 - 0x15862e4fff 0x15862e5000 - 0x15862ebfff 0x15862ec000 - 0x15862ecfff 0x15862ed000 - 0x15862edfff 0x15862ef000 - 0x15862f0fff 0x15862f1000 - 0x158632ffff 0x1586330000 - 0x1586331fff 0x1586332000 - 0x1586338fff 0x1586339000 - 0x1586339fff 0x158633a000 - 0x158635ffff 0x1586360000 - 0x1586363fff 0x1586364000 - 0x1586364fff 0x1586365000 - 0x1586366fff 0x1586367000 - 0x1586367fff 0x1586368000 - 0x1586368fff 0x1586369000 - 0x1586369fff 0x158636a000 - 0x158636dfff 0x158636e000 - 0x158636efff 0x158636f000 - 0x158636ffff 0x1586370000 - 0x1586371fff 0x1586372000 - 0x1586372fff 0x1586373000 - 0x1586373fff 0x1586374000 - 0x15864dffff 0x15864e0000 - 0x15864e2fff 0x15864e3000 - 0x15864e3fff 0x15864e4000 - 0x15864e6fff 0x15864e7000 - 0x15864f9fff 0x15864fa000 - 0x15864fafff 0x15864fb000 - 0x15864fbfff 0x15864fc000 - 0x1586619fff 0x158661a000 - 0x158661cfff 0x158661d000 - 0x158661ffff 0x1586620000 - 0x1586624fff 0x1586625000 - 0x1586679fff 0x158667a000 - 0x1586d24fff 0x3fff92c000 - 0x3fff94cfff ;; 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 0x435000 - 0x455fff 0x80000000 - 0x800bffff 0x156bfed000 - 0x156c007fff 0x156c008000 - 0x156c008fff 0x156c009000 - 0x156c009fff 0x156c00a000 - 0x156c00bfff 0x156c00c000 - 0x156c00dfff 0x156c00e000 - 0x156c014fff 0x156c015000 - 0x156c015fff 0x156c016000 - 0x156c016fff 0x156c018000 - 0x156c019fff 0x156c01a000 - 0x156c058fff 0x156c059000 - 0x156c05afff 0x156c05b000 - 0x156c061fff 0x156c062000 - 0x156c062fff 0x156c063000 - 0x156c088fff 0x156c089000 - 0x156c08cfff 0x156c08d000 - 0x156c08dfff 0x156c08e000 - 0x156c08ffff 0x156c090000 - 0x156c090fff 0x156c091000 - 0x156c091fff 0x156c092000 - 0x156c092fff 0x156c093000 - 0x156c096fff 0x156c097000 - 0x156c097fff 0x156c098000 - 0x156c098fff 0x156c099000 - 0x156c09afff 0x156c09b000 - 0x156c09bfff 0x156c09c000 - 0x156c09cfff 0x156c09d000 - 0x156c208fff 0x156c209000 - 0x156c20bfff 0x156c20c000 - 0x156c20cfff 0x156c20d000 - 0x156c20ffff 0x156c210000 - 0x156c222fff 0x156c223000 - 0x156c223fff 0x156c224000 - 0x156c224fff 0x156c225000 - 0x156c342fff 0x156c343000 - 0x156c345fff 0x156c346000 - 0x156c348fff 0x156c349000 - 0x156c34dfff 0x156c34e000 - 0x156c3a2fff 0x156c3a3000 - 0x156ca4dfff 0x3fffbae000 - 0x3fffbcefff ;; 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 0x35a1e000 - 0x35a3efff 0x80000000 - 0x800bffff 0x157c642000 - 0x157c65cfff 0x157c65d000 - 0x157c65dfff 0x157c65e000 - 0x157c65efff 0x157c65f000 - 0x157c660fff 0x157c661000 - 0x157c662fff 0x157c663000 - 0x157c669fff 0x157c66a000 - 0x157c66afff 0x157c66b000 - 0x157c66bfff 0x157c66d000 - 0x157c66efff 0x157c66f000 - 0x157c6adfff 0x157c6ae000 - 0x157c6affff 0x157c6b0000 - 0x157c6b6fff 0x157c6b7000 - 0x157c6b7fff 0x157c6b8000 - 0x157c6ddfff 0x157c6de000 - 0x157c6e1fff 0x157c6e2000 - 0x157c6e2fff 0x157c6e3000 - 0x157c6e4fff 0x157c6e5000 - 0x157c6e5fff 0x157c6e6000 - 0x157c6e6fff 0x157c6e7000 - 0x157c6e7fff 0x157c6e8000 - 0x157c6ebfff 0x157c6ec000 - 0x157c6ecfff 0x157c6ed000 - 0x157c6edfff 0x157c6ee000 - 0x157c6effff 0x157c6f0000 - 0x157c6f0fff 0x157c6f1000 - 0x157c6f1fff 0x157c6f2000 - 0x157c85dfff 0x157c85e000 - 0x157c860fff 0x157c861000 - 0x157c861fff 0x157c862000 - 0x157c864fff 0x157c865000 - 0x157c877fff 0x157c878000 - 0x157c878fff 0x157c879000 - 0x157c879fff 0x157c87a000 - 0x157c997fff 0x157c998000 - 0x157c99afff 0x157c99b000 - 0x157c99dfff 0x157c99e000 - 0x157c9a2fff 0x157c9a3000 - 0x157c9f7fff 0x157c9f8000 - 0x157d0a2fff 0x3fffe10000 - 0x3fffe30fff ;; 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 0x1e2ca000 - 0x1e2eafff 0x80000000 - 0x800bffff 0x156366d000 - 0x1563687fff 0x1563688000 - 0x1563688fff 0x1563689000 - 0x1563689fff 0x156368a000 - 0x156368bfff 0x156368c000 - 0x156368dfff 0x156368e000 - 0x1563694fff 0x1563695000 - 0x1563695fff 0x1563696000 - 0x1563696fff 0x1563698000 - 0x1563699fff 0x156369a000 - 0x15636d8fff 0x15636d9000 - 0x15636dafff 0x15636db000 - 0x15636e1fff 0x15636e2000 - 0x15636e2fff 0x15636e3000 - 0x1563708fff 0x1563709000 - 0x156370cfff 0x156370d000 - 0x156370dfff 0x156370e000 - 0x156370ffff 0x1563710000 - 0x1563710fff 0x1563711000 - 0x1563711fff 0x1563712000 - 0x1563712fff 0x1563713000 - 0x1563716fff 0x1563717000 - 0x1563717fff 0x1563718000 - 0x1563718fff 0x1563719000 - 0x156371afff 0x156371b000 - 0x156371bfff 0x156371c000 - 0x156371cfff 0x156371d000 - 0x1563888fff 0x1563889000 - 0x156388bfff 0x156388c000 - 0x156388cfff 0x156388d000 - 0x156388ffff 0x1563890000 - 0x15638a2fff 0x15638a3000 - 0x15638a3fff 0x15638a4000 - 0x15638a4fff 0x15638a5000 - 0x15639c2fff 0x15639c3000 - 0x15639c5fff 0x15639c6000 - 0x15639c8fff 0x15639c9000 - 0x15639cdfff 0x15639ce000 - 0x1563a22fff 0x1563a23000 - 0x15640cdfff 0x3fffa08000 - 0x3fffa28fff ;; 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 0x349a1000 - 0x349c1fff 0x80000000 - 0x800bffff 0x157dc1e000 - 0x157dc38fff 0x157dc39000 - 0x157dc39fff 0x157dc3a000 - 0x157dc3afff 0x157dc3b000 - 0x157dc3cfff 0x157dc3d000 - 0x157dc3efff 0x157dc3f000 - 0x157dc45fff 0x157dc46000 - 0x157dc46fff 0x157dc47000 - 0x157dc47fff 0x157dc49000 - 0x157dc4afff 0x157dc4b000 - 0x157dc89fff 0x157dc8a000 - 0x157dc8bfff 0x157dc8c000 - 0x157dc92fff 0x157dc93000 - 0x157dc93fff 0x157dc94000 - 0x157dcb9fff 0x157dcba000 - 0x157dcbdfff 0x157dcbe000 - 0x157dcbefff 0x157dcbf000 - 0x157dcc0fff 0x157dcc1000 - 0x157dcc1fff 0x157dcc2000 - 0x157dcc2fff 0x157dcc3000 - 0x157dcc3fff 0x157dcc4000 - 0x157dcc7fff 0x157dcc8000 - 0x157dcc8fff 0x157dcc9000 - 0x157dcc9fff 0x157dcca000 - 0x157dccbfff 0x157dccc000 - 0x157dcccfff 0x157dccd000 - 0x157dccdfff 0x157dcce000 - 0x157de39fff 0x157de3a000 - 0x157de3cfff 0x157de3d000 - 0x157de3dfff 0x157de3e000 - 0x157de40fff 0x157de41000 - 0x157de53fff 0x157de54000 - 0x157de54fff 0x157de55000 - 0x157de55fff 0x157de56000 - 0x157df73fff 0x157df74000 - 0x157df76fff 0x157df77000 - 0x157df79fff 0x157df7a000 - 0x157df7efff 0x157df7f000 - 0x157dfd3fff 0x157dfd4000 - 0x157e67efff 0x3fff815000 - 0x3fff835fff ;; 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 0x2f11a000 - 0x2f13afff 0x80000000 - 0x800bffff 0x1590186000 - 0x15901a0fff 0x15901a1000 - 0x15901a1fff 0x15901a2000 - 0x15901a2fff 0x15901a3000 - 0x15901a4fff 0x15901a5000 - 0x15901a6fff 0x15901a7000 - 0x15901adfff 0x15901ae000 - 0x15901aefff 0x15901af000 - 0x15901affff 0x15901b1000 - 0x15901b2fff 0x15901b3000 - 0x15901f1fff 0x15901f2000 - 0x15901f3fff 0x15901f4000 - 0x15901fafff 0x15901fb000 - 0x15901fbfff 0x15901fc000 - 0x1590221fff 0x1590222000 - 0x1590225fff 0x1590226000 - 0x1590226fff 0x1590227000 - 0x1590228fff 0x1590229000 - 0x1590229fff 0x159022a000 - 0x159022afff 0x159022b000 - 0x159022bfff 0x159022c000 - 0x159022ffff 0x1590230000 - 0x1590230fff 0x1590231000 - 0x1590231fff 0x1590232000 - 0x1590233fff 0x1590234000 - 0x1590234fff 0x1590235000 - 0x1590235fff 0x1590236000 - 0x15903a1fff 0x15903a2000 - 0x15903a4fff 0x15903a5000 - 0x15903a5fff 0x15903a6000 - 0x15903a8fff 0x15903a9000 - 0x15903bbfff 0x15903bc000 - 0x15903bcfff 0x15903bd000 - 0x15903bdfff 0x15903be000 - 0x15904dbfff 0x15904dc000 - 0x15904defff 0x15904df000 - 0x15904e1fff 0x15904e2000 - 0x15904e6fff 0x15904e7000 - 0x159053bfff 0x159053c000 - 0x1590be6fff 0x3ffff48000 - 0x3ffff68fff ;; 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 0x1ee1f000 - 0x1ee3ffff 0x80000000 - 0x800bffff 0x1578e4b000 - 0x1578e65fff 0x1578e66000 - 0x1578e66fff 0x1578e67000 - 0x1578e67fff 0x1578e68000 - 0x1578e69fff 0x1578e6a000 - 0x1578e6bfff 0x1578e6c000 - 0x1578e72fff 0x1578e73000 - 0x1578e73fff 0x1578e74000 - 0x1578e74fff 0x1578e76000 - 0x1578e77fff 0x1578e78000 - 0x1578eb6fff 0x1578eb7000 - 0x1578eb8fff 0x1578eb9000 - 0x1578ebffff 0x1578ec0000 - 0x1578ec0fff 0x1578ec1000 - 0x1578ee6fff 0x1578ee7000 - 0x1578eeafff 0x1578eeb000 - 0x1578eebfff 0x1578eec000 - 0x1578eedfff 0x1578eee000 - 0x1578eeefff 0x1578eef000 - 0x1578eeffff 0x1578ef0000 - 0x1578ef0fff 0x1578ef1000 - 0x1578ef4fff 0x1578ef5000 - 0x1578ef5fff 0x1578ef6000 - 0x1578ef6fff 0x1578ef7000 - 0x1578ef8fff 0x1578ef9000 - 0x1578ef9fff 0x1578efa000 - 0x1578efafff 0x1578efb000 - 0x1579066fff 0x1579067000 - 0x1579069fff 0x157906a000 - 0x157906afff 0x157906b000 - 0x157906dfff 0x157906e000 - 0x1579080fff 0x1579081000 - 0x1579081fff 0x1579082000 - 0x1579082fff 0x1579083000 - 0x15791a0fff 0x15791a1000 - 0x15791a3fff 0x15791a4000 - 0x15791a6fff 0x15791a7000 - 0x15791abfff 0x15791ac000 - 0x1579200fff 0x1579201000 - 0x15798abfff 0x3fffa5a000 - 0x3fffa7afff ;; 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 0x207f5000 - 0x20815fff 0x80000000 - 0x800bffff 0x157725e000 - 0x1577278fff 0x1577279000 - 0x1577279fff 0x157727a000 - 0x157727afff 0x157727b000 - 0x157727cfff 0x157727d000 - 0x157727efff 0x157727f000 - 0x1577285fff 0x1577286000 - 0x1577286fff 0x1577287000 - 0x1577287fff 0x1577289000 - 0x157728afff 0x157728b000 - 0x15772c9fff 0x15772ca000 - 0x15772cbfff 0x15772cc000 - 0x15772d2fff 0x15772d3000 - 0x15772d3fff 0x15772d4000 - 0x15772f9fff 0x15772fa000 - 0x15772fdfff 0x15772fe000 - 0x15772fefff 0x15772ff000 - 0x1577300fff 0x1577301000 - 0x1577301fff 0x1577302000 - 0x1577302fff 0x1577303000 - 0x1577303fff 0x1577304000 - 0x1577307fff 0x1577308000 - 0x1577308fff 0x1577309000 - 0x1577309fff 0x157730a000 - 0x157730bfff 0x157730c000 - 0x157730cfff 0x157730d000 - 0x157730dfff 0x157730e000 - 0x1577479fff 0x157747a000 - 0x157747cfff 0x157747d000 - 0x157747dfff 0x157747e000 - 0x1577480fff 0x1577481000 - 0x1577493fff 0x1577494000 - 0x1577494fff 0x1577495000 - 0x1577495fff 0x1577496000 - 0x15775b3fff 0x15775b4000 - 0x15775b6fff 0x15775b7000 - 0x15775b9fff 0x15775ba000 - 0x15775befff 0x15775bf000 - 0x1577613fff 0x1577614000 - 0x1577cbefff 0x3fffe33000 - 0x3fffe53fff ;; 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 0x327f4000 - 0x32814fff 0x80000000 - 0x800bffff 0x158bfc9000 - 0x158bfe3fff 0x158bfe4000 - 0x158bfe4fff 0x158bfe5000 - 0x158bfe5fff 0x158bfe6000 - 0x158bfe7fff 0x158bfe8000 - 0x158bfe9fff 0x158bfea000 - 0x158bff0fff 0x158bff1000 - 0x158bff1fff 0x158bff2000 - 0x158bff2fff 0x158bff4000 - 0x158bff5fff 0x158bff6000 - 0x158c034fff 0x158c035000 - 0x158c036fff 0x158c037000 - 0x158c03dfff 0x158c03e000 - 0x158c03efff 0x158c03f000 - 0x158c064fff 0x158c065000 - 0x158c068fff 0x158c069000 - 0x158c069fff 0x158c06a000 - 0x158c06bfff 0x158c06c000 - 0x158c06cfff 0x158c06d000 - 0x158c06dfff 0x158c06e000 - 0x158c06efff 0x158c06f000 - 0x158c072fff 0x158c073000 - 0x158c073fff 0x158c074000 - 0x158c074fff 0x158c075000 - 0x158c076fff 0x158c077000 - 0x158c077fff 0x158c078000 - 0x158c078fff 0x158c079000 - 0x158c1e4fff 0x158c1e5000 - 0x158c1e7fff 0x158c1e8000 - 0x158c1e8fff 0x158c1e9000 - 0x158c1ebfff 0x158c1ec000 - 0x158c1fefff 0x158c1ff000 - 0x158c1fffff 0x158c200000 - 0x158c200fff 0x158c201000 - 0x158c31efff 0x158c31f000 - 0x158c321fff 0x158c322000 - 0x158c324fff 0x158c325000 - 0x158c329fff 0x158c32a000 - 0x158c37efff 0x158c37f000 - 0x158ca29fff 0x3fff924000 - 0x3fff944fff ;; 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 0x39b61000 - 0x39b81fff 0x80000000 - 0x800bffff 0x158bbf9000 - 0x158bc13fff 0x158bc14000 - 0x158bc14fff 0x158bc15000 - 0x158bc15fff 0x158bc16000 - 0x158bc17fff 0x158bc18000 - 0x158bc19fff 0x158bc1a000 - 0x158bc20fff 0x158bc21000 - 0x158bc21fff 0x158bc22000 - 0x158bc22fff 0x158bc24000 - 0x158bc25fff 0x158bc26000 - 0x158bc64fff 0x158bc65000 - 0x158bc66fff 0x158bc67000 - 0x158bc6dfff 0x158bc6e000 - 0x158bc6efff 0x158bc6f000 - 0x158bc94fff 0x158bc95000 - 0x158bc98fff 0x158bc99000 - 0x158bc99fff 0x158bc9a000 - 0x158bc9bfff 0x158bc9c000 - 0x158bc9cfff 0x158bc9d000 - 0x158bc9dfff 0x158bc9e000 - 0x158bc9efff 0x158bc9f000 - 0x158bca2fff 0x158bca3000 - 0x158bca3fff 0x158bca4000 - 0x158bca4fff 0x158bca5000 - 0x158bca6fff 0x158bca7000 - 0x158bca7fff 0x158bca8000 - 0x158bca8fff 0x158bca9000 - 0x158be14fff 0x158be15000 - 0x158be17fff 0x158be18000 - 0x158be18fff 0x158be19000 - 0x158be1bfff 0x158be1c000 - 0x158be2efff 0x158be2f000 - 0x158be2ffff 0x158be30000 - 0x158be30fff 0x158be31000 - 0x158bf4efff 0x158bf4f000 - 0x158bf51fff 0x158bf52000 - 0x158bf54fff 0x158bf55000 - 0x158bf59fff 0x158bf5a000 - 0x158bfaefff 0x158bfaf000 - 0x158c659fff 0x3fff80c000 - 0x3fff82cfff ;; 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 0x10002000 - 0x10022fff 0x80000000 - 0x800bffff 0x1595450000 - 0x159546afff 0x159546b000 - 0x159546bfff 0x159546c000 - 0x159546cfff 0x159546d000 - 0x159546efff 0x159546f000 - 0x1595470fff 0x1595471000 - 0x1595477fff 0x1595478000 - 0x1595478fff 0x1595479000 - 0x1595479fff 0x159547b000 - 0x159547cfff 0x159547d000 - 0x15954bbfff 0x15954bc000 - 0x15954bdfff 0x15954be000 - 0x15954c4fff 0x15954c5000 - 0x15954c5fff 0x15954c6000 - 0x15954ebfff 0x15954ec000 - 0x15954effff 0x15954f0000 - 0x15954f0fff 0x15954f1000 - 0x15954f2fff 0x15954f3000 - 0x15954f3fff 0x15954f4000 - 0x15954f4fff 0x15954f5000 - 0x15954f5fff 0x15954f6000 - 0x15954f9fff 0x15954fa000 - 0x15954fafff 0x15954fb000 - 0x15954fbfff 0x15954fc000 - 0x15954fdfff 0x15954fe000 - 0x15954fefff 0x15954ff000 - 0x15954fffff 0x1595500000 - 0x159566bfff 0x159566c000 - 0x159566efff 0x159566f000 - 0x159566ffff 0x1595670000 - 0x1595672fff 0x1595673000 - 0x1595685fff 0x1595686000 - 0x1595686fff 0x1595687000 - 0x1595687fff 0x1595688000 - 0x15957a5fff 0x15957a6000 - 0x15957a8fff 0x15957a9000 - 0x15957abfff 0x15957ac000 - 0x15957b0fff 0x15957b1000 - 0x1595805fff 0x1595806000 - 0x1595eb0fff 0x3fffd22000 - 0x3fffd42fff ;; 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 0x10c8e000 - 0x10caefff 0x80000000 - 0x800bffff 0x156a703000 - 0x156a71dfff 0x156a71e000 - 0x156a71efff 0x156a71f000 - 0x156a71ffff 0x156a720000 - 0x156a721fff 0x156a722000 - 0x156a723fff 0x156a724000 - 0x156a72afff 0x156a72b000 - 0x156a72bfff 0x156a72c000 - 0x156a72cfff 0x156a72e000 - 0x156a72ffff 0x156a730000 - 0x156a76efff 0x156a76f000 - 0x156a770fff 0x156a771000 - 0x156a777fff 0x156a778000 - 0x156a778fff 0x156a779000 - 0x156a79efff 0x156a79f000 - 0x156a7a2fff 0x156a7a3000 - 0x156a7a3fff 0x156a7a4000 - 0x156a7a5fff 0x156a7a6000 - 0x156a7a6fff 0x156a7a7000 - 0x156a7a7fff 0x156a7a8000 - 0x156a7a8fff 0x156a7a9000 - 0x156a7acfff 0x156a7ad000 - 0x156a7adfff 0x156a7ae000 - 0x156a7aefff 0x156a7af000 - 0x156a7b0fff 0x156a7b1000 - 0x156a7b1fff 0x156a7b2000 - 0x156a7b2fff 0x156a7b3000 - 0x156a91efff 0x156a91f000 - 0x156a921fff 0x156a922000 - 0x156a922fff 0x156a923000 - 0x156a925fff 0x156a926000 - 0x156a938fff 0x156a939000 - 0x156a939fff 0x156a93a000 - 0x156a93afff 0x156a93b000 - 0x156aa58fff 0x156aa59000 - 0x156aa5bfff 0x156aa5c000 - 0x156aa5efff 0x156aa5f000 - 0x156aa63fff 0x156aa64000 - 0x156aab8fff 0x156aab9000 - 0x156b163fff 0x3fff8a4000 - 0x3fff8c4fff ;; 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 0x3575e000 - 0x3577efff 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 0x3fffaaa000 - 0x3fffacafff ;; 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 0x3088000 - 0x30a8fff 0x80000000 - 0x800bffff 0x156700c000 - 0x1567026fff 0x1567027000 - 0x1567027fff 0x1567028000 - 0x1567028fff 0x1567029000 - 0x156702afff 0x156702b000 - 0x156702cfff 0x156702d000 - 0x1567033fff 0x1567034000 - 0x1567034fff 0x1567035000 - 0x1567035fff 0x1567037000 - 0x1567038fff 0x1567039000 - 0x1567077fff 0x1567078000 - 0x1567079fff 0x156707a000 - 0x1567080fff 0x1567081000 - 0x1567081fff 0x1567082000 - 0x15670a7fff 0x15670a8000 - 0x15670abfff 0x15670ac000 - 0x15670acfff 0x15670ad000 - 0x15670aefff 0x15670af000 - 0x15670affff 0x15670b0000 - 0x15670b0fff 0x15670b1000 - 0x15670b1fff 0x15670b2000 - 0x15670b5fff 0x15670b6000 - 0x15670b6fff 0x15670b7000 - 0x15670b7fff 0x15670b8000 - 0x15670b9fff 0x15670ba000 - 0x15670bafff 0x15670bb000 - 0x15670bbfff 0x15670bc000 - 0x1567227fff 0x1567228000 - 0x156722afff 0x156722b000 - 0x156722bfff 0x156722c000 - 0x156722efff 0x156722f000 - 0x1567241fff 0x1567242000 - 0x1567242fff 0x1567243000 - 0x1567243fff 0x1567244000 - 0x1567361fff 0x1567362000 - 0x1567364fff 0x1567365000 - 0x1567367fff 0x1567368000 - 0x156736cfff 0x156736d000 - 0x15673c1fff 0x15673c2000 - 0x1567a6cfff 0x3fff92b000 - 0x3fff94bfff ;; 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 0xaf77000 - 0xaf97fff 0x80000000 - 0x800bffff 0x1561655000 - 0x156166ffff 0x1561670000 - 0x1561670fff 0x1561671000 - 0x1561671fff 0x1561672000 - 0x1561673fff 0x1561674000 - 0x1561675fff 0x1561676000 - 0x156167cfff 0x156167d000 - 0x156167dfff 0x156167e000 - 0x156167efff 0x1561680000 - 0x1561681fff 0x1561682000 - 0x15616c0fff 0x15616c1000 - 0x15616c2fff 0x15616c3000 - 0x15616c9fff 0x15616ca000 - 0x15616cafff 0x15616cb000 - 0x15616f0fff 0x15616f1000 - 0x15616f4fff 0x15616f5000 - 0x15616f5fff 0x15616f6000 - 0x15616f7fff 0x15616f8000 - 0x15616f8fff 0x15616f9000 - 0x15616f9fff 0x15616fa000 - 0x15616fafff 0x15616fb000 - 0x15616fefff 0x15616ff000 - 0x15616fffff 0x1561700000 - 0x1561700fff 0x1561701000 - 0x1561702fff 0x1561703000 - 0x1561703fff 0x1561704000 - 0x1561704fff 0x1561705000 - 0x1561870fff 0x1561871000 - 0x1561873fff 0x1561874000 - 0x1561874fff 0x1561875000 - 0x1561877fff 0x1561878000 - 0x156188afff 0x156188b000 - 0x156188bfff 0x156188c000 - 0x156188cfff 0x156188d000 - 0x15619aafff 0x15619ab000 - 0x15619adfff 0x15619ae000 - 0x15619b0fff 0x15619b1000 - 0x15619b5fff 0x15619b6000 - 0x1561a0afff 0x1561a0b000 - 0x15620b5fff 0x3fffd36000 - 0x3fffd56fff ;; 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 0x167a5000 - 0x167c5fff 0x80000000 - 0x800bffff 0x1585381000 - 0x158539bfff 0x158539c000 - 0x158539cfff 0x158539d000 - 0x158539dfff 0x158539e000 - 0x158539ffff 0x15853a0000 - 0x15853a1fff 0x15853a2000 - 0x15853a8fff 0x15853a9000 - 0x15853a9fff 0x15853aa000 - 0x15853aafff 0x15853ac000 - 0x15853adfff 0x15853ae000 - 0x15853ecfff 0x15853ed000 - 0x15853eefff 0x15853ef000 - 0x15853f5fff 0x15853f6000 - 0x15853f6fff 0x15853f7000 - 0x158541cfff 0x158541d000 - 0x1585420fff 0x1585421000 - 0x1585421fff 0x1585422000 - 0x1585423fff 0x1585424000 - 0x1585424fff 0x1585425000 - 0x1585425fff 0x1585426000 - 0x1585426fff 0x1585427000 - 0x158542afff 0x158542b000 - 0x158542bfff 0x158542c000 - 0x158542cfff 0x158542d000 - 0x158542efff 0x158542f000 - 0x158542ffff 0x1585430000 - 0x1585430fff 0x1585431000 - 0x158559cfff 0x158559d000 - 0x158559ffff 0x15855a0000 - 0x15855a0fff 0x15855a1000 - 0x15855a3fff 0x15855a4000 - 0x15855b6fff 0x15855b7000 - 0x15855b7fff 0x15855b8000 - 0x15855b8fff 0x15855b9000 - 0x15856d6fff 0x15856d7000 - 0x15856d9fff 0x15856da000 - 0x15856dcfff 0x15856dd000 - 0x15856e1fff 0x15856e2000 - 0x1585736fff 0x1585737000 - 0x1585de1fff 0x3fffcf6000 - 0x3fffd16fff ;; 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 0x294de000 - 0x294fefff 0x80000000 - 0x800bffff 0x15675d0000 - 0x15675eafff 0x15675eb000 - 0x15675ebfff 0x15675ec000 - 0x15675ecfff 0x15675ed000 - 0x15675eefff 0x15675ef000 - 0x15675f0fff 0x15675f1000 - 0x15675f7fff 0x15675f8000 - 0x15675f8fff 0x15675f9000 - 0x15675f9fff 0x15675fb000 - 0x15675fcfff 0x15675fd000 - 0x156763bfff 0x156763c000 - 0x156763dfff 0x156763e000 - 0x1567644fff 0x1567645000 - 0x1567645fff 0x1567646000 - 0x156766bfff 0x156766c000 - 0x156766ffff 0x1567670000 - 0x1567670fff 0x1567671000 - 0x1567672fff 0x1567673000 - 0x1567673fff 0x1567674000 - 0x1567674fff 0x1567675000 - 0x1567675fff 0x1567676000 - 0x1567679fff 0x156767a000 - 0x156767afff 0x156767b000 - 0x156767bfff 0x156767c000 - 0x156767dfff 0x156767e000 - 0x156767efff 0x156767f000 - 0x156767ffff 0x1567680000 - 0x15677ebfff 0x15677ec000 - 0x15677eefff 0x15677ef000 - 0x15677effff 0x15677f0000 - 0x15677f2fff 0x15677f3000 - 0x1567805fff 0x1567806000 - 0x1567806fff 0x1567807000 - 0x1567807fff 0x1567808000 - 0x1567925fff 0x1567926000 - 0x1567928fff 0x1567929000 - 0x156792bfff 0x156792c000 - 0x1567930fff 0x1567931000 - 0x1567985fff 0x1567986000 - 0x1568030fff 0x3fffca6000 - 0x3fffcc6fff ;; 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 0x36ad1000 - 0x36af1fff 0x80000000 - 0x800bffff 0x1556955000 - 0x155696ffff 0x1556970000 - 0x1556970fff 0x1556971000 - 0x1556971fff 0x1556972000 - 0x1556973fff 0x1556974000 - 0x1556975fff 0x1556976000 - 0x155697cfff 0x155697d000 - 0x155697dfff 0x155697e000 - 0x155697efff 0x1556980000 - 0x1556981fff 0x1556982000 - 0x15569c0fff 0x15569c1000 - 0x15569c2fff 0x15569c3000 - 0x15569c9fff 0x15569ca000 - 0x15569cafff 0x15569cb000 - 0x15569f0fff 0x15569f1000 - 0x15569f4fff 0x15569f5000 - 0x15569f5fff 0x15569f6000 - 0x15569f7fff 0x15569f8000 - 0x15569f8fff 0x15569f9000 - 0x15569f9fff 0x15569fa000 - 0x15569fafff 0x15569fb000 - 0x15569fefff 0x15569ff000 - 0x15569fffff 0x1556a00000 - 0x1556a00fff 0x1556a01000 - 0x1556a02fff 0x1556a03000 - 0x1556a03fff 0x1556a04000 - 0x1556a04fff 0x1556a05000 - 0x1556b70fff 0x1556b71000 - 0x1556b73fff 0x1556b74000 - 0x1556b74fff 0x1556b75000 - 0x1556b77fff 0x1556b78000 - 0x1556b8afff 0x1556b8b000 - 0x1556b8bfff 0x1556b8c000 - 0x1556b8cfff 0x1556b8d000 - 0x1556caafff 0x1556cab000 - 0x1556cadfff 0x1556cae000 - 0x1556cb0fff 0x1556cb1000 - 0x1556cb5fff 0x1556cb6000 - 0x1556d0afff 0x1556d0b000 - 0x15573b5fff 0x3fffe15000 - 0x3fffe35fff ;; 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 0x23427000 - 0x23447fff 0x80000000 - 0x800bffff 0x155f35b000 - 0x155f375fff 0x155f376000 - 0x155f376fff 0x155f377000 - 0x155f377fff 0x155f378000 - 0x155f379fff 0x155f37a000 - 0x155f37bfff 0x155f37c000 - 0x155f382fff 0x155f383000 - 0x155f383fff 0x155f384000 - 0x155f384fff 0x155f386000 - 0x155f387fff 0x155f388000 - 0x155f3c6fff 0x155f3c7000 - 0x155f3c8fff 0x155f3c9000 - 0x155f3cffff 0x155f3d0000 - 0x155f3d0fff 0x155f3d1000 - 0x155f3f6fff 0x155f3f7000 - 0x155f3fafff 0x155f3fb000 - 0x155f3fbfff 0x155f3fc000 - 0x155f3fdfff 0x155f3fe000 - 0x155f3fefff 0x155f3ff000 - 0x155f3fffff 0x155f400000 - 0x155f400fff 0x155f401000 - 0x155f404fff 0x155f405000 - 0x155f405fff 0x155f406000 - 0x155f406fff 0x155f407000 - 0x155f408fff 0x155f409000 - 0x155f409fff 0x155f40a000 - 0x155f40afff 0x155f40b000 - 0x155f576fff 0x155f577000 - 0x155f579fff 0x155f57a000 - 0x155f57afff 0x155f57b000 - 0x155f57dfff 0x155f57e000 - 0x155f590fff 0x155f591000 - 0x155f591fff 0x155f592000 - 0x155f592fff 0x155f593000 - 0x155f6b0fff 0x155f6b1000 - 0x155f6b3fff 0x155f6b4000 - 0x155f6b6fff 0x155f6b7000 - 0x155f6bbfff 0x155f6bc000 - 0x155f710fff 0x155f711000 - 0x155fdbbfff 0x3fffcd4000 - 0x3fffcf4fff ;; 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 0x84ae000 - 0x84cefff 0x80000000 - 0x800bffff 0x1566192000 - 0x15661acfff 0x15661ad000 - 0x15661adfff 0x15661ae000 - 0x15661aefff 0x15661af000 - 0x15661b0fff 0x15661b1000 - 0x15661b2fff 0x15661b3000 - 0x15661b9fff 0x15661ba000 - 0x15661bafff 0x15661bb000 - 0x15661bbfff 0x15661bd000 - 0x15661befff 0x15661bf000 - 0x15661fdfff 0x15661fe000 - 0x15661fffff 0x1566200000 - 0x1566206fff 0x1566207000 - 0x1566207fff 0x1566208000 - 0x156622dfff 0x156622e000 - 0x1566231fff 0x1566232000 - 0x1566232fff 0x1566233000 - 0x1566234fff 0x1566235000 - 0x1566235fff 0x1566236000 - 0x1566236fff 0x1566237000 - 0x1566237fff 0x1566238000 - 0x156623bfff 0x156623c000 - 0x156623cfff 0x156623d000 - 0x156623dfff 0x156623e000 - 0x156623ffff 0x1566240000 - 0x1566240fff 0x1566241000 - 0x1566241fff 0x1566242000 - 0x15663adfff 0x15663ae000 - 0x15663b0fff 0x15663b1000 - 0x15663b1fff 0x15663b2000 - 0x15663b4fff 0x15663b5000 - 0x15663c7fff 0x15663c8000 - 0x15663c8fff 0x15663c9000 - 0x15663c9fff 0x15663ca000 - 0x15664e7fff 0x15664e8000 - 0x15664eafff 0x15664eb000 - 0x15664edfff 0x15664ee000 - 0x15664f2fff 0x15664f3000 - 0x1566547fff 0x1566548000 - 0x1566bf2fff 0x3fffd41000 - 0x3fffd61fff ;; 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 0x293aa000 - 0x293cafff 0x80000000 - 0x800bffff 0x1561b1d000 - 0x1561b37fff 0x1561b38000 - 0x1561b38fff 0x1561b39000 - 0x1561b39fff 0x1561b3a000 - 0x1561b3bfff 0x1561b3c000 - 0x1561b3dfff 0x1561b3e000 - 0x1561b44fff 0x1561b45000 - 0x1561b45fff 0x1561b46000 - 0x1561b46fff 0x1561b48000 - 0x1561b49fff 0x1561b4a000 - 0x1561b88fff 0x1561b89000 - 0x1561b8afff 0x1561b8b000 - 0x1561b91fff 0x1561b92000 - 0x1561b92fff 0x1561b93000 - 0x1561bb8fff 0x1561bb9000 - 0x1561bbcfff 0x1561bbd000 - 0x1561bbdfff 0x1561bbe000 - 0x1561bbffff 0x1561bc0000 - 0x1561bc0fff 0x1561bc1000 - 0x1561bc1fff 0x1561bc2000 - 0x1561bc2fff 0x1561bc3000 - 0x1561bc6fff 0x1561bc7000 - 0x1561bc7fff 0x1561bc8000 - 0x1561bc8fff 0x1561bc9000 - 0x1561bcafff 0x1561bcb000 - 0x1561bcbfff 0x1561bcc000 - 0x1561bccfff 0x1561bcd000 - 0x1561d38fff 0x1561d39000 - 0x1561d3bfff 0x1561d3c000 - 0x1561d3cfff 0x1561d3d000 - 0x1561d3ffff 0x1561d40000 - 0x1561d52fff 0x1561d53000 - 0x1561d53fff 0x1561d54000 - 0x1561d54fff 0x1561d55000 - 0x1561e72fff 0x1561e73000 - 0x1561e75fff 0x1561e76000 - 0x1561e78fff 0x1561e79000 - 0x1561e7dfff 0x1561e7e000 - 0x1561ed2fff 0x1561ed3000 - 0x156257dfff 0x3fff949000 - 0x3fff969fff ;; 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 0x9fac000 - 0x9fccfff 0x80000000 - 0x800bffff 0x1556a70000 - 0x1556a8afff 0x1556a8b000 - 0x1556a8bfff 0x1556a8c000 - 0x1556a8cfff 0x1556a8d000 - 0x1556a8efff 0x1556a8f000 - 0x1556a90fff 0x1556a91000 - 0x1556a97fff 0x1556a98000 - 0x1556a98fff 0x1556a99000 - 0x1556a99fff 0x1556a9b000 - 0x1556a9cfff 0x1556a9d000 - 0x1556adbfff 0x1556adc000 - 0x1556addfff 0x1556ade000 - 0x1556ae4fff 0x1556ae5000 - 0x1556ae5fff 0x1556ae6000 - 0x1556b0bfff 0x1556b0c000 - 0x1556b0ffff 0x1556b10000 - 0x1556b10fff 0x1556b11000 - 0x1556b12fff 0x1556b13000 - 0x1556b13fff 0x1556b14000 - 0x1556b14fff 0x1556b15000 - 0x1556b15fff 0x1556b16000 - 0x1556b19fff 0x1556b1a000 - 0x1556b1afff 0x1556b1b000 - 0x1556b1bfff 0x1556b1c000 - 0x1556b1dfff 0x1556b1e000 - 0x1556b1efff 0x1556b1f000 - 0x1556b1ffff 0x1556b20000 - 0x1556c8bfff 0x1556c8c000 - 0x1556c8efff 0x1556c8f000 - 0x1556c8ffff 0x1556c90000 - 0x1556c92fff 0x1556c93000 - 0x1556ca5fff 0x1556ca6000 - 0x1556ca6fff 0x1556ca7000 - 0x1556ca7fff 0x1556ca8000 - 0x1556dc5fff 0x1556dc6000 - 0x1556dc8fff 0x1556dc9000 - 0x1556dcbfff 0x1556dcc000 - 0x1556dd0fff 0x1556dd1000 - 0x1556e25fff 0x1556e26000 - 0x15574d0fff 0x3fff82a000 - 0x3fff84afff ;; 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 0x20887000 - 0x208a7fff 0x80000000 - 0x800bffff 0x1578f18000 - 0x1578f32fff 0x1578f33000 - 0x1578f33fff 0x1578f34000 - 0x1578f34fff 0x1578f35000 - 0x1578f36fff 0x1578f37000 - 0x1578f38fff 0x1578f39000 - 0x1578f3ffff 0x1578f40000 - 0x1578f40fff 0x1578f41000 - 0x1578f41fff 0x1578f43000 - 0x1578f44fff 0x1578f45000 - 0x1578f83fff 0x1578f84000 - 0x1578f85fff 0x1578f86000 - 0x1578f8cfff 0x1578f8d000 - 0x1578f8dfff 0x1578f8e000 - 0x1578fb3fff 0x1578fb4000 - 0x1578fb7fff 0x1578fb8000 - 0x1578fb8fff 0x1578fb9000 - 0x1578fbafff 0x1578fbb000 - 0x1578fbbfff 0x1578fbc000 - 0x1578fbcfff 0x1578fbd000 - 0x1578fbdfff 0x1578fbe000 - 0x1578fc1fff 0x1578fc2000 - 0x1578fc2fff 0x1578fc3000 - 0x1578fc3fff 0x1578fc4000 - 0x1578fc5fff 0x1578fc6000 - 0x1578fc6fff 0x1578fc7000 - 0x1578fc7fff 0x1578fc8000 - 0x1579133fff 0x1579134000 - 0x1579136fff 0x1579137000 - 0x1579137fff 0x1579138000 - 0x157913afff 0x157913b000 - 0x157914dfff 0x157914e000 - 0x157914efff 0x157914f000 - 0x157914ffff 0x1579150000 - 0x157926dfff 0x157926e000 - 0x1579270fff 0x1579271000 - 0x1579273fff 0x1579274000 - 0x1579278fff 0x1579279000 - 0x15792cdfff 0x15792ce000 - 0x1579978fff 0x3fff8e1000 - 0x3fff901fff ;; 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 0x1192d000 - 0x1194dfff 0x80000000 - 0x800bffff 0x1569988000 - 0x15699a2fff 0x15699a3000 - 0x15699a3fff 0x15699a4000 - 0x15699a4fff 0x15699a5000 - 0x15699a6fff 0x15699a7000 - 0x15699a8fff 0x15699a9000 - 0x15699affff 0x15699b0000 - 0x15699b0fff 0x15699b1000 - 0x15699b1fff 0x15699b3000 - 0x15699b4fff 0x15699b5000 - 0x15699f3fff 0x15699f4000 - 0x15699f5fff 0x15699f6000 - 0x15699fcfff 0x15699fd000 - 0x15699fdfff 0x15699fe000 - 0x1569a23fff 0x1569a24000 - 0x1569a27fff 0x1569a28000 - 0x1569a28fff 0x1569a29000 - 0x1569a2afff 0x1569a2b000 - 0x1569a2bfff 0x1569a2c000 - 0x1569a2cfff 0x1569a2d000 - 0x1569a2dfff 0x1569a2e000 - 0x1569a31fff 0x1569a32000 - 0x1569a32fff 0x1569a33000 - 0x1569a33fff 0x1569a34000 - 0x1569a35fff 0x1569a36000 - 0x1569a36fff 0x1569a37000 - 0x1569a37fff 0x1569a38000 - 0x1569ba3fff 0x1569ba4000 - 0x1569ba6fff 0x1569ba7000 - 0x1569ba7fff 0x1569ba8000 - 0x1569baafff 0x1569bab000 - 0x1569bbdfff 0x1569bbe000 - 0x1569bbefff 0x1569bbf000 - 0x1569bbffff 0x1569bc0000 - 0x1569cddfff 0x1569cde000 - 0x1569ce0fff 0x1569ce1000 - 0x1569ce3fff 0x1569ce4000 - 0x1569ce8fff 0x1569ce9000 - 0x1569d3dfff 0x1569d3e000 - 0x156a3e8fff 0x3ffff5e000 - 0x3ffff7efff ;; 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 0xfa8f000 - 0xfaaffff 0x80000000 - 0x800bffff 0x155ce75000 - 0x155ce8ffff 0x155ce90000 - 0x155ce90fff 0x155ce91000 - 0x155ce91fff 0x155ce92000 - 0x155ce93fff 0x155ce94000 - 0x155ce95fff 0x155ce96000 - 0x155ce9cfff 0x155ce9d000 - 0x155ce9dfff 0x155ce9e000 - 0x155ce9efff 0x155cea0000 - 0x155cea1fff 0x155cea2000 - 0x155cee0fff 0x155cee1000 - 0x155cee2fff 0x155cee3000 - 0x155cee9fff 0x155ceea000 - 0x155ceeafff 0x155ceeb000 - 0x155cf10fff 0x155cf11000 - 0x155cf14fff 0x155cf15000 - 0x155cf15fff 0x155cf16000 - 0x155cf17fff 0x155cf18000 - 0x155cf18fff 0x155cf19000 - 0x155cf19fff 0x155cf1a000 - 0x155cf1afff 0x155cf1b000 - 0x155cf1efff 0x155cf1f000 - 0x155cf1ffff 0x155cf20000 - 0x155cf20fff 0x155cf21000 - 0x155cf22fff 0x155cf23000 - 0x155cf23fff 0x155cf24000 - 0x155cf24fff 0x155cf25000 - 0x155d090fff 0x155d091000 - 0x155d093fff 0x155d094000 - 0x155d094fff 0x155d095000 - 0x155d097fff 0x155d098000 - 0x155d0aafff 0x155d0ab000 - 0x155d0abfff 0x155d0ac000 - 0x155d0acfff 0x155d0ad000 - 0x155d1cafff 0x155d1cb000 - 0x155d1cdfff 0x155d1ce000 - 0x155d1d0fff 0x155d1d1000 - 0x155d1d5fff 0x155d1d6000 - 0x155d22afff 0x155d22b000 - 0x155d8d5fff 0x3fffd9b000 - 0x3fffdbbfff ;; 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 0x32dee000 - 0x32e0efff 0x80000000 - 0x800bffff 0x158bb6f000 - 0x158bb89fff 0x158bb8a000 - 0x158bb8afff 0x158bb8b000 - 0x158bb8bfff 0x158bb8c000 - 0x158bb8dfff 0x158bb8e000 - 0x158bb8ffff 0x158bb90000 - 0x158bb96fff 0x158bb97000 - 0x158bb97fff 0x158bb98000 - 0x158bb98fff 0x158bb9a000 - 0x158bb9bfff 0x158bb9c000 - 0x158bbdafff 0x158bbdb000 - 0x158bbdcfff 0x158bbdd000 - 0x158bbe3fff 0x158bbe4000 - 0x158bbe4fff 0x158bbe5000 - 0x158bc0afff 0x158bc0b000 - 0x158bc0efff 0x158bc0f000 - 0x158bc0ffff 0x158bc10000 - 0x158bc11fff 0x158bc12000 - 0x158bc12fff 0x158bc13000 - 0x158bc13fff 0x158bc14000 - 0x158bc14fff 0x158bc15000 - 0x158bc18fff 0x158bc19000 - 0x158bc19fff 0x158bc1a000 - 0x158bc1afff 0x158bc1b000 - 0x158bc1cfff 0x158bc1d000 - 0x158bc1dfff 0x158bc1e000 - 0x158bc1efff 0x158bc1f000 - 0x158bd8afff 0x158bd8b000 - 0x158bd8dfff 0x158bd8e000 - 0x158bd8efff 0x158bd8f000 - 0x158bd91fff 0x158bd92000 - 0x158bda4fff 0x158bda5000 - 0x158bda5fff 0x158bda6000 - 0x158bda6fff 0x158bda7000 - 0x158bec4fff 0x158bec5000 - 0x158bec7fff 0x158bec8000 - 0x158becafff 0x158becb000 - 0x158becffff 0x158bed0000 - 0x158bf24fff 0x158bf25000 - 0x158c5cffff 0x3fffd33000 - 0x3fffd53fff ;; 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 0x2f99a000 - 0x2f9bafff 0x80000000 - 0x800bffff 0x155cf70000 - 0x155cf8afff 0x155cf8b000 - 0x155cf8bfff 0x155cf8c000 - 0x155cf8cfff 0x155cf8d000 - 0x155cf8efff 0x155cf8f000 - 0x155cf90fff 0x155cf91000 - 0x155cf97fff 0x155cf98000 - 0x155cf98fff 0x155cf99000 - 0x155cf99fff 0x155cf9b000 - 0x155cf9cfff 0x155cf9d000 - 0x155cfdbfff 0x155cfdc000 - 0x155cfddfff 0x155cfde000 - 0x155cfe4fff 0x155cfe5000 - 0x155cfe5fff 0x155cfe6000 - 0x155d00bfff 0x155d00c000 - 0x155d00ffff 0x155d010000 - 0x155d010fff 0x155d011000 - 0x155d012fff 0x155d013000 - 0x155d013fff 0x155d014000 - 0x155d014fff 0x155d015000 - 0x155d015fff 0x155d016000 - 0x155d019fff 0x155d01a000 - 0x155d01afff 0x155d01b000 - 0x155d01bfff 0x155d01c000 - 0x155d01dfff 0x155d01e000 - 0x155d01efff 0x155d01f000 - 0x155d01ffff 0x155d020000 - 0x155d18bfff 0x155d18c000 - 0x155d18efff 0x155d18f000 - 0x155d18ffff 0x155d190000 - 0x155d192fff 0x155d193000 - 0x155d1a5fff 0x155d1a6000 - 0x155d1a6fff 0x155d1a7000 - 0x155d1a7fff 0x155d1a8000 - 0x155d2c5fff 0x155d2c6000 - 0x155d2c8fff 0x155d2c9000 - 0x155d2cbfff 0x155d2cc000 - 0x155d2d0fff 0x155d2d1000 - 0x155d325fff 0x155d326000 - 0x155d9d0fff 0x3fffb34000 - 0x3fffb54fff ;; 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 0x3744000 - 0x3764fff 0x80000000 - 0x800bffff 0x158f688000 - 0x158f6a2fff 0x158f6a3000 - 0x158f6a3fff 0x158f6a4000 - 0x158f6a4fff 0x158f6a5000 - 0x158f6a6fff 0x158f6a7000 - 0x158f6a8fff 0x158f6a9000 - 0x158f6affff 0x158f6b0000 - 0x158f6b0fff 0x158f6b1000 - 0x158f6b1fff 0x158f6b3000 - 0x158f6b4fff 0x158f6b5000 - 0x158f6f3fff 0x158f6f4000 - 0x158f6f5fff 0x158f6f6000 - 0x158f6fcfff 0x158f6fd000 - 0x158f6fdfff 0x158f6fe000 - 0x158f723fff 0x158f724000 - 0x158f727fff 0x158f728000 - 0x158f728fff 0x158f729000 - 0x158f72afff 0x158f72b000 - 0x158f72bfff 0x158f72c000 - 0x158f72cfff 0x158f72d000 - 0x158f72dfff 0x158f72e000 - 0x158f731fff 0x158f732000 - 0x158f732fff 0x158f733000 - 0x158f733fff 0x158f734000 - 0x158f735fff 0x158f736000 - 0x158f736fff 0x158f737000 - 0x158f737fff 0x158f738000 - 0x158f8a3fff 0x158f8a4000 - 0x158f8a6fff 0x158f8a7000 - 0x158f8a7fff 0x158f8a8000 - 0x158f8aafff 0x158f8ab000 - 0x158f8bdfff 0x158f8be000 - 0x158f8befff 0x158f8bf000 - 0x158f8bffff 0x158f8c0000 - 0x158f9ddfff 0x158f9de000 - 0x158f9e0fff 0x158f9e1000 - 0x158f9e3fff 0x158f9e4000 - 0x158f9e8fff 0x158f9e9000 - 0x158fa3dfff 0x158fa3e000 - 0x15900e8fff 0x3fffa6c000 - 0x3fffa8cfff ;; 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 0x1b337000 - 0x1b357fff 0x80000000 - 0x800bffff 0x1557f9c000 - 0x1557fb6fff 0x1557fb7000 - 0x1557fb7fff 0x1557fb8000 - 0x1557fb8fff 0x1557fb9000 - 0x1557fbafff 0x1557fbb000 - 0x1557fbcfff 0x1557fbd000 - 0x1557fc3fff 0x1557fc4000 - 0x1557fc4fff 0x1557fc5000 - 0x1557fc5fff 0x1557fc7000 - 0x1557fc8fff 0x1557fc9000 - 0x1558007fff 0x1558008000 - 0x1558009fff 0x155800a000 - 0x1558010fff 0x1558011000 - 0x1558011fff 0x1558012000 - 0x1558037fff 0x1558038000 - 0x155803bfff 0x155803c000 - 0x155803cfff 0x155803d000 - 0x155803efff 0x155803f000 - 0x155803ffff 0x1558040000 - 0x1558040fff 0x1558041000 - 0x1558041fff 0x1558042000 - 0x1558045fff 0x1558046000 - 0x1558046fff 0x1558047000 - 0x1558047fff 0x1558048000 - 0x1558049fff 0x155804a000 - 0x155804afff 0x155804b000 - 0x155804bfff 0x155804c000 - 0x15581b7fff 0x15581b8000 - 0x15581bafff 0x15581bb000 - 0x15581bbfff 0x15581bc000 - 0x15581befff 0x15581bf000 - 0x15581d1fff 0x15581d2000 - 0x15581d2fff 0x15581d3000 - 0x15581d3fff 0x15581d4000 - 0x15582f1fff 0x15582f2000 - 0x15582f4fff 0x15582f5000 - 0x15582f7fff 0x15582f8000 - 0x15582fcfff 0x15582fd000 - 0x1558351fff 0x1558352000 - 0x15589fcfff 0x3ffff14000 - 0x3ffff34fff ;; 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 0x15cb9000 - 0x15cd9fff 0x80000000 - 0x800bffff 0x157d456000 - 0x157d470fff 0x157d471000 - 0x157d471fff 0x157d472000 - 0x157d472fff 0x157d473000 - 0x157d474fff 0x157d475000 - 0x157d476fff 0x157d477000 - 0x157d47dfff 0x157d47e000 - 0x157d47efff 0x157d47f000 - 0x157d47ffff 0x157d481000 - 0x157d482fff 0x157d483000 - 0x157d4c1fff 0x157d4c2000 - 0x157d4c3fff 0x157d4c4000 - 0x157d4cafff 0x157d4cb000 - 0x157d4cbfff 0x157d4cc000 - 0x157d4f1fff 0x157d4f2000 - 0x157d4f5fff 0x157d4f6000 - 0x157d4f6fff 0x157d4f7000 - 0x157d4f8fff 0x157d4f9000 - 0x157d4f9fff 0x157d4fa000 - 0x157d4fafff 0x157d4fb000 - 0x157d4fbfff 0x157d4fc000 - 0x157d4fffff 0x157d500000 - 0x157d500fff 0x157d501000 - 0x157d501fff 0x157d502000 - 0x157d503fff 0x157d504000 - 0x157d504fff 0x157d505000 - 0x157d505fff 0x157d506000 - 0x157d671fff 0x157d672000 - 0x157d674fff 0x157d675000 - 0x157d675fff 0x157d676000 - 0x157d678fff 0x157d679000 - 0x157d68bfff 0x157d68c000 - 0x157d68cfff 0x157d68d000 - 0x157d68dfff 0x157d68e000 - 0x157d7abfff 0x157d7ac000 - 0x157d7aefff 0x157d7af000 - 0x157d7b1fff 0x157d7b2000 - 0x157d7b6fff 0x157d7b7000 - 0x157d80bfff 0x157d80c000 - 0x157deb6fff 0x3fffe6a000 - 0x3fffe8afff ;; 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 0x21c2000 - 0x21e2fff 0x80000000 - 0x800bffff 0x157ce16000 - 0x157ce30fff 0x157ce31000 - 0x157ce31fff 0x157ce32000 - 0x157ce32fff 0x157ce33000 - 0x157ce34fff 0x157ce35000 - 0x157ce36fff 0x157ce37000 - 0x157ce3dfff 0x157ce3e000 - 0x157ce3efff 0x157ce3f000 - 0x157ce3ffff 0x157ce41000 - 0x157ce42fff 0x157ce43000 - 0x157ce81fff 0x157ce82000 - 0x157ce83fff 0x157ce84000 - 0x157ce8afff 0x157ce8b000 - 0x157ce8bfff 0x157ce8c000 - 0x157ceb1fff 0x157ceb2000 - 0x157ceb5fff 0x157ceb6000 - 0x157ceb6fff 0x157ceb7000 - 0x157ceb8fff 0x157ceb9000 - 0x157ceb9fff 0x157ceba000 - 0x157cebafff 0x157cebb000 - 0x157cebbfff 0x157cebc000 - 0x157cebffff 0x157cec0000 - 0x157cec0fff 0x157cec1000 - 0x157cec1fff 0x157cec2000 - 0x157cec3fff 0x157cec4000 - 0x157cec4fff 0x157cec5000 - 0x157cec5fff 0x157cec6000 - 0x157d031fff 0x157d032000 - 0x157d034fff 0x157d035000 - 0x157d035fff 0x157d036000 - 0x157d038fff 0x157d039000 - 0x157d04bfff 0x157d04c000 - 0x157d04cfff 0x157d04d000 - 0x157d04dfff 0x157d04e000 - 0x157d16bfff 0x157d16c000 - 0x157d16efff 0x157d16f000 - 0x157d171fff 0x157d172000 - 0x157d176fff 0x157d177000 - 0x157d1cbfff 0x157d1cc000 - 0x157d876fff 0x3fffb2f000 - 0x3fffb4ffff 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 0x3e399000 - 0x3e3b9fff 0x80000000 - 0x800bffff 0x1584e9f000 - 0x1584eb9fff 0x1584eba000 - 0x1584ebafff 0x1584ebb000 - 0x1584ebbfff 0x1584ebc000 - 0x1584ebdfff 0x1584ebe000 - 0x1584ebffff 0x1584ec0000 - 0x1584ec6fff 0x1584ec7000 - 0x1584ec7fff 0x1584ec8000 - 0x1584ec8fff 0x1584eca000 - 0x1584ecbfff 0x1584ecc000 - 0x1584f0afff 0x1584f0b000 - 0x1584f0cfff 0x1584f0d000 - 0x1584f13fff 0x1584f14000 - 0x1584f14fff 0x1584f15000 - 0x1584f3afff 0x1584f3b000 - 0x1584f3efff 0x1584f3f000 - 0x1584f3ffff 0x1584f40000 - 0x1584f41fff 0x1584f42000 - 0x1584f42fff 0x1584f43000 - 0x1584f43fff 0x1584f44000 - 0x1584f44fff 0x1584f45000 - 0x1584f48fff 0x1584f49000 - 0x1584f49fff 0x1584f4a000 - 0x1584f4afff 0x1584f4b000 - 0x1584f4cfff 0x1584f4d000 - 0x1584f4dfff 0x1584f4e000 - 0x1584f4efff 0x1584f4f000 - 0x15850bafff 0x15850bb000 - 0x15850bdfff 0x15850be000 - 0x15850befff 0x15850bf000 - 0x15850c1fff 0x15850c2000 - 0x15850d4fff 0x15850d5000 - 0x15850d5fff 0x15850d6000 - 0x15850d6fff 0x15850d7000 - 0x15851f4fff 0x15851f5000 - 0x15851f7fff 0x15851f8000 - 0x15851fafff 0x15851fb000 - 0x15851fffff 0x1585200000 - 0x1585254fff 0x1585255000 - 0x15858fffff 0x3fff86e000 - 0x3fff88efff 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 0x2d94c000 - 0x2d96cfff 0x80000000 - 0x800bffff 0x155ef0f000 - 0x155ef29fff 0x155ef2a000 - 0x155ef2afff 0x155ef2b000 - 0x155ef2bfff 0x155ef2c000 - 0x155ef2dfff 0x155ef2e000 - 0x155ef2ffff 0x155ef30000 - 0x155ef36fff 0x155ef37000 - 0x155ef37fff 0x155ef38000 - 0x155ef38fff 0x155ef3a000 - 0x155ef3bfff 0x155ef3c000 - 0x155ef7afff 0x155ef7b000 - 0x155ef7cfff 0x155ef7d000 - 0x155ef83fff 0x155ef84000 - 0x155ef84fff 0x155ef85000 - 0x155efaafff 0x155efab000 - 0x155efaefff 0x155efaf000 - 0x155efaffff 0x155efb0000 - 0x155efb1fff 0x155efb2000 - 0x155efb2fff 0x155efb3000 - 0x155efb3fff 0x155efb4000 - 0x155efb4fff 0x155efb5000 - 0x155efb8fff 0x155efb9000 - 0x155efb9fff 0x155efba000 - 0x155efbafff 0x155efbb000 - 0x155efbcfff 0x155efbd000 - 0x155efbdfff 0x155efbe000 - 0x155efbefff 0x155efbf000 - 0x155f12afff 0x155f12b000 - 0x155f12dfff 0x155f12e000 - 0x155f12efff 0x155f12f000 - 0x155f131fff 0x155f132000 - 0x155f144fff 0x155f145000 - 0x155f145fff 0x155f146000 - 0x155f146fff 0x155f147000 - 0x155f264fff 0x155f265000 - 0x155f267fff 0x155f268000 - 0x155f26afff 0x155f26b000 - 0x155f26ffff 0x155f270000 - 0x155f2c4fff 0x155f2c5000 - 0x155f96ffff 0x3fffa20000 - 0x3fffa40fff 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 0x11a75000 - 0x11a95fff 0x80000000 - 0x800bffff 0x15846cc000 - 0x15846e6fff 0x15846e7000 - 0x15846e7fff 0x15846e8000 - 0x15846e8fff 0x15846e9000 - 0x15846eafff 0x15846eb000 - 0x15846ecfff 0x15846ed000 - 0x15846f3fff 0x15846f4000 - 0x15846f4fff 0x15846f5000 - 0x15846f5fff 0x15846f7000 - 0x15846f8fff 0x15846f9000 - 0x1584737fff 0x1584738000 - 0x1584739fff 0x158473a000 - 0x1584740fff 0x1584741000 - 0x1584741fff 0x1584742000 - 0x1584767fff 0x1584768000 - 0x158476bfff 0x158476c000 - 0x158476cfff 0x158476d000 - 0x158476efff 0x158476f000 - 0x158476ffff 0x1584770000 - 0x1584770fff 0x1584771000 - 0x1584771fff 0x1584772000 - 0x1584775fff 0x1584776000 - 0x1584776fff 0x1584777000 - 0x1584777fff 0x1584778000 - 0x1584779fff 0x158477a000 - 0x158477afff 0x158477b000 - 0x158477bfff 0x158477c000 - 0x15848e7fff 0x15848e8000 - 0x15848eafff 0x15848eb000 - 0x15848ebfff 0x15848ec000 - 0x15848eefff 0x15848ef000 - 0x1584901fff 0x1584902000 - 0x1584902fff 0x1584903000 - 0x1584903fff 0x1584904000 - 0x1584a21fff 0x1584a22000 - 0x1584a24fff 0x1584a25000 - 0x1584a27fff 0x1584a28000 - 0x1584a2cfff 0x1584a2d000 - 0x1584a81fff 0x1584a82000 - 0x158512cfff 0x3fffb44000 - 0x3fffb64fff ;; 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 0xc5bc000 - 0xc5dcfff 0x80000000 - 0x800bffff 0x156db88000 - 0x156dba2fff 0x156dba3000 - 0x156dba3fff 0x156dba4000 - 0x156dba4fff 0x156dba5000 - 0x156dba6fff 0x156dba7000 - 0x156dba8fff 0x156dba9000 - 0x156dbaffff 0x156dbb0000 - 0x156dbb0fff 0x156dbb1000 - 0x156dbb1fff 0x156dbb3000 - 0x156dbb4fff 0x156dbb5000 - 0x156dbf3fff 0x156dbf4000 - 0x156dbf5fff 0x156dbf6000 - 0x156dbfcfff 0x156dbfd000 - 0x156dbfdfff 0x156dbfe000 - 0x156dc23fff 0x156dc24000 - 0x156dc27fff 0x156dc28000 - 0x156dc28fff 0x156dc29000 - 0x156dc2afff 0x156dc2b000 - 0x156dc2bfff 0x156dc2c000 - 0x156dc2cfff 0x156dc2d000 - 0x156dc2dfff 0x156dc2e000 - 0x156dc31fff 0x156dc32000 - 0x156dc32fff 0x156dc33000 - 0x156dc33fff 0x156dc34000 - 0x156dc35fff 0x156dc36000 - 0x156dc36fff 0x156dc37000 - 0x156dc37fff 0x156dc38000 - 0x156dda3fff 0x156dda4000 - 0x156dda6fff 0x156dda7000 - 0x156dda7fff 0x156dda8000 - 0x156ddaafff 0x156ddab000 - 0x156ddbdfff 0x156ddbe000 - 0x156ddbefff 0x156ddbf000 - 0x156ddbffff 0x156ddc0000 - 0x156deddfff 0x156dede000 - 0x156dee0fff 0x156dee1000 - 0x156dee3fff 0x156dee4000 - 0x156dee8fff 0x156dee9000 - 0x156df3dfff 0x156df3e000 - 0x156e5e8fff 0x3fffa19000 - 0x3fffa39fff (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 0x2dd48000 - 0x2dd68fff 0x80000000 - 0x800bffff 0x1586ea4000 - 0x1586ebefff 0x1586ebf000 - 0x1586ebffff 0x1586ec0000 - 0x1586ec0fff 0x1586ec1000 - 0x1586ec2fff 0x1586ec3000 - 0x1586ec4fff 0x1586ec5000 - 0x1586ecbfff 0x1586ecc000 - 0x1586eccfff 0x1586ecd000 - 0x1586ecdfff 0x1586ecf000 - 0x1586ed0fff 0x1586ed1000 - 0x1586f0ffff 0x1586f10000 - 0x1586f11fff 0x1586f12000 - 0x1586f18fff 0x1586f19000 - 0x1586f19fff 0x1586f1a000 - 0x1586f3ffff 0x1586f40000 - 0x1586f43fff 0x1586f44000 - 0x1586f44fff 0x1586f45000 - 0x1586f46fff 0x1586f47000 - 0x1586f47fff 0x1586f48000 - 0x1586f48fff 0x1586f49000 - 0x1586f49fff 0x1586f4a000 - 0x1586f4dfff 0x1586f4e000 - 0x1586f4efff 0x1586f4f000 - 0x1586f4ffff 0x1586f50000 - 0x1586f51fff 0x1586f52000 - 0x1586f52fff 0x1586f53000 - 0x1586f53fff 0x1586f54000 - 0x15870bffff 0x15870c0000 - 0x15870c2fff 0x15870c3000 - 0x15870c3fff 0x15870c4000 - 0x15870c6fff 0x15870c7000 - 0x15870d9fff 0x15870da000 - 0x15870dafff 0x15870db000 - 0x15870dbfff 0x15870dc000 - 0x15871f9fff 0x15871fa000 - 0x15871fcfff 0x15871fd000 - 0x15871fffff 0x1587200000 - 0x1587204fff 0x1587205000 - 0x1587259fff 0x158725a000 - 0x1587904fff 0x3fff995000 - 0x3fff9b5fff 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 0x2503c000 - 0x2505cfff 0x80000000 - 0x800bffff 0x157427a000 - 0x1574294fff 0x1574295000 - 0x1574295fff 0x1574296000 - 0x1574296fff 0x1574297000 - 0x1574298fff 0x1574299000 - 0x157429afff 0x157429b000 - 0x15742a1fff 0x15742a2000 - 0x15742a2fff 0x15742a3000 - 0x15742a3fff 0x15742a5000 - 0x15742a6fff 0x15742a7000 - 0x15742e5fff 0x15742e6000 - 0x15742e7fff 0x15742e8000 - 0x15742eefff 0x15742ef000 - 0x15742effff 0x15742f0000 - 0x1574315fff 0x1574316000 - 0x1574319fff 0x157431a000 - 0x157431afff 0x157431b000 - 0x157431cfff 0x157431d000 - 0x157431dfff 0x157431e000 - 0x157431efff 0x157431f000 - 0x157431ffff 0x1574320000 - 0x1574323fff 0x1574324000 - 0x1574324fff 0x1574325000 - 0x1574325fff 0x1574326000 - 0x1574327fff 0x1574328000 - 0x1574328fff 0x1574329000 - 0x1574329fff 0x157432a000 - 0x1574495fff 0x1574496000 - 0x1574498fff 0x1574499000 - 0x1574499fff 0x157449a000 - 0x157449cfff 0x157449d000 - 0x15744affff 0x15744b0000 - 0x15744b0fff 0x15744b1000 - 0x15744b1fff 0x15744b2000 - 0x15745cffff 0x15745d0000 - 0x15745d2fff 0x15745d3000 - 0x15745d5fff 0x15745d6000 - 0x15745dafff 0x15745db000 - 0x157462ffff 0x1574630000 - 0x1574cdafff 0x3fffeac000 - 0x3fffeccfff 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 0x21ddc000 - 0x21dfcfff 0x80000000 - 0x800bffff 0x156cd61000 - 0x156cd7bfff 0x156cd7c000 - 0x156cd7cfff 0x156cd7d000 - 0x156cd7dfff 0x156cd7e000 - 0x156cd7ffff 0x156cd80000 - 0x156cd81fff 0x156cd82000 - 0x156cd88fff 0x156cd89000 - 0x156cd89fff 0x156cd8a000 - 0x156cd8afff 0x156cd8c000 - 0x156cd8dfff 0x156cd8e000 - 0x156cdccfff 0x156cdcd000 - 0x156cdcefff 0x156cdcf000 - 0x156cdd5fff 0x156cdd6000 - 0x156cdd6fff 0x156cdd7000 - 0x156cdfcfff 0x156cdfd000 - 0x156ce00fff 0x156ce01000 - 0x156ce01fff 0x156ce02000 - 0x156ce03fff 0x156ce04000 - 0x156ce04fff 0x156ce05000 - 0x156ce05fff 0x156ce06000 - 0x156ce06fff 0x156ce07000 - 0x156ce0afff 0x156ce0b000 - 0x156ce0bfff 0x156ce0c000 - 0x156ce0cfff 0x156ce0d000 - 0x156ce0efff 0x156ce0f000 - 0x156ce0ffff 0x156ce10000 - 0x156ce10fff 0x156ce11000 - 0x156cf7cfff 0x156cf7d000 - 0x156cf7ffff 0x156cf80000 - 0x156cf80fff 0x156cf81000 - 0x156cf83fff 0x156cf84000 - 0x156cf96fff 0x156cf97000 - 0x156cf97fff 0x156cf98000 - 0x156cf98fff 0x156cf99000 - 0x156d0b6fff 0x156d0b7000 - 0x156d0b9fff 0x156d0ba000 - 0x156d0bcfff 0x156d0bd000 - 0x156d0c1fff 0x156d0c2000 - 0x156d116fff 0x156d117000 - 0x156d7c1fff 0x3fffc09000 - 0x3fffc29fff 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 0x22c9a000 - 0x22cbafff 0x80000000 - 0x800bffff 0x15843ca000 - 0x15843e4fff 0x15843e5000 - 0x15843e5fff 0x15843e6000 - 0x15843e6fff 0x15843e7000 - 0x15843e8fff 0x15843e9000 - 0x15843eafff 0x15843eb000 - 0x15843f1fff 0x15843f2000 - 0x15843f2fff 0x15843f3000 - 0x15843f3fff 0x15843f5000 - 0x15843f6fff 0x15843f7000 - 0x1584435fff 0x1584436000 - 0x1584437fff 0x1584438000 - 0x158443efff 0x158443f000 - 0x158443ffff 0x1584440000 - 0x1584465fff 0x1584466000 - 0x1584469fff 0x158446a000 - 0x158446afff 0x158446b000 - 0x158446cfff 0x158446d000 - 0x158446dfff 0x158446e000 - 0x158446efff 0x158446f000 - 0x158446ffff 0x1584470000 - 0x1584473fff 0x1584474000 - 0x1584474fff 0x1584475000 - 0x1584475fff 0x1584476000 - 0x1584477fff 0x1584478000 - 0x1584478fff 0x1584479000 - 0x1584479fff 0x158447a000 - 0x15845e5fff 0x15845e6000 - 0x15845e8fff 0x15845e9000 - 0x15845e9fff 0x15845ea000 - 0x15845ecfff 0x15845ed000 - 0x15845fffff 0x1584600000 - 0x1584600fff 0x1584601000 - 0x1584601fff 0x1584602000 - 0x158471ffff 0x1584720000 - 0x1584722fff 0x1584723000 - 0x1584725fff 0x1584726000 - 0x158472afff 0x158472b000 - 0x158477ffff 0x1584780000 - 0x1584e2afff 0x3fff910000 - 0x3fff930fff 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 0x8940000 - 0x8960fff 0x80000000 - 0x800bffff 0x1558dcd000 - 0x1558de7fff 0x1558de8000 - 0x1558de8fff 0x1558de9000 - 0x1558de9fff 0x1558dea000 - 0x1558debfff 0x1558dec000 - 0x1558dedfff 0x1558dee000 - 0x1558df4fff 0x1558df5000 - 0x1558df5fff 0x1558df6000 - 0x1558df6fff 0x1558df8000 - 0x1558df9fff 0x1558dfa000 - 0x1558e38fff 0x1558e39000 - 0x1558e3afff 0x1558e3b000 - 0x1558e41fff 0x1558e42000 - 0x1558e42fff 0x1558e43000 - 0x1558e68fff 0x1558e69000 - 0x1558e6cfff 0x1558e6d000 - 0x1558e6dfff 0x1558e6e000 - 0x1558e6ffff 0x1558e70000 - 0x1558e70fff 0x1558e71000 - 0x1558e71fff 0x1558e72000 - 0x1558e72fff 0x1558e73000 - 0x1558e76fff 0x1558e77000 - 0x1558e77fff 0x1558e78000 - 0x1558e78fff 0x1558e79000 - 0x1558e7afff 0x1558e7b000 - 0x1558e7bfff 0x1558e7c000 - 0x1558e7cfff 0x1558e7d000 - 0x1558fe8fff 0x1558fe9000 - 0x1558febfff 0x1558fec000 - 0x1558fecfff 0x1558fed000 - 0x1558feffff 0x1558ff0000 - 0x1559002fff 0x1559003000 - 0x1559003fff 0x1559004000 - 0x1559004fff 0x1559005000 - 0x1559122fff 0x1559123000 - 0x1559125fff 0x1559126000 - 0x1559128fff 0x1559129000 - 0x155912dfff 0x155912e000 - 0x1559182fff 0x1559183000 - 0x155982dfff 0x3fffd9b000 - 0x3fffdbbfff 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 0x67b9000 - 0x67d9fff 0x80000000 - 0x800bffff 0x1558dd2000 - 0x1558decfff 0x1558ded000 - 0x1558dedfff 0x1558dee000 - 0x1558deefff 0x1558def000 - 0x1558df0fff 0x1558df1000 - 0x1558df2fff 0x1558df3000 - 0x1558df9fff 0x1558dfa000 - 0x1558dfafff 0x1558dfb000 - 0x1558dfbfff 0x1558dfd000 - 0x1558dfefff 0x1558dff000 - 0x1558e3dfff 0x1558e3e000 - 0x1558e3ffff 0x1558e40000 - 0x1558e46fff 0x1558e47000 - 0x1558e47fff 0x1558e48000 - 0x1558e6dfff 0x1558e6e000 - 0x1558e71fff 0x1558e72000 - 0x1558e72fff 0x1558e73000 - 0x1558e74fff 0x1558e75000 - 0x1558e75fff 0x1558e76000 - 0x1558e76fff 0x1558e77000 - 0x1558e77fff 0x1558e78000 - 0x1558e7bfff 0x1558e7c000 - 0x1558e7cfff 0x1558e7d000 - 0x1558e7dfff 0x1558e7e000 - 0x1558e7ffff 0x1558e80000 - 0x1558e80fff 0x1558e81000 - 0x1558e81fff 0x1558e82000 - 0x1558fedfff 0x1558fee000 - 0x1558ff0fff 0x1558ff1000 - 0x1558ff1fff 0x1558ff2000 - 0x1558ff4fff 0x1558ff5000 - 0x1559007fff 0x1559008000 - 0x1559008fff 0x1559009000 - 0x1559009fff 0x155900a000 - 0x1559127fff 0x1559128000 - 0x155912afff 0x155912b000 - 0x155912dfff 0x155912e000 - 0x1559132fff 0x1559133000 - 0x1559187fff 0x1559188000 - 0x1559832fff 0x3fffd8d000 - 0x3fffdadfff (./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 0x3e1cd000 - 0x3e1edfff 0x80000000 - 0x800bffff 0x157817e000 - 0x1578198fff 0x1578199000 - 0x1578199fff 0x157819a000 - 0x157819afff 0x157819b000 - 0x157819cfff 0x157819d000 - 0x157819efff 0x157819f000 - 0x15781a5fff 0x15781a6000 - 0x15781a6fff 0x15781a7000 - 0x15781a7fff 0x15781a9000 - 0x15781aafff 0x15781ab000 - 0x15781e9fff 0x15781ea000 - 0x15781ebfff 0x15781ec000 - 0x15781f2fff 0x15781f3000 - 0x15781f3fff 0x15781f4000 - 0x1578219fff 0x157821a000 - 0x157821dfff 0x157821e000 - 0x157821efff 0x157821f000 - 0x1578220fff 0x1578221000 - 0x1578221fff 0x1578222000 - 0x1578222fff 0x1578223000 - 0x1578223fff 0x1578224000 - 0x1578227fff 0x1578228000 - 0x1578228fff 0x1578229000 - 0x1578229fff 0x157822a000 - 0x157822bfff 0x157822c000 - 0x157822cfff 0x157822d000 - 0x157822dfff 0x157822e000 - 0x1578399fff 0x157839a000 - 0x157839cfff 0x157839d000 - 0x157839dfff 0x157839e000 - 0x15783a0fff 0x15783a1000 - 0x15783b3fff 0x15783b4000 - 0x15783b4fff 0x15783b5000 - 0x15783b5fff 0x15783b6000 - 0x15784d3fff 0x15784d4000 - 0x15784d6fff 0x15784d7000 - 0x15784d9fff 0x15784da000 - 0x15784defff 0x15784df000 - 0x1578533fff 0x1578534000 - 0x1578bdefff 0x3fff803000 - 0x3fff823fff 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 0x27f4000 - 0x2814fff 0x80000000 - 0x800bffff 0x1589f9b000 - 0x1589fb5fff 0x1589fb6000 - 0x1589fb6fff 0x1589fb7000 - 0x1589fb7fff 0x1589fb8000 - 0x1589fb9fff 0x1589fba000 - 0x1589fbbfff 0x1589fbc000 - 0x1589fc2fff 0x1589fc3000 - 0x1589fc3fff 0x1589fc4000 - 0x1589fc4fff 0x1589fc6000 - 0x1589fc7fff 0x1589fc8000 - 0x158a006fff 0x158a007000 - 0x158a008fff 0x158a009000 - 0x158a00ffff 0x158a010000 - 0x158a010fff 0x158a011000 - 0x158a036fff 0x158a037000 - 0x158a03afff 0x158a03b000 - 0x158a03bfff 0x158a03c000 - 0x158a03dfff 0x158a03e000 - 0x158a03efff 0x158a03f000 - 0x158a03ffff 0x158a040000 - 0x158a040fff 0x158a041000 - 0x158a044fff 0x158a045000 - 0x158a045fff 0x158a046000 - 0x158a046fff 0x158a047000 - 0x158a048fff 0x158a049000 - 0x158a049fff 0x158a04a000 - 0x158a04afff 0x158a04b000 - 0x158a1b6fff 0x158a1b7000 - 0x158a1b9fff 0x158a1ba000 - 0x158a1bafff 0x158a1bb000 - 0x158a1bdfff 0x158a1be000 - 0x158a1d0fff 0x158a1d1000 - 0x158a1d1fff 0x158a1d2000 - 0x158a1d2fff 0x158a1d3000 - 0x158a2f0fff 0x158a2f1000 - 0x158a2f3fff 0x158a2f4000 - 0x158a2f6fff 0x158a2f7000 - 0x158a2fbfff 0x158a2fc000 - 0x158a350fff 0x158a351000 - 0x158a9fbfff 0x3fff95f000 - 0x3fff97ffff 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 0x1bad7000 - 0x1baf7fff 0x80000000 - 0x800bffff 0x15925ae000 - 0x15925c8fff 0x15925c9000 - 0x15925c9fff 0x15925ca000 - 0x15925cafff 0x15925cb000 - 0x15925ccfff 0x15925cd000 - 0x15925cefff 0x15925cf000 - 0x15925d5fff 0x15925d6000 - 0x15925d6fff 0x15925d7000 - 0x15925d7fff 0x15925d9000 - 0x15925dafff 0x15925db000 - 0x1592619fff 0x159261a000 - 0x159261bfff 0x159261c000 - 0x1592622fff 0x1592623000 - 0x1592623fff 0x1592624000 - 0x1592649fff 0x159264a000 - 0x159264dfff 0x159264e000 - 0x159264efff 0x159264f000 - 0x1592650fff 0x1592651000 - 0x1592651fff 0x1592652000 - 0x1592652fff 0x1592653000 - 0x1592653fff 0x1592654000 - 0x1592657fff 0x1592658000 - 0x1592658fff 0x1592659000 - 0x1592659fff 0x159265a000 - 0x159265bfff 0x159265c000 - 0x159265cfff 0x159265d000 - 0x159265dfff 0x159265e000 - 0x15927c9fff 0x15927ca000 - 0x15927ccfff 0x15927cd000 - 0x15927cdfff 0x15927ce000 - 0x15927d0fff 0x15927d1000 - 0x15927e3fff 0x15927e4000 - 0x15927e4fff 0x15927e5000 - 0x15927e5fff 0x15927e6000 - 0x1592903fff 0x1592904000 - 0x1592906fff 0x1592907000 - 0x1592909fff 0x159290a000 - 0x159290efff 0x159290f000 - 0x1592963fff 0x1592964000 - 0x159300efff 0x3fffcd4000 - 0x3fffcf4fff 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 0x7767000 - 0x7787fff 0x80000000 - 0x800bffff 0x1558c12000 - 0x1558c2cfff 0x1558c2d000 - 0x1558c2dfff 0x1558c2e000 - 0x1558c2efff 0x1558c2f000 - 0x1558c30fff 0x1558c31000 - 0x1558c32fff 0x1558c33000 - 0x1558c39fff 0x1558c3a000 - 0x1558c3afff 0x1558c3b000 - 0x1558c3bfff 0x1558c3d000 - 0x1558c3efff 0x1558c3f000 - 0x1558c7dfff 0x1558c7e000 - 0x1558c7ffff 0x1558c80000 - 0x1558c86fff 0x1558c87000 - 0x1558c87fff 0x1558c88000 - 0x1558cadfff 0x1558cae000 - 0x1558cb1fff 0x1558cb2000 - 0x1558cb2fff 0x1558cb3000 - 0x1558cb4fff 0x1558cb5000 - 0x1558cb5fff 0x1558cb6000 - 0x1558cb6fff 0x1558cb7000 - 0x1558cb7fff 0x1558cb8000 - 0x1558cbbfff 0x1558cbc000 - 0x1558cbcfff 0x1558cbd000 - 0x1558cbdfff 0x1558cbe000 - 0x1558cbffff 0x1558cc0000 - 0x1558cc0fff 0x1558cc1000 - 0x1558cc1fff 0x1558cc2000 - 0x1558e2dfff 0x1558e2e000 - 0x1558e30fff 0x1558e31000 - 0x1558e31fff 0x1558e32000 - 0x1558e34fff 0x1558e35000 - 0x1558e47fff 0x1558e48000 - 0x1558e48fff 0x1558e49000 - 0x1558e49fff 0x1558e4a000 - 0x1558f67fff 0x1558f68000 - 0x1558f6afff 0x1558f6b000 - 0x1558f6dfff 0x1558f6e000 - 0x1558f72fff 0x1558f73000 - 0x1558fc7fff 0x1558fc8000 - 0x1559672fff 0x3fffba7000 - 0x3fffbc7fff 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 0x3532b000 - 0x3534bfff 0x80000000 - 0x800bffff 0x1561f3b000 - 0x1561f55fff 0x1561f56000 - 0x1561f56fff 0x1561f57000 - 0x1561f57fff 0x1561f58000 - 0x1561f59fff 0x1561f5a000 - 0x1561f5bfff 0x1561f5c000 - 0x1561f62fff 0x1561f63000 - 0x1561f63fff 0x1561f64000 - 0x1561f64fff 0x1561f66000 - 0x1561f67fff 0x1561f68000 - 0x1561fa6fff 0x1561fa7000 - 0x1561fa8fff 0x1561fa9000 - 0x1561faffff 0x1561fb0000 - 0x1561fb0fff 0x1561fb1000 - 0x1561fd6fff 0x1561fd7000 - 0x1561fdafff 0x1561fdb000 - 0x1561fdbfff 0x1561fdc000 - 0x1561fddfff 0x1561fde000 - 0x1561fdefff 0x1561fdf000 - 0x1561fdffff 0x1561fe0000 - 0x1561fe0fff 0x1561fe1000 - 0x1561fe4fff 0x1561fe5000 - 0x1561fe5fff 0x1561fe6000 - 0x1561fe6fff 0x1561fe7000 - 0x1561fe8fff 0x1561fe9000 - 0x1561fe9fff 0x1561fea000 - 0x1561feafff 0x1561feb000 - 0x1562156fff 0x1562157000 - 0x1562159fff 0x156215a000 - 0x156215afff 0x156215b000 - 0x156215dfff 0x156215e000 - 0x1562170fff 0x1562171000 - 0x1562171fff 0x1562172000 - 0x1562172fff 0x1562173000 - 0x1562290fff 0x1562291000 - 0x1562293fff 0x1562294000 - 0x1562296fff 0x1562297000 - 0x156229bfff 0x156229c000 - 0x15622f0fff 0x15622f1000 - 0x156299bfff 0x3fff88f000 - 0x3fff8affff 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 0x3ba72000 - 0x3ba92fff 0x80000000 - 0x800bffff 0x1564e53000 - 0x1564e6dfff 0x1564e6e000 - 0x1564e6efff 0x1564e6f000 - 0x1564e6ffff 0x1564e70000 - 0x1564e71fff 0x1564e72000 - 0x1564e73fff 0x1564e74000 - 0x1564e7afff 0x1564e7b000 - 0x1564e7bfff 0x1564e7c000 - 0x1564e7cfff 0x1564e7e000 - 0x1564e7ffff 0x1564e80000 - 0x1564ebefff 0x1564ebf000 - 0x1564ec0fff 0x1564ec1000 - 0x1564ec7fff 0x1564ec8000 - 0x1564ec8fff 0x1564ec9000 - 0x1564eeefff 0x1564eef000 - 0x1564ef2fff 0x1564ef3000 - 0x1564ef3fff 0x1564ef4000 - 0x1564ef5fff 0x1564ef6000 - 0x1564ef6fff 0x1564ef7000 - 0x1564ef7fff 0x1564ef8000 - 0x1564ef8fff 0x1564ef9000 - 0x1564efcfff 0x1564efd000 - 0x1564efdfff 0x1564efe000 - 0x1564efefff 0x1564eff000 - 0x1564f00fff 0x1564f01000 - 0x1564f01fff 0x1564f02000 - 0x1564f02fff 0x1564f03000 - 0x156506efff 0x156506f000 - 0x1565071fff 0x1565072000 - 0x1565072fff 0x1565073000 - 0x1565075fff 0x1565076000 - 0x1565088fff 0x1565089000 - 0x1565089fff 0x156508a000 - 0x156508afff 0x156508b000 - 0x15651a8fff 0x15651a9000 - 0x15651abfff 0x15651ac000 - 0x15651aefff 0x15651af000 - 0x15651b3fff 0x15651b4000 - 0x1565208fff 0x1565209000 - 0x15658b3fff 0x3fffbf1000 - 0x3fffc11fff 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 0x9e26000 - 0x9e46fff 0x80000000 - 0x800bffff 0x1580677000 - 0x1580691fff 0x1580692000 - 0x1580692fff 0x1580693000 - 0x1580693fff 0x1580694000 - 0x1580695fff 0x1580696000 - 0x1580697fff 0x1580698000 - 0x158069efff 0x158069f000 - 0x158069ffff 0x15806a0000 - 0x15806a0fff 0x15806a2000 - 0x15806a3fff 0x15806a4000 - 0x15806e2fff 0x15806e3000 - 0x15806e4fff 0x15806e5000 - 0x15806ebfff 0x15806ec000 - 0x15806ecfff 0x15806ed000 - 0x1580712fff 0x1580713000 - 0x1580716fff 0x1580717000 - 0x1580717fff 0x1580718000 - 0x1580719fff 0x158071a000 - 0x158071afff 0x158071b000 - 0x158071bfff 0x158071c000 - 0x158071cfff 0x158071d000 - 0x1580720fff 0x1580721000 - 0x1580721fff 0x1580722000 - 0x1580722fff 0x1580723000 - 0x1580724fff 0x1580725000 - 0x1580725fff 0x1580726000 - 0x1580726fff 0x1580727000 - 0x1580892fff 0x1580893000 - 0x1580895fff 0x1580896000 - 0x1580896fff 0x1580897000 - 0x1580899fff 0x158089a000 - 0x15808acfff 0x15808ad000 - 0x15808adfff 0x15808ae000 - 0x15808aefff 0x15808af000 - 0x15809ccfff 0x15809cd000 - 0x15809cffff 0x15809d0000 - 0x15809d2fff 0x15809d3000 - 0x15809d7fff 0x15809d8000 - 0x1580a2cfff 0x1580a2d000 - 0x15810d7fff 0x3fffb66000 - 0x3fffb86fff *** - 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 0x239b9000 - 0x239d9fff 0x80000000 - 0x800bffff 0x156b9fa000 - 0x156ba14fff 0x156ba15000 - 0x156ba15fff 0x156ba16000 - 0x156ba16fff 0x156ba17000 - 0x156ba18fff 0x156ba19000 - 0x156ba1afff 0x156ba1b000 - 0x156ba21fff 0x156ba22000 - 0x156ba22fff 0x156ba23000 - 0x156ba23fff 0x156ba25000 - 0x156ba26fff 0x156ba27000 - 0x156ba65fff 0x156ba66000 - 0x156ba67fff 0x156ba68000 - 0x156ba6efff 0x156ba6f000 - 0x156ba6ffff 0x156ba70000 - 0x156ba95fff 0x156ba96000 - 0x156ba99fff 0x156ba9a000 - 0x156ba9afff 0x156ba9b000 - 0x156ba9cfff 0x156ba9d000 - 0x156ba9dfff 0x156ba9e000 - 0x156ba9efff 0x156ba9f000 - 0x156ba9ffff 0x156baa0000 - 0x156baa3fff 0x156baa4000 - 0x156baa4fff 0x156baa5000 - 0x156baa5fff 0x156baa6000 - 0x156baa7fff 0x156baa8000 - 0x156baa8fff 0x156baa9000 - 0x156baa9fff 0x156baaa000 - 0x156bc15fff 0x156bc16000 - 0x156bc18fff 0x156bc19000 - 0x156bc19fff 0x156bc1a000 - 0x156bc1cfff 0x156bc1d000 - 0x156bc2ffff 0x156bc30000 - 0x156bc30fff 0x156bc31000 - 0x156bc31fff 0x156bc32000 - 0x156bd4ffff 0x156bd50000 - 0x156bd52fff 0x156bd53000 - 0x156bd55fff 0x156bd56000 - 0x156bd5afff 0x156bd5b000 - 0x156bdaffff 0x156bdb0000 - 0x156c45afff 0x3fffd64000 - 0x3fffd84fff #P"/proc/41173/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 0x16fd000 - 0x171dfff 0x80000000 - 0x800bffff 0x155a563000 - 0x155a57dfff 0x155a57e000 - 0x155a57efff 0x155a57f000 - 0x155a57ffff 0x155a580000 - 0x155a581fff 0x155a582000 - 0x155a583fff 0x155a584000 - 0x155a58afff 0x155a58b000 - 0x155a58bfff 0x155a58c000 - 0x155a58cfff 0x155a58e000 - 0x155a58ffff 0x155a590000 - 0x155a5cefff 0x155a5cf000 - 0x155a5d0fff 0x155a5d1000 - 0x155a5d7fff 0x155a5d8000 - 0x155a5d8fff 0x155a5d9000 - 0x155a5fefff 0x155a5ff000 - 0x155a602fff 0x155a603000 - 0x155a603fff 0x155a604000 - 0x155a605fff 0x155a606000 - 0x155a606fff 0x155a607000 - 0x155a607fff 0x155a608000 - 0x155a608fff 0x155a609000 - 0x155a60cfff 0x155a60d000 - 0x155a60dfff 0x155a60e000 - 0x155a60efff 0x155a60f000 - 0x155a610fff 0x155a611000 - 0x155a611fff 0x155a612000 - 0x155a612fff 0x155a613000 - 0x155a77efff 0x155a77f000 - 0x155a781fff 0x155a782000 - 0x155a782fff 0x155a783000 - 0x155a785fff 0x155a786000 - 0x155a798fff 0x155a799000 - 0x155a799fff 0x155a79a000 - 0x155a79afff 0x155a79b000 - 0x155a8b8fff 0x155a8b9000 - 0x155a8bbfff 0x155a8bc000 - 0x155a8befff 0x155a8bf000 - 0x155a8c3fff 0x155a8c4000 - 0x155a918fff 0x155a919000 - 0x155afc3fff 0x3fffa93000 - 0x3fffab3fff #P"/proc/41175/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 0x2807c000 - 0x2809cfff 0x80000000 - 0x800bffff 0x1588da4000 - 0x1588dbefff 0x1588dbf000 - 0x1588dbffff 0x1588dc0000 - 0x1588dc0fff 0x1588dc1000 - 0x1588dc2fff 0x1588dc3000 - 0x1588dc4fff 0x1588dc5000 - 0x1588dcbfff 0x1588dcc000 - 0x1588dccfff 0x1588dcd000 - 0x1588dcdfff 0x1588dce000 - 0x1588dcefff 0x1588dcf000 - 0x1588dd0fff 0x1588dd1000 - 0x1588e0ffff 0x1588e10000 - 0x1588e11fff 0x1588e12000 - 0x1588e18fff 0x1588e19000 - 0x1588e19fff 0x1588e1a000 - 0x1588e3ffff 0x1588e40000 - 0x1588e43fff 0x1588e44000 - 0x1588e44fff 0x1588e45000 - 0x1588e46fff 0x1588e47000 - 0x1588e47fff 0x1588e48000 - 0x1588e48fff 0x1588e49000 - 0x1588e49fff 0x1588e4a000 - 0x1588e4dfff 0x1588e4e000 - 0x1588e4efff 0x1588e4f000 - 0x1588e4ffff 0x1588e50000 - 0x1588e51fff 0x1588e52000 - 0x1588e52fff 0x1588e53000 - 0x1588e53fff 0x1588e54000 - 0x1588fbffff 0x1588fc0000 - 0x1588fc2fff 0x1588fc3000 - 0x1588fc3fff 0x1588fc4000 - 0x1588fc6fff 0x1588fc7000 - 0x1588fd9fff 0x1588fda000 - 0x1588fdafff 0x1588fdb000 - 0x1588fdbfff 0x1588fdc000 - 0x15890f9fff 0x15890fa000 - 0x15890fcfff 0x15890fd000 - 0x15890fffff 0x1589100000 - 0x1589104fff 0x1589105000 - 0x1589159fff 0x158915a000 - 0x1589804fff 0x1589805000 - 0x1589807fff 0x1589808000 - 0x1589809fff 0x158980a000 - 0x158980afff 0x158980b000 - 0x158980bfff 0x3fffb74000 - 0x3fffb94fff 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 0x3fac6000 - 0x3fae6fff 0x80000000 - 0x800bffff 0x158072a000 - 0x1580744fff 0x1580745000 - 0x1580745fff 0x1580746000 - 0x1580746fff 0x1580747000 - 0x1580748fff 0x1580749000 - 0x158074afff 0x158074b000 - 0x1580751fff 0x1580752000 - 0x1580752fff 0x1580753000 - 0x1580753fff 0x1580754000 - 0x1580754fff 0x1580755000 - 0x1580756fff 0x1580757000 - 0x1580795fff 0x1580796000 - 0x1580797fff 0x1580798000 - 0x158079efff 0x158079f000 - 0x158079ffff 0x15807a0000 - 0x15807c5fff 0x15807c6000 - 0x15807c9fff 0x15807ca000 - 0x15807cafff 0x15807cb000 - 0x15807ccfff 0x15807cd000 - 0x15807cdfff 0x15807ce000 - 0x15807cefff 0x15807cf000 - 0x15807cffff 0x15807d0000 - 0x15807d3fff 0x15807d4000 - 0x15807d4fff 0x15807d5000 - 0x15807d5fff 0x15807d6000 - 0x15807d7fff 0x15807d8000 - 0x15807d8fff 0x15807d9000 - 0x15807d9fff 0x15807da000 - 0x1580945fff 0x1580946000 - 0x1580948fff 0x1580949000 - 0x1580949fff 0x158094a000 - 0x158094cfff 0x158094d000 - 0x158095ffff 0x1580960000 - 0x1580960fff 0x1580961000 - 0x1580961fff 0x1580962000 - 0x1580a7ffff 0x1580a80000 - 0x1580a82fff 0x1580a83000 - 0x1580a85fff 0x1580a86000 - 0x1580a8afff 0x1580a8b000 - 0x1580adffff 0x1580ae0000 - 0x158118afff 0x158118b000 - 0x158118dfff 0x158118e000 - 0x158118ffff 0x1581190000 - 0x1581190fff 0x1581191000 - 0x1581191fff 0x3fffd25000 - 0x3fffd45fff 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 3820138569)" EQL-OK: T (STRINGP (SHOW (MACHINE-INSTANCE))) "fedora-riscv-11.gcc129.osuosl.org [192.168.122.76]" 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-01-20 09:41:49 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/ 4096 2021-01-20 09:41:49 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/ 4096 2021-01-20 09:41:49 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/ 4096 2021-01-20 09:41:49 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/baz/ 4096 2021-01-20 09:41:49 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-01-20 09:41:49 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/ 4096 2021-01-20 09:41:49 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/ 4096 2021-01-20 09:41:49 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/ 4096 2021-01-20 09:41:49 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/ext-clisp-tst/foo/bar/baz/ 4096 2021-01-20 09:41:49 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 0xb4a3000 - 0xb4c3fff 0x80000000 - 0x800bffff 0x156ec26000 - 0x156ec40fff 0x156ec41000 - 0x156ec41fff 0x156ec42000 - 0x156ec42fff 0x156ec43000 - 0x156ec44fff 0x156ec45000 - 0x156ec46fff 0x156ec47000 - 0x156ec4dfff 0x156ec51000 - 0x156ec52fff 0x156ec53000 - 0x156ec91fff 0x156ec92000 - 0x156ec93fff 0x156ec94000 - 0x156ec9afff 0x156ec9b000 - 0x156ec9bfff 0x156ec9c000 - 0x156ecc1fff 0x156ecc2000 - 0x156ecc5fff 0x156ecc6000 - 0x156ecc6fff 0x156ecc7000 - 0x156ecc8fff 0x156ecc9000 - 0x156ecc9fff 0x156ecca000 - 0x156eccafff 0x156eccb000 - 0x156eccbfff 0x156eccc000 - 0x156eccffff 0x156ecd0000 - 0x156ecd0fff 0x156ecd1000 - 0x156ecd1fff 0x156ecd2000 - 0x156ecd3fff 0x156ecd4000 - 0x156ecd4fff 0x156ecd5000 - 0x156ecd5fff 0x156ecd6000 - 0x156ee41fff 0x156ee42000 - 0x156ee44fff 0x156ee45000 - 0x156ee45fff 0x156ee46000 - 0x156ee48fff 0x156ee49000 - 0x156ee5bfff 0x156ee5c000 - 0x156ee5cfff 0x156ee5d000 - 0x156ee5dfff 0x156ee5e000 - 0x156ef7bfff 0x156ef7c000 - 0x156ef7efff 0x156ef7f000 - 0x156ef81fff 0x156ef82000 - 0x156ef86fff 0x3fffdc0000 - 0x3fffde0fff Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x13f79000 - 0x13f99fff 0x80000000 - 0x800bffff 0x158b320000 - 0x158b33afff 0x158b33b000 - 0x158b33bfff 0x158b33c000 - 0x158b33cfff 0x158b33d000 - 0x158b33efff 0x158b33f000 - 0x158b340fff 0x158b341000 - 0x158b347fff 0x158b34b000 - 0x158b34cfff 0x158b34d000 - 0x158b38bfff 0x158b38c000 - 0x158b38dfff 0x158b38e000 - 0x158b394fff 0x158b395000 - 0x158b395fff 0x158b396000 - 0x158b3bbfff 0x158b3bc000 - 0x158b3bffff 0x158b3c0000 - 0x158b3c0fff 0x158b3c1000 - 0x158b3c2fff 0x158b3c3000 - 0x158b3c3fff 0x158b3c4000 - 0x158b3c4fff 0x158b3c5000 - 0x158b3c5fff 0x158b3c6000 - 0x158b3c9fff 0x158b3ca000 - 0x158b3cafff 0x158b3cb000 - 0x158b3cbfff 0x158b3cc000 - 0x158b3cdfff 0x158b3ce000 - 0x158b3cefff 0x158b3cf000 - 0x158b3cffff 0x158b3d0000 - 0x158b53bfff 0x158b53c000 - 0x158b53efff 0x158b53f000 - 0x158b53ffff 0x158b540000 - 0x158b542fff 0x158b543000 - 0x158b555fff 0x158b556000 - 0x158b556fff 0x158b557000 - 0x158b557fff 0x158b558000 - 0x158b675fff 0x158b676000 - 0x158b678fff 0x158b679000 - 0x158b67bfff 0x158b67c000 - 0x158b680fff 0x3fffb75000 - 0x3fffb95fff 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 0x3c86e000 - 0x3c88efff 0x80000000 - 0x800bffff 0x158fff6000 - 0x1590010fff 0x1590011000 - 0x1590011fff 0x1590012000 - 0x1590012fff 0x1590013000 - 0x1590014fff 0x1590015000 - 0x1590016fff 0x1590017000 - 0x159001dfff 0x1590021000 - 0x1590022fff 0x1590023000 - 0x1590061fff 0x1590062000 - 0x1590063fff 0x1590064000 - 0x159006afff 0x159006b000 - 0x159006bfff 0x159006c000 - 0x1590091fff 0x1590092000 - 0x1590095fff 0x1590096000 - 0x1590096fff 0x1590097000 - 0x1590098fff 0x1590099000 - 0x1590099fff 0x159009a000 - 0x159009afff 0x159009b000 - 0x159009bfff 0x159009c000 - 0x159009ffff 0x15900a0000 - 0x15900a0fff 0x15900a1000 - 0x15900a1fff 0x15900a2000 - 0x15900a3fff 0x15900a4000 - 0x15900a4fff 0x15900a5000 - 0x15900a5fff 0x15900a6000 - 0x1590211fff 0x1590212000 - 0x1590214fff 0x1590215000 - 0x1590215fff 0x1590216000 - 0x1590218fff 0x1590219000 - 0x159022bfff 0x159022c000 - 0x159022cfff 0x159022d000 - 0x159022dfff 0x159022e000 - 0x159034bfff 0x159034c000 - 0x159034efff 0x159034f000 - 0x1590351fff 0x1590352000 - 0x1590356fff 0x3fff995000 - 0x3fff9b5fff 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)))) 41195 Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x170fff 0x172000 - 0x19cfff 0x19d000 - 0x1cafff 0x1cb000 - 0x1cdfff 0x167c000 - 0x169cfff 0x80000000 - 0x800bffff 0x1569bac000 - 0x1569bc6fff 0x1569bc7000 - 0x1569bc7fff 0x1569bc8000 - 0x1569bc8fff 0x1569bc9000 - 0x1569bcafff 0x1569bcb000 - 0x1569bccfff 0x1569bcd000 - 0x1569bd3fff 0x1569bd7000 - 0x1569bd8fff 0x1569bd9000 - 0x1569c17fff 0x1569c18000 - 0x1569c19fff 0x1569c1a000 - 0x1569c20fff 0x1569c21000 - 0x1569c21fff 0x1569c22000 - 0x1569c47fff 0x1569c48000 - 0x1569c4bfff 0x1569c4c000 - 0x1569c4cfff 0x1569c4d000 - 0x1569c4efff 0x1569c4f000 - 0x1569c4ffff 0x1569c50000 - 0x1569c50fff 0x1569c51000 - 0x1569c51fff 0x1569c52000 - 0x1569c55fff 0x1569c56000 - 0x1569c56fff 0x1569c57000 - 0x1569c57fff 0x1569c58000 - 0x1569c59fff 0x1569c5a000 - 0x1569c5afff 0x1569c5b000 - 0x1569c5bfff 0x1569c5c000 - 0x1569dc7fff 0x1569dc8000 - 0x1569dcafff 0x1569dcb000 - 0x1569dcbfff 0x1569dcc000 - 0x1569dcefff 0x1569dcf000 - 0x1569de1fff 0x1569de2000 - 0x1569de2fff 0x1569de3000 - 0x1569de3fff 0x1569de4000 - 0x1569f01fff 0x1569f02000 - 0x1569f04fff 0x1569f05000 - 0x1569f07fff 0x1569f08000 - 0x1569f0cfff 0x3fffd5d000 - 0x3fffd7dfff 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))))) [1]> 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/ U00070765]" 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-11.gcc129.osuosl.org" "fedora-riscv-11.gcc129.osuosl.org [192.168.122.76]" 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-474019 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-474029 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-474310 : #:B-474312 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/" (16 44 9 20 1 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/" (16 44 9 20 1 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/" (16 44 9 20 1 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/" (16 44 9 20 1 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/" (16 44 9 20 1 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/" (16 44 9 20 1 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/" (16 44 9 20 1 2021) 4096)) /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/f 0 2021-01-20 09:44:16 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/s1/f 0 2021-01-20 09:44:16 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/s2/f 0 2021-01-20 09:44:16 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/f 0 2021-01-20 09:44:16 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/s1/f 0 2021-01-20 09:44:16 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/s2/f 0 2021-01-20 09:44:16 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/f 0 2021-01-20 09:44:16 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/ 4096 2021-01-20 09:44:16 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/ 4096 2021-01-20 09:44:16 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/s1/ 4096 2021-01-20 09:44:16 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d1/s2/ 4096 2021-01-20 09:44:16 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/ 4096 2021-01-20 09:44:16 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/s1/ 4096 2021-01-20 09:44:16 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-my-dir/d2/s2/ 4096 2021-01-20 09:44:16 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"/" 3820133794 4096) EQL-OK: T (EQUALP (SHOW (MULTIPLE-VALUE-LIST (PROBE-PATHNAME "/etc"))) (SHOW (MULTIPLE-VALUE-LIST (PROBE-PATHNAME "/etc/")))) (#P"/etc/" #P"/etc/" 3820134860 4096) (#P"/etc/" #P"/etc/" 3820134860 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/" 3820142656 4096) (#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/" 3820142656 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" 3820142656 0) (#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/test-pathname" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/test-pathname" 3820142656 0) (#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/test-pathname" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/test-pathname" 3820142656 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-01-20 09:44:16 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-load-weird-dir/weird  0 2021-01-20 09:44:16 /builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/tests/path-tst-load-weird-dir/ 4096 2021-01-20 09:44:16 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-11.gcc129.osuosl.org)" 48510) ("127.0.0.1 (localhost)" 9096) ("127.0.0.1 (fedora-riscv-11.gcc129.osuosl.org)" 9096) ("127.0.0.1 (localhost)" 48510)) 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 0x22468000 - 0x22488fff 0x80000000 - 0x800bffff 0x1561c80000 - 0x1561c9afff 0x1561c9b000 - 0x1561c9bfff 0x1561c9c000 - 0x1561c9cfff 0x1561c9d000 - 0x1561c9efff 0x1561c9f000 - 0x1561ca0fff 0x1561ca1000 - 0x1561ca7fff 0x1561cab000 - 0x1561cacfff 0x1561cad000 - 0x1561cebfff 0x1561cec000 - 0x1561cedfff 0x1561cee000 - 0x1561cf4fff 0x1561cf5000 - 0x1561cf5fff 0x1561cf6000 - 0x1561d1bfff 0x1561d1c000 - 0x1561d1ffff 0x1561d20000 - 0x1561d20fff 0x1561d21000 - 0x1561d22fff 0x1561d23000 - 0x1561d23fff 0x1561d24000 - 0x1561d24fff 0x1561d25000 - 0x1561d25fff 0x1561d26000 - 0x1561d29fff 0x1561d2a000 - 0x1561d2afff 0x1561d2b000 - 0x1561d2bfff 0x1561d2c000 - 0x1561d2dfff 0x1561d2e000 - 0x1561d2efff 0x1561d2f000 - 0x1561d2ffff 0x1561d30000 - 0x1561e9bfff 0x1561e9c000 - 0x1561e9efff 0x1561e9f000 - 0x1561e9ffff 0x1561ea0000 - 0x1561ea2fff 0x1561ea3000 - 0x1561eb5fff 0x1561eb6000 - 0x1561eb6fff 0x1561eb7000 - 0x1561eb7fff 0x1561eb8000 - 0x1561fd5fff 0x1561fd6000 - 0x1561fd8fff 0x1561fd9000 - 0x1561fdbfff 0x1561fdc000 - 0x1561fe0fff 0x3fff839000 - 0x3fff859fff 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 0x25c2f000 - 0x25c4ffff 0x80000000 - 0x800bffff 0x156b495000 - 0x156b4affff 0x156b4b0000 - 0x156b4b0fff 0x156b4b1000 - 0x156b4b1fff 0x156b4b2000 - 0x156b4b3fff 0x156b4b4000 - 0x156b4b5fff 0x156b4b6000 - 0x156b4bcfff 0x156b4c0000 - 0x156b4c1fff 0x156b4c2000 - 0x156b500fff 0x156b501000 - 0x156b502fff 0x156b503000 - 0x156b509fff 0x156b50a000 - 0x156b50afff 0x156b50b000 - 0x156b530fff 0x156b531000 - 0x156b534fff 0x156b535000 - 0x156b535fff 0x156b536000 - 0x156b537fff 0x156b538000 - 0x156b538fff 0x156b539000 - 0x156b539fff 0x156b53a000 - 0x156b53afff 0x156b53b000 - 0x156b53efff 0x156b53f000 - 0x156b53ffff 0x156b540000 - 0x156b540fff 0x156b541000 - 0x156b542fff 0x156b543000 - 0x156b543fff 0x156b544000 - 0x156b544fff 0x156b545000 - 0x156b6b0fff 0x156b6b1000 - 0x156b6b3fff 0x156b6b4000 - 0x156b6b4fff 0x156b6b5000 - 0x156b6b7fff 0x156b6b8000 - 0x156b6cafff 0x156b6cb000 - 0x156b6cbfff 0x156b6cc000 - 0x156b6ccfff 0x156b6cd000 - 0x156b7eafff 0x156b7eb000 - 0x156b7edfff 0x156b7ee000 - 0x156b7f0fff 0x156b7f1000 - 0x156b7f5fff 0x3fffd1b000 - 0x3fffd3bfff [OS-ERROR]: OS-ERROR(104): Connection reset by peer READ-CHAR [SIMPLE-END-OF-FILE]: READ: input stream #1=# has reached its end 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: 312.81198 sec. Run time: 311.87186 sec. Space: 127793360 Bytes GC: 43, GC time: 3.759337 sec. EQL-OK: NIL (TIME-LOOP 4300066700 4300181201 10) (:GOOD 4300066700 NIL) Real time: 3.723152 sec. Run time: 3.712118 sec. Space: 1465776 Bytes EQL-OK: NIL (TIME-LOOP 100000 5000000000 5000 0) (:GOOD 100000 NIL) Real time: 109.069695 sec. Run time: 108.73483 sec. Space: 127793488 Bytes GC: 43, GC time: 4.031165 sec. EQL-OK: NIL (TIME-LOOP 4300066700 4300081201 10 0) (:GOOD 4300066700 NIL) Real time: 0.241111 sec. Run time: 0.23984 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.155845 sec. Run time: 0.155361 sec. Space: 0 Bytes GC: 1, GC time: 0.154885 sec. Real time: 0.087187 sec. Run time: 0.08677 sec. Space: 0 Bytes GC: 1, GC time: 0.086397 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.136352 sec. Run time: 0.136127 sec. Space: 0 Bytes GC: 1, GC time: 0.135739 sec. Real time: 0.091387 sec. Run time: 0.091144 sec. Space: 0 Bytes GC: 1, GC time: 0.090766 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: 1002.0515 sec. Run time: 991.2137 sec. Space: 1358383648 Bytes GC: 789, GC time: 60.293465 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 1430 Jan 20 09:44 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 0xc200000 - 0xc220fff 0x80000000 - 0x800bffff 0x1555dc6000 - 0x1555de0fff 0x1555de1000 - 0x1555de1fff 0x1555de2000 - 0x1555de2fff 0x1555de3000 - 0x1555de4fff 0x1555de5000 - 0x1555de6fff 0x1555de7000 - 0x1555dedfff 0x1555dee000 - 0x1555deefff 0x1555def000 - 0x1555deffff 0x1555df1000 - 0x1555df2fff 0x1555df3000 - 0x1555e31fff 0x1555e32000 - 0x1555e33fff 0x1555e34000 - 0x1555e3afff 0x1555e3b000 - 0x1555e3bfff 0x1555e3c000 - 0x1555e61fff 0x1555e62000 - 0x1555e65fff 0x1555e66000 - 0x1555e66fff 0x1555e67000 - 0x1555e68fff 0x1555e69000 - 0x1555e69fff 0x1555e6a000 - 0x1555e6afff 0x1555e6b000 - 0x1555e6bfff 0x1555e6c000 - 0x1555e6ffff 0x1555e70000 - 0x1555e70fff 0x1555e71000 - 0x1555e71fff 0x1555e72000 - 0x1555e73fff 0x1555e74000 - 0x1555e74fff 0x1555e75000 - 0x1555e75fff 0x1555e76000 - 0x1555fe1fff 0x1555fe2000 - 0x1555fe4fff 0x1555fe5000 - 0x1555fe5fff 0x1555fe6000 - 0x1555fe8fff 0x1555fe9000 - 0x1555ffbfff 0x1555ffc000 - 0x1555ffcfff 0x1555ffd000 - 0x1555ffdfff 0x1555ffe000 - 0x155611bfff 0x155611c000 - 0x155611efff 0x155611f000 - 0x1556121fff 0x1556122000 - 0x1556126fff 0x1556127000 - 0x155617bfff 0x155617c000 - 0x1556826fff 0x3fffcc9000 - 0x3fffce9fff 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,344,976 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 ; 41882 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 0x145ea000 - 0x1460afff 0x80000000 - 0x800bffff 0x1594a03000 - 0x1594a1dfff 0x1594a1e000 - 0x1594a1efff 0x1594a1f000 - 0x1594a1ffff 0x1594a20000 - 0x1594a21fff 0x1594a22000 - 0x1594a23fff 0x1594a24000 - 0x1594a2afff 0x1594a2b000 - 0x1594a2bfff 0x1594a2c000 - 0x1594a2cfff 0x1594a2e000 - 0x1594a2ffff 0x1594a30000 - 0x1594a6efff 0x1594a6f000 - 0x1594a70fff 0x1594a71000 - 0x1594a77fff 0x1594a78000 - 0x1594a78fff 0x1594a79000 - 0x1594a9efff 0x1594a9f000 - 0x1594aa2fff 0x1594aa3000 - 0x1594aa3fff 0x1594aa4000 - 0x1594aa5fff 0x1594aa6000 - 0x1594aa6fff 0x1594aa7000 - 0x1594aa7fff 0x1594aa8000 - 0x1594aa8fff 0x1594aa9000 - 0x1594aacfff 0x1594aad000 - 0x1594aadfff 0x1594aae000 - 0x1594aaefff 0x1594aaf000 - 0x1594ab0fff 0x1594ab1000 - 0x1594ab1fff 0x1594ab2000 - 0x1594ab2fff 0x1594ab3000 - 0x1594c1efff 0x1594c1f000 - 0x1594c21fff 0x1594c22000 - 0x1594c22fff 0x1594c23000 - 0x1594c25fff 0x1594c26000 - 0x1594c38fff 0x1594c39000 - 0x1594c39fff 0x1594c3a000 - 0x1594c3afff 0x1594c3b000 - 0x1594d58fff 0x1594d59000 - 0x1594d5bfff 0x1594d5c000 - 0x1594d5efff 0x1594d5f000 - 0x1594d63fff 0x1594d64000 - 0x1594db8fff 0x1594db9000 - 0x1595463fff 0x3fffeba000 - 0x3fffedafff 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 ; 48029 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 0x29b7e000 - 0x29b9efff 0x80000000 - 0x800bffff 0x156d60c000 - 0x156d626fff 0x156d627000 - 0x156d627fff 0x156d628000 - 0x156d628fff 0x156d629000 - 0x156d62afff 0x156d62b000 - 0x156d62cfff 0x156d62d000 - 0x156d633fff 0x156d634000 - 0x156d634fff 0x156d635000 - 0x156d635fff 0x156d637000 - 0x156d638fff 0x156d639000 - 0x156d677fff 0x156d678000 - 0x156d679fff 0x156d67a000 - 0x156d680fff 0x156d681000 - 0x156d681fff 0x156d682000 - 0x156d6a7fff 0x156d6a8000 - 0x156d6abfff 0x156d6ac000 - 0x156d6acfff 0x156d6ad000 - 0x156d6aefff 0x156d6af000 - 0x156d6affff 0x156d6b0000 - 0x156d6b0fff 0x156d6b1000 - 0x156d6b1fff 0x156d6b2000 - 0x156d6b5fff 0x156d6b6000 - 0x156d6b6fff 0x156d6b7000 - 0x156d6b7fff 0x156d6b8000 - 0x156d6b9fff 0x156d6ba000 - 0x156d6bafff 0x156d6bb000 - 0x156d6bbfff 0x156d6bc000 - 0x156d827fff 0x156d828000 - 0x156d82afff 0x156d82b000 - 0x156d82bfff 0x156d82c000 - 0x156d82efff 0x156d82f000 - 0x156d841fff 0x156d842000 - 0x156d842fff 0x156d843000 - 0x156d843fff 0x156d844000 - 0x156d961fff 0x156d962000 - 0x156d964fff 0x156d965000 - 0x156d967fff 0x156d968000 - 0x156d96cfff 0x156d96d000 - 0x156d9c1fff 0x156d9c2000 - 0x156e06cfff 0x3fff8f2000 - 0x3fff912fff 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 0x3e5d9000 - 0x3e5f9fff 0x80000000 - 0x800bffff 0x1571f83000 - 0x1571f9dfff 0x1571f9e000 - 0x1571f9efff 0x1571f9f000 - 0x1571f9ffff 0x1571fa0000 - 0x1571fa1fff 0x1571fa2000 - 0x1571fa3fff 0x1571fa4000 - 0x1571faafff 0x1571fab000 - 0x1571fabfff 0x1571fac000 - 0x1571facfff 0x1571fae000 - 0x1571faffff 0x1571fb0000 - 0x1571feefff 0x1571fef000 - 0x1571ff0fff 0x1571ff1000 - 0x1571ff7fff 0x1571ff8000 - 0x1571ff8fff 0x1571ff9000 - 0x157201efff 0x157201f000 - 0x1572022fff 0x1572023000 - 0x1572023fff 0x1572024000 - 0x1572025fff 0x1572026000 - 0x1572026fff 0x1572027000 - 0x1572027fff 0x1572028000 - 0x1572028fff 0x1572029000 - 0x157202cfff 0x157202d000 - 0x157202dfff 0x157202e000 - 0x157202efff 0x157202f000 - 0x1572030fff 0x1572031000 - 0x1572031fff 0x1572032000 - 0x1572032fff 0x1572033000 - 0x157219efff 0x157219f000 - 0x15721a1fff 0x15721a2000 - 0x15721a2fff 0x15721a3000 - 0x15721a5fff 0x15721a6000 - 0x15721b8fff 0x15721b9000 - 0x15721b9fff 0x15721ba000 - 0x15721bafff 0x15721bb000 - 0x15722d8fff 0x15722d9000 - 0x15722dbfff 0x15722dc000 - 0x15722defff 0x15722df000 - 0x15722e3fff 0x15722e4000 - 0x1572338fff 0x1572339000 - 0x15729e3fff 0x3fff9b0000 - 0x3fff9d0fff 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,346,032 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 ; 66032 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 0x20cec000 - 0x20d0cfff 0x80000000 - 0x800bffff 0x15758b4000 - 0x15758cefff 0x15758cf000 - 0x15758cffff 0x15758d0000 - 0x15758d0fff 0x15758d1000 - 0x15758d2fff 0x15758d3000 - 0x15758d4fff 0x15758d5000 - 0x15758dbfff 0x15758dc000 - 0x15758dcfff 0x15758dd000 - 0x15758ddfff 0x15758df000 - 0x15758e0fff 0x15758e1000 - 0x157591ffff 0x1575920000 - 0x1575921fff 0x1575922000 - 0x1575928fff 0x1575929000 - 0x1575929fff 0x157592a000 - 0x157594ffff 0x1575950000 - 0x1575953fff 0x1575954000 - 0x1575954fff 0x1575955000 - 0x1575956fff 0x1575957000 - 0x1575957fff 0x1575958000 - 0x1575958fff 0x1575959000 - 0x1575959fff 0x157595a000 - 0x157595dfff 0x157595e000 - 0x157595efff 0x157595f000 - 0x157595ffff 0x1575960000 - 0x1575961fff 0x1575962000 - 0x1575962fff 0x1575963000 - 0x1575963fff 0x1575964000 - 0x1575acffff 0x1575ad0000 - 0x1575ad2fff 0x1575ad3000 - 0x1575ad3fff 0x1575ad4000 - 0x1575ad6fff 0x1575ad7000 - 0x1575ae9fff 0x1575aea000 - 0x1575aeafff 0x1575aeb000 - 0x1575aebfff 0x1575aec000 - 0x1575c09fff 0x1575c0a000 - 0x1575c0cfff 0x1575c0d000 - 0x1575c0ffff 0x1575c10000 - 0x1575c14fff 0x1575c15000 - 0x1575c69fff 0x1575c6a000 - 0x1576314fff 0x3fffe35000 - 0x3fffe55fff 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 0x12397000 - 0x123b7fff 0x80000000 - 0x800bffff 0x156624b000 - 0x1566265fff 0x1566266000 - 0x1566266fff 0x1566267000 - 0x1566267fff 0x1566268000 - 0x1566269fff 0x156626a000 - 0x156626bfff 0x156626c000 - 0x1566272fff 0x1566273000 - 0x1566273fff 0x1566274000 - 0x1566274fff 0x1566276000 - 0x1566277fff 0x1566278000 - 0x15662b6fff 0x15662b7000 - 0x15662b8fff 0x15662b9000 - 0x15662bffff 0x15662c0000 - 0x15662c0fff 0x15662c1000 - 0x15662e6fff 0x15662e7000 - 0x15662eafff 0x15662eb000 - 0x15662ebfff 0x15662ec000 - 0x15662edfff 0x15662ee000 - 0x15662eefff 0x15662ef000 - 0x15662effff 0x15662f0000 - 0x15662f0fff 0x15662f1000 - 0x15662f4fff 0x15662f5000 - 0x15662f5fff 0x15662f6000 - 0x15662f6fff 0x15662f7000 - 0x15662f8fff 0x15662f9000 - 0x15662f9fff 0x15662fa000 - 0x15662fafff 0x15662fb000 - 0x1566466fff 0x1566467000 - 0x1566469fff 0x156646a000 - 0x156646afff 0x156646b000 - 0x156646dfff 0x156646e000 - 0x1566480fff 0x1566481000 - 0x1566481fff 0x1566482000 - 0x1566482fff 0x1566483000 - 0x15665a0fff 0x15665a1000 - 0x15665a3fff 0x15665a4000 - 0x15665a6fff 0x15665a7000 - 0x15665abfff 0x15665ac000 - 0x1566600fff 0x1566601000 - 0x1566cabfff 0x3fffd4d000 - 0x3fffd6dfff ./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 0x21e1b000 - 0x21e3bfff 0x80000000 - 0x800bffff 0x156ef16000 - 0x156ef30fff 0x156ef31000 - 0x156ef31fff 0x156ef32000 - 0x156ef32fff 0x156ef33000 - 0x156ef34fff 0x156ef35000 - 0x156ef36fff 0x156ef37000 - 0x156ef3dfff 0x156ef3e000 - 0x156ef3efff 0x156ef3f000 - 0x156ef3ffff 0x156ef41000 - 0x156ef42fff 0x156ef43000 - 0x156ef81fff 0x156ef82000 - 0x156ef83fff 0x156ef84000 - 0x156ef8afff 0x156ef8b000 - 0x156ef8bfff 0x156ef8c000 - 0x156efb1fff 0x156efb2000 - 0x156efb5fff 0x156efb6000 - 0x156efb6fff 0x156efb7000 - 0x156efb8fff 0x156efb9000 - 0x156efb9fff 0x156efba000 - 0x156efbafff 0x156efbb000 - 0x156efbbfff 0x156efbc000 - 0x156efbffff 0x156efc0000 - 0x156efc0fff 0x156efc1000 - 0x156efc1fff 0x156efc2000 - 0x156efc3fff 0x156efc4000 - 0x156efc4fff 0x156efc5000 - 0x156efc5fff 0x156efc6000 - 0x156f131fff 0x156f132000 - 0x156f134fff 0x156f135000 - 0x156f135fff 0x156f136000 - 0x156f138fff 0x156f139000 - 0x156f14bfff 0x156f14c000 - 0x156f14cfff 0x156f14d000 - 0x156f14dfff 0x156f14e000 - 0x156f26bfff 0x156f26c000 - 0x156f26efff 0x156f26f000 - 0x156f271fff 0x156f272000 - 0x156f276fff 0x156f277000 - 0x156f2cbfff 0x156f2cc000 - 0x156f976fff 0x3fff820000 - 0x3fff840fff 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,345,440 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 ; 48135 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 0x254eb000 - 0x2550bfff 0x80000000 - 0x800bffff 0x1555a3a000 - 0x1555a54fff 0x1555a55000 - 0x1555a55fff 0x1555a56000 - 0x1555a56fff 0x1555a57000 - 0x1555a58fff 0x1555a59000 - 0x1555a5afff 0x1555a5b000 - 0x1555a61fff 0x1555a62000 - 0x1555a62fff 0x1555a63000 - 0x1555a63fff 0x1555a65000 - 0x1555a66fff 0x1555a67000 - 0x1555aa5fff 0x1555aa6000 - 0x1555aa7fff 0x1555aa8000 - 0x1555aaefff 0x1555aaf000 - 0x1555aaffff 0x1555ab0000 - 0x1555ad5fff 0x1555ad6000 - 0x1555ad9fff 0x1555ada000 - 0x1555adafff 0x1555adb000 - 0x1555adcfff 0x1555add000 - 0x1555addfff 0x1555ade000 - 0x1555adefff 0x1555adf000 - 0x1555adffff 0x1555ae0000 - 0x1555ae3fff 0x1555ae4000 - 0x1555ae4fff 0x1555ae5000 - 0x1555ae5fff 0x1555ae6000 - 0x1555ae7fff 0x1555ae8000 - 0x1555ae8fff 0x1555ae9000 - 0x1555ae9fff 0x1555aea000 - 0x1555c55fff 0x1555c56000 - 0x1555c58fff 0x1555c59000 - 0x1555c59fff 0x1555c5a000 - 0x1555c5cfff 0x1555c5d000 - 0x1555c6ffff 0x1555c70000 - 0x1555c70fff 0x1555c71000 - 0x1555c71fff 0x1555c72000 - 0x1555d8ffff 0x1555d90000 - 0x1555d92fff 0x1555d93000 - 0x1555d95fff 0x1555d96000 - 0x1555d9afff 0x1555d9b000 - 0x1555deffff 0x1555df0000 - 0x155649afff 0x3fff886000 - 0x3fff8a6fff 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 0xdf8e000 - 0xdfaefff 0x80000000 - 0x800bffff 0x1576e20000 - 0x1576e3afff 0x1576e3b000 - 0x1576e3bfff 0x1576e3c000 - 0x1576e3cfff 0x1576e3d000 - 0x1576e3efff 0x1576e3f000 - 0x1576e40fff 0x1576e41000 - 0x1576e47fff 0x1576e48000 - 0x1576e48fff 0x1576e49000 - 0x1576e49fff 0x1576e4b000 - 0x1576e4cfff 0x1576e4d000 - 0x1576e8bfff 0x1576e8c000 - 0x1576e8dfff 0x1576e8e000 - 0x1576e94fff 0x1576e95000 - 0x1576e95fff 0x1576e96000 - 0x1576ebbfff 0x1576ebc000 - 0x1576ebffff 0x1576ec0000 - 0x1576ec0fff 0x1576ec1000 - 0x1576ec2fff 0x1576ec3000 - 0x1576ec3fff 0x1576ec4000 - 0x1576ec4fff 0x1576ec5000 - 0x1576ec5fff 0x1576ec6000 - 0x1576ec9fff 0x1576eca000 - 0x1576ecafff 0x1576ecb000 - 0x1576ecbfff 0x1576ecc000 - 0x1576ecdfff 0x1576ece000 - 0x1576ecefff 0x1576ecf000 - 0x1576ecffff 0x1576ed0000 - 0x157703bfff 0x157703c000 - 0x157703efff 0x157703f000 - 0x157703ffff 0x1577040000 - 0x1577042fff 0x1577043000 - 0x1577055fff 0x1577056000 - 0x1577056fff 0x1577057000 - 0x1577057fff 0x1577058000 - 0x1577175fff 0x1577176000 - 0x1577178fff 0x1577179000 - 0x157717bfff 0x157717c000 - 0x1577180fff 0x1577181000 - 0x15771d5fff 0x15771d6000 - 0x1577880fff 0x3fff8e6000 - 0x3fff906fff ./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 0x21c96000 - 0x21cb6fff 0x80000000 - 0x800bffff 0x1578142000 - 0x157815cfff 0x157815d000 - 0x157815dfff 0x157815e000 - 0x157815efff 0x157815f000 - 0x1578160fff 0x1578161000 - 0x1578162fff 0x1578163000 - 0x1578169fff 0x157816a000 - 0x157816afff 0x157816b000 - 0x157816bfff 0x157816d000 - 0x157816efff 0x157816f000 - 0x15781adfff 0x15781ae000 - 0x15781affff 0x15781b0000 - 0x15781b6fff 0x15781b7000 - 0x15781b7fff 0x15781b8000 - 0x15781ddfff 0x15781de000 - 0x15781e1fff 0x15781e2000 - 0x15781e2fff 0x15781e3000 - 0x15781e4fff 0x15781e5000 - 0x15781e5fff 0x15781e6000 - 0x15781e6fff 0x15781e7000 - 0x15781e7fff 0x15781e8000 - 0x15781ebfff 0x15781ec000 - 0x15781ecfff 0x15781ed000 - 0x15781edfff 0x15781ee000 - 0x15781effff 0x15781f0000 - 0x15781f0fff 0x15781f1000 - 0x15781f1fff 0x15781f2000 - 0x157835dfff 0x157835e000 - 0x1578360fff 0x1578361000 - 0x1578361fff 0x1578362000 - 0x1578364fff 0x1578365000 - 0x1578377fff 0x1578378000 - 0x1578378fff 0x1578379000 - 0x1578379fff 0x157837a000 - 0x1578497fff 0x1578498000 - 0x157849afff 0x157849b000 - 0x157849dfff 0x157849e000 - 0x15784a2fff 0x15784a3000 - 0x15784f7fff 0x15784f8000 - 0x1578ba2fff 0x3fffc6d000 - 0x3fffc8dfff 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,346,232 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 ; 39961 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 0x1db77000 - 0x1db97fff 0x80000000 - 0x800bffff 0x158da2d000 - 0x158da47fff 0x158da48000 - 0x158da48fff 0x158da49000 - 0x158da49fff 0x158da4a000 - 0x158da4bfff 0x158da4c000 - 0x158da4dfff 0x158da4e000 - 0x158da54fff 0x158da55000 - 0x158da55fff 0x158da56000 - 0x158da56fff 0x158da58000 - 0x158da59fff 0x158da5a000 - 0x158da98fff 0x158da99000 - 0x158da9afff 0x158da9b000 - 0x158daa1fff 0x158daa2000 - 0x158daa2fff 0x158daa3000 - 0x158dac8fff 0x158dac9000 - 0x158daccfff 0x158dacd000 - 0x158dacdfff 0x158dace000 - 0x158dacffff 0x158dad0000 - 0x158dad0fff 0x158dad1000 - 0x158dad1fff 0x158dad2000 - 0x158dad2fff 0x158dad3000 - 0x158dad6fff 0x158dad7000 - 0x158dad7fff 0x158dad8000 - 0x158dad8fff 0x158dad9000 - 0x158dadafff 0x158dadb000 - 0x158dadbfff 0x158dadc000 - 0x158dadcfff 0x158dadd000 - 0x158dc48fff 0x158dc49000 - 0x158dc4bfff 0x158dc4c000 - 0x158dc4cfff 0x158dc4d000 - 0x158dc4ffff 0x158dc50000 - 0x158dc62fff 0x158dc63000 - 0x158dc63fff 0x158dc64000 - 0x158dc64fff 0x158dc65000 - 0x158dd82fff 0x158dd83000 - 0x158dd85fff 0x158dd86000 - 0x158dd88fff 0x158dd89000 - 0x158dd8dfff 0x158dd8e000 - 0x158dde2fff 0x158dde3000 - 0x158e48dfff 0x3fffc57000 - 0x3fffc77fff 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 0x2b93000 - 0x2bb3fff 0x80000000 - 0x800bffff 0x155da2b000 - 0x155da45fff 0x155da46000 - 0x155da46fff 0x155da47000 - 0x155da47fff 0x155da48000 - 0x155da49fff 0x155da4a000 - 0x155da4bfff 0x155da4c000 - 0x155da52fff 0x155da53000 - 0x155da53fff 0x155da54000 - 0x155da54fff 0x155da56000 - 0x155da57fff 0x155da58000 - 0x155da96fff 0x155da97000 - 0x155da98fff 0x155da99000 - 0x155da9ffff 0x155daa0000 - 0x155daa0fff 0x155daa1000 - 0x155dac6fff 0x155dac7000 - 0x155dacafff 0x155dacb000 - 0x155dacbfff 0x155dacc000 - 0x155dacdfff 0x155dace000 - 0x155dacefff 0x155dacf000 - 0x155dacffff 0x155dad0000 - 0x155dad0fff 0x155dad1000 - 0x155dad4fff 0x155dad5000 - 0x155dad5fff 0x155dad6000 - 0x155dad6fff 0x155dad7000 - 0x155dad8fff 0x155dad9000 - 0x155dad9fff 0x155dada000 - 0x155dadafff 0x155dadb000 - 0x155dc46fff 0x155dc47000 - 0x155dc49fff 0x155dc4a000 - 0x155dc4afff 0x155dc4b000 - 0x155dc4dfff 0x155dc4e000 - 0x155dc60fff 0x155dc61000 - 0x155dc61fff 0x155dc62000 - 0x155dc62fff 0x155dc63000 - 0x155dd80fff 0x155dd81000 - 0x155dd83fff 0x155dd84000 - 0x155dd86fff 0x155dd87000 - 0x155dd8bfff 0x155dd8c000 - 0x155dde0fff 0x155dde1000 - 0x155e48bfff 0x3fffe19000 - 0x3fffe39fff *** - 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 0x220c9000 - 0x220e9fff 0x80000000 - 0x800bffff 0x158fe86000 - 0x158fea0fff 0x158fea1000 - 0x158fea1fff 0x158fea2000 - 0x158fea2fff 0x158fea3000 - 0x158fea4fff 0x158fea5000 - 0x158fea6fff 0x158fea7000 - 0x158feadfff 0x158feae000 - 0x158feaefff 0x158feaf000 - 0x158feaffff 0x158feb1000 - 0x158feb2fff 0x158feb3000 - 0x158fef1fff 0x158fef2000 - 0x158fef3fff 0x158fef4000 - 0x158fefafff 0x158fefb000 - 0x158fefbfff 0x158fefc000 - 0x158ff21fff 0x158ff22000 - 0x158ff25fff 0x158ff26000 - 0x158ff26fff 0x158ff27000 - 0x158ff28fff 0x158ff29000 - 0x158ff29fff 0x158ff2a000 - 0x158ff2afff 0x158ff2b000 - 0x158ff2bfff 0x158ff2c000 - 0x158ff2ffff 0x158ff30000 - 0x158ff30fff 0x158ff31000 - 0x158ff31fff 0x158ff32000 - 0x158ff33fff 0x158ff34000 - 0x158ff34fff 0x158ff35000 - 0x158ff35fff 0x158ff36000 - 0x15900a1fff 0x15900a2000 - 0x15900a4fff 0x15900a5000 - 0x15900a5fff 0x15900a6000 - 0x15900a8fff 0x15900a9000 - 0x15900bbfff 0x15900bc000 - 0x15900bcfff 0x15900bd000 - 0x15900bdfff 0x15900be000 - 0x15901dbfff 0x15901dc000 - 0x15901defff 0x15901df000 - 0x15901e1fff 0x15901e2000 - 0x15901e6fff 0x15901e7000 - 0x159023bfff 0x159023c000 - 0x15908e6fff 0x3fffd76000 - 0x3fffd96fff 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,348,160 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 ; 65898 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 0x229ca000 - 0x229eafff 0x80000000 - 0x800bffff 0x15893fd000 - 0x1589417fff 0x1589418000 - 0x1589418fff 0x1589419000 - 0x1589419fff 0x158941a000 - 0x158941bfff 0x158941c000 - 0x158941dfff 0x158941e000 - 0x1589424fff 0x1589425000 - 0x1589425fff 0x1589426000 - 0x1589426fff 0x1589428000 - 0x1589429fff 0x158942a000 - 0x1589468fff 0x1589469000 - 0x158946afff 0x158946b000 - 0x1589471fff 0x1589472000 - 0x1589472fff 0x1589473000 - 0x1589498fff 0x1589499000 - 0x158949cfff 0x158949d000 - 0x158949dfff 0x158949e000 - 0x158949ffff 0x15894a0000 - 0x15894a0fff 0x15894a1000 - 0x15894a1fff 0x15894a2000 - 0x15894a2fff 0x15894a3000 - 0x15894a6fff 0x15894a7000 - 0x15894a7fff 0x15894a8000 - 0x15894a8fff 0x15894a9000 - 0x15894aafff 0x15894ab000 - 0x15894abfff 0x15894ac000 - 0x15894acfff 0x15894ad000 - 0x1589618fff 0x1589619000 - 0x158961bfff 0x158961c000 - 0x158961cfff 0x158961d000 - 0x158961ffff 0x1589620000 - 0x1589632fff 0x1589633000 - 0x1589633fff 0x1589634000 - 0x1589634fff 0x1589635000 - 0x1589752fff 0x1589753000 - 0x1589755fff 0x1589756000 - 0x1589758fff 0x1589759000 - 0x158975dfff 0x158975e000 - 0x15897b2fff 0x15897b3000 - 0x1589e5dfff 0x3fffbf2000 - 0x3fffc12fff 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 0x16ea4000 - 0x16ec4fff 0x80000000 - 0x800bffff 0x156a8d7000 - 0x156a8f1fff 0x156a8f2000 - 0x156a8f2fff 0x156a8f3000 - 0x156a8f3fff 0x156a8f4000 - 0x156a8f5fff 0x156a8f6000 - 0x156a8f7fff 0x156a8f8000 - 0x156a8fefff 0x156a8ff000 - 0x156a8fffff 0x156a900000 - 0x156a900fff 0x156a902000 - 0x156a903fff 0x156a904000 - 0x156a942fff 0x156a943000 - 0x156a944fff 0x156a945000 - 0x156a94bfff 0x156a94c000 - 0x156a94cfff 0x156a94d000 - 0x156a972fff 0x156a973000 - 0x156a976fff 0x156a977000 - 0x156a977fff 0x156a978000 - 0x156a979fff 0x156a97a000 - 0x156a97afff 0x156a97b000 - 0x156a97bfff 0x156a97c000 - 0x156a97cfff 0x156a97d000 - 0x156a980fff 0x156a981000 - 0x156a981fff 0x156a982000 - 0x156a982fff 0x156a983000 - 0x156a984fff 0x156a985000 - 0x156a985fff 0x156a986000 - 0x156a986fff 0x156a987000 - 0x156aaf2fff 0x156aaf3000 - 0x156aaf5fff 0x156aaf6000 - 0x156aaf6fff 0x156aaf7000 - 0x156aaf9fff 0x156aafa000 - 0x156ab0cfff 0x156ab0d000 - 0x156ab0dfff 0x156ab0e000 - 0x156ab0efff 0x156ab0f000 - 0x156ac2cfff 0x156ac2d000 - 0x156ac2ffff 0x156ac30000 - 0x156ac32fff 0x156ac33000 - 0x156ac37fff 0x156ac38000 - 0x156ac8cfff 0x156ac8d000 - 0x156b337fff 0x3fffd68000 - 0x3fffd88fff *** - myerror ls -l lisp.run lispinit.mem image image.mem -rwxr-xr-x. 1 mockbuild mock 14348160 Jan 20 09:53 image -rw-r--r--. 1 mockbuild mock 3308984 Jan 20 09:52 image.mem -rwxr-xr-x. 1 mockbuild mock 11035840 Jan 20 08:24 lisp.run -rw-r--r--. 1 mockbuild mock 3318704 Jan 20 08:36 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 0x35915000 - 0x35935fff 0x80000000 - 0x800bffff 0x155abdb000 - 0x155abf5fff 0x155abf6000 - 0x155abf6fff 0x155abf7000 - 0x155abf7fff 0x155abf8000 - 0x155abf9fff 0x155abfa000 - 0x155abfbfff 0x155abfc000 - 0x155ac02fff 0x155ac03000 - 0x155ac03fff 0x155ac04000 - 0x155ac04fff 0x155ac06000 - 0x155ac07fff 0x155ac08000 - 0x155ac46fff 0x155ac47000 - 0x155ac48fff 0x155ac49000 - 0x155ac4ffff 0x155ac50000 - 0x155ac50fff 0x155ac51000 - 0x155acdafff 0x155acdb000 - 0x155acdbfff 0x155acdc000 - 0x155acdcfff 0x155acdd000 - 0x155ad0cfff 0x155ad0d000 - 0x155ad0dfff 0x155ad0e000 - 0x155ad0efff 0x155ad0f000 - 0x155ad0ffff 0x155ad10000 - 0x155ad17fff 0x155ad18000 - 0x155ad3dfff 0x155ad3e000 - 0x155ad41fff 0x155ad42000 - 0x155ad42fff 0x155ad43000 - 0x155ad44fff 0x155ad45000 - 0x155ad45fff 0x155ad46000 - 0x155ad46fff 0x155ad47000 - 0x155ad47fff 0x155ad48000 - 0x155ad4bfff 0x155ad4c000 - 0x155ad4cfff 0x155ad4d000 - 0x155ad4dfff 0x155ad4e000 - 0x155ad4ffff 0x155ad50000 - 0x155ad51fff 0x155ad52000 - 0x155ad52fff 0x155ad53000 - 0x155ad53fff 0x155ad54000 - 0x155aebffff 0x155aec0000 - 0x155aec2fff 0x155aec3000 - 0x155aec3fff 0x155aec4000 - 0x155aec4fff 0x155aec5000 - 0x155aed7fff 0x155aed8000 - 0x155aed8fff 0x155aed9000 - 0x155aed9fff 0x155aeda000 - 0x155aff7fff 0x155aff8000 - 0x155affafff 0x155affb000 - 0x155affdfff 0x155affe000 - 0x155b002fff 0x155b003000 - 0x155b057fff 0x155b058000 - 0x155b702fff 0x3fffcee000 - 0x3fffd0efff 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-01-20 09:53:34" 3820143214 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 09:53:34" EQL-OK: NIL (CHECK-TIME-DATE "%d.%m.%y" "27.11.86") "1986-11-27 Thu 09:53:34" EQL-OK: NIL (CHECK-TIME-DATE "%y-%m-%d" "86-11-27") "1986-11-27 Thu 09:53:34" EQL-OK: NIL (CHECK-TIME-DATE "%A %H:%M:%S" "Friday 12:00:00") "2021-01-22 Fri 12:00:00" EQL-OK: NIL (CHECK-TIME-DATE "%A" "Friday") "2021-01-22 Fri 09:53:34" EQL-OK: NIL (CHECK-TIME-DATE "%a" "Mon") "2021-01-25 Mon 09:53:34" EQL-OK: NIL (CHECK-TIME-DATE "%a" "Sun") "2021-01-24 Sun 09:53:34" EQL-OK: NIL (CHECK-TIME-DATE "%a" "Fri") "2021-01-22 Fri 09:53:34" EQL-OK: NIL (CHECK-TIME-DATE "%B" "September") "2021-09-03 Fri 09:53:34" EQL-OK: NIL (CHECK-TIME-DATE "%B" "January") "2021-01-03 Sun 09:53:34" EQL-OK: NIL (CHECK-TIME-DATE "%B" "December") "2021-12-03 Fri 09:53:34" EQL-OK: NIL (CHECK-TIME-DATE "%b %a" "Sep Mon") "2021-09-06 Mon 09:53:34" EQL-OK: NIL (CHECK-TIME-DATE "%b %a" "Jan Fri") "2021-01-01 Fri 09:53:34" EQL-OK: NIL (CHECK-TIME-DATE "%b %a" "Dec Mon") "2021-12-06 Mon 09:53:34" EQL-OK: NIL (CHECK-TIME-DATE "%b %a %Y" "Jan Wed 1989") "1989-01-04 Wed 09:53:34" EQL-OK: NIL (CHECK-TIME-DATE "%a %H" "Fri 9") "2021-01-22 Fri 09:00:00" EQL-OK: NIL (CHECK-TIME-DATE "%b %H:%S" "Feb 10:30") "2021-02-03 Wed 10:00:30" EQL-OK: NIL (CHECK-TIME-DATE "%H:%M" "10:30") "2021-01-20 Wed 10:30:00" EQL-OK: NIL (CHECK-TIME-DATE "%H:%M" "13:30") "2021-01-20 Wed 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-HgalNz" , 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))) 41266 41265 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))) 5281 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 1265381 :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 804923 :MODE (:FREG :RUSR :WUSR) :NLINK 1 :UID 987 :GID 135 :RDEV NIL :SIZE 550 :BLKSIZE NIL :BLOCKS NIL :ATIME 3820143214 :MTIME 3820143214 :CTIME 3820143214> 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 8262920 :BAVAIL 8155793 :FILES 2570400 :FFREE 2300719 :FAVAIL 2300719 :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-HgalNz" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-twgwHv" 550)) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP2* *TMP1* :IF-EXISTS :APPEND))) ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-twgwHv" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-HgalNz" 1100)) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP1* *TMP2* :IF-EXISTS :APPEND))) ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-HgalNz" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-twgwHv" 1650)) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP2* *TMP1* :IF-EXISTS :APPEND))) ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-twgwHv" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-HgalNz" 2750)) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP1* *TMP2* :IF-EXISTS :APPEND))) ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-HgalNz" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-twgwHv" 4400)) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP2* *TMP1* :IF-EXISTS :APPEND))) ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-twgwHv" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-HgalNz" 7150)) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP1* *TMP2* :IF-EXISTS :APPEND))) ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-HgalNz" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-twgwHv" 11550)) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP2* *TMP1* :IF-EXISTS :APPEND))) ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-twgwHv" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-HgalNz" 18700)) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP1* *TMP2* :IF-EXISTS :APPEND))) ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-HgalNz" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-twgwHv" 30250)) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP2* *TMP1* :IF-EXISTS :APPEND))) ((#P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-twgwHv" #P"/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-HgalNz" 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 5185032192) 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 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x24e0a000 - 0x24e2afff 0x80000000 - 0x800bffff 0x155983a000 - 0x1559854fff 0x1559855000 - 0x1559855fff 0x1559856000 - 0x1559856fff 0x1559857000 - 0x1559858fff 0x1559859000 - 0x155985afff 0x155985b000 - 0x1559861fff 0x1559862000 - 0x1559862fff 0x1559863000 - 0x1559863fff 0x1559865000 - 0x1559866fff 0x1559867000 - 0x15598a5fff 0x15598a6000 - 0x15598a7fff 0x15598a8000 - 0x15598aefff 0x15598af000 - 0x15598affff 0x15598b0000 - 0x1559939fff 0x155993a000 - 0x155993afff 0x155993b000 - 0x155993bfff 0x155993c000 - 0x155996bfff 0x155996c000 - 0x155996cfff 0x155996d000 - 0x155996dfff 0x155996e000 - 0x155996efff 0x155996f000 - 0x1559976fff 0x1559977000 - 0x155999cfff 0x155999d000 - 0x15599a0fff 0x15599a1000 - 0x15599a1fff 0x15599a2000 - 0x15599a3fff 0x15599a4000 - 0x15599a4fff 0x15599a5000 - 0x15599a5fff 0x15599a6000 - 0x15599a6fff 0x15599a7000 - 0x15599aafff 0x15599ab000 - 0x15599abfff 0x15599ac000 - 0x15599acfff 0x15599ad000 - 0x15599aefff 0x15599af000 - 0x15599b0fff 0x15599b1000 - 0x15599b1fff 0x15599b2000 - 0x15599b2fff 0x15599b3000 - 0x1559b1efff 0x1559b1f000 - 0x1559b21fff 0x1559b22000 - 0x1559b22fff 0x1559b23000 - 0x1559b23fff 0x1559b24000 - 0x1559b36fff 0x1559b37000 - 0x1559b37fff 0x1559b38000 - 0x1559b38fff 0x1559b39000 - 0x1559c56fff 0x1559c57000 - 0x1559c59fff 0x1559c5a000 - 0x1559c5cfff 0x1559c5d000 - 0x1559c61fff 0x1559c62000 - 0x1559cb6fff 0x1559cb7000 - 0x155a361fff 0x3fffb72000 - 0x3fffb92fff Warning: reserving address range 0x800c0000...0x1fffffffff that contains memory mappings. clisp might crash later! Memory dump: 0x10000 - 0x18efff 0x18f000 - 0x1bcfff 0x1bd000 - 0x1eefff 0x1ef000 - 0x1f2fff 0x22612000 - 0x22632fff 0x80000000 - 0x800bffff 0x157dbf3000 - 0x157dc0dfff 0x157dc0e000 - 0x157dc0efff 0x157dc0f000 - 0x157dc0ffff 0x157dc10000 - 0x157dc11fff 0x157dc12000 - 0x157dc13fff 0x157dc14000 - 0x157dc1afff 0x157dc1b000 - 0x157dc1bfff 0x157dc1c000 - 0x157dc1cfff 0x157dc1e000 - 0x157dc1ffff 0x157dc20000 - 0x157dc5efff 0x157dc5f000 - 0x157dc60fff 0x157dc61000 - 0x157dc67fff 0x157dc68000 - 0x157dc68fff 0x157dc69000 - 0x157dcf2fff 0x157dcf3000 - 0x157dcf3fff 0x157dcf4000 - 0x157dcf4fff 0x157dcf5000 - 0x157dd24fff 0x157dd25000 - 0x157dd25fff 0x157dd26000 - 0x157dd26fff 0x157dd27000 - 0x157dd27fff 0x157dd28000 - 0x157dd2ffff 0x157dd30000 - 0x157dd55fff 0x157dd56000 - 0x157dd59fff 0x157dd5a000 - 0x157dd5afff 0x157dd5b000 - 0x157dd5cfff 0x157dd5d000 - 0x157dd5dfff 0x157dd5e000 - 0x157dd5efff 0x157dd5f000 - 0x157dd5ffff 0x157dd60000 - 0x157dd63fff 0x157dd64000 - 0x157dd64fff 0x157dd65000 - 0x157dd65fff 0x157dd66000 - 0x157dd67fff 0x157dd68000 - 0x157dd69fff 0x157dd6a000 - 0x157dd6afff 0x157dd6b000 - 0x157dd6bfff 0x157dd6c000 - 0x157ded7fff 0x157ded8000 - 0x157dedafff 0x157dedb000 - 0x157dedbfff 0x157dedc000 - 0x157dedcfff 0x157dedd000 - 0x157deeffff 0x157def0000 - 0x157def0fff 0x157def1000 - 0x157def1fff 0x157def2000 - 0x157e00ffff 0x157e010000 - 0x157e012fff 0x157e013000 - 0x157e015fff 0x157e016000 - 0x157e01afff 0x157e01b000 - 0x157e06ffff 0x157e070000 - 0x157e71afff 0x3fff81c000 - 0x3fff83cfff "[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)"))))) 804923 ("/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 0x13b79000 - 0x13b99fff 0x80000000 - 0x800bffff 0x1577269000 - 0x1577283fff 0x1577284000 - 0x1577284fff 0x1577285000 - 0x1577285fff 0x1577286000 - 0x1577287fff 0x1577288000 - 0x1577289fff 0x157728a000 - 0x1577290fff 0x1577291000 - 0x1577291fff 0x1577292000 - 0x1577292fff 0x1577294000 - 0x1577295fff 0x1577296000 - 0x15772d4fff 0x15772d5000 - 0x15772d6fff 0x15772d7000 - 0x15772ddfff 0x15772de000 - 0x15772defff 0x15772df000 - 0x1577368fff 0x1577369000 - 0x1577369fff 0x157736a000 - 0x157736afff 0x157736b000 - 0x157739afff 0x157739b000 - 0x157739bfff 0x157739c000 - 0x157739cfff 0x157739d000 - 0x157739dfff 0x157739e000 - 0x15773a5fff 0x15773a6000 - 0x15773cbfff 0x15773cc000 - 0x15773cffff 0x15773d0000 - 0x15773d0fff 0x15773d1000 - 0x15773d2fff 0x15773d3000 - 0x15773d3fff 0x15773d4000 - 0x15773d4fff 0x15773d5000 - 0x15773d5fff 0x15773d6000 - 0x15773d9fff 0x15773da000 - 0x15773dafff 0x15773db000 - 0x15773dbfff 0x15773dc000 - 0x15773ddfff 0x15773de000 - 0x15773dffff 0x15773e0000 - 0x15773e0fff 0x15773e1000 - 0x15773e1fff 0x15773e2000 - 0x157754dfff 0x157754e000 - 0x1577550fff 0x1577551000 - 0x1577551fff 0x1577552000 - 0x1577552fff 0x1577553000 - 0x1577565fff 0x1577566000 - 0x1577566fff 0x1577567000 - 0x1577567fff 0x1577568000 - 0x1577685fff 0x1577686000 - 0x1577688fff 0x1577689000 - 0x157768bfff 0x157768c000 - 0x1577690fff 0x1577691000 - 0x15776e5fff 0x15776e6000 - 0x1577d90fff 0x3fff807000 - 0x3fff827fff "[1]>" " # [2]>" 804925 " 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-HgalNz" "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-twgwHv")) EQL-OK: T (LISTP (SHOW (COPY-FILE *TMP2* *TMP1* :METHOD :HARDLINK-OR-COPY))) (("/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-twgwHv" "/builddir/build/BUILD/clisp-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749-a9aeb8030714ae97ef7f8e01c2ee68b6f297e749/build/syscalls-tests-HgalNz")) 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))))) 18446744072245759098 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.76" . #) (#2="fedora-riscv-11.gcc129.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)) 41272 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 41273 PID-W 41273) 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 41274 PID-L-2 41275 PID-W-1 41274 PID-W-2 41275) 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.71d0 1.38d0 1.27d0) EQL-OK: T (EVERY #'SYSTEM::FIXNUMP (SHOW (HANDLER-CASE (MULTIPLE-VALUE-LIST (LOADAVG T)) (ERROR (C) (PRINC-ERROR C))))) (171 138 127) 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.dt4GBv (%build) RPM build errors: Bad exit status from /var/tmp/rpm-tmp.dt4GBv (%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