commit 845a87a8158e29ca4b3f176ab8b335a9302db300
author Hasnain Lakhani <m.hasnain.lakhani@gmail.com> Tue May 27 22:31:42 2025 -0700
committer Jens Geyer <Jens-G@users.noreply.github.com> Fri Jun 06 21:37:35 2025 +0200
tree 35685858fb2f7529706805fa56e1c41892c2dabf
parent 2f8347c0a59e9c4ee3276c1618a6130bf3c5d15b

[THRIFT-5871] Improve MAX_MESSAGE_SIZE_CHECK and friends

lib/delphi/src/Thrift.Protocol.JSON.pas

diff --git a/lib/delphi/src/Thrift.Protocol.JSON.pas b/lib/delphi/src/Thrift.Protocol.JSON.pas
index 2a9682c..5be7ae0 100644
--- a/lib/delphi/src/Thrift.Protocol.JSON.pas
+++ b/lib/delphi/src/Thrift.Protocol.JSON.pas
@@ -1257,8 +1257,8 @@
 // Return the minimum number of bytes a type will consume on the wire
 begin
   case aType of
-    TType.Stop:    result := 0;
-    TType.Void:    result := 0;
+    TType.Stop:    result := 1;  // T_STOP needs to count itself
+    TType.Void:    result := 1;  // T_VOID needs to count itself
     TType.Bool_:   result := 1;
     TType.Byte_:   result := 1;
     TType.Double_: result := 1;