summaryrefslogtreecommitdiffstats
path: root/perl_checker.src/lexer.mll
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-08-11 02:11:29 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-08-11 02:11:29 +0000
commit5a52635cb5b6830442ab350b8855b4e8115bca9e (patch)
tree904b49aafe73d8aca041eade5a7dce0ebe45cbb4 /perl_checker.src/lexer.mll
parentb9c762fe0077a6de3e0fc10aa86a8eea9f1a2af5 (diff)
downloadperl-MDK-Common-5a52635cb5b6830442ab350b8855b4e8115bca9e.tar
perl-MDK-Common-5a52635cb5b6830442ab350b8855b4e8115bca9e.tar.gz
perl-MDK-Common-5a52635cb5b6830442ab350b8855b4e8115bca9e.tar.bz2
perl-MDK-Common-5a52635cb5b6830442ab350b8855b4e8115bca9e.tar.xz
perl-MDK-Common-5a52635cb5b6830442ab350b8855b4e8115bca9e.zip
- allow $_o_XXX parameter name which is both unused and optional (same for $_b_XXX)
- shift is a ONE_SCALAR_PARA so that $box->pack_start(shift @l, 0, 0, 4) is parsed correctly - in arrange_global_vars_declared(), don't keep anything in global_vars_declared, better create shadow packages to contain them - much better merging of multiple files defining functions in the same package. This fixes the bad behaviour when using the cache (esp. do_pkgs, but it was even worse with things in ugtk2.pm)
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 0153374..d0a2152 100644
--- a/perl_checker.src/lexer.mll
+++ b/perl_checker.src/lexer.mll
@@ -455,6 +455,7 @@ rule token = parse
| "length"
| "keys"
| "exists"
+| "shift"
| "eval"
| "ref" { ONE_SCALAR_PARA(lexeme lexbuf, pos lexbuf) }