From 846f86fb40bf81e194b39cb9d5b81eab2072d470 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Tue, 2 Nov 2021 00:32:56 +0100
Subject: [PATCH] sxsyn, fix range comparison

---
 src/u_sxsyn.pas | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

diff --git a/src/u_sxsyn.pas b/src/u_sxsyn.pas
index e209fe7b..4cd7d4b0 100644
--- a/src/u_sxsyn.pas
+++ b/src/u_sxsyn.pas
@@ -169,15 +169,13 @@ end;
 function TSynSxSynRange.Compare(range: TSynCustomHighlighterRange): integer;
 begin
   result := inherited Compare(range);
-  assert(range <> nil);
-  if not result.equals(0) then
-    exit;
-  if range is TSynSxSynRange then
-    result := integer(rangeKind = TSynSxSynRange(range).rangeKind);
+  if (range is TSynSxSynRange) and (rangeKind = TSynSxSynRange(range).rangeKind) then
+    result := 1;
 end;
 
 procedure TSynSxSynRange.Clear;
 begin
+  inherited;
   rangeKind := TRangeKind.rkNone;
 end;