anchor.diff:  
     SDL.pas is based on the files:
     "sdl.h",
  -  "sdl_main.h",
  -  "sdltype_s.h",
  -  "sdl_stdinc.h",
  +  "sdl_blendmode.h",
     "sdl_events.h",
  +  "sdl_error.h",
  +  "sdl_gesture.h",
  +  "sdl_joystick.h",
     "sdl_keyboard.h",
     "sdl_keycode.h",
  +  "sdl_pixels.h",
  +  "sdl_main.h",
  +  "sdl_mouse.h",
  +  "sdl_rect.h",
  +  "sdl_render.h",
  +  "sdl_rwops.h",
     "sdl_scancode.h",
  -  "sdl_mouse.h",
  +  "sdl_shape.h",
  +  "sdl_stdinc.h",
  +  "sdl_surface.h",
  +  "sdl_timer.h",
  +  "sdl_touch.h",
  +  "sdl_version.h",
     "sdl_video.h",
  -  "sdl_pixels.h",
  -  "sdl_surface.h",
  -  "sdl_rwops.h",
  -  "sdl_blendmode.h",
  -  "sdl_rect.h",
  -  "sdl_joystick.h",
  -  "sdl_touch.h",
  -  "sdl_gesture.h",
  -  "sdl_error.h",
  -  "sdl_version.h",
  -  "sdl_render.h",
  -  "sdl_timer.h"
  +  "sdltype_s.h"
   
     I will not translate:
     "sdl_opengl.h",
  
positive.code:    *   SDL_ShowWindow()
     *}
  
    //typedef struct SDL_Window SDL_Window;
  
  const
    {**
     *  The flags on a window
     *  
     *   SDL_GetWindowFlags()
     *}
  
  
negative.code: 
  function SDL_LowerBlitScaled(src: PSDL_Surface; srcrect: PSDL_Rect; dst: PSDL_Surface; dstrect: PSDL_Rect): SInt32 cdecl; external {$IFDEF GPC} name 'SDL_LowerBlitScaled' {$ELSE} SDL_LibName {$ENDIF};
  
    //from "sdl_shape.h"
  
  {**  SDL_shape.h
   *
   * Header file for the shaped window API.
   *}
  const
    SDL_NONSHAPEABLE_WINDOW = -1;
    SDL_INVALID_SHAPE_ARGUMENT = -2;
    SDL_WINDOW_LACKS_SHAPE = -3;
  
  type
    PPSDL_Window = ^PSDL_Window;
    PSDL_Window = ^TSDL_Window;
  
    {** An enum denoting the specific type of contents present in an SDL_WindowShapeParams union. *}
    TWindowShapeMode = ({** The default mode, a binarized alpha cutoff of 1. *}
                        ShapeModeDefault,
                        {** A binarized alpha cutoff with a given integer value. *}
                        ShapeModeBinarizeAlpha,
                        {** A binarized alpha cutoff with a given integer value, but with the opposite comparison. *}
                        ShapeModeReverseBinarizeAlpha,
                        {** A color key is applied. *}
                        ShapeModeColorKey);
  
  //#define SDL_SHAPEMODEALPHA(mode) (mode == ShapeModeDefault || mode == ShapeModeBinarizeAlpha || mode == ShapeModeReverseBinarizeAlpha)
  
    {** A union containing parameters for shaped windows. *}
    TSDL_WindowShapeParams = record
      case Integer of
        {** a cutoff alpha value for binarization of the window shape's alpha channel. *}
        0: (binarizationCutoff: UInt8;);
        1: (colorKey: TSDL_Color;);
    end;
  
    {** A struct that tags the SDL_WindowShapeParams union with an enum describing the type of its contents. *}
    PSDL_WindowShapeMode = ^TSDL_WindowShapeMode;
    TSDL_WindowShapeMode = record
      {** The mode of these window-shape parameters. *}
      mode: TWindowShapeMode;
      {** Window-shape parameters. *}
      parameters: TSDL_WindowShapeParams;
    end;
  
    //from "sdl_video.h"
  
    {**
     *  The structure that defines a display mode
  