summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2008-09-04 14:13:34 +0000
committerPascal Rigaux <pixel@mandriva.com>2008-09-04 14:13:34 +0000
commit640660c9b6e4d6e9149e5ab98b9e316bfda56864 (patch)
treecd3b9d2e765f9bb9ff9cc7f8307744d161eef4ad
parent5ab6f290a532899e16b4294b08a32d48bd08579e (diff)
downloadperl_checker-640660c9b6e4d6e9149e5ab98b9e316bfda56864.tar
perl_checker-640660c9b6e4d6e9149e5ab98b9e316bfda56864.tar.gz
perl_checker-640660c9b6e4d6e9149e5ab98b9e316bfda56864.tar.bz2
perl_checker-640660c9b6e4d6e9149e5ab98b9e316bfda56864.tar.xz
perl_checker-640660c9b6e4d6e9149e5ab98b9e316bfda56864.zip
recognize //=
-rw-r--r--src/lexer.mll2
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)) ;