smp: share: pruxffi.o

diff --git a/README.txt b/README.txt
index e0eedc05b3a6d74da150bee23fd57cf1fb5c460c..9616a775bd24c1abeb92a1acde8709f91d9cdba6 100644 (file)
--- a/README.txt
+++ b/README.txt
@@ -892,10 +892,13 @@ command line.  The remaining 12 belong to the 7 microcode modules and
 
   pruxffi.o:
   00000004 b c_call_continue
-  00000000 B cstack_depth
+  00000000 B cstack_depth              __thread
   0000000c b return_to_c
   00000008 b run_callback
 
+       OK.  The primitive caches are single words, atomically
+       read/written.  If a cache is filled twice, no harm done.
+
   cmpint.o:
   00000010 b builtin_names
   0000000c b builtins

diff --git a/src/microcode/pruxffi.c b/src/microcode/pruxffi.c
index cc8f28ff6ffc7b70ca5c7111301a8a5537631de8..b935c15721bf54e306eedad50ba62cdd835e8107 100644 (file)
--- a/src/microcode/pruxffi.c
+++ b/src/microcode/pruxffi.c
@@ -402,7 +402,7 @@ cstack_pop (char * tos)
 }
 
 /* Number CStack frames, to detect slips. */
-int cstack_depth = 0;
+__thread int cstack_depth = 0;
 \f
 /* Callouts */