fix a lexer error which parsed !! as one operator

diff --git a/lexer.c b/lexer.c
index 662e7e7c4092453251c70cd3d149c809376ad6f5..a3fb2393cd9a6ef3b2820b71d223aedf24a42fa6 100644 (file)
--- a/lexer.c
+++ b/lexer.c
@@ -1164,7 +1164,7 @@ int lex_do(lex_file *lex)
         lex_tokench(lex, ch);
 
         nextch = lex_getch(lex);
-        if (nextch == ch || nextch == '=') {
+        if (nextch == '=' || (nextch == ch && ch != '!')) {
             lex_tokench(lex, nextch);
         } else if (ch == '-' && nextch == '>') {
             lex_tokench(lex, nextch);