Make bkpt.o state thread-local.

diff --git a/src/microcode/bkpt.c b/src/microcode/bkpt.c
index 973f1e356756c713b9104235fc714aaeba586c81..635b8e5d07c6ec6d745fec26f05ccfe66537acb8 100644 (file)
--- a/src/microcode/bkpt.c
+++ b/src/microcode/bkpt.c
@@ -33,11 +33,11 @@ USA.
 
 #define sp_nil ((struct sp_record *) 0)
 
-sp_record_list SP_List = sp_nil;
+__thread sp_record_list SP_List = sp_nil;
 
 extern bool Add_a_Pop_Return_Breakpoint (SCHEME_OBJECT *);
 
-static struct sp_record One_Before =
+static __thread struct sp_record One_Before =
 {
   ((SCHEME_OBJECT *) 0),
   sp_nil

diff --git a/src/microcode/bkpt.h b/src/microcode/bkpt.h
index 00104aa04b19dea35b2ab5d750819de8d436b8e7..597cf35c58b3e43968af21ae1bceb259c5054259 100644 (file)
--- a/src/microcode/bkpt.h
+++ b/src/microcode/bkpt.h
@@ -35,7 +35,7 @@ struct sp_record
 };
 
 typedef struct sp_record * sp_record_list;
-extern sp_record_list SP_List;
+extern __thread sp_record_list SP_List;
 
 #define DEBUG_MAXSLOTS 100