From e094cf4e5192a5662baeec692467a205f3c25810 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@cs.utah.edu>
Date: Fri, 31 Dec 2010 07:37:46 -0700
Subject: [PATCH] win64: fix external reference to thread-locals

---
 src/racket/src/salloc.c | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/src/racket/src/salloc.c b/src/racket/src/salloc.c
index 50379e20e0..fde4223bff 100644
--- a/src/racket/src/salloc.c
+++ b/src/racket/src/salloc.c
@@ -251,6 +251,14 @@ Thread_Local_Variables *scheme_external_get_thread_local_variables() XFORM_SKIP_
 }
 #endif
 
+#ifdef IMPLEMENT_THREAD_LOCAL_EXTERNALLY_VIA_PROC
+MZ_DLLEXPORT Thread_Local_Variables *scheme_external_get_thread_local_variables();
+Thread_Local_Variables *scheme_external_get_thread_local_variables() XFORM_SKIP_PROC
+{
+  return scheme_get_thread_local_variables();
+}
+#endif
+
 void scheme_setup_thread_local_key_if_needed() XFORM_SKIP_PROC
 {
 #ifdef IMPLEMENT_THREAD_LOCAL_VIA_PTHREADS