[Guile-commits] 47/69: Fix deprecated bit-count* when counting 0 bits

[Andy Wingo]

wingo pushed a commit to branch wip-inline-digits
in repository guile.

commit 6b89bad7cac009dd1beb03772729388d12a23869
Author: Andy Wingo <wingo@pobox.com>
AuthorDate: Wed Jan 5 09:24:59 2022 +0100

    Fix deprecated bit-count* when counting 0 bits
    
    * libguile/deprecated.c (scm_bit_count_star): Fix logic to count 0
    bits.
---
 libguile/deprecated.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/libguile/deprecated.c b/libguile/deprecated.c
index 277a4d9ed..0e0c20f28 100644
--- a/libguile/deprecated.c
+++ b/libguile/deprecated.c
@@ -1,4 +1,4 @@
-/* Copyright 2003-2004,2006,2008-2018,2020,2021
+/* Copyright 2003-2004,2006,2008-2018,2020,2021,2022
      Free Software Foundation, Inc.
 
    This file is part of Guile.
@@ -366,7 +366,7 @@ SCM_DEFINE (scm_bit_count_star, "bit-count*", 3, 0, 0,
   if (scm_is_bitvector (v) && scm_is_bitvector (kv))
     {
       count = scm_c_bitvector_count_bits (v, kv);
-      if (count == 0)
+      if (bit == 0)
         count = scm_c_bitvector_count (kv) - count;
     }
   else