mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-20 02:30:23 +02:00
Code Activity

Move bitvector functions using array_handle to libguile/array-handle.[ch]

Browse source
This commit is contained in:
Daniel Llorens 2020-02-05 17:23:40 +01:00
parent 88d690e15e
commit efe2317aff
8 changed files with 35 additions and 30 deletions
Download patch file Download diff file Expand all files Collapse all files

5
libguile/bitvectors.h
View file

@ -22,7 +22,7 @@
#include "libguile/array-handle.h"
#include "libguile/scm.h"
@ -54,9 +54,6 @@ SCM_API SCM scm_c_make_bitvector (size_t len, SCM fill);
SCM_API size_t scm_c_bitvector_length (SCM vec);
SCM_API SCM scm_c_bitvector_ref (SCM vec, size_t idx);
SCM_API void scm_c_bitvector_set_x (SCM vec, size_t idx, SCM val);
SCM_API const uint32_t *scm_array_handle_bit_elements (scm_t_array_handle *h);
SCM_API uint32_t *scm_array_handle_bit_writable_elements (scm_t_array_handle *h);
SCM_API size_t scm_array_handle_bit_elements_offset (scm_t_array_handle *h);
SCM_API const uint32_t *scm_bitvector_elements (SCM vec, size_t *lenp);
SCM_API uint32_t *scm_bitvector_writable_elements (SCM vec, size_t *lenp);