diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2006-04-29 01:58:58 +0300 |
---|---|---|
committer | Steve Peters <steve@fisharerojo.org> | 2006-04-28 20:40:41 +0000 |
commit | 95b63a389ed86efed1a2fa9fd24931d56aac6070 (patch) | |
tree | aeb1bc30a3a260876b428893c2b1a0c94fc4d6bd /hv.c | |
parent | 899be1018553cb37b5cccbe4f65d169fd1c17028 (diff) | |
download | perl-95b63a389ed86efed1a2fa9fd24931d56aac6070.tar.gz |
reduce gcc -ansi -pedantic noise plus a suggestion
Message-ID: <44527402.8000506@gmail.com>
p4raw-id: //depot/perl@28008
Diffstat (limited to 'hv.c')
-rw-r--r-- | hv.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -1593,8 +1593,8 @@ Perl_hv_clear(pTHX_ HV *hv) if (HeVAL(entry) && SvREADONLY(HeVAL(entry))) { SV* const keysv = hv_iterkeysv(entry); Perl_croak(aTHX_ - "Attempt to delete readonly key '%"SVf"' from a restricted hash", - keysv); + "Attempt to delete readonly key '%"SVf"' from a restricted hash", + (void*)keysv); } SvREFCNT_dec(HeVAL(entry)); HeVAL(entry) = &PL_sv_placeholder; @@ -2691,7 +2691,7 @@ Perl_refcounted_he_new(pTHX_ struct refcounted_he *const parent, STRLEN key_len; const char *key_p = SvPV_const(key, key_len); STRLEN value_len = 0; - const char *value_p; + const char *value_p = NULL; char value_type; char flags; STRLEN key_offset; |