Change 19049 by [EMAIL PROTECTED] on 2003/03/24 04:10:00
Subject: [PATCH maintperl] vms.c threads tweak
From: "Craig A. Berry" <[EMAIL PROTECTED]>
Date: Sun, 23 Mar 2003 14:57:56 -0600
Message-ID: <[EMAIL PROTECTED]>
Affected files ...
... //depot/maint-5.8/perl/vms/vms.c#6 edit
Differences ...
==== //depot/maint-5.8/perl/vms/vms.c#6 (text) ====
Index: perl/vms/vms.c
--- perl/vms/vms.c#5~18928~ Tue Mar 11 12:09:47 2003
+++ perl/vms/vms.c Sun Mar 23 20:10:00 2003
@@ -4648,7 +4648,7 @@
if (tabidx) { tabvec[tabidx] = NULL; env_tables = tabvec; }
getredirection(argcp,argvp);
-#if defined(USE_5005THREADS) && ( defined(__DECC) || defined(__DECCXX) )
+#if ( (defined(USE_5005THREADS) || defined(USE_ITHREADS) ) && ( defined(__DECC) ||
defined(__DECCXX) )
{
# include <reentrancy.h>
(void) decc$set_reentrancy(C$C_MULTITHREAD);
End of Patch.
