diff options
-rw-r--r-- | libguile/unif.c | 2 | ||||
-rw-r--r-- | libguile/unif.h | 1 |
2 files changed, 2 insertions, 1 deletions
diff --git a/libguile/unif.c b/libguile/unif.c index e50b7267d..9d03008dc 100644 --- a/libguile/unif.c +++ b/libguile/unif.c @@ -870,7 +870,7 @@ SCM_DEFINE (scm_array_in_bounds_p, "array-in-bounds?", 1, 0, 1, } #undef FUNC_NAME -static SCM +SCM scm_i_cvref (SCM v, size_t pos, int enclosed) { if (enclosed) diff --git a/libguile/unif.h b/libguile/unif.h index 4ab93f44e..a634e3757 100644 --- a/libguile/unif.h +++ b/libguile/unif.h @@ -143,6 +143,7 @@ SCM_API SCM scm_ra2contig (SCM ra, int copy); SCM_API SCM scm_i_proc_make_vector; SCM_API SCM scm_i_proc_make_string; SCM_API SCM scm_i_proc_make_bitvector; +SCM_API SCM scm_i_cvref (SCM v, size_t p, int enclosed); SCM_API void scm_init_unif (void); |