At 10:48 AM 5/2/2001 -0700, Gurusamy Sarathy wrote:
>Or is the real problem that INIT_TLS_AND_INTERP needs fixing on VMS?

No, the real problem is that I go in rarely enough that I lose track of the 
major changes. You're right, and what I did was silly. Here's a patch to put 
it back.

--- vms/vms.c;-1        Tue May  1 18:00:40 2001
+++ vms/vms.c   Wed May  2 15:43:43 2001
@@ -6727,8 +6727,9 @@
 }
 
 void
-init_os_extras(pTHX)
+init_os_extras()
 {
+  dTHX;
   char* file = __FILE__;
   char temp_buff[512];
   if (my_trnlnm("DECC$DISABLE_TO_VMS_LOGNAME_TRANSLATION", temp_buff, 0)) {

--- perl.c;-1   Mon Apr 30 20:52:53 2001
+++ perl.c      Wed May  2 15:43:57 2001
@@ -1280,11 +1280,7 @@
     if (xsinit)
        (*xsinit)(aTHXo);       /* in case linked C routines want magical variables */
 #if defined(VMS) || defined(WIN32) || defined(DJGPP) || defined(__CYGWIN__) || 
defined(EPOC)
-#  if defined(VMS)
-    init_os_extras(aTHXo);
-#  else
     init_os_extras();
-#  endif
 #endif
 
 #ifdef USE_SOCKS


                                        Dan

--------------------------------------"it's like this"-------------------
Dan Sugalski                          even samurai
[EMAIL PROTECTED]                         have teddy bears and even
                                     teddy bears get drunk

Reply via email to