diff options
author | Vincent Pit <perl@profvince.com> | 2010-05-04 10:43:07 +0200 |
---|---|---|
committer | Vincent Pit <perl@profvince.com> | 2010-05-04 10:43:07 +0200 |
commit | 3297d27d658a6691c429e496bd2a05fe04eda9d7 (patch) | |
tree | c9e4e98fbb3b704aba1f97c426dc0a7e1890b060 /pp_pack.c | |
parent | 6c61c2d446974ecc679f2ed5671233e66fec0984 (diff) | |
download | perl-3297d27d658a6691c429e496bd2a05fe04eda9d7.tar.gz |
Silence a couple of false positive "may be used uninitialized" gcc warnings
Diffstat (limited to 'pp_pack.c')
-rw-r--r-- | pp_pack.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -1225,7 +1225,7 @@ STATIC I32 S_unpack_rec(pTHX_ tempsym_t* symptr, const char *s, const char *strbeg, const char *strend, const char **new_s ) { dVAR; dSP; - SV *sv; + SV *sv = NULL; const I32 start_sp_offset = SP - PL_stack_base; howlen_t howlen; I32 checksum = 0; @@ -1558,7 +1558,7 @@ S_unpack_rec(pTHX_ tempsym_t* symptr, const char *s, const char *strbeg, const c } case 'H': case 'h': { - char *str; + char *str = NULL; /* Preliminary length estimate, acceptable for utf8 too */ if (howlen == e_star || len > (strend - s) * 2) len = (strend - s) * 2; |