Merge pull request PascalCoinDev#261 from SkybuckFlying/PascalCoinDev…

…MasterBlockHeaderFix Packed directive added to record TBlockHeader.
PascalCoin · May 15, 2023 · 2cc1e5d · 2cc1e5d
2 parents 7fb57b6 + 80ef410
commit 2cc1e5d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/core/UFileStorage.pas b/src/core/UFileStorage.pas
@@ -29,7 +29,7 @@ interface
 
 
 Type
-  TBlockHeader = Record
+  TBlockHeader = packed record
     BlockNumber : Cardinal;
     StreamBlockRelStartPos : Int64;
     BlockSize : Cardinal;