Permalink
Browse files

remove LASTSTATE hack

  • Loading branch information...
1 parent 77327a4 commit 8a3fdfda436abf79cc84cff803362626b32746f1 @TimToady TimToady committed Oct 16, 2012
Showing with 1 addition and 4 deletions.
  1. +0 −1 CursorBase.pmc
  2. +1 −1 STD.pm6
  3. +0 −2 viv
View
@@ -440,7 +440,6 @@ sub initparse {
local $::HIGHWATER = 0;
local $::HIGHMESS = '';
local $::HIGHEXPECT = {};
- local $::LASTSTATE;
local $::LAST_NIBBLE = bless { firstline => 0, lastline => 0 }, 'Cursor';
local $::LAST_NIBBLE_MULTILINE = bless { firstline => 0, lastline => 0 }, 'Cursor';
local $::GOAL = "(eof)";
View
@@ -1322,7 +1322,7 @@ grammar P6 is STD {
# this could either be a statement that follows a declaration
# or a statement that is within the block of a code declaration
- <!!{ $*LASTSTATE = $¢.pos; $¢ = %*LANG<MAIN>.bless($¢); }>
+ <!!{ $¢ = %*LANG<MAIN>.bless($¢); }>
[
| <label> <statement>
View
2 viv
@@ -1687,8 +1687,6 @@ my \$retree;
use YAML::XS;
-\$SIG{__WARN__} = sub { die \@_," statement started at line ", 'Cursor'->lineof(\$::LASTSTATE), "\n" } if \$::DEBUG;
-
END
$header;
}

0 comments on commit 8a3fdfd

Please sign in to comment.