diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2011-12-27 14:52:21 -0800 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2011-12-28 22:58:52 -0800 |
| commit | dcbac5bbcda3f6b893eade5bc95878a443cbe563 (patch) | |
| tree | 8e69379c182533f93148eb4a6dc7ed69d197cdb1 /gv.c | |
| parent | 6ad282c70d80576d5d66b25af19780fde18afd42 (diff) | |
| download | perl-dcbac5bbcda3f6b893eade5bc95878a443cbe563.tar.gz | |
diag_listed_as galore
In two instances, I actually modified to code to avoid %s for a
constant string, as it should be faster that way.
Diffstat (limited to 'gv.c')
| -rw-r--r-- | gv.c | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -1926,6 +1926,7 @@ Perl_gv_fetchpvn_flags(pTHX_ const char *nambeg, STRLEN full_len, I32 flags, case '*': /* $* */ case '#': /* $# */ if (sv_type == SVt_PV) + /* diag_listed_as: $* is no longer supported */ Perl_ck_warner_d(aTHX_ packWARN2(WARN_DEPRECATED, WARN_SYNTAX), "$%c is no longer supported", *name); break; @@ -2346,6 +2347,7 @@ Perl_Gv_AMupdate(pTHX_ HV *stash, bool destructing) const SV * const name = (gvsv && SvPOK(gvsv)) ? gvsv : newSVpvs_flags("???", SVs_TEMP); + /* diag_listed_as: Can't resolve method "%s" overloading "%s" in package "%s" */ Perl_croak(aTHX_ "%s method \"%"SVf256 "\" overloading \"%s\" "\ "in package \"%"HEKf256"\"", |