diff options
| author | Dan Sugalski <dan@sidhe.org> | 2001-05-16 14:05:19 -0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-17 01:41:07 +0000 |
| commit | bce813aac1160c79546da18348b6e6d4f2d4e476 (patch) | |
| tree | d305b12778f4e67359826c4de5aa802a8045d1d1 /thread.h | |
| parent | 532e0e8e5050ac4d94137112aa8d8c5283cba92b (diff) | |
| download | perl-bce813aac1160c79546da18348b6e6d4f2d4e476.tar.gz | |
Quick thread speedup
Message-Id: <5.1.0.14.0.20010516175826.01afde08@24.8.96.48>
p4raw-id: //depot/perl@10141
Diffstat (limited to 'thread.h')
| -rw-r--r-- | thread.h | 7 |
1 files changed, 6 insertions, 1 deletions
@@ -250,7 +250,12 @@ #endif /* JOIN */ #ifndef PERL_GET_CONTEXT -# define PERL_GET_CONTEXT pthread_getspecific(PL_thr_key) +/* True for Tru64 version 4.0 and up as well */ +# if defined(__ALPHA) && (__VMS_VER >= 70000000) +# define PERL_GET_CONTEXT pthread_unchecked_getspecific_np(PL_thr_key) +# else +# define PERL_GET_CONTEXT pthread_getspecific(PL_thr_key) +# endif #endif #ifndef PERL_SET_CONTEXT |