Changeset 202 for trunk/Packages/CoolStreaming/UVarBlockSerializer.pas

Timestamp:

May 17, 2018, 5:41:47 PM (6 years ago)

Author:

chronos

Message:

• Modified: AI player related code moved to UClientAI unit. It is now extension of TClient class to simulate regular human client.
• Modified: More work on client-server architecture.

File:

• trunk/Packages/CoolStreaming/UVarBlockSerializer.pas (modified) (1 diff)

trunk/Packages/CoolStreaming/UVarBlockSerializer.pas

@@ -191 +191 @@
   // Get bit length
   Length := SizeOf(QWord) * BitAlignment;
-  while (((Value shr Length) and 1) = 0) and (Length > 0) do
+  while ((Value and (QWord(1) shl (Length - 1))) = 0) and (Length > 0) do
     Dec(Length);
   Inc(Length);