This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Parenthesize uses of macro arguments
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>
Wed, 17 May 2006 19:55:30 +0000 (19:55 +0000)
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>
Wed, 17 May 2006 19:55:30 +0000 (19:55 +0000)
p4raw-id: //depot/perl@28217

perl.h

diff --git a/perl.h b/perl.h
index 2cf5a46..aa47dec 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -1460,7 +1460,7 @@ int sockatmark(int);
 
 #if defined(HAS_C99_VARIADIC_MACROS) && !(defined(DEBUGGING) && !defined(PERL_USE_GCC_BRACE_GROUPS))
 #  ifdef PERL_USE_GCC_BRACE_GROUPS
-#      define my_snprintf(buffer, len, ...) ({ int __len__ = snprintf(buffer, len, __VA_ARGS__); if (__len__ >= len) Perl_croak(aTHX_ "panic: snprintf buffer overflow"); __len__; })
+#      define my_snprintf(buffer, len, ...) ({ int __len__ = snprintf(buffer, len, __VA_ARGS__); if (__len__ >= (len)) Perl_croak(aTHX_ "panic: snprintf buffer overflow"); __len__; })
 #  else
 #    define my_snprintf(buffer, len, ...) snprintf(buffer, len, __VA_ARGS__)
 #  endif
@@ -1470,7 +1470,7 @@ int sockatmark(int);
 
 #if defined(HAS_C99_VARIADIC_MACROS)
 #  ifdef PERL_USE_GCC_BRACE_GROUPS
-#      define my_vsnprintf(buffer, len, ...) ({ int __len__ = vsnprintf(buffer, len, __VA_ARGS__); if (__len__ >= len) Perl_croak(aTHX_ "panic: vsnprintf buffer overflow"); __len__; })
+#      define my_vsnprintf(buffer, len, ...) ({ int __len__ = vsnprintf(buffer, len, __VA_ARGS__); if (__len__ >= (len)) Perl_croak(aTHX_ "panic: vsnprintf buffer overflow"); __len__; })
 #  else
 #    define my_vsnprintf(buffer, len, ...) vsnprintf(buffer, len, __VA_ARGS__)
 #  endif