changeset 3045 | 41732f986b4f |
parent 3038 | 4e48c276a468 |
child 3046 | d54b2c718971 |
3044:8466bd29280f | 3045:41732f986b4f |
---|---|
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 if LandBackSurface <> nil then |
|
866 SDL_FreeSurface(LandBackSurface); |
|
867 end; |
865 end; |
868 |
866 |
869 end. |
867 end. |