diff options
author | Andy Wingo <wingo@pobox.com> | 2020-04-21 22:35:00 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2020-04-29 11:14:17 +0200 |
commit | b517a91ba4aaccf920a81eb8bf71ca090a9b457c (patch) | |
tree | 87766f92c0bf33de3a4ca4c4e6afa177f7cd8e72 /libguile/bitvectors.h | |
parent | bfd38b857757c767c1b94762aeb35db112c4f76b (diff) | |
download | guile-b517a91ba4aaccf920a81eb8bf71ca090a9b457c.tar.gz |
Deprecate useless C bitvector interface
C should use scm_c_bitvector_length, not scm_bitvector_length.
* doc/ref/api-data.texi (Bit Vectors): Reorganize a bit to put typed C
interfaces in their own section.
* libguile/bitvectors.h:
* libguile/bitvectors.c (bitvector-length, bitvector-count): Make
SCM-flavored C interface private.
(scm_c_bitvector_count): New function.
* libguile/deprecated.c (scm_bitvector_length): Deprecate.
(scm_bit_count): Adapt to changes.
Diffstat (limited to 'libguile/bitvectors.h')
-rw-r--r-- | libguile/bitvectors.h | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/libguile/bitvectors.h b/libguile/bitvectors.h index a855e1fc6..b1231e261 100644 --- a/libguile/bitvectors.h +++ b/libguile/bitvectors.h @@ -35,11 +35,9 @@ SCM_API SCM scm_bitvector_p (SCM vec); SCM_API SCM scm_bitvector (SCM bits); SCM_API SCM scm_make_bitvector (SCM len, SCM fill); -SCM_API SCM scm_bitvector_length (SCM vec); SCM_API SCM scm_list_to_bitvector (SCM list); SCM_API SCM scm_bitvector_to_list (SCM vec); -SCM_API SCM scm_bitvector_count (SCM v); SCM_API SCM scm_bitvector_position (SCM v, SCM item, SCM start); SCM_API SCM scm_bitvector_set_bits_x (SCM v, SCM bits); SCM_API SCM scm_bitvector_clear_bits_x (SCM v, SCM bits); @@ -47,6 +45,7 @@ SCM_API SCM scm_bitvector_clear_bits_x (SCM v, SCM bits); SCM_API int scm_is_bitvector (SCM obj); SCM_API SCM scm_c_make_bitvector (size_t len, SCM fill); SCM_API size_t scm_c_bitvector_length (SCM vec); +SCM_API size_t scm_c_bitvector_count (SCM v); SCM_API int scm_c_bitvector_bit_is_set (SCM vec, size_t idx); SCM_API int scm_c_bitvector_bit_is_clear (SCM vec, size_t idx); SCM_API void scm_c_bitvector_set_bit_x (SCM vec, size_t idx); |