summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorNick Ing-Simmons <nik@tiuk.ti.com>1997-11-05 00:50:27 +0000
committerNick Ing-Simmons <nik@tiuk.ti.com>1997-11-05 00:50:27 +0000
commit2b544454484ed91b6f1ae2cffef4c29b1302dcd7 (patch)
tree04fbdedc742e1f14a102cca392dff6b432613009 /perl.c
parent379bd76c62ad1ec219bfda207492671471a891f8 (diff)
downloadperl-2b544454484ed91b6f1ae2cffef4c29b1302dcd7.tar.gz
Compile(d) at least once with threads on win32
but did not work p4raw-id: //depot/ansiperl@202
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/perl.c b/perl.c
index 0500164aec..6606f71202 100644
--- a/perl.c
+++ b/perl.c
@@ -125,8 +125,10 @@ perl_construct(register PerlInterpreter *sv_interp)
#ifdef USE_THREADS
INIT_THREADS;
+#ifndef WIN32
if (pthread_key_create(&thr_key, 0))
croak("panic: pthread_key_create");
+#endif
MUTEX_INIT(&malloc_mutex);
MUTEX_INIT(&sv_mutex);
/*