summaryrefslogtreecommitdiff
path: root/libguile/vectors.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/vectors.c')
-rw-r--r--libguile/vectors.c7
1 files changed, 7 insertions, 0 deletions
diff --git a/libguile/vectors.c b/libguile/vectors.c
index fef48cc3e..33a216a95 100644
--- a/libguile/vectors.c
+++ b/libguile/vectors.c
@@ -439,6 +439,10 @@ scm_i_vector_equal_p (SCM x, SCM y)
}
+/*
+ * Naming is inconsistent: this routine modifies its 3rd argument,
+ * rather than 1st. --hwn
+ */
SCM_DEFINE (scm_vector_move_left_x, "vector-move-left!", 5, 0, 0,
(SCM vec1, SCM start1, SCM end1, SCM vec2, SCM start2),
"Copy elements from @var{vec1}, positions @var{start1} to @var{end1},\n"
@@ -477,6 +481,9 @@ SCM_DEFINE (scm_vector_move_left_x, "vector-move-left!", 5, 0, 0,
}
#undef FUNC_NAME
+/*
+ * See previous naming comment. --hwn
+ */
SCM_DEFINE (scm_vector_move_right_x, "vector-move-right!", 5, 0, 0,
(SCM vec1, SCM start1, SCM end1, SCM vec2, SCM start2),
"Copy elements from @var{vec1}, positions @var{start1} to @var{end1},\n"