diff options
| author | Andy Wingo <wingo@pobox.com> | 2014-06-28 15:24:29 +0200 |
|---|---|---|
| committer | Andy Wingo <wingo@pobox.com> | 2014-06-29 14:19:00 +0200 |
| commit | d40b05386c72c5a17734ee3fd58e35e931ac46ef (patch) | |
| tree | bc1b197b299cc4c65d6b177d6d4e1e0f23177fd6 /libguile/bitvectors.c | |
| parent | ec412d75627aeffbd816ac351eabcd1b533540c6 (diff) | |
Fix bit-count* bug
* libguile/bitvectors.c (scm_bit_count_star): Fix typo introduced in
2005 refactor (!) in which the second arg was erroneously taken from
the first arg.
* test-suite/tests/bitvectors.test: Add test.
* doc/ref/api-compound.texi: Fix doc example for u32vector selector.
Diffstat (limited to 'libguile/bitvectors.c')
| -rw-r--r-- | libguile/bitvectors.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/bitvectors.c b/libguile/bitvectors.c index 1611119ab..d594317b2 100644 --- a/libguile/bitvectors.c +++ b/libguile/bitvectors.c @@ -720,7 +720,7 @@ SCM_DEFINE (scm_bit_count_star, "bit-count*", 3, 0, 0, ssize_t kv_inc; const scm_t_uint32 *kv_bits; - kv_bits = scm_bitvector_elements (v, &kv_handle, + kv_bits = scm_bitvector_elements (kv, &kv_handle, &kv_off, &kv_len, &kv_inc); if (v_len != kv_len) |