diff options
author | Hugo Hörnquist <hugo@hornquist.se> | 2019-03-08 10:05:35 +0100 |
---|---|---|
committer | Hugo Hörnquist <hugo@hornquist.se> | 2019-03-08 10:05:35 +0100 |
commit | 0dff6c5d179aeb9e1ba3fc5f4dd679987e342036 (patch) | |
tree | c43ef6a0ef0fe6f684928a226a0f439975b20e01 /guile_type_helpers.c | |
parent | Work on recuring event stream. (diff) | |
download | calp-0dff6c5d179aeb9e1ba3fc5f4dd679987e342036.tar.gz calp-0dff6c5d179aeb9e1ba3fc5f4dd679987e342036.tar.xz |
Remove C vector library.
Diffstat (limited to 'guile_type_helpers.c')
-rw-r--r-- | guile_type_helpers.c | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/guile_type_helpers.c b/guile_type_helpers.c index ae433b01..e231f2b1 100644 --- a/guile_type_helpers.c +++ b/guile_type_helpers.c @@ -11,13 +11,3 @@ SCM scm_from_strbuf(strbuf* s) { return s->scm; } - -SCM scm_from_vector(VECT(vcomponent)* vect) { - SCM l = SCM_EOL; - for (size_t i = 0; i < vect->length; i++) { - vcomponent* v = GET(VECT(vcomponent))(vect, i); - l = scm_cons(scm_from_vcomponent(v), l); - } - return scm_reverse(l); -} - |