* Type-punning warning fixes;* small_fixnum overflow fixes;* off by one fix in cerror;* Fix compiler error which had not recognized defpackage as a package operation;* Fix tkl.lisp call to open-named-socket;* Make values-list and nreconc signal errors when they should on dotted lists.; * Avoid use of windows.h types as macros.; * New config.{sub,guess} - gcl.git - GNU Common Lisp

GNU Common Lisp

diff options

author	Camm Maguire <camm@debian.org>	2003年07月16日 02:03:09 +0000
committer	Camm Maguire <camm@debian.org>	2003年07月16日 02:03:09 +0000
commit	aa7bb3e5432b359695a50ad3cf2c4f682c17568a (patch)
tree	a9e511d0cfacde7dc52b0406c5e37da3986f1282
parent	7d62efc4c45b2a134b3efce735104b4d2b2dde47 (diff)
download	gcl-unlabeled-1.19.4.tar.gz

* Type-punning warning fixes;* small_fixnum overflow fixes;* off by one fix in cerror;* Fix compiler error which had not recognized defpackage as a package operation;* Fix tkl.lisp call to open-named-socket;* Make values-list and nreconc signal errors when they should on dotted lists.; * Avoid use of windows.h types as macros.; * New config.{sub,guess}unlabeled-1.19.4

Diffstat

-rwxr-xr-x

gcl/o/list.d

1 files changed, 1 insertions, 1 deletions

diff --git a/gcl/o/list.d b/gcl/o/list.d
index e38a8e6fd..9872f9dae 100755
--- a/gcl/o/list.d
+++ b/gcl/o/list.d

@@ -999,7 +999,7 @@ Lreconc() {

check_arg(2);

y = vs_pop;

- for (x = vs_base[0]; !endp(x);) {

+ for (x = vs_base[0]; !endp_prop(x);) {

z = x;

x = x->c.c_cdr;

z->c.c_cdr = y;

generated by cgit v1.2.3 (git 2.39.1) at 2025年09月01日 23:51:28 +0000