diff options
author | Father Chrysostomos <sprout@cpan.org> | 2015-08-19 13:10:16 -0700 |
---|---|---|
committer | Ricardo Signes <rjbs@cpan.org> | 2015-09-29 10:49:19 -0400 |
commit | 7fba29668402ec06ad00dfafda69913bcbb2c1df (patch) | |
tree | 70b3e0d3f06e47f23571ce6f95c09991ee83b39b /op.c | |
parent | 96f902ff649ca0f75966f5282611d16ecf5f907e (diff) | |
download | perl-7fba29668402ec06ad00dfafda69913bcbb2c1df.tar.gz |
Disable lexical $_
This just disables the syntax and modifes the tests. The underlying
infrastructure has not been removed yet.
I had to change a couple of tests in cpan/.
Diffstat (limited to 'op.c')
-rw-r--r-- | op.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -594,7 +594,7 @@ Perl_allocmy(pTHX_ const char *const name, const STRLEN len, const U32 flags) !(is_our || isALPHA(name[1]) || ((flags & SVf_UTF8) && isIDFIRST_utf8((U8 *)name+1)) || - (name[1] == '_' && (*name == '$' || len > 2)))) + (name[1] == '_' && len > 2))) { if (!(flags & SVf_UTF8 && UTF8_IS_START(name[1])) && isASCII(name[1]) |