Change 12516 by jhi@alpha on 2001/10/19 23:57:48

        Integrate change #12511; fix gross win32 build issues.

Affected files ...

... //depot/perl/makedef.pl#92 integrate
... //depot/perl/sv.c#475 integrate

Differences ...

==== //depot/perl/makedef.pl#92 (text) ====
Index: perl/makedef.pl
--- perl/makedef.pl.~1~ Fri Oct 19 18:15:05 2001
+++ perl/makedef.pl     Fri Oct 19 18:15:05 2001
@@ -200,6 +200,9 @@
     }
 }
 
+unless ($PLATFORM eq 'vms') {
+    skip_symbols [qw(PL_my_inv_rand_max)];
+}
 
 if ($PLATFORM eq 'win32') {
     skip_symbols [qw(

==== //depot/perl/sv.c#475 (text) ====
Index: perl/sv.c
--- perl/sv.c.~1~       Fri Oct 19 18:15:05 2001
+++ perl/sv.c   Fri Oct 19 18:15:05 2001
@@ -9625,7 +9625,7 @@
      * their pointers copied. */
 
     IV i;
-    CLONE_PARAMS* param = (CLONE_PARAMS*) MALLOC(SIZEOF(CLONE_PARAMS));
+    CLONE_PARAMS* param = (CLONE_PARAMS*) malloc(sizeof(CLONE_PARAMS));
 
     PerlInterpreter *my_perl = (PerlInterpreter*)(*ipM->pMalloc)(ipM, 
sizeof(PerlInterpreter));
     PERL_SET_THX(my_perl);
@@ -10335,3 +10335,4 @@
 }
 
 #endif /* USE_ITHREADS */
+
End of Patch.

Reply via email to