summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2013-08-22 22:58:37 -0700
committerFather Chrysostomos <sprout@cpan.org>2013-08-23 00:09:33 -0700
commit9cf272522da1fe871e57b0a75cc3322904a5276e (patch)
treedc6c8bd20937684badaf3ce8b42739b6ffa044aa /toke.c
parent4944d06bf95d97b3df7d001e695ad2ce31011184 (diff)
downloadperl-9cf272522da1fe871e57b0a75cc3322904a5276e.tar.gz
Fix typo in bf1b738b; another line num bug
This affects only mad builds. The line number after nullary_keyword_such_as_time ; was off by one.
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/toke.c b/toke.c
index 362aa71d5e..53a691a42a 100644
--- a/toke.c
+++ b/toke.c
@@ -5601,7 +5601,7 @@ Perl_yylex(pTHX)
{
d++;
if (d < PL_bufend)
- incline(s);
+ incline(d);
}
else if (d > PL_bufend) /* Found by Ilya: feed random input to Perl. */
Perl_croak(aTHX_ "panic: input overflow");