summaryrefslogtreecommitdiff
path: root/libguile/vectors.h
diff options
context:
space:
mode:
authorDaniel Llorens <lloda@sarc.name>2021-08-05 19:43:21 +0200
committerDaniel Llorens <lloda@sarc.name>2021-08-06 13:06:51 +0200
commita34c762de0cda0fdd56fd582de0cdc71eab2116e (patch)
tree1eeeb8b6814b6ae50505326ea160038ae981fbb8 /libguile/vectors.h
parentbfda8d397251cdb88bf1e775c85c41a4d01061ac (diff)
downloadguile-a34c762de0cda0fdd56fd582de0cdc71eab2116e.tar.gz
Extend core vector-copy to r7rs vector-copy
* libguile/vectors.h: Declare scm_vector_copy_partial. * libguile/vectors.c (scm_vector_copy_partial): As stated. (scm_vector_copy): Reuse scm_vector_copy_partial. * module/scheme/base.scm: Reuse core vector-copy. * module/srfi/srfi-43: Reuse core vector-copy. * test-suite/tests/vectors.test: Test vector-copy.
Diffstat (limited to 'libguile/vectors.h')
-rw-r--r--libguile/vectors.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/vectors.h b/libguile/vectors.h
index 41e2c8909..1c04f9afe 100644
--- a/libguile/vectors.h
+++ b/libguile/vectors.h
@@ -88,7 +88,7 @@ SCM_API SCM *scm_vector_writable_elements (SCM vec,
#define SCM_I_VECTOR_LENGTH(x) (((size_t) SCM_CELL_WORD_0 (x)) >> 8)
SCM_INTERNAL SCM scm_i_vector_equal_p (SCM x, SCM y);
-
+SCM_INTERNAL SCM scm_vector_copy_partial (SCM vec, SCM start, SCM end);
SCM_INTERNAL void scm_init_vectors (void);