smp: share: wind.o

diff --git a/README.txt b/README.txt
index 127ac5681aa79b6defaad8e5a8b3fbf8da223752..73518f38af7e8cf59cbc55333beaac71b04ecc19 100644 (file)
--- a/README.txt
+++ b/README.txt
@@ -584,10 +584,12 @@ command line.  The remaining 12 belong to the 7 microcode modules and
   vector.o:
 
   wind.o:
-  00000024 b current_winding_record
-  00000000 b dstack
-  00000028 B dstack_position
-  00000000 b save_binding_location
+  00000024 b current_winding_record    __thread
+  00000000 b dstack                    __thread
+  00000028 B dstack_position           __thread
+  00000000 b save_binding_location     __thread
+
+       OK.  All state is thread-local now.
 
   prosenv.o:
 

diff --git a/src/microcode/wind.c b/src/microcode/wind.c
index 33f29ad12ac43d8cef5e6a2b55ef45f379a6f77d..b47e3c8d1f3079e531b9c867462c94ad455d9614 100644 (file)
--- a/src/microcode/wind.c
+++ b/src/microcode/wind.c
@@ -172,7 +172,7 @@ undo_binding (void * environment)
     (((struct binding_record *) environment) -> value);
 }
 
-static void ** save_binding_location;
+static __thread void ** save_binding_location;
 
 static void
 save_binding (void * environment)