152 // disable "Some fields weren't initialized" warning

   152 // disable "Some fields weren't initialized" warning

   153 const event: TSDL_Event = ();

   153 const event: TSDL_Event = ();

   154 {$WARNINGS ON}

   154 {$WARNINGS ON}

   155 var PrevTime, CurrTime: Longword;

   155 var PrevTime, CurrTime: Longword;

   156     prevFocusState: boolean;

   156     prevFocusState: boolean;

   157     previousGameState: TGameState;

   158     previousGameState: TGameState;

   158 begin

   160 begin

   159     PrevTime:= SDL_GetTicks;

   161     PrevTime:= SDL_GetTicks;

   160     while isTerminated = false do

   162     while isTerminated = false do

   161     begin

   163     begin

   162         SDL_PumpEvents();

   164         SDL_PumpEvents();