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
commit43285409081d93e33c6675b69ecab794ea28488a (patch)
treecd3b9d2e765f9bb9ff9cc7f8307744d161eef4ad
parent7ca68ea47f902ac5a5d015e39939dcc57c54304c (diff)
downloadperl_checker-43285409081d93e33c6675b69ecab794ea28488a.tar
perl_checker-43285409081d93e33c6675b69ecab794ea28488a.tar.gz
perl_checker-43285409081d93e33c6675b69ecab794ea28488a.tar.bz2
perl_checker-43285409081d93e33c6675b69ecab794ea28488a.tar.xz
perl_checker-43285409081d93e33c6675b69ecab794ea28488a.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)) ;