From df891791b44f0f585a6ed14494485cc0462c3830 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Sun, 21 Jul 2013 21:57:25 -0600
Subject: [PATCH] avoid a compiler warning

---
 racket/src/racket/src/thread.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/racket/src/racket/src/thread.c b/racket/src/racket/src/thread.c
index 68f72398ea..c6e5adad9b 100644
--- a/racket/src/racket/src/thread.c
+++ b/racket/src/racket/src/thread.c
@@ -3470,7 +3470,7 @@ Scheme_Object *scheme_fd_to_semaphore(intptr_t fd, int mode, int is_socket)
 #ifdef USE_WINSOCK_TCP
   return NULL;
 #else
-  Scheme_Object *key, *v, *s;
+  Scheme_Object *key, *v, *s = NULL;
 #if defined(HAVE_KQUEUE_SYSCALL) || defined(HAVE_EPOLL_SYSCALL)
 # else
   void *r, *w, *e;