summaryrefslogtreecommitdiff
path: root/pp.c
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2011-12-15 17:45:45 -0800
committerFather Chrysostomos <sprout@cpan.org>2011-12-15 17:45:45 -0800
commit885f468ab43f5574564ed6c3ba42b7e01191a66e (patch)
treefb1e7e5286a6f7b8cf9cff715b732e4b8ae1624e /pp.c
parent01868d00c93df805758fe7895360297e7703e3d2 (diff)
downloadperl-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.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/pp.c b/pp.c
index 56a69db246..3c290dd89e 100644
--- a/pp.c
+++ b/pp.c
@@ -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);