980             SDL_FreeSurface(ico)

   980             SDL_FreeSurface(ico)

   981             end;

   981             end;

   982         end

   982         end

   983     else

   983     else

   984         begin

   984         begin

   985 {$IF DEFINED(DARWIN) OR DEFINED(WIN32)}

   986 {$IF DEFINED(DARWIN) OR DEFINED(WIN32)}

   986         reinit:= true;

   987         reinit:= true;

   987 {$ENDIF}

   988 {$ENDIF}

   988         AddFileLog('Freeing old primary surface...');

   989         AddFileLog('Freeing old primary surface...');

   989         SDL_FreeSurface(SDLPrimSurface);

   990         SDL_FreeSurface(SDLPrimSurface);