diff options
author | Father Chrysostomos <sprout@cpan.org> | 2011-12-15 17:45:45 -0800 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2011-12-15 17:45:45 -0800 |
commit | 885f468ab43f5574564ed6c3ba42b7e01191a66e (patch) | |
tree | fb1e7e5286a6f7b8cf9cff715b732e4b8ae1624e /pp.c | |
parent | 01868d00c93df805758fe7895360297e7703e3d2 (diff) | |
download | perl-885f468ab43f5574564ed6c3ba42b7e01191a66e.tar.gz |
Name anon handles __ANONIO__
rather than $__ANONIO__
That dollar sign *has* to have been a mistake. In ck_fun, the
name was set to __ANONIO__, but it seems the change that added it
(afd1915d43) did not account for the fact that a little later on the
same function checks to makes sure it begins with a dollar sign, as it
could only be a variable name.
rv2gv’s use of $__ANONIO__ (added recently by yours truly) was just
copying was ck_fun was doing.
Diffstat (limited to 'pp.c')
-rw-r--r-- | pp.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -163,7 +163,7 @@ S_rv2gv(pTHX_ SV *sv, const bool vivify_sv, const bool strict, sv = SvRV(sv); if (SvTYPE(sv) == SVt_PVIO) { GV * const gv = MUTABLE_GV(sv_newmortal()); - gv_init(gv, 0, "$__ANONIO__", 11, 0); + gv_init(gv, 0, "__ANONIO__", 10, 0); GvIOp(gv) = MUTABLE_IO(sv); SvREFCNT_inc_void_NN(sv); sv = MUTABLE_SV(gv); |