VFS: Compressed size display support

1 files changed, 3 insertions, 1 deletions

diff --git a/UEngines.pas b/UEngines.pas
index 903bec3..9483dfb 100644
--- a/UEngines.pas
+++ b/UEngines.pas
@@ -61,7 +61,7 @@ type
     FDisplayName: PChar;  //  always-valid UTF-8
     LnkPointTo: PChar;    //  ANSI
     ADestination: PChar;
-    Size: Int64;
+    Size, PackedSize: Int64;
     Mode, UID, GID: Cardinal;
     IsDir, IsLnk, ForceMove, IsOnRO, IsExecutable: boolean;
     ModifyTime: time_t;
@@ -554,6 +554,7 @@ var Handle : PDIR;
       FName := strdup(PChar(FPath));
       FDisplayName := StrToUTF8(PChar(FPath));
       Size := StatBuf_local^.st_size;
+      PackedSize := -1;
       Mode := StatBuf_local^.st_mode;
       IsDir := __S_ISTYPE(StatBuf_local^.st_mode, __S_IFDIR);
       IsLnk := __S_ISTYPE(StatBuf_local^.st_mode, __S_IFLNK);
@@ -653,6 +654,7 @@ begin
       FName := strdup(PChar(APath));
       FDisplayName := StrToUTF8(PChar(APath));
       Size := StatBuf^.st_size;
+      PackedSize := -1;
       Mode := StatBuf^.st_mode;
       IsDir := __S_ISTYPE(StatBuf^.st_mode, __S_IFDIR);
       IsLnk := __S_ISTYPE(StatBuf^.st_mode, __S_IFLNK);