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
commitc793c31905ce3bbd0f53a1794c012b42f0dc0246 (patch)
treee66835bcb0b000b79b92888e45303b89ca6e57d1 /perl_checker.src/lexer.mll
parent0b568a9901badff998e00a0131444efb40044f2e (diff)
downloadperl_checker-c793c31905ce3bbd0f53a1794c012b42f0dc0246.tar
perl_checker-c793c31905ce3bbd0f53a1794c012b42f0dc0246.tar.gz
perl_checker-c793c31905ce3bbd0f53a1794c012b42f0dc0246.tar.bz2
perl_checker-c793c31905ce3bbd0f53a1794c012b42f0dc0246.tar.xz
perl_checker-c793c31905ce3bbd0f53a1794c012b42f0dc0246.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) }