diff options
Diffstat (limited to 'libguile/stacks.c')
-rw-r--r-- | libguile/stacks.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/stacks.c b/libguile/stacks.c index 5533dce58..95f1d3c5a 100644 --- a/libguile/stacks.c +++ b/libguile/stacks.c @@ -552,7 +552,7 @@ GUILE_PROC (scm_stack_ref, "stack-ref", 2, 0, 0, #define FUNC_NAME s_scm_stack_ref { SCM_VALIDATE_STACK(1,stack); - SCM_VALIDATE_INT(2,i); + SCM_VALIDATE_INUM(2,i); SCM_ASSERT_RANGE (1,i, SCM_INUM (i) >= 0 && SCM_INUM (i) < SCM_STACK_LENGTH (stack)); |