diff options
author | Han-Wen Nienhuys <hanwen@lilypond.org> | 2007-01-22 16:00:23 +0000 |
---|---|---|
committer | Han-Wen Nienhuys <hanwen@lilypond.org> | 2007-01-22 16:00:23 +0000 |
commit | 8cb7939c78e71ef9be636d9570d181a6e41933ff (patch) | |
tree | 220f55d2c10c3d40292879a5a4edc26eb7b0106e /libguile/vectors.c | |
parent | d00a0704a95a20e1803ddcabddfb50c6ba3c68a2 (diff) | |
download | guile-8cb7939c78e71ef9be636d9570d181a6e41933ff.tar.gz |
(s_scm_vector_move_right_x): complain about naming.
Diffstat (limited to 'libguile/vectors.c')
-rw-r--r-- | libguile/vectors.c | 7 |
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" |