* rand.c (make_state): Use ANSI C syntax for prototyped function of no

arguments. This snuck through due to working with a C++ compiler.
(random): Fixed unused variable warning that happens on 32-bit-pointer
platforms.

1 files changed, 1 insertions, 2 deletions

diff --git a/rand.c b/rand.c
index 9a48e7e1..02c42c18 100644
--- a/rand.c
+++ b/rand.c
@@ -69,7 +69,7 @@ static struct cobj_ops random_state_ops = {
   cobj_hash_op 
 };
 
-static val make_state()
+static val make_state(void)
 {
   struct random_state *r = (struct random_state *) chk_malloc(sizeof *r);
   return cobj((mem_t *) r, random_state_s, &random_state_ops);
@@ -218,7 +218,6 @@ val random(val state, val modulus)
       goto invalid;
     for (;;) {
       cnum out = 0;
-      int i;
 
 #if SIZEOF_PTR >= 8
       for (i = 0; i < rands_needed; i++) {