summaryrefslogtreecommitdiff
path: root/hv.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2006-04-29 01:58:58 +0300
committerSteve Peters <steve@fisharerojo.org>2006-04-28 20:40:41 +0000
commit95b63a389ed86efed1a2fa9fd24931d56aac6070 (patch)
treeaeb1bc30a3a260876b428893c2b1a0c94fc4d6bd /hv.c
parent899be1018553cb37b5cccbe4f65d169fd1c17028 (diff)
downloadperl-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.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/hv.c b/hv.c
index cc2a384774..a5336c6055 100644
--- a/hv.c
+++ b/hv.c
@@ -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;