summaryrefslogtreecommitdiff
path: root/libguile/srfi-4.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/srfi-4.c')
-rw-r--r--libguile/srfi-4.c7
1 files changed, 7 insertions, 0 deletions
diff --git a/libguile/srfi-4.c b/libguile/srfi-4.c
index fc88ff1a9..eb1cbe5c6 100644
--- a/libguile/srfi-4.c
+++ b/libguile/srfi-4.c
@@ -569,6 +569,13 @@ scm_uniform_vector_release (SCM uvec)
*/
}
+void
+scm_frame_uniform_vector_release (SCM uvec)
+{
+ scm_frame_unwind_handler_with_scm (scm_uniform_vector_release, uvec,
+ SCM_F_WIND_EXPLICITLY);
+}
+
size_t
scm_uniform_vector_element_size (SCM uvec)
{