-rwxr-xr-x | gcl/o/multival.c | 2 |
diff --git a/gcl/o/multival.c b/gcl/o/multival.c index 023c23d10..457c1aba3 100755 --- a/gcl/o/multival.c +++ b/gcl/o/multival.c @@ -43,7 +43,7 @@ Lvalues_list(void) check_arg(1); list = vs_base[0]; vs_top = vs_base; - while (!endp(list)) { + while (!endp_prop(list)) { vs_push(MMcar(list)); list = MMcdr(list); } |