summaryrefslogtreecommitdiffstats
path: root/perl_checker.src/lexer.mll
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-12-13 12:51:09 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-12-13 12:51:09 +0000
commit48905afa579ab67d94b415c22c658754a3c9cc75 (patch)
tree545d3105519b74316b44ed71555065f42c1cb9d5 /perl_checker.src/lexer.mll
parent006715b82b42bf2c7008897b3ff4fe9f24435442 (diff)
downloadperl_checker-48905afa579ab67d94b415c22c658754a3c9cc75.tar
perl_checker-48905afa579ab67d94b415c22c658754a3c9cc75.tar.gz
perl_checker-48905afa579ab67d94b415c22c658754a3c9cc75.tar.bz2
perl_checker-48905afa579ab67d94b415c22c658754a3c9cc75.tar.xz
perl_checker-48905afa579ab67d94b415c22c658754a3c9cc75.zip
- ugly hack to workaround uniop calls priority pb, but at least have a P_uniop instead of using P_mul
- add delete as a uniop
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 a9de7d2..7de0f13 100644
--- a/perl_checker.src/lexer.mll
+++ b/perl_checker.src/lexer.mll
@@ -540,6 +540,7 @@ rule token = parse
| "printf" { PRINT(lexeme lexbuf, pos lexbuf) }
| "new" { NEW(pos lexbuf) }
| "format" { let pos = pos lexbuf in FORMAT(here_doc_next_line ".", pos) }
+| "delete"
| "defined"
| "length"
| "keys"