This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
paranoia: parenthesize macro parameters
[perl5.git] / cop.h
diff --git a/cop.h b/cop.h
index ce688ab..2be8fb1 100644 (file)
--- a/cop.h
+++ b/cop.h
@@ -1016,7 +1016,7 @@ typedef struct stackinfo PERL_SI;
 #endif
 
 #if defined DEBUGGING && !defined DEBUGGING_RE_ONLY
-#  define PUSHSTACK_INIT_HWM(si) si->si_stack_hwm = 0
+#  define PUSHSTACK_INIT_HWM(si) ((si)->si_stack_hwm = 0)
 #else
 #  define PUSHSTACK_INIT_HWM(si) NOOP
 #endif