summaryrefslogtreecommitdiff
path: root/libguile/sort.c
diff options
context:
space:
mode:
authorGreg J. Badros <gjb@cs.washington.edu>2000-01-05 19:00:03 +0000
committerGreg J. Badros <gjb@cs.washington.edu>2000-01-05 19:00:03 +0000
commit47c6b75ea980821737e8030190d24b9aa30e978d (patch)
tree94e1566e9a7bd7b8b4f3abfadde47faad8f45830 /libguile/sort.c
parentf5421cfc2a694b6c4eb9e035d583cc461994b4ce (diff)
downloadguile-47c6b75ea980821737e8030190d24b9aa30e978d.tar.gz
* *.[ch]: Replace SCM_VALIDATE_INT w/ SCM_VALIDATE_INUM for
better consistency with the names of other SCM_VALIDATE_ macros and better conformance to guile naming policy.
Diffstat (limited to 'libguile/sort.c')
-rw-r--r--libguile/sort.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/sort.c b/libguile/sort.c
index 99b9a3ca2..7edb97fc2 100644
--- a/libguile/sort.c
+++ b/libguile/sort.c
@@ -441,9 +441,9 @@ GUILE_PROC (scm_restricted_vector_sort_x, "restricted-vector-sort!", 4, 0, 0,
vp = SCM_VELTS (vec); /* vector pointer */
vlen = SCM_LENGTH (vec);
- SCM_VALIDATE_INT_COPY(3,startpos,spos);
+ SCM_VALIDATE_INUM_COPY(3,startpos,spos);
SCM_ASSERT_RANGE (3,startpos,(spos >= 0) && (spos <= vlen));
- SCM_VALIDATE_INT_RANGE(4,endpos,0,vlen+1);
+ SCM_VALIDATE_INUM_RANGE(4,endpos,0,vlen+1);
len = SCM_INUM (endpos) - spos;
quicksort (&vp[spos], len, size, scm_cmp_function (less), less);