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 | 7ca6ba037fe3055909d48635f69ddcfb1b0f0ad7 (patch) | |
tree | 0b157493159461396e7f92bf376bb229084b67f2 /perl_checker.src/lexer.mll | |
parent | 1f60ce276457c8270aef4a80448520fd72b5b7bd (diff) | |
download | perl-MDK-Common-7ca6ba037fe3055909d48635f69ddcfb1b0f0ad7.tar perl-MDK-Common-7ca6ba037fe3055909d48635f69ddcfb1b0f0ad7.tar.gz perl-MDK-Common-7ca6ba037fe3055909d48635f69ddcfb1b0f0ad7.tar.bz2 perl-MDK-Common-7ca6ba037fe3055909d48635f69ddcfb1b0f0ad7.tar.xz perl-MDK-Common-7ca6ba037fe3055909d48635f69ddcfb1b0f0ad7.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" |