Changeset 10 for trunk/LocalPlayer/Term.pas

Timestamp:

Jan 7, 2017, 2:33:20 PM (7 years ago)

Author:

chronos

Message:

• Modified: Created CevoComponents ackage for installable custom components.
• Fixed: Compile time range check error.
• Added: Heaptrace check and fixed some memory leaks.
• Fixed: MaskD function.

File:

• trunk/LocalPlayer/Term.pas (modified) (2 diffs)

trunk/LocalPlayer/Term.pas

@@ -2516 +2516 @@
                 FarTech := adNone;
                 FillChar(EnhancementJobs, SizeOf(EnhancementJobs), jNone);
-                FillChar(ImpOrder, SizeOf(ImpOrder), -1);
+                FillChar(ImpOrder, SizeOf(ImpOrder), Byte(-1));
                 ColdWarStart := -ColdWarTurns - 1;
                 ToldAge := -1;
@@ -2533 +2533 @@
                     EffectiveOwner := -1
                   end;
-                FillChar(ToldTech, SizeOf(ToldTech), tsNA);
+                FillChar(ToldTech, SizeOf(ToldTech), Byte(tsNA));
                 if G.Difficulty[p1] > 0 then
                   SoundPreload(sbStart);