diff options
| author | Todd C. Miller <millert@cvs.openbsd.org> | 2002-10-27 22:15:15 +0000 |
|---|---|---|
| committer | Todd C. Miller <millert@cvs.openbsd.org> | 2002-10-27 22:15:15 +0000 |
| commit | 74cfb115ac810480c0000dc742b20383c1578bac (patch) | |
| tree | 316d96e5123617976f1637b143570c309a662045 /gnu/usr.bin/perl/win32/win32thread.c | |
| parent | 453ade492b8e06c619009d6cd52a85cb04e8cf17 (diff) | |
stock perl 5.8.0 from CPAN
Diffstat (limited to 'gnu/usr.bin/perl/win32/win32thread.c')
| -rw-r--r-- | gnu/usr.bin/perl/win32/win32thread.c | 12 |
1 files changed, 3 insertions, 9 deletions
diff --git a/gnu/usr.bin/perl/win32/win32thread.c b/gnu/usr.bin/perl/win32/win32thread.c index 900f5fedfff..1fdd0efc020 100644 --- a/gnu/usr.bin/perl/win32/win32thread.c +++ b/gnu/usr.bin/perl/win32/win32thread.c @@ -1,12 +1,6 @@ #include "EXTERN.h" #include "perl.h" -#if defined(PERL_OBJECT) -#define NO_XSLOCKS -extern CPerlObj* pPerl; -#include "XSUB.h" -#endif - #ifdef USE_DECLSPEC_THREAD __declspec(thread) void *PL_current_context = NULL; #endif @@ -14,7 +8,7 @@ __declspec(thread) void *PL_current_context = NULL; void Perl_set_context(void *t) { -#if defined(USE_THREADS) || defined(USE_ITHREADS) +#if defined(USE_5005THREADS) || defined(USE_ITHREADS) # ifdef USE_DECLSPEC_THREAD Perl_current_context = t; # else @@ -28,7 +22,7 @@ Perl_set_context(void *t) void * Perl_get_context(void) { -#if defined(USE_THREADS) || defined(USE_ITHREADS) +#if defined(USE_5005THREADS) || defined(USE_ITHREADS) # ifdef USE_DECLSPEC_THREAD return Perl_current_context; # else @@ -42,7 +36,7 @@ Perl_get_context(void) #endif } -#ifdef USE_THREADS +#ifdef USE_5005THREADS void Perl_init_thread_intern(struct perl_thread *athr) { |