Explorar o código

Merged revisions 11361 via svnmerge from
http://svn.freepascal.org/svn/fpc/trunk

........
r11361 | Almindor | 2008-07-11 11:39:34 +0200 (Pi, 11 júl 2008) | 2 lines

* fix oversight bug in SDL.pas, SDL_WM_SetIcon() accepts a PUint8 as second argument

........

git-svn-id: branches/fixes_2_2@11362 -

Almindor %!s(int64=17) %!d(string=hai) anos
pai
achega
9033a4cc56
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      packages/sdl/src/sdl.pas

+ 1 - 1
packages/sdl/src/sdl.pas

@@ -3585,7 +3585,7 @@ cdecl; external {$IFNDEF NDS}{$IFDEF __GPC__}name 'SDL_WM_SetCaption'{$ELSE} SDL
   This function must be called before the first call to SDL_SetVideoMode().
   It takes an icon surface, and a mask in MSB format.
   If 'mask' is NULL, the entire icon surface will be used as the icon. }
-procedure SDL_WM_SetIcon(icon: PSDL_Surface; mask: UInt8);
+procedure SDL_WM_SetIcon(icon: PSDL_Surface; mask: PUInt8);
 cdecl; external {$IFNDEF NDS}{$IFDEF __GPC__}name 'SDL_WM_SetIcon'{$ELSE} SDLLibName{$ENDIF __GPC__}{$ENDIF};
 {$EXTERNALSYM SDL_WM_SetIcon}