diff options
author | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2020-07-19 18:01:36 +0100 |
---|---|---|
committer | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2020-07-20 21:31:43 +0100 |
commit | 573edd37603ddf5d0137224a22fa2ec4915388fe (patch) | |
tree | 477767c43d1dde6717f610a41a674b56d5c2a0b8 /os2 | |
parent | ae955d3a183337a4770d39640a21da146cf97bc7 (diff) | |
download | perl-573edd37603ddf5d0137224a22fa2ec4915388fe.tar.gz |
Remove the final remnants of 5005threads support
Only THREAD_RET_TYPE is still used.
Diffstat (limited to 'os2')
-rw-r--r-- | os2/os2.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -215,7 +215,7 @@ static struct perlos2_state_t { const Perl_PFN * const pExtFCN = (Perl_po2()->po2_ExtFCN); -#if defined(USE_5005THREADS) || defined(USE_ITHREADS) +#if defined(USE_ITHREADS) typedef void (*emx_startroutine)(void *); typedef void* (*pthreads_startroutine)(void *); @@ -5362,7 +5362,7 @@ gcvt_os2 (double value, int digits, char *buffer) #undef fork int fork_with_resources() { -#if (defined(USE_5005THREADS) || defined(USE_ITHREADS)) && !defined(USE_SLOW_THREAD_SPECIFIC) +#if defined(USE_ITHREADS) && !defined(USE_SLOW_THREAD_SPECIFIC) dTHX; void *ctx = PERL_GET_CONTEXT; #endif @@ -5370,7 +5370,7 @@ int fork_with_resources() int rc = fork(); if (rc == 0) { /* child */ -#if (defined(USE_5005THREADS) || defined(USE_ITHREADS)) && !defined(USE_SLOW_THREAD_SPECIFIC) +#if defined(USE_ITHREADS) && !defined(USE_SLOW_THREAD_SPECIFIC) ALLOC_THREAD_KEY; /* Acquire the thread-local memory */ PERL_SET_CONTEXT(ctx); /* Reinit the thread-local memory */ #endif |