728     begin

   728     begin

   729 {$IFDEF DEBUGFILE}

   729 {$IFDEF DEBUGFILE}

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

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

   731 {$ENDIF}

   731 {$ENDIF}

   732         SDL_FreeSurface(SDLPrimSurface);

   732         SDL_FreeSurface(SDLPrimSurface);

   733     end;

   734     end;

   734     

   735     

   735 {$IFDEF SDL13}

   736 {$IFDEF SDL13}

   736     window:= SDL_CreateWindow('Hedgewars', 0, 0, cScreenWidth, cScreenHeight,

   737     window:= SDL_CreateWindow('Hedgewars', 0, 0, cScreenWidth, cScreenHeight,

   737         SDL_WINDOW_OPENGL or SDL_WINDOW_SHOWN    

   738         SDL_WINDOW_OPENGL or SDL_WINDOW_SHOWN