~ chicken-core (chicken-5) 29850b2b845a085fb68e45ba543bc89ab4df2e56
commit 29850b2b845a085fb68e45ba543bc89ab4df2e56
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Sat Nov 4 13:12:16 2017 +0100
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Sat Nov 4 13:12:16 2017 +0100
drop unused local
diff --git a/runtime.c b/runtime.c
index 9d312478..af5d32f2 100644
--- a/runtime.c
+++ b/runtime.c
@@ -12662,7 +12662,7 @@ C_s_a_u_i_random_int(C_word **ptr, C_word n, C_word rn)
int len = integer_length_abs(rn);
C_word size = C_fix(C_BIGNUM_BITS_TO_DIGITS(len));
C_word result = C_allocate_scratch_bignum(ptr, size, C_SCHEME_FALSE, C_SCHEME_FALSE);
- C_uword *p, mask;
+ C_uword *p;
start = C_bignum_digits(result);
end = start + C_bignum_size(result);
Trap