summaryrefslogtreecommitdiffstats
path: root/perl_checker.src/lexer.mll
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2006-06-14 12:17:23 +0000
committerPascal Rigaux <pixel@mandriva.com>2006-06-14 12:17:23 +0000
commit070b4efec4b1a23f5a3b307fa76a18d1e4ba215c (patch)
tree5ce48efa182da7911944172ed690a58069b1c3b6 /perl_checker.src/lexer.mll
parent575ddb72d0c22a58e9e69c2364c41b07550e4252 (diff)
downloadperl-MDK-Common-070b4efec4b1a23f5a3b307fa76a18d1e4ba215c.tar
perl-MDK-Common-070b4efec4b1a23f5a3b307fa76a18d1e4ba215c.tar.gz
perl-MDK-Common-070b4efec4b1a23f5a3b307fa76a18d1e4ba215c.tar.bz2
perl-MDK-Common-070b4efec4b1a23f5a3b307fa76a18d1e4ba215c.tar.xz
perl-MDK-Common-070b4efec4b1a23f5a3b307fa76a18d1e4ba215c.zip
"pop @l" return value can be dropped (ie make it similar to "shift")
Diffstat (limited to 'perl_checker.src/lexer.mll')
-rw-r--r--perl_checker.src/lexer.mll1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl_checker.src/lexer.mll b/perl_checker.src/lexer.mll
index b8f7969..aca8d03 100644
--- a/perl_checker.src/lexer.mll
+++ b/perl_checker.src/lexer.mll
@@ -546,6 +546,7 @@ rule token = parse
| "keys"
| "exists"
| "shift"
+| "pop"
| "eval"
| "ref" { ONE_SCALAR_PARA(lexeme lexbuf, pos lexbuf) }