diff options
author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2008-02-27 09:06:47 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2008-02-27 09:06:47 +0000 |
commit | cfe5289891381086cbb4d57f93a59ba02c2cd726 (patch) | |
tree | 233cecb935d20b189e20ed4d536ef40e6cd5794c /perl.h | |
parent | ca7c1a2998b2bece800791e0ee5cce600e2f647a (diff) | |
download | perl-cfe5289891381086cbb4d57f93a59ba02c2cd726.tar.gz |
Fix preprocessor syntax
p4raw-id: //depot/perl@33380
Diffstat (limited to 'perl.h')
-rw-r--r-- | perl.h | 8 |
1 files changed, 5 insertions, 3 deletions
@@ -4073,9 +4073,11 @@ struct perl_memory_debug_header { #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); |