diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2016-08-16 19:15:50 -0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2016-08-16 20:19:59 -0400 |
| commit | d732c5e56eaadd9e872e725ac0481273c58f319f (patch) | |
| tree | 56fbe38906e8e447dc6d66e88051e19fc0a752e8 /perlio.c | |
| parent | dd1dbff095629118e73a48a2a6008f03418a07f6 (diff) | |
| download | perl-d732c5e56eaadd9e872e725ac0481273c58f319f.tar.gz | |
Coverity CID #15149: Missing varargs init or cleanup
The return was returning after va_start but before va_end.
Diffstat (limited to 'perlio.c')
| -rw-r--r-- | perlio.c | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -350,11 +350,12 @@ PerlIO_debug(const char *fmt, ...) { va_list ap; dSYS; - va_start(ap, fmt); if (!DEBUG_i_TEST) return; + va_start(ap, fmt); + if (!PL_perlio_debug_fd) { if (!TAINTING_get && PerlProc_getuid() == PerlProc_geteuid() && |