summaryrefslogtreecommitdiff
path: root/perl.h
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2008-02-27 09:06:47 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2008-02-27 09:06:47 +0000
commitcfe5289891381086cbb4d57f93a59ba02c2cd726 (patch)
tree233cecb935d20b189e20ed4d536ef40e6cd5794c /perl.h
parentca7c1a2998b2bece800791e0ee5cce600e2f647a (diff)
downloadperl-cfe5289891381086cbb4d57f93a59ba02c2cd726.tar.gz
Fix preprocessor syntax
p4raw-id: //depot/perl@33380
Diffstat (limited to 'perl.h')
-rw-r--r--perl.h8
1 files changed, 5 insertions, 3 deletions
diff --git a/perl.h b/perl.h
index aec1e263a4..736d365c21 100644
--- a/perl.h
+++ b/perl.h
@@ -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);