Avoid overflowing event
authornemo
Fri, 04 Nov 2011 19:00:41 -0400
changeset 6280 3725cfec4542
parent 6279 7f724835ea57
child 6281 dc9c44f47e75
Avoid overflowing event
hedgewars/SDLh.pas
--- a/hedgewars/SDLh.pas	Fri Nov 04 21:44:57 2011 +0100
+++ b/hedgewars/SDLh.pas	Fri Nov 04 19:00:41 2011 -0400
@@ -596,6 +596,7 @@
             SDL_JOYBUTTONUP: (jbutton: TSDL_JoyButtonEvent);
             SDL_QUITEV: (quit: TSDL_QuitEvent);
             SDL_USEREVENT: (user: TSDL_UserEvent);
+            SDL_ALLEVENTS: (foo: shortstring);
             //TODO: implement other events
 {$ELSE}
         case Byte of
@@ -614,6 +615,7 @@
             SDL_QUITEV: (quit: TSDL_QuitEvent);
             //SDL_SYSWMEVENT,SDL_EVENT_RESERVEDA,SDL_EVENT_RESERVEDB
             SDL_VIDEORESIZE: (resize: TSDL_ResizeEvent);
+            SDL_ALLEVENTS: (foo: shortstring);
 {$ENDIF}
         end;