diff options
Diffstat (limited to 'libguile/stacks.c')
-rw-r--r-- | libguile/stacks.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/stacks.c b/libguile/stacks.c index c6c316fad..d23d1fdf8 100644 --- a/libguile/stacks.c +++ b/libguile/stacks.c @@ -468,11 +468,11 @@ SCM_DEFINE (scm_make_stack, "make-stack", 1, 0, 1, /* Narrow the stack according to the arguments given to scm_make_stack. */ SCM_VALIDATE_REST_ARGUMENT (args); - while (n > 0 && !SCM_NULLP (args)) + while (n > 0 && !scm_is_null (args)) { inner_cut = SCM_CAR (args); args = SCM_CDR (args); - if (SCM_NULLP (args)) + if (scm_is_null (args)) { outer_cut = SCM_INUM0; } |