hedgewars/SDLh.pas
changeset 780 f45b0e513dfd
parent 754 94ac14829085
child 883 07a568ba44e0
equal deleted inserted replaced
779:cb18225a150a 780:f45b0e513dfd
   120                        0: (r: Byte;
   120                        0: (r: Byte;
   121                            g: Byte;
   121                            g: Byte;
   122                            b: Byte;
   122                            b: Byte;
   123                            unused: Byte;
   123                            unused: Byte;
   124                           );
   124                           );
   125 (* workaround over freepascal bug.
       
   126    See http://www.freepascal.org/mantis/view.php?id=7613 for details *)
       
   127                        1: (value: Longword);
   125                        1: (value: Longword);
   128                   end;
   126                   end;
   129 
   127 
   130      PSDL_RWops = ^TSDL_RWops;
   128      PSDL_RWops = ^TSDL_RWops;
   131      TSeek = function( context: PSDL_RWops; offset: LongInt; whence: LongInt ): LongInt; cdecl;
   129      TSeek = function( context: PSDL_RWops; offset: LongInt; whence: LongInt ): LongInt; cdecl;