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 /gv.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 'gv.c')
| -rw-r--r-- | gv.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -372,7 +372,7 @@ Perl_gv_fetchmeth(pTHX_ HV *stash, const char *name, STRLEN len, I32 level) if (!basestash) { if (ckWARN(WARN_MISC)) Perl_warner(aTHX_ packWARN(WARN_MISC), "Can't locate package %"SVf" for @%s::ISA", - sv, hvname); + (void*)sv, hvname); continue; } gv = gv_fetchmeth(basestash, name, len, @@ -1824,7 +1824,7 @@ Perl_amagic_call(pTHX_ SV *left, SV *right, int method, int flags) if (amtp && amtp->fallback >= AMGfallYES) { DEBUG_o( Perl_deb(aTHX_ "%s", SvPVX_const(msg)) ); } else { - Perl_croak(aTHX_ "%"SVf, msg); + Perl_croak(aTHX_ "%"SVf, (void*)msg); } return NULL; } |