Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-20 14:19:18 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

adding cast for safety

Browse source
This commit is contained in:
Alex Shinn 2011-07-04 22:04:09 +09:00
parent 7ddfc9f25a
commit 90ae6f49b8
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lib/srfi/18/threads.c
View file

@ -278,7 +278,7 @@ static const sexp_uint_t sexp_log2_lookup[32] = {
/* only works on powers of two */
static sexp_uint_t sexp_log2_of_pow2 (sexp_uint_t n) {
return sexp_log2_lookup[(n * 0x077CB531U) >> 27];
return sexp_log2_lookup[((unsigned)n * 0x077CB531U) >> 27];
}
static sexp sexp_pop_signal (sexp ctx sexp_api_params(self, n)) {