diff options
| author | David Mitchell <davem@iabyn.com> | 2012-12-12 10:34:29 +0000 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2012-12-12 13:39:33 +0000 |
| commit | 9e440eccb3896f01c2e619c212ed4ed156d9d910 (patch) | |
| tree | c07b27b73093b4bd42cfce707f9639e88cf49cb9 /perl.h | |
| parent | 09391cc554f6d7daf76cbe5b4c7ce18c82372b70 (diff) | |
| download | perl-9e440eccb3896f01c2e619c212ed4ed156d9d910.tar.gz | |
perl.h: fix signedness warning with clang
'len' arg to my_vsnprintf() is supposed to be Size_t; cast it that way
before testing it.
Diffstat (limited to 'perl.h')
| -rw-r--r-- | perl.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1709,7 +1709,7 @@ EXTERN_C char *crypt(const char *, const char *); #if defined(HAS_VSNPRINTF) && defined(HAS_C99_VARIADIC_MACROS) && !(defined(DEBUGGING) && !defined(PERL_USE_GCC_BRACE_GROUPS)) && !defined(PERL_GCC_PEDANTIC) # ifdef PERL_USE_GCC_BRACE_GROUPS -# define my_vsnprintf(buffer, len, ...) ({ int __len__ = vsnprintf(buffer, len, __VA_ARGS__); if ((len) > 0 && (Size_t)__len__ >= (len)) Perl_croak_nocontext("panic: vsnprintf buffer overflow"); __len__; }) +# define my_vsnprintf(buffer, len, ...) ({ int __len__ = vsnprintf(buffer, len, __VA_ARGS__); if ((len) > 0 && (Size_t)__len__ >= (Size_t)(len)) Perl_croak_nocontext("panic: vsnprintf buffer overflow"); __len__; }) # define PERL_MY_VSNPRINTF_GUARDED # else # define my_vsnprintf(buffer, len, ...) vsnprintf(buffer, len, __VA_ARGS__) |