diff options
author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-01-15 18:25:45 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-01-15 18:25:45 +0000 |
commit | 3e7dd34d07ec3fbcf1e108a3270d6009e068e8eb (patch) | |
tree | 221d72357a1188182ff576ec9f1933e27f280439 /toke.c | |
parent | 607905347eb1bbe08eb76ed3e8e9e27622ad97ed (diff) | |
download | perl-3e7dd34d07ec3fbcf1e108a3270d6009e068e8eb.tar.gz |
Enable the ~~ operator by default.
Remove the ~~ feature.
p4raw-id: //depot/perl@29838
Diffstat (limited to 'toke.c')
-rw-r--r-- | toke.c | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -4134,8 +4134,7 @@ Perl_yylex(pTHX) /* FALL THROUGH */ case '~': if (s[1] == '~' - && (PL_expect == XOPERATOR || PL_expect == XTERMORDORDOR) - && FEATURE_IS_ENABLED("~~")) + && (PL_expect == XOPERATOR || PL_expect == XTERMORDORDOR)) { s += 2; Eop(OP_SMARTMATCH); |