hedgewars/uLand.pas
changeset 3607 2ad7885615c1
parent 3603 b6b1989744ef
child 3608 c509bbc779e7
equal deleted inserted replaced
3606:dec996dd7d02 3607:2ad7885615c1
  1344 procedure initModule;
  1344 procedure initModule;
  1345 begin
  1345 begin
  1346     LandBackSurface:= nil;
  1346     LandBackSurface:= nil;
  1347     digest:= '';
  1347     digest:= '';
  1348     FillChar(LandPixels, sizeof(TLandArray), 0);
  1348     FillChar(LandPixels, sizeof(TLandArray), 0);
       
  1349     FillChar(LandCollided, sizeof(TDirtyTag), 0);
  1349 end;
  1350 end;
  1350 
  1351 
  1351 procedure freeModule;
  1352 procedure freeModule;
  1352 begin
  1353 begin
  1353 
  1354