diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2008-09-04 14:13:34 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2008-09-04 14:13:34 +0000 |
commit | 640660c9b6e4d6e9149e5ab98b9e316bfda56864 (patch) | |
tree | cd3b9d2e765f9bb9ff9cc7f8307744d161eef4ad /src | |
parent | 5ab6f290a532899e16b4294b08a32d48bd08579e (diff) | |
download | perl_checker-640660c9b6e4d6e9149e5ab98b9e316bfda56864.tar perl_checker-640660c9b6e4d6e9149e5ab98b9e316bfda56864.tar.gz perl_checker-640660c9b6e4d6e9149e5ab98b9e316bfda56864.tar.bz2 perl_checker-640660c9b6e4d6e9149e5ab98b9e316bfda56864.tar.xz perl_checker-640660c9b6e4d6e9149e5ab98b9e316bfda56864.zip |
recognize //=
Diffstat (limited to 'src')
-rw-r--r-- | src/lexer.mll | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lexer.mll b/src/lexer.mll index dfa8561..b25e08c 100644 --- a/src/lexer.mll +++ b/src/lexer.mll @@ -505,7 +505,7 @@ rule token = parse | ":" { COLON(pos lexbuf) } | "::" { PKG_SCOPE(pos lexbuf) } -| "=" | "+=" | "-=" | "*=" | ".=" | "|=" | "&=" | "^=" | "||=" | "&&=" { ASSIGN(lexeme lexbuf, pos lexbuf) } +| "=" | "+=" | "-=" | "*=" | ".=" | "|=" | "&=" | "^=" | "||=" | "&&=" | "//=" { ASSIGN(lexeme lexbuf, pos lexbuf) } | "<<=" | ">>=" | "**=" { warn [Warn_complex_expressions] lexbuf (Printf.sprintf "don't use \"%s\", use the expanded version instead" (lexeme lexbuf)) ; |