diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2003-04-10 19:27:52 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2003-04-10 19:27:52 +0000 |
commit | b8a27a342f6ce60fdeb350ffe9123cfc79627615 (patch) | |
tree | bad7194f18dc2e206abdd7c6e57b0943f8c7c2cc /perl_checker.src/lexer.mll | |
parent | 46c3e5570a14d47c55c04f71c65ea9f01b806d76 (diff) | |
download | perl-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.mll | 1 |
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) } |