hedgewars/uLand.pas
changeset 3048 755f484d0f62
parent 3046 d54b2c718971
child 3055 f542a36ef6c0
equal deleted inserted replaced
3047:2847f4f2ce67 3048:755f484d0f62
   859     LandBackSurface:= nil;
   859     LandBackSurface:= nil;
   860 end;
   860 end;
   861 
   861 
   862 procedure freeModule;
   862 procedure freeModule;
   863 begin
   863 begin
   864     FillChar(LandPixels, sizeof(TLandArray), 0);
   864     FillChar(LandPixels, sizeof(TLandArray), 0)
   865     // TODO - Find out why unc0rr removed this since it will leak
       
   866     if LandBackSurface <> nil then SDL_FreeSurface(LandBackSurface);
       
   867 end;
   865 end;
   868 
   866 
   869 end.
   867 end.