Change 33380 by [EMAIL PROTECTED] on 2008/02/27 09:06:47

        Fix preprocessor syntax

Affected files ...

... //depot/perl/perl.h#832 edit

Differences ...

==== //depot/perl/perl.h#832 (text) ====
Index: perl/perl.h
--- perl/perl.h#831~33379~      2008-02-26 15:22:30.000000000 -0800
+++ perl/perl.h 2008-02-27 01:06:47.000000000 -0800
@@ -4073,9 +4073,11 @@
 
 #ifdef MYMALLOC
 #  define Perl_safesysmalloc_size(where)       Perl_malloced_size(where)
-#else if defined(HAS_MALLOC_SIZE)
-#  define Perl_safesysmalloc_size(where)                       \
-       (malloc_size(((char *)(where)) - sTHX) - sTHX)
+#else
+#   ifdef HAS_MALLOC_SIZE
+#      define Perl_safesysmalloc_size(where)                   \
+           (malloc_size(((char *)(where)) - sTHX) - sTHX)
+#   endif
 #endif
 
 typedef int (CPERLscope(*runops_proc_t)) (pTHX);
End of Patch.

Reply via email to