Index: src/natools-chunked_strings.adb
==================================================================
--- src/natools-chunked_strings.adb
+++ src/natools-chunked_strings.adb
@@ -437,17 +437,11 @@
 
          L_Pos := L_Pos + Step;
          R_Pos := R_Pos + Step;
 
          if L_Pos > Left (Chunk).all'Last then
-            if Chunk = Left'Last then
-               if R_Pos <= Right'Last then
-                  return Lesser;
-               else
-                  return Equal;
-               end if;
-            end if;
+            --  _Chunk cannot be Left'Last because L_Remain > 0
             Chunk := Chunk + 1;
             L_Pos := Left (Chunk).all'First;
          end if;
          if R_Pos > Right'Last then
             return Greater;