summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2007-06-05 10:10:33 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2007-06-05 10:10:33 +0000
commit584420f022db57225e9644b9c6668ff9f567984a (patch)
treead999faf594f41896ebbadd32b3511daf1be91e6 /toke.c
parentf58cd3869828b0993f2ad27e1061f23f4c1959bb (diff)
downloadperl-584420f022db57225e9644b9c6668ff9f567984a.tar.gz
Remove support for assertions and -A
p4raw-id: //depot/perl@31333
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c4
1 files changed, 0 insertions, 4 deletions
diff --git a/toke.c b/toke.c
index 69597735be..a375a777a4 100644
--- a/toke.c
+++ b/toke.c
@@ -4296,10 +4296,6 @@ Perl_yylex(pTHX)
sv_free(sv);
CvMETHOD_on(PL_compcv);
}
- else if (!PL_in_my && len == 9 && strnEQ(SvPVX(sv), "assertion", len)) {
- sv_free(sv);
- CvASSERTION_on(PL_compcv);
- }
/* After we've set the flags, it could be argued that
we don't need to do the attributes.pm-based setting
process, and shouldn't bother appending recognized