diff options
| author | Gisle Aas <gisle@activestate.com> | 2006-02-15 15:25:36 +0000 |
|---|---|---|
| committer | Gisle Aas <gisle@activestate.com> | 2006-02-15 15:25:36 +0000 |
| commit | 826955bd39254b001a9d724fb030a4ad97b21351 (patch) | |
| tree | f0638640682f79dcbf8030e1b3aa7ad102a83c16 | |
| parent | 28b6a6073c5db5b1818bbd7f98a2638af2383cbe (diff) | |
| download | perl-826955bd39254b001a9d724fb030a4ad97b21351.tar.gz | |
Get perl_fini() running on HP-UX again.
It was effectively disabled by change 24667 since
__ux_version is only available under DCE threads
which isn't used when perl is built on HP-UX 11
and later.
p4raw-id: //depot/perl@27194
| -rw-r--r-- | perl.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1321,7 +1321,7 @@ perl_free(pTHXx) /* provide destructors to clean up the thread key when libperl is unloaded */ #ifndef WIN32 /* handled during DLL_PROCESS_DETACH in win32/perllib.c */ -#if defined(__hpux) && __ux_version > 1020 && !defined(__GNUC__) +#if defined(__hpux) && !(defined(__ux_version) && __ux_version <= 1020) && !defined(__GNUC__) #pragma fini "perl_fini" #endif |