diff options
| author | Robin Barker <RMBarker@cpan.org> | 2003-06-05 18:16:58 +0100 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-06-05 18:37:02 +0000 |
| commit | 84c133a0c99ec2d2efc517f14b45051d3bfe4074 (patch) | |
| tree | 9cf4cd27603e17927d3d256de12030ec959fdde3 /gv.c | |
| parent | 75ccb5d377ec0ee8e7df44481cfb19db42df4931 (diff) | |
| download | perl-84c133a0c99ec2d2efc517f14b45051d3bfe4074.tar.gz | |
RE: maint @ 19683
Message-ID: <533D273D4014D411AB1D00062938C4D904046564@hotel.npl.co.uk>
(skipped the MIME::Base64 part, leaving that to Gisle)
p4raw-id: //depot/perl@19694
Diffstat (limited to 'gv.c')
| -rw-r--r-- | gv.c | 6 |
1 files changed, 4 insertions, 2 deletions
@@ -1350,7 +1350,8 @@ Perl_Gv_AMupdate(pTHX_ HV *stash) /* GvSV contains the name of the method. */ GV *ngv = Nullgv; - DEBUG_o( Perl_deb(aTHX_ "Resolving method `%.256"SVf"' for overloaded `%s' in package `%.256s'\n", + DEBUG_o( Perl_deb(aTHX_ "Resolving method `%"SVf256\ + "' for overloaded `%s' in package `%.256s'\n", GvSV(gv), cp, HvNAME(stash)) ); if (!SvPOK(GvSV(gv)) || !(ngv = gv_fetchmethod_autoload(stash, SvPVX(GvSV(gv)), @@ -1359,7 +1360,8 @@ Perl_Gv_AMupdate(pTHX_ HV *stash) /* Can be an import stub (created by `can'). */ SV *gvsv = GvSV(gv); const char *name = SvPOK(gvsv) ? SvPVX(gvsv) : "???"; - Perl_croak(aTHX_ "%s method `%.256s' overloading `%s' in package `%.256s'", + Perl_croak(aTHX_ "%s method `%.256s' overloading `%s' "\ + "in package `%.256s'", (GvCVGEN(gv) ? "Stub found while resolving" : "Can't resolve"), name, cp, HvNAME(stash)); |