summaryrefslogtreecommitdiff
path: root/win32/win32thread.c
diff options
context:
space:
mode:
Diffstat (limited to 'win32/win32thread.c')
-rw-r--r--win32/win32thread.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/win32/win32thread.c b/win32/win32thread.c
index d62dadd1e3..0dd3e77f47 100644
--- a/win32/win32thread.c
+++ b/win32/win32thread.c
@@ -8,21 +8,27 @@ __declspec(thread) struct perl_thread *Perl_current_thread = NULL;
void
Perl_setTHR(struct perl_thread *t)
{
+#ifdef USE_THREADS
#ifdef USE_DECLSPEC_THREAD
Perl_current_thread = t;
#else
TlsSetValue(thr_key,t);
#endif
+#endif
}
struct perl_thread *
Perl_getTHR(void)
{
+#ifdef USE_THREADS
#ifdef USE_DECLSPEC_THREAD
return Perl_current_thread;
#else
return (struct perl_thread *) TlsGetValue(thr_key);
#endif
+#else
+ return NULL;
+#endif
}
void