From: Matt Birkholz <puck@birchwood-abbey.net>
Date: Sat, 20 Dec 2014 21:42:57 +0000 (-0700)
Subject: smp: share: uxsig.o
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=81aa53cdc22209e75787178ab791cd79f813e799;p=mit-scheme.git

smp: share: uxsig.o
---

diff --git a/README.txt b/README.txt
index 73f4bea5f..2b5e70c6e 100644
--- a/README.txt
+++ b/README.txt
@@ -782,14 +782,16 @@ command line.  The remaining 12 belong to the 7 microcode modules and
 	I/O waiter).
 
   uxsig.o:
-  00000000 b blocked_signals
-  000000a0 b buffer.8771
-  00000000 d reset_choices.9210
-  00000080 b signal_descriptors
-  00000084 b signal_descriptors_length
-  00000088 b signal_descriptors_limit
-  00000004 C stop_signal_hook
-  00000004 C subprocess_death_hook
+  00000000 b blocked_signals		__thread
+  000000a0 b buffer.8771		__thread
+  00000000 d reset_choices.9210		read-only
+  00000080 b signal_descriptors		read-only, UX_initialize_signals
+  00000084 b signal_descriptors_length	read-only, UX_initialize_signals
+  00000088 b signal_descriptors_limit	read-only, UX_initialize_signals
+  00000004 C stop_signal_hook		read-only, UX_initialize_processes
+  00000004 C subprocess_death_hook	read-only, UX_initialize_processes
+
+	OK.
 
   uxsock.o:
   00000000 b address.8832
diff --git a/src/microcode/uxsig.c b/src/microcode/uxsig.c
index ce9b20890..8f351904a 100644
--- a/src/microcode/uxsig.c
+++ b/src/microcode/uxsig.c
@@ -24,7 +24,7 @@ USA.
 
 */
 
-#include "scheme.h"
+#include "prims.h"
 #include "option.h"
 #include "ux.h"
 #include "ossig.h"
@@ -151,7 +151,7 @@ preserve_signal_mask (void)
     ((sizeof (sigset_t)), save_signal_mask, restore_signal_mask);
 }
 
-static sigset_t blocked_signals;
+static __thread sigset_t blocked_signals;
 
 void
 block_signals (void)
@@ -296,7 +296,7 @@ find_signal_descriptor (int signo)
 const char *
 find_signal_name (int signo)
 {
-  static char buffer [32];
+  static __thread char buffer [32];
   struct signal_descriptor * descriptor = (find_signal_descriptor (signo));
   if (descriptor != 0)
     return (descriptor -> name);