Changeset 323 for trunk/Packages/CoolStreaming/DynNumber.pas

Timestamp:

Jun 25, 2024, 1:34:07 AM (11 days ago)

Author:

chronos

Message:

• Modified: Updated CoolStream package.

File:

• trunk/Packages/CoolStreaming/DynNumber.pas (moved) (moved from trunk/Packages/CoolStreaming/UDynNumber.pas ) (3 diffs)

trunk/Packages/CoolStreaming/DynNumber.pas

@@ -1 @@
-unit UDynNumber;
-
-{$mode objfpc}{$H+}
+unit DynNumber;
 
 interface
 
 uses
-  Classes, SysUtils, UBitStream, Math;
+  Classes, SysUtils, BitStream, Math;
 
 type
@@ -21 +19 @@
     function ReadNumber2: QWord;
   end;
+
 
 implementation
@@ -74 +73 @@
 destructor TDynamicNumber.Destroy;
 begin
-  Stream.Free;
-  inherited Destroy;
+  FreeAndNil(Stream);
+  inherited;
 end;