summaryrefslogtreecommitdiffstats
path: root/perl_checker.src/lexer.mll
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-04-10 19:27:52 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-04-10 19:27:52 +0000
commitb8a27a342f6ce60fdeb350ffe9123cfc79627615 (patch)
treebad7194f18dc2e206abdd7c6e57b0943f8c7c2cc /perl_checker.src/lexer.mll
parent46c3e5570a14d47c55c04f71c65ea9f01b806d76 (diff)
downloadperl-MDK-Common-b8a27a342f6ce60fdeb350ffe9123cfc79627615.tar
perl-MDK-Common-b8a27a342f6ce60fdeb350ffe9123cfc79627615.tar.gz
perl-MDK-Common-b8a27a342f6ce60fdeb350ffe9123cfc79627615.tar.bz2
perl-MDK-Common-b8a27a342f6ce60fdeb350ffe9123cfc79627615.tar.xz
perl-MDK-Common-b8a27a342f6ce60fdeb350ffe9123cfc79627615.zip
keys() is a ONE_SCALAR_PARA
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 aef34a8..60133a7 100644
--- a/perl_checker.src/lexer.mll
+++ b/perl_checker.src/lexer.mll
@@ -433,6 +433,7 @@ rule token = parse
| "format" { let _ = raw_here_doc_next_line "." in FORMAT(pos lexbuf) }
| "defined"
| "length"
+| "keys"
| "exists"
| "ref" { ONE_SCALAR_PARA(lexeme lexbuf, pos lexbuf) }