diff options
Diffstat (limited to 'libguile/list.c')
-rw-r--r-- | libguile/list.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/list.c b/libguile/list.c index c2b50ae3d..a081f097b 100644 --- a/libguile/list.c +++ b/libguile/list.c @@ -123,7 +123,7 @@ SCM_DEFINE (scm_cons_star, "cons*", 1, 0, 1, if (!SCM_NULLP (rest)) { SCM prev = arg = scm_cons (arg, rest); - while (SCM_NNULLP (SCM_CDR (rest))) + while (!SCM_NULLP (SCM_CDR (rest))) { prev = rest; rest = SCM_CDR (rest); |