diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2006-06-14 12:17:23 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2006-06-14 12:17:23 +0000 |
commit | 070b4efec4b1a23f5a3b307fa76a18d1e4ba215c (patch) | |
tree | 5ce48efa182da7911944172ed690a58069b1c3b6 /perl_checker.src/lexer.mll | |
parent | 575ddb72d0c22a58e9e69c2364c41b07550e4252 (diff) | |
download | perl-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.mll | 1 |
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) } |