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,