1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-17 03:00:21 +02:00

Fix embarassing ctz issue

This commit is contained in:
Andy Wingo 2022-08-03 16:40:34 +02:00
parent 8f6a2692ab
commit 47c07dd0eb

View file

@ -1492,7 +1492,7 @@ static inline uint64_t load_mark_bytes(uint8_t *mark) {
} }
static inline size_t count_zero_bytes(uint64_t bytes) { static inline size_t count_zero_bytes(uint64_t bytes) {
return bytes ? (__builtin_ctz(bytes) / 8) : sizeof(bytes); return bytes ? (__builtin_ctzll(bytes) / 8) : sizeof(bytes);
} }
static size_t next_mark(uint8_t *mark, size_t limit, uint64_t sweep_mask) { static size_t next_mark(uint8_t *mark, size_t limit, uint64_t sweep_mask) {