lispobj dynamic_values[1]; /* actually more like 4000 or so */
};
-extern struct thread *all_threads;
+extern struct thread * volatile all_threads;
extern int dynamic_values_bytes;
#ifdef LISP_FEATURE_SB_THREAD
lispobj r=
((union per_thread_data *)thread)
->dynamic_values[fixnum_value(sym->tls_index)];
- if(r!=UNBOUND_MARKER_WIDETAG) return r;
+ if(r!=NO_TLS_VALUE_MARKER_WIDETAG) return r;
}
#endif
return sym->value;
if(thread && sym->tls_index) {
lispobj *pr= &(((union per_thread_data *)thread)
->dynamic_values[fixnum_value(sym->tls_index)]);
- if(*pr!= UNBOUND_MARKER_WIDETAG) {
+ if(*pr!=NO_TLS_VALUE_MARKER_WIDETAG) {
*pr=val;
return;
}