hedgewars/uAmmos.pas
changeset 3407 dcc129c4352e
parent 3405 8fdb08497bf1
child 3697 d5b30d6373fc
--- a/hedgewars/uAmmos.pas	Sun May 02 20:30:23 2010 +0000
+++ b/hedgewars/uAmmos.pas	Sun May 02 22:00:50 2010 +0000
@@ -57,7 +57,9 @@
 var mi: array[0..cMaxSlotIndex] of byte;
     a: TAmmoType;
 begin
+{$HINTS OFF}
 FillChar(mi, sizeof(mi), 0);
+{$HINTS ON}
 FillChar(Ammo^, sizeof(Ammo^), 0);
 for a:= Low(TAmmoType) to High(TAmmoType) do
     begin
@@ -172,7 +174,9 @@
     slot, ami: LongInt;
     hhammo: PHHAmmo;
 begin
+{$HINTS OFF}
 FillChar(ammos, sizeof(ammos), 0);
+{$HINTS ON}
 hhammo:= Hedgehog.Ammo;
 
 for slot:= 0 to cMaxSlotIndex do