diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2004-12-13 12:51:09 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2004-12-13 12:51:09 +0000 |
commit | 48905afa579ab67d94b415c22c658754a3c9cc75 (patch) | |
tree | 545d3105519b74316b44ed71555065f42c1cb9d5 /perl_checker.src/lexer.mll | |
parent | 006715b82b42bf2c7008897b3ff4fe9f24435442 (diff) | |
download | perl_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.mll | 1 |
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" |