Event type: Follow codestyle guidelines + clearify guidelines

Author: Free-Pascal-meets-SDL-Website

README.md

@@ -40,11 +40,12 @@ These guidelines aim to have better consistency in this community project and ma
 it easier to find certain code parts in the C headers/Pascal includes. Feel free
 to discuss or extend these guidelines, use the issue tracker.
 
-1. Names of C defines (constants) shall not be modified or "pascalified"
+1. Names of C defines (constants) and function parameters shall not be modified or "pascalified"
 Ex: `SDL_INIT_VIDEO` does not change into `SDLInitVideo`.
 
-2. Names of function parameters shall not be modified or "pascalified"
-Ex.: `type_` in `function SDL_GetEventState(type_: TSDL_EventType): UInt8` does not change into `evType`.
+2. Names corresponding to reserved key words are kept and an underscore is added.
+Ex.: `type` in C function `SDL_HasEvent(Uint32 type)` changes into `type_`
+in Pascal function `SDL_HasEvent(type_: TSDL_EventType)`.
 
 3. Use C data types like `UInt8`, `UInt16`, `UInt32`, `SInt8`, `SInt16`,
 `SInt32`, `Float` and so on as often as possible if it is used  in the

sdl2.pas

@@ -393,9 +393,9 @@ function SDL_WINDOWPOS_ISCENTERED(X: Variant): Variant;
 
 //from "sdl_events.h"
 
-function SDL_GetEventState(evType: TSDL_EventType): UInt8;
+function SDL_GetEventState(type_: TSDL_EventType): UInt8;
 begin
-  Result := SDL_EventState(evType, SDL_QUERY);
+  Result := SDL_EventState(type_, SDL_QUERY);
 end;
 
 // from "sdl_timer.h"

sdlevents.inc

@@ -573,14 +573,14 @@ type
    *  Checks to see if certain event types are in the event queue.
    *}
 
-  function SDL_HasEvent(evType: TSDL_EventType): TSDL_Bool  cdecl; external SDL_LibName {$IFDEF DELPHI} {$IFDEF MACOS} name '_SDL_HasEvent' {$ENDIF} {$ENDIF};
+  function SDL_HasEvent(type_: TSDL_EventType): TSDL_Bool  cdecl; external SDL_LibName {$IFDEF DELPHI} {$IFDEF MACOS} name '_SDL_HasEvent' {$ENDIF} {$ENDIF};
   function SDL_HasEvents(minType, maxType: TSDL_EventType): TSDL_Bool cdecl; external SDL_LibName {$IFDEF DELPHI} {$IFDEF MACOS} name '_SDL_HasEvents' {$ENDIF} {$ENDIF};
 
   {**
    *  This function clears events from the event queue
    *}
 
-  procedure SDL_FlushEvent(evType: TSDL_EventType) cdecl; external SDL_LibName {$IFDEF DELPHI} {$IFDEF MACOS} name '_SDL_FlushEvent' {$ENDIF} {$ENDIF};
+  procedure SDL_FlushEvent(type_: TSDL_EventType) cdecl; external SDL_LibName {$IFDEF DELPHI} {$IFDEF MACOS} name '_SDL_FlushEvent' {$ENDIF} {$ENDIF};
   procedure SDL_FlushEvents(minType, maxType: TSDL_EventType) cdecl; external SDL_LibName {$IFDEF DELPHI} {$IFDEF MACOS} name '_SDL_FlushEvents' {$ENDIF} {$ENDIF};
 
   {**
@@ -629,7 +629,7 @@ type
 type
   PSDL_EventFilter = ^TSDL_EventFilter;
   {$IFNDEF GPC}
-    TSDL_EventFilter = function( userdata: Pointer; event: PSDL_Event ): Integer; cdecl;
+    TSDL_EventFilter = function(userdata: Pointer; event: PSDL_Event): Integer; cdecl;
   {$ELSE}
     TSDL_EventFilter = function( userdata: Pointer; event: PSDL_Event ): Integer;
   {$ENDIF}
@@ -700,9 +700,9 @@ const
    *     current processing state of the specified event.
    *}
 
-  function SDL_EventState(evType: TSDL_EventType; state: SInt32): UInt8 cdecl; external SDL_LibName {$IFDEF DELPHI} {$IFDEF MACOS} name '_SDL_EventState' {$ENDIF} {$ENDIF};
+  function SDL_EventState(type_: TSDL_EventType; state: SInt32): UInt8 cdecl; external SDL_LibName {$IFDEF DELPHI} {$IFDEF MACOS} name '_SDL_EventState' {$ENDIF} {$ENDIF};
 
-  function SDL_GetEventState(evType: TSDL_EventType): UInt8;
+  function SDL_GetEventState(type_: TSDL_EventType): UInt8;
 
   {**
    *  This function allocates a set of user-defined events, and returns