From 65eaff3a030d762f1bffd069e7c0b93a8386e2c3 Mon Sep 17 00:00:00 2001
From: Gustavo Massaccesi <gustavo@oma.org.ar>
Date: Mon, 25 Jan 2016 19:36:42 -0300
Subject: [PATCH] Avoid compiler warnings

---
 racket/src/racket/src/fun.c | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/racket/src/racket/src/fun.c b/racket/src/racket/src/fun.c
index 0c14b8d5c0..859154d01d 100644
--- a/racket/src/racket/src/fun.c
+++ b/racket/src/racket/src/fun.c
@@ -1222,7 +1222,7 @@ void scheme_set_dynamic_state(Scheme_Dynamic_State *state, Scheme_Comp_Env *env,
   state->menv              = menv;
 }
 
-static void *apply_again_k()
+static void *apply_again_k(void)
 {
   Scheme_Thread *p = scheme_current_thread;
   Scheme_Object *val = p->ku.k.p1;
@@ -9697,7 +9697,6 @@ double scheme_get_inexact_milliseconds(void)
 /* this function can be called from any OS thread */
 {
 #ifdef USE_WIN32_TIME
-  FILETIME ft;
   mzlonglong v;
   v = get_hectonanoseconds_as_longlong();
   return (double)(v / 10000) + (((double)(v % 10000)) / 10000.0);