sxsyn, misc style changes

src/u_sxsyn.pas

@@ -5,7 +5,7 @@ unit u_sxsyn;
 interface
 
 uses
-  Classes, SysUtils, Graphics,
+  Classes,
   SynEditHighlighter, SynEditHighlighterFoldBase, SynEditTypes,
   u_common;
 
@@ -41,7 +41,6 @@ type
 
   TSynSxSynRange = class (TSynCustomHighlighterRange)
   private
-    attribParenCount    : Integer;
     rangeKind           : TRangeKind;
   public
     procedure Assign(source: TSynCustomHighlighterRange); override;
@@ -133,7 +132,7 @@ type
 
 implementation
 
-{$PUSH}{$R-}{$COPERATORS ON}
+{$PUSH}{$R-}
 class function KeywordMatch.hash(const w: string): Word;
 var
   i: integer;
@@ -714,12 +713,15 @@ begin
   fTokKind  := tkNone;
   fTokStart := fTokStop;
   llen := length(fLineBuf);
+
   // EOL
   if fTokStop > llen then
     exit;
+
   if fCurrRange.isNotAssigned then
     fCurrRange := TSynSxSynRange.Create(nil);
 
+  // special lines
   if (fLineBuf.length > 1) then
   begin
     // she bang
@@ -736,6 +738,7 @@ begin
     end;
   end;
 
+  // continue partial multi-line ranges
   case fCurrRange.rangeKind of
     TRangeKind.rkString1:   begin lexStringLiteral(); exit;     end;
     TRangeKind.rkString2:   begin lexRawStringLiteral(); exit;  end;
@@ -747,7 +750,6 @@ begin
     begin
       fTokStop += 1;
       fTokKind := TTokenKind.tkBlank;
-      exit;
     end;
     // `//comment` `/*comment` `/=` `/`
     '/':
@@ -829,7 +831,6 @@ begin
     else begin
       fTokStop  += 1;
       fTokKind  := TTokenKind.tkError;
-      exit;
     end;
   end;
 end;