core: optimized IsStringJson()

synopse · Jan 17, 2025 · f3f3340 · f3f3340
1 parent 2a0956c
commit f3f3340
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 4 deletions.
diff --git a/src/core/mormot.core.json.pas b/src/core/mormot.core.json.pas
@@ -2868,9 +2868,14 @@ function IsStringJson(P: PUtf8Char): boolean;  // test if P^ is a "string" value
     result := false;
     exit;
   end;
-  while (P^ <= ' ') and
-        (P^ <> #0) do
-    inc(P);
+  while P^ <= ' ' do
+    if P^ = #0 then
+    begin
+      result := true;
+      exit;
+    end
+    else
+      inc(P);
   tab := @JSON_CHARS;
   c4 := PInteger(P)^;
   if (((c4 = NULL_LOW) or

diff --git a/src/mormot.commit.inc b/src/mormot.commit.inc
@@ -1 +1 @@
-'2.3.9425'
+'2.3.9426'