From 27a5a47700b63c9256e0d5eed146dc0dde472aaa Mon Sep 17 00:00:00 2001
From: Kevin Tew <tewk@racket-lang.org>
Date: Fri, 12 Dec 2008 19:36:20 +0000
Subject: [PATCH] added THREAD_LOCAL to Finalizations **save_fns_ptr

svn: r12815
---
 src/mzscheme/src/salloc.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/mzscheme/src/salloc.c b/src/mzscheme/src/salloc.c
index db5e8a50a8..26d137189f 100644
--- a/src/mzscheme/src/salloc.c
+++ b/src/mzscheme/src/salloc.c
@@ -1040,7 +1040,7 @@ static void do_next_finalization(void *o, void *data)
 /* Makes gc2 xformer happy: */
 typedef void (*finalizer_function)(void *p, void *data);
 static int traversers_registered;
-static Finalizations **save_fns_ptr;
+static THREAD_LOCAL Finalizations **save_fns_ptr;
 
 static void add_finalizer(void *v, void (*f)(void*,void*), void *data, 
 			  int prim, int ext,