hedgewars/uLand.pas
changeset 7151 ec15d9e1a7e3
parent 7079 939f53515489
child 7170 84ac6c6d2d8e
equal deleted inserted replaced
7148:c7ee9592c9a1 7151:ec15d9e1a7e3
   748     SetLength(LandDirty, (LAND_HEIGHT div 32), (LAND_WIDTH div 32));
   748     SetLength(LandDirty, (LAND_HEIGHT div 32), (LAND_WIDTH div 32));
   749 end;
   749 end;
   750 
   750 
   751 procedure freeModule;
   751 procedure freeModule;
   752 begin
   752 begin
   753     Land:= nil;
   753     SetLength(Land, 0, 0);
   754     LandPixels:= nil;
   754     SetLength(LandPixels, 0, 0);
   755     LandDirty:= nil;
   755     SetLength(LandDirty, 0, 0);
   756 end;
   756 end;
   757 
   757 
   758 end.
   758 end.