diff --git a/src/u_sxsyn.pas b/src/u_sxsyn.pas index 568262b4..99aedb84 100644 --- a/src/u_sxsyn.pas +++ b/src/u_sxsyn.pas @@ -811,7 +811,16 @@ begin '>': lexOpAndOpOpAndOpEqualAndOpOpEqual('>'); // `=`, `==`, `=>` '=': lexAssEquOrLambda(); - '.', '(', ')', ',', ':' , '[', ']', ';' : + '.': + begin + nextPChar := safeLookupChar(); + fTokKind := TTokenKind.tkSymbl; + if (nextPChar <> nil) and (nextPChar^ = '=') then + fTokStop += 2 + else + fTokStop += 1; + end; + '(', ')', ',', ':' , '[', ']', ';' : begin fTokKind := TTokenKind.tkSymbl; fTokStop += 1;